1
2 #define exec_op glue(exec_, OP)
3 #define exec_opl glue(glue(exec_, OP), l)
4 #define exec_opw glue(glue(exec_, OP), w)
5 #define exec_opb glue(glue(exec_, OP), b)
6
7 #ifndef OP_SHIFTD
8
9 #ifdef OP_NOBYTE
10 #define EXECSHIFT(size, res, s1, s2, flags) \
11 asm ("push %4\n\t"\
12 "popf\n\t"\
13 stringify(OP) size " %" size "2, %" size "0\n\t" \
14 "pushf\n\t"\
15 "popl %1\n\t"\
16 : "=g" (res), "=g" (flags)\
17 : "r" (s1), "0" (res), "1" (flags));
18 #else
19 #define EXECSHIFT(size, res, s1, s2, flags) \
20 asm ("push %4\n\t"\
21 "popf\n\t"\
22 stringify(OP) size " %%cl, %" size "0\n\t" \
23 "pushf\n\t"\
24 "popl %1\n\t"\
25 : "=q" (res), "=g" (flags)\
26 : "c" (s1), "0" (res), "1" (flags));
27 #endif
28
exec_opl(int s2,int s0,int s1,int iflags)29 void exec_opl(int s2, int s0, int s1, int iflags)
30 {
31 int res, flags;
32 res = s0;
33 flags = iflags;
34 EXECSHIFT("", res, s1, s2, flags);
35 /* overflow is undefined if count != 1 */
36 if (s1 != 1)
37 flags &= ~CC_O;
38 printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
39 stringify(OP) "l", s0, s1, res, iflags, flags & CC_MASK);
40 }
41
exec_opw(int s2,int s0,int s1,int iflags)42 void exec_opw(int s2, int s0, int s1, int iflags)
43 {
44 int res, flags;
45 res = s0;
46 flags = iflags;
47 EXECSHIFT("w", res, s1, s2, flags);
48 /* overflow is undefined if count != 1 */
49 if (s1 != 1)
50 flags &= ~CC_O;
51 printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
52 stringify(OP) "w", s0, s1, res, iflags, flags & CC_MASK);
53 }
54
55 #else
56 #define EXECSHIFT(size, res, s1, s2, flags) \
57 asm ("push %4\n\t"\
58 "popf\n\t"\
59 stringify(OP) size " %%cl, %" size "5, %" size "0\n\t" \
60 "pushf\n\t"\
61 "popl %1\n\t"\
62 : "=g" (res), "=g" (flags)\
63 : "c" (s1), "0" (res), "1" (flags), "r" (s2));
64
exec_opl(int s2,int s0,int s1,int iflags)65 void exec_opl(int s2, int s0, int s1, int iflags)
66 {
67 int res, flags;
68 res = s0;
69 flags = iflags;
70 EXECSHIFT("", res, s1, s2, flags);
71 /* overflow is undefined if count != 1 */
72 if (s1 != 1)
73 flags &= ~CC_O;
74 printf("%-10s A=%08x B=%08x C=%08x R=%08x CCIN=%04x CC=%04x\n",
75 stringify(OP) "l", s0, s2, s1, res, iflags, flags & CC_MASK);
76 }
77
exec_opw(int s2,int s0,int s1,int iflags)78 void exec_opw(int s2, int s0, int s1, int iflags)
79 {
80 int res, flags;
81 res = s0;
82 flags = iflags;
83 EXECSHIFT("w", res, s1, s2, flags);
84 /* overflow is undefined if count != 1 */
85 if (s1 != 1)
86 flags &= ~CC_O;
87 printf("%-10s A=%08x B=%08x C=%08x R=%08x CCIN=%04x CC=%04x\n",
88 stringify(OP) "w", s0, s2, s1, res, iflags, flags & CC_MASK);
89 }
90
91 #endif
92
93 #ifndef OP_NOBYTE
exec_opb(int s0,int s1,int iflags)94 void exec_opb(int s0, int s1, int iflags)
95 {
96 int res, flags;
97 res = s0;
98 flags = iflags;
99 EXECSHIFT("b", res, s1, 0, flags);
100 /* overflow is undefined if count != 1 */
101 if (s1 != 1)
102 flags &= ~CC_O;
103 printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
104 stringify(OP) "b", s0, s1, res, iflags, flags & CC_MASK);
105 }
106 #endif
107
exec_op(int s2,int s0,int s1)108 void exec_op(int s2, int s0, int s1)
109 {
110 int o,s,z,a,c,p,flags_in;
111 for (o = 0; o < 2; o++) {
112 for (s = 0; s < 2; s++) {
113 for (z = 0; z < 2; z++) {
114 for (a = 0; a < 2; a++) {
115 for (c = 0; c < 2; c++) {
116 for (p = 0; p < 2; p++) {
117
118 flags_in = (o ? CC_O : 0)
119 | (s ? CC_S : 0)
120 | (z ? CC_Z : 0)
121 | (a ? CC_A : 0)
122 | (c ? CC_C : 0)
123 | (p ? CC_P : 0);
124
125 exec_opl(s2, s0, s1, flags_in);
126 #ifdef OP_SHIFTD
127 if (s1 <= 15)
128 exec_opw(s2, s0, s1, flags_in);
129 #else
130 exec_opw(s2, s0, s1, flags_in);
131 #endif
132 #ifndef OP_NOBYTE
133 exec_opb(s0, s1, flags_in);
134 #endif
135 #ifdef OP_CC
136 exec_opl(s2, s0, s1, flags_in);
137 exec_opw(s2, s0, s1, flags_in);
138 exec_opb(s0, s1, flags_in);
139 #endif
140
141 }}}}}}
142
143 }
144
glue(test_,OP)145 void glue(test_, OP)(void)
146 {
147 int i;
148 for(i = 0; i < 32; i++)
149 exec_op(0x21ad3d34, 0x12345678, i);
150 for(i = 0; i < 32; i++)
151 exec_op(0x813f3421, 0x82345678, i);
152 }
153
154 void *glue(_test_, OP) __init_call = glue(test_, OP);
155
156 #undef OP
157 #undef OP_CC
158 #undef OP_SHIFTD
159 #undef OP_NOBYTE
160 #undef EXECSHIFT
161
162