URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [arm/] [xscale/] [testutils.inc] - Blame information for rev 856

Go to most recent revision | Details | Compare with Previous | View Log


# r0-r3 are used as tmps, consider them call clobbered by these macros.
# This uses the angel rom monitor calls.
# ??? How do we use the \@ facility of .macros ???
# @ is the comment char!
 
        .macro mvi_h_gr reg, val
        ldr \reg,[pc]
        b . + 8
        .word \val
        .endm
 
        .macro mvaddr_h_gr reg, addr
        ldr \reg,[pc]
        b . + 8
        .word \addr
        .endm
 
        .macro start
        .data
failmsg:
        .asciz "fail\n"
passmsg:
        .asciz "pass\n"
        .text
 
do_pass:
        ldr r1, passmsg_addr
        mov r0, #4
        swi #0x123456
        exit 0
passmsg_addr:
        .word passmsg
 
do_fail:
        ldr r1, failmsg_addr
        mov r0, #4
        swi #0x123456
        exit 1
failmsg_addr:
        .word failmsg
 
        .global _start
_start:
        .endm
 
# *** Other macros know pass/fail are 4 bytes in size!  Yuck.
 
        .macro pass
        b do_pass
        .endm
 
        .macro fail
        b do_fail
        .endm
 
        .macro exit rc
        # ??? This works with the ARMulator but maybe not others.
        #mov r0, #\rc
        #swi #1
        # This seems to be portable (though it ignores rc).
        mov r0,#0x18
        mvi_h_gr r1, 0x20026
        swi #0x123456
        # If that returns, punt with a sigill.
        stc 0,cr0,[r0]
        .endm
 
# Other macros know this only clobbers r0.
# WARNING: It also clobbers the condition codes (FIXME).
        .macro test_h_gr reg, val
        mvaddr_h_gr r0, \val
        cmp \reg, r0
        beq . + 8
        fail
        .endm
 
        .macro mvi_h_cnvz c, n, v, z
        mov r0, #0
        .if \c
        orr r0, r0, #0x20000000
        .endif
        .if \n
        orr r0, r0, #0x80000000
        .endif
        .if \v
        orr r0, r0, #0x10000000
        .endif
        .if \z
        orr r0, r0, #0x40000000
        .endif
        mrs r1, cpsr
        bic r1, r1, #0xf0000000
        orr r1, r1, r0
        msr cpsr, r1
        # ??? nops needed
        .endm
 
# ??? Preserve condition codes?
        .macro test_h_cnvz c, n, v, z
        mov r0, #0
        .if \c
        orr r0, r0, #0x20000000
        .endif
        .if \n
        orr r0, r0, #0x80000000
        .endif
        .if \v
        orr r0, r0, #0x10000000
        .endif
        .if \z
        orr r0, r0, #0x40000000
        .endif
        mrs r1, cpsr
        and r1, r1, #0xf0000000
        cmp r0, r1
        beq . + 8
        fail
        .endm

Line No.	Rev	Author	Line
1	24	jeremybenn	`# r0-r3 are used as tmps, consider them call clobbered by these macros.`
2			`# This uses the angel rom monitor calls.`
3			`# ??? How do we use the \@ facility of .macros ???`
4			`# @ is the comment char!`
5
6			`.macro mvi_h_gr reg, val`
7			`ldr \reg,[pc]`
8			`b . + 8`
9			`.word \val`
10			`.endm`
11
12			`.macro mvaddr_h_gr reg, addr`
13			`ldr \reg,[pc]`
14			`b . + 8`
15			`.word \addr`
16			`.endm`
17
18			`.macro start`
19			`.data`
20			`failmsg:`
21			`.asciz "fail\n"`
22			`passmsg:`
23			`.asciz "pass\n"`
24			`.text`
25
26			`do_pass:`
27			`ldr r1, passmsg_addr`
28			`mov r0, #4`
29			`swi #0x123456`
30			`exit 0`
31			`passmsg_addr:`
32			`.word passmsg`
33
34			`do_fail:`
35			`ldr r1, failmsg_addr`
36			`mov r0, #4`
37			`swi #0x123456`
38			`exit 1`
39			`failmsg_addr:`
40			`.word failmsg`
41
42			`.global _start`
43			`_start:`
44			`.endm`
45
46			`# *** Other macros know pass/fail are 4 bytes in size! Yuck.`
47
48			`.macro pass`
49			`b do_pass`
50			`.endm`
51
52			`.macro fail`
53			`b do_fail`
54			`.endm`
55
56			`.macro exit rc`
57			`# ??? This works with the ARMulator but maybe not others.`
58			`#mov r0, #\rc`
59			`#swi #1`
60			`# This seems to be portable (though it ignores rc).`
61			`mov r0,#0x18`
62			`mvi_h_gr r1, 0x20026`
63			`swi #0x123456`
64			`# If that returns, punt with a sigill.`
65			`stc 0,cr0,[r0]`
66			`.endm`
67
68			`# Other macros know this only clobbers r0.`
69			`# WARNING: It also clobbers the condition codes (FIXME).`
70			`.macro test_h_gr reg, val`
71			`mvaddr_h_gr r0, \val`
72			`cmp \reg, r0`
73			`beq . + 8`
74			`fail`
75			`.endm`
76
77			`.macro mvi_h_cnvz c, n, v, z`
78			`mov r0, #0`
79			`.if \c`
80			`orr r0, r0, #0x20000000`
81			`.endif`
82			`.if \n`
83			`orr r0, r0, #0x80000000`
84			`.endif`
85			`.if \v`
86			`orr r0, r0, #0x10000000`
87			`.endif`
88			`.if \z`
89			`orr r0, r0, #0x40000000`
90			`.endif`
91			`mrs r1, cpsr`
92			`bic r1, r1, #0xf0000000`
93			`orr r1, r1, r0`
94			`msr cpsr, r1`
95			`# ??? nops needed`
96			`.endm`
97
98			`# ??? Preserve condition codes?`
99			`.macro test_h_cnvz c, n, v, z`
100			`mov r0, #0`
101			`.if \c`
102			`orr r0, r0, #0x20000000`
103			`.endif`
104			`.if \n`
105			`orr r0, r0, #0x80000000`
106			`.endif`
107			`.if \v`
108			`orr r0, r0, #0x10000000`
109			`.endif`
110			`.if \z`
111			`orr r0, r0, #0x40000000`
112			`.endif`
113			`mrs r1, cpsr`
114			`and r1, r1, #0xf0000000`
115			`cmp r0, r1`
116			`beq . + 8`
117			`fail`
118			`.endm`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [arm/] [xscale/] [testutils.inc] - Blame information for rev 856