![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to movb.s CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / d / entry|
Return to movb.s CVS log | Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / d / entry |
1.1 root 1: /* moveb test - checks all combinations */
2:
3: .globl _movball
4:
5: _movball:
6: callf $4,_setjmp /* save context for return from error */
7: movab _movball,_stpc /* save subtest starting address */
8: movl $1,_subtst /* subtest number */
9: movl $1,_no_opr /* number of operands in use */
10: movl $0xaabbccdd,l1
11: movl l1,_opr /* first operand */
12: 0: movl $0xffffffff,l2
13: movb l1,l2
14: cmpl $0xaaffffff,l2
15: jeql nxt1
16: bbs $0,_scoplp,0b /* if set scope loop on error */
17: movl $1,_ercode /* error code data miscompare */
18: movl l2,_actual /* actual data */
19: movl $0xaaffffff,_expected /* expected data */
20: jmp *badrtn
21: nxt1:
22: bbs $0,_force_lp,0b /* if set loop on last subtest */
23: am2: callf $4,_setjmp /* save context for return from error */
24: movab am2,_stpc /* save subtest starting address */
25: movl $2,_subtst /* subtest number */
26: 0: movl $0xffffffff,l2
27: movb l1,l2+1
28: cmpl $0xffaaffff,l2
29: jeql nxt2
30: bbs $0,_scoplp,0b /* if set scope loop on error */
31: movl $1,_ercode /* error code data miscompare */
32: movl l2,_actual /* actual data */
33: movl $0xffaaffff,_expected /* expected data */
34: jmp *badrtn
35: nxt2:
36: bbs $0,_force_lp,0b /* if set loop on last subtest */
37: am3: callf $4,_setjmp /* save context for return from error */
38: movab am3,_stpc /* save subtest starting address */
39: movl $3,_subtst /* subtest number */
40: 0: movl $0xffffffff,l2
41: movb l1,l2+2
42: cmpl $0xffffaaff,l2
43: jeql nxt3
44: bbs $0,_scoplp,0b /* if set scope loop on error */
45: movl $1,_ercode /* error code data miscompare */
46: movl l2,_actual /* actual data */
47: movl $0xffffaaff,_expected /* expected data */
48: jmp *badrtn
49: nxt3:
50: bbs $0,_force_lp,0b /* if set loop on last subtest */
51: am4: callf $4,_setjmp /* save context for return from error */
52: movab am4,_stpc /* save subtest starting address */
53: movl $4,_subtst /* subtest number */
54: 0: movl $0xffffffff,l2
55: movb l1,l2+3
56: cmpl $0xffffffaa,l2
57: jeql nxt4
58: bbs $0,_scoplp,0b /* if set scope loop on error */
59: movl $1,_ercode /* error code data miscompare */
60: movl l2,_actual /* actual data */
61: movl $0xffffffaa,_expected /* expected data */
62: jmp *badrtn
63: nxt4:
64: bbs $0,_force_lp,0b /* if set loop on last subtest */
65: am5: callf $4,_setjmp /* save context for return from error */
66: movab am5,_stpc /* save subtest starting address */
67: movl $5,_subtst /* subtest number */
68: 0: movl $0xffffffff,l2
69: movb l1+1,l2
70: cmpl $0xbbffffff,l2
71: jeql nxt5
72: bbs $0,_scoplp,0b /* if set scope loop on error */
73: movl $1,_ercode /* error code data miscompare */
74: movl l2,_actual /* actual data */
75: movl $0xbbffffff,_expected /* expected data */
76: jmp *badrtn
77: nxt5:
78: bbs $0,_force_lp,0b /* if set loop on last subtest */
79: am6: callf $4,_setjmp /* save context for return from error */
80: movab am6,_stpc /* save subtest starting address */
81: movl $6,_subtst /* subtest number */
82: 0: movl $0xffffffff,l2
83: movb l1+1,l2+1
84: cmpl $0xffbbffff,l2
85: jeql nxt6
86: bbs $0,_scoplp,0b /* if set scope loop on error */
87: movl $1,_ercode /* error code data miscompare */
88: movl l2,_actual /* actual data */
89: movl $0xffbbffff,_expected /* expected data */
90: jmp *badrtn
91: nxt6:
92: bbs $0,_force_lp,0b /* if set loop on last subtest */
93: am7: callf $4,_setjmp /* save context for return from error */
94: movab am7,_stpc /* save subtest starting address */
95: movl $7,_subtst /* subtest number */
96: 0: movl $0xffffffff,l2
97: movb l1+1,l2+2
98: cmpl $0xffffbbff,l2
99: jeql nxt7
100: bbs $0,_scoplp,0b /* if set scope loop on error */
101: movl $1,_ercode /* error code data miscompare */
102: movl l2,_actual /* actual data */
103: movl $0xffffbbff,_expected /* expected data */
104: jmp *badrtn
105: nxt7:
106: bbs $0,_force_lp,0b /* if set loop on last subtest */
107: am8: callf $4,_setjmp /* save context for return from error */
108: movab am8,_stpc /* save subtest starting address */
109: movl $8,_subtst /* subtest number */
110: 0: movl $0xffffffff,l2
111: movb l1+1,l2+3
112: cmpl $0xffffffbb,l2
113: jeql nxt8
114: bbs $0,_scoplp,0b /* if set scope loop on error */
115: movl $1,_ercode /* error code data miscompare */
116: movl l2,_actual /* actual data */
117: movl $0xffffffbb,_expected /* expected data */
118: jmp *badrtn
119: nxt8:
120: bbs $0,_force_lp,0b /* if set loop on last subtest */
121: am9: callf $4,_setjmp /* save context for return from error */
122: movab am9,_stpc /* save subtest starting address */
123: movl $9,_subtst /* subtest number */
124: 0: movl $0xffffffff,l2
125: movb l1+2,l2
126: cmpl $0xccffffff,l2
127: jeql nxt9
128: bbs $0,_scoplp,0b /* if set scope loop on error */
129: movl $1,_ercode /* error code data miscompare */
130: movl l2,_actual /* actual data */
131: movl $0xccffffff,_expected /* expected data */
132: jmp *badrtn
133: nxt9:
134: bbs $0,_force_lp,0b /* if set loop on last subtest */
135: am10: callf $4,_setjmp /* save context for return from error */
136: movab am10,_stpc /* save subtest starting address */
137: movl $0xa,_subtst /* subtest number */
138: 0: movl $0xffffffff,l2
139: movb l1+2,l2+1
140: cmpl $0xffccffff,l2
141: jeql nxt10
142: bbs $0,_scoplp,0b /* if set scope loop on error */
143: movl $1,_ercode /* error code data miscompare */
144: movl l2,_actual /* actual data */
145: movl $0xffccffff,_expected /* expected data */
146: jmp *badrtn
147: nxt10:
148: bbs $0,_force_lp,0b /* if set loop on last subtest */
149: am11: callf $4,_setjmp /* save context for return from error */
150: movab am11,_stpc /* save subtest starting address */
151: movl $0xb,_subtst /* subtest number */
152: 0: movl $0xffffffff,l2
153: movb l1+2,l2+2
154: cmpl $0xffffccff,l2
155: jeql nxt11
156: bbs $0,_scoplp,0b /* if set scope loop on error */
157: movl $1,_ercode /* error code data miscompare */
158: movl l2,_actual /* actual data */
159: movl $0xffffccff,_expected /* expected data */
160: jmp *badrtn
161: nxt11:
162: bbs $0,_force_lp,0b /* if set loop on last subtest */
163: am12: callf $4,_setjmp /* save context for return from error */
164: movab am12,_stpc /* save subtest starting address */
165: movl $0xc,_subtst /* subtest number */
166: 0: movl $0xffffffff,l2
167: movb l1+2,l2+3
168: cmpl $0xffffffcc,l2
169: jeql nxt12
170: bbs $0,_scoplp,0b /* if set scope loop on error */
171: movl $1,_ercode /* error code data miscompare */
172: movl l2,_actual /* actual data */
173: movl $0xffffffcc,_expected /* expected data */
174: jmp *badrtn
175: nxt12:
176: bbs $0,_force_lp,0b /* if set loop on last subtest */
177: am13: callf $4,_setjmp /* save context for return from error */
178: movab am13,_stpc /* save subtest starting address */
179: movl $0xd,_subtst /* subtest number */
180: 0: movl $0xffffffff,l2
181: movb l1+3,l2
182: cmpl $0xddffffff,l2
183: jeql nxt13
184: bbs $0,_scoplp,0b /* if set scope loop on error */
185: movl $1,_ercode /* error code data miscompare */
186: movl l2,_actual /* actual data */
187: movl $0xddffffff,_expected /* expected data */
188: jmp *badrtn
189: nxt13:
190: bbs $0,_force_lp,0b /* if set loop on last subtest */
191: am14: callf $4,_setjmp /* save context for return from error */
192: movab am14,_stpc /* save subtest starting address */
193: movl $0xe,_subtst /* subtest number */
194: 0: movl $0xffffffff,l2
195: movb l1+3,l2+1
196: cmpl $0xffddffff,l2
197: jeql nxt14
198: bbs $0,_scoplp,0b /* if set scope loop on error */
199: movl $1,_ercode /* error code data miscompare */
200: movl l2,_actual /* actual data */
201: movl $0xffddffff,_expected /* expected data */
202: jmp *badrtn
203: nxt14:
204: bbs $0,_force_lp,0b /* if set loop on last subtest */
205: am15: callf $4,_setjmp /* save context for return from error */
206: movab am15,_stpc /* save subtest starting address */
207: movl $0xf,_subtst /* subtest number */
208: 0: movl $0xffffffff,l2
209: movb l1+3,l2+2
210: cmpl $0xffffddff,l2
211: jeql nxt15
212: bbs $0,_scoplp,0b /* if set scope loop on error */
213: movl $1,_ercode /* error code data miscompare */
214: movl l2,_actual /* actual data */
215: movl $0xffffddff,_expected /* expected data */
216: jmp *badrtn
217: nxt15:
218: bbs $0,_force_lp,0b /* if set loop on last subtest */
219: am16: callf $4,_setjmp /* save context for return from error */
220: movab am16,_stpc /* save subtest starting address */
221: movl $0x10,_subtst /* subtest number */
222: 0: movl $0xffffffff,l2
223: movb l1+3,l2+3
224: cmpl $0xffffffdd,l2
225: jeql nxt16
226: bbs $0,_scoplp,0b /* if set scope loop on error */
227: movl $1,_ercode /* error code data miscompare */
228: movl l2,_actual /* actual data */
229: movl $0xffffffdd,_expected /* expected data */
230: jmp *badrtn
231: nxt16:
232: bbs $0,_force_lp,0b /* if set loop on last subtest */
233: am17: callf $4,_setjmp /* save context for return from error */
234: movab am17,_stpc /* save subtest starting address */
235: movl $0x11,_subtst /* subtest number */
236: movl $0xaabbccdd,_opr /* first operand */
237: 0: movl $0xaabbccdd,l1
238: movb l1,l1+1
239: cmpl $0xaaaaccdd,l1
240: jeql nxt17
241: bbs $0,_scoplp,0b /* if set scope loop on error */
242: movl $1,_ercode /* error code data miscompare */
243: movl l1,_actual /* actual data */
244: movl $0xaaaaccdd,_expected /* expected data */
245: jmp *badrtn
246: nxt17:
247: bbs $0,_force_lp,0b /* if set loop on last subtest */
248: am18: callf $4,_setjmp /* save context for return from error */
249: movab am18,_stpc /* save subtest starting address */
250: movl $0x12,_subtst /* subtest number */
251: movl $0xaabbccdd,_opr /* first operand */
252: 0: movl $0xaabbccdd,l1
253: movb l1,l1+3
254: cmpl $0xaabbccaa,l1
255: jeql nxt18
256: bbs $0,_scoplp,0b /* if set scope loop on error */
257: movl $1,_ercode /* error code data miscompare */
258: movl l1,_actual /* actual data */
259: movl $0xaabbccaa,_expected /* expected data */
260: jmp *badrtn
261: nxt18:
262: bbs $0,_force_lp,0b /* if set loop on last subtest */
263: am19: callf $4,_setjmp /* save context for return from error */
264: movab am19,_stpc /* save subtest starting address */
265: movl $0x13,_subtst /* subtest number */
266: movl $0xaabbccdd,_opr /* first operand */
267: 0: movl $0xaabbccdd,l1
268: movb l1+2,l1
269: cmpl $0xccbbccdd,l1
270: jeql nxt19
271: bbs $0,_scoplp,0b /* if set scope loop on error */
272: movl $1,_ercode /* error code data miscompare */
273: movl l1,_actual /* actual data */
274: movl $0xccbbccdd,_expected /* expected data */
275: jmp *badrtn
276: nxt19:
277: bbs $0,_force_lp,0b /* if set loop on last subtest */
278: am20: callf $4,_setjmp /* save context for return from error */
279: movab am20,_stpc /* save subtest starting address */
280: movl $0x14,_subtst /* subtest number */
281: 0: movl $0xaabbccdd,l1
282: movb l1+3,l1+1
283: cmpl $0xaaddccdd,l1
284: jeql nxt20
285: bbs $0,_scoplp,0b /* if set scope loop on error */
286: movl $1,_ercode /* error code data miscompare */
287: movl l1,_actual /* actual data */
288: movl $0xaabbccdd,_expected /* expected data */
289: jmp *badrtn
290: nxt20:
291: bbs $0,_force_lp,0b /* if set loop on last subtest */
292: jmp *return /* good, return to monitor */
293:
294:
295: .align 2
296: l1:
297: .long 0xaabbccdd
298: l2:
299: .long 0xffffffff
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.