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