Annotation of Net2/arch/hp300/dev/st.c, revision 1.1.1.2

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

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.