1 /* 2 * Copyright (c) 1990 University of Utah. 3 * Copyright (c) 1990 The Regents of the University of California. 4 * All rights reserved. 5 * 6 * This code is derived from software contributed to Berkeley by 7 * the Systems Programming Group of the University of Utah Computer 8 * Science Department. 9 * 10 * %sccs.include.redist.c% 11 * 12 * from: Utah $Hdr: st.c 1.11 92/01/21$ 13 * 14 * @(#)st.c 7.7 (Berkeley) 06/05/92 15 */ 16 17 /* 18 * SCSI CCS (Command Command Set) tape driver. 19 * 20 * Specific to Exabyte: 21 * mt status: residual="Mbytes to LEOM" 22 * minor bit 4 [b1bbbb] (aka /dev/rst16) selects short filemarks 23 * minor bit 5 [1bbbbb] (aka /dev/rst32) selects fix block mode, 1k blocks. 24 * 25 * Archive drive: 26 * can read both QIC-24 and QIC-II. But only writes 27 * QIC-24. 28 * 29 * Supports Archive Viper QIC-150 tape drive, but scsi.c reports selection 30 * errors. 31 * 32 * Supports Archive Python DAT drive, but will sometimes hang machine. 33 * 34 * Supports HP 35450A DAT drive, but will sometimes hang machine. 35 * Partitioning of tape not supported. 36 * Vendor unique support has not been added. 37 * 38 * 39 * Supports Archive VIPER (QIC-150). 40 * Mostly Supports Archive PYTHON (DAT). 41 * Hangs if write after spin down. 42 * Need scsi.c that does connect/disconnect. 43 */ 44 45 /* 46 * support for the block device not implemented 47 */ 48 49 #include "st.h" 50 #if NST > 0 51 52 #include "param.h" 53 #include "systm.h" 54 #include "buf.h" 55 #include "file.h" 56 #include "proc.h" 57 #include "ioctl.h" 58 #include "tty.h" 59 #include "mtio.h" 60 #include "kernel.h" 61 #include "tprintf.h" 62 63 #include "hp/dev/device.h" 64 #include "scsireg.h" 65 #include "stvar.h" 66 67 extern int scsi_test_unit_rdy(); 68 extern int scsi_request_sense(); 69 extern int scsiustart(); 70 extern int scsigo(); 71 extern void scsifree(); 72 extern void scsireset(); 73 extern void scsi_delay(); 74 extern int scsi_tt_oddio(); 75 76 extern int scsi_immed_command(); 77 78 int stinit(), ststart(), stgo(), stintr(); 79 struct driver stdriver = { 80 stinit, "st", ststart, stgo, stintr, 81 }; 82 83 struct st_softc { 84 struct hp_device *sc_hd; 85 struct devqueue sc_dq; 86 long sc_blkno; /* (possible block device support?) */ 87 long sc_resid; /* (possible block device support?) */ 88 int sc_flags; 89 int sc_blklen; /* 0 = variable len records */ 90 int sc_filepos; /* file position on tape */ 91 long sc_numblks; /* number of blocks on tape */ 92 short sc_type; /* ansi scsi type */ 93 short sc_punit; /* physical unit (scsi lun) */ 94 short sc_tapeid; /* tape drive id */ 95 char sc_datalen[32]; /* additional data length on some commands */ 96 short sc_tticntdwn; /* interrupts between TTi display updates */ 97 tpr_t sc_ctty; 98 struct buf *sc_bp; 99 u_char sc_cmd; 100 } st_softc[NST]; 101 102 /* softc flags */ 103 #define STF_ALIVE 0x0001 104 #define STF_OPEN 0x0002 105 #define STF_WMODE 0x0004 106 #define STF_WRTTN 0x0008 107 #define STF_CMD 0x0010 108 #define STF_LEOT 0x0020 109 #define STF_MOVED 0x0040 110 111 struct st_mode st_mode[NST]; 112 113 /* 114 * Maybe this should not be global, but gives chance to get 115 * tape remaining, Rewrites/ECC, etc outside the driver 116 */ 117 static struct st_xsense { 118 struct scsi_xsense sc_xsense; /* data from sense */ 119 struct exb_xsense exb_xsense; /* additional info from exabyte */ 120 } st_xsense[NST]; 121 122 static struct scsi_fmt_cdb stcmd[NST]; 123 124 static struct scsi_fmt_cdb st_read_cmd = { 6, CMD_READ }; 125 static struct scsi_fmt_cdb st_write_cmd = { 6, CMD_WRITE }; 126 127 struct buf sttab[NST]; 128 struct buf stbuf[NST]; 129 130 #define UNIT(x) (minor(x) & 3) 131 #define stpunit(x) ((x) & 7) 132 133 #define STDEV_NOREWIND 0x04 134 #define STDEV_HIDENSITY 0x08 135 #define STDEV_EXSFMK 0x10 136 #define STDEV_FIXEDBLK 0x20 137 138 #ifdef DEBUG 139 int st_debug = 0x0000; 140 #define ST_OPEN 0x0001 141 #define ST_GO 0x0002 142 #define ST_FMKS 0x0004 143 #define ST_OPENSTAT 0x0008 144 #define ST_BRESID 0x0010 145 #define ST_ODDIO 0x0020 146 #endif 147 148 /* 149 * Patchable variable. If an even length read is requested a dma transfer is 150 * used. Only after the read will we find out if the read had an odd number 151 * of bytes. The HP98658 hardware cannot do odd length transfers, the last 152 * byte of the data will always be 0x00. Normally, the driver will complain 153 * about such transfers and return EIO. However, if st_dmaoddretry is non- 154 * zero, the driver will try and issue a BSR and then re-read the data using 155 * 'programmed transfer mode'. In most cases this works, however for unknown 156 * reasons it will hang the machine in certain cases. 157 * 158 * Note: 159 * Odd length read requests are always done using programmed transfer mode. 160 */ 161 int st_dmaoddretry = 0; 162 163 /* 164 * Exabyte only: 165 * From adb can have access to fixed vs. variable length modes. 166 * Use 0x400 for 1k (best capacity) fixed length records. 167 * In st_open, if minor bit 4 set then 1k records are used. 168 * If st_exblken is set to anything other then 0 we are in fixed length mode. 169 * Minor bit 5 requests 1K fixed-length, overriding any setting of st_exblklen. 170 */ 171 int st_exblklen = 0; 172 173 /* exabyte here for adb access, set at open time */ 174 #define EX_CT 0x80 /* international cart - more space W/P6 */ 175 #define EX_ND 0x20 /* no disconnect */ 176 #define EX_NBE 0x08 /* no busy enable */ 177 #define EX_EBD 0x04 /* even byte disconnect */ 178 #define EX_PE 0x02 /* parity enable */ 179 #define EX_NAL 0x01 /* no auto load */ 180 int st_exvup = (EX_CT|EX_ND|EX_NBE); /* vendor unique parameters */ 181 182 /* 183 * motion and reconnect thresholds guidelines: 184 * write operation; lower motion threshold for faster transfer 185 * raise reconnect threshold for slower transfer 186 * read operation; lower motion threshold for slower transfer 187 * raise reconnect threshold for faster transfer 188 */ 189 int st_exmotthr = 0x80; /* motion threshold, 0x80 default */ 190 int st_exreconthr = 0xa0; /* reconnect threshold, 0xa0 default */ 191 int st_exgapthr = 7; /* gap threshold, 7 default */ 192 #ifdef TTI 193 int st_extti = 0x01; /* bitmask of unit numbers, do extra */ 194 /* sensing so TTi display gets updated */ 195 #endif 196 197 stinit(hd) 198 register struct hp_device *hd; 199 { 200 register struct st_softc *sc = &st_softc[hd->hp_unit]; 201 202 sc->sc_hd = hd; 203 sc->sc_punit = stpunit(hd->hp_flags); 204 sc->sc_type = stident(sc, hd); 205 if (sc->sc_type < 0) 206 return(0); 207 sc->sc_dq.dq_ctlr = hd->hp_ctlr; 208 sc->sc_dq.dq_unit = hd->hp_unit; 209 sc->sc_dq.dq_slave = hd->hp_slave; 210 sc->sc_dq.dq_driver = &stdriver; 211 sc->sc_blkno = 0; 212 sc->sc_flags = STF_ALIVE; 213 return(1); 214 } 215 216 stident(sc, hd) 217 register struct st_softc *sc; 218 register struct hp_device *hd; 219 { 220 int unit; 221 int ctlr, slave; 222 int i, stat, inqlen; 223 char idstr[32]; 224 static int havest = 0; 225 struct st_inquiry { 226 struct scsi_inquiry inqbuf; 227 struct exb_inquiry exb_inquiry; 228 } st_inqbuf; 229 static struct scsi_fmt_cdb st_inq = { 230 6, 231 CMD_INQUIRY, 0, 0, 0, sizeof(st_inqbuf), 0 232 }; 233 234 ctlr = hd->hp_ctlr; 235 slave = hd->hp_slave; 236 unit = sc->sc_punit; 237 scsi_delay(-1); 238 239 inqlen = 0x05; /* min */ 240 st_inq.cdb[4] = 0x05; 241 stat = scsi_immed_command(ctlr, slave, unit, &st_inq, 242 (u_char *)&st_inqbuf, inqlen, B_READ); 243 /* do twice as first command on some scsi tapes always fails */ 244 stat = scsi_immed_command(ctlr, slave, unit, &st_inq, 245 (u_char *)&st_inqbuf, inqlen, B_READ); 246 if (stat == -1) 247 goto failed; 248 249 if ((st_inqbuf.inqbuf.type != 0x01 || /* sequential access device */ 250 st_inqbuf.inqbuf.qual != 0x80 || /* removable media */ 251 (st_inqbuf.inqbuf.version != 0x01 && /* current ANSI SCSI spec */ 252 st_inqbuf.inqbuf.version != 0x02)) /* 0x02 is for HP DAT */ 253 && 254 (st_inqbuf.inqbuf.type != 0x01 || /* M4 ??! */ 255 /* 256 * the M4 is a little too smart (ass?) for its own good: 257 * qual codes: 258 * 0x80: you can take the tape out (unit not online) 259 * 0xf8: online and at 6250bpi 260 * 0xf9: online and at 1600bpi 261 */ 262 st_inqbuf.inqbuf.version != 0x09)) /* M4 tape */ 263 { 264 printf("st: wrong specs: type %x qual %x version %d\n", st_inqbuf.inqbuf.type, 265 st_inqbuf.inqbuf.qual, st_inqbuf.inqbuf.version); 266 goto failed; 267 } 268 269 /* now get additonal info */ 270 inqlen = 0x05 + st_inqbuf.inqbuf.len; 271 st_inq.cdb[4] = inqlen; 272 bzero(&st_inqbuf, sizeof(st_inqbuf)); 273 stat = scsi_immed_command(ctlr, slave, unit, &st_inq, 274 (u_char *)&st_inqbuf, inqlen, B_READ); 275 276 if (st_inqbuf.inqbuf.len >= 28) { 277 bcopy((caddr_t)&st_inqbuf.inqbuf.vendor_id, (caddr_t)idstr, 28); 278 for (i = 27; i > 23; --i) 279 if (idstr[i] != ' ') 280 break; 281 idstr[i+1] = 0; 282 for (i = 23; i > 7; --i) 283 if (idstr[i] != ' ') 284 break; 285 idstr[i+1] = 0; 286 for (i = 7; i >= 0; --i) 287 if (idstr[i] != ' ') 288 break; 289 idstr[i+1] = 0; 290 printf("st%d: %s %s rev %s\n", hd->hp_unit, idstr, &idstr[8], 291 &idstr[24]); 292 } else if (inqlen == 5) 293 /* great it's a stupid device, doesn't know it's know name */ 294 idstr[0] = idstr[8] = '\0'; 295 else 296 idstr[8] = '\0'; 297 298 if (stat == 0xff) { 299 printf("st%d: Cant handle this tape drive\n", hd->hp_unit); 300 goto failed; 301 } 302 303 if (bcmp("EXB-8200", &idstr[8], 8) == 0) { 304 sc->sc_tapeid = MT_ISEXABYTE; 305 sc->sc_datalen[CMD_REQUEST_SENSE] = 26; 306 sc->sc_datalen[CMD_INQUIRY] = 52; 307 sc->sc_datalen[CMD_MODE_SELECT] = 17; 308 sc->sc_datalen[CMD_MODE_SENSE] = 17; 309 } else if (bcmp("VIPER 150", &idstr[8], 9) == 0) { 310 sc->sc_tapeid = MT_ISVIPER1; 311 sc->sc_datalen[CMD_REQUEST_SENSE] = 14; 312 sc->sc_datalen[CMD_INQUIRY] = 36; 313 sc->sc_datalen[CMD_MODE_SELECT] = 12; 314 sc->sc_datalen[CMD_MODE_SENSE] = 12; 315 } else if (bcmp("Python 25501", &idstr[8], 12) == 0) { 316 sc->sc_tapeid = MT_ISPYTHON; 317 sc->sc_datalen[CMD_REQUEST_SENSE] = 14; 318 sc->sc_datalen[CMD_INQUIRY] = 36; 319 sc->sc_datalen[CMD_MODE_SELECT] = 12; 320 sc->sc_datalen[CMD_MODE_SENSE] = 12; 321 } else if (bcmp("HP35450A", &idstr[8], 8) == 0) { 322 /* XXX "extra" stat makes the HP drive happy at boot time */ 323 stat = scsi_test_unit_rdy(ctlr, slave, unit); 324 sc->sc_tapeid = MT_ISHPDAT; 325 sc->sc_datalen[CMD_REQUEST_SENSE] = 14; 326 sc->sc_datalen[CMD_INQUIRY] = 36; 327 sc->sc_datalen[CMD_MODE_SELECT] = 12; 328 sc->sc_datalen[CMD_MODE_SENSE] = 12; 329 } else if (bcmp("123107 SCSI", &idstr[8], 11) == 0) { 330 sc->sc_tapeid = MT_ISMFOUR; 331 sc->sc_datalen[CMD_REQUEST_SENSE] = 8; 332 sc->sc_datalen[CMD_INQUIRY] = 5; 333 sc->sc_datalen[CMD_MODE_SELECT] = 12; 334 sc->sc_datalen[CMD_MODE_SENSE] = 12; 335 } else { 336 if (idstr[8] == '\0') 337 printf("st%d: No ID, assuming Archive\n", hd->hp_unit); 338 else 339 printf("st%d: Unsupported tape device\n", hd->hp_unit); 340 sc->sc_tapeid = MT_ISAR; 341 sc->sc_datalen[CMD_REQUEST_SENSE] = 8; 342 sc->sc_datalen[CMD_INQUIRY] = 5; 343 sc->sc_datalen[CMD_MODE_SELECT] = 12; 344 sc->sc_datalen[CMD_MODE_SENSE] = 12; 345 } 346 347 sc->sc_filepos = 0; 348 349 /* load xsense */ 350 stxsense(ctlr, slave, unit, sc); 351 352 scsi_delay(0); 353 /* XXX if we have a tape, we must up the delays in the HA driver */ 354 if (!havest) { 355 havest = 1; 356 scsi_delay(20000); 357 } 358 return(st_inqbuf.inqbuf.type); 359 failed: 360 scsi_delay(0); 361 return(-1); 362 } 363 364 stopen(dev, flag, type, p) 365 dev_t dev; 366 int flag, type; 367 struct proc *p; 368 { 369 register struct st_softc *sc = &st_softc[UNIT(dev)]; 370 register struct st_xsense *xsense; 371 register int count; 372 register int stat; 373 int ctlr, slave, unit; 374 struct mode_select_data msd; 375 struct mode_sense mode; 376 int modlen; 377 int error; 378 static struct scsi_fmt_cdb modsel = { 379 6, 380 CMD_MODE_SELECT, 0, 0, 0, sizeof(msd), 0 381 }; 382 static struct scsi_fmt_cdb unitready = { 383 6, 384 CMD_TEST_UNIT_READY, 0, 0, 0, 0, 0 385 }; 386 static struct scsi_fmt_cdb modsense = { 387 6, 388 CMD_MODE_SENSE, 0, 0, 0, sizeof(mode), 0 389 }; 390 391 ctlr = sc->sc_dq.dq_ctlr; 392 slave = sc->sc_dq.dq_slave; 393 unit = sc->sc_punit; 394 xsense = &st_xsense[UNIT(dev)]; 395 396 if (UNIT(dev) > NST || (sc->sc_flags & STF_ALIVE) == 0) 397 return(ENXIO); 398 if (sc->sc_flags & STF_OPEN) 399 return(EBUSY); 400 401 /* do a mode sense to get current */ 402 modlen = sc->sc_datalen[CMD_MODE_SENSE]; 403 modsense.cdb[4] = modlen; 404 stat = scsi_immed_command(ctlr, slave, unit, &modsense, 405 (u_char *)&mode, modlen, B_READ); 406 407 /* do a mode sense to get current */ 408 modlen = sc->sc_datalen[CMD_MODE_SENSE]; 409 modsense.cdb[4] = modlen; 410 stat = scsi_immed_command(ctlr, slave, unit, &modsense, 411 (u_char *)&mode, modlen, B_READ); 412 413 /* set record length */ 414 switch (sc->sc_tapeid) { 415 case MT_ISAR: 416 sc->sc_blklen = 512; 417 break; 418 case MT_ISEXABYTE: 419 if (minor(dev) & STDEV_FIXEDBLK) 420 sc->sc_blklen = 0x400; 421 else 422 sc->sc_blklen = st_exblklen; 423 break; 424 case MT_ISHPDAT: 425 sc->sc_blklen = 512; 426 break; 427 case MT_ISVIPER1: 428 sc->sc_blklen = 512; 429 break; 430 case MT_ISPYTHON: 431 sc->sc_blklen = 512; 432 break; 433 case MT_ISMFOUR: 434 sc->sc_blklen = 0; 435 break; 436 default: 437 if ((mode.md.blklen2 << 16 | 438 mode.md.blklen1 << 8 | 439 mode.md.blklen0) != 0) 440 sc->sc_blklen = mode.md.blklen2 << 16 | 441 mode.md.blklen1 << 8 | 442 mode.md.blklen0; 443 else 444 sc->sc_blklen = 512; 445 } 446 447 /* setup for mode select */ 448 msd.rsvd1 = 0; 449 msd.rsvd2 = 0; 450 msd.rsvd3 = 0; 451 msd.buff = 1; 452 msd.speed = 0; 453 msd.blkdeslen = 0x08; 454 msd.density = 0; 455 msd.blks2 = 0; 456 msd.blks1 = 0; 457 msd.blks0 = 0; 458 msd.rsvd4 = 0; 459 msd.blklen2 = (sc->sc_blklen >> 16) & 0xff; 460 msd.blklen1 = (sc->sc_blklen >> 8) & 0xff; 461 msd.blklen0 = sc->sc_blklen & 0xff; 462 463 /* 464 * Do we have any density problems? 465 */ 466 467 switch (sc->sc_tapeid) { 468 case MT_ISAR: 469 if (minor(dev) & STDEV_HIDENSITY) 470 msd.density = 0x5; 471 else { 472 if (flag & FWRITE) { 473 uprintf("Can only write QIC-24\n"); 474 return(EIO); 475 } 476 msd.density = 0x4; 477 } 478 break; 479 case MT_ISEXABYTE: 480 if (minor(dev) & STDEV_HIDENSITY) 481 uprintf("EXB-8200 density support only\n"); 482 msd.vupb = (u_char)st_exvup; 483 msd.rsvd5 = 0; 484 msd.p5 = 0; 485 msd.motionthres = (u_char)st_exmotthr; 486 msd.reconthres = (u_char)st_exreconthr; 487 msd.gapthres = (u_char)st_exgapthr; 488 break; 489 case MT_ISHPDAT: 490 case MT_ISVIPER1: 491 case MT_ISPYTHON: 492 if (minor(dev) & STDEV_HIDENSITY) 493 uprintf("Only one density supported\n"); 494 break; 495 case MT_ISMFOUR: 496 break; /* XXX could do density select? */ 497 default: 498 uprintf("Unsupported drive\n"); 499 return(EIO); 500 } 501 502 modlen = sc->sc_datalen[CMD_MODE_SELECT]; 503 modsel.cdb[4] = modlen; 504 505 /* mode select */ 506 count = 0; 507 retryselect: 508 stat = scsi_immed_command(ctlr, slave, unit, &modsel, 509 (u_char *)&msd, modlen, B_WRITE); 510 /* 511 * First command after power cycle, bus reset or tape change 512 * will error. Try command again 513 */ 514 if (stat == STS_CHECKCOND) { 515 sc->sc_filepos = 0; 516 stxsense(ctlr, slave, unit, sc); 517 stat = scsi_immed_command(ctlr, slave, unit, &modsel, 518 (u_char *)&msd, modlen, B_WRITE); 519 #ifdef DEBUG 520 if (stat && (st_debug & ST_OPEN)) 521 printf("stopen: stat on mode select 0x%x second try\n", stat); 522 #endif 523 if (stat == STS_CHECKCOND) { 524 stxsense(ctlr, slave, unit, sc); 525 prtkey(UNIT(dev), sc); 526 } 527 if (stat) 528 return(EIO); 529 } 530 if (stat == -1 || stat == STS_BUSY) { 531 /* 532 * XXX it might just be that the bus is busy because 533 * another tape is doing a command. This would change 534 * with connect/disconnect, ie. the other drive would 535 * not hold onto the bus. 536 * 537 * Sleep on lbolt for up to 20 minutes (max time to FSF 538 * an exabyte to EOT: 16:xx minutes) 539 */ 540 if (++count > 60*20) { 541 uprintf("SCSI bus timeout\n"); 542 return(EBUSY); 543 } 544 if (error = tsleep((caddr_t)&lbolt, PZERO | PCATCH, 545 "st_scsiwait", 0)) 546 return (error); 547 goto retryselect; 548 } 549 550 /* drive ready ? */ 551 stat = scsi_test_unit_rdy(ctlr, slave, unit); 552 553 if (stat == STS_CHECKCOND) { 554 stxsense(ctlr, slave, unit, sc); 555 switch (sc->sc_tapeid) { 556 case MT_ISEXABYTE: 557 if ((xsense->sc_xsense.key & XSK_NOTRDY) && 558 xsense->exb_xsense.tnp) 559 uprintf("no cartridge\n"); 560 else if (xsense->sc_xsense.key & XSK_NOTRDY) 561 uprintf("cartridge not loaded\n"); 562 else if (xsense->sc_xsense.key & XSK_UNTATTEN) { 563 uprintf("new cart/power interrupt\n"); 564 stat = 0; 565 } else if ((xsense->sc_xsense.key & XSK_UNTATTEN) && 566 xsense->exb_xsense.tnp) 567 uprintf("cartridge unloading\n"); 568 else 569 prtkey(UNIT(dev), sc); 570 break; 571 case MT_ISMFOUR: 572 case MT_ISAR: 573 if (xsense->sc_xsense.key & XSK_UNTATTEN) 574 stat = scsi_test_unit_rdy(ctlr, slave, unit); 575 if (stat == STS_CHECKCOND) { 576 stxsense(ctlr, slave, unit, sc); 577 if (xsense->sc_xsense.key) 578 prtkey(UNIT(dev), sc); 579 } else { 580 sc->sc_filepos = 0; /* new tape */ 581 stat = 0; 582 } 583 break; 584 case MT_ISHPDAT: 585 case MT_ISVIPER1: 586 case MT_ISPYTHON: 587 if (xsense->sc_xsense.key & XSK_UNTATTEN) 588 stat = scsi_test_unit_rdy(ctlr, slave, unit); 589 if (stat == STS_CHECKCOND) { 590 stxsense(ctlr, slave, unit, sc); 591 if (xsense->sc_xsense.key) 592 prtkey(UNIT(dev), sc); 593 } 594 break; 595 default: 596 uprintf("st%d: not ready\n", UNIT(dev)); 597 prtkey(UNIT(dev), sc); 598 break; 599 } 600 } 601 if (stat) 602 return(EIO); 603 604 /* mode sense */ 605 modlen = sc->sc_datalen[CMD_MODE_SENSE]; 606 modsense.cdb[4] = modlen; 607 stat = scsi_immed_command(ctlr, slave, unit, &modsense, 608 (u_char *)&mode, modlen, B_READ); 609 #ifdef DEBUG 610 if (st_debug & ST_OPENSTAT) 611 prtmodstat(&mode); 612 #endif 613 614 if (stat == STS_CHECKCOND) { 615 stxsense(ctlr, slave, unit, sc); 616 #ifdef DEBUG 617 if (st_debug & ST_OPEN) 618 dumpxsense(xsense); 619 #endif 620 } 621 if (stat) 622 return(EIO); 623 624 if ((flag & FWRITE) && mode.md.wp) { 625 uprintf("st:%d write protected\n", UNIT(dev)); 626 return(EACCES); 627 } 628 629 sc->sc_ctty = tprintf_open(p); 630 /* save total number of blocks on tape */ 631 sc->sc_numblks = mode.md.numblk2 << 16 | 632 mode.md.numblk1 << 8 | 633 mode.md.numblk0; 634 635 if (xsense->sc_xsense.eom && !(sc->sc_flags & STF_LEOT)) 636 sc->sc_filepos = 0; 637 #ifdef DEBUG 638 if (st_debug & ST_FMKS) 639 printf("st%d: open filepos = %d\n", UNIT(dev), sc->sc_filepos); 640 #endif 641 642 sc->sc_flags |= (STF_OPEN); 643 if (flag & FWRITE) 644 sc->sc_flags |= STF_WMODE; 645 sc->sc_flags &= ~STF_MOVED; 646 647 #ifdef TTI 648 /* make stats available, also lit up TTi display */ 649 sc->sc_tticntdwn = 100; 650 #endif 651 stxsense(ctlr, slave, unit, sc); 652 653 return(0); 654 } 655 656 /*ARGSUSED*/ 657 stclose(dev, flag) 658 dev_t dev; 659 int flag; 660 { 661 register struct st_softc *sc = &st_softc[UNIT(dev)]; 662 register int hit = 0; 663 664 if ((sc->sc_flags & (STF_WMODE|STF_WRTTN)) == (STF_WMODE|STF_WRTTN)) { 665 /* 666 * Cartridge tapes don't do double EOFs on EOT. 667 * We assume that variable-block devices use double EOF. 668 */ 669 stcommand(dev, MTWEOF, 1); 670 if (sc->sc_blklen == 0) { 671 stcommand(dev, MTWEOF, 1); 672 stcommand(dev, MTBSR, 1); 673 } 674 hit++; 675 } 676 if ((minor(dev) & STDEV_NOREWIND) == 0) { 677 stcommand(dev, MTREW, 1); 678 hit++; 679 } 680 #ifdef NOTDEF 681 /* wait until more stable before trying [XXX Needed ?] */ 682 if (!hit && (sc->sc_flags & SFT_WMODE)) 683 /* force out any any bufferd write data */ 684 stcommand(dev, MTFSR, 0); 685 #endif 686 /* make stats available */ 687 stxsense(sc->sc_dq.dq_ctlr, sc->sc_dq.dq_slave, sc->sc_punit, sc); 688 689 sc->sc_flags &= ~(STF_OPEN|STF_WMODE|STF_WRTTN); 690 tprintf_close(sc->sc_ctty); 691 return(0); /* XXX */ 692 } 693 694 ststrategy(bp) 695 register struct buf *bp; 696 { 697 struct buf *dp; 698 int unit, s; 699 700 unit = UNIT(bp->b_dev); 701 dp = &sttab[unit]; 702 bp->av_forw = NULL; 703 s = splbio(); 704 if (dp->b_actf == NULL) 705 dp->b_actf = bp; 706 else 707 dp->b_actl->av_forw = bp; 708 dp->b_actl = bp; 709 if (dp->b_active == 0) { 710 dp->b_active = 1; 711 stustart(unit); 712 } 713 splx(s); 714 } 715 716 stustart(unit) 717 int unit; 718 { 719 if (scsireq(&st_softc[unit].sc_dq)) 720 ststart(unit); 721 } 722 723 ststart(unit) 724 int unit; 725 { 726 struct hp_device *hp = st_softc[unit].sc_hd; 727 728 if (scsiustart(hp->hp_ctlr)) 729 stgo(unit); 730 } 731 732 stgo(unit) 733 int unit; 734 { 735 register struct st_softc *sc = &st_softc[unit]; 736 register struct scsi_fmt_cdb *cmd; 737 register struct buf *bp = sttab[unit].b_actf; 738 struct hp_device *hp = sc->sc_hd; 739 int pad, stat; 740 long nblks; 741 742 if (sc->sc_flags & STF_CMD) { 743 cmd = &stcmd[unit]; 744 pad = 0; 745 } else { 746 cmd = bp->b_flags & B_READ ? &st_read_cmd : &st_write_cmd; 747 if (sc->sc_blklen) 748 cmd->cdb[1] |= 0x01; /* fixed mode */ 749 else 750 cmd->cdb[1] &= 0xfe; 751 if (bp->b_flags & B_READ) 752 sc->sc_flags &= ~STF_WRTTN; 753 else 754 sc->sc_flags |= STF_WRTTN; 755 756 if (sc->sc_blklen) { /* fixed mode */ 757 nblks = bp->b_bcount / sc->sc_blklen; 758 if (bp->b_bcount % sc->sc_blklen) { 759 tprintf(sc->sc_ctty, 760 "st%d: I/O not block aligned %d/%ld\n", 761 unit, sc->sc_blklen, bp->b_bcount); 762 cmd->cdb[1] &= 0xfe; /* force error */ 763 } 764 } else /* variable len */ 765 nblks = bp->b_bcount; 766 767 *(u_char *)(&cmd->cdb[2]) = (u_char) (nblks >> 16); 768 *(u_char *)(&cmd->cdb[3]) = (u_char) (nblks >> 8); 769 *(u_char *)(&cmd->cdb[4]) = (u_char) nblks; 770 /* 771 * Always Zero. We are either writing in variable 772 * length mode we are writing in fixed block mode, 773 * or we are going to do odd length IO and are not 774 * going to use DMA. 775 */ 776 pad = 0; 777 } 778 779 #ifdef DEBUG 780 if (st_debug & ST_GO) 781 printf("stgo: cmd len %d [0]0x%x [1]0x%x [2]0x%x [3]0x%x [4]0x%x [5]0x%x\n", 782 cmd->len, cmd->cdb[0], cmd->cdb[1], cmd->cdb[2], 783 cmd->cdb[3], cmd->cdb[4], cmd->cdb[5]); 784 #endif 785 786 sc->sc_flags |= STF_MOVED; 787 if (bp->b_bcount & 1) { 788 #ifdef DEBUG 789 if (st_debug & ST_ODDIO) 790 printf("stgo%d: odd count %d using manual transfer\n", 791 unit, bp->b_bcount); 792 #endif 793 stat = scsi_tt_oddio(hp->hp_ctlr, hp->hp_slave, sc->sc_punit, 794 bp->b_un.b_addr, bp->b_bcount, 795 bp->b_flags, 1); 796 if (stat == 0) { 797 bp->b_resid = 0; 798 stfinish(unit, sc, bp); 799 } 800 } else 801 stat = scsigo(hp->hp_ctlr, hp->hp_slave, sc->sc_punit, 802 bp, cmd, pad); 803 if (stat) { 804 bp->b_error = EIO; 805 bp->b_flags |= B_ERROR; 806 stxsense(sc->sc_dq.dq_ctlr, sc->sc_dq.dq_slave, 807 sc->sc_punit, sc); 808 sterror(unit, sc, stat); 809 stfinish(unit, sc, bp); 810 } 811 } 812 813 stfinish(unit, sc, bp) 814 int unit; 815 struct st_softc *sc; 816 struct buf *bp; 817 { 818 sttab[unit].b_errcnt = 0; 819 sttab[unit].b_actf = bp->b_actf; 820 iodone(bp); 821 scsifree(&sc->sc_dq); 822 if (sttab[unit].b_actf) 823 stustart(unit); 824 else 825 sttab[unit].b_active = 0; 826 } 827 828 stread(dev, uio) 829 dev_t dev; 830 struct uio *uio; 831 { 832 int unit = UNIT(dev); 833 834 return(physio(ststrategy, &stbuf[unit], dev, B_READ, minphys, uio)); 835 } 836 837 stwrite(dev, uio) 838 dev_t dev; 839 struct uio *uio; 840 { 841 int unit = UNIT(dev); 842 843 return(physio(ststrategy, &stbuf[unit], dev, B_WRITE, minphys, uio)); 844 } 845 846 /*ARGSUSED*/ 847 stdump(dev) 848 dev_t dev; 849 { 850 return(ENXIO); 851 } 852 853 /*ARGSUSED*/ 854 stioctl(dev, cmd, data, flag) 855 dev_t dev; 856 int cmd; 857 caddr_t data; 858 int flag; 859 { 860 register struct st_softc *sc = &st_softc[UNIT(dev)]; 861 register int cnt; 862 register struct mtget *mtget; 863 register struct st_xsense *xp = &st_xsense[UNIT(dev)]; 864 register struct mtop *op; 865 long resid; 866 867 switch (cmd) { 868 869 /* tape operation */ 870 case MTIOCTOP: 871 op = (struct mtop *)data; 872 switch (op->mt_op) { 873 874 case MTBSR: 875 case MTFSR: 876 if (sc->sc_tapeid == MT_ISAR) 877 return(ENXIO); 878 case MTWEOF: 879 case MTFSF: 880 case MTBSF: 881 cnt = (int)op->mt_count; 882 break; 883 884 case MTREW: 885 case MTOFFL: 886 cnt = 1; 887 break; 888 889 case MTNOP: 890 return(0); 891 default: 892 return(EINVAL); 893 } 894 if (cnt <= 0) 895 return(EINVAL); 896 stcommand(dev, (u_int)op->mt_op, cnt); 897 break; 898 899 /* drive status */ 900 case MTIOCGET: 901 mtget = (struct mtget *)data; 902 stxsense(sc->sc_dq.dq_ctlr, sc->sc_dq.dq_slave, 903 sc->sc_punit, sc); 904 mtget->mt_type = sc->sc_tapeid; 905 mtget->mt_dsreg = 0; 906 mtget->mt_erreg = ((xp->sc_xsense.valid << 15) | 907 (xp->sc_xsense.filemark << 14) | 908 (xp->sc_xsense.eom << 13) | 909 (xp->sc_xsense.ili << 12) | 910 (xp->sc_xsense.key << 8)); 911 912 if (sc->sc_tapeid == MT_ISEXABYTE) { 913 mtget->mt_dsreg = sc->sc_flags; 914 resid = (xp->exb_xsense.tplft2 << 16 | 915 xp->exb_xsense.tplft1 << 8 | 916 xp->exb_xsense.tplft0); 917 mtget->mt_resid = resid / 1000; 918 mtget->mt_erreg |= (((xp->exb_xsense.rwerrcnt2 << 16 | 919 xp->exb_xsense.rwerrcnt1 << 8 | 920 xp->exb_xsense.rwerrcnt0) * 100) / 921 (sc->sc_numblks - resid)) & 0xff; 922 } else if (xp->sc_xsense.valid) { 923 resid = ((xp->sc_xsense.info1 << 24) | 924 (xp->sc_xsense.info2 << 16) | 925 (xp->sc_xsense.info3 << 8) | 926 (xp->sc_xsense.info4)); 927 if (sc->sc_blklen) /* if fixed mode */ 928 resid *= sc->sc_blklen; 929 mtget->mt_resid = resid; 930 } else 931 mtget->mt_resid = 0; 932 break; 933 934 default: 935 return(ENXIO); 936 } 937 return(0); 938 } 939 940 stintr(unit, stat) 941 int unit, stat; 942 { 943 register struct st_softc *sc = &st_softc[unit]; 944 register struct st_xsense *xp = &st_xsense[unit]; 945 register struct buf *bp = sttab[unit].b_actf; 946 struct hp_device *hp = sc->sc_hd; 947 948 #ifdef DEBUG 949 if (bp == NULL) { 950 printf("st%d: bp == NULL\n", unit); 951 return; 952 } 953 #endif 954 switch (stat) { 955 /* scsi command completed ok */ 956 case 0: 957 bp->b_resid = 0; 958 break; 959 960 /* more status */ 961 case STS_CHECKCOND: 962 stxsense(sc->sc_dq.dq_ctlr, sc->sc_dq.dq_slave, 963 sc->sc_punit, sc); 964 if (xp->sc_xsense.valid) { 965 bp->b_resid = (u_long)((xp->sc_xsense.info1 << 24) | 966 (xp->sc_xsense.info2 << 16) | 967 (xp->sc_xsense.info3 << 8) | 968 (xp->sc_xsense.info4)); 969 if (sc->sc_blklen) /* fixed mode */ 970 bp->b_resid *= sc->sc_blklen; 971 } 972 if (xp->sc_xsense.filemark) { 973 sc->sc_filepos++; 974 break; 975 } 976 if (xp->sc_xsense.key != XSK_NOSENCE 977 && xp->sc_xsense.key != XSK_NOTUSED1 978 && xp->sc_xsense.key != XSK_NOTUSEDC 979 && xp->sc_xsense.key != XSK_NOTUSEDE) { 980 sterror(unit, sc, stat); 981 bp->b_flags |= B_ERROR; 982 bp->b_error = EIO; 983 break; 984 } 985 if (xp->sc_xsense.ili) { 986 /* 987 * Fixed length blocks, an error. 988 */ 989 if (sc->sc_blklen) { 990 tprintf(sc->sc_ctty, 991 "st%d: Incorrect Length Indicator, blkcnt diff %d\n", 992 unit, sc->sc_blklen - bp->b_resid); 993 bp->b_flags |= B_ERROR; 994 bp->b_error = EIO; 995 break; 996 } 997 /* 998 * Variable length but read more than requested, 999 * an error. (XXX ??? wrong for 9 track?) 1000 */ 1001 if (bp->b_resid < 0) { 1002 bp->b_resid = 0; 1003 bp->b_flags |= B_ERROR; 1004 bp->b_error = ENOMEM; 1005 break; 1006 } 1007 /* 1008 * Variable length and odd, may require special 1009 * handling. 1010 */ 1011 if (bp->b_resid & 1 && (sc->sc_tapeid != MT_ISAR)) { 1012 /* 1013 * Normal behavior, treat as an error. 1014 */ 1015 if (!st_dmaoddretry) { 1016 tprintf(sc->sc_ctty, 1017 "st%d: Odd length read %d\n", 1018 UNIT(bp->b_dev), 1019 bp->b_bcount - bp->b_resid); 1020 bp->b_error = EIO; 1021 bp->b_flags |= B_ERROR; 1022 break; 1023 } 1024 /* 1025 * Attempt to back up and re-read using oddio. 1026 */ 1027 #ifdef DEBUG 1028 if (st_debug & ST_ODDIO) 1029 printf("st%d: stintr odd count %d, do BSR then oddio\n", 1030 UNIT(bp->b_dev), 1031 bp->b_bcount - bp->b_resid); 1032 #endif 1033 stat = scsi_tt_oddio(hp->hp_ctlr, hp->hp_slave, 1034 sc->sc_punit, 0, -1, 0, 0); 1035 if (stat == 0) 1036 stat = scsi_tt_oddio(hp->hp_ctlr, 1037 hp->hp_slave, 1038 sc->sc_punit, 1039 bp->b_un.b_addr, 1040 bp->b_bcount - bp->b_resid, 1041 bp->b_flags, 0); 1042 if (stat) { 1043 bp->b_error = EIO; 1044 bp->b_flags |= B_ERROR; 1045 stxsense(sc->sc_dq.dq_ctlr, sc->sc_dq.dq_slave, 1046 sc->sc_punit, sc); 1047 sterror(unit, sc, stat); 1048 } 1049 } 1050 break; 1051 } 1052 if (xp->sc_xsense.eom) { 1053 bp->b_flags |= B_ERROR; 1054 bp->b_error = ENOSPC; 1055 break; 1056 } 1057 tprintf(sc->sc_ctty, "st%d: unknown scsi error\n", unit); 1058 bp->b_flags |= B_ERROR; 1059 bp->b_error = EIO; 1060 break; 1061 1062 default: 1063 printf("st%d: stintr unknown stat 0x%x\n", unit, stat); 1064 break; 1065 } 1066 #ifdef DEBUG 1067 if ((st_debug & ST_BRESID) && bp->b_resid != 0) 1068 printf("b_resid %d b_flags 0x%x b_error 0x%x\n", 1069 bp->b_resid, bp->b_flags, bp->b_error); 1070 #endif 1071 /* asked for more filemarks then on tape */ 1072 if (bp->b_resid != 0 && 1073 (sc->sc_flags & STF_CMD) && sc->sc_cmd == CMD_SPACE) { 1074 sc->sc_filepos -= bp->b_resid; 1075 if (sc->sc_filepos < 0) 1076 sc->sc_filepos = 0; 1077 } 1078 1079 #ifdef TTI 1080 if (st_extti & (1<<unit) && 1081 sc->sc_type == MT_ISEXABYTE) /* to make display lit up */ 1082 /* 1083 * XXX severe performance penality for this. 1084 * Try and throttle by not calling stxsense on every intr. 1085 * Mostly for TTi we, get a stxsense call in open and close. 1086 */ 1087 if (sc->sc_tticntdwn-- == 0) { 1088 stxsense(sc->sc_dq.dq_ctlr, sc->sc_dq.dq_slave, 1089 sc->sc_punit, sc); 1090 sc->sc_tticntdwn = 100; 1091 } 1092 #endif 1093 1094 stfinish(unit, sc, bp); 1095 } 1096 1097 stcommand(dev, command, cnt) 1098 dev_t dev; 1099 u_int command; 1100 int cnt; 1101 { 1102 register struct st_softc *sc = &st_softc[UNIT(dev)]; 1103 register struct buf *bp = &stbuf[UNIT(dev)]; 1104 register struct scsi_fmt_cdb *cmd = &stcmd[UNIT(dev)]; 1105 register cmdcnt; 1106 int s; 1107 1108 cmd->len = 6; /* all tape commands are cdb6 */ 1109 cmd->cdb[1] = sc->sc_punit; 1110 cmd->cdb[2] = cmd->cdb[3] = cmd->cdb[4] = cmd->cdb[5] = 0; 1111 cmdcnt = 0; 1112 1113 /* 1114 * XXX Assumption is that everything except Archive can take 1115 * repeat count in cdb block. 1116 */ 1117 switch (command) { 1118 case MTWEOF: 1119 cmd->cdb[0] = CMD_WRITE_FILEMARK; 1120 if (sc->sc_tapeid != MT_ISAR) { 1121 cmdcnt = cnt; 1122 cnt = 1; 1123 } else 1124 cmdcnt = 1; 1125 *(u_char *)(&cmd->cdb[2]) = (u_char) (cmdcnt >> 16); 1126 *(u_char *)(&cmd->cdb[3]) = (u_char) (cmdcnt >> 8); 1127 *(u_char *)(&cmd->cdb[4]) = (u_char) cmdcnt; 1128 1129 if (sc->sc_tapeid == MT_ISEXABYTE && 1130 (minor(dev) & STDEV_EXSFMK)) /* short filemarks */ 1131 cmd->cdb[5] |= 0x80; 1132 else 1133 cmd->cdb[5] &= 0x7f; 1134 break; 1135 case MTBSF: 1136 /* Archive can't back up, will not get to BSR case */ 1137 if (sc->sc_tapeid == MT_ISAR) { 1138 if ((sc->sc_filepos - cnt) < 0) { 1139 stcommand(dev, MTREW, 1); 1140 return; 1141 } 1142 cmdcnt = sc->sc_filepos - cnt + 1; 1143 stcommand(dev, MTREW, 1); 1144 stcommand(dev, MTFSF, cmdcnt); 1145 return; 1146 } 1147 case MTBSR: 1148 case MTFSR: 1149 case MTFSF: 1150 if (command == MTBSF || command == MTBSR) 1151 cnt = cnt * (-1); /* backward move */ 1152 if (command == MTFSF || command == MTBSF) 1153 cmd->cdb[1] |= 0x01; /* filemarks */ 1154 else 1155 cmd->cdb[1] |= 0x00; /* logical blocks */ 1156 if (sc->sc_tapeid != MT_ISAR) { 1157 cmdcnt = cnt; 1158 cnt = 1; 1159 } else 1160 cmdcnt = 1; 1161 *(u_char *)(&cmd->cdb[2]) = (u_char) (cmdcnt >> 16); 1162 *(u_char *)(&cmd->cdb[3]) = (u_char) (cmdcnt >> 8); 1163 *(u_char *)(&cmd->cdb[4]) = (u_char) cmdcnt; 1164 cmd->cdb[0] = CMD_SPACE; 1165 break; 1166 case MTREW: 1167 cmd->cdb[0] = CMD_REWIND; 1168 sc->sc_filepos = 0; 1169 break; 1170 case MTOFFL: 1171 cmd->cdb[0] = CMD_LOADUNLOAD; 1172 sc->sc_filepos = 0; 1173 break; 1174 default: 1175 printf("st%d: stcommand bad command 0x%x\n", 1176 UNIT(dev), command); 1177 } 1178 1179 sc->sc_flags |= STF_CMD; 1180 sc->sc_cmd = cmd->cdb[0]; 1181 1182 sc->sc_bp = bp; 1183 again: 1184 #ifdef DEBUG 1185 if (st_debug & ST_FMKS) 1186 printf("st%d: stcommand filepos %d cmdcnt %d cnt %d\n", 1187 UNIT(dev), sc->sc_filepos, cmdcnt, cnt); 1188 #endif 1189 s = splbio(); 1190 while (bp->b_flags & B_BUSY) { 1191 if (bp->b_flags & B_DONE) 1192 break; 1193 bp->b_flags |= B_WANTED; 1194 sleep((caddr_t)bp, PRIBIO); 1195 } 1196 bp->b_flags = B_BUSY|B_READ; 1197 splx(s); 1198 bp->b_dev = dev; 1199 bp->b_bcount = 0; 1200 bp->b_resid = 0; 1201 bp->b_blkno = 0; 1202 bp->b_error = 0; 1203 ststrategy(bp); 1204 iowait(bp); 1205 if (bp->b_flags & B_WANTED) 1206 wakeup((caddr_t)bp); 1207 bp->b_flags &= B_ERROR; 1208 1209 if (command == MTWEOF || command == MTFSF || command == MTBSF) 1210 sc->sc_filepos += cmdcnt; 1211 1212 if (--cnt > 0) 1213 goto again; 1214 1215 sc->sc_flags |= STF_MOVED; 1216 sc->sc_flags &= ~(STF_CMD|STF_WRTTN); 1217 } 1218 1219 sterror(unit, sc, stat) 1220 int unit, stat; 1221 struct st_softc *sc; 1222 { 1223 /* stxsense must have been called before sterror() */ 1224 if (stat & STS_CHECKCOND) 1225 prtkey(unit, sc); 1226 else if (stat) 1227 tprintf(sc->sc_ctty, 1228 "st%d: bad scsi status 0x%x\n", unit, stat); 1229 1230 if ((sc->sc_flags & STF_CMD) && sc->sc_cmd == CMD_SPACE) /* fsf */ 1231 sc->sc_filepos--; 1232 } 1233 1234 stxsense(ctlr, slave, unit, sc) 1235 int ctlr, slave, unit; 1236 struct st_softc *sc; 1237 { 1238 u_char *sensebuf; 1239 unsigned len; 1240 1241 sensebuf = (u_char *)&st_xsense[sc->sc_dq.dq_unit]; 1242 len = sc->sc_datalen[CMD_REQUEST_SENSE]; 1243 scsi_request_sense(ctlr, slave, unit, sensebuf, len); 1244 } 1245 1246 prtkey(unit, sc) 1247 int unit; 1248 struct st_softc *sc; 1249 { 1250 register struct st_xsense *xp = &st_xsense[unit]; 1251 1252 switch (xp->sc_xsense.key) { 1253 case XSK_NOSENCE: 1254 break; 1255 case XSK_NOTUSED1: 1256 case XSK_NOTUSEDC: 1257 case XSK_NOTUSEDE: 1258 break; 1259 case XSK_REVERVED: 1260 tprintf(sc->sc_ctty, "st%d: Reserved sense key 0x%x\n", 1261 unit, xp->sc_xsense.key); 1262 break; 1263 case XSK_NOTRDY: 1264 tprintf(sc->sc_ctty, "st%d: NOT READY\n", unit); 1265 break; 1266 case XSK_MEDERR: 1267 tprintf(sc->sc_ctty, "st%d: MEDIUM ERROR\n", unit); 1268 break; 1269 case XSK_HRDWERR: 1270 tprintf(sc->sc_ctty, "st%d: HARDWARE ERROR\n", unit); 1271 break; 1272 case XSK_ILLREQ: 1273 tprintf(sc->sc_ctty, "st%d: ILLEGAL REQUEST\n", unit); 1274 break; 1275 case XSK_UNTATTEN: 1276 tprintf(sc->sc_ctty, "st%d: UNIT ATTENTION\n", unit); 1277 break; 1278 case XSK_DATAPROT: 1279 tprintf(sc->sc_ctty, "st%d: DATA PROTECT\n", unit); 1280 break; 1281 case XSK_BLNKCHK: 1282 tprintf(sc->sc_ctty, "st%d: BLANK CHECK\n", unit); 1283 break; 1284 case XSK_VENDOR: 1285 tprintf(sc->sc_ctty, "st%d: VENDER UNIQUE SENSE KEY ", unit); 1286 switch (sc->sc_tapeid) { 1287 case MT_ISEXABYTE: 1288 tprintf(sc->sc_ctty, "Exabyte: "); 1289 if (xp->exb_xsense.xfr) 1290 tprintf(sc->sc_ctty, 1291 "Transfer Abort Error\n"); 1292 if (xp->exb_xsense.tmd) 1293 tprintf(sc->sc_ctty, 1294 "Tape Mark Detect Error\n"); 1295 break; 1296 default: 1297 tprintf(sc->sc_ctty, "\n"); 1298 } 1299 break; 1300 case XSK_CPYABORT: 1301 tprintf(sc->sc_ctty, "st%d: COPY ABORTED\n", unit); 1302 break; 1303 case XSK_ABORTCMD: 1304 tprintf(sc->sc_ctty, "st%d: ABORTED COMMAND\n", unit); 1305 break; 1306 case XSK_VOLOVER: 1307 tprintf(sc->sc_ctty, "st%d: VOLUME OVERFLOW\n", unit); 1308 break; 1309 default: 1310 tprintf(sc->sc_ctty, "st%d: unknown sense key 0x%x\n", 1311 unit, xp->sc_xsense.key); 1312 } 1313 if (sc->sc_tapeid == MT_ISEXABYTE) { 1314 if (xp->exb_xsense.bpe) 1315 tprintf(sc->sc_ctty, "st%d: Bus Parity Errorn", unit); 1316 if (xp->exb_xsense.fpe) 1317 tprintf(sc->sc_ctty, 1318 "st%d: Formatted Buffer Parity Errorn", unit); 1319 if (xp->exb_xsense.eco) 1320 tprintf(sc->sc_ctty, "st%d: Error Counter Overflown", 1321 unit); 1322 if (xp->exb_xsense.tme) 1323 tprintf(sc->sc_ctty, "st%d: Tape Motion Errorn", unit); 1324 if (xp->exb_xsense.xfr) 1325 tprintf(sc->sc_ctty, "st%d: Transfer About Errorn", 1326 unit); 1327 if (xp->exb_xsense.tmd) 1328 tprintf(sc->sc_ctty, "st%d: Tape Mark Detect Errorn", 1329 unit); 1330 if (xp->exb_xsense.fmke) 1331 tprintf(sc->sc_ctty, "st%d: Filemark Errorn", unit); 1332 if (xp->exb_xsense.ure) 1333 tprintf(sc->sc_ctty, "st%d: Under Run Errorn", unit); 1334 if (xp->exb_xsense.sse) 1335 tprintf(sc->sc_ctty, "st%d: Servo System Errorn", 1336 unit); 1337 if (xp->exb_xsense.fe) 1338 tprintf(sc->sc_ctty, "st%d: Formatter Errorn", unit); 1339 if (xp->exb_xsense.wseb) 1340 tprintf(sc->sc_ctty, "st%d: WSEB Errorn", unit); 1341 if (xp->exb_xsense.wseo) 1342 tprintf(sc->sc_ctty, "st%d: WSEO Errorn", unit); 1343 } 1344 } 1345 1346 #ifdef DEBUG 1347 1348 dumpxsense(sensebuf) 1349 struct st_xsense *sensebuf; 1350 { 1351 struct st_xsense *xp = sensebuf; 1352 1353 printf("valid 0x%x errorclass 0x%x errorcode 0x%x\n", 1354 xp->sc_xsense.valid, 1355 xp->sc_xsense.class, xp->sc_xsense.code); 1356 printf("seg number 0x%x\n", xp->sc_xsense.segment); 1357 printf("FMK 0x%x EOM 0x%x ILI 0x%x RSVD 0x%x sensekey 0x%x\n", 1358 xp->sc_xsense.filemark, xp->sc_xsense.eom, xp->sc_xsense.ili, 1359 xp->sc_xsense.rsvd, xp->sc_xsense.key); 1360 printf("info 0x%lx\n", 1361 (u_long)((xp->sc_xsense.info1<<24)|(xp->sc_xsense.info2<<16)| 1362 (xp->sc_xsense.info3<<8)|(xp->sc_xsense.info4)) ); 1363 printf("ASenseL 0x%x\n", xp->sc_xsense.len); 1364 1365 if (xp->sc_xsense.len != 0x12) /* MT_ISEXB Exabyte only ?? */ 1366 return; /* What about others */ 1367 1368 printf("ASenseC 0x%x\n", xp->exb_xsense.addsens); 1369 printf("AsenseQ 0x%x\n", xp->exb_xsense.addsensq); 1370 printf("R/W Errors 0x%lx\n", 1371 (u_long)((xp->exb_xsense.rwerrcnt2<<16)| 1372 (xp->exb_xsense.rwerrcnt1<<8)| 1373 (xp->exb_xsense.rwerrcnt1)) ); 1374 printf("PF 0x%x BPE 0x%x FPE 0x%x ME 0x%x ECO 0x%x TME 0x%x TNP 0x%x BOT 0x%x\n", 1375 xp->exb_xsense.pf, xp->exb_xsense.bpe, xp->exb_xsense.fpe, 1376 xp->exb_xsense.me, xp->exb_xsense.eco, xp->exb_xsense.tme, 1377 xp->exb_xsense.tnp, xp->exb_xsense.bot); 1378 printf("XFR 0x%x TMD 0x%x WP 0x%x FMKE 0x%x URE 0x%x WE1 0x%x SSE 0x%x FE 0x%x\n", 1379 xp->exb_xsense.xfr, xp->exb_xsense.tmd, xp->exb_xsense.wp, 1380 xp->exb_xsense.fmke, xp->exb_xsense.ure, xp->exb_xsense.we1, 1381 xp->exb_xsense.sse, xp->exb_xsense.fe); 1382 printf("WSEB 0x%x WSEO 0x%x\n", 1383 xp->exb_xsense.wseb, xp->exb_xsense.wseo); 1384 printf("Remaining Tape 0x%lx\n", 1385 (u_long)((xp->exb_xsense.tplft2<<16)| 1386 (xp->exb_xsense.tplft1<<8)| 1387 (xp->exb_xsense.tplft0)) ); 1388 } 1389 1390 prtmodsel(msd, modlen) 1391 struct mode_select_data *msd; 1392 int modlen; 1393 { 1394 printf("Modsel command. len is 0x%x.\n", modlen); 1395 printf("rsvd1 0x%x rsvd2 0x%x rsvd3 0x%x bufferd 0x%x speed 0x%x bckdeslen 0x%x\n", 1396 msd->rsvd1,msd->rsvd2,msd->rsvd3,msd->buff,msd->speed,msd->blkdeslen); 1397 printf("density 0x%x blks2 0x%x blks1 0x%x blks0 0x%x rsvd 0x%x blklen2 0x%x blklen1 0x%x blklen0 0x%x\n", 1398 msd->density,msd->blks2,msd->blks1,msd->blks0,msd->rsvd4,msd->blklen2,msd->blklen1,msd->blklen0); 1399 printf("vupb 0x%x rsvd 0x%x p5 0x%x motionthres 0x%x reconthres 0x%x gapthres 0x%x \n", 1400 msd->vupb,msd->rsvd5,msd->p5,msd->motionthres,msd->reconthres,msd->gapthres); 1401 } 1402 1403 prtmodstat(mode) 1404 struct mode_sense *mode; 1405 { 1406 printf("Mode Status\n"); 1407 printf("sdl 0x%x medtype 0x%x wp 0x%x bfmd 0x%x speed 0x%x bdl 0x%x\n", 1408 mode->md.sdl, mode->md.medtype, mode->md.wp, mode->md.bfmd, 1409 mode->md.speed, mode->md.bdl); 1410 printf("dencod 0x%x numblk 0x%x blklen 0x%x\n", 1411 mode->md.dencod, 1412 (mode->md.numblk2<<16)|(mode->md.numblk1<<8)|(mode->md.numblk0), 1413 (mode->md.blklen2<<16)|(mode->md.blklen1<<8)|(mode->md.blklen0) ); 1414 printf("ct 0x%x nd 0x%x nbe 0x%x edb 0x%x pe 0x%x nal 0x%x p5 0x%x\n", 1415 mode->ex.ct, mode->ex.nd, mode->ex.nbe, 1416 mode->ex.ebd, mode->ex.pe, mode->ex.nal, mode->ex.p5); 1417 printf("motionthres 0x%x reconthres 0x%x gapthres 0x%x\n", 1418 mode->ex.motionthres, mode->ex.reconthres, mode->ex.gapthres); 1419 } 1420 #endif /* DEBUG */ 1421 1422 #endif 1423