1 /* hp.c 4.46 82/02/15 */ 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; 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 if (er1 & HPER1_HCRC) 367 er1 &= ~(HPER1_HCE|HPER1_FER); 368 if (er1&HPER1_WLE) { 369 printf("hp%d: write locked\n", dkunit(bp)); 370 bp->b_flags |= B_ERROR; 371 } else if ((er1&0xffff) == HPER1_FER && RP06 && 372 hphdr[mi->mi_unit] == 0) { 373 #ifndef NOBADSECT 374 if (hpecc(mi, BSE)) 375 return(MBD_RESTARTED); 376 else 377 #endif 378 goto hard; 379 } else if (++mi->mi_tab.b_errcnt > 27 || 380 mbsr & MBSR_HARD || 381 er1 & HPER1_HARD || 382 hphdr[mi->mi_unit] || 383 (!ML11 && (hpaddr->hper2 & HPER2_HARD))) { 384 hard: 385 harderr(bp, "hp"); 386 if (mbsr & (MBSR_EBITS &~ (MBSR_DTABT|MBSR_MBEXC))) 387 printf("mbsr=%b ", mbsr, mbsr_bits); 388 printf("er1=%b er2=%b", 389 hpaddr->hper1, HPER1_BITS, 390 hpaddr->hper2, HPER2_BITS); 391 if (hpaddr->hpmr) 392 printf(" mr=%o", hpaddr->hpmr&0xffff); 393 if (hpaddr->hpmr2) 394 printf(" mr2=%o", hpaddr->hpmr2&0xffff); 395 printf("\n"); 396 bp->b_flags |= B_ERROR; 397 hprecal[mi->mi_unit] = 0; 398 } else if ((hpaddr->hper2 & HPER2_BSE) && !ML11) { 399 #ifndef NOBADSECT 400 if (hpecc(mi, BSE)) 401 return(MBD_RESTARTED); 402 else 403 #endif 404 goto hard; 405 } else if (RM80 && hpaddr->hper2&HPER2_SSE) { 406 (void) hpecc(mi, SSE); 407 return (MBD_RESTARTED); 408 } else if ((er1&(HPER1_DCK|HPER1_ECH))==HPER1_DCK) { 409 if (hpecc(mi, ECC)) 410 return (MBD_RESTARTED); 411 /* else done */ 412 } else 413 retry = 1; 414 hpaddr->hpcs1 = HP_DCLR|HP_GO; 415 if (ML11) { 416 if (mi->mi_tab.b_errcnt >= 16) 417 goto hard; 418 } else if ((mi->mi_tab.b_errcnt&07) == 4) { 419 hpaddr->hpcs1 = HP_RECAL|HP_GO; 420 hprecal[mi->mi_unit] = 1; 421 return(MBD_RESTARTED); 422 } 423 if (retry) 424 return (MBD_RETRY); 425 } 426 #ifdef HPDEBUG 427 else 428 if (hpdebug && hprecal[mi->mi_unit]) { 429 printf("recal %d ", hprecal[mi->mi_unit]); 430 printf("errcnt %d\n", mi->mi_tab.b_errcnt); 431 printf("mbsr=%b ", mbsr, mbsr_bits); 432 printf("er1=%b er2=%b\n", 433 hpaddr->hper1, HPER1_BITS, 434 hpaddr->hper2, HPER2_BITS); 435 } 436 #endif 437 switch (hprecal[mi->mi_unit]) { 438 439 case 1: 440 hpaddr->hpdc = bp->b_cylin; 441 hpaddr->hpcs1 = HP_SEEK|HP_GO; 442 hprecal[mi->mi_unit]++; 443 return (MBD_RESTARTED); 444 case 2: 445 if (mi->mi_tab.b_errcnt < 16 || 446 (bp->b_flags & B_READ) == 0) 447 goto donerecal; 448 hpaddr->hpof = hp_offset[mi->mi_tab.b_errcnt & 017]|HPOF_FMT22; 449 hpaddr->hpcs1 = HP_OFFSET|HP_GO; 450 hprecal[mi->mi_unit]++; 451 return (MBD_RESTARTED); 452 donerecal: 453 case 3: 454 hprecal[mi->mi_unit] = 0; 455 return (MBD_RETRY); 456 } 457 hphdr[mi->mi_unit] = 0; 458 bp->b_resid = -(mi->mi_mba->mba_bcr) & 0xffff; 459 if (mi->mi_tab.b_errcnt >= 16) { 460 /* 461 * This is fast and occurs rarely; we don't 462 * bother with interrupts. 463 */ 464 hpaddr->hpcs1 = HP_RTC|HP_GO; 465 while (hpaddr->hpds & HPDS_PIP) 466 ; 467 mbclrattn(mi); 468 } 469 if (!ML11) { 470 hpaddr->hpof = HPOF_FMT22; 471 hpaddr->hpcs1 = HP_RELEASE|HP_GO; 472 } 473 return (MBD_DONE); 474 } 475 476 hpread(dev) 477 dev_t dev; 478 { 479 register int unit = minor(dev) >> 3; 480 481 if (unit >= NHP) 482 u.u_error = ENXIO; 483 else 484 physio(hpstrategy, &rhpbuf[unit], dev, B_READ, minphys); 485 } 486 487 hpwrite(dev) 488 dev_t dev; 489 { 490 register int unit = minor(dev) >> 3; 491 492 if (unit >= NHP) 493 u.u_error = ENXIO; 494 else 495 physio(hpstrategy, &rhpbuf[unit], dev, B_WRITE, minphys); 496 } 497 498 /*ARGSUSED*/ 499 hpioctl(dev, cmd, addr, flag) 500 dev_t dev; 501 int cmd; 502 caddr_t addr; 503 int flag; 504 { 505 506 switch (cmd) { 507 case DKIOCHDR: /* do header read/write */ 508 hphdr[minor(dev)>>3] = 1; 509 return; 510 511 default: 512 u.u_error = ENXIO; 513 } 514 } 515 516 hpecc(mi, flag) 517 register struct mba_device *mi; 518 int flag; 519 { 520 register struct mba_regs *mbp = mi->mi_mba; 521 register struct hpdevice *rp = (struct hpdevice *)mi->mi_drv; 522 register struct buf *bp = mi->mi_tab.b_actf; 523 register struct hpst *st = &hpst[mi->mi_type]; 524 int npf, o; 525 int bn, cn, tn, sn; 526 int bcr; 527 528 bcr = mbp->mba_bcr & 0xffff; 529 if (bcr) 530 bcr |= 0xffff0000; /* sxt */ 531 #ifndef NOBADSECT 532 if (flag == CONT) 533 npf = bp->b_error; 534 else 535 #endif 536 npf = btop(bcr + bp->b_bcount); 537 o = (int)bp->b_un.b_addr & PGOFSET; 538 bn = dkblock(bp); 539 cn = bp->b_cylin; 540 sn = bn%(st->nspc) + npf; 541 tn = sn/st->nsect; 542 sn %= st->nsect; 543 cn += tn/st->ntrak; 544 tn %= st->ntrak; 545 switch (flag) { 546 case ECC: 547 { 548 register int i; 549 caddr_t addr; 550 struct pte mpte; 551 int bit, byte, mask; 552 553 npf--; /* because block in error is previous block */ 554 printf("hp%d%c: soft ecc sn%d\n", dkunit(bp), 555 'a'+(minor(bp->b_dev)&07), bp->b_blkno + npf); 556 mask = rp->hpec2&0xffff; 557 i = (rp->hpec1&0xffff) - 1; /* -1 makes 0 origin */ 558 bit = i&07; 559 i = (i&~07)>>3; 560 byte = i + o; 561 while (i < 512 && (int)ptob(npf)+i < bp->b_bcount && bit > -11) { 562 mpte = mbp->mba_map[npf+btop(byte)]; 563 addr = ptob(mpte.pg_pfnum) + (byte & PGOFSET); 564 putmemc(addr, getmemc(addr)^(mask<<bit)); 565 byte++; 566 i++; 567 bit -= 8; 568 } 569 if (bcr == 0) 570 return (0); 571 npf++; 572 break; 573 } 574 575 case SSE: 576 rp->hpof |= HPOF_SSEI; 577 mbp->mba_bcr = -(bp->b_bcount - (int)ptob(npf)); 578 break; 579 580 #ifndef NOBADSECT 581 case BSE: 582 #ifdef HPBDEBUG 583 if (hpbdebug) 584 printf("hpecc, BSE: bn %d cn %d tn %d sn %d\n", bn, cn, tn, sn); 585 #endif 586 if ((bn = isbad(&hpbad[mi->mi_unit], cn, tn, sn)) < 0) 587 return(0); 588 bp->b_flags |= B_BAD; 589 bp->b_error = npf + 1; 590 bn = st->ncyl*st->nspc - st->nsect - 1 - bn; 591 cn = bn/st->nspc; 592 sn = bn%st->nspc; 593 tn = sn/st->nsect; 594 sn %= st->nsect; 595 mbp->mba_bcr = -512; 596 #ifdef HPBDEBUG 597 if (hpbdebug) 598 printf("revector to cn %d tn %d sn %d\n", cn, tn, sn); 599 #endif 600 break; 601 602 case CONT: 603 #ifdef HPBDEBUG 604 if (hpbdebug) 605 printf("hpecc, CONT: bn %d cn %d tn %d sn %d\n", bn,cn,tn,sn); 606 #endif 607 npf = bp->b_error; 608 bp->b_flags &= ~B_BAD; 609 mbp->mba_bcr = -(bp->b_bcount - (int)ptob(npf)); 610 if ((mbp->mba_bcr & 0xffff) == 0) 611 return(0); 612 break; 613 #endif 614 } 615 rp->hpcs1 = HP_DCLR|HP_GO; 616 if (rp->hpof&HPOF_SSEI) 617 sn++; 618 rp->hpdc = cn; 619 rp->hpda = (tn<<8) + sn; 620 mbp->mba_sr = -1; 621 mbp->mba_var = (int)ptob(npf) + o; 622 rp->hpcs1 = bp->b_flags&B_READ ? HP_RCOM|HP_GO : HP_WCOM|HP_GO; 623 mi->mi_tab.b_errcnt = 0; /* error has been corrected */ 624 return (1); 625 } 626 627 #define DBSIZE 20 628 629 hpdump(dev) 630 dev_t dev; 631 { 632 register struct mba_device *mi; 633 register struct mba_regs *mba; 634 struct hpdevice *hpaddr; 635 char *start; 636 int num, unit; 637 register struct hpst *st; 638 639 num = maxfree; 640 start = 0; 641 unit = minor(dev) >> 3; 642 if (unit >= NHP) 643 return (ENXIO); 644 #define phys(a,b) ((b)((int)(a)&0x7fffffff)) 645 mi = phys(hpinfo[unit],struct mba_device *); 646 if (mi == 0 || mi->mi_alive == 0) 647 return (ENXIO); 648 mba = phys(mi->mi_hd, struct mba_hd *)->mh_physmba; 649 mba->mba_cr = MBCR_INIT; 650 hpaddr = (struct hpdevice *)&mba->mba_drv[mi->mi_drive]; 651 if ((hpaddr->hpds & HPDS_VV) == 0) { 652 hpaddr->hpcs1 = HP_DCLR|HP_GO; 653 hpaddr->hpcs1 = HP_PRESET|HP_GO; 654 hpaddr->hpof = HPOF_FMT22; 655 } 656 st = &hpst[mi->mi_type]; 657 if (dumplo < 0 || dumplo + num >= st->sizes[minor(dev)&07].nblocks) 658 return (EINVAL); 659 while (num > 0) { 660 register struct pte *hpte = mba->mba_map; 661 register int i; 662 int blk, cn, sn, tn; 663 daddr_t bn; 664 665 blk = num > DBSIZE ? DBSIZE : num; 666 bn = dumplo + btop(start); 667 cn = bn/st->nspc + st->sizes[minor(dev)&07].cyloff; 668 sn = bn%st->nspc; 669 tn = sn/st->nsect; 670 sn = sn%st->nsect; 671 hpaddr->hpdc = cn; 672 hpaddr->hpda = (tn << 8) + sn; 673 for (i = 0; i < blk; i++) 674 *(int *)hpte++ = (btop(start)+i) | PG_V; 675 mba->mba_sr = -1; 676 mba->mba_bcr = -(blk*NBPG); 677 mba->mba_var = 0; 678 hpaddr->hpcs1 = HP_WCOM | HP_GO; 679 while ((hpaddr->hpds & HPDS_DRY) == 0) 680 ; 681 if (hpaddr->hpds&HPDS_ERR) 682 return (EIO); 683 start += blk*NBPG; 684 num -= blk; 685 } 686 return (0); 687 } 688 #endif 689