Home | History | Annotate | Line # | Download | only in common
sd.c revision 1.11
      1 /*	$NetBSD: sd.c,v 1.11 2011/07/17 20:54:40 joerg Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1988 University of Utah.
      5  * Copyright (c) 1990, 1993
      6  *	The Regents of the University of California.  All rights reserved.
      7  *
      8  * This code is derived from software contributed to Berkeley by
      9  * Van Jacobson of Lawrence Berkeley Laboratory and the Systems
     10  * Programming Group of the University of Utah Computer Science Department.
     11  *
     12  * Redistribution and use in source and binary forms, with or without
     13  * modification, are permitted provided that the following conditions
     14  * are met:
     15  * 1. Redistributions of source code must retain the above copyright
     16  *    notice, this list of conditions and the following disclaimer.
     17  * 2. Redistributions in binary form must reproduce the above copyright
     18  *    notice, this list of conditions and the following disclaimer in the
     19  *    documentation and/or other materials provided with the distribution.
     20  * 3. Neither the name of the University nor the names of its contributors
     21  *    may be used to endorse or promote products derived from this software
     22  *    without specific prior written permission.
     23  *
     24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     34  * SUCH DAMAGE.
     35  *
     36  * from: Utah $Hdr: sd.c 1.9 92/12/21$
     37  *
     38  *	@(#)sd.c	8.1 (Berkeley) 6/10/93
     39  */
     40 
     41 /*
     42  * SCSI CCS disk driver
     43  */
     44 
     45 #include <sys/param.h>
     46 #include <sys/disklabel.h>
     47 
     48 #include <lib/libsa/stand.h>
     49 
     50 #include <hp300/stand/common/samachdep.h>
     51 #include <hp300/stand/common/conf.h>
     52 
     53 #define _IOCTL_
     54 #include <hp300/stand/common/scsireg.h>
     55 #include <hp300/stand/common/scsivar.h>
     56 
     57 struct	sdminilabel {
     58 	u_short	npart;
     59 	u_long	offset[MAXPARTITIONS];
     60 };
     61 
     62 struct	sd_softc {
     63 	int	sc_ctlr;
     64 	int	sc_unit;
     65 	int	sc_part;
     66 	char	sc_retry;
     67 	char	sc_alive;
     68 	short	sc_blkshift;
     69 	struct	sdminilabel sc_pinfo;
     70 };
     71 
     72 #define	SDRETRY		2
     73 
     74 static int sdinit(int ,int);
     75 static int sdgetinfo(struct sd_softc *);
     76 
     77 struct	disklabel sdlabel;
     78 struct sd_softc sd_softc[NSCSI][NSD];
     79 
     80 static int
     81 sdinit(int ctlr, int unit)
     82 {
     83 	struct sd_softc *ss = &sd_softc[ctlr][unit];
     84 	u_char stat;
     85 	int capbuf[2];
     86 
     87 	stat = scsi_test_unit_rdy(ctlr, unit);
     88 	if (stat) {
     89 		/* drive may be doing RTZ - wait a bit */
     90 		if (stat == STS_CHECKCOND) {
     91 			DELAY(1000000);
     92 			stat = scsi_test_unit_rdy(ctlr, unit);
     93 		}
     94 		if (stat) {
     95 			printf("sd(%d,%d,0,0): init failed (stat=%x)\n",
     96 			       ctlr, unit, stat);
     97 			return 0;
     98 		}
     99 	}
    100 	/*
    101 	 * try to get the drive block size.
    102 	 */
    103 	capbuf[0] = 0;
    104 	capbuf[1] = 0;
    105 	stat = scsi_read_capacity(ctlr, unit,
    106 				  (u_char *)capbuf, sizeof(capbuf));
    107 	if (stat == 0) {
    108 		if (capbuf[1] > DEV_BSIZE)
    109 			for (; capbuf[1] > DEV_BSIZE; capbuf[1] >>= 1)
    110 				++ss->sc_blkshift;
    111 	}
    112 	ss->sc_alive = 1;
    113 	return 1;
    114 }
    115 
    116 char io_buf[MAXBSIZE];
    117 
    118 static int
    119 sdgetinfo(struct sd_softc *ss)
    120 {
    121 	struct sdminilabel *pi = &ss->sc_pinfo;
    122 	struct disklabel *lp = &sdlabel;
    123 	char *msg;
    124 	int err, savepart;
    125 	size_t i;
    126 
    127 	memset((void *)lp, 0, sizeof *lp);
    128 	lp->d_secsize = (DEV_BSIZE << ss->sc_blkshift);
    129 
    130 	/* Disklabel is always from RAW_PART. */
    131 	savepart = ss->sc_part;
    132 	ss->sc_part = RAW_PART;
    133 	err = sdstrategy(ss, F_READ, LABELSECTOR,
    134 	    lp->d_secsize ? lp->d_secsize : DEV_BSIZE, io_buf, &i);
    135 	ss->sc_part = savepart;
    136 
    137 	if (err) {
    138 		printf("sdgetinfo: sdstrategy error %d\n", err);
    139 		return 0;
    140 	}
    141 
    142 	msg = getdisklabel(io_buf, lp);
    143 	if (msg) {
    144 		printf("sd(%d,%d,%d): WARNING: %s\n",
    145 		       ss->sc_ctlr, ss->sc_unit, ss->sc_part, msg);
    146 		pi->npart = 3;
    147 		pi->offset[0] = pi->offset[1] = -1;
    148 		pi->offset[2] = 0;
    149 	} else {
    150 		pi->npart = lp->d_npartitions;
    151 		for (i = 0; i < pi->npart; i++)
    152 			pi->offset[i] = lp->d_partitions[i].p_size == 0 ?
    153 				-1 : lp->d_partitions[i].p_offset;
    154 	}
    155 	return 1;
    156 }
    157 
    158 int
    159 sdopen(struct open_file *f, ...)
    160 {
    161 	va_list ap;
    162 	int ctlr, unit, part;
    163 	struct sd_softc *ss;
    164 
    165 	va_start(ap, f);
    166 	ctlr = va_arg(ap, int);
    167 	unit = va_arg(ap, int);
    168 	part = va_arg(ap, int);
    169 	va_end(ap);
    170 
    171 #ifdef SD_DEBUG
    172 	if (debug)
    173 	printf("sdopen: ctlr=%d unit=%d part=%d\n",
    174 	    ctlr, unit, part);
    175 #endif
    176 
    177 	if (ctlr >= NSCSI || scsialive(ctlr) == 0)
    178 		return EADAPT;
    179 	if (unit >= NSD)
    180 		return ECTLR;
    181 	ss = &sd_softc[ctlr][unit];
    182 	ss->sc_part = part;
    183 	ss->sc_unit = unit;
    184 	ss->sc_ctlr = ctlr;
    185 	if (ss->sc_alive == 0) {
    186 		if (sdinit(ctlr, unit) == 0)
    187 			return ENXIO;
    188 		if (sdgetinfo(ss) == 0)
    189 			return ERDLAB;
    190 	}
    191 	if (part != RAW_PART &&     /* always allow RAW_PART to be opened */
    192 	    (part >= ss->sc_pinfo.npart || ss->sc_pinfo.offset[part] == -1))
    193 		return EPART;
    194 	f->f_devdata = (void *)ss;
    195 	return 0;
    196 }
    197 
    198 int
    199 sdclose(struct open_file *f)
    200 {
    201 	struct sd_softc *ss = f->f_devdata;
    202 
    203 	/*
    204 	 * Mark the disk `not alive' so that the disklabel
    205 	 * will be re-loaded at next open.
    206 	 */
    207 	memset(ss, 0, sizeof(sd_softc));
    208 	f->f_devdata = NULL;
    209 
    210 	return 0;
    211 }
    212 
    213 int
    214 sdstrategy(void *devdata, int func, daddr_t dblk, size_t size, void *v_buf,
    215     size_t *rsize)
    216 {
    217 	struct sd_softc *ss = devdata;
    218 	uint8_t *buf = v_buf;
    219 	int ctlr = ss->sc_ctlr;
    220 	int unit = ss->sc_unit;
    221 	u_int nblk = size >> ss->sc_blkshift;
    222 	daddr_t blk;
    223 	int stat;
    224 
    225 	if (size == 0)
    226 		return 0;
    227 
    228 	/*
    229 	 * Don't do partition translation on the `raw partition'.
    230 	 */
    231 	blk = (dblk + ((ss->sc_part == RAW_PART) ? 0 :
    232 	    ss->sc_pinfo.offset[ss->sc_part])) >> ss->sc_blkshift;
    233 
    234 	ss->sc_retry = 0;
    235 
    236 #ifdef SD_DEBUG
    237 	if (debug)
    238 	printf("sdstrategy(%d,%d): size=%d blk=%d nblk=%d\n",
    239 	    ctlr, unit, size, blk, nblk);
    240 #endif
    241 
    242 retry:
    243 	if (func == F_READ)
    244 		stat = scsi_tt_read(ctlr, unit, buf, size, blk, nblk);
    245 	else
    246 		stat = scsi_tt_write(ctlr, unit, buf, size, blk, nblk);
    247 	if (stat) {
    248 		printf("sd(%d,%d,%d): block=%x, error=0x%x\n",
    249 		       ctlr, unit, ss->sc_part, blk, stat);
    250 		if (++ss->sc_retry > SDRETRY)
    251 			return EIO;
    252 		goto retry;
    253 	}
    254 	*rsize = size;
    255 
    256 	return 0;
    257 }
    258