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