blkCpy.s of ARM system-on-chip architecture

JordonWu

;Copy string from table1 to table2
                        AREA blkCpy,CODE,READONLY
SWI_ANGEL          EQU 0x123456                      ;SWI number for Angel semihosting
                   MACRO
$l                 Exit                              ;Angel SWI call to terminate execution
$l                 MOV r0, #0x18                     ;Angel SWIreason_ReportException(0x18)
                   LDR r1, =0x20026                  ;report ADP_Stopped_ApplicationExit
                   SWI SWI_ANGEL                     ;ARM semihosting SWI
                   MEND
                   MACRO
$l                 WriteC                            ;Angel SWI call to output char in [r1]
$l                 MOV r0, #0x3                      ;select Angel SYS_WRITEC function
                   SWI SWI_ANGEL
                   MEND
                   ENTRY                             ;code entry point
        ADR        r1, TABLE1                        ;r1->TABLE1
        ADR        r2, TABLE2                        ;r2->TABLE2
        ADR        r3, T1END                        ;r3->T1END
LOOP1        LDR        r4, [r1], #4                        ;GET TABLE1 1st WORD
        STR        r4, [r2], #4                        ;COPY INTO TABLE2
        CMP        r1, r3                                ;FINISHED?
        BLT        LOOP1                                ;IF NOT, DO MORE
        ADR        r1, TABLE2-1                        ;r1->TABLE2
        MOV        r0, #0x3
LOOP2   LDRB         r4, [r1,#1]!                         ;get next byte
        CMP        r4, #0                                ;CHECK FOR TEXT END
        SWINE         SWI_ANGEL                        ;IF NOT END, PRINT...
        BNE        LOOP2                                ;.. AND LOOP BACK
        Exit                                        ;FINISH
        ALIGN
        TABLE1        =        "This is the right string!", &0a, &0d, 0
T1END
TABLE2        =        "This is the wrong string!", 0
        END


本文来自ChinaUnix博客，如果查看原文请点：http://blog.chinaunix.net/u/27204/showart_702375.html