aboutsummaryrefslogtreecommitdiffstats
path: root/src/gba/utils.s
blob: d70d7ef22cc2f4d7342b1b4c0f4cb0e7ddbba639 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
.file "utils.s"
.section .iwram, "ax", %progbits
.arm
.align

@ Efficient memcpy32 function (borrowed from TONC). It uses a two step
@ approach. It tries to copy 8 u32 chunks at a time with the ldm and stm
@ instructions and then copy the remainder if there are less than 8 chunks
@ left.
@
@   r0: destination address
@   r1: source address
@   r2: number of 32bit chunks to copy
@
.global copy32
copy32:
    cmp     r2, #0
    beq     .copy32_end

    and     r12, r2, #7     @ r12 = r2 % 8
    movs    r2, r2, lsr #3  @ r2  = r2 / 8
    beq     .Lcopy32_residual

    @ Copy 8 32B chunks at a time
    push    {r4-r10}
.Lcopy32_chunks:
    ldmia   r1!, {r3-r10}
    stmia   r0!, {r3-r10}
    subs    r2, r2, #1
    bhi     .Lcopy32_chunks
    pop     {r4-r10}

    @ Copy residual 32B chunks (0-7)
.Lcopy32_residual:
    subs    r12, r12, #1
    ldrhs   r3, [r1], #4
    strhs   r3, [r0], #4
    bhi     .Lcopy32_residual

.copy32_end:
    bx      lr


@ Efficient memset32 function (borrowed from TONC). It uses a two step
@ approach. Uses the same stmia approach from memcpy32 but, no need for ldmia
@
@   r0: destination address
@   r1: u32 value to set
@   r2: number of 32bit chunks to set
@
.global set32
set32:
    cmp     r2, #0
    beq     .set32_end

    and     r12, r2, #7     @ r12 = r2 % 8
    movs    r2, r2, lsr #3  @ r2  = r2 / 8
    beq     .Lset32_residual

    @ Set 8 32B chunks at a time
    push    {r4-r9}
    mov     r3, r1
    mov     r4, r1
    mov     r5, r1
    mov     r6, r1
    mov     r7, r1
    mov     r8, r1
    mov     r9, r1
.Lset32_chunks:
    stmia   r0!, {r1, r3-r9}
    subs    r2, r2, #1
    bhi     .Lset32_chunks
    pop     {r4-r9}

    @ Set residual 32B chunks (0-7)
.Lset32_residual:
    subs    r12, r12, #1
    strhs   r1, [r0], #4
    bhi     .Lset32_residual

.set32_end:
    bx      lr