1 /* $OpenBSD: biosdev.c,v 1.35 2022/08/12 20:17:46 stsp Exp $ */ 2 3 /* 4 * Copyright (c) 1996 Michael Shalayeff 5 * Copyright (c) 2003 Tobias Weingartner 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 19 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 * 29 */ 30 31 #include <sys/param.h> 32 #include <sys/reboot.h> 33 #include <sys/disklabel.h> 34 #include <isofs/cd9660/iso.h> 35 #include <lib/libsa/saerrno.h> 36 #include <machine/tss.h> 37 #include <machine/biosvar.h> 38 39 #include "biosdev.h" 40 #include "disk.h" 41 #include "libsa.h" 42 43 #ifdef SOFTRAID 44 #include <dev/softraidvar.h> 45 #include <lib/libsa/softraid.h> 46 #include "softraid_amd64.h" 47 #endif 48 49 static const char *biosdisk_err(u_int); 50 static int biosdisk_errno(u_int); 51 52 int CHS_rw (int, int, int, int, int, int, void *); 53 static int EDD_rw (int, int, u_int32_t, u_int32_t, void *); 54 55 static int biosd_io(int, bios_diskinfo_t *, u_int, int, void *); 56 static u_int findopenbsd(bios_diskinfo_t *, const char **); 57 58 extern int debug; 59 int bios_bootdev; 60 int bios_cddev = -1; /* Set by srt0 if coming from CD */ 61 62 struct EDD_CB { 63 u_int8_t edd_len; /* size of packet */ 64 u_int8_t edd_res1; /* reserved */ 65 u_int8_t edd_nblk; /* # of blocks to transfer */ 66 u_int8_t edd_res2; /* reserved */ 67 u_int16_t edd_off; /* address of buffer (offset) */ 68 u_int16_t edd_seg; /* address of buffer (segment) */ 69 u_int64_t edd_daddr; /* starting block */ 70 }; 71 72 /* 73 * reset disk system 74 */ 75 static int 76 biosdreset(int dev) 77 { 78 int rv; 79 80 __asm volatile (DOINT(0x13) "; setc %b0" : "=a" (rv) 81 : "0" (0), "d" (dev) : "%ecx", "cc"); 82 83 return ((rv & 0xff)? rv >> 8 : 0); 84 } 85 86 /* 87 * Fill out a bios_diskinfo_t for this device. 88 * Return 0 if all ok. 89 * Return 1 if not ok. 90 */ 91 int 92 bios_getdiskinfo(int dev, bios_diskinfo_t *pdi) 93 { 94 u_int rv; 95 96 /* Just reset, don't check return code */ 97 rv = biosdreset(dev); 98 99 #ifdef BIOS_DEBUG 100 if (debug) 101 printf("getinfo: try #8, 0x%x, %p\n", dev, pdi); 102 #endif 103 __asm volatile (DOINT(0x13) "\n\t" 104 "setc %b0; movzbl %h1, %1\n\t" 105 "movzbl %%cl, %3; andb $0x3f, %b3\n\t" 106 "xchgb %%cl, %%ch; rolb $2, %%ch" 107 : "=a" (rv), "=d" (pdi->bios_heads), 108 "=c" (pdi->bios_cylinders), 109 "=b" (pdi->bios_sectors) 110 : "0" (0x0800), "1" (dev) : "cc"); 111 112 #ifdef BIOS_DEBUG 113 if (debug) { 114 printf("getinfo: got #8\n"); 115 printf("disk 0x%x: %d,%d,%d\n", dev, pdi->bios_cylinders, 116 pdi->bios_heads, pdi->bios_sectors); 117 } 118 #endif 119 if (rv & 0xff) 120 return 1; 121 122 /* Fix up info */ 123 pdi->bios_number = dev; 124 pdi->bios_heads++; 125 pdi->bios_cylinders &= 0x3ff; 126 pdi->bios_cylinders++; 127 128 /* NOTE: 129 * This currently hangs/reboots some machines 130 * The IBM ThinkPad 750ED for one. 131 * 132 * Funny that an IBM/MS extension would not be 133 * implemented by an IBM system... 134 * 135 * Future hangs (when reported) can be "fixed" 136 * with getSYSCONFaddr() and an exceptions list. 137 */ 138 if (dev & 0x80 && (dev == 0x80 || dev == 0x81 || dev == bios_bootdev)) { 139 int bm; 140 141 #ifdef BIOS_DEBUG 142 if (debug) 143 printf("getinfo: try #41, 0x%x\n", dev); 144 #endif 145 /* EDD support check */ 146 __asm volatile(DOINT(0x13) "; setc %b0" 147 : "=a" (rv), "=c" (bm) 148 : "0" (0x4100), "b" (0x55aa), "d" (dev) : "cc"); 149 if (!(rv & 0xff) && (BIOS_regs.biosr_bx & 0xffff) == 0xaa55) 150 pdi->bios_edd = (bm & 0xffff) | ((rv & 0xff) << 16); 151 else 152 pdi->bios_edd = -1; 153 154 #ifdef BIOS_DEBUG 155 if (debug) { 156 printf("getinfo: got #41\n"); 157 printf("disk 0x%x: 0x%x\n", dev, bm); 158 } 159 #endif 160 /* 161 * If extended disk access functions are not supported 162 * there is not much point on doing EDD. 163 */ 164 if (!(pdi->bios_edd & EXT_BM_EDA)) 165 pdi->bios_edd = -1; 166 } else 167 pdi->bios_edd = -1; 168 169 /* Skip sanity check for CHS options in EDD mode. */ 170 if (pdi->bios_edd != -1) 171 return 0; 172 173 /* Sanity check */ 174 if (!pdi->bios_cylinders || !pdi->bios_heads || !pdi->bios_sectors) 175 return 1; 176 177 /* CD-ROMs sometimes return heads == 1 */ 178 if (pdi->bios_heads < 2) 179 return 1; 180 181 return 0; 182 } 183 184 /* 185 * Read/Write a block from given place using the BIOS. 186 */ 187 int 188 CHS_rw(int rw, int dev, int cyl, int head, int sect, int nsect, void *buf) 189 { 190 int rv; 191 192 rw = rw == F_READ ? 2 : 3; 193 BIOS_regs.biosr_es = (u_int32_t)buf >> 4; 194 __asm volatile ("movb %b7, %h1\n\t" 195 "movb %b6, %%dh\n\t" 196 "andl $0xf, %4\n\t" 197 /* cylinder; the highest 2 bits of cyl is in %cl */ 198 "xchgb %%ch, %%cl\n\t" 199 "rorb $2, %%cl\n\t" 200 "orb %b5, %%cl\n\t" 201 "inc %%cx\n\t" 202 DOINT(0x13) "\n\t" 203 "setc %b0" 204 : "=a" (rv) 205 : "0" (nsect), "d" (dev), "c" (cyl), 206 "b" (buf), "m" (sect), "m" (head), 207 "m" (rw) 208 : "cc", "memory"); 209 210 return ((rv & 0xff)? rv >> 8 : 0); 211 } 212 213 static __inline int 214 EDD_rw(int rw, int dev, u_int32_t daddr, u_int32_t nblk, void *buf) 215 { 216 int rv; 217 volatile static struct EDD_CB cb; 218 219 /* Zero out reserved stuff */ 220 cb.edd_res1 = 0; 221 cb.edd_res2 = 0; 222 223 /* Fill in parameters */ 224 cb.edd_len = sizeof(cb); 225 cb.edd_nblk = nblk; 226 cb.edd_seg = ((u_int32_t)buf >> 4) & 0xffff; 227 cb.edd_off = (u_int32_t)buf & 0xf; 228 cb.edd_daddr = daddr; 229 230 /* if offset/segment are zero, punt */ 231 if (!cb.edd_seg && !cb.edd_off) 232 return 1; 233 234 /* Call extended read/write (with disk packet) */ 235 BIOS_regs.biosr_ds = (u_int32_t)&cb >> 4; 236 __asm volatile (DOINT(0x13) "; setc %b0" : "=a" (rv) 237 : "0" ((rw == F_READ)? 0x4200: 0x4300), 238 "d" (dev), "S" ((int) (&cb) & 0xf) : "%ecx", "cc"); 239 return ((rv & 0xff)? rv >> 8 : 0); 240 } 241 242 /* 243 * Read given sector, handling retry/errors/etc. 244 */ 245 int 246 biosd_io(int rw, bios_diskinfo_t *bd, u_int off, int nsect, void *buf) 247 { 248 int dev = bd->bios_number; 249 int j, error; 250 void *bb, *bb1 = NULL; 251 int bbsize = nsect * DEV_BSIZE; 252 253 if (bd->flags & BDI_EL_TORITO) { /* It's a CD device */ 254 dev &= 0xff; /* Mask out this flag bit */ 255 256 /* 257 * sys/lib/libsa/cd9600.c converts 2,048-byte CD sectors 258 * to DEV_BSIZE blocks before calling the device strategy 259 * routine. However, the El Torito spec says that the 260 * BIOS will work in 2,048-byte sectors. So shift back. 261 */ 262 off /= (ISO_DEFAULT_BLOCK_SIZE / DEV_BSIZE); 263 nsect /= (ISO_DEFAULT_BLOCK_SIZE / DEV_BSIZE); 264 } 265 266 /* 267 * Use a bounce buffer to not cross 64k DMA boundary, and to 268 * not access 1 MB or above. 269 */ 270 if (((((u_int32_t)buf) & ~0xffff) != 271 (((u_int32_t)buf + bbsize) & ~0xffff)) || 272 (((u_int32_t)buf) >= 0x100000)) { 273 bb = bb1 = alloc(bbsize * 2); 274 if ((((u_int32_t)bb) & ~0xffff) != 275 (((u_int32_t)bb + bbsize - 1) & ~0xffff)) 276 bb = (void *)(((u_int32_t)bb + bbsize - 1) & ~0xffff); 277 if (rw != F_READ) 278 bcopy(buf, bb, bbsize); 279 } else 280 bb = buf; 281 282 /* Try to do operation up to 5 times */ 283 for (error = 1, j = 5; j-- && error; ) { 284 /* CHS or LBA access? */ 285 if (bd->bios_edd != -1) { 286 error = EDD_rw(rw, dev, off, nsect, bb); 287 } else { 288 int cyl, head, sect; 289 size_t i, n; 290 char *p = bb; 291 292 /* Handle track boundaries */ 293 for (error = i = 0; error == 0 && i < nsect; 294 i += n, off += n, p += n * DEV_BSIZE) { 295 296 btochs(off, cyl, head, sect, bd->bios_heads, 297 bd->bios_sectors); 298 299 if ((sect + (nsect - i)) >= bd->bios_sectors) 300 n = bd->bios_sectors - sect; 301 else 302 n = nsect - i; 303 304 error = CHS_rw(rw, dev, cyl, head, sect, n, p); 305 306 /* ECC corrected */ 307 if (error == 0x11) 308 error = 0; 309 } 310 } 311 switch (error) { 312 case 0x00: /* No errors */ 313 case 0x11: /* ECC corrected */ 314 error = 0; 315 break; 316 317 default: /* All other errors */ 318 #ifdef BIOS_DEBUG 319 if (debug) 320 printf("\nBIOS error 0x%x (%s)\n", 321 error, biosdisk_err(error)); 322 #endif 323 biosdreset(dev); 324 break; 325 } 326 } 327 328 if (bb != buf && rw == F_READ) 329 bcopy(bb, buf, bbsize); 330 free(bb1, bbsize * 2); 331 332 #ifdef BIOS_DEBUG 333 if (debug) { 334 if (error != 0) 335 printf("=0x%x(%s)", error, biosdisk_err(error)); 336 putchar('\n'); 337 } 338 #endif 339 340 return error; 341 } 342 343 #define MAXSECTS 32 344 345 int 346 biosd_diskio(int rw, struct diskinfo *dip, u_int off, int nsect, void *buf) 347 { 348 char *dest = buf; 349 int n, ret; 350 351 /* 352 * Avoid doing too large reads, the bounce buffer used by biosd_io() 353 * might run us out-of-mem. 354 */ 355 for (ret = 0; ret == 0 && nsect > 0; 356 off += MAXSECTS, dest += MAXSECTS * DEV_BSIZE, nsect -= MAXSECTS) { 357 n = nsect >= MAXSECTS ? MAXSECTS : nsect; 358 ret = biosd_io(rw, &dip->bios_info, off, n, dest); 359 } 360 return ret; 361 } 362 363 /* 364 * Try to read the bsd label on the given BIOS device. 365 */ 366 static u_int 367 findopenbsd(bios_diskinfo_t *bd, const char **err) 368 { 369 struct dos_mbr mbr; 370 struct dos_partition *dp; 371 u_int mbroff = DOSBBSECTOR; 372 u_int mbr_eoff = DOSBBSECTOR; /* Offset of MBR extended partition. */ 373 int error, i, maxebr = DOS_MAXEBR, nextebr; 374 375 again: 376 if (!maxebr--) { 377 *err = "too many extended partitions"; 378 return (-1); 379 } 380 381 /* Read MBR */ 382 bzero(&mbr, sizeof(mbr)); 383 error = biosd_io(F_READ, bd, mbroff, 1, &mbr); 384 if (error) { 385 *err = biosdisk_err(error); 386 return (-1); 387 } 388 389 /* check mbr signature */ 390 if (mbr.dmbr_sign != DOSMBR_SIGNATURE) { 391 *err = "bad MBR signature\n"; 392 return (-1); 393 } 394 395 /* Search for OpenBSD partition */ 396 nextebr = 0; 397 for (i = 0; i < NDOSPART; i++) { 398 dp = &mbr.dmbr_parts[i]; 399 if (!dp->dp_size) 400 continue; 401 #ifdef BIOS_DEBUG 402 if (debug) 403 printf("found partition %u: " 404 "type %u (0x%x) offset %u (0x%x)\n", 405 (int)(dp - mbr.dmbr_parts), 406 dp->dp_typ, dp->dp_typ, 407 dp->dp_start, dp->dp_start); 408 #endif 409 if (dp->dp_typ == DOSPTYP_OPENBSD) { 410 if (dp->dp_start > (dp->dp_start + mbroff)) 411 continue; 412 return (dp->dp_start + mbroff); 413 } 414 415 /* 416 * Record location of next ebr if and only if this is the first 417 * extended partition in this boot record! 418 */ 419 if (!nextebr && (dp->dp_typ == DOSPTYP_EXTEND || 420 dp->dp_typ == DOSPTYP_EXTENDL)) { 421 nextebr = dp->dp_start + mbr_eoff; 422 if (nextebr < dp->dp_start) 423 nextebr = (u_int)-1; 424 if (mbr_eoff == DOSBBSECTOR) 425 mbr_eoff = dp->dp_start; 426 } 427 } 428 429 if (nextebr && nextebr != (u_int)-1) { 430 mbroff = nextebr; 431 goto again; 432 } 433 434 return (-1); 435 } 436 437 const char * 438 bios_getdisklabel(bios_diskinfo_t *bd, struct disklabel *label) 439 { 440 u_int start = 0; 441 char buf[DEV_BSIZE]; 442 const char *err = NULL; 443 int error; 444 445 /* Sanity check */ 446 if (bd->bios_edd == -1 && 447 (bd->bios_heads == 0 || bd->bios_sectors == 0)) 448 return "failed to read disklabel"; 449 450 /* MBR is a harddisk thing */ 451 if (bd->bios_number & 0x80) { 452 start = findopenbsd(bd, &err); 453 if (start == (u_int)-1) { 454 if (err != NULL) 455 return (err); 456 return "no OpenBSD partition\n"; 457 } 458 } 459 460 /* Load BSD disklabel */ 461 #ifdef BIOS_DEBUG 462 if (debug) 463 printf("loading disklabel @ %u\n", start + DOS_LABELSECTOR); 464 #endif 465 /* read disklabel */ 466 error = biosd_io(F_READ, bd, start + DOS_LABELSECTOR, 1, buf); 467 468 if (error) 469 return "failed to read disklabel"; 470 471 /* Fill in disklabel */ 472 return (getdisklabel(buf, label)); 473 } 474 475 int 476 biosopen(struct open_file *f, ...) 477 { 478 #ifdef SOFTRAID 479 struct sr_boot_volume *bv; 480 #endif 481 register char *cp, **file; 482 dev_t maj, unit, part; 483 struct diskinfo *dip; 484 int biosdev, devlen; 485 const char *st; 486 va_list ap; 487 char *dev; 488 489 va_start(ap, f); 490 cp = *(file = va_arg(ap, char **)); 491 va_end(ap); 492 493 #ifdef BIOS_DEBUG 494 if (debug) 495 printf("%s\n", cp); 496 #endif 497 498 f->f_devdata = NULL; 499 500 /* Search for device specification. */ 501 dev = cp; 502 if (cp[4] == ':') 503 devlen = 2; 504 else if (cp[5] == ':') 505 devlen = 3; 506 else 507 return ENOENT; 508 cp += devlen; 509 510 /* Get unit. */ 511 if ('0' <= *cp && *cp <= '9') 512 unit = *cp++ - '0'; 513 else { 514 printf("Bad unit number\n"); 515 return EUNIT; 516 } 517 518 /* Get partition. */ 519 if ('a' <= *cp && *cp <= 'p') 520 part = *cp++ - 'a'; 521 else { 522 printf("Bad partition\n"); 523 return EPART; 524 } 525 526 /* Get filename. */ 527 cp++; /* skip ':' */ 528 if (*cp != 0) 529 *file = cp; 530 else 531 f->f_flags |= F_RAW; 532 533 #ifdef SOFTRAID 534 /* Intercept softraid disks. */ 535 if (strncmp("sr", dev, 2) == 0) { 536 537 /* Create a fake diskinfo for this softraid volume. */ 538 SLIST_FOREACH(bv, &sr_volumes, sbv_link) 539 if (bv->sbv_unit == unit) 540 break; 541 if (bv == NULL) { 542 printf("Unknown device: sr%d\n", unit); 543 return EADAPT; 544 } 545 546 if ((bv->sbv_level == 'C' || bv->sbv_level == 0x1C) && 547 bv->sbv_keys == NULL) { 548 if (sr_crypto_unlock_volume(bv) != 0) 549 return EPERM; 550 } 551 552 if (bv->sbv_diskinfo == NULL) { 553 dip = alloc(sizeof(struct diskinfo)); 554 bzero(dip, sizeof(*dip)); 555 dip->strategy = biosstrategy; 556 bv->sbv_diskinfo = dip; 557 dip->sr_vol = bv; 558 dip->bios_info.flags |= BDI_BADLABEL; 559 } 560 561 dip = bv->sbv_diskinfo; 562 563 if (dip->bios_info.flags & BDI_BADLABEL) { 564 /* Attempt to read disklabel. */ 565 bv->sbv_part = 'c'; 566 if (sr_getdisklabel(bv, &dip->disklabel)) 567 return ERDLAB; 568 dip->bios_info.flags &= ~BDI_BADLABEL; 569 check_hibernate(dip); 570 } 571 572 bv->sbv_part = part + 'a'; 573 574 bootdev_dip = dip; 575 f->f_devdata = dip; 576 577 return 0; 578 } 579 #endif 580 581 for (maj = 0; maj < nbdevs && 582 strncmp(dev, bdevs[maj], devlen); maj++); 583 if (maj >= nbdevs) { 584 printf("Unknown device: "); 585 for (cp = *file; *cp != ':'; cp++) 586 putchar(*cp); 587 putchar('\n'); 588 return EADAPT; 589 } 590 591 biosdev = unit; 592 switch (maj) { 593 case 0: /* wd */ 594 case 4: /* sd */ 595 case 17: /* hd */ 596 biosdev |= 0x80; 597 break; 598 case 2: /* fd */ 599 break; 600 case 6: /* cd */ 601 biosdev = bios_bootdev & 0xff; 602 break; 603 default: 604 return ENXIO; 605 } 606 607 /* Find device */ 608 bootdev_dip = dip = dklookup(biosdev); 609 610 /* Fix up bootdev */ 611 { dev_t bsd_dev; 612 bsd_dev = dip->bios_info.bsd_dev; 613 dip->bsddev = MAKEBOOTDEV(B_TYPE(bsd_dev), B_ADAPTOR(bsd_dev), 614 B_CONTROLLER(bsd_dev), unit, part); 615 dip->bootdev = MAKEBOOTDEV(B_TYPE(bsd_dev), B_ADAPTOR(bsd_dev), 616 B_CONTROLLER(bsd_dev), B_UNIT(bsd_dev), part); 617 } 618 619 #if 0 620 dip->bios_info.bsd_dev = dip->bootdev; 621 bootdev = dip->bootdev; 622 #endif 623 624 #ifdef BIOS_DEBUG 625 if (debug) { 626 printf("BIOS geometry: heads=%u, s/t=%u; EDD=%d\n", 627 dip->bios_info.bios_heads, dip->bios_info.bios_sectors, 628 dip->bios_info.bios_edd); 629 } 630 #endif 631 632 /* Try for disklabel again (might be removable media) */ 633 if (dip->bios_info.flags & BDI_BADLABEL) { 634 st = bios_getdisklabel(&dip->bios_info, &dip->disklabel); 635 #ifdef BIOS_DEBUG 636 if (debug && st) 637 printf("%s\n", st); 638 #endif 639 if (!st) { 640 dip->bios_info.flags &= ~BDI_BADLABEL; 641 dip->bios_info.flags |= BDI_GOODLABEL; 642 } else 643 return ERDLAB; 644 } 645 646 f->f_devdata = dip; 647 648 return 0; 649 } 650 651 const u_char bidos_errs[] = 652 /* ignored "\x00" "successful completion\0" */ 653 "\x01" "invalid function/parameter\0" 654 "\x02" "address mark not found\0" 655 "\x03" "write-protected\0" 656 "\x04" "sector not found\0" 657 "\x05" "reset failed\0" 658 "\x06" "disk changed\0" 659 "\x07" "drive parameter activity failed\0" 660 "\x08" "DMA overrun\0" 661 "\x09" "data boundary error\0" 662 "\x0A" "bad sector detected\0" 663 "\x0B" "bad track detected\0" 664 "\x0C" "invalid media\0" 665 "\x0E" "control data address mark detected\0" 666 "\x0F" "DMA arbitration level out of range\0" 667 "\x10" "uncorrectable CRC or ECC error on read\0" 668 /* ignored "\x11" "data ECC corrected\0" */ 669 "\x20" "controller failure\0" 670 "\x31" "no media in drive\0" 671 "\x32" "incorrect drive type in CMOS\0" 672 "\x40" "seek failed\0" 673 "\x80" "operation timed out\0" 674 "\xAA" "drive not ready\0" 675 "\xB0" "volume not locked in drive\0" 676 "\xB1" "volume locked in drive\0" 677 "\xB2" "volume not removable\0" 678 "\xB3" "volume in use\0" 679 "\xB4" "lock count exceeded\0" 680 "\xB5" "valid eject request failed\0" 681 "\xBB" "undefined error\0" 682 "\xCC" "write fault\0" 683 "\xE0" "status register error\0" 684 "\xFF" "sense operation failed\0" 685 "\x00" "\0"; 686 687 static const char * 688 biosdisk_err(u_int error) 689 { 690 register const u_char *p = bidos_errs; 691 692 while (*p && *p != error) 693 while (*p++); 694 695 return ++p; 696 } 697 698 const struct biosdisk_errors { 699 u_char error; 700 u_char errno; 701 } tab[] = { 702 { 0x01, EINVAL }, 703 { 0x03, EROFS }, 704 { 0x08, EINVAL }, 705 { 0x09, EINVAL }, 706 { 0x0A, EBSE }, 707 { 0x0B, EBSE }, 708 { 0x0C, ENXIO }, 709 { 0x0D, EINVAL }, 710 { 0x10, EECC }, 711 { 0x20, EHER }, 712 { 0x31, ENXIO }, 713 { 0x32, ENXIO }, 714 { 0x00, EIO } 715 }; 716 717 static int 718 biosdisk_errno(u_int error) 719 { 720 register const struct biosdisk_errors *p; 721 722 if (error == 0) 723 return 0; 724 725 for (p = tab; p->error && p->error != error; p++); 726 727 return p->errno; 728 } 729 730 int 731 biosstrategy(void *devdata, int rw, daddr_t blk, size_t size, void *buf, 732 size_t *rsize) 733 { 734 struct diskinfo *dip = (struct diskinfo *)devdata; 735 u_int8_t error = 0; 736 size_t nsect; 737 738 #ifdef SOFTRAID 739 /* Intercept strategy for softraid volumes. */ 740 if (dip->sr_vol) 741 return sr_strategy(dip->sr_vol, rw, blk, size, buf, rsize); 742 #endif 743 744 nsect = (size + DEV_BSIZE - 1) / DEV_BSIZE; 745 blk += dip->disklabel.d_partitions[B_PARTITION(dip->bsddev)].p_offset; 746 747 /* Read all, sub-functions handle track boundaries */ 748 if (blk < 0) 749 error = EINVAL; 750 else 751 error = biosd_diskio(rw, dip, blk, nsect, buf); 752 753 #ifdef BIOS_DEBUG 754 if (debug) { 755 if (error != 0) 756 printf("=0x%x(%s)", error, biosdisk_err(error)); 757 putchar('\n'); 758 } 759 #endif 760 761 if (rsize != NULL) 762 *rsize = nsect * DEV_BSIZE; 763 764 return (biosdisk_errno(error)); 765 } 766 767 int 768 biosclose(struct open_file *f) 769 { 770 f->f_devdata = NULL; 771 772 return 0; 773 } 774 775 int 776 biosioctl(struct open_file *f, u_long cmd, void *data) 777 { 778 return 0; 779 } 780