1 /* hp.c 4.47 82/02/18 */ 2 3 #ifdef HPDEBUG 4 int hpdebug; 5 #endif 6 #ifdef HPBDEBUG 7 int hpbdebug; 8 #endif 9 10 #include "hp.h" 11 #if NHP > 0 12 /* 13 * HP disk driver for RP0x+RMxx+ML11 14 * 15 * TODO: 16 * check RM80 skip sector handling when ECC's occur later 17 * check offset recovery handling 18 * see if DCLR and/or RELEASE set attention status 19 * print bits of mr && mr2 symbolically 20 */ 21 22 #include "../h/param.h" 23 #include "../h/systm.h" 24 #include "../h/dk.h" 25 #include "../h/buf.h" 26 #include "../h/conf.h" 27 #include "../h/dir.h" 28 #include "../h/user.h" 29 #include "../h/map.h" 30 #include "../h/pte.h" 31 #include "../h/mbareg.h" 32 #include "../h/mbavar.h" 33 #include "../h/mtpr.h" 34 #include "../h/vm.h" 35 #include "../h/cmap.h" 36 #include "../h/dkbad.h" 37 #include "../h/dkio.h" 38 39 #include "../h/hpreg.h" 40 41 /* THIS SHOULD BE READ OFF THE PACK, PER DRIVE */ 42 struct size { 43 daddr_t nblocks; 44 int cyloff; 45 } hp6_sizes[8] = { 46 15884, 0, /* A=cyl 0 thru 37 */ 47 33440, 38, /* B=cyl 38 thru 117 */ 48 340670, 0, /* C=cyl 0 thru 814 */ 49 0, 0, 50 0, 0, 51 0, 0, 52 #ifndef NOBADSECT 53 291280, 118, /* G=cyl 118 thru 814 */ 54 #else 55 291346, 118, 56 #endif 57 0, 0, 58 }, rm3_sizes[8] = { 59 15884, 0, /* A=cyl 0 thru 99 */ 60 33440, 100, /* B=cyl 100 thru 309 */ 61 131680, 0, /* C=cyl 0 thru 822 */ 62 0, 0, 63 0, 0, 64 0, 0, 65 #ifndef NOBADSECT 66 81984, 310, /* G=cyl 310 thru 822 */ 67 #else 68 82080, 310, 69 #endif 70 0, 0, 71 }, rm5_sizes[8] = { 72 15884, 0, /* A=cyl 0 thru 26 */ 73 33440, 27, /* B=cyl 27 thru 81 */ 74 500384, 0, /* C=cyl 0 thru 822 */ 75 15884, 562, /* D=cyl 562 thru 588 */ 76 55936, 589, /* E=cyl 589 thru 680 */ 77 #ifndef NOBADSECT 78 86240, 681, /* F=cyl 681 thru 822 */ 79 158592, 562, /* G=cyl 562 thru 822 */ 80 #else 81 86336, 681, 82 158688, 562, 83 #endif 84 291346, 82, /* H=cyl 82 thru 561 */ 85 }, rm80_sizes[8] = { 86 15884, 0, /* A=cyl 0 thru 36 */ 87 33440, 37, /* B=cyl 37 thru 114 */ 88 242606, 0, /* C=cyl 0 thru 558 */ 89 0, 0, 90 0, 0, 91 0, 0, 92 82080, 115, /* G=cyl 115 thru 304 */ 93 110143, 305, /* H=cyl 305 thru 558 */ 94 }, hp7_sizes[8] = { 95 15844, 0, /* A=cyl 0 thru 9 */ 96 64000, 10, /* B=cyl 10 thru 49 */ 97 1008000,0, /* C=cyl 0 thru 629 */ 98 15884, 330, /* D=cyl 330 thru 339 */ 99 256000, 340, /* E=cyl 340 thru 499 */ 100 207850, 500, /* F=cyl 500 thru 629 */ 101 479850, 330, /* G=cyl 330 thru 629 */ 102 448000, 50, /* H=cyl 50 thru 329 */ 103 }; 104 /* END OF STUFF WHICH SHOULD BE READ IN PER DISK */ 105 106 #define _hpSDIST 2 107 #define _hpRDIST 3 108 109 int hpSDIST = _hpSDIST; 110 int hpRDIST = _hpRDIST; 111 112 short hptypes[] = 113 { MBDT_RM03, MBDT_RM05, MBDT_RP06, MBDT_RM80, MBDT_RP05, MBDT_RP07, 114 MBDT_ML11A, MBDT_ML11B, 0 }; 115 struct mba_device *hpinfo[NHP]; 116 int hpattach(),hpustart(),hpstart(),hpdtint(); 117 struct mba_driver hpdriver = 118 { hpattach, 0, hpustart, hpstart, hpdtint, 0, 119 hptypes, "hp", 0, hpinfo }; 120 121 struct hpst { 122 short nsect; 123 short ntrak; 124 short nspc; 125 short ncyl; 126 struct size *sizes; 127 } hpst[] = { 128 32, 5, 32*5, 823, rm3_sizes, /* RM03 */ 129 32, 19, 32*19, 823, rm5_sizes, /* RM05 */ 130 22, 19, 22*19, 815, hp6_sizes, /* RP06 */ 131 31, 14, 31*14, 559, rm80_sizes, /* RM80 */ 132 22, 19, 22*19, 411, hp6_sizes, /* RP05 */ 133 50, 32, 50*32, 630, hp7_sizes, /* RP07 */ 134 1, 1, 1, 1, 0, /* ML11A */ 135 1, 1, 1, 1, 0, /* ML11B */ 136 }; 137 138 u_char hp_offset[16] = { 139 HPOF_P400, HPOF_M400, HPOF_P400, HPOF_M400, 140 HPOF_P800, HPOF_M800, HPOF_P800, HPOF_M800, 141 HPOF_P1200, HPOF_M1200, HPOF_P1200, HPOF_M1200, 142 0, 0, 0, 0, 143 }; 144 145 struct buf rhpbuf[NHP]; 146 #ifndef NOBADSECT 147 struct buf bhpbuf[NHP]; 148 struct dkbad hpbad[NHP]; 149 #endif 150 /* SHOULD CONSOLIDATE ALL THIS STUFF INTO A STRUCTURE */ 151 char hpinit[NHP]; 152 char hprecal[NHP]; 153 char hphdr[NHP]; 154 daddr_t mlsize[NHP]; 155 156 #define b_cylin b_resid 157 158 /* #define ML11 0 to remove ML11 support */ 159 #define ML11 (hptypes[mi->mi_type] == MBDT_ML11A) 160 #define RP06 (hptypes[mi->mi_type] <= MBDT_RP06) 161 #define RM80 (hptypes[mi->mi_type] == MBDT_RM80) 162 163 #ifdef INTRLVE 164 daddr_t dkblock(); 165 #endif 166 167 int hpseek; 168 169 /*ARGSUSED*/ 170 hpattach(mi, slave) 171 struct mba_device *mi; 172 { 173 if (hptypes[mi->mi_type] == MBDT_ML11B) 174 mi->mi_type--; /* A CHEAT - ML11B D.T. SHOULD == ML11A */ 175 if (ML11) { 176 register struct hpdevice *hpaddr = 177 (struct hpdevice *)mi->mi_drv; 178 register int trt, sz; 179 180 sz = hpaddr->hpmr & HPMR_SZ; 181 if ((hpaddr->hpmr & HPMR_ARRTYP) == 0) 182 sz >>= 2; 183 mlsize[mi->mi_unit] = sz; 184 if (mi->mi_dk >= 0) { 185 trt = (hpaddr->hpmr & HPMR_TRT) >> 8; 186 dk_mspw[mi->mi_dk] = 1.0 / (1<<(20-trt)); 187 } 188 } else if (mi->mi_dk >= 0) { 189 register struct hpst *st = &hpst[mi->mi_type]; 190 191 dk_mspw[mi->mi_dk] = 1.0 / 60 / (st->nsect * 256); 192 } 193 } 194 195 hpstrategy(bp) 196 register struct buf *bp; 197 { 198 register struct mba_device *mi; 199 register struct hpst *st; 200 register int unit; 201 long sz, bn; 202 int xunit = minor(bp->b_dev) & 07; 203 int s; 204 205 sz = bp->b_bcount; 206 sz = (sz+511) >> 9; 207 unit = dkunit(bp); 208 if (unit >= NHP) 209 goto bad; 210 mi = hpinfo[unit]; 211 if (mi == 0 || mi->mi_alive == 0) 212 goto bad; 213 st = &hpst[mi->mi_type]; 214 if (ML11) { 215 if (bp->b_blkno < 0 || 216 dkblock(bp)+sz > mlsize[mi->mi_unit]) 217 goto bad; 218 bp->b_cylin = 0; 219 } else { 220 if (bp->b_blkno < 0 || 221 (bn = dkblock(bp))+sz > st->sizes[xunit].nblocks) 222 goto bad; 223 bp->b_cylin = bn/st->nspc + st->sizes[xunit].cyloff; 224 } 225 s = spl5(); 226 disksort(&mi->mi_tab, bp); 227 if (mi->mi_tab.b_active == 0) 228 mbustart(mi); 229 splx(s); 230 return; 231 232 bad: 233 bp->b_flags |= B_ERROR; 234 iodone(bp); 235 return; 236 } 237 238 hpustart(mi) 239 register struct mba_device *mi; 240 { 241 register struct hpdevice *hpaddr = (struct hpdevice *)mi->mi_drv; 242 register struct buf *bp = mi->mi_tab.b_actf; 243 register struct hpst *st = &hpst[mi->mi_type]; 244 daddr_t bn; 245 int sn, dist; 246 247 hpaddr->hpcs1 = 0; 248 if ((hpaddr->hpcs1&HP_DVA) == 0) 249 return (MBU_BUSY); 250 if ((hpaddr->hpds & HPDS_VV) == 0 || hpinit[mi->mi_unit] == 0) { 251 #ifndef NOBADSECT 252 struct buf *bbp = &bhpbuf[mi->mi_unit]; 253 #endif 254 255 hpinit[mi->mi_unit] = 1; 256 hpaddr->hpcs1 = HP_DCLR|HP_GO; 257 if (mi->mi_mba->mba_drv[0].mbd_as & (1<<mi->mi_drive)) 258 printf("DCLR attn\n"); 259 hpaddr->hpcs1 = HP_PRESET|HP_GO; 260 if (!ML11) 261 hpaddr->hpof = HPOF_FMT22; 262 mbclrattn(mi); 263 #ifndef NOBADSECT 264 if (!ML11) { 265 bbp->b_flags = B_READ|B_BUSY; 266 bbp->b_dev = bp->b_dev; 267 bbp->b_bcount = 512; 268 bbp->b_un.b_addr = (caddr_t)&hpbad[mi->mi_unit]; 269 bbp->b_blkno = st->ncyl*st->nspc - st->nsect; 270 bbp->b_cylin = st->ncyl - 1; 271 mi->mi_tab.b_actf = bbp; 272 bbp->av_forw = bp; 273 bp = bbp; 274 } 275 #endif 276 } 277 if (mi->mi_tab.b_active || mi->mi_hd->mh_ndrive == 1) 278 return (MBU_DODATA); 279 if (ML11) 280 return (MBU_DODATA); 281 if ((hpaddr->hpds & HPDS_DREADY) != HPDS_DREADY) 282 return (MBU_DODATA); 283 bn = dkblock(bp); 284 sn = bn%st->nspc; 285 sn = (sn+st->nsect-hpSDIST)%st->nsect; 286 if (bp->b_cylin == (hpaddr->hpdc & 0xffff)) { 287 if (hpseek) 288 return (MBU_DODATA); 289 dist = ((hpaddr->hpla & 0xffff)>>6) - st->nsect + 1; 290 if (dist < 0) 291 dist += st->nsect; 292 if (dist > st->nsect - hpRDIST) 293 return (MBU_DODATA); 294 } else 295 hpaddr->hpdc = bp->b_cylin; 296 if (hpseek) 297 hpaddr->hpcs1 = HP_SEEK|HP_GO; 298 else { 299 hpaddr->hpda = sn; 300 hpaddr->hpcs1 = HP_SEARCH|HP_GO; 301 } 302 return (MBU_STARTED); 303 } 304 305 hpstart(mi) 306 register struct mba_device *mi; 307 { 308 register struct hpdevice *hpaddr = (struct hpdevice *)mi->mi_drv; 309 register struct buf *bp = mi->mi_tab.b_actf; 310 register struct hpst *st = &hpst[mi->mi_type]; 311 daddr_t bn; 312 int sn, tn; 313 314 bn = dkblock(bp); 315 if (ML11) 316 hpaddr->hpda = bn; 317 else { 318 sn = bn%st->nspc; 319 tn = sn/st->nsect; 320 sn %= st->nsect; 321 hpaddr->hpdc = bp->b_cylin; 322 hpaddr->hpda = (tn << 8) + sn; 323 } 324 if (hphdr[mi->mi_unit]) { 325 if (bp->b_flags & B_READ) 326 return (HP_RHDR|HP_GO); 327 else 328 return (HP_WHDR|HP_GO); 329 } 330 return (0); 331 } 332 333 hpdtint(mi, mbsr) 334 register struct mba_device *mi; 335 int mbsr; 336 { 337 register struct hpdevice *hpaddr = (struct hpdevice *)mi->mi_drv; 338 register struct buf *bp = mi->mi_tab.b_actf; 339 register int er1, er2; 340 int retry = 0; 341 342 #ifndef NOBADSECT 343 if (bp->b_flags&B_BAD) { 344 if (hpecc(mi, CONT)) 345 return(MBD_RESTARTED); 346 } 347 #endif 348 if (hpaddr->hpds&HPDS_ERR || mbsr&MBSR_EBITS) { 349 #ifdef HPDEBUG 350 if (hpdebug) { 351 int dc = hpaddr->hpdc, da = hpaddr->hpda; 352 353 printf("hperr: bp %x cyl %d blk %d as %o ", 354 bp, bp->b_cylin, bp->b_blkno, 355 hpaddr->hpas&0xff); 356 printf("dc %x da %x\n",dc&0xffff, da&0xffff); 357 printf("errcnt %d ", mi->mi_tab.b_errcnt); 358 printf("mbsr=%b ", mbsr, mbsr_bits); 359 printf("er1=%b er2=%b\n", 360 hpaddr->hper1, HPER1_BITS, 361 hpaddr->hper2, HPER2_BITS); 362 DELAY(1000000); 363 } 364 #endif 365 er1 = hpaddr->hper1; 366 er2 = hpaddr->hper2; 367 if (er1 & HPER1_HCRC) { 368 er1 &= ~(HPER1_HCE|HPER1_FER); 369 er2 &= ~HPER2_BSE; 370 } 371 if (er1&HPER1_WLE) { 372 printf("hp%d: write locked\n", dkunit(bp)); 373 bp->b_flags |= B_ERROR; 374 } else if ((er1&0xffff) == HPER1_FER && RP06 && 375 hphdr[mi->mi_unit] == 0) { 376 #ifndef NOBADSECT 377 if (hpecc(mi, BSE)) 378 return(MBD_RESTARTED); 379 else 380 #endif 381 goto hard; 382 } else if (++mi->mi_tab.b_errcnt > 27 || 383 mbsr & MBSR_HARD || 384 er1 & HPER1_HARD || 385 hphdr[mi->mi_unit] || 386 (!ML11 && (er2 & HPER2_HARD))) { 387 hard: 388 harderr(bp, "hp"); 389 if (mbsr & (MBSR_EBITS &~ (MBSR_DTABT|MBSR_MBEXC))) 390 printf("mbsr=%b ", mbsr, mbsr_bits); 391 printf("er1=%b er2=%b", 392 hpaddr->hper1, HPER1_BITS, 393 hpaddr->hper2, HPER2_BITS); 394 if (hpaddr->hpmr) 395 printf(" mr=%o", hpaddr->hpmr&0xffff); 396 if (hpaddr->hpmr2) 397 printf(" mr2=%o", hpaddr->hpmr2&0xffff); 398 printf("\n"); 399 bp->b_flags |= B_ERROR; 400 hprecal[mi->mi_unit] = 0; 401 } else if ((er2 & HPER2_BSE) && !ML11) { 402 #ifndef NOBADSECT 403 if (hpecc(mi, BSE)) 404 return(MBD_RESTARTED); 405 else 406 #endif 407 goto hard; 408 } else if (RM80 && er2&HPER2_SSE) { 409 (void) hpecc(mi, SSE); 410 return (MBD_RESTARTED); 411 } else if ((er1&(HPER1_DCK|HPER1_ECH))==HPER1_DCK) { 412 if (hpecc(mi, ECC)) 413 return (MBD_RESTARTED); 414 /* else done */ 415 } else 416 retry = 1; 417 hpaddr->hpcs1 = HP_DCLR|HP_GO; 418 if (ML11) { 419 if (mi->mi_tab.b_errcnt >= 16) 420 goto hard; 421 } else if ((mi->mi_tab.b_errcnt&07) == 4) { 422 hpaddr->hpcs1 = HP_RECAL|HP_GO; 423 hprecal[mi->mi_unit] = 1; 424 return(MBD_RESTARTED); 425 } 426 if (retry) 427 return (MBD_RETRY); 428 } 429 #ifdef HPDEBUG 430 else 431 if (hpdebug && hprecal[mi->mi_unit]) { 432 printf("recal %d ", hprecal[mi->mi_unit]); 433 printf("errcnt %d\n", mi->mi_tab.b_errcnt); 434 printf("mbsr=%b ", mbsr, mbsr_bits); 435 printf("er1=%b er2=%b\n", 436 hpaddr->hper1, HPER1_BITS, 437 hpaddr->hper2, HPER2_BITS); 438 } 439 #endif 440 switch (hprecal[mi->mi_unit]) { 441 442 case 1: 443 hpaddr->hpdc = bp->b_cylin; 444 hpaddr->hpcs1 = HP_SEEK|HP_GO; 445 hprecal[mi->mi_unit]++; 446 return (MBD_RESTARTED); 447 case 2: 448 if (mi->mi_tab.b_errcnt < 16 || 449 (bp->b_flags & B_READ) == 0) 450 goto donerecal; 451 hpaddr->hpof = hp_offset[mi->mi_tab.b_errcnt & 017]|HPOF_FMT22; 452 hpaddr->hpcs1 = HP_OFFSET|HP_GO; 453 hprecal[mi->mi_unit]++; 454 return (MBD_RESTARTED); 455 donerecal: 456 case 3: 457 hprecal[mi->mi_unit] = 0; 458 return (MBD_RETRY); 459 } 460 hphdr[mi->mi_unit] = 0; 461 bp->b_resid = -(mi->mi_mba->mba_bcr) & 0xffff; 462 if (mi->mi_tab.b_errcnt >= 16) { 463 /* 464 * This is fast and occurs rarely; we don't 465 * bother with interrupts. 466 */ 467 hpaddr->hpcs1 = HP_RTC|HP_GO; 468 while (hpaddr->hpds & HPDS_PIP) 469 ; 470 mbclrattn(mi); 471 } 472 if (!ML11) { 473 hpaddr->hpof = HPOF_FMT22; 474 hpaddr->hpcs1 = HP_RELEASE|HP_GO; 475 } 476 return (MBD_DONE); 477 } 478 479 hpread(dev) 480 dev_t dev; 481 { 482 register int unit = minor(dev) >> 3; 483 484 if (unit >= NHP) 485 u.u_error = ENXIO; 486 else 487 physio(hpstrategy, &rhpbuf[unit], dev, B_READ, minphys); 488 } 489 490 hpwrite(dev) 491 dev_t dev; 492 { 493 register int unit = minor(dev) >> 3; 494 495 if (unit >= NHP) 496 u.u_error = ENXIO; 497 else 498 physio(hpstrategy, &rhpbuf[unit], dev, B_WRITE, minphys); 499 } 500 501 /*ARGSUSED*/ 502 hpioctl(dev, cmd, addr, flag) 503 dev_t dev; 504 int cmd; 505 caddr_t addr; 506 int flag; 507 { 508 509 switch (cmd) { 510 case DKIOCHDR: /* do header read/write */ 511 hphdr[minor(dev)>>3] = 1; 512 return; 513 514 default: 515 u.u_error = ENXIO; 516 } 517 } 518 519 hpecc(mi, flag) 520 register struct mba_device *mi; 521 int flag; 522 { 523 register struct mba_regs *mbp = mi->mi_mba; 524 register struct hpdevice *rp = (struct hpdevice *)mi->mi_drv; 525 register struct buf *bp = mi->mi_tab.b_actf; 526 register struct hpst *st = &hpst[mi->mi_type]; 527 int npf, o; 528 int bn, cn, tn, sn; 529 int bcr; 530 531 bcr = mbp->mba_bcr & 0xffff; 532 if (bcr) 533 bcr |= 0xffff0000; /* sxt */ 534 #ifndef NOBADSECT 535 if (flag == CONT) 536 npf = bp->b_error; 537 else 538 #endif 539 npf = btop(bcr + bp->b_bcount); 540 o = (int)bp->b_un.b_addr & PGOFSET; 541 bn = dkblock(bp); 542 cn = bp->b_cylin; 543 sn = bn%(st->nspc) + npf; 544 tn = sn/st->nsect; 545 sn %= st->nsect; 546 cn += tn/st->ntrak; 547 tn %= st->ntrak; 548 switch (flag) { 549 case ECC: 550 { 551 register int i; 552 caddr_t addr; 553 struct pte mpte; 554 int bit, byte, mask; 555 556 npf--; /* because block in error is previous block */ 557 printf("hp%d%c: soft ecc sn%d\n", dkunit(bp), 558 'a'+(minor(bp->b_dev)&07), bp->b_blkno + npf); 559 mask = rp->hpec2&0xffff; 560 i = (rp->hpec1&0xffff) - 1; /* -1 makes 0 origin */ 561 bit = i&07; 562 i = (i&~07)>>3; 563 byte = i + o; 564 while (i < 512 && (int)ptob(npf)+i < bp->b_bcount && bit > -11) { 565 mpte = mbp->mba_map[npf+btop(byte)]; 566 addr = ptob(mpte.pg_pfnum) + (byte & PGOFSET); 567 putmemc(addr, getmemc(addr)^(mask<<bit)); 568 byte++; 569 i++; 570 bit -= 8; 571 } 572 if (bcr == 0) 573 return (0); 574 npf++; 575 break; 576 } 577 578 case SSE: 579 rp->hpof |= HPOF_SSEI; 580 mbp->mba_bcr = -(bp->b_bcount - (int)ptob(npf)); 581 break; 582 583 #ifndef NOBADSECT 584 case BSE: 585 #ifdef HPBDEBUG 586 if (hpbdebug) 587 printf("hpecc, BSE: bn %d cn %d tn %d sn %d\n", bn, cn, tn, sn); 588 #endif 589 if ((bn = isbad(&hpbad[mi->mi_unit], cn, tn, sn)) < 0) 590 return(0); 591 bp->b_flags |= B_BAD; 592 bp->b_error = npf + 1; 593 bn = st->ncyl*st->nspc - st->nsect - 1 - bn; 594 cn = bn/st->nspc; 595 sn = bn%st->nspc; 596 tn = sn/st->nsect; 597 sn %= st->nsect; 598 mbp->mba_bcr = -512; 599 #ifdef HPBDEBUG 600 if (hpbdebug) 601 printf("revector to cn %d tn %d sn %d\n", cn, tn, sn); 602 #endif 603 break; 604 605 case CONT: 606 #ifdef HPBDEBUG 607 if (hpbdebug) 608 printf("hpecc, CONT: bn %d cn %d tn %d sn %d\n", bn,cn,tn,sn); 609 #endif 610 npf = bp->b_error; 611 bp->b_flags &= ~B_BAD; 612 mbp->mba_bcr = -(bp->b_bcount - (int)ptob(npf)); 613 if ((mbp->mba_bcr & 0xffff) == 0) 614 return(0); 615 break; 616 #endif 617 } 618 rp->hpcs1 = HP_DCLR|HP_GO; 619 if (rp->hpof&HPOF_SSEI) 620 sn++; 621 rp->hpdc = cn; 622 rp->hpda = (tn<<8) + sn; 623 mbp->mba_sr = -1; 624 mbp->mba_var = (int)ptob(npf) + o; 625 rp->hpcs1 = bp->b_flags&B_READ ? HP_RCOM|HP_GO : HP_WCOM|HP_GO; 626 mi->mi_tab.b_errcnt = 0; /* error has been corrected */ 627 return (1); 628 } 629 630 #define DBSIZE 20 631 632 hpdump(dev) 633 dev_t dev; 634 { 635 register struct mba_device *mi; 636 register struct mba_regs *mba; 637 struct hpdevice *hpaddr; 638 char *start; 639 int num, unit; 640 register struct hpst *st; 641 642 num = maxfree; 643 start = 0; 644 unit = minor(dev) >> 3; 645 if (unit >= NHP) 646 return (ENXIO); 647 #define phys(a,b) ((b)((int)(a)&0x7fffffff)) 648 mi = phys(hpinfo[unit],struct mba_device *); 649 if (mi == 0 || mi->mi_alive == 0) 650 return (ENXIO); 651 mba = phys(mi->mi_hd, struct mba_hd *)->mh_physmba; 652 mba->mba_cr = MBCR_INIT; 653 hpaddr = (struct hpdevice *)&mba->mba_drv[mi->mi_drive]; 654 if ((hpaddr->hpds & HPDS_VV) == 0) { 655 hpaddr->hpcs1 = HP_DCLR|HP_GO; 656 hpaddr->hpcs1 = HP_PRESET|HP_GO; 657 hpaddr->hpof = HPOF_FMT22; 658 } 659 st = &hpst[mi->mi_type]; 660 if (dumplo < 0 || dumplo + num >= st->sizes[minor(dev)&07].nblocks) 661 return (EINVAL); 662 while (num > 0) { 663 register struct pte *hpte = mba->mba_map; 664 register int i; 665 int blk, cn, sn, tn; 666 daddr_t bn; 667 668 blk = num > DBSIZE ? DBSIZE : num; 669 bn = dumplo + btop(start); 670 cn = bn/st->nspc + st->sizes[minor(dev)&07].cyloff; 671 sn = bn%st->nspc; 672 tn = sn/st->nsect; 673 sn = sn%st->nsect; 674 hpaddr->hpdc = cn; 675 hpaddr->hpda = (tn << 8) + sn; 676 for (i = 0; i < blk; i++) 677 *(int *)hpte++ = (btop(start)+i) | PG_V; 678 mba->mba_sr = -1; 679 mba->mba_bcr = -(blk*NBPG); 680 mba->mba_var = 0; 681 hpaddr->hpcs1 = HP_WCOM | HP_GO; 682 while ((hpaddr->hpds & HPDS_DRY) == 0) 683 ; 684 if (hpaddr->hpds&HPDS_ERR) 685 return (EIO); 686 start += blk*NBPG; 687 num -= blk; 688 } 689 return (0); 690 } 691 #endif 692