freebsd-dev/sys/scsi/su.c

274 lines
7.1 KiB
C

/* su: SCSI Universal. This is a universal SCSI device that
* has a fixed minor number format. This allows you to refer
* to your devices by BUS, ID, LUN instead of st0, st1, ...
*
* This code looks up the underlying device for a given SCSI
* target and uses that driver.
*
*Begin copyright
*
* Copyright (C) 1993, 1994, 1995, HD Associates, Inc.
* PO Box 276
* Pepperell, MA 01463
* 508 433 5266
* dufault@hda.com
*
* This code is contributed to the University of California at Berkeley:
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*End copyright
*
* $Id:$
*
* Tabstops 4
*/
#include <sys/types.h>
#include <sys/conf.h>
#include <scsi/scsiconf.h>
#include <sys/errno.h>
#include <sys/stat.h>
#include <sys/param.h>
#include <sys/buf.h>
#include <sys/systm.h>
/* bnxio, cnxio: non existent device entries (with ugly casts to quiet gcc).
*/
static struct bdevsw bnxio = {
(int (*) __P((dev_t dev, int oflags, int devtype,
struct proc *p))) enxio,
(int (*) __P((dev_t dev, int fflag, int devtype,
struct proc *p))) enxio,
(d_strategy_t *) enxio,
(int (*) __P((dev_t dev, int cmd, caddr_t data,
int fflag, struct proc *p))) enxio,
(int (*) ()) enxio,
(int (*) __P((dev_t dev))) 0,
(int ) 0
};
static struct cdevsw cnxio = {
(int (*) __P((dev_t dev, int oflags, int devtype,
struct proc *p))) enxio,
(int (*) __P((dev_t dev, int fflag, int devtype,
struct proc *))) enxio,
(int (*) __P((dev_t dev, struct uio *uio, int ioflag))) enxio,
(int (*) __P((dev_t dev, struct uio *uio, int ioflag))) enxio,
(int (*) __P((dev_t dev, int cmd, caddr_t data,
int fflag, struct proc *p))) enxio,
(int (*) __P((struct tty *tp, int rw))) nullop,
(int (*) __P((int uban))) enxio,
(struct tty *) 0,
(int (*) __P((dev_t dev, int which, struct proc *p))) enxio,
(int (*) __P(())) enxio,
(d_strategy_t *) enxio
};
/* getsws: Look up the base dev switch for a given new style
* device.
*/
static int
getsws(dev_t dev, int type,
struct bdevsw **bdevp, struct cdevsw **cdevp, dev_t *base)
{
int ret = 0;
struct scsi_link *scsi_link;
int chr_dev, blk_dev;
struct cdevsw *cdev;
struct bdevsw *bdev;
int bus = SCSI_BUS(dev),
lun = SCSI_LUN(dev),
id = SCSI_ID(dev);
/* Try to look up the base device by finding the major number in
* the scsi_link structure:
*/
if ((scsi_link = scsi_link_get(bus, id, lun)) == 0 ||
scsi_link->dev == NODEV)
{
ret = ENXIO;
/* XXX This assumes that you always have a character device if you
* have a block device. That seems reasonable.
*/
cdev = &cnxio;
chr_dev = NODEV;
bdev = &bnxio;
blk_dev = NODEV;
}
else
{
int bmaj, cmaj;
cmaj = major(scsi_link->dev);
cdev = cdevsw + cmaj;
chr_dev = OLD_DEV(dev, scsi_link->dev);
bmaj = chrtoblk(cmaj);
bdev = (bmaj == NODEV) ? &bnxio : bdevsw + bmaj;
blk_dev = OLD_DEV(dev, makedev(bmaj, minor(scsi_link->dev)));
}
if (cdevp)
*cdevp = cdev;
if (bdevp)
*bdevp = bdev;
if (type == S_IFCHR)
*base = chr_dev;
else
*base = blk_dev;
return ret;
}
int
suopen(dev_t dev, int flag, int type, struct proc *p)
{
struct cdevsw *cdev;
struct bdevsw *bdev;
dev_t base;
if (getsws(dev, type, &bdev, &cdev, &base))
{
/* Device not configured? Reprobe then try again.
*/
int bus = SCSI_BUS(dev), lun = SCSI_LUN(dev), id = SCSI_ID(dev);
if (scsi_probe_bus(bus, id, lun) || getsws(dev, type, &bdev, &cdev,
&base))
return ENXIO;
}
/* There is a properly configured underlying device.
* Synthesize an appropriate device number:
*/
if (type == S_IFCHR)
return (*cdev->d_open)(base, flag, S_IFCHR, p);
else
return (*bdev->d_open)(base, flag, S_IFBLK, p);
}
int suclose(dev_t dev, int fflag, int type, struct proc *p)
{
struct cdevsw *cdev;
struct bdevsw *bdev;
dev_t base;
(void)getsws(dev, type, &bdev, &cdev, &base);
if (type == S_IFCHR)
return (*cdev->d_close)(base, fflag, S_IFCHR, p);
else
return (*bdev->d_open)(base, fflag, S_IFBLK, p);
}
void sustrategy(struct buf *bp)
{
dev_t base;
struct bdevsw *bdev;
dev_t dev = bp->b_dev;
/* XXX: I have no way of knowing if this was through the
* block or the character entry point.
*/
(void)getsws(dev, S_IFBLK, &bdev, 0, &base);
bp->b_dev = base;
(*bdev->d_strategy)(bp);
bp->b_dev = dev;
}
int suioctl(dev_t dev, int cmd, caddr_t data, int fflag, struct proc *p)
{
struct cdevsw *cdev;
dev_t base;
/* XXX: I have no way of knowing if this was through the
* block or the character entry point.
*/
(void)getsws(dev, S_IFCHR, 0, &cdev, &base);
return (*cdev->d_ioctl)(base, cmd, data, fflag, p);
}
int sudump(dev_t dev)
{
dev_t base;
struct bdevsw *bdev;
(void)getsws(dev, S_IFBLK, &bdev, 0, &base);
return (*bdev->d_dump)(base);
}
int supsize(dev_t dev)
{
dev_t base;
struct bdevsw *bdev;
(void)getsws(dev, S_IFBLK, &bdev, 0, &base);
return (*bdev->d_psize)(base);
}
int suread(dev_t dev, struct uio *uio, int ioflag)
{
dev_t base;
struct cdevsw *cdev;
(void)getsws(dev, S_IFCHR, 0, &cdev, &base);
return (*cdev->d_read)(base, uio, ioflag);
}
int suwrite(dev_t dev, struct uio *uio, int ioflag)
{
dev_t base;
struct cdevsw *cdev;
(void)getsws(dev, S_IFCHR, 0, &cdev, &base);
return (*cdev->d_write)(base, uio, ioflag);
}
int suselect(dev_t dev, int which, struct proc *p)
{
dev_t base;
struct cdevsw *cdev;
(void)getsws(dev, S_IFCHR, 0, &cdev, &base);
return (*cdev->d_select)(base, which, p);
}