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