32x: drc: more wip, some games work, debug stats
[picodrive.git] / cpu / Cyclone / tests / test_misc2_gen.c
CommitLineData
03c5768c 1#include <stdio.h>
2#include <stdlib.h>
3#include <time.h>
4
5
6static FILE *f;
7
8#define bswap16(x) (x=(unsigned short)((x<<8)|(x>>8)))
9#define bswap32(x) (x=((x<<24)|((x<<8)&0xff0000)|((x>>8)&0x00ff00)|((unsigned)x>>24)))
10
11static void write_op(unsigned short op, unsigned short word0, unsigned short word1, unsigned short word2)
12{
13 bswap16(op);
14 bswap16(word0);
15 bswap16(word1);
16 bswap16(word2);
17
18 fwrite(&op, 1, sizeof(op), f);
19 fwrite(&word0, 1, sizeof(word0), f);
20 fwrite(&word1, 1, sizeof(word1), f);
21 fwrite(&word2, 1, sizeof(word2), f);
22}
23
24static void write32(unsigned int a)
25{
26 bswap32(a);
27 fwrite(&a, 1, sizeof(a), f);
28}
29
30static int op_check(unsigned short op)
31{
32 if ((op&0xf000) == 0x6000) return 0; // Bxx
33 if ((op&0xf0f8) == 0x50c8) return 0; // DBxx
34 if ((op&0xff80) == 0x4e80) return 0; // Jsr
35 if ((op&0xf000) == 0xa000) return 0; // a-line
36 if ((op&0xf000) == 0xf000) return 0; // f-line
37 if ((op&0xfff8)==0x4e70&&op!=0x4e71&&op!=0x4e76) return 0; // reset, rte, rts
38
39 if ((op&0x3f) >= 0x28) op = (op&~0x3f) | (rand() % 0x28);
40 return 1;
41}
42
43static unsigned short safe_rand(void)
44{
45 unsigned short op;
46
47 /* avoid branch opcodes */
48 do
49 {
50 op = rand();
51 }
52 while (!op_check(op));
53
54 return op;
55}
56
57int main()
58{
59 int i, op;
60
61 srand(time(0));
62
63 f = fopen("test_misc2.bin", "wb");
64 if (!f) return 1;
65
66 write32(0x00ff8000); // stack
67 write32(0x300); // IP
68
69 for (i=0x100/4-2; i; i--)
70 {
71 write32(0x200+i*4); // exception vectors
72 }
73
74 for (i=0x100/4; i; i--)
75 {
76 write32(0); // pad
77 }
78
79 for (i=0x100/4; i; i--)
80 {
81 write32(0x4e734e73); // fill with rte instructions
82 }
83
84 for (op = 0; op < 0x10000; op++)
85 {
86 if ((op&0xf000) == 0x6000) // Bxx
87 {
88 if ((op&0x00ff) == 0)
89 write_op(op, 6, 0, 0);
03c5768c 90 }
91 else if ((op&0xf0f8)==0x50c8) // DBxx
92 {
93 write_op(op, 6, 0, 0);
94 }
95 else if ((op&0xff80)==0x4e80) // Jsr
96 {
1c88b865 97 int addr = 0x300 + op*8 + 8;
03c5768c 98 if ((op&0x3f) == 0x39)
99 write_op(op, addr >> 16, addr & 0xffff, 0);
100 }
101 else if ((op&0xf000)==0xa000 || (op&0xf000)==0xf000) // a-line, f-line
102 {
103 if (op != 0xa000 && op != 0xf000) continue;
104 }
105 else if ((op&0xfff8)==0x4e70&&op!=0x4e71&&op!=0x4e76); // rte, rts, stop, reset
106 else
107 {
108 write_op(op, safe_rand(), safe_rand(), safe_rand());
109 }
110 }
111
112 // jump to the beginning
1c88b865 113 write_op(0x4ef8, 0x300, 0x4ef8, 0x300);
114 write_op(0x4ef8, 0x300, 0x4ef8, 0x300);
03c5768c 115
116 fclose(f);
117 return 0;
118}
119