Home | History | Annotate | Line # | Download | only in dev
ct.c revision 1.26.2.2
      1  1.26.2.2  jdolecek /*	$NetBSD: ct.c,v 1.26.2.2 2002/06/23 17:36:05 jdolecek Exp $	*/
      2      1.22   thorpej 
      3      1.22   thorpej /*-
      4      1.22   thorpej  * Copyright (c) 1996, 1997 The NetBSD Foundation, Inc.
      5      1.22   thorpej  * All rights reserved.
      6      1.22   thorpej  *
      7      1.22   thorpej  * This code is derived from software contributed to The NetBSD Foundation
      8      1.22   thorpej  * by Jason R. Thorpe.
      9      1.22   thorpej  *
     10      1.22   thorpej  * Redistribution and use in source and binary forms, with or without
     11      1.22   thorpej  * modification, are permitted provided that the following conditions
     12      1.22   thorpej  * are met:
     13      1.22   thorpej  * 1. Redistributions of source code must retain the above copyright
     14      1.22   thorpej  *    notice, this list of conditions and the following disclaimer.
     15      1.22   thorpej  * 2. Redistributions in binary form must reproduce the above copyright
     16      1.22   thorpej  *    notice, this list of conditions and the following disclaimer in the
     17      1.22   thorpej  *    documentation and/or other materials provided with the distribution.
     18      1.22   thorpej  * 3. All advertising materials mentioning features or use of this software
     19      1.22   thorpej  *    must display the following acknowledgement:
     20      1.22   thorpej  *	This product includes software developed by the NetBSD
     21      1.22   thorpej  *	Foundation, Inc. and its contributors.
     22      1.22   thorpej  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23      1.22   thorpej  *    contributors may be used to endorse or promote products derived
     24      1.22   thorpej  *    from this software without specific prior written permission.
     25      1.22   thorpej  *
     26      1.22   thorpej  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27      1.22   thorpej  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28      1.22   thorpej  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29      1.22   thorpej  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30      1.22   thorpej  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31      1.22   thorpej  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32      1.22   thorpej  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33      1.22   thorpej  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34      1.22   thorpej  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35      1.22   thorpej  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36      1.22   thorpej  * POSSIBILITY OF SUCH DAMAGE.
     37      1.22   thorpej  */
     38       1.9       cgd 
     39       1.1       cgd /*
     40       1.8   mycroft  * Copyright (c) 1982, 1990, 1993
     41       1.8   mycroft  *	The Regents of the University of California.  All rights reserved.
     42       1.1       cgd  *
     43       1.1       cgd  * Redistribution and use in source and binary forms, with or without
     44       1.1       cgd  * modification, are permitted provided that the following conditions
     45       1.1       cgd  * are met:
     46       1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     47       1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     48       1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     49       1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     50       1.1       cgd  *    documentation and/or other materials provided with the distribution.
     51       1.1       cgd  * 3. All advertising materials mentioning features or use of this software
     52       1.1       cgd  *    must display the following acknowledgement:
     53       1.1       cgd  *	This product includes software developed by the University of
     54       1.1       cgd  *	California, Berkeley and its contributors.
     55       1.1       cgd  * 4. Neither the name of the University nor the names of its contributors
     56       1.1       cgd  *    may be used to endorse or promote products derived from this software
     57       1.1       cgd  *    without specific prior written permission.
     58       1.1       cgd  *
     59       1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     60       1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     61       1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     62       1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     63       1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     64       1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     65       1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     66       1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     67       1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     68       1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     69       1.1       cgd  * SUCH DAMAGE.
     70       1.1       cgd  *
     71       1.9       cgd  *	@(#)ct.c	8.2 (Berkeley) 1/12/94
     72       1.1       cgd  */
     73       1.1       cgd 
     74       1.1       cgd /*
     75       1.1       cgd  * CS80 cartridge tape driver (9144, 88140, 9145)
     76       1.1       cgd  *
     77       1.1       cgd  * Reminder:
     78       1.1       cgd  *	C_CC bit (character count option) when used in the CS/80 command
     79       1.1       cgd  *	'set options' will cause the tape not to stream.
     80       1.1       cgd  *
     81       1.1       cgd  * TODO:
     82       1.1       cgd  *	make filesystem compatible
     83       1.1       cgd  *	make block mode work according to mtio(4) spec. (if possible)
     84       1.1       cgd  *	merge with cs80 disk driver
     85       1.1       cgd  *	finish support of 9145
     86       1.1       cgd  */
     87  1.26.2.2  jdolecek 
     88  1.26.2.2  jdolecek #include <sys/cdefs.h>
     89  1.26.2.2  jdolecek __KERNEL_RCSID(0, "$NetBSD: ct.c,v 1.26.2.2 2002/06/23 17:36:05 jdolecek Exp $");
     90       1.1       cgd 
     91       1.6   mycroft #include <sys/param.h>
     92      1.20    scottr #include <sys/systm.h>
     93       1.6   mycroft #include <sys/buf.h>
     94      1.20    scottr #include <sys/conf.h>
     95      1.20    scottr #include <sys/device.h>
     96       1.6   mycroft #include <sys/ioctl.h>
     97       1.6   mycroft #include <sys/mtio.h>
     98      1.20    scottr #include <sys/proc.h>
     99       1.6   mycroft #include <sys/tprintf.h>
    100      1.19   thorpej 
    101      1.19   thorpej #include <hp300/dev/hpibvar.h>
    102       1.1       cgd 
    103       1.6   mycroft #include <hp300/dev/ctreg.h>
    104       1.1       cgd 
    105       1.1       cgd /* number of eof marks to remember */
    106       1.1       cgd #define EOFS	128
    107       1.1       cgd 
    108       1.1       cgd struct	ct_softc {
    109      1.19   thorpej 	struct	device sc_dev;
    110      1.19   thorpej 	int	sc_slave;		/* HP-IB slave ID */
    111      1.19   thorpej 	int	sc_punit;		/* physical unit */
    112       1.1       cgd 	struct	ct_iocmd sc_ioc;
    113       1.1       cgd 	struct	ct_rscmd sc_rsc;
    114       1.1       cgd 	struct	ct_stat sc_stat;
    115       1.1       cgd 	struct	ct_ssmcmd sc_ssmc;
    116       1.1       cgd 	struct	ct_srcmd sc_src;
    117       1.1       cgd 	struct	ct_soptcmd sc_soptc;
    118       1.1       cgd 	struct	ct_ulcmd sc_ul;
    119       1.1       cgd 	struct	ct_wfmcmd sc_wfm;
    120       1.1       cgd 	struct	ct_clearcmd sc_clear;
    121      1.24   thorpej 	struct	buf_queue sc_tab;
    122      1.24   thorpej 	int	sc_active;
    123       1.1       cgd 	struct	buf *sc_bp;
    124      1.19   thorpej 	struct	buf sc_bufstore;	/* XXX */
    125       1.1       cgd 	int	sc_blkno;
    126       1.1       cgd 	int	sc_cmd;
    127       1.1       cgd 	int	sc_resid;
    128       1.1       cgd 	char	*sc_addr;
    129       1.1       cgd 	int	sc_flags;
    130       1.1       cgd 	short	sc_type;
    131       1.1       cgd 	tpr_t	sc_tpr;
    132      1.19   thorpej 	struct	hpibqueue sc_hq;	/* entry on hpib job queue */
    133       1.1       cgd 	int	sc_eofp;
    134       1.1       cgd 	int	sc_eofs[EOFS];
    135      1.19   thorpej };
    136       1.1       cgd 
    137       1.1       cgd /* flags */
    138       1.1       cgd #define	CTF_OPEN	0x01
    139       1.1       cgd #define	CTF_ALIVE	0x02
    140       1.1       cgd #define	CTF_WRT		0x04
    141       1.1       cgd #define	CTF_CMD		0x08
    142       1.1       cgd #define	CTF_IO		0x10
    143       1.1       cgd #define	CTF_BEOF	0x20
    144       1.1       cgd #define	CTF_AEOF	0x40
    145       1.1       cgd #define	CTF_EOT		0x80
    146       1.1       cgd #define	CTF_STATWAIT	0x100
    147       1.1       cgd #define CTF_CANSTREAM	0x200
    148       1.1       cgd #define	CTF_WRTTN	0x400
    149       1.1       cgd 
    150      1.19   thorpej int	ctmatch __P((struct device *, struct cfdata *, void *));
    151      1.19   thorpej void	ctattach __P((struct device *, struct device *, void *));
    152      1.19   thorpej 
    153      1.19   thorpej struct cfattach ct_ca = {
    154      1.19   thorpej 	sizeof(struct ct_softc), ctmatch, ctattach
    155      1.19   thorpej };
    156      1.19   thorpej 
    157      1.23   thorpej extern struct cfdriver ct_cd;
    158      1.19   thorpej 
    159      1.19   thorpej int	ctident __P((struct device *, struct ct_softc *,
    160      1.19   thorpej 	    struct hpibbus_attach_args *));
    161      1.19   thorpej 
    162      1.19   thorpej void	ctreset __P((struct ct_softc *));
    163      1.19   thorpej void	ctaddeof __P((struct ct_softc *));
    164      1.19   thorpej void	ctustart __P((struct ct_softc *));
    165      1.19   thorpej void	cteof __P((struct ct_softc *, struct buf *));
    166      1.19   thorpej void	ctdone __P((struct ct_softc *, struct buf *));
    167      1.19   thorpej 
    168      1.19   thorpej void	ctstart __P((void *));
    169      1.19   thorpej void	ctgo __P((void *));
    170      1.19   thorpej void	ctintr __P((void *));
    171      1.19   thorpej 
    172      1.19   thorpej void	ctcommand __P((dev_t, int, int));
    173      1.19   thorpej 
    174      1.19   thorpej cdev_decl(ct);
    175      1.19   thorpej bdev_decl(ct);
    176      1.19   thorpej 
    177       1.1       cgd struct	ctinfo {
    178       1.1       cgd 	short	hwid;
    179       1.1       cgd 	short	punit;
    180       1.1       cgd 	char	*desc;
    181       1.1       cgd } ctinfo[] = {
    182      1.20    scottr 	{ CT7946ID,	1,	"7946A"	},
    183      1.20    scottr 	{ CT7912PID,	1,	"7912P"	},
    184      1.20    scottr 	{ CT7914PID,	1,	"7914P"	},
    185      1.20    scottr 	{ CT9144ID,	0,	"9144"	},
    186      1.20    scottr 	{ CT9145ID,	0,	"9145"	},
    187      1.26    kleink 	{ CT35401ID,	0,	"35401A"},
    188       1.1       cgd };
    189       1.1       cgd int	nctinfo = sizeof(ctinfo) / sizeof(ctinfo[0]);
    190       1.1       cgd 
    191       1.1       cgd #define	CT_NOREW	4
    192       1.1       cgd #define	CT_STREAM	8
    193       1.1       cgd #define	UNIT(x)		(minor(x) & 3)
    194       1.1       cgd #define	ctpunit(x)	((x) & 7)
    195       1.1       cgd 
    196       1.1       cgd #ifdef DEBUG
    197       1.1       cgd int ctdebug = 0;
    198       1.1       cgd #define CDB_FILES	0x01
    199       1.1       cgd #define CT_BSF		0x02
    200       1.1       cgd #endif
    201       1.1       cgd 
    202      1.13   thorpej int
    203      1.19   thorpej ctmatch(parent, match, aux)
    204      1.19   thorpej 	struct device *parent;
    205      1.19   thorpej 	struct cfdata *match;
    206      1.19   thorpej 	void *aux;
    207       1.1       cgd {
    208      1.19   thorpej 	struct hpibbus_attach_args *ha = aux;
    209      1.13   thorpej 
    210      1.19   thorpej 	return (ctident(parent, NULL, ha));
    211      1.13   thorpej }
    212      1.13   thorpej 
    213      1.13   thorpej void
    214      1.19   thorpej ctattach(parent, self, aux)
    215      1.19   thorpej 	struct device *parent, *self;
    216      1.19   thorpej 	void *aux;
    217      1.19   thorpej {
    218      1.19   thorpej 	struct ct_softc *sc = (struct ct_softc *)self;
    219      1.19   thorpej 	struct hpibbus_attach_args *ha = aux;
    220      1.19   thorpej 
    221      1.19   thorpej 	if (ctident(parent, sc, ha) == 0) {
    222      1.19   thorpej 		printf("\n%s: didn't respond to describe command!\n",
    223      1.19   thorpej 		    sc->sc_dev.dv_xname);
    224      1.19   thorpej 		return;
    225      1.19   thorpej 	}
    226      1.19   thorpej 
    227      1.19   thorpej 	sc->sc_slave = ha->ha_slave;
    228      1.19   thorpej 	sc->sc_punit = ha->ha_punit;
    229      1.19   thorpej 
    230      1.24   thorpej 	BUFQ_INIT(&sc->sc_tab);
    231      1.13   thorpej 
    232      1.19   thorpej 	/* Initialize hpib job queue entry. */
    233      1.19   thorpej 	sc->sc_hq.hq_softc = sc;
    234      1.19   thorpej 	sc->sc_hq.hq_slave = sc->sc_slave;
    235      1.19   thorpej 	sc->sc_hq.hq_start = ctstart;
    236      1.19   thorpej 	sc->sc_hq.hq_go = ctgo;
    237      1.19   thorpej 	sc->sc_hq.hq_intr = ctintr;
    238      1.13   thorpej 
    239      1.19   thorpej 	ctreset(sc);
    240       1.1       cgd 	sc->sc_flags |= CTF_ALIVE;
    241       1.1       cgd }
    242       1.1       cgd 
    243      1.13   thorpej int
    244      1.19   thorpej ctident(parent, sc, ha)
    245      1.19   thorpej 	struct device *parent;
    246      1.19   thorpej 	struct ct_softc *sc;
    247      1.19   thorpej 	struct hpibbus_attach_args *ha;
    248       1.1       cgd {
    249       1.1       cgd 	struct ct_describe desc;
    250       1.1       cgd 	u_char stat, cmd[3];
    251       1.1       cgd 	char name[7];
    252      1.19   thorpej 	int i, id, n, type, canstream;
    253      1.19   thorpej 
    254      1.19   thorpej 	type = canstream = 0;
    255       1.1       cgd 
    256      1.19   thorpej 	/* Verify that we have a CS80 device. */
    257      1.19   thorpej 	if ((ha->ha_id & 0x200) == 0)
    258      1.19   thorpej 		return (0);
    259      1.19   thorpej 
    260      1.19   thorpej 	/* Is it one of the tapes we support? */
    261      1.19   thorpej 	for (id = 0; id < nctinfo; id++)
    262      1.19   thorpej 		if (ha->ha_id == ctinfo[id].hwid)
    263       1.1       cgd 			break;
    264      1.19   thorpej 	if (id == nctinfo)
    265      1.19   thorpej 		return (0);
    266      1.19   thorpej 
    267      1.19   thorpej 	ha->ha_punit = ctinfo[id].punit;
    268       1.1       cgd 
    269       1.1       cgd 	/*
    270      1.19   thorpej 	 * So far, so good.  Get drive parameters.  Note command
    271      1.19   thorpej 	 * is always issued to unit 0.
    272       1.1       cgd 	 */
    273       1.1       cgd 	cmd[0] = C_SUNIT(0);
    274       1.1       cgd 	cmd[1] = C_SVOL(0);
    275       1.1       cgd 	cmd[2] = C_DESC;
    276      1.19   thorpej 	hpibsend(parent->dv_unit, ha->ha_slave, C_CMD, cmd, sizeof(cmd));
    277      1.19   thorpej 	hpibrecv(parent->dv_unit, ha->ha_slave, C_EXEC, &desc, 37);
    278      1.19   thorpej 	hpibrecv(parent->dv_unit, ha->ha_slave, C_QSTAT, &stat, sizeof(stat));
    279      1.19   thorpej 
    280  1.26.2.1   thorpej 	memset(name, 0, sizeof(name));
    281      1.19   thorpej 	if (stat == 0) {
    282      1.19   thorpej 		n = desc.d_name;
    283       1.1       cgd 		for (i = 5; i >= 0; i--) {
    284       1.1       cgd 			name[i] = (n & 0xf) + '0';
    285       1.1       cgd 			n >>= 4;
    286       1.1       cgd 		}
    287       1.1       cgd 	}
    288      1.19   thorpej 
    289      1.19   thorpej 	switch (ha->ha_id) {
    290       1.1       cgd 	case CT7946ID:
    291  1.26.2.1   thorpej 		if (memcmp(name, "079450", 6) == 0)
    292      1.19   thorpej 			return (0);		/* not really a 7946 */
    293       1.1       cgd 		/* fall into... */
    294       1.1       cgd 	case CT9144ID:
    295       1.1       cgd 	case CT9145ID:
    296      1.26    kleink 	case CT35401ID:
    297      1.19   thorpej 		type = CT9144;
    298      1.19   thorpej 		canstream = 1;
    299       1.1       cgd 		break;
    300       1.1       cgd 
    301       1.1       cgd 	case CT7912PID:
    302       1.1       cgd 	case CT7914PID:
    303      1.19   thorpej 		type = CT88140;
    304       1.1       cgd 		break;
    305       1.1       cgd 	}
    306      1.19   thorpej 
    307      1.19   thorpej 	if (sc != NULL) {
    308      1.19   thorpej 		sc->sc_type = type;
    309      1.19   thorpej 		sc->sc_flags = canstream ? CTF_CANSTREAM : 0;
    310      1.17  christos 		printf(": %s %stape\n", ctinfo[id].desc,
    311      1.19   thorpej 		    canstream ? "streaming " : "");
    312      1.19   thorpej 	}
    313      1.19   thorpej 
    314      1.19   thorpej 	return (1);
    315       1.1       cgd }
    316       1.1       cgd 
    317      1.19   thorpej void
    318      1.19   thorpej ctreset(sc)
    319      1.19   thorpej 	struct ct_softc *sc;
    320       1.1       cgd {
    321      1.19   thorpej 	int ctlr, slave;
    322       1.1       cgd 	u_char stat;
    323       1.1       cgd 
    324      1.19   thorpej 	ctlr = sc->sc_dev.dv_parent->dv_unit;
    325      1.19   thorpej 	slave = sc->sc_slave;
    326      1.19   thorpej 
    327       1.1       cgd 	sc->sc_clear.unit = C_SUNIT(sc->sc_punit);
    328       1.1       cgd 	sc->sc_clear.cmd = C_CLEAR;
    329      1.19   thorpej 	hpibsend(ctlr, slave, C_TCMD, &sc->sc_clear, sizeof(sc->sc_clear));
    330      1.19   thorpej 	hpibswait(ctlr, slave);
    331      1.19   thorpej 	hpibrecv(ctlr, slave, C_QSTAT, &stat, sizeof(stat));
    332      1.19   thorpej 
    333       1.1       cgd 	sc->sc_src.unit = C_SUNIT(CTCTLR);
    334       1.1       cgd 	sc->sc_src.nop = C_NOP;
    335       1.1       cgd 	sc->sc_src.cmd = C_SREL;
    336       1.1       cgd 	sc->sc_src.param = C_REL;
    337      1.19   thorpej 	hpibsend(ctlr, slave, C_CMD, &sc->sc_src, sizeof(sc->sc_src));
    338      1.19   thorpej 	hpibswait(ctlr, slave);
    339      1.19   thorpej 	hpibrecv(ctlr, slave, C_QSTAT, &stat, sizeof(stat));
    340      1.19   thorpej 
    341       1.1       cgd 	sc->sc_ssmc.unit = C_SUNIT(sc->sc_punit);
    342       1.1       cgd 	sc->sc_ssmc.cmd = C_SSM;
    343       1.1       cgd 	sc->sc_ssmc.refm = REF_MASK;
    344       1.1       cgd 	sc->sc_ssmc.fefm = FEF_MASK;
    345       1.1       cgd 	sc->sc_ssmc.aefm = AEF_MASK;
    346       1.1       cgd 	sc->sc_ssmc.iefm = IEF_MASK;
    347      1.19   thorpej 	hpibsend(ctlr, slave, C_CMD, &sc->sc_ssmc, sizeof(sc->sc_ssmc));
    348      1.19   thorpej 	hpibswait(ctlr, slave);
    349      1.19   thorpej 	hpibrecv(ctlr, slave, C_QSTAT, &stat, sizeof(stat));
    350      1.19   thorpej 
    351       1.1       cgd 	sc->sc_soptc.unit = C_SUNIT(sc->sc_punit);
    352       1.1       cgd 	sc->sc_soptc.nop = C_NOP;
    353       1.1       cgd 	sc->sc_soptc.cmd = C_SOPT;
    354       1.1       cgd 	sc->sc_soptc.opt = C_SPAR;
    355      1.19   thorpej 	hpibsend(ctlr, slave, C_CMD, &sc->sc_soptc, sizeof(sc->sc_soptc));
    356      1.19   thorpej 	hpibswait(ctlr, slave);
    357      1.19   thorpej 	hpibrecv(ctlr, slave, C_QSTAT, &stat, sizeof(stat));
    358       1.1       cgd }
    359       1.1       cgd 
    360       1.1       cgd /*ARGSUSED*/
    361      1.19   thorpej int
    362       1.1       cgd ctopen(dev, flag, type, p)
    363       1.1       cgd 	dev_t dev;
    364       1.1       cgd 	int flag, type;
    365       1.1       cgd 	struct proc *p;
    366       1.1       cgd {
    367      1.19   thorpej 	struct ct_softc *sc;
    368       1.1       cgd 	u_char stat;
    369      1.19   thorpej 	int cc, ctlr, slave;
    370      1.19   thorpej 
    371      1.19   thorpej 	if (UNIT(dev) >= ct_cd.cd_ndevs ||
    372      1.19   thorpej 	    (sc = ct_cd.cd_devs[UNIT(dev)]) == NULL ||
    373      1.19   thorpej 	    (sc->sc_flags & CTF_ALIVE) == 0)
    374      1.19   thorpej 		return (ENXIO);
    375       1.1       cgd 
    376       1.1       cgd 	if (sc->sc_flags & CTF_OPEN)
    377      1.19   thorpej 		return (EBUSY);
    378      1.19   thorpej 
    379      1.19   thorpej 	ctlr = sc->sc_dev.dv_parent->dv_unit;
    380      1.19   thorpej 	slave = sc->sc_slave;
    381      1.19   thorpej 
    382       1.1       cgd 	sc->sc_soptc.unit = C_SUNIT(sc->sc_punit);
    383       1.1       cgd 	sc->sc_soptc.nop = C_NOP;
    384       1.1       cgd 	sc->sc_soptc.cmd = C_SOPT;
    385       1.1       cgd 	if ((dev & CT_STREAM) && (sc->sc_flags & CTF_CANSTREAM))
    386       1.1       cgd 		sc->sc_soptc.opt = C_SPAR | C_IMRPT;
    387       1.1       cgd 	else
    388       1.1       cgd 		sc->sc_soptc.opt = C_SPAR;
    389      1.19   thorpej 
    390       1.1       cgd 	/*
    391       1.1       cgd 	 * Check the return of hpibsend() and hpibswait().
    392       1.1       cgd 	 * Drive could be loading/unloading a tape. If not checked,
    393       1.1       cgd 	 * driver hangs.
    394       1.1       cgd 	 */
    395      1.19   thorpej 	cc = hpibsend(ctlr, slave, C_CMD, &sc->sc_soptc, sizeof(sc->sc_soptc));
    396       1.1       cgd 	if (cc != sizeof(sc->sc_soptc))
    397      1.19   thorpej 		return (EBUSY);
    398      1.19   thorpej 
    399      1.19   thorpej 	hpibswait(ctlr, slave);
    400      1.19   thorpej 	cc = hpibrecv(ctlr, slave, C_QSTAT, &stat, sizeof(stat));
    401       1.1       cgd 	if (cc != sizeof(stat))
    402       1.1       cgd 		return(EBUSY);
    403      1.19   thorpej 
    404       1.1       cgd 	sc->sc_tpr = tprintf_open(p);
    405       1.1       cgd 	sc->sc_flags |= CTF_OPEN;
    406       1.1       cgd 	return(0);
    407       1.1       cgd }
    408       1.1       cgd 
    409       1.1       cgd /*ARGSUSED*/
    410      1.19   thorpej int
    411      1.19   thorpej ctclose(dev, flag, fmt, p)
    412       1.1       cgd 	dev_t dev;
    413      1.19   thorpej 	int flag, fmt;
    414      1.19   thorpej 	struct proc *p;
    415       1.1       cgd {
    416      1.19   thorpej 	struct ct_softc *sc = ct_cd.cd_devs[UNIT(dev)];
    417       1.1       cgd 
    418       1.1       cgd 	if ((sc->sc_flags & (CTF_WRT|CTF_WRTTN)) == (CTF_WRT|CTF_WRTTN) &&
    419       1.1       cgd 	    (sc->sc_flags & CTF_EOT) == 0 ) { /* XXX return error if EOT ?? */
    420       1.1       cgd 		ctcommand(dev, MTWEOF, 2);
    421       1.1       cgd 		ctcommand(dev, MTBSR, 1);
    422       1.1       cgd 		if (sc->sc_eofp == EOFS - 1)
    423       1.1       cgd 			sc->sc_eofs[EOFS - 1]--;
    424       1.1       cgd 		else
    425       1.1       cgd 			sc->sc_eofp--;
    426       1.1       cgd #ifdef DEBUG
    427       1.1       cgd 		if(ctdebug & CT_BSF)
    428      1.17  christos 			printf("%s: ctclose backup eofs prt %d blk %d\n",
    429      1.19   thorpej 			       sc->sc_dev.dv_xname, sc->sc_eofp,
    430      1.13   thorpej 			       sc->sc_eofs[sc->sc_eofp]);
    431       1.1       cgd #endif
    432       1.1       cgd 	}
    433       1.1       cgd 	if ((minor(dev) & CT_NOREW) == 0)
    434       1.1       cgd 		ctcommand(dev, MTREW, 1);
    435       1.1       cgd 	sc->sc_flags &= ~(CTF_OPEN | CTF_WRT | CTF_WRTTN);
    436       1.1       cgd 	tprintf_close(sc->sc_tpr);
    437       1.1       cgd #ifdef DEBUG
    438       1.1       cgd 	if (ctdebug & CDB_FILES)
    439      1.17  christos 		printf("ctclose: flags %x\n", sc->sc_flags);
    440       1.1       cgd #endif
    441       1.1       cgd 	return(0);	/* XXX */
    442       1.1       cgd }
    443       1.1       cgd 
    444      1.19   thorpej void
    445       1.1       cgd ctcommand(dev, cmd, cnt)
    446       1.1       cgd 	dev_t dev;
    447       1.8   mycroft 	int cmd;
    448      1.20    scottr 	int cnt;
    449       1.1       cgd {
    450      1.19   thorpej 	struct ct_softc *sc = ct_cd.cd_devs[UNIT(dev)];
    451      1.20    scottr 	struct buf *bp = &sc->sc_bufstore;
    452      1.20    scottr 	struct buf *nbp = 0;
    453       1.1       cgd 
    454       1.1       cgd 	if (cmd == MTBSF && sc->sc_eofp == EOFS - 1) {
    455       1.1       cgd 		cnt = sc->sc_eofs[EOFS - 1] - cnt;
    456       1.1       cgd 		ctcommand(dev, MTREW, 1);
    457       1.1       cgd 		ctcommand(dev, MTFSF, cnt);
    458       1.1       cgd 		cnt = 2;
    459       1.1       cgd 		cmd = MTBSR;
    460       1.1       cgd 	}
    461       1.1       cgd 
    462       1.1       cgd 	if (cmd == MTBSF && sc->sc_eofp - cnt < 0) {
    463       1.1       cgd 		cnt = 1;
    464       1.1       cgd 		cmd = MTREW;
    465       1.1       cgd 	}
    466       1.1       cgd 
    467       1.1       cgd 	sc->sc_flags |= CTF_CMD;
    468       1.1       cgd 	sc->sc_bp = bp;
    469       1.1       cgd 	sc->sc_cmd = cmd;
    470       1.1       cgd 	bp->b_dev = dev;
    471       1.1       cgd 	if (cmd == MTFSF) {
    472       1.1       cgd 		nbp = (struct buf *)geteblk(MAXBSIZE);
    473      1.25   thorpej 		bp->b_data = nbp->b_data;
    474       1.1       cgd 		bp->b_bcount = MAXBSIZE;
    475       1.1       cgd 	}
    476      1.14    scottr 
    477      1.14    scottr 	while (cnt-- > 0) {
    478      1.14    scottr 		bp->b_flags = B_BUSY;
    479      1.14    scottr 		if (cmd == MTBSF) {
    480      1.14    scottr 			sc->sc_blkno = sc->sc_eofs[sc->sc_eofp];
    481      1.14    scottr 			sc->sc_eofp--;
    482      1.14    scottr #ifdef DEBUG
    483      1.14    scottr 			if (ctdebug & CT_BSF)
    484      1.17  christos 				printf("%s: backup eof pos %d blk %d\n",
    485      1.19   thorpej 				    sc->sc_dev.dv_xname, sc->sc_eofp,
    486      1.14    scottr 				    sc->sc_eofs[sc->sc_eofp]);
    487       1.1       cgd #endif
    488      1.14    scottr 		}
    489      1.14    scottr 		ctstrategy(bp);
    490      1.24   thorpej 		biowait(bp);
    491       1.1       cgd 	}
    492       1.1       cgd 	bp->b_flags = 0;
    493       1.1       cgd 	sc->sc_flags &= ~CTF_CMD;
    494       1.1       cgd 	if (nbp)
    495       1.1       cgd 		brelse(nbp);
    496       1.1       cgd }
    497       1.1       cgd 
    498       1.3   mycroft void
    499       1.1       cgd ctstrategy(bp)
    500      1.20    scottr 	struct buf *bp;
    501       1.1       cgd {
    502      1.20    scottr 	int s, unit;
    503      1.19   thorpej 	struct ct_softc *sc;
    504       1.1       cgd 
    505       1.1       cgd 	unit = UNIT(bp->b_dev);
    506      1.19   thorpej 	sc = ct_cd.cd_devs[unit];
    507      1.19   thorpej 
    508       1.1       cgd 	s = splbio();
    509      1.24   thorpej 	BUFQ_INSERT_TAIL(&sc->sc_tab, bp);
    510      1.24   thorpej 	if (sc->sc_active == 0) {
    511      1.24   thorpej 		sc->sc_active = 1;
    512      1.19   thorpej 		ctustart(sc);
    513       1.1       cgd 	}
    514       1.1       cgd 	splx(s);
    515       1.1       cgd }
    516       1.1       cgd 
    517      1.19   thorpej void
    518      1.19   thorpej ctustart(sc)
    519      1.19   thorpej 	struct ct_softc *sc;
    520       1.1       cgd {
    521      1.20    scottr 	struct buf *bp;
    522       1.1       cgd 
    523      1.24   thorpej 	bp = BUFQ_FIRST(&sc->sc_tab);
    524      1.25   thorpej 	sc->sc_addr = bp->b_data;
    525       1.1       cgd 	sc->sc_resid = bp->b_bcount;
    526      1.19   thorpej 	if (hpibreq(sc->sc_dev.dv_parent, &sc->sc_hq))
    527      1.19   thorpej 		ctstart(sc);
    528       1.1       cgd }
    529       1.1       cgd 
    530      1.19   thorpej void
    531      1.19   thorpej ctstart(arg)
    532      1.19   thorpej 	void *arg;
    533       1.1       cgd {
    534      1.19   thorpej 	struct ct_softc *sc = arg;
    535      1.20    scottr 	struct buf *bp;
    536      1.19   thorpej 	int i, ctlr, slave;
    537       1.1       cgd 
    538      1.19   thorpej 	ctlr = sc->sc_dev.dv_parent->dv_unit;
    539      1.19   thorpej 	slave = sc->sc_slave;
    540      1.19   thorpej 
    541      1.24   thorpej 	bp = BUFQ_FIRST(&sc->sc_tab);
    542       1.1       cgd 	if ((sc->sc_flags & CTF_CMD) && sc->sc_bp == bp) {
    543       1.1       cgd 		switch(sc->sc_cmd) {
    544       1.1       cgd 		case MTFSF:
    545       1.1       cgd 			bp->b_flags |= B_READ;
    546       1.1       cgd 			goto mustio;
    547       1.1       cgd 
    548       1.1       cgd 		case MTBSF:
    549       1.1       cgd 			goto gotaddr;
    550       1.1       cgd 
    551       1.1       cgd 		case MTOFFL:
    552       1.1       cgd 			sc->sc_blkno = 0;
    553       1.1       cgd 			sc->sc_ul.unit = C_SUNIT(sc->sc_punit);
    554       1.1       cgd 			sc->sc_ul.cmd = C_UNLOAD;
    555      1.19   thorpej 			hpibsend(ctlr, slave, C_CMD, &sc->sc_ul,
    556      1.19   thorpej 			    sizeof(sc->sc_ul));
    557       1.1       cgd 			break;
    558       1.1       cgd 
    559       1.1       cgd 		case MTWEOF:
    560       1.1       cgd 			sc->sc_blkno++;
    561       1.1       cgd 			sc->sc_flags |= CTF_WRT;
    562       1.1       cgd 			sc->sc_wfm.unit = C_SUNIT(sc->sc_punit);
    563       1.1       cgd 			sc->sc_wfm.cmd = C_WFM;
    564      1.19   thorpej 			hpibsend(ctlr, slave, C_CMD, &sc->sc_wfm,
    565      1.19   thorpej 			    sizeof(sc->sc_wfm));
    566      1.19   thorpej 			ctaddeof(sc);
    567       1.1       cgd 			break;
    568       1.1       cgd 
    569       1.1       cgd 		case MTBSR:
    570       1.1       cgd 			sc->sc_blkno--;
    571       1.1       cgd 			goto gotaddr;
    572       1.1       cgd 
    573       1.1       cgd 		case MTFSR:
    574       1.1       cgd 			sc->sc_blkno++;
    575       1.1       cgd 			goto gotaddr;
    576       1.1       cgd 
    577       1.1       cgd 		case MTREW:
    578       1.1       cgd 			sc->sc_blkno = 0;
    579       1.1       cgd #ifdef DEBUG
    580       1.1       cgd 			if(ctdebug & CT_BSF)
    581      1.17  christos 				printf("%s: clearing eofs\n",
    582      1.19   thorpej 				    sc->sc_dev.dv_xname);
    583       1.1       cgd #endif
    584       1.1       cgd 			for (i=0; i<EOFS; i++)
    585       1.1       cgd 				sc->sc_eofs[i] = 0;
    586       1.1       cgd 			sc->sc_eofp = 0;
    587       1.1       cgd 
    588       1.1       cgd gotaddr:
    589       1.1       cgd 			sc->sc_ioc.saddr = C_SADDR;
    590       1.1       cgd 			sc->sc_ioc.addr0 = 0;
    591       1.1       cgd 			sc->sc_ioc.addr = sc->sc_blkno;
    592       1.1       cgd 			sc->sc_ioc.unit = C_SUNIT(sc->sc_punit);
    593       1.1       cgd 			sc->sc_ioc.nop2 = C_NOP;
    594       1.1       cgd 			sc->sc_ioc.slen = C_SLEN;
    595       1.1       cgd 			sc->sc_ioc.len = 0;
    596       1.1       cgd 			sc->sc_ioc.nop3 = C_NOP;
    597       1.1       cgd 			sc->sc_ioc.cmd = C_READ;
    598      1.19   thorpej 			hpibsend(ctlr, slave, C_CMD, &sc->sc_ioc,
    599      1.19   thorpej 			    sizeof(sc->sc_ioc));
    600       1.1       cgd 			break;
    601       1.1       cgd 		}
    602      1.19   thorpej 	} else {
    603       1.1       cgd mustio:
    604       1.1       cgd 		if ((bp->b_flags & B_READ) &&
    605       1.1       cgd 		    sc->sc_flags & (CTF_BEOF|CTF_EOT)) {
    606       1.1       cgd #ifdef DEBUG
    607       1.1       cgd 			if (ctdebug & CDB_FILES)
    608      1.19   thorpej 				printf("ctstart: before flags %x\n",
    609      1.19   thorpej 				    sc->sc_flags);
    610       1.1       cgd #endif
    611       1.1       cgd 			if (sc->sc_flags & CTF_BEOF) {
    612       1.1       cgd 				sc->sc_flags &= ~CTF_BEOF;
    613       1.1       cgd 				sc->sc_flags |= CTF_AEOF;
    614       1.1       cgd #ifdef DEBUG
    615       1.1       cgd 				if (ctdebug & CDB_FILES)
    616      1.19   thorpej 					printf("ctstart: after flags %x\n",
    617      1.19   thorpej 					    sc->sc_flags);
    618       1.1       cgd #endif
    619       1.1       cgd 			}
    620       1.1       cgd 			bp->b_resid = bp->b_bcount;
    621      1.19   thorpej 			ctdone(sc, bp);
    622       1.1       cgd 			return;
    623       1.1       cgd 		}
    624       1.1       cgd 		sc->sc_flags |= CTF_IO;
    625       1.1       cgd 		sc->sc_ioc.unit = C_SUNIT(sc->sc_punit);
    626       1.1       cgd 		sc->sc_ioc.saddr = C_SADDR;
    627       1.1       cgd 		sc->sc_ioc.addr0 = 0;
    628       1.1       cgd 		sc->sc_ioc.addr = sc->sc_blkno;
    629       1.1       cgd 		sc->sc_ioc.nop2 = C_NOP;
    630       1.1       cgd 		sc->sc_ioc.slen = C_SLEN;
    631       1.1       cgd 		sc->sc_ioc.len = sc->sc_resid;
    632       1.1       cgd 		sc->sc_ioc.nop3 = C_NOP;
    633       1.1       cgd 		if (bp->b_flags & B_READ)
    634       1.1       cgd 			sc->sc_ioc.cmd = C_READ;
    635       1.1       cgd 		else {
    636       1.1       cgd 			sc->sc_ioc.cmd = C_WRITE;
    637       1.1       cgd 			sc->sc_flags |= (CTF_WRT | CTF_WRTTN);
    638       1.1       cgd 		}
    639      1.19   thorpej 		hpibsend(ctlr, slave, C_CMD, &sc->sc_ioc, sizeof(sc->sc_ioc));
    640       1.1       cgd 	}
    641      1.19   thorpej 	hpibawait(ctlr);
    642       1.1       cgd }
    643       1.1       cgd 
    644      1.19   thorpej void
    645      1.19   thorpej ctgo(arg)
    646      1.19   thorpej 	void *arg;
    647       1.1       cgd {
    648      1.19   thorpej 	struct ct_softc *sc = arg;
    649      1.20    scottr 	struct buf *bp;
    650      1.12   thorpej 	int rw;
    651       1.1       cgd 
    652      1.24   thorpej 	bp = BUFQ_FIRST(&sc->sc_tab);
    653      1.12   thorpej 	rw = bp->b_flags & B_READ;
    654      1.19   thorpej 	hpibgo(sc->sc_dev.dv_parent->dv_unit, sc->sc_slave, C_EXEC,
    655      1.19   thorpej 	    sc->sc_addr, sc->sc_resid, rw, rw != 0);
    656       1.1       cgd }
    657       1.1       cgd 
    658       1.1       cgd /*
    659       1.1       cgd  * Hideous grue to handle EOF/EOT (mostly for reads)
    660       1.1       cgd  */
    661      1.19   thorpej void
    662       1.1       cgd cteof(sc, bp)
    663      1.20    scottr 	struct ct_softc *sc;
    664      1.20    scottr 	struct buf *bp;
    665       1.1       cgd {
    666       1.1       cgd 	long blks;
    667       1.1       cgd 
    668       1.1       cgd 	/*
    669       1.1       cgd 	 * EOT on a write is an error.
    670       1.1       cgd 	 */
    671       1.1       cgd 	if ((bp->b_flags & B_READ) == 0) {
    672       1.1       cgd 		bp->b_resid = bp->b_bcount;
    673       1.1       cgd 		bp->b_flags |= B_ERROR;
    674       1.1       cgd 		bp->b_error = ENOSPC;
    675       1.1       cgd 		sc->sc_flags |= CTF_EOT;
    676       1.1       cgd 		return;
    677       1.1       cgd 	}
    678       1.1       cgd 	/*
    679       1.1       cgd 	 * Use returned block position to determine how many blocks
    680       1.1       cgd 	 * we really read and update b_resid.
    681       1.1       cgd 	 */
    682       1.1       cgd 	blks = sc->sc_stat.c_blk - sc->sc_blkno - 1;
    683       1.1       cgd #ifdef DEBUG
    684       1.1       cgd 	if (ctdebug & CDB_FILES)
    685      1.21    scottr 		printf("cteof: bc %ld oblk %d nblk %ld read %ld, resid %ld\n",
    686       1.1       cgd 		       bp->b_bcount, sc->sc_blkno, sc->sc_stat.c_blk,
    687       1.1       cgd 		       blks, bp->b_bcount - CTKTOB(blks));
    688       1.1       cgd #endif
    689       1.1       cgd 	if (blks == -1) { /* 9145 on EOF does not change sc_stat.c_blk */
    690       1.1       cgd 		blks = 0;
    691       1.1       cgd 		sc->sc_blkno++;
    692       1.1       cgd 	}
    693       1.1       cgd 	else {
    694       1.1       cgd 		sc->sc_blkno = sc->sc_stat.c_blk;
    695       1.1       cgd 	}
    696       1.1       cgd 	bp->b_resid = bp->b_bcount - CTKTOB(blks);
    697       1.1       cgd 	/*
    698       1.1       cgd 	 * If we are at physical EOV or were after an EOF,
    699       1.1       cgd 	 * we are now at logical EOT.
    700       1.1       cgd 	 */
    701       1.1       cgd 	if ((sc->sc_stat.c_aef & AEF_EOV) ||
    702       1.1       cgd 	    (sc->sc_flags & CTF_AEOF)) {
    703       1.1       cgd 		sc->sc_flags |= CTF_EOT;
    704       1.1       cgd 		sc->sc_flags &= ~(CTF_AEOF|CTF_BEOF);
    705       1.1       cgd 	}
    706       1.1       cgd 	/*
    707       1.1       cgd 	 * If we were before an EOF or we have just completed a FSF,
    708       1.1       cgd 	 * we are now after EOF.
    709       1.1       cgd 	 */
    710       1.1       cgd 	else if ((sc->sc_flags & CTF_BEOF) ||
    711      1.20    scottr 		 ((sc->sc_flags & CTF_CMD) && sc->sc_cmd == MTFSF)) {
    712       1.1       cgd 		sc->sc_flags |= CTF_AEOF;
    713       1.1       cgd 		sc->sc_flags &= ~CTF_BEOF;
    714       1.1       cgd 	}
    715       1.1       cgd 	/*
    716       1.1       cgd 	 * Otherwise if we read something we are now before EOF
    717       1.1       cgd 	 * (and no longer after EOF).
    718       1.1       cgd 	 */
    719       1.1       cgd 	else if (blks) {
    720       1.1       cgd 		sc->sc_flags |= CTF_BEOF;
    721       1.1       cgd 		sc->sc_flags &= ~CTF_AEOF;
    722       1.1       cgd 	}
    723       1.1       cgd 	/*
    724       1.1       cgd 	 * Finally, if we didn't read anything we just passed an EOF
    725       1.1       cgd 	 */
    726       1.1       cgd 	else
    727       1.1       cgd 		sc->sc_flags |= CTF_AEOF;
    728       1.1       cgd #ifdef DEBUG
    729       1.1       cgd 	if (ctdebug & CDB_FILES)
    730      1.17  christos 		printf("cteof: leaving flags %x\n", sc->sc_flags);
    731       1.1       cgd #endif
    732       1.1       cgd }
    733       1.1       cgd 
    734      1.19   thorpej /* ARGSUSED */
    735      1.19   thorpej void
    736      1.15   thorpej ctintr(arg)
    737      1.15   thorpej 	void *arg;
    738       1.1       cgd {
    739      1.20    scottr 	struct ct_softc *sc = arg;
    740      1.20    scottr 	struct buf *bp;
    741       1.1       cgd 	u_char stat;
    742      1.19   thorpej 	int ctlr, slave, unit;
    743      1.19   thorpej 
    744      1.19   thorpej 	ctlr = sc->sc_dev.dv_parent->dv_unit;
    745      1.19   thorpej 	slave = sc->sc_slave;
    746      1.19   thorpej 	unit = sc->sc_dev.dv_unit;
    747       1.1       cgd 
    748      1.24   thorpej 	bp = BUFQ_FIRST(&sc->sc_tab);
    749       1.1       cgd 	if (bp == NULL) {
    750      1.19   thorpej 		printf("%s: bp == NULL\n", sc->sc_dev.dv_xname);
    751       1.1       cgd 		return;
    752       1.1       cgd 	}
    753       1.1       cgd 	if (sc->sc_flags & CTF_IO) {
    754       1.1       cgd 		sc->sc_flags &= ~CTF_IO;
    755      1.19   thorpej 		if (hpibustart(ctlr))
    756      1.19   thorpej 			ctgo(sc);
    757       1.1       cgd 		return;
    758       1.1       cgd 	}
    759       1.1       cgd 	if ((sc->sc_flags & CTF_STATWAIT) == 0) {
    760      1.19   thorpej 		if (hpibpptest(ctlr, slave) == 0) {
    761       1.1       cgd 			sc->sc_flags |= CTF_STATWAIT;
    762      1.19   thorpej 			hpibawait(ctlr);
    763       1.1       cgd 			return;
    764       1.1       cgd 		}
    765       1.1       cgd 	} else
    766       1.1       cgd 		sc->sc_flags &= ~CTF_STATWAIT;
    767      1.19   thorpej 	hpibrecv(ctlr, slave, C_QSTAT, &stat, 1);
    768       1.1       cgd #ifdef DEBUG
    769       1.1       cgd 	if (ctdebug & CDB_FILES)
    770      1.17  christos 		printf("ctintr: before flags %x\n", sc->sc_flags);
    771       1.1       cgd #endif
    772       1.1       cgd 	if (stat) {
    773       1.1       cgd 		sc->sc_rsc.unit = C_SUNIT(sc->sc_punit);
    774       1.1       cgd 		sc->sc_rsc.cmd = C_STATUS;
    775      1.19   thorpej 		hpibsend(ctlr, slave, C_CMD, &sc->sc_rsc, sizeof(sc->sc_rsc));
    776      1.19   thorpej 		hpibrecv(ctlr, slave, C_EXEC, &sc->sc_stat,
    777      1.19   thorpej 		    sizeof(sc->sc_stat));
    778      1.19   thorpej 		hpibrecv(ctlr, slave, C_QSTAT, &stat, 1);
    779       1.1       cgd #ifdef DEBUG
    780       1.1       cgd 		if (ctdebug & CDB_FILES)
    781      1.21    scottr 			printf("ctintr: return stat 0x%x, A%x F%x blk %ld\n",
    782       1.1       cgd 			       stat, sc->sc_stat.c_aef,
    783       1.1       cgd 			       sc->sc_stat.c_fef, sc->sc_stat.c_blk);
    784       1.1       cgd #endif
    785       1.1       cgd 		if (stat == 0) {
    786       1.1       cgd 			if (sc->sc_stat.c_aef & (AEF_EOF | AEF_EOV)) {
    787       1.1       cgd 				cteof(sc, bp);
    788      1.19   thorpej 				ctaddeof(sc);
    789       1.1       cgd 				goto done;
    790       1.1       cgd 			}
    791       1.1       cgd 			if (sc->sc_stat.c_fef & FEF_PF) {
    792      1.19   thorpej 				ctreset(sc);
    793      1.19   thorpej 				ctstart(sc);
    794       1.1       cgd 				return;
    795       1.1       cgd 			}
    796       1.1       cgd 			if (sc->sc_stat.c_fef & FEF_REXMT) {
    797      1.19   thorpej 				ctstart(sc);
    798       1.1       cgd 				return;
    799       1.1       cgd 			}
    800       1.1       cgd 			if (sc->sc_stat.c_aef & 0x5800) {
    801       1.1       cgd 				if (sc->sc_stat.c_aef & 0x4000)
    802       1.1       cgd 					tprintf(sc->sc_tpr,
    803      1.13   thorpej 						"%s: uninitialized media\n",
    804      1.19   thorpej 						sc->sc_dev.dv_xname);
    805       1.1       cgd 				if (sc->sc_stat.c_aef & 0x1000)
    806       1.1       cgd 					tprintf(sc->sc_tpr,
    807      1.13   thorpej 						"%s: not ready\n",
    808      1.19   thorpej 						sc->sc_dev.dv_xname);
    809       1.1       cgd 				if (sc->sc_stat.c_aef & 0x0800)
    810       1.1       cgd 					tprintf(sc->sc_tpr,
    811      1.13   thorpej 						"%s: write protect\n",
    812      1.19   thorpej 						sc->sc_dev.dv_xname);
    813       1.1       cgd 			} else {
    814      1.20    scottr 				printf("%s err: v%d u%d ru%d bn%ld, ",
    815      1.19   thorpej 				       sc->sc_dev.dv_xname,
    816       1.1       cgd 				       (sc->sc_stat.c_vu>>4)&0xF,
    817       1.1       cgd 				       sc->sc_stat.c_vu&0xF,
    818       1.1       cgd 				       sc->sc_stat.c_pend,
    819       1.1       cgd 				       sc->sc_stat.c_blk);
    820      1.17  christos 				printf("R0x%x F0x%x A0x%x I0x%x\n",
    821       1.1       cgd 				       sc->sc_stat.c_ref,
    822       1.1       cgd 				       sc->sc_stat.c_fef,
    823       1.1       cgd 				       sc->sc_stat.c_aef,
    824       1.1       cgd 				       sc->sc_stat.c_ief);
    825       1.1       cgd 			}
    826       1.1       cgd 		} else
    827      1.17  christos 			printf("%s: request status failed\n",
    828      1.19   thorpej 			    sc->sc_dev.dv_xname);
    829       1.1       cgd 		bp->b_flags |= B_ERROR;
    830       1.1       cgd 		bp->b_error = EIO;
    831       1.1       cgd 		goto done;
    832       1.1       cgd 	} else
    833       1.1       cgd 		bp->b_resid = 0;
    834       1.1       cgd 	if (sc->sc_flags & CTF_CMD) {
    835       1.1       cgd 		switch (sc->sc_cmd) {
    836       1.1       cgd 		case MTFSF:
    837       1.1       cgd 			sc->sc_flags &= ~(CTF_BEOF|CTF_AEOF);
    838       1.1       cgd 			sc->sc_blkno += CTBTOK(sc->sc_resid);
    839      1.19   thorpej 			ctstart(sc);
    840       1.1       cgd 			return;
    841       1.1       cgd 		case MTBSF:
    842       1.1       cgd 			sc->sc_flags &= ~(CTF_AEOF|CTF_BEOF|CTF_EOT);
    843       1.1       cgd 			break;
    844       1.1       cgd 		case MTBSR:
    845       1.1       cgd 			sc->sc_flags &= ~CTF_BEOF;
    846       1.1       cgd 			if (sc->sc_flags & CTF_EOT) {
    847       1.1       cgd 				sc->sc_flags |= CTF_AEOF;
    848       1.1       cgd 				sc->sc_flags &= ~CTF_EOT;
    849       1.1       cgd 			} else if (sc->sc_flags & CTF_AEOF) {
    850       1.1       cgd 				sc->sc_flags |= CTF_BEOF;
    851       1.1       cgd 				sc->sc_flags &= ~CTF_AEOF;
    852       1.1       cgd 			}
    853       1.1       cgd 			break;
    854       1.1       cgd 		case MTWEOF:
    855       1.1       cgd 			sc->sc_flags &= ~CTF_BEOF;
    856       1.1       cgd 			if (sc->sc_flags & (CTF_AEOF|CTF_EOT)) {
    857       1.1       cgd 				sc->sc_flags |= CTF_EOT;
    858       1.1       cgd 				sc->sc_flags &= ~CTF_AEOF;
    859       1.1       cgd 			} else
    860       1.1       cgd 				sc->sc_flags |= CTF_AEOF;
    861       1.1       cgd 			break;
    862       1.1       cgd 		case MTREW:
    863       1.1       cgd 		case MTOFFL:
    864       1.1       cgd 			sc->sc_flags &= ~(CTF_BEOF|CTF_AEOF|CTF_EOT);
    865       1.1       cgd 			break;
    866       1.1       cgd 		}
    867       1.1       cgd 	} else {
    868       1.1       cgd 		sc->sc_flags &= ~CTF_AEOF;
    869       1.1       cgd 		sc->sc_blkno += CTBTOK(sc->sc_resid);
    870       1.1       cgd 	}
    871       1.1       cgd done:
    872       1.1       cgd #ifdef DEBUG
    873       1.1       cgd 	if (ctdebug & CDB_FILES)
    874      1.17  christos 		printf("ctintr: after flags %x\n", sc->sc_flags);
    875       1.1       cgd #endif
    876      1.19   thorpej 	ctdone(sc, bp);
    877      1.10   mycroft }
    878      1.10   mycroft 
    879      1.10   mycroft void
    880      1.19   thorpej ctdone(sc, bp)
    881      1.19   thorpej 	struct ct_softc *sc;
    882      1.20    scottr 	struct buf *bp;
    883      1.10   mycroft {
    884      1.10   mycroft 
    885      1.24   thorpej 	BUFQ_REMOVE(&sc->sc_tab, bp);
    886      1.10   mycroft 	biodone(bp);
    887      1.19   thorpej 	hpibfree(sc->sc_dev.dv_parent, &sc->sc_hq);
    888      1.24   thorpej 	if (BUFQ_FIRST(&sc->sc_tab) == NULL) {
    889      1.24   thorpej 		sc->sc_active = 0;
    890       1.1       cgd 		return;
    891       1.1       cgd 	}
    892      1.19   thorpej 	ctustart(sc);
    893      1.11   thorpej }
    894      1.11   thorpej 
    895      1.11   thorpej int
    896      1.11   thorpej ctread(dev, uio, flags)
    897      1.11   thorpej 	dev_t dev;
    898      1.11   thorpej 	struct uio *uio;
    899      1.11   thorpej 	int flags;
    900      1.11   thorpej {
    901      1.11   thorpej 	return (physio(ctstrategy, NULL, dev, B_READ, minphys, uio));
    902      1.11   thorpej }
    903      1.11   thorpej 
    904      1.11   thorpej int
    905      1.11   thorpej ctwrite(dev, uio, flags)
    906      1.11   thorpej 	dev_t dev;
    907      1.11   thorpej 	struct uio *uio;
    908      1.11   thorpej 	int flags;
    909      1.11   thorpej {
    910      1.11   thorpej 	/* XXX: check for hardware write-protect? */
    911      1.11   thorpej 	return (physio(ctstrategy, NULL, dev, B_WRITE, minphys, uio));
    912       1.1       cgd }
    913       1.1       cgd 
    914       1.1       cgd /*ARGSUSED*/
    915      1.19   thorpej int
    916       1.6   mycroft ctioctl(dev, cmd, data, flag, p)
    917       1.1       cgd 	dev_t dev;
    918      1.19   thorpej 	u_long cmd;
    919      1.19   thorpej 	int flag;
    920       1.1       cgd 	caddr_t data;
    921       1.6   mycroft 	struct proc *p;
    922       1.1       cgd {
    923      1.20    scottr 	struct mtop *op;
    924      1.20    scottr 	int cnt;
    925       1.1       cgd 
    926       1.1       cgd 	switch (cmd) {
    927       1.1       cgd 
    928       1.1       cgd 	case MTIOCTOP:
    929       1.1       cgd 		op = (struct mtop *)data;
    930       1.1       cgd 		switch(op->mt_op) {
    931       1.1       cgd 
    932       1.1       cgd 		case MTWEOF:
    933       1.1       cgd 		case MTFSF:
    934       1.1       cgd 		case MTBSR:
    935       1.1       cgd 		case MTBSF:
    936       1.1       cgd 		case MTFSR:
    937       1.1       cgd 			cnt = op->mt_count;
    938       1.1       cgd 			break;
    939       1.1       cgd 
    940       1.1       cgd 		case MTREW:
    941       1.1       cgd 		case MTOFFL:
    942       1.1       cgd 			cnt = 1;
    943       1.1       cgd 			break;
    944       1.1       cgd 
    945       1.1       cgd 		default:
    946       1.1       cgd 			return(EINVAL);
    947       1.1       cgd 		}
    948       1.1       cgd 		ctcommand(dev, op->mt_op, cnt);
    949       1.1       cgd 		break;
    950       1.1       cgd 
    951       1.1       cgd 	case MTIOCGET:
    952       1.1       cgd 		break;
    953       1.1       cgd 
    954       1.1       cgd 	default:
    955       1.1       cgd 		return(EINVAL);
    956       1.1       cgd 	}
    957       1.1       cgd 	return(0);
    958       1.1       cgd }
    959       1.1       cgd 
    960      1.19   thorpej /* ARGSUSED */
    961      1.19   thorpej int
    962      1.19   thorpej ctdump(dev, blkno, va, size)
    963       1.1       cgd 	dev_t dev;
    964      1.19   thorpej 	daddr_t blkno;
    965      1.19   thorpej 	caddr_t va;
    966      1.19   thorpej 	size_t size;
    967       1.1       cgd {
    968      1.19   thorpej 
    969      1.19   thorpej 	return (ENODEV);
    970       1.1       cgd }
    971       1.1       cgd 
    972      1.19   thorpej void
    973      1.19   thorpej ctaddeof(sc)
    974      1.19   thorpej 	struct ct_softc *sc;
    975       1.1       cgd {
    976      1.19   thorpej 
    977       1.1       cgd 	if (sc->sc_eofp == EOFS - 1)
    978       1.1       cgd 		sc->sc_eofs[EOFS - 1]++;
    979       1.1       cgd 	else {
    980       1.1       cgd 		sc->sc_eofp++;
    981       1.1       cgd 		if (sc->sc_eofp == EOFS - 1)
    982       1.1       cgd 			sc->sc_eofs[EOFS - 1] = EOFS;
    983       1.1       cgd 		else
    984       1.1       cgd 			/* save blkno */
    985       1.1       cgd 			sc->sc_eofs[sc->sc_eofp] = sc->sc_blkno - 1;
    986       1.1       cgd 	}
    987       1.1       cgd #ifdef DEBUG
    988       1.1       cgd 	if (ctdebug & CT_BSF)
    989      1.17  christos 		printf("%s: add eof pos %d blk %d\n",
    990      1.19   thorpej 		       sc->sc_dev.dv_xname, sc->sc_eofp,
    991       1.1       cgd 		       sc->sc_eofs[sc->sc_eofp]);
    992       1.1       cgd #endif
    993       1.1       cgd }
    994