![[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.