![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to ra.ns CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10dc / lsys / io|
Return to ra.ns CVS log | Up to [Research Unix] / researchv10dc / lsys / io |
1.1 root 1: .data
2: .globl _rabdev
3: .align 2; _rabdev:.long _raopen
4: .long _raclose
5: .long _rastrategy
6: .long 0
7: .globl _racdev
8: .align 2; _racdev:.long _raopen
9: .long _raclose
10: .long _raread
11: .long _rawrite
12: .long _raioctl
13: .long _nulldev
14: .long 0x0
15: .globl _ra_sizes
16: .align 2; _ra_sizes:.long 10240
17: .long 0
18: .long 20480
19: .long 10240
20: .long 249848
21: .long 30720
22: .long 249848
23: .long 280568
24: .long 249848
25: .long 530416
26: .long 2147483647
27: .long 780264
28: .long 749544
29: .long 30720
30: .long 2147483647
31: .long 0
32: .text
33: .globl _raopen
34: .align 1
35: _raopen:.word 0xe00
36: movw 4(ap),4(ap)
37: movzwl 4(ap),r5
38: ashl $-3,r5,r5
39: bicl3 $0xfffffff8,r5,r11
40: cmpl r11,_racnt; jlss L10
41: movb $6,_u+197
42: ret
43: L10:mull3 r11,$44,r5
44: addl3 $_radisk,r5,r10
45: moval 0[r11],r5
46: addl3 $_raaddr,r5,r9
47: tstw 4(r10); jneq L12
48: cvtbl 1(r9),r5
49: jlss L17
50: cmpl r5,_nmsport; jgeq L17
51: movl _msportsw[r5],(r10)
52: jnequ L14
53: L17:movb $6,_u+197
54: ret
55: L14:movl $2147483647,24(r10)
56: pushal _radg
57: pushal _raseql
58: clrl -(sp)
59: clrl -(sp)
60: cvtbl 1(r9),-(sp)
61: cvtbl (r9),-(sp)
62: movl (r10),r5
63: movl (r5),r5
64: calls $24/4,(r5)
65: tstl r0; jneq L18
66: movb $6,_u+197
67: ret
68: L18:pushl r9
69: pushl r10
70: calls $8/4,_racinit
71: L12:movzwl 4(ap),r5
72: bicl2 $0xfffffff8,r5
73: ashl r5,$1,r5
74: bisw2 r5,4(r10)
75: calls $0/4,_spl6
76: cvtbl 6(r10),r5
77: bicl2 $0xfffffffe,r5
78: tstl r5; jneq L20
79: pushl r9
80: pushl r10
81: calls $8/4,_raonline
82: L20:calls $0/4,_spl0
83: cvtbl 6(r10),r5
84: bicl2 $0xfffffffe,r5
85: tstl r5; jneq L22
86: movb $6,_u+197
87: L22:ret
88: .globl _raclose
89: .align 1
90: _raclose:.word 0xe00
91: movl 4(ap),r5
92: ashl $-3,r5,r4
93: bicl2 $0xfffffff8,r4
94: mull3 r4,$44,r3
95: addl3 $_radisk,r3,r11
96: moval 0[r4],r4
97: addl3 $_raaddr,r4,r10
98: bicl2 $0xfffffff8,r5
99: ashl r5,$1,r5
100: mcoml r5,r5
101: mcoml r5,r5
102: bicw2 r5,4(r11)
103: tstw 4(r11); jneq L26
104: cvtbl 6(r11),r5
105: bicl2 $0xfffffffe,r5
106: tstl r5; jneq L24
107: L26:ret
108: L24:cvtbl (r10),-(sp)
109: movl (r11),r5
110: movl 4(r5),r5
111: calls $4/4,(r5)
112: movl r0,r9
113: addl3 $1,_rarefno,r5
114: movl r5,_rarefno
115: movl r5,(r9)
116: movw 2(r10),4(r9)
117: movb $8,8(r9)
118: cvtbl 6(r11),r5
119: bicl2 $0xffffffbf,r5
120: tstl r5; jneq L27
121: clrw 10(r9)
122: jbr L28
123: L27:movw $1,10(r9)
124: bicb2 $64,6(r11)
125: L28:clrw 14(r9)
126: clrl 28(r9)
127: bicb2 $1,6(r11)
128: pushl r9
129: clrl -(sp)
130: cvtbl (r10),-(sp)
131: movl (r11),r5
132: movl 12(r5),r5
133: calls $12/4,(r5)
134: ret
135: .globl _raread
136: .align 1
137: _raread:.word 0x0
138: pushal _minphys
139: pushl $1
140: movl 4(ap),r5
141: pushl r5
142: ashl $-3,r5,r5
143: bicl2 $0xfffffff8,r5
144: mull2 $44,r5
145: pushal _rabuf(r5)
146: pushal _rastrategy
147: calls $20/4,_physio
148: ret
149: .globl _rawrite
150: .align 1
151: _rawrite:.word 0x0
152: pushal _minphys
153: clrl -(sp)
154: movl 4(ap),r5
155: pushl r5
156: ashl $-3,r5,r5
157: bicl2 $0xfffffff8,r5
158: mull2 $44,r5
159: pushal _rabuf(r5)
160: pushal _rastrategy
161: calls $20/4,_physio
162: ret
163: .globl _rastrategy
164: .align 1
165: _rastrategy:.word 0xfc0
166: subl2 $12,sp
167: movl 4(ap),r11
168: movzwl 26(r11),r5
169: bicl2 $0xffffff00,r5
170: ashl $-3,r5,r5
171: bicl3 $0xfffffff8,r5,r8
172: mull3 r8,$44,r5
173: addl3 $_radisk,r5,r10
174: moval 0[r8],r5
175: addl3 $_raaddr,r5,r6
176: movzwl 26(r11),r5
177: bicl2 $0xffffff00,r5
178: bicl2 $0xfffffff8,r5
179: movad 0[r5],r5
180: addl3 $_ra_sizes,r5,r7
181: subl3 4(r7),24(r10),-8(fp)
182: cmpl -8(fp),(r7); jleq L29
183: movl (r7),-8(fp)
184: L29:cmpl 32(r11),-8(fp); jlss L31
185: cmpl r11,$_rctbuf; jeqlu L31
186: cmpl 32(r11),(r7); jneq L33
187: movl 20(r11),36(r11)
188: jbr L34
189: L33:movw $28,24(r11)
190: bisl2 $4,(r11)
191: L34:pushl r11
192: calls $4/4,_iodone
193: ret
194: L31:movl 20(r11),-4(fp)
195: movl -4(fp),r5
196: divl2 $512,r5
197: addl2 32(r11),r5
198: cmpl r5,-8(fp); jleq L35
199: cmpl r11,$_rctbuf; jeqlu L35
200: subl3 32(r11),-8(fp),r5
201: ashl $9,r5,r5
202: movl r5,-4(fp)
203: L35:calls $0/4,_spl6
204: cvtbl 6(r10),r5
205: bicl2 $0xfffffffe,r5
206: tstl r5; jneq L37
207: pushl r6
208: pushl r10
209: calls $8/4,_raonline
210: tstl r0; jneq L37
211: bisl2 $4,(r11)
212: pushl r11
213: calls $4/4,_iodone
214: calls $0/4,_spl0
215: ret
216: L37:cvtbl (r6),-(sp)
217: movl (r10),r5
218: movl 4(r5),r5
219: calls $4/4,(r5)
220: movl r0,r9
221: addl3 $1,_rarefno,r5
222: movl r5,_rarefno
223: movl r5,(r9)
224: movw 2(r6),4(r9)
225: bicl3 $0xfffffffe,(r11),r5
226: jeql L40
227: movl $33,-12(fp)
228: jbr L41
229: L40:movl $34,-12(fp)
230: # label
231: L41:movb -12(fp),8(r9)
232: clrw 10(r9)
233: movl -4(fp),12(r9)
234: addl3 4(r7),32(r11),28(r9)
235: pushl r11
236: pushl r9
237: cvtbl (r6),-(sp)
238: movl (r10),r5
239: movl 8(r5),r5
240: calls $12/4,(r5)
241: movl r9,16(r11)
242: movl (r9),36(r11)
243: clrl 12(r11)
244: tstl 16(r10); jeqlu L42
245: movl 20(r10),r5
246: movl r11,12(r5)
247: jbr L43
248: L42:movl r11,16(r10)
249: L43:movl r11,20(r10)
250: pushl r9
251: clrl -(sp)
252: cvtbl (r6),-(sp)
253: movl (r10),r5
254: movl 12(r5),r5
255: calls $12/4,(r5)
256: calls $0/4,_spl0
257: ret
258: .globl _raioctl
259: .align 1
260: _raioctl:.word 0xe00
261: movw 4(ap),4(ap)
262: movzwl 4(ap),r5
263: ashl $-3,r5,r5
264: bicl2 $0xfffffff8,r5
265: mull2 $44,r5
266: addl3 $_radisk,r5,r10
267: cvtbl 6(r10),r5
268: bicl2 $0xfffffffa,r5
269: cmpl r5,$5; jeql L44
270: movb $5,_u+197
271: ret
272: L44:movl 12(ap),r11
273: movl 8(ap),r0
274: cmpl r0,$29957; jgtr L80
275: subl3 $29952,r0,r1
276: jlss L80
277: movl 2f[r1],r0
278: jmp (r0)
279: 2:.long L51
280: .long L63
281: .long L48
282: .long L75
283: .long L78
284: .long L79
285: L80:L46:movb $25,_u+197
286: ret
287: L48:pushl $20
288: pushl 12(ap)
289: pushal 24(r10)
290: calls $12/4,_copyout
291: tstl r0; jeql L49
292: movb $14,_u+197
293: L49:ret
294: L51:movl 4(r11),r5
295: jlss L54
296: cmpl r5,28(r10); jleq L52
297: L54:movb $5,_u+197
298: ret
299: L52:clrl r9
300: jbr L58
301: L55:movl $512,_u+292
302: addl3 24(r10),4(r11),r5
303: ashl $9,r5,r5
304: pushl r5
305: moval _u+296,r1
306: calls $4/4,_ltoL
307: movl 28(r10),r5
308: mull2 r9,r5
309: ashl $9,r5,r5
310: pushl r5
311: movq _u+296,-(sp)
312: moval _u+296,r1
313: calls $12/4,_Lladd
314: movl (r11),_u+288
315: clrb _u+196
316: clrb _u+197
317: pushal _minphys
318: pushl $1
319: movzwl 4(ap),-(sp)
320: pushal _rctbuf
321: pushal _rastrategy
322: calls $20/4,_physio
323: tstb _u+197; jneq L61
324: jbr L57
325: L61:L56:incl r9
326: L58:cvtbl 43(r10),r5
327: cmpl r9,r5; jlss L55
328: L57:ret
329: L63:bicl3 $0xfffffffd,16(ap),r5
330: jneq L64
331: movb $9,_u+197
332: ret
333: L64:movl 4(r11),r5
334: jlss L68
335: cmpl r5,28(r10); jleq L66
336: L68:movb $5,_u+197
337: ret
338: L66:clrl r9
339: jbr L72
340: L69:movl $512,_u+292
341: addl3 24(r10),4(r11),r5
342: ashl $9,r5,r5
343: pushl r5
344: moval _u+296,r1
345: calls $4/4,_ltoL
346: movl 28(r10),r5
347: mull2 r9,r5
348: ashl $9,r5,r5
349: pushl r5
350: movq _u+296,-(sp)
351: moval _u+296,r1
352: calls $12/4,_Lladd
353: movl (r11),_u+288
354: clrb _u+196
355: pushal _minphys
356: clrl -(sp)
357: movzwl 4(ap),-(sp)
358: pushal _rctbuf
359: pushal _rastrategy
360: calls $20/4,_physio
361: clrb _u+197
362: L70:incl r9
363: L72:cvtbl 43(r10),r5
364: cmpl r9,r5; jlss L69
365: L71:ret
366: L75:bicl3 $0xfffffffd,16(ap),r5
367: jneq L76
368: movb $9,_u+197
369: ret
370: L76:cvtwl 8(r11),-(sp)
371: pushl (r11)
372: pushl 4(r11)
373: movzwl 4(ap),-(sp)
374: calls $16/4,_rareplace
375: ret
376: L78:bisb2 $64,6(r10)
377: ret
378: L79:pushal _radg
379: pushal _raseql
380: clrl -(sp)
381: pushl $1
382: movzwl 4(ap),r5
383: ashl $-3,r5,r5
384: bicl2 $0xfffffff8,r5
385: moval _raaddr+1[r5],r4
386: cvtbl (r4),-(sp)
387: moval _raaddr[r5],r5
388: cvtbl (r5),-(sp)
389: movl (r10),r5
390: movl (r5),r5
391: calls $24/4,(r5)
392: ret
393: L47:ret
394: .align 1
395: _rareplace:.word 0xf80
396: bicl3 $0xffffff00,4(ap),r5
397: ashl $-3,r5,r5
398: bicl3 $0xfffffff8,r5,r8
399: mull3 r8,$44,r5
400: addl3 $_radisk,r5,r10
401: moval 0[r8],r5
402: addl3 $_raaddr,r5,r9
403: calls $0/4,_spl6
404: jbr L82
405: L81:bisb2 $16,6(r10)
406: pushl $26
407: pushal 6(r10)
408: calls $8/4,_sleep
409: L82:cvtbl 6(r10),r5
410: bicl2 $0xfffffff7,r5
411: tstl r5; jneq L81
412: L83:bisb2 $8,6(r10)
413: pushl 12(ap)
414: pushl 8(ap)
415: pushl r8
416: pushal _84
417: calls $16/4,_printf
418: cvtbl (r9),-(sp)
419: movl (r10),r5
420: movl 4(r5),r5
421: calls $4/4,(r5)
422: movl r0,r11
423: pushl $36
424: pushl r11
425: calls $8/4,_bzero
426: addl3 $1,_rarefno,r5
427: movl r5,_rarefno
428: movl r5,(r11)
429: movw 2(r9),4(r11)
430: movb $20,8(r11)
431: movl 12(ap),12(r11)
432: movl 8(ap),28(r11)
433: movl 16(ap),r7
434: jeql L86
435: movl $1,r7
436: # label
437: L86: # label
438: L87:movw r7,10(r11)
439: movl (r11),8(r10)
440: movb $20,12(r10)
441: pushl r11
442: clrl -(sp)
443: cvtbl (r9),-(sp)
444: movl (r10),r5
445: movl 12(r5),r5
446: calls $12/4,(r5)
447: jbr L89
448: L88:pushl $25
449: pushal 7(r10)
450: calls $8/4,_sleep
451: L89:cvtbl 6(r10),r5
452: bicl2 $0xffffffdf,r5
453: tstl r5; jeql L88
454: L90:movb 7(r10),_u+197
455: cvtbl 6(r10),r5
456: bicl2 $0xffffffef,r5
457: tstl r5; jeql L91
458: pushal 6(r10)
459: calls $4/4,_wakeup
460: L91:bicb2 $56,6(r10)
461: calls $0/4,_spl0
462: ret
463: .globl _raseql
464: .align 1
465: _raseql:.word 0xfc0
466: movl 12(ap),r11
467: tstb 8(r11); jneq L93
468: cmpw 10(r11),$255; jneq L93
469: pushl 4(ap)
470: calls $4/4,_rareset
471: ret
472: L93:clrl r8
473: jbr L98
474: L95:moval _raaddr[r8],r5
475: cvtbl (r5),r5
476: cmpl r5,4(ap); jneq L100
477: moval _raaddr+1[r8],r5
478: cvtbl (r5),r5
479: cmpl r5,8(ap); jneq L100
480: moval _raaddr+2[r8],r5
481: cmpw (r5),4(r11); jneq L100
482: jbr L97
483: L100:L96:incl r8
484: L98:cmpl r8,_racnt; jlss L95
485: L97:cmpl r8,_racnt; jlss L102
486: cvtbl 8(r11),-(sp)
487: cvtwl 10(r11),-(sp)
488: pushl 8(ap)
489: pushl 4(ap)
490: cvtwl 4(r11),-(sp)
491: pushal _104
492: calls $24/4,_printf
493: ret
494: L102:mull3 r8,$44,r5
495: addl3 $_radisk,r5,r9
496: cvtwl 10(r11),r5
497: bicl3 $0xffffffe0,r5,r6
498: cmpl r6,$4; jeql L107
499: cmpl r6,$3; jneq L105
500: L107:bicb2 $1,6(r9)
501: L105:L108:cvtbl 8(r11),r5
502: bicl3 $0xffffff00,r5,r0
503: cmpl r0,$148; jeql L147
504: jgtr L152
505: cmpl r0,$137; jgtr L109
506: subl3 $128,r0,r1
507: jlss L109
508: movl 2f[r1],r0
509: jmp (r0)
510: 2:.long L111
511: .long L109
512: .long L109
513: .long L139
514: .long L143
515: .long L109
516: .long L109
517: .long L109
518: .long L138
519: .long L137
520: L153:L152:cmpl r0,$161; jeql L114
521: cmpl r0,$162; jeql L114
522: jbr L109
523: L111:cmpl (r11),8(r9); jneq L112
524: bisb3 $128,12(r9),8(r11)
525: jbr L108
526: L112:L114:movl 16(r9),r10
527: clrl r7
528: jbr L118
529: L115:cmpl (r11),36(r10); jneq L119
530: jbr L117
531: L119:L116:movl r10,r7
532: movl 12(r10),r10
533: L118:tstl r10; jnequ L115
534: L117:tstl r10; jnequ L121
535: cvtbl 8(r11),r5
536: bicl3 $0xffffff00,r5,-(sp)
537: cvtwl 10(r11),-(sp)
538: pushl (r11)
539: pushl r8
540: pushal _123
541: calls $20/4,_printf
542: ret
543: L121:movl 16(r10),r5
544: cmpl (r5),(r11); jeql L124
545: movzwl 26(r10),-(sp)
546: pushl (r10)
547: pushl (r11)
548: movl 16(r10),r5
549: pushl (r5)
550: pushl r8
551: pushal _126
552: calls $24/4,_printf
553: L124:tstl r7; jeqlu L127
554: movl 12(r10),12(r7)
555: jbr L128
556: L127:movl 12(r10),16(r9)
557: L128:cmpl r10,20(r9); jnequ L129
558: movl r7,20(r9)
559: L129:subl3 12(r11),20(r10),36(r10)
560: tstl r6; jeql L131
561: bisl2 $4,(r10)
562: cvtwl 10(r11),r5
563: cmpl r5,$8; jeql L135
564: cmpl r5,$72; jneq L133
565: L135:movw $6,24(r10)
566: jbr L134
567: L133:cvtwl 10(r11),-(sp)
568: pushl 32(r10)
569: pushl r8
570: pushal _136
571: calls $16/4,_printf
572: L134:L131:pushl 16(r10)
573: pushl 4(ap)
574: movl (r9),r5
575: movl 16(r5),r5
576: calls $8/4,(r5)
577: pushl r10
578: calls $4/4,_iodone
579: ret
580: L137:pushl r11
581: pushl r9
582: calls $8/4,_rasonl
583: ret
584: L138:bicb2 $1,6(r9)
585: ret
586: L139:tstl r6; jeql L140
587: cvtwl 10(r11),-(sp)
588: pushl r8
589: pushal _142
590: calls $12/4,_printf
591: ret
592: L140:movl 28(r11),32(r9)
593: movw 36(r11),36(r9)
594: movw 38(r11),38(r9)
595: movw 40(r11),40(r9)
596: cvtwl 44(r11),28(r9)
597: movb 46(r11),42(r9)
598: movb 47(r11),43(r9)
599: bisb2 $4,6(r9)
600: ret
601: L143:tstl r6; jeql L144
602: pushl 8(ap)
603: pushl 4(ap)
604: pushal _146
605: calls $12/4,_printf
606: L144:ret
607: L147:clrb 7(r9)
608: tstl r6; jeql L148
609: cvtwl 10(r11),-(sp)
610: pushl r8
611: pushal _150
612: calls $12/4,_printf
613: movb $5,7(r9)
614: L148:bisb2 $32,6(r9)
615: pushal 7(r9)
616: calls $4/4,_wakeup
617: ret
618: L109:cvtwl 10(r11),-(sp)
619: cvtbl 8(r11),r5
620: bicl3 $0xffffff00,r5,-(sp)
621: pushl 8(ap)
622: pushl 4(ap)
623: cvtwl 4(r11),-(sp)
624: pushal _151
625: calls $24/4,_printf
626: ret
627: L110:ret
628: .globl _rareset
629: .align 1
630: _rareset:.word 0xf00
631: clrl r11
632: jbr L157
633: L154:moval _raaddr[r11],r5
634: cvtbl (r5),r5
635: cmpl r5,4(ap); jeql L159
636: jbr L155
637: L159:mull3 r11,$44,r5
638: addl3 $_radisk,r5,r10
639: movl 16(r10),r9
640: jbr L164
641: L161:movl 12(r9),r8
642: pushl 16(r9)
643: pushl 4(ap)
644: movl (r10),r5
645: movl 16(r5),r5
646: calls $8/4,(r5)
647: bisl2 $4,(r9)
648: pushl r9
649: calls $4/4,_iodone
650: L162:movl r8,r9
651: L164:tstl r9; jnequ L161
652: L163:clrl 20(r10)
653: clrl 16(r10)
654: bicb2 $3,6(r10)
655: pushl r10
656: calls $4/4,_wakeup
657: L155:incl r11
658: L157:cmpl r11,_racnt; jlss L154
659: L156:ret
660: .data
661: .align 2; _raevents:.long _165
662: .long _166
663: .long _167
664: .long _168
665: .long _169
666: .long _170
667: .long _171
668: .long _172
669: .long _173
670: .long _174
671: .long _175
672: .long _176
673: .text
674: .globl _radg
675: .align 1
676: _radg:.word 0xf80
677: movl 12(ap),r11
678: cmpb 8(r11),$2; jneq L177
679: cmpw 10(r11),$8; jneq L177
680: tstb 9(r11); jneq L177
681: ret
682: L177:cvtbl 9(r11),r5
683: bicl3 $0xffffff00,r5,-(sp)
684: cvtwl 10(r11),-(sp)
685: cvtbl 8(r11),-(sp)
686: cvtbl 9(r11),r5
687: bicl2 $0xffffff3f,r5
688: tstl r5; jeql L183
689: moval _180,r7
690: jbr L184
691: L183:moval _181,r7
692: # label
693: L184:pushl r7
694: cvtwl 6(r11),-(sp)
695: pushl 8(ap)
696: pushl 4(ap)
697: cvtwl 4(r11),-(sp)
698: pushal _179
699: calls $36/4,_printf
700: cvtwl 10(r11),r5
701: bicl2 $0xffffffe0,r5
702: cmpl r5,$11; jgtr L185
703: cvtwl 10(r11),r5
704: bicl2 $0xffffffe0,r5
705: pushl _raevents[r5]
706: pushal _187
707: calls $8/4,_printf
708: L185:cvtbl 8(r11),r0
709: cmpl r0,$4; jgtr L223
710: subl3 $0,r0,r1
711: jlss L188
712: movl 2f[r1],r0
713: jmp (r0)
714: 2:.long L190
715: .long L192
716: .long L194
717: .long L201
718: .long L211
719: L223:cmpl r0,$64; jeql L213
720: jbr L188
721: L190:pushal _191
722: calls $4/4,_printf
723: jbr L189
724: L192:pushl 24(r11)
725: pushal _193
726: calls $8/4,_printf
727: jbr L189
728: L194:cvtbl 35(r11),-(sp)
729: cvtbl 34(r11),-(sp)
730: bicl3 $0xf0000000,40(r11),-(sp)
731: bicl3 $0xfffffff,40(r11),r5
732: jnequ L199
733: moval _196,r7
734: jbr L200
735: L199:moval _197,r7
736: # label
737: L200:pushl r7
738: pushal _195
739: calls $20/4,_printf
740: jbr L189
741: L201:bicl3 $0xf0000000,40(r11),-(sp)
742: bicl3 $0xfffffff,40(r11),r5
743: jnequ L204
744: moval _196,r7
745: jbr L205
746: L204:moval _197,r7
747: # label
748: L205:pushl r7
749: pushal _202
750: calls $12/4,_printf
751: addl3 $56,r11,r10
752: jbr L207
753: L206:addl3 $-2,r10,r5
754: movl r5,r10
755: movzwl (r5),-(sp)
756: pushal _209
757: calls $8/4,_printf
758: L207:addl3 $44,r11,r5
759: cmpl r10,r5; jgtru L206
760: L208:pushal _210
761: calls $4/4,_printf
762: jbr L189
763: L211:pushl 48(r11)
764: pushal _212
765: calls $8/4,_printf
766: jbr L189
767: L213:pushal _214
768: calls $4/4,_printf
769: addl3 $44,r11,r8
770: clrl r9
771: L215:movzbl (r8)+,-(sp)
772: pushal _209
773: calls $8/4,_printf
774: L216:incl r9
775: cmpl r9,$10; jlss L215
776: L217:movzbl 1(r8),-(sp)
777: movzbl (r8),-(sp)
778: pushal _221
779: calls $12/4,_printf
780: jbr L189
781: L188:pushal _222
782: calls $4/4,_printf
783: L189:ret
784: .align 1
785: _raonline:.word 0xe00
786: subl2 $4,sp
787: movl 4(ap),r11
788: movl 8(ap),r10
789: calls $0/4,_spl6
790: movl r0,-4(fp)
791: cvtbl 6(r11),r5
792: bicl2 $0xfffffffd,r5
793: tstl r5; jneq L227
794: bicb2 $4,6(r11)
795: cvtbl (r10),-(sp)
796: movl (r11),r5
797: movl 4(r5),r5
798: calls $4/4,(r5)
799: movl r0,r9
800: pushl $36
801: pushl r9
802: calls $8/4,_bzero
803: addl3 $1,_rarefno,r5
804: movl r5,_rarefno
805: movl r5,(r9)
806: movw 2(r10),4(r9)
807: movb $9,8(r9)
808: movl (r9),8(r11)
809: movb $9,12(r11)
810: pushl r9
811: clrl -(sp)
812: cvtbl (r10),-(sp)
813: movl (r11),r5
814: movl 12(r5),r5
815: calls $12/4,(r5)
816: bisb2 $2,6(r11)
817: jbr L227
818: L226:pushl $60
819: pushl $24
820: pushl r11
821: calls $12/4,_tsleep
822: L227:cvtbl 6(r11),r5
823: bicl2 $0xfffffffd,r5
824: tstl r5; jneq L226
825: L228:cvtbl 6(r11),r5
826: bicl2 $0xfffffffe,r5
827: tstl r5; jneq L229
828: clrl r0
829: ret
830: L229:cvtbl 6(r11),r5
831: bicl2 $0xfffffffb,r5
832: tstl r5; jneq L231
833: cvtbl (r10),-(sp)
834: movl (r11),r5
835: movl 4(r5),r5
836: calls $4/4,(r5)
837: movl r0,r9
838: addl3 $1,_rarefno,r5
839: movl r5,_rarefno
840: movl r5,(r9)
841: movw 2(r10),4(r9)
842: movb $3,8(r9)
843: clrw 10(r9)
844: clrw 14(r9)
845: clrl 28(r9)
846: pushl r9
847: clrl -(sp)
848: cvtbl (r10),-(sp)
849: movl (r11),r5
850: movl 12(r5),r5
851: calls $12/4,(r5)
852: L231:pushl -4(fp)
853: calls $4/4,_splx
854: movl $1,r0
855: ret
856: .align 1
857: _rasonl:.word 0xc00
858: movl 4(ap),r11
859: movl 8(ap),r10
860: cvtbl 6(r11),r5
861: bicl2 $0xfffffffd,r5
862: tstl r5; jeql L233
863: bicb2 $2,6(r11)
864: pushl r11
865: calls $4/4,_wakeup
866: L233:cvtwl 10(r10),r5
867: bicl2 $0xffffffe0,r5
868: tstl r5; jeql L235
869: ret
870: L235:bisb2 $1,6(r11)
871: movl 24(r11),r5
872: cmpl r5,$2147483647; jeql L237
873: cmpl r5,36(r10); jeql L237
874: pushl 36(r10)
875: pushl 24(r11)
876: subl3 $_radisk,r11,r5
877: divl2 $44,r5
878: pushl r5
879: pushal _239
880: calls $16/4,_printf
881: L237:movl 36(r10),24(r11)
882: ret
883: .align 1
884: _racinit:.word 0xc00
885: movl 8(ap),r5
886: cvtbl (r5),-(sp)
887: movl 4(ap),r5
888: movl (r5),r5
889: movl 4(r5),r5
890: calls $4/4,(r5)
891: movl r0,r11
892: addl3 $1,_rarefno,r5
893: movl r5,_rarefno
894: movl r5,(r11)
895: movl 8(ap),r5
896: movw 2(r5),4(r11)
897: movb $4,8(r11)
898: clrw 10(r11)
899: movw $80,14(r11)
900: clrw 12(r11)
901: clrw 16(r11)
902: clrl 24(r11)
903: clrl 20(r11)
904: calls $0/4,_spl6
905: movl r0,r10
906: pushl r11
907: clrl -(sp)
908: movl 8(ap),r5
909: cvtbl (r5),-(sp)
910: movl 4(ap),r5
911: movl (r5),r5
912: movl 12(r5),r5
913: calls $12/4,(r5)
914: pushl r10
915: calls $4/4,_splx
916: ret
917: .text 1
918: _239:.ascii "ra%d: changed size %d to %d\012\000"
919: _222:.byte 10,0
920: _221:.ascii " [%x %x]\012\000"
921: _214:.ascii "scsi:\000"
922: _212:.ascii "cyl %d\012\000"
923: _210:.ascii " xx\012\000"
924: _209:.ascii " %x\000"
925: _202:.ascii "%sbn %d;\000"
926: _197:.byte 114,0
927: _196:.byte 108,0
928: _195:.ascii "%sbn %d; lev x%x, retry x%x\012\000"
929: _193:.ascii "host mem access; addr x%x\012\000"
930: _191:.ascii "oops\012\000"
931: _187:.ascii "%s; \000"
932: _181:.ascii "hard\000"
933: _180:.ascii "soft\000"
934: _179:.ascii "ra%d ctl%d typ%d seq %d: %s err; fmt x%x ev x%x fl x%x\012\000"
935: _176:.ascii "drive err\000"
936: _175:.ascii "cntl err\000"
937: _174:.ascii "host buf access err\000"
938: _173:.ascii "data err\000"
939: _172:.ascii "comp err\000"
940: _171:.ascii "write prot\000"
941: _170:.ascii "med fmt\000"
942: _169:.ascii "available\000"
943: _168:.ascii "offline\000"
944: _167:.ascii "op aborted\000"
945: _166:.ascii "inv cmd\000"
946: _165:.ascii "ok\000"
947: _151:.ascii "ra%d ctl%d typ%d: stray mscp msg opcd 0%o sts x%x\012\000"
948: _150:.ascii "ra%d: rpl sts x%x\012\000"
949: _146:.ascii "ra ctl%d typ%d: bad init\012\000"
950: _142:.ascii "ra%d: can't get unit sts x%x\012\000"
951: _136:.ascii "err on ra%d block %D: sts x%x\012\000"
952: _126:.ascii "ra%d sent %d got %d crf; flg %x dev %x\012\000"
953: _123:.ascii "ra%d stray end: crf %d sts x%x opcode 0%o\012\000"
954: _104:.ascii "ra%d ctl%d typ%d: stray mscp packet sts x%x opcode %o\012\000"
955: _84:.ascii "ra%d replace %D with %D\012\000"
956: .lcomm _rctbuf,44
957: .lcomm _rarefno,4
958: .globl _nswdevt
959: .comm _nswdevt,4
960: .globl _zvms
961: .comm _zvms,40
962: .globl _bclnlist
963: .comm _bclnlist,4
964: .globl _bswlist
965: .comm _bswlist,44
966: .globl _bfreelist
967: .comm _bfreelist,132
968: .globl _swpf
969: .comm _swpf,4
970: .globl _swsize
971: .comm _swsize,4
972: .globl _nbuf
973: .comm _nbuf,4
974: .globl _buffers
975: .comm _buffers,4
976: .globl _buf
977: .comm _buf,4
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.