xueye/cdrtools
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases 1 Wiki Activity
7c6bd698f9
cdrtools/libscg/scsi-openserver.c
Yezzi Hsueh 7c6bd698f9 Initial commit
2025-06-15 04:19:58 +08:00

1059 lines
26 KiB
C
Raw Blame History

/* @(#)scsi-openserver.c 1.35 10/05/24 Copyright 1998-2010 J. Schilling, Copyright 1998,2000 Santa Cruz Operation */
#ifndef lint
static char __sccsid[] =
"@(#)scsi-openserver.c 1.35 10/05/24 Copyright 1998-2010 J. Schilling, Copyright 1998,2000 Santa Cruz Operation";
#endif
/*
* Interface for the SCO SCSI implementation.
*
* Warning: you may change this source, but if you do that
* you need to change the _scg_version and _scg_auth* string below.
* You may not return "schily" for an SCG_AUTHOR request anymore.
* Choose your name instead of "schily" and make clear that the version
* string is related to a modified source.
*
* Copyright (c) 1998-2010 J. Schilling
* Copyright (c) 1998,2000 Santa Cruz Operation
*/
/*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* See the file CDDL.Schily.txt in this distribution for details.
*
* The following exceptions apply:
* CDDL §3.6 needs to be replaced by: "You may create a Larger Work by
* combining Covered Software with other code if all other code is governed by
* the terms of a license that is OSI approved (see www.opensource.org) and
* you may distribute the Larger Work as a single product. In such a case,
* You must make sure the requirements of this License are fulfilled for
* the Covered Software."
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file CDDL.Schily.txt from this distribution.
*/
#undef sense
#include <sys/scsicmd.h>
/*
* Warning: you may change this source, but if you do that
* you need to change the _scg_version and _scg_auth* string below.
* You may not return "schily" for an SCG_AUTHOR request anymore.
* Choose your name instead of "schily" and make clear that the version
* string is related to a modified source.
*/
LOCAL char _scg_trans_version[] = "scsi-openserver.c-1.35"; /* The version for this transport*/
#define MAX_SCG 16 /* Max # of cdrom devices */
#define MAX_TGT 16 /* Not really needed */
#define MAX_LUN 8 /* Not really needed */
#define MAX_DMA (64*1024)
#define MAXPATH 256 /* max length of devicepath */
#define MAXLINE 80 /* max length of input line */
#define MAXSCSI 99 /* max number of mscsi lines */
#define MAXDRVN 10 /* max length of drivername */
#define DEV_DIR "/tmp"
#define DEV_NAME "scg.s%1dt%1dl%1d"
/*
* ---------------------------------------------------------------------
* We will only deal with cdroms by default! Only if you set a specific
* environment variable, we will scan "all" devices !
* Set LIBSCG_SCAN_ALL to any value to enable access to all your SCSI
* devices.
*
* The upcoming support for USB will be for USB 1.1, so as this is not
* tested yet, we will currently ignore drives connect to the USB stack
* (usbha controller) regardless of having set LIBSCG_SCAN_ALL or not!
*/
#define DEV_ROOT "/dev/dsk/0s0"
#define DEV_SDSK "/dev/rdsk/%ds0"
#define DEV_SROM "/dev/rcd%d"
#define DEV_STP "/dev/xStp%d"
#define DEV_SFLP "/dev/rdsk/fp%dh"
#define SCAN_DEV "%s%s%d%d%d%d"
#define SCSI_CFG "/etc/sconf -r" /* no. of configured devices */
#define SCSI_DEV "/etc/sconf -g %d" /* read line 'n' of mscsi tbl */
#define DRV_ATAPI "wd" /* SCO OpenServer IDE driver */
#define DRV_USB "usbha" /* SCO OpenServer USB driver */
#define DRV_NOHA "noha" /* IDE/ATAPI device configured, */
/* but missing ! */
#define T_DISK "Sdsk" /* SCO OpenServer SCSI disk */
#define T_CDROM "Srom" /* SCO OpenServer SCSI cdrom */
#define T_TAPE "Stp" /* SCO OpenServer SCSI tape */
#define T_FLOPPY "Sflp" /* SCO OpenServer SCSI floppy */
/*
* ---------------------------------------------------------------------
* Environment variables to control certain functionality
*/
#define SCAN_ALL "LIBSCG_SCAN_ALL" /* enable access for all devices */
#define SCSI_USER_CMD "LIBSCG_SCSIUSERCMD" /* use old SCSIUSERCMD ioctl() */
#define DMA_OVERRIDE "LIBSCG_MAX_DMA" /* override MAX_DMA value */
#define ENABLE_USB "LIBSCG_ENABLE_USB" /* enable access of USB devices */
LOCAL int scan_all = 0; /* don't scan all devices by default */
LOCAL int scsiusercmd = 0; /* use SCSIUSERCMD2 ioctl by default */
LOCAL int enable_usb = 0; /* don't scan USB devices by default */
LOCAL long max_dma = MAX_DMA; /* use MAX_DMA DMA buffer by default */
/*
* ---------------------------------------------------------------------
* There are two scsi passthrough ioctl() on SCO OpenServer 5.0.[45],
* while there is only one available on SCO OpenServer 5.0.[02].
*
* The SCSIUSERCMD ioctl is available on all OpenServer 5
*
* The SCSIUSERCMD2 ioctl which executes the usercmd and reads the sense
* in one go, is only available from 5.0.4 onwards.
*
* By default we will use the SCSIUSERCMD2 ioctl(), in order to execute
* the SCSIUSERCMD ioctl() instead set the environment variable
* LIBSCG_SCSIUSERCMD to any value. Using the olderSCSIUSERCMD ioctl() will
* if the SCSI commands returns a CHECK CONDITION status, run a separate
* REQUEST_SENSE command immediately. But we need to remember that in a
* multi-tasking environment, there might be other code which has accessed
* the device in between these two steps and therefore the sense code
* is no longer valid !!!
*
* NOTE: There are problems with the usage of AHA 154X controllers
* and SCSIUSERCMD2 such as nonsense (weird) output on cdrecord -scanbus
*
*/
typedef struct scg2sdi {
int valid;
int open;
int atapi;
int fd;
int lmscsi;
} scg2sdi_t;
LOCAL scg2sdi_t sdidevs [MAX_SCG][MAX_TGT][MAX_LUN];
typedef struct amscsi {
char typ[MAXDRVN];
char drv[MAXDRVN];
int hba;
int bus;
int scg;
int tgt;
int lun;
char dev[MAXPATH];
} amscsi_t;
struct scg_local {
short scgfiles[MAX_SCG][MAX_TGT][MAX_LUN];
};
#define scglocal(p) ((struct scg_local *)((p)->local))
LOCAL int sort_mscsi __PR((const void *l1, const void *l2));
LOCAL int openserver_init __PR((SCSI *scgp));
LOCAL void cp_scg2sco __PR((struct scsicmd2 *sco, struct scg_cmd *scg));
LOCAL void cp_sco2scg __PR((struct scsicmd2 *sco, struct scg_cmd *scg));
/*
* -------------------------------------------------------------------------
* SCO OpenServer does not have a generic scsi device driver, which can
* be used to access any configured scsi device. But we can use the "Sxxx"
* scsi peripherial drivers passthrough ioctl() (SCSIUSERCMD / SCSIUSERCMD2)
* to send scsi user comands to any target device controlled by the
* corresponding target driver.
*
* This passthrough implementation for libscg currently allows to
* handle the following devices classes:
*
* 1. DISK handled by Sdsk
* 2. CD-ROM handled by Srom
* 3. TAPES handled by Stp
* 4. FLOPPY handled by Sflp
*
* NOTE: The libscg OpenServer passthrough routines have changed with
* cdrecord-1.8 to enable the -scanbus option. Therefore the
* addressing scheme is now the same as used on many other platforms
* like Solaris, Linux etc.
*
* ===============================================================
* RUN 'cdrecord -scanbus' TO SEE THE DEVICE ADDRESSES YOU CAN USE
* ===============================================================
*
*/
/*
* Return version information for the low level SCSI transport code.
* This has been introduced to make it easier to trace down problems
* in applications.
*/
LOCAL char *
scgo_version(scgp, what)
SCSI *scgp;
int what;
{
if (scgp != (SCSI *)0) {
switch (what) {
case SCG_VERSION:
return (_scg_trans_version);
/*
* If you changed this source, you are not allowed to
* return "schily" for the SCG_AUTHOR request.
*/
case SCG_AUTHOR:
return (_scg_auth_schily);
case SCG_SCCS_ID:
return (__sccsid);
}
}
return ((char *)0);
}
LOCAL int
scgo_help(scgp, f)
SCSI *scgp;
FILE *f;
{
__scg_help(f, "SCSIUSERCMD/SCSIUSERCMD2", "Generic SCSI",
"", "bus,target,lun", "1,2,0", TRUE, FALSE);
return (0);
}
/*
* ---------------------------------------------------------------
* This routine sorts the amscsi_t lines on the following columns
* in ascending order:
*
* 1. drv - driver name
* 2. bus - scsibus per controller
* 3. tgt - target id of device
* 4. lun - lun of the device
*
*/
LOCAL int
sort_mscsi(l1, l2)
const void *l1;
const void *l2;
{
amscsi_t *t1 = (amscsi_t *) l1;
amscsi_t *t2 = (amscsi_t *) l2;
if (strcmp(t1->drv, t2->drv) == 0) {
if (t1->bus < t2->bus) {
return (-1);
} else if (t1->bus > t2->bus) {
return (1);
} else if (t1->tgt < t2->tgt) {
return (-1);
} else if (t1->tgt > t2->tgt) {
return (1);
} else if (t1->lun < t2->lun) {
return (-1);
} else if (t1->lun > t2->lun) {
return (1);
} else {
return (0);
}
} else {
return (strcmp(t1->drv, t2->drv));
}
}
/*
* ---------------------------------------------------------------
* This routine is introduced to find all scsi devices which are
* currently configured into the kernel. This is done by reading
* the dynamic kernel mscsi tables and parse the resulting lines.
* As the output of 'sconf' is not directly usable the information
* found is to be sorted and re-arranged to be used with the libscg
* routines.
*
* NOTE: One problem is currently still not solved ! If you don't
* have a media in your CD-ROM/CD-Writer we are not able to
* do an open() and therefore will set the drive to be not
* available (valid=0).
*
* This will for example cause cdrecord to not list the drive
* in the -scanbus output.
*
*/
LOCAL int
openserver_init(scgp)
SCSI *scgp;
{
FILE *cmd;
int nscg = -1, lhba = -1, lbus = -1;
int nSrom = -1, nSdsk = -1, nStp = -1, nSflp = -1;
int atapi, fd, nopen = 0;
int pos = 0, len = 0, nlm = 0;
int s = 0, t = 0, l = 0;
int ide_rootdisk = 0;
long dma_override = 0;
int mscsi;
char sconf[MAXLINE];
char lines[MAXLINE];
char drvid[MAXDRVN];
amscsi_t cmtbl[MAXSCSI];
char dname[MAXPATH];
char **evsave;
extern char **environ;
for (s = 0; s < MAX_SCG; s++) {
for (t = 0; t < MAX_TGT; t++) {
for (l = 0; l < MAX_LUN; l++) {
sdidevs[s][t][l].valid = 0;
sdidevs[s][t][l].open = -1;
sdidevs[s][t][l].atapi = -1;
sdidevs[s][t][l].fd = -1;
sdidevs[s][t][l].lmscsi = -1;
}
}
}
/* Check whether we want to use the older SCSIUSERCMD ioctl() */
if (getenv(SCSI_USER_CMD) != NULL) {
scsiusercmd = 1;
}
/*
* Check whether we want to scan all devices
*/
if (getenv(SCAN_ALL) != NULL) {
scan_all = 1;
}
/*
* Check whether we want to use USB devices
*/
if (getenv(ENABLE_USB) != NULL) {
enable_usb = 1;
}
/*
* Check whether we want to override the MAX_DMA value
*/
if (getenv(DMA_OVERRIDE) != NULL) {
dma_override = atol(getenv(DMA_OVERRIDE));
if ((dma_override >= 1) && (dma_override <= (256)))
max_dma = dma_override * 1024;
}
/* read sconf -r and get number of kernel mscsi lines ! */
evsave = environ;
environ = 0;
if ((cmd = popen(SCSI_CFG, "r")) == NULL) {
if (scgp->errstr)
js_snprintf(scgp->errstr, SCSI_ERRSTR_SIZE,
"Error popen() for \"%s\"",
SCSI_CFG);
environ = evsave;
return (-1);
}
environ = evsave;
if (fgets(lines, MAXLINE, cmd) == NULL) {
errno = EIO;
if (scgp->errstr)
js_snprintf(scgp->errstr, SCSI_ERRSTR_SIZE,
"Error reading popen() for \"%s\"",
SCSI_CFG);
return (-1);
} else
nlm = atoi(lines);
if (scgp->debug > 0) {
js_fprintf((FILE *)scgp->errfile, "-------------------- \n");
js_fprintf((FILE *)scgp->errfile, "mscsi lines = %d\n", nlm);
js_fprintf((FILE *)scgp->errfile, "-------------------- \n");
}
if (pclose(cmd) == -1) {
if (scgp->errstr)
js_snprintf(scgp->errstr, SCSI_ERRSTR_SIZE,
"Error pclose() for \"%s\"",
SCSI_CFG);
return (-1);
}
for (l = 0; l < nlm; l++) {
/* initialize cmtbl entry */
cmtbl[l].hba = -1;
cmtbl[l].bus = -1;
cmtbl[l].tgt = -1;
cmtbl[l].lun = -1;
cmtbl[l].scg = -1;
memset(cmtbl[l].typ, '\0', MAXDRVN);
memset(cmtbl[l].drv, '\0', MAXDRVN);
memset(cmtbl[l].dev, '\0', MAXDRVN);
/* read sconf -g 'n' and get line of kernel mscsi table! */
/* the order the lines will be received in will determine */
/* the device name we can use to open the device */
js_snprintf(sconf, sizeof (sconf),
SCSI_DEV, l + 1); /* enumeration starts with 1 */
evsave = environ;
environ = 0;
if ((cmd = popen(sconf, "r")) == NULL) {
if (scgp->errstr)
js_snprintf(scgp->errstr, SCSI_ERRSTR_SIZE,
"Error popen() for \"%s\"",
sconf);
environ = evsave;
return (-1);
}
environ = evsave;
if (fgets(lines, MAXLINE, cmd) == NULL)
break;
if (pclose(cmd) == -1) {
if (scgp->errstr)
js_snprintf(scgp->errstr, SCSI_ERRSTR_SIZE,
"Error pclose() for \"%s\"",
sconf);
return (-1);
}
sscanf(lines, SCAN_DEV, cmtbl[l].typ,
cmtbl[l].drv,
&cmtbl[l].hba,
&cmtbl[l].bus,
&cmtbl[l].tgt,
&cmtbl[l].lun);
if (strstr(cmtbl[l].typ, T_DISK) != NULL) {
js_snprintf(cmtbl[l].dev, sizeof (cmtbl[l].dev),
DEV_SDSK, ++nSdsk);
}
if (strstr(cmtbl[l].typ, T_CDROM) != NULL) {
js_snprintf(cmtbl[l].dev, sizeof (cmtbl[l].dev),
DEV_SROM, ++nSrom);
}
if (strstr(cmtbl[l].typ, T_TAPE) != NULL) {
js_snprintf(cmtbl[l].dev, sizeof (cmtbl[l].dev),
DEV_STP, ++nStp);
}
if (strstr(cmtbl[l].typ, T_FLOPPY) != NULL) {
js_snprintf(cmtbl[l].dev, sizeof (cmtbl[l].dev),
DEV_SFLP, ++nSflp);
}
if (scgp->debug > 0) {
js_fprintf((FILE *)scgp->errfile,
"%-4s = %5s(%d,%d,%d,%d) -> %s\n",
cmtbl[l].typ,
cmtbl[l].drv,
cmtbl[l].hba,
cmtbl[l].bus,
cmtbl[l].tgt,
cmtbl[l].lun,
cmtbl[l].dev);
}
}
if (scgp->debug > 0) {
js_fprintf((FILE *)scgp->errfile, "-------------------- \n");
js_fprintf((FILE *)scgp->errfile, "%2d DISK \n", nSdsk + 1);
js_fprintf((FILE *)scgp->errfile, "%2d CD-ROM\n", nSrom + 1);
js_fprintf((FILE *)scgp->errfile, "%2d TAPE \n", nStp + 1);
js_fprintf((FILE *)scgp->errfile, "%2d FLOPPY\n", nSflp + 1);
js_fprintf((FILE *)scgp->errfile, "-------------------- \n");
}
/* ok, now let's sort this array of scsi devices */
qsort((void *) cmtbl, nlm, sizeof (amscsi_t), sort_mscsi);
if (scgp->debug > 0) {
for (l = 0; l < nlm; l++)
js_fprintf((FILE *)scgp->errfile,
"%-4s = %5s(%d,%d,%d,%d) -> %s\n",
cmtbl[l].typ,
cmtbl[l].drv,
cmtbl[l].hba,
cmtbl[l].bus,
cmtbl[l].tgt,
cmtbl[l].lun,
cmtbl[l].dev);
js_fprintf((FILE *)scgp->errfile, "-------------------- \n");
}
/* find root disk controller to make it scg 0 */
/*
* if we have disk(s) found in the mscsi table, we still
* don't know if the rootdisk is among these, there can
* be a IDE rootdisk as well, but it's not listed in
* the mscsi table.
*/
t = 0;
if (nSdsk > 0) {
for (l = 0; l < nlm; l++)
if (strcmp(cmtbl[l].dev, DEV_ROOT) == 0)
t = l;
} else {
/*
* we haven't found a disk in mscsi, so we definitely
* have an IDE disk on a wd adapter as IDE disks are
* not listed as SCSI disks in the kernel mscsi table
*/
ide_rootdisk = 1;
}
if (!(ide_rootdisk) && (scgp->debug > 0)) {
js_fprintf((FILE *)scgp->errfile,
"root = %5s(%d,%d,%d,%d) -> %s\n",
cmtbl[t].drv,
cmtbl[t].hba,
cmtbl[t].bus,
cmtbl[t].tgt,
cmtbl[t].lun,
cmtbl[t].dev);
js_fprintf((FILE *)scgp->errfile, "-------------------- \n");
}
/* calculate scg from drv, hba and bus */
strcpy(drvid, "");
for (l = 0, s = t; l < nlm; l++, s = (t + l) % nlm) {
if (strcmp(drvid, cmtbl[s].drv) != 0) {
strcpy(drvid, cmtbl[s].drv);
lhba = cmtbl[s].hba;
lbus = cmtbl[s].bus;
cmtbl[s].scg = ++nscg;
} else if (cmtbl[s].hba != lhba) {
lhba = cmtbl[s].hba;
lbus = cmtbl[s].bus;
cmtbl[s].scg = ++nscg;
} else if (cmtbl[s].bus != lbus) {
lbus = cmtbl[s].bus;
cmtbl[s].scg = ++nscg;
} else {
cmtbl[s].scg = nscg;
}
sdidevs[cmtbl[s].scg][cmtbl[s].tgt][cmtbl[s].lun].open = 0;
/* check whether we want to open all devices or it's a CDROM */
if ((scan_all) || (strcmp(cmtbl[s].typ, T_CDROM) == 0))
sdidevs[cmtbl[s].scg][cmtbl[s].tgt][cmtbl[s].lun].valid = 1;
/* check whether we have an IDE/ATAPI device */
if (strcmp(cmtbl[s].drv, DRV_ATAPI) == 0)
sdidevs[cmtbl[s].scg][cmtbl[s].tgt][cmtbl[s].lun].atapi = 1;
/* don't open a USB device if enable_usb is not set */
if (strcmp(cmtbl[s].drv, DRV_USB) == 0)
sdidevs[cmtbl[s].scg][cmtbl[s].tgt][cmtbl[s].lun].valid = enable_usb;
/* don't open a IDE/ATAPI device which is missing but configured */
if (strcmp(cmtbl[s].drv, DRV_NOHA) == 0)
sdidevs[cmtbl[s].scg][cmtbl[s].tgt][cmtbl[s].lun].valid = 0;
sdidevs[cmtbl[s].scg][cmtbl[s].tgt][cmtbl[s].lun].lmscsi = s;
}
/* open all yet valid device nodes */
for (s = 0; s < MAX_SCG; s++) {
for (t = 0; t < MAX_TGT; t++) {
for (l = 0; l < MAX_LUN; l++) {
if (sdidevs[s][t][l].valid == 0)
continue;
/* Open pass-through device node */
mscsi = sdidevs[s][t][l].lmscsi;
strcpy(dname, cmtbl[mscsi].dev);
/*
* ------------------------------------------------------------------
* NOTE: If we can't open the device, we will set the device invalid!
* ------------------------------------------------------------------
*/
errno = 0;
if ((fd = open(dname, (O_RDONLY | O_NONBLOCK))) < 0) {
sdidevs[s][t][l].valid = 0;
if (scgp->debug > 0) {
js_fprintf((FILE *)scgp->errfile,
"%5s(%d,%d,%d,%d) -> %s open() failed: errno = %d (%s)\n",
cmtbl[mscsi].drv,
cmtbl[mscsi].hba,
cmtbl[mscsi].bus,
cmtbl[mscsi].tgt,
cmtbl[mscsi].lun,
cmtbl[mscsi].dev,
errno,
strerror(errno));
}
continue;
}
if (scgp->debug > 0) {
js_fprintf((FILE *)scgp->errfile,
"%d,%d,%d => %5s(%d,%d,%d,%d) -> %d : %s \n",
s, t, l,
cmtbl[mscsi].drv,
cmtbl[mscsi].hba,
cmtbl[mscsi].bus,
cmtbl[mscsi].tgt,
cmtbl[mscsi].lun,
cmtbl[mscsi].scg,
cmtbl[mscsi].dev);
}
sdidevs[s][t][l].fd = fd;
sdidevs[s][t][l].open = 1;
nopen++;
scglocal(scgp)->scgfiles[s][t][l] = (short) fd;
}
}
}
if (scgp->debug > 0) {
js_fprintf((FILE *)scgp->errfile, "-------------------- \n");
js_fprintf((FILE *)scgp->errfile, "nopen = %d devices \n", nopen);
js_fprintf((FILE *)scgp->errfile, "-------------------- \n");
}
return (nopen);
}
LOCAL int
scgo_open(scgp, device)
SCSI *scgp;
char *device;
{
int busno = scg_scsibus(scgp);
int tgt = scg_target(scgp);
int tlun = scg_lun(scgp);
int f, b, t, l;
int nopen = 0;
char devname[64];
if (busno >= MAX_SCG || tgt >= MAX_TGT || tlun >= MAX_LUN) {
errno = EINVAL;
if (scgp->errstr)
js_snprintf(scgp->errstr, SCSI_ERRSTR_SIZE,
"Illegal value for busno, target or lun '%d,%d,%d'",
busno, tgt, tlun);
return (-1);
}
if (scgp->local == NULL) {
scgp->local = malloc(sizeof (struct scg_local));
if (scgp->local == NULL)
return (0);
for (b = 0; b < MAX_SCG; b++) {
for (t = 0; t < MAX_TGT; t++) {
for (l = 0; l < MAX_LUN; l++)
scglocal(scgp)->scgfiles[b][t][l] = (short)-1;
}
}
}
if (*device != '\0') { /* we don't allow old dev usage */
errno = EINVAL;
if (scgp->errstr)
js_snprintf(scgp->errstr, SCSI_ERRSTR_SIZE,
"Open by 'devname' no longer supported on this OS");
return (-1);
}
return (openserver_init(scgp));
}
LOCAL int
scgo_close(scgp)
SCSI *scgp;
{
register int f;
register int b;
register int t;
register int l;
if (scgp->local == NULL)
return (-1);
for (b = 0; b < MAX_SCG; b++) {
for (t = 0; t < MAX_TGT; t++) {
for (l = 0; l < MAX_LUN; l++) {
f = scglocal(scgp)->scgfiles[b][t][l];
if (f >= 0)
close(f);
sdidevs[b][t][l].fd = -1;
sdidevs[b][t][l].open = 0;
sdidevs[b][t][l].valid = 0;
scglocal(scgp)->scgfiles[b][t][l] = (short)-1;
}
}
}
return (0);
}
LOCAL long
scgo_maxdma(scgp, amt)
SCSI *scgp;
long amt;
{
return (max_dma);
}
LOCAL void *
scgo_getbuf(scgp, amt)
SCSI *scgp;
long amt;
{
if (scgp->debug > 0) {
js_fprintf((FILE *)scgp->errfile,
"scgo_getbuf: %ld bytes\n", amt);
}
scgp->bufbase = valloc((size_t)(amt));
return (scgp->bufbase);
}
LOCAL void
scgo_freebuf(scgp)
SCSI *scgp;
{
if (scgp->bufbase)
free(scgp->bufbase);
scgp->bufbase = NULL;
}
LOCAL int
scgo_numbus(scgp)
SCSI *scgp;
{
return (MAX_SCG);
}
LOCAL BOOL
scgo_havebus(scgp, busno)
SCSI *scgp;
int busno;
{
register int t;
register int l;
if (busno < 0 || busno >= MAX_SCG)
return (FALSE);
if (scgp->local == NULL)
return (FALSE);
for (t = 0; t < MAX_TGT; t++) {
for (l = 0; l < MAX_LUN; l++)
if (scglocal(scgp)->scgfiles[busno][t][l] >= 0)
return (TRUE);
}
return (FALSE);
}
LOCAL int
scgo_fileno(scgp, busno, tgt, tlun)
SCSI *scgp;
int busno;
int tgt;
int tlun;
{
if (busno < 0 || busno >= MAX_SCG ||
tgt < 0 || tgt >= MAX_TGT ||
tlun < 0 || tlun >= MAX_LUN)
return (-1);
if (scgp->local == NULL)
return (-1);
return ((int)scglocal(scgp)->scgfiles[busno][tgt][tlun]);
}
LOCAL int
scgo_initiator_id(scgp)
SCSI *scgp;
{
return (-1);
/*
* We don't know the initiator ID yet, but we can if we parse the
* output of the command 'cat /dev/string/cfg | grep "%adapter"'
*
* Sample line:
*
* %adapter 0xE800-0xE8FF 11 - type=alad ha=0 bus=0 id=7 fts=sto
*
* This tells us that the alad controller 0 has an id of 7 !
* The parsing should be done in openserver_init().
*
*/
}
LOCAL int
scgo_isatapi(scgp)
SCSI *scgp;
{
return (sdidevs[scg_scsibus(scgp)][scg_target(scgp)][scg_lun(scgp)].atapi);
}
LOCAL int
scgo_reset(scgp, what)
SCSI *scgp;
int what;
{
errno = EINVAL;
return (-1); /* no scsi reset available */
}
LOCAL void
cp_scg2sco(sco, scg)
struct scsicmd2 *sco;
struct scg_cmd *scg;
{
sco->cmd.data_ptr = (char *) scg->addr;
sco->cmd.data_len = scg->size;
sco->cmd.cdb_len = scg->cdb_len;
sco->sense_len = scg->sense_len;
sco->sense_ptr = scg->u_sense.cmd_sense;
if (!(scg->flags & SCG_RECV_DATA) && (scg->size > 0))
sco->cmd.is_write = 1;
if (scg->cdb_len == SC_G0_CDBLEN)
memcpy(sco->cmd.cdb, &scg->cdb.g0_cdb, scg->cdb_len);
if (scg->cdb_len == SC_G1_CDBLEN)
memcpy(sco->cmd.cdb, &scg->cdb.g1_cdb, scg->cdb_len);
if (scg->cdb_len == SC_G5_CDBLEN)
memcpy(sco->cmd.cdb, &scg->cdb.g5_cdb, scg->cdb_len);
}
LOCAL void
cp_sco2scg(sco, scg)
struct scsicmd2 *sco;
struct scg_cmd *scg;
{
scg->size = sco->cmd.data_len;
memset(&scg->scb, 0, sizeof (scg->scb));
if (sco->sense_len > SCG_MAX_SENSE)
scg->sense_count = SCG_MAX_SENSE;
else
scg->sense_count = sco->sense_len;
scg->resid = 0;
scg->u_scb.cmd_scb[0] = sco->cmd.target_sts;
}
LOCAL int
scgo_send(scgp)
SCSI *scgp;
{
struct scg_cmd *sp = scgp->scmd;
struct scsicmd2 scsi_cmd;
int i;
Uchar sense_buf[SCG_MAX_SENSE];
if (scgp->fd < 0) {
sp->error = SCG_FATAL;
return (0);
}
memset(&scsi_cmd, 0, sizeof (scsi_cmd));
memset(sense_buf, 0, sizeof (sense_buf));
scsi_cmd.sense_ptr = sense_buf;
scsi_cmd.sense_len = sizeof (sense_buf);
cp_scg2sco(&scsi_cmd, sp);
errno = 0;
sp->ux_errno = 0;
sp->error = SCG_NO_ERROR;
for (;;) {
int ioctlStatus;
struct scsicmd s_cmd;
if (scsiusercmd) { /* Use SCSIUSERCMD ioctl() */
if (scgp->debug > 1) {
js_fprintf((FILE *)scgp->errfile, "calling SCSIUSERCMD ioctl()\n");
}
if ((ioctlStatus = ioctl(scgp->fd, SCSIUSERCMD, &(scsi_cmd.cmd))) < 0) {
if (scgp->debug > 1) {
js_fprintf((FILE *)scgp->errfile, "returning from SCSIUSERCMD ioctl()\n");
}
if (errno == EINTR)
continue;
cp_sco2scg(&scsi_cmd, sp);
sp->ux_errno = errno;
if (errno == 0)
sp->ux_errno = EIO;
sp->error = SCG_RETRYABLE;
return (0);
}
if (scgp->debug > 1) {
js_fprintf((FILE *)scgp->errfile, "returning from SCSIUSERCMD ioctl()\n");
}
cp_sco2scg(&scsi_cmd, sp);
sp->ux_errno = errno;
if (scsi_cmd.cmd.target_sts & 0x02) { /* Check Condition & get Sense */
if (sp->sense_len > SCG_MAX_SENSE)
sp->sense_len = SCG_MAX_SENSE;
memset((caddr_t)&s_cmd, 0, sizeof (s_cmd));
s_cmd.data_ptr = (caddr_t) sp->u_sense.cmd_sense;
s_cmd.data_len = sp->sense_len;
s_cmd.is_write = 0;
s_cmd.cdb[0] = SC_REQUEST_SENSE;
while (((ioctlStatus = ioctl(scgp->fd, SCSIUSERCMD, &s_cmd)) < 0) &&
(errno == EINTR))
;
sp->sense_count = sp->sense_len;
sp->ux_errno = errno;
if (errno == 0)
sp->ux_errno = EIO;
sp->error = SCG_NO_ERROR;
}
if (scgp->debug > 0) {
if (errno != 0)
js_fprintf((FILE *)scgp->errfile,
"ux_errno: %d (%s) \n",
sp->ux_errno, strerror(sp->ux_errno));
if (sp->u_scb.cmd_scb[0] != 0)
js_fprintf((FILE *)scgp->errfile,
"tgt_stat: %d \n",
sp->u_scb.cmd_scb[0]);
}
break;
} else { /* Use SCSIUSERCMD2 ioctl() */
if (scgp->debug > 1) {
js_fprintf((FILE *)scgp->errfile, "calling SCSIUSERCMD2 ioctl()\n");
}
if ((ioctlStatus = ioctl(scgp->fd, SCSIUSERCMD2, &scsi_cmd)) < 0) {
if (scgp->debug > 1) {
js_fprintf((FILE *)scgp->errfile, "returning from SCSIUSERCMD2 ioctl()\n");
}
if (errno == EINTR)
continue;
cp_sco2scg(&scsi_cmd, sp);
sp->ux_errno = errno;
if (errno == 0)
sp->ux_errno = EIO;
sp->error = SCG_RETRYABLE;
return (0);
}
if (scgp->debug > 1) {
js_fprintf((FILE *)scgp->errfile, "returning from SCSIUSERCMD2 ioctl()\n");
}
cp_sco2scg(&scsi_cmd, sp);
sp->ux_errno = errno;
if (scsi_cmd.cmd.target_sts & 0x02) { /* Check Condition */
if (errno == 0)
sp->ux_errno = EIO;
sp->error = SCG_NO_ERROR;
}
if (scgp->debug > 0) {
if (errno != 0)
js_fprintf((FILE *)scgp->errfile,
"ux_errno: %d (%s) \n",
sp->ux_errno, strerror(sp->ux_errno));
if (sp->u_scb.cmd_scb[0] != 0)
js_fprintf((FILE *)scgp->errfile,
"tgt_stat: %d \n",
sp->u_scb.cmd_scb[0]);
}
break;
}
}
return (0);
}
#define sense u_sense.Sense
Reference in New Issue View Git Blame Copy Permalink