32x mostly works
[megadrive.git] / testpico / sega_gcc.s
1 exc_tab:\r
2     dc.l     0,   RST, exc02, exc03, exc04, exc05, exc06, exc07\r
3     dc.l exc08, exc09, exc0a, exc0b, exc0c, exc0d, exc0e, exc0f\r
4     dc.l exc10, exc11, exc12, exc13, exc14, exc15, exc16, exc17\r
5     dc.l exc18, exc19, exc1a, exc1b, 0xff0100, exc1d, 0xff0140, exc1f\r
6     dc.l exc20, exc21, exc22, exc23, exc24, exc25, exc26, exc27\r
7     dc.l exc28, exc29, exc2a, exc2b, exc2c, exc2d, exc2e, exc2f\r
8     dc.l exc30, exc31, exc32, exc33, exc34, exc35, exc3e, exc37\r
9     dc.l exc38, exc39, exc3a, exc3b, exc3c, exc3d, exc3e, exc3f\r
10 \r
11     .ascii "SEGA 32X                        "\r
12     .ascii "PD testsuite                                    "\r
13     .ascii "PD testsuite                                    "\r
14     .ascii "GM 00000000-00"\r
15     .byte 0x00,0x00\r
16     .ascii "J               "\r
17     .long  0x000000,0x3fffff\r
18     .long  0xff0000,0xffffff\r
19     .ascii "RA"; .byte 0xf8,0x20                     /* 1b0 */\r
20     .long  0x200001,0x20ffff                         /* 1b4 */\r
21     .ascii "    "                                    /* 1bc */\r
22     .ascii "                        "                /* 1c0 */\r
23     .ascii "                        "\r
24     .ascii "JUE             "                        /* 1f0 */\r
25 \r
26 # mystery landing area for reset with 32X on and RV=1\r
27 # 2c8 - 304 in multiples of 4\r
28 .rept 0x1c0/2\r
29     illegal\r
30 .endr\r
31 \r
32     /* MARS data */\r
33     .org 0x3c0\r
34     .ascii "PD testsuite    "\r
35     .long 0          /* version? not used */\r
36     .long sh2_test   /* ROM src */\r
37     .long 0          /* SDRAM dst */\r
38     .long sh2_test_end-sh2_test /* length */\r
39     .long 0x06000400 /* master entry */\r
40     .long 0x06000404 /* slave entry */\r
41     .long 0x06000000 /* master VBR */\r
42     .long 0x06000200 /* slave VBR */\r
43     /* Standard 32X startup code for MD side at 0x3F0 */\r
44     .org 0x3f0\r
45     .word 0x287C,0xFFFF,0xFFC0,0x23FC,0x0000,0x0000,0x00A1,0x5128\r
46     .word 0x46FC,0x2700,0x4BF9,0x00A1,0x0000,0x7001,0x0CAD,0x4D41\r
47     .word 0x5253,0x30EC,0x6600,0x03E6,0x082D,0x0007,0x5101,0x67F8\r
48     .word 0x4AAD,0x0008,0x6710,0x4A6D,0x000C,0x670A,0x082D,0x0000\r
49     .word 0x5101,0x6600,0x03B8,0x102D,0x0001,0x0200,0x000F,0x6706\r
50     .word 0x2B78,0x055A,0x4000,0x7200,0x2C41,0x4E66,0x41F9,0x0000\r
51     .word 0x04D4,0x6100,0x0152,0x6100,0x0176,0x47F9,0x0000,0x04E8\r
52     .word 0x43F9,0x00A0,0x0000,0x45F9,0x00C0,0x0011,0x3E3C,0x0100\r
53     .word 0x7000,0x3B47,0x1100,0x3B47,0x1200,0x012D,0x1100,0x66FA\r
54     .word 0x7425,0x12DB,0x51CA,0xFFFC,0x3B40,0x1200,0x3B40,0x1100\r
55     .word 0x3B47,0x1200,0x149B,0x149B,0x149B,0x149B,0x41F9,0x0000\r
56     .word 0x04C0,0x43F9,0x00FF,0x0000,0x22D8,0x22D8,0x22D8,0x22D8\r
57     .word 0x22D8,0x22D8,0x22D8,0x22D8,0x41F9,0x00FF,0x0000,0x4ED0\r
58     .word 0x1B7C,0x0001,0x5101,0x41F9,0x0000,0x06BC,0xD1FC,0x0088\r
59     .word 0x0000,0x4ED0,0x0404,0x303C,0x076C,0x0000,0x0000,0xFF00\r
60     .word 0x8137,0x0002,0x0100,0x0000,0xAF01,0xD91F,0x1127,0x0021\r
61     .word 0x2600,0xF977,0xEDB0,0xDDE1,0xFDE1,0xED47,0xED4F,0xD1E1\r
62     .word 0xF108,0xD9C1,0xD1E1,0xF1F9,0xF3ED,0x5636,0xE9E9,0x9FBF\r
63     .word 0xDFFF,0x4D41,0x5253,0x2049,0x6E69,0x7469,0x616C,0x2026\r
64     .word 0x2053,0x6563,0x7572,0x6974,0x7920,0x5072,0x6F67,0x7261\r
65     .word 0x6D20,0x2020,0x2020,0x2020,0x2020,0x2043,0x6172,0x7472\r
66     .word 0x6964,0x6765,0x2056,0x6572,0x7369,0x6F6E,0x2020,0x2020\r
67     .word 0x436F,0x7079,0x7269,0x6768,0x7420,0x5345,0x4741,0x2045\r
68     .word 0x4E54,0x4552,0x5052,0x4953,0x4553,0x2C4C,0x5444,0x2E20\r
69     .word 0x3139,0x3934,0x2020,0x2020,0x2020,0x2020,0x2020,0x2020\r
70     .word 0x2020,0x2020,0x2020,0x2020,0x2020,0x2020,0x2020,0x2020\r
71     .word 0x2020,0x2020,0x2020,0x524F,0x4D20,0x5665,0x7273,0x696F\r
72     .word 0x6E20,0x312E,0x3000,0x48E7,0xC040,0x43F9,0x00C0,0x0004\r
73     .word 0x3011,0x303C,0x8000,0x323C,0x0100,0x3E3C,0x0012,0x1018\r
74     .word 0x3280,0xD041,0x51CF,0xFFF8,0x4CDF,0x0203,0x4E75,0x48E7\r
75     .word 0x81C0,0x41F9,0x0000,0x063E,0x43F9,0x00C0,0x0004,0x3298\r
76     .word 0x3298,0x3298,0x3298,0x3298,0x3298,0x3298,0x2298,0x3341\r
77     .word 0xFFFC,0x3011,0x0800,0x0001,0x66F8,0x3298,0x3298,0x7000\r
78     .word 0x22BC,0xC000,0x0000,0x7E0F,0x3340,0xFFFC,0x3340,0xFFFC\r
79     .word 0x3340,0xFFFC,0x3340,0xFFFC,0x51CF,0xFFEE,0x22BC,0x4000\r
80     .word 0x0010,0x7E09,0x3340,0xFFFC,0x3340,0xFFFC,0x3340,0xFFFC\r
81     .word 0x3340,0xFFFC,0x51CF,0xFFEE,0x4CDF,0x0381,0x4E75,0x8114\r
82     .word 0x8F01,0x93FF,0x94FF,0x9500,0x9600,0x9780,0x4000,0x0080\r
83     .word 0x8104,0x8F02,0x48E7,0xC140,0x43F9,0x00A1,0x5180,0x08A9\r
84     .word 0x0007,0xFF80,0x66F8,0x3E3C,0x00FF,0x7000,0x7200,0x337C\r
85     .word 0x00FF,0x0004,0x3341,0x0006,0x3340,0x0008,0x4E71,0x0829\r
86     .word 0x0001,0x000B,0x66F8,0x0641,0x0100,0x51CF,0xFFE8,0x4CDF\r
87     .word 0x0283,0x4E75,0x48E7,0x8180,0x41F9,0x00A1,0x5200,0x08A8\r
88     .word 0x0007,0xFF00,0x66F8,0x3E3C,0x001F,0x20C0,0x20C0,0x20C0\r
89     .word 0x20C0,0x51CF,0xFFF6,0x4CDF,0x0181,0x4E75,0x41F9,0x00FF\r
90     .word 0x0000,0x3E3C,0x07FF,0x7000,0x20C0,0x20C0,0x20C0,0x20C0\r
91     .word 0x20C0,0x20C0,0x20C0,0x20C0,0x51CF,0xFFEE,0x3B7C,0x0000\r
92     .word 0x1200,0x7E0A,0x51CF,0xFFFE,0x43F9,0x00A1,0x5100,0x7000\r
93     .word 0x2340,0x0020,0x2340,0x0024,0x1B7C,0x0003,0x5101,0x2E79\r
94     .word 0x0088,0x0000,0x0891,0x0007,0x66FA,0x7000,0x3340,0x0002\r
95     .word 0x3340,0x0004,0x3340,0x0006,0x2340,0x0008,0x2340,0x000C\r
96     .word 0x3340,0x0010,0x3340,0x0030,0x3340,0x0032,0x3340,0x0038\r
97     .word 0x3340,0x0080,0x3340,0x0082,0x08A9,0x0000,0x008B,0x66F8\r
98     .word 0x6100,0xFF12,0x08E9,0x0000,0x008B,0x67F8,0x6100,0xFF06\r
99     .word 0x08A9,0x0000,0x008B,0x6100,0xFF3C,0x303C,0x0040,0x2229\r
100     .word 0x0020,0x0C81,0x5351,0x4552,0x6700,0x0092,0x303C,0x0080\r
101     .word 0x2229,0x0020,0x0C81,0x5344,0x4552,0x6700,0x0080,0x21FC\r
102     .word 0x0088,0x02A2,0x0070,0x303C,0x0002,0x7200,0x122D,0x0001\r
103     .word 0x1429,0x0080,0xE14A,0x8242,0x0801,0x000F,0x660A,0x0801\r
104     .word 0x0006,0x6700,0x0058,0x6008,0x0801,0x0006,0x6600,0x004E\r
105     .word 0x7020,0x41F9,0x0088,0x0000,0x3C28,0x018E,0x4A46,0x6700\r
106     .word 0x0010,0x3429,0x0028,0x0C42,0x0000,0x67F6,0xB446,0x662C\r
107     .word 0x7000,0x2340,0x0028,0x2340,0x002C,0x3E14,0x2C7C,0xFFFF\r
108     .word 0xFFC0,0x4CD6,0x7FF9,0x44FC,0x0000,0x6014,0x43F9,0x00A1\r
109     .word 0x5100,0x3340,0x0006,0x303C,0x8000,0x6004,0x44FC,0x0001\r
110 \r
111 RST:\r
112     move.w  #0x2600, %sr\r
113 \r
114     move.b (0xA10001), %d0\r
115     andi.b #0x0F, %d0\r
116     beq.s 0f\r
117     move.l  #0x53454741, (0xA14000) /* 'SEGA' */\r
118 0:\r
119     tst.w   (0xc00004).l\r
120 \r
121     moveq   #0, %d0\r
122     movea.l %d0, %a7\r
123     move    %a7, %usp\r
124 \r
125     /* clear .bss */\r
126     lea     __bss_start, %a0\r
127     lea     __end, %a1\r
128 0:\r
129     move.l  %d0, (%a0)+\r
130     cmp.l   %a1, %a0\r
131     blt.s   0b\r
132 \r
133 #    move.w  #0x2000, %sr\r
134     jsr     main\r
135 0:\r
136     bra     0b\r
137 \r
138 #HBL:\r
139 #VBL:\r
140 #    rte\r
141 \r
142 pre_exception:\r
143     move.w  #0x2700, %sr\r
144     movem.l %d0-%d7/%a0-%a7,-(%sp)\r
145     add.w   #2, 0x3e(%sp)\r
146     move.l  %sp, %d0\r
147     move.l  %d0,-(%sp)\r
148     jsr     exception\r
149 0:\r
150     bra     0b\r
151 \r
152 .macro exc_stub num\r
153 exc\num:\r
154     move.w #0x\num, -(%sp)\r
155     jmp pre_exception\r
156 .endm\r
157 \r
158 exc_stub 02\r
159 exc_stub 03\r
160 exc_stub 04\r
161 exc_stub 05\r
162 exc_stub 06\r
163 exc_stub 07\r
164 exc_stub 08\r
165 exc_stub 09\r
166 exc_stub 0a\r
167 exc_stub 0b\r
168 exc_stub 0c\r
169 exc_stub 0d\r
170 exc_stub 0e\r
171 exc_stub 0f\r
172 \r
173 exc_stub 10\r
174 exc_stub 11\r
175 exc_stub 12\r
176 exc_stub 13\r
177 exc_stub 14\r
178 exc_stub 15\r
179 exc_stub 16\r
180 exc_stub 17\r
181 exc_stub 18\r
182 exc_stub 19\r
183 exc_stub 1a\r
184 exc_stub 1b\r
185 HBL:\r
186 exc_stub 1c\r
187 exc_stub 1d\r
188 VBL:\r
189 exc_stub 1e\r
190 exc_stub 1f\r
191 \r
192 exc_stub 20\r
193 exc_stub 21\r
194 exc_stub 22\r
195 exc_stub 23\r
196 exc_stub 24\r
197 exc_stub 25\r
198 exc_stub 26\r
199 exc_stub 27\r
200 exc_stub 28\r
201 exc_stub 29\r
202 exc_stub 2a\r
203 exc_stub 2b\r
204 exc_stub 2c\r
205 exc_stub 2d\r
206 exc_stub 2e\r
207 exc_stub 2f\r
208 exc_stub 30\r
209 exc_stub 31\r
210 exc_stub 32\r
211 exc_stub 33\r
212 exc_stub 34\r
213 exc_stub 35\r
214 exc_stub 36\r
215 exc_stub 37\r
216 exc_stub 38\r
217 exc_stub 39\r
218 exc_stub 3a\r
219 exc_stub 3b\r
220 exc_stub 3c\r
221 exc_stub 3d\r
222 exc_stub 3e\r
223 exc_stub 3f\r
224 \r
225 .align 4\r
226 \r
227 # must avoid anything use 1070, 2070, 3070 after RV is set,\r
228 # so let's place some data here\r
229 .global z80_test\r
230 .global z80_test_end\r
231 z80_test:\r
232 .incbin "z80_test.bin80"\r
233 z80_test_end:\r
234 \r
235 .align 4\r
236 \r
237 .global sh2_test\r
238 .global sh2_test_end\r
239 sh2_test:\r
240 .incbin "sh2_test.binsh"\r
241 sh2_test_end:\r
242 \r
243 .org 0x2070\r
244 .long 0x1234567f\r
245 \r
246 .global font_base\r
247 font_base:\r
248 .incbin "font.bin"\r
249 \r
250 .org 0x3070\r
251 .long 0x3456789f\r
252 \r
253 # vim:filetype=asmM68k:ts=4:sw=4:expandtab\r