projects / unix-history / blob
? search:
summary | tags | clone url | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
This commit was manufactured by cvs2svn to create tag 'FreeBSD-release/1.0'.
[unix-history] / sys / scsi / cd.c
/*
* Written by Julian Elischer (julian@tfs.com)
* for TRW Financial Systems for use under the MACH(2.5) operating system.
*
* TRW Financial Systems, in accordance with their agreement with Carnegie
* Mellon University, makes this software available to CMU to distribute
* or use in any manner that they see fit as long as this message is kept with
* the software. For this reason TFS also grants any other persons or
* organisations permission to use or modify this software.
*
* TFS supplies this software to be publicly redistributed
* on the understanding that TFS is not responsible for the correct
* functioning of this software in any circumstances.
*
* Ported to run under 386BSD by Julian Elischer (julian@tfs.com) Sept 1992
*
* $Id: cd.c,v 1.9 1993/09/20 06:27:02 rgrimes Exp $
*/
#define SPLCD splbio
#define ESUCCESS 0
#include <cd.h>
#include <sys/types.h>
#include <sys/param.h>
#include <sys/dkbad.h>
#include <sys/systm.h>
#include <sys/conf.h>
#include <sys/file.h>
#include <sys/stat.h>
#include <sys/ioctl.h>
#include <sys/buf.h>
#include <sys/uio.h>
#include <sys/malloc.h>
#include <sys/cdio.h>
#include <sys/errno.h>
#include <sys/disklabel.h>
#include <scsi/scsi_all.h>
#include <scsi/scsi_cd.h>
#include <scsi/scsi_disk.h> /* rw_big and start_stop come from there */
#include <scsi/scsiconf.h>
long int cdstrats,cdqueues;
#include <ddb.h>
#if NDDB > 0
int Debugger();
#else NDDB > 0
#define Debugger()
#endif NDDB > 0
#define PAGESIZ 4096
#define SECSIZE 2048 /* XXX */ /* default only */
#define CDOUTSTANDING 2
#define CDQSIZE 4
#define CD_RETRIES 4
#define UNITSHIFT 3
#define PARTITION(z) (minor(z) & 0x07)
#define RAW_PART 3
#define UNIT(z) ( (minor(z) >> UNITSHIFT) )
extern int hz;
int cd_done();
int cdstrategy();
int cd_debug = 0;
struct cd_data
{
int flags;
#define CDVALID 0x02 /* PARAMS LOADED */
#define CDINIT 0x04 /* device has been init'd */
#define CDWAIT 0x08 /* device has someone waiting */
#define CDHAVELABEL 0x10 /* have read the label */
struct scsi_switch *sc_sw; /* address of scsi low level switch */
int ctlr; /* so they know which one we want */
int targ; /* our scsi target ID */
int lu; /* out scsi lu */
int cmdscount; /* cmds allowed outstanding by board*/
struct cd_parms
{
int blksize;
u_long disksize; /* total number sectors */
}params;
struct disklabel disklabel;
int partflags[MAXPARTITIONS]; /* per partition flags */
#define CDOPEN 0x01
int openparts; /* one bit for each open partition */
int xfer_block_wait;
struct scsi_xfer *free_xfer;
struct scsi_xfer scsi_xfer[CDOUTSTANDING]; /* XXX */
struct buf buf_queue;
};
#define CD_STOP 0
#define CD_START 1
#define CD_EJECT -2
struct cd_driver
{
int size;
struct cd_data **cd_data;
}*cd_driver;
static int next_cd_unit = 0;
/***********************************************************************\
* The routine called by the low level scsi routine when it discovers *
* A device suitable for this driver *
\***********************************************************************/
int cdattach(ctlr,targ,lu,scsi_switch)
struct scsi_switch *scsi_switch;
{
int unit,i;
unsigned char *tbl;
struct cd_data *cd, **cdrealloc;
struct cd_parms *dp;
#ifdef CDDEBUG
if(scsi_debug & PRINTROUTINES) printf("cdattach: ");
#endif /*CDDEBUG*/
/*******************************************************\
* Check if we have resources allocated yet, if not *
* allocate and initialize them *
\*******************************************************/
if (next_cd_unit == 0)
{
cd_driver =
malloc(sizeof(struct cd_driver),M_DEVBUF,M_NOWAIT);
if(!cd_driver)
{
printf("cd%d: malloc failed for cd_driver\n",unit);
return(0);
}
bzero(cd_driver,sizeof(cd_driver));
cd_driver->size = 0;
}
/*******************************************************\
* allocate the resources for another drive *
* if we have already allocate a cd_data pointer we must *
* copy the old pointers into a new region that is *
* larger and release the old region, aka realloc *
\*******************************************************/
unit = next_cd_unit++;
/* XXX
* This if will always be true for now, but future code may
* preallocate more units to reduce overhead. This would be
* done by changing the malloc to be (next_cd_unit * x) and
* the cd_driver->size++ to be +x
*/
if(unit >= cd_driver->size)
{
cdrealloc =
malloc(sizeof(cd_driver->cd_data) * next_cd_unit,
M_DEVBUF,M_NOWAIT);
if(!cdrealloc)
{
printf("cd%d: malloc failed for cdrealloc\n",unit);
return(0);
}
/* Make sure we have something to copy before we copy it */
bzero(cdrealloc,sizeof(cd_driver->cd_data) * next_cd_unit);
if(cd_driver->size)
{
bcopy(cd_driver->cd_data,cdrealloc,
sizeof(cd_driver->cd_data) * cd_driver->size);
free(cd_driver->cd_data,M_DEVBUF);
}
cd_driver->cd_data = cdrealloc;
cd_driver->cd_data[unit] = NULL;
cd_driver->size++;
}
if(cd_driver->cd_data[unit])
{
printf("cd%d: Already has storage!\n",unit);
return(0);
}
/*******************************************************\
* allocate the per drive data area *
\*******************************************************/
cd = cd_driver->cd_data[unit] =
malloc(sizeof(struct cd_data),M_DEVBUF,M_NOWAIT);
if(!cd)
{
printf("cd%d: malloc failed for cd_data\n",unit);
return(0);
}
bzero(cd,sizeof(struct cd_data));
dp = &(cd->params);
/*******************************************************\
* Store information needed to contact our base driver *
\*******************************************************/
cd->sc_sw = scsi_switch;
cd->ctlr = ctlr;
cd->targ = targ;
cd->lu = lu;
cd->cmdscount = CDOUTSTANDING; /* XXX (ask the board) */
i = cd->cmdscount;
while(i-- )
{
cd->scsi_xfer[i].next = cd->free_xfer;
cd->free_xfer = &cd->scsi_xfer[i];
}
/*******************************************************\
* Use the subdriver to request information regarding *
* the drive. We cannot use interrupts yet, so the *
* request must specify this. *
\*******************************************************/
cd_get_parms(unit, SCSI_NOSLEEP | SCSI_NOMASK);
if(dp->disksize)
{
printf("cd%d: cd present.[%d x %d byte records]\n",
unit,
cd->params.disksize,
cd->params.blksize);
}
else
{
printf("cd%d: drive empty\n", unit);
}
cd->flags |= CDINIT;
return;
}
/*******************************************************\
* open the device. Make sure the partition info *
* is a up-to-date as can be. *
\*******************************************************/
cdopen(dev)
{
int errcode = 0;
int unit, part;
struct cd_parms cd_parms;
struct cd_data *cd;
unit = UNIT(dev);
part = PARTITION(dev);
#ifdef CDDEBUG
if(scsi_debug & (PRINTROUTINES | TRACEOPENS))
printf("cdopen: dev=0x%x (unit %d (of %d),partition %d)\n"
,dev,unit,cd_driver->size,part);
#endif /*CDDEBUG*/
/*******************************************************\
* Check the unit is legal *
\*******************************************************/
if ( unit >= cd_driver->size )
{
return(ENXIO);
}
cd = cd_driver->cd_data[unit];
/*******************************************************\
* Make sure the device has been initialised *
\*******************************************************/
if ((cd == NULL) || (!(cd->flags & CDINIT)))
return(ENXIO);
/*******************************************************\
* If it's been invalidated, and not everybody has *
* closed it then forbid re-entry. *
* (may have changed media) *
\*******************************************************/
if ((! (cd->flags & CDVALID))
&& ( cd->openparts))
return(ENXIO);
/*******************************************************\
* Check that it is still responding and ok. *
* if the media has been changed this will result in a *
* "unit attention" error which the error code will *
* disregard because the CDVALID flag is not yet set *
\*******************************************************/
cd_test_ready(unit, SCSI_SILENT);
/*******************************************************\
* Next time actually take notice of error returns *
\*******************************************************/
if (cd_test_ready(unit, SCSI_SILENT) != 0) {
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("not ready\n");
#endif /*CDDEBUG*/
return(ENXIO);
}
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("Device present\n");
#endif /*CDDEBUG*/
/*******************************************************\
* In case it is a funny one, tell it to start *
* not needed for some drives *
\*******************************************************/
cd_start_unit(unit,part,CD_START);
cd_prevent_unit(unit,PR_PREVENT,SCSI_SILENT);
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("started ");
#endif /*CDDEBUG*/
/*******************************************************\
* Load the physical device parameters *
\*******************************************************/
cd_get_parms(unit, 0);
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("Params loaded ");
#endif /*CDDEBUG*/
/*******************************************************\
* Load the partition info if not already loaded *
\*******************************************************/
cdgetdisklabel(unit);
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("Disklabel fabricated ");
#endif /*CDDEBUG*/
/*******************************************************\
* Check the partition is legal *
\*******************************************************/
if (( part >= cd->disklabel.d_npartitions )
&& (part != RAW_PART))
{
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("partition %d > %d\n",part
,cd->disklabel.d_npartitions);
#endif /*CDDEBUG*/
cd_prevent_unit(unit,PR_ALLOW,SCSI_SILENT);
return(ENXIO);
}
/*******************************************************\
* Check that the partition exists *
\*******************************************************/
if (( cd->disklabel.d_partitions[part].p_fstype != FS_UNUSED )
|| (part == RAW_PART))
{
cd->partflags[part] |= CDOPEN;
cd->openparts |= (1 << part);
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("open complete\n");
#endif /*CDDEBUG*/
cd->flags |= CDVALID;
}
else
{
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("part %d type UNUSED\n",part);
#endif /*CDDEBUG*/
cd_prevent_unit(unit,PR_ALLOW,SCSI_SILENT);
return(ENXIO);
}
return(0);
}
/*******************************************************\
* Get ownership of a scsi_xfer structure *
* If need be, sleep on it, until it comes free *
\*******************************************************/
struct scsi_xfer *cd_get_xs(unit,flags)
int flags;
int unit;
{
struct scsi_xfer *xs;
struct cd_data *cd;
int s;
cd = cd_driver->cd_data[unit];
if(flags & (SCSI_NOSLEEP | SCSI_NOMASK))
{
if (xs = cd->free_xfer)
{
cd->free_xfer = xs->next;
xs->flags = 0;
}
}
else
{
s = SPLCD();
while (!(xs = cd->free_xfer))
{
cd->xfer_block_wait++; /* someone waiting! */
sleep((caddr_t)&cd->free_xfer, PRIBIO+1);
cd->xfer_block_wait--;
}
cd->free_xfer = xs->next;
splx(s);
xs->flags = 0;
}
return(xs);
}
/*******************************************************\
* Free a scsi_xfer, wake processes waiting for it *
\*******************************************************/
cd_free_xs(unit,xs,flags)
struct scsi_xfer *xs;
int unit;
int flags;
{
struct cd_data *cd;
int s;
cd = cd_driver->cd_data[unit];
if(flags & SCSI_NOMASK)
{
if (cd->xfer_block_wait)
{
printf("cd%d: doing a wakeup from NOMASK mode\n", unit);
wakeup((caddr_t)&cd->free_xfer);
}
xs->next = cd->free_xfer;
cd->free_xfer = xs;
}
else
{
s = SPLCD();
if (cd->xfer_block_wait)
wakeup((caddr_t)&cd->free_xfer);
xs->next = cd->free_xfer;
cd->free_xfer = xs;
splx(s);
}
}
/*******************************************************\
* trim the size of the transfer if needed, *
* called by physio *
* basically the smaller of our max and the scsi driver's*
* minphys (note we have no max ourselves) *
\*******************************************************/
/* Trim buffer length if buffer-size is bigger than page size */
void cdminphys(bp)
struct buf *bp;
{
(*(cd_driver->cd_data[UNIT(bp->b_dev)]->sc_sw->scsi_minphys))(bp);
}
/*******************************************************\
* Actually translate the requested transfer into *
* one the physical driver can understand *
* The transfer is described by a buf and will include *
* only one physical transfer. *
\*******************************************************/
int cdstrategy(bp)
struct buf *bp;
{
struct buf *dp;
unsigned int opri;
struct cd_data *cd;
int unit;
cdstrats++;
unit = UNIT((bp->b_dev));
cd = cd_driver->cd_data[unit];
#ifdef CDDEBUG
if(scsi_debug & PRINTROUTINES) printf("\ncdstrategy ");
if(scsi_debug & SHOWREQUESTS) printf("cd%d: %d bytes @ blk%d\n",
unit,bp->b_bcount,bp->b_blkno);
#endif /*CDDEBUG*/
cdminphys(bp);
/*******************************************************\
* If the device has been made invalid, error out *
* maybe the media changed *
\*******************************************************/
if(!(cd->flags & CDVALID))
{
bp->b_error = EIO;
goto bad;
}
/*******************************************************\
* can't ever write to a CD *
\*******************************************************/
if ((bp->b_flags & B_READ) == 0) {
bp->b_error = EROFS;
goto bad;
}
/*******************************************************\
* If it's a null transfer, return immediatly *
\*******************************************************/
if (bp->b_bcount == 0) {
goto done;
}
/*******************************************************\
* Decide which unit and partition we are talking about *
\*******************************************************/
if(PARTITION(bp->b_dev) != RAW_PART)
{
if (!(cd->flags & CDHAVELABEL))
{
bp->b_error = EIO;
goto bad;
}
/*
* do bounds checking, adjust transfer. if error, process.
* if end of partition, just return
*/
if (bounds_check_with_label(bp,&cd->disklabel,1) <= 0)
goto done;
/* otherwise, process transfer request */
}
opri = SPLCD();
dp = &cd->buf_queue;
/*******************************************************\
* Place it in the queue of disk activities for this disk*
\*******************************************************/
disksort(dp, bp);
/*******************************************************\
* Tell the device to get going on the transfer if it's *
* not doing anything, otherwise just wait for completion*
\*******************************************************/
cdstart(unit);
splx(opri);
return;
bad:
bp->b_flags |= B_ERROR;
done:
/*******************************************************\
* Correctly set the buf to indicate a completed xfer *
\*******************************************************/
bp->b_resid = bp->b_bcount;
biodone(bp);
return;
}
/***************************************************************\
* cdstart looks to see if there is a buf waiting for the device *
* and that the device is not already busy. If both are true, *
* It deques the buf and creates a scsi command to perform the *
* transfer in the buf. The transfer request will call cd_done *
* on completion, which will in turn call this routine again *
* so that the next queued transfer is performed. *
* The bufs are queued by the strategy routine (cdstrategy) *
* *
* This routine is also called after other non-queued requests *
* have been made of the scsi driver, to ensure that the queue *
* continues to be drained. *
* *
* must be called at the correct (highish) spl level *
\***************************************************************/
/* cdstart() is called at SPLCD from cdstrategy and cd_done*/
cdstart(unit)
int unit;
{
register struct buf *bp = 0;
register struct buf *dp;
struct scsi_xfer *xs;
struct scsi_rw_big cmd;
int blkno, nblk;
struct cd_data *cd;
struct partition *p ;
#ifdef CDDEBUG
if(scsi_debug & PRINTROUTINES) printf("cdstart%d ",unit);
#endif /*CDDEBUG*/
cd = cd_driver->cd_data[unit];
/*******************************************************\
* See if there is a buf to do and we are not already *
* doing one *
\*******************************************************/
if(!cd->free_xfer)
{
return; /* none for us, unit already underway */
}
if(cd->xfer_block_wait) /* there is one, but a special waits */
{
return; /* give the special that's waiting a chance to run */
}
dp = &cd->buf_queue;
if ((bp = dp->b_actf) != NULL) /* yes, an assign */
{
dp->b_actf = bp->av_forw;
}
else
{
return;
}
xs=cd_get_xs(unit,0); /* ok we can grab it */
xs->flags = INUSE; /* Now ours */
/***************************************************************\
* Should reject all queued entries if CDVALID is not true *
\***************************************************************/
if(!(cd->flags & CDVALID))
{
goto bad; /* no I/O.. media changed or something */
}
/*******************************************************\
* We have a buf, now we should move the data into *
* a scsi_xfer definition and try start it *
* *
* First, translate the block to absolute *
* and put it in terms of the logical blocksize of the *
* device.. *
* really a bit silly until we have real partitions, but.*
\*******************************************************/
blkno = bp->b_blkno / (cd->params.blksize/512);
if(PARTITION(bp->b_dev) != RAW_PART)
{
p = cd->disklabel.d_partitions + PARTITION(bp->b_dev);
blkno += p->p_offset;
}
nblk = (bp->b_bcount + (cd->params.blksize - 1)) / (cd->params.blksize);
/* what if something asks for 512 bytes not on a 2k boundary? *//*XXX*/
/*******************************************************\
* Fill out the scsi command *
\*******************************************************/
bzero(&cmd, sizeof(cmd));
cmd.op_code = READ_BIG;
cmd.addr_3 = (blkno & 0xff000000) >> 24;
cmd.addr_2 = (blkno & 0xff0000) >> 16;
cmd.addr_1 = (blkno & 0xff00) >> 8;
cmd.addr_0 = blkno & 0xff;
cmd.length2 = (nblk & 0xff00) >> 8;
cmd.length1 = (nblk & 0xff);
/*******************************************************\
* Fill out the scsi_xfer structure *
* Note: we cannot sleep as we may be an interrupt *
\*******************************************************/
xs->flags |= SCSI_NOSLEEP;
xs->adapter = cd->ctlr;
xs->targ = cd->targ;
xs->lu = cd->lu;
xs->retries = CD_RETRIES;
xs->timeout = 10000;/* 10000 millisecs for a disk !*/
xs->cmd = (struct scsi_generic *)&cmd;
xs->cmdlen = sizeof(cmd);
xs->resid = bp->b_bcount;
xs->when_done = cd_done;
xs->done_arg = unit;
xs->done_arg2 = (int)xs;
xs->error = XS_NOERROR;
xs->bp = bp;
xs->data = (u_char *)bp->b_un.b_addr;
xs->datalen = bp->b_bcount;
/*******************************************************\
* Pass all this info to the scsi driver. *
\*******************************************************/
if ( (*(cd->sc_sw->scsi_cmd))(xs) != SUCCESSFULLY_QUEUED)
{
printf("cd%d: oops not queued",unit);
goto bad;
}
cdqueues++;
return;
bad: xs->error = XS_DRIVER_STUFFUP;
cd_done(unit,xs);
}
/*******************************************************\
* This routine is called by the scsi interrupt when *
* the transfer is complete. (or failed) *
\*******************************************************/
int cd_done(unit,xs)
int unit;
struct scsi_xfer *xs;
{
struct buf *bp;
int retval;
struct cd_data *cd = cd_driver->cd_data[unit];
#ifdef CDDEBUG
if(scsi_debug & PRINTROUTINES) printf("cd_done%d ",unit);
#endif /*CDDEBUG*/
#ifdef PARANOIA
if (! (xs->flags & INUSE)) /* paranoia always pays off */
panic("scsi_xfer not in use!");
#endif /*PARANOIA*/
if(!(bp = xs->bp))
{
wakeup(xs);
return 0;
}
switch(xs->error)
{
case XS_NOERROR:
bp->b_error = 0;
bp->b_resid = 0;
break;
case XS_SENSE:
retval = (cd_interpret_sense(unit,xs));
if(retval)
{
bp->b_flags |= B_ERROR;
bp->b_error = retval;
}
break;
case XS_TIMEOUT:
printf("cd%d timeout\n",unit);
case XS_BUSY:
/***********************************\
* Just resubmit it straight back to *
* the SCSI driver to try it again *
\***********************************/
if(xs->retries--)
{
xs->error = XS_NOERROR;
xs->flags &= ~ITSDONE;
if ((*(cd->sc_sw->scsi_cmd))(xs)
== SUCCESSFULLY_QUEUED)
{ /* shhh! don't wake the job, ok? */
/* don't tell cdstart either, */
return 0;
}
/* xs->error is set by the scsi driver */
} /* Fall through */
case XS_DRIVER_STUFFUP:
bp->b_flags |= B_ERROR;
bp->b_error = EIO;
break;
default:
printf("cd%d: unknown error category from scsi driver\n"
,unit);
}
biodone(bp);
cd_free_xs(unit,xs,0);
cdstart(unit); /* If there's anything waiting.. do it */
return 0;
}
/*******************************************************\
* Perform special action on behalf of the user *
* Knows about the internals of this device *
\*******************************************************/
cdioctl(dev_t dev, int cmd, caddr_t addr, int flag)
{
int error = 0;
unsigned int opri;
unsigned char unit, part;
register struct cd_data *cd;
/*******************************************************\
* Find the device that the user is talking about *
\*******************************************************/
unit = UNIT(dev);
part = PARTITION(dev);
cd = cd_driver->cd_data[unit];
#ifdef CDDEBUG
if(scsi_debug & PRINTROUTINES) printf("cdioctl%d ",unit);
#endif /*CDDEBUG*/
/*******************************************************\
* If the device is not valid.. abandon ship *
\*******************************************************/
if (!(cd_driver->cd_data[unit]->flags & CDVALID))
return(EIO);
switch(cmd)
{
case DIOCSBAD:
error = EINVAL;
break;
case DIOCGDINFO:
*(struct disklabel *)addr = cd->disklabel;
break;
case DIOCGPART:
((struct partinfo *)addr)->disklab = &cd->disklabel;
((struct partinfo *)addr)->part =
&cd->disklabel.d_partitions[PARTITION(dev)];
break;
case DIOCWDINFO:
case DIOCSDINFO:
if ((flag & FWRITE) == 0)
error = EBADF;
else
error = setdisklabel(&cd->disklabel,
(struct disklabel *)addr,
/*(cd->flags & DKFL_BSDLABEL) ? cd->openparts : */0,
0);
if (error == 0) {
cd->flags |= CDHAVELABEL;
}
break;
case DIOCWLABEL:
error = EBADF;
break;
case CDIOCPLAYTRACKS:
{
struct ioc_play_track *args
= (struct ioc_play_track *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.flags &= ~CD_PA_SOTC;
data.page.audio.flags |= CD_PA_IMMED;
if(error = cd_set_mode(unit,&data))
break;
return(cd_play_tracks(unit
,args->start_track
,args->start_index
,args->end_track
,args->end_index
));
}
break;
case CDIOCPLAYMSF:
{
struct ioc_play_msf *args
= (struct ioc_play_msf *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.flags &= ~CD_PA_SOTC;
data.page.audio.flags |= CD_PA_IMMED;
if(error = cd_set_mode(unit,&data))
break;
return(cd_play_msf(unit
,args->start_m
,args->start_s
,args->start_f
,args->end_m
,args->end_s
,args->end_f
));
}
break;
case CDIOCPLAYBLOCKS:
{
struct ioc_play_blocks *args
= (struct ioc_play_blocks *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.flags &= ~CD_PA_SOTC;
data.page.audio.flags |= CD_PA_IMMED;
if(error = cd_set_mode(unit,&data))
break;
return(cd_play(unit,args->blk,args->len));
}
break;
case CDIOCREADSUBCHANNEL:
{
struct ioc_read_subchannel *args
= (struct ioc_read_subchannel *)addr;
struct cd_sub_channel_info data;
int len=args->data_len;
if(len>sizeof(data)||
len<sizeof(struct cd_sub_channel_header)) {
error=EINVAL;
break;
}
if(error = cd_read_subchannel(unit,args->address_format,
args->data_format,args->track,&data,len)) {
break;
}
len=MIN(len,((data.header.data_len[0]<<8)+data.header.data_len[1]+
sizeof(struct cd_sub_channel_header)));
if(copyout(&data,args->data,len)!=0) {
error=EFAULT;
}
}
break;
case CDIOREADTOCHEADER:
{
struct ioc_toc_header th;
if( error = cd_read_toc(unit,0,0,&th,sizeof(th)))
break;
th.len=(th.len&0xff)<<8+((th.len>>8)&0xff);
bcopy(&th,addr,sizeof(th));
}
break;
case CDIOREADTOCENTRYS:
{
struct ioc_read_toc_entry *te=
(struct ioc_read_toc_entry *)addr;
struct cd_toc_entry data[65];
struct ioc_toc_header *th;
int len=te->data_len;
th=(struct ioc_toc_header *)data;
if(len>sizeof(data) || len<sizeof(struct cd_toc_entry)) {
error=EINVAL;
break;
}
if(error = cd_read_toc(unit,te->address_format,
te->starting_track,
data,
len))
break;
len=MIN(len,((((th->len&0xff)<<8)+((th->len>>8)))+
sizeof(*th)));
if(copyout(th,te->data,len)!=0) {
error=EFAULT;
}
}
break;
case CDIOCSETPATCH:
{
struct ioc_patch *arg = (struct ioc_patch *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.port[LEFT_PORT].channels = arg->patch[0];
data.page.audio.port[RIGHT_PORT].channels = arg->patch[1];
data.page.audio.port[2].channels = arg->patch[2];
data.page.audio.port[3].channels = arg->patch[3];
if(error = cd_set_mode(unit,&data))
break;
}
break;
case CDIOCGETVOL:
{
struct ioc_vol *arg = (struct ioc_vol *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
arg->vol[LEFT_PORT] = data.page.audio.port[LEFT_PORT].volume;
arg->vol[RIGHT_PORT] = data.page.audio.port[RIGHT_PORT].volume;
arg->vol[2] = data.page.audio.port[2].volume;
arg->vol[3] = data.page.audio.port[3].volume;
}
break;
case CDIOCSETVOL:
{
struct ioc_vol *arg = (struct ioc_vol *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.port[LEFT_PORT].volume = arg->vol[LEFT_PORT];
data.page.audio.port[RIGHT_PORT].volume = arg->vol[RIGHT_PORT];
data.page.audio.port[2].volume = arg->vol[2];
data.page.audio.port[3].volume = arg->vol[3];
if(error = cd_set_mode(unit,&data))
break;
}
break;
case CDIOCSETMONO:
{
struct ioc_vol *arg = (struct ioc_vol *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.port[LEFT_PORT].channels = LEFT_CHANNEL|RIGHT_CHANNEL|4|8;
data.page.audio.port[RIGHT_PORT].channels = LEFT_CHANNEL|RIGHT_CHANNEL;
data.page.audio.port[2].channels = 0;
data.page.audio.port[3].channels = 0;
if(error = cd_set_mode(unit,&data))
break;
}
break;
case CDIOCSETSTERIO:
{
struct ioc_vol *arg = (struct ioc_vol *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.port[LEFT_PORT].channels = LEFT_CHANNEL;
data.page.audio.port[RIGHT_PORT].channels = RIGHT_CHANNEL;
data.page.audio.port[2].channels = 0;
data.page.audio.port[3].channels = 0;
if(error = cd_set_mode(unit,&data))
break;
}
break;
case CDIOCSETMUTE:
{
struct ioc_vol *arg = (struct ioc_vol *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.port[LEFT_PORT].channels = 0;
data.page.audio.port[RIGHT_PORT].channels = 0;
data.page.audio.port[2].channels = 0;
data.page.audio.port[3].channels = 0;
if(error = cd_set_mode(unit,&data))
break;
}
break;
case CDIOCSETLEFT:
{
struct ioc_vol *arg = (struct ioc_vol *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.port[LEFT_PORT].channels = LEFT_CHANNEL;
data.page.audio.port[RIGHT_PORT].channels = LEFT_CHANNEL;
data.page.audio.port[2].channels = 0;
data.page.audio.port[3].channels = 0;
if(error = cd_set_mode(unit,&data))
break;
}
break;
case CDIOCSETRIGHT:
{
struct ioc_vol *arg = (struct ioc_vol *)addr;
struct cd_mode_data data;
if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
break;
data.page.audio.port[LEFT_PORT].channels = RIGHT_CHANNEL;
data.page.audio.port[RIGHT_PORT].channels = RIGHT_CHANNEL;
data.page.audio.port[2].channels = 0;
data.page.audio.port[3].channels = 0;
if(error = cd_set_mode(unit,&data))
break;
}
break;
case CDIOCRESUME:
error = cd_pause(unit,1);
break;
case CDIOCPAUSE:
error = cd_pause(unit,0);
break;
case CDIOCSTART:
error = cd_start_unit(unit,part,CD_START);
break;
case CDIOCSTOP:
error = cd_start_unit(unit,part,CD_STOP);
break;
case CDIOCEJECT:
error = cd_start_unit(unit,part,CD_EJECT);
break;
case CDIOCSETDEBUG:
scsi_debug = 0xfff; cd_debug = 0xfff;
break;
case CDIOCCLRDEBUG:
scsi_debug = 0; cd_debug = 0;
break;
case CDIOCRESET:
return(cd_reset(unit));
break;
default:
error = ENOTTY;
break;
}
return (error);
}
/*******************************************************\
* Load the label information on the named device *
* *
* EVENTUALLY take information about different *
* data tracks from the TOC and put it in the disklabel *
\*******************************************************/
int cdgetdisklabel(unit)
unsigned char unit;
{
/*unsigned int n, m;*/
char *errstring;
struct dos_partition *dos_partition_p;
struct cd_data *cd;
cd = cd_driver->cd_data[unit];
/*******************************************************\
* If the info is already loaded, use it *
\*******************************************************/
if(cd->flags & CDHAVELABEL) return;
bzero(&cd->disklabel,sizeof(struct disklabel));
/*******************************************************\
* make partition 3 the whole disk in case of failure *
* then get pdinfo *
\*******************************************************/
strncpy(cd->disklabel.d_typename,"scsi cd_rom",16);
strncpy(cd->disklabel.d_packname,"ficticious",16);
cd->disklabel.d_secsize = cd->params.blksize; /* as long as it's not 0 */
cd->disklabel.d_nsectors = 100;
cd->disklabel.d_ntracks = 1;
cd->disklabel.d_ncylinders = (cd->params.disksize / 100) + 1;
cd->disklabel.d_secpercyl = 100;
cd->disklabel.d_secperunit = cd->params.disksize;
cd->disklabel.d_rpm = 300;
cd->disklabel.d_interleave = 1;
cd->disklabel.d_flags = D_REMOVABLE;
cd->disklabel.d_npartitions = 1;
cd->disklabel.d_partitions[0].p_offset = 0;
cd->disklabel.d_partitions[0].p_size
= cd->params.disksize * (cd->params.blksize / 512);
cd->disklabel.d_partitions[0].p_fstype = 9;
cd->disklabel.d_magic = DISKMAGIC;
cd->disklabel.d_magic2 = DISKMAGIC;
cd->disklabel.d_checksum = dkcksum(&(cd->disklabel));
/*******************************************************\
* Signal to other users and routines that we now have a *
* disklabel that represents the media (maybe) *
\*******************************************************/
cd->flags |= CDHAVELABEL;
return(ESUCCESS);
}
/*******************************************************\
* Get scsi driver to send a "are you ready" command *
\*******************************************************/
cd_test_ready(unit,flags)
int unit,flags;
{
struct scsi_test_unit_ready scsi_cmd;
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = TEST_UNIT_READY;
return (cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
0,
0,
100000,
NULL,
flags));
}
/*******************************************************\
* Find out form the device what it's capacity is *
\*******************************************************/
cd_size(unit, flags)
{
struct scsi_read_cd_cap_data rdcap;
struct scsi_read_cd_capacity scsi_cmd;
int size;
int blksize;
/*******************************************************\
* make up a scsi command and ask the scsi driver to do *
* it for you. *
\*******************************************************/
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = READ_CD_CAPACITY;
/*******************************************************\
* If the command works, interpret the result as a 4 byte*
* number of blocks *
\*******************************************************/
if (cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
&rdcap,
sizeof(rdcap),
2000,
NULL,
flags) != 0)
{
printf("cd%d: could not get size\n", unit);
return(0);
} else {
size = rdcap.addr_0 + 1 ;
size += rdcap.addr_1 << 8;
size += rdcap.addr_2 << 16;
size += rdcap.addr_3 << 24;
blksize = rdcap.length_0 ;
blksize += rdcap.length_1 << 8;
blksize += rdcap.length_2 << 16;
blksize += rdcap.length_3 << 24;
}
#ifdef CDDEBUG
if(cd_debug)printf("cd%d: %d %d byte blocks\n",unit,size,blksize);
#endif /*CDDEBUG*/
cd_driver->cd_data[unit]->params.disksize = size;
cd_driver->cd_data[unit]->params.blksize = blksize;
return(size);
}
/*******************************************************\
* Get the requested page into the buffer given *
\*******************************************************/
cd_get_mode(unit,data,page)
int unit;
struct cd_mode_data *data;
int page;
{
struct scsi_mode_sense scsi_cmd;
int retval;
bzero(&scsi_cmd, sizeof(scsi_cmd));
bzero(data,sizeof(*data));
scsi_cmd.op_code = MODE_SENSE;
scsi_cmd.page = page;
scsi_cmd.length = sizeof(*data) & 0xff;
retval = cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
data,
sizeof(*data),
20000, /* should be immed */
NULL,
0);
return (retval);
}
/*******************************************************\
* Get the requested page into the buffer given *
\*******************************************************/
cd_set_mode(unit,data)
int unit;
struct cd_mode_data *data;
{
struct scsi_mode_select scsi_cmd;
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = MODE_SELECT;
scsi_cmd.byte2 |= SMS_PF;
scsi_cmd.length = sizeof(*data) & 0xff;
data->header.data_length = 0;
/*show_mem(data,sizeof(*data));/**/
return (cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
data,
sizeof(*data),
20000, /* should be immed */
NULL,
0)
);
}
/*******************************************************\
* Get scsi driver to send a "start playing" command *
\*******************************************************/
cd_play(unit,blk,len)
int unit,blk,len;
{
struct scsi_play scsi_cmd;
int retval;
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = PLAY;
scsi_cmd.blk_addr[0] = (blk >> 24) & 0xff;
scsi_cmd.blk_addr[1] = (blk >> 16) & 0xff;
scsi_cmd.blk_addr[2] = (blk >> 8) & 0xff;
scsi_cmd.blk_addr[3] = blk & 0xff;
scsi_cmd.xfer_len[0] = (len >> 8) & 0xff;
scsi_cmd.xfer_len[1] = len & 0xff;
retval = cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
0,
0,
200000, /* should be immed */
NULL,
0);
return(retval);
}
/*******************************************************\
* Get scsi driver to send a "start playing" command *
\*******************************************************/
cd_play_big(unit,blk,len)
int unit,blk,len;
{
struct scsi_play_big scsi_cmd;
int retval;
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = PLAY_BIG;
scsi_cmd.blk_addr[0] = (blk >> 24) & 0xff;
scsi_cmd.blk_addr[1] = (blk >> 16) & 0xff;
scsi_cmd.blk_addr[2] = (blk >> 8) & 0xff;
scsi_cmd.blk_addr[3] = blk & 0xff;
scsi_cmd.xfer_len[0] = (len >> 24) & 0xff;
scsi_cmd.xfer_len[1] = (len >> 16) & 0xff;
scsi_cmd.xfer_len[2] = (len >> 8) & 0xff;
scsi_cmd.xfer_len[3] = len & 0xff;
retval = cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
0,
0,
20000, /* should be immed */
NULL,
0);
return(retval);
}
/*******************************************************\
* Get scsi driver to send a "start playing" command *
\*******************************************************/
cd_play_tracks(unit,strack,sindex,etrack,eindex)
int unit,strack,sindex,etrack,eindex;
{
struct scsi_play_track scsi_cmd;
int retval;
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = PLAY_TRACK;
scsi_cmd.start_track = strack;
scsi_cmd.start_index = sindex;
scsi_cmd.end_track = etrack;
scsi_cmd.end_index = eindex;
retval = cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
0,
0,
20000, /* should be immed */
NULL,
0);
return(retval);
}
/*******************************************************\
* Get scsi driver to send a "play msf" command *
\*******************************************************/
cd_play_msf(unit,startm,starts,startf,endm,ends,endf)
int unit,startm,starts,startf,endm,ends,endf;
{
struct scsi_play_msf scsi_cmd;
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = PLAY_MSF;
scsi_cmd.start_m=startm;
scsi_cmd.start_s=starts;
scsi_cmd.start_f=startf;
scsi_cmd.end_m=endm;
scsi_cmd.end_s=ends;
scsi_cmd.end_f=endf;
return (cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
0,
0,
2000,
NULL,
0));
}
/*******************************************************\
* Get scsi driver to send a "start up" command *
\*******************************************************/
cd_pause(unit,go)
int unit,go;
{
struct scsi_pause scsi_cmd;
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = PAUSE;
scsi_cmd.resume = go;
return (cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
0,
0,
2000,
NULL,
0));
}
/*******************************************************\
* Get scsi driver to send a "RESET" command *
\*******************************************************/
cd_reset(unit)
int unit;
{
return(cd_scsi_cmd(unit,
0,
0,
0,
0,
2000,
NULL,
SCSI_RESET));
}
/*******************************************************\
* Get scsi driver to send a "start up" command *
\*******************************************************/
cd_start_unit(unit,part,type)
{
struct scsi_start_stop scsi_cmd;
struct cd_data *cd = cd_driver->cd_data[unit];
if(type==CD_EJECT
/*&& (cd->openparts == 0)*/)/* trouble is WE have it open *//*XXX*/
{
cd_prevent_unit(unit,PR_ALLOW,0);
}
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = START_STOP;
scsi_cmd.how |= (type==CD_START)?SSS_START:0;
scsi_cmd.how |= (type==CD_EJECT)?SSS_LOEJ:0;
if (cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(scsi_cmd),
0,
0,
2000,
NULL,
0) != 0) {
return(ENXIO);
} else
return(0);
}
/*******************************************************\
* Prevent or allow the user to remove the disk *
\*******************************************************/
cd_prevent_unit(unit,type,flags)
int unit,type,flags;
{
struct scsi_prevent scsi_cmd;
struct cd_data *cd = cd_driver->cd_data[unit];
if(type==PR_PREVENT
|| ( type==PR_ALLOW && cd->openparts == 0 ))/*XXX*/
{
bzero(&scsi_cmd, sizeof(scsi_cmd));
scsi_cmd.op_code = PREVENT_ALLOW;
scsi_cmd.how = type;
if (cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(struct scsi_prevent),
0,
0,
5000,
NULL,
0) != 0)
{
if(!(flags & SCSI_SILENT))
printf("cd%d: cannot prevent/allow\n", unit);
return(0);
}
}
return(1);
}
/******************************************************\
* Read Subchannel *
\******************************************************/
cd_read_subchannel(unit,mode,format,track,data,len)
int unit,mode,format,len;
struct cd_sub_channel_info *data;
{
struct scsi_read_subchannel scsi_cmd;
int error;
bzero(&scsi_cmd,sizeof(scsi_cmd));
scsi_cmd.op_code=READ_SUBCHANNEL;
if(mode==CD_MSF_FORMAT)
scsi_cmd.byte2 |= CD_MSF;
scsi_cmd.byte3=SRS_SUBQ;
scsi_cmd.subchan_format=format;
scsi_cmd.track=track;
scsi_cmd.data_len[0]=(len)>>8;
scsi_cmd.data_len[1]=(len)&0xff;
return cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(struct scsi_read_subchannel),
data,
len,
5000,
NULL,
0);
}
/*******************************************************\
* Read Table of contents *
\*******************************************************/
cd_read_toc(unit,mode,start,data,len)
int unit,mode,start,len;
struct cd_toc_entry *data;
{
struct scsi_read_toc scsi_cmd;
int error;
int ntoc;
bzero(&scsi_cmd,sizeof(scsi_cmd));
/*if(len!=sizeof(struct ioc_toc_header))
ntoc=((len)-sizeof(struct ioc_toc_header))/sizeof(struct cd_toc_entry);
else*/
ntoc=len;
scsi_cmd.op_code=READ_TOC;
if(mode==CD_MSF_FORMAT)
scsi_cmd.byte2 |= CD_MSF;
scsi_cmd.from_track=start;
scsi_cmd.data_len[0]=(ntoc)>>8;
scsi_cmd.data_len[1]=(ntoc)&0xff;
return cd_scsi_cmd(unit,
&scsi_cmd,
sizeof(struct scsi_read_toc),
data,
len,
5000,
NULL,
0);
}
#define b2tol(a) (((unsigned)(a##_1) << 8) + (unsigned)a##_0 )
/*******************************************************\
* Get the scsi driver to send a full inquiry to the *
* device and use the results to fill out the disk *
* parameter structure. *
\*******************************************************/
int cd_get_parms(unit, flags)
{
struct cd_data *cd = cd_driver->cd_data[unit];
/*******************************************************\
* First check if we have it all loaded *
\*******************************************************/
if(cd->flags & CDVALID) return(0);
/*******************************************************\
* give a number of sectors so that sec * trks * cyls *
* is <= disk_size *
\*******************************************************/
if(cd_size(unit, flags))
{
cd->flags |= CDVALID;
return(0);
}
else
{
return(ENXIO);
}
}
/*******************************************************\
* close the device.. only called if we are the LAST *
* occurence of an open device *
\*******************************************************/
cdclose(dev)
dev_t dev;
{
unsigned char unit, part;
unsigned int old_priority;
unit = UNIT(dev);
part = PARTITION(dev);
#ifdef CDDEBUG
if(scsi_debug & TRACEOPENS)
printf("cd%d: closing part %d\n",unit,part);
#endif
cd_driver->cd_data[unit]->partflags[part] &= ~CDOPEN;
cd_driver->cd_data[unit]->openparts &= ~(1 << part);
cd_prevent_unit(unit,PR_ALLOW,SCSI_SILENT);
return(0);
}
/*******************************************************\
* ask the scsi driver to perform a command for us. *
* Call it through the switch table, and tell it which *
* sub-unit we want, and what target and lu we wish to *
* talk to. Also tell it where to find the command *
* how long int is. *
* Also tell it where to read/write the data, and how *
* long the data is supposed to be *
\*******************************************************/
int cd_scsi_cmd(unit,scsi_cmd,cmdlen,data_addr,datalen,timeout,bp,flags)
int unit,flags;
struct scsi_generic *scsi_cmd;
int cmdlen;
int timeout;
u_char *data_addr;
int datalen;
struct buf *bp;
{
struct scsi_xfer *xs;
int retval;
int s;
struct cd_data *cd = cd_driver->cd_data[unit];
#ifdef CDDEBUG
if(scsi_debug & PRINTROUTINES) printf("\ncd_scsi_cmd%d ",unit);
#endif /*CDDEBUG*/
#ifdef PARANOID
if(!(cd->sc_sw)) /* If we have a scsi driver */
{
/* !? how'd we GET here? */
panic("attempt to run bad cd device");
}
#endif /*PARANOID*/
xs = cd_get_xs(unit,flags); /* should wait unless booting */
if(!xs)
{
printf("cd%d: scsi_cmd controller busy"
" (this should never happen)\n",unit);
return(EBUSY);
}
xs->flags |= INUSE;
/*******************************************************\
* Fill out the scsi_xfer structure *
\*******************************************************/
xs->flags |= flags;
xs->adapter = cd->ctlr;
xs->targ = cd->targ;
xs->lu = cd->lu;
xs->retries = CD_RETRIES;
xs->timeout = timeout;
xs->cmd = scsi_cmd;
xs->cmdlen = cmdlen;
xs->data = data_addr;
xs->datalen = datalen;
xs->resid = datalen;
xs->when_done = (flags & SCSI_NOMASK)
?(int (*)())0
:cd_done;
xs->done_arg = unit;
xs->done_arg2 = (int)xs;
xs->bp = bp;
retry: xs->error = XS_NOERROR;
/*******************************************************\
* Do the transfer. If we are polling we will return: *
* COMPLETE, Was poll, and cd_done has been called *
* HAD_ERROR, Was poll and an error was encountered *
* TRY_AGAIN_LATER, Adapter short resources, try again *
* *
* if under full steam (interrupts) it will return: *
* SUCCESSFULLY_QUEUED, will do a wakeup when complete *
* HAD_ERROR, had an erro before it could queue *
* TRY_AGAIN_LATER, (as for polling) *
* After the wakeup, we must still check if it succeeded *
* *
* If we have a bp however, all the error proccessing *
* and the buffer code both expect us to return straight *
* to them, so as soon as the command is queued, return *
\*******************************************************/
retval = (*(cd->sc_sw->scsi_cmd))(xs);
if(bp) return retval; /* will sleep (or not) elsewhere */
/*******************************************************\
* Only here for non I/O cmds. It's cheaper to process *
* the error status here than at interrupt time so *
* sd_done will have done nothing except wake us up. *
\*******************************************************/
switch(retval)
{
case SUCCESSFULLY_QUEUED:
s = splbio();
while(!(xs->flags & ITSDONE))
sleep(xs,PRIBIO+1);
splx(s);
/* Fall through to check the result */
case HAD_ERROR:
switch(xs->error)
{
case XS_NOERROR: /* usually this one */
retval = ESUCCESS;
break;
case XS_SENSE:
retval = (cd_interpret_sense(unit,xs));
break;
case XS_BUSY:
/* should sleep here 1 sec */
/* fall through */
case XS_TIMEOUT:
if(xs->retries-- )
{
xs->flags &= ~ITSDONE;
goto retry;
}
/* fall through */
case XS_DRIVER_STUFFUP:
retval = EIO;
break;
default:
retval = EIO;
printf("cd%d: unknown error category from scsi driver\n"
,unit);
}
break;
case COMPLETE:
retval = ESUCCESS;
break;
case TRY_AGAIN_LATER:
if(xs->retries-- )
{
if(tsleep( 0,PRIBIO + 2,"retry",hz * 2))
{
xs->flags &= ~ITSDONE;
goto retry;
}
}
/* fall through */
default:
retval = EIO;
}
/*******************************************************\
* we have finished doing the command, free the struct *
* and check if anyone else needs it *
\*******************************************************/
cd_free_xs(unit,xs,flags);
cdstart(unit); /* check if anything is waiting for the xs */
return(retval);
}
/***************************************************************\
* Look at the returned sense and act on the error and detirmine *
* The unix error number to pass back... (0 = report no error) *
\***************************************************************/
int cd_interpret_sense(unit,xs)
int unit;
struct scsi_xfer *xs;
{
struct scsi_sense_data *sense;
int key;
int silent;
int info;
struct cd_data *cd = cd_driver->cd_data[unit];
static char *error_mes[] = { "soft error (corrected)",
"not ready", "medium error",
"non-media hardware failure", "illegal request",
"unit attention", "readonly device",
"no data found", "vendor unique",
"copy aborted", "command aborted",
"search returned equal", "volume overflow",
"verify miscompare", "unknown error key"
};
/***************************************************************\
* If the flags say errs are ok, then always return ok. *
\***************************************************************/
if (xs->flags & SCSI_ERR_OK) return(ESUCCESS);
silent = (xs->flags & SCSI_SILENT);
sense = &(xs->sense);
#ifdef CDDEBUG
if(cd_debug)
{
int count = 0;
printf("code%x valid%x\n"
,sense->error_code & SSD_ERRCODE
,sense->error_code & SSD_ERRCODE_VALID ? 1 : 0);
printf("seg%x key%x ili%x eom%x fmark%x\n"
,sense->ext.extended.segment
,sense->ext.extended.flags & SSD_KEY
,sense->ext.extended.flags & SSD_ILI ? 1 : 0
,sense->ext.extended.flags & SSD_EOM ? 1 : 0
,sense->ext.extended.flags & SSD_FILEMARK ? 1 : 0);
printf("info: %x %x %x %x followed by %d extra bytes\n"
,sense->ext.extended.info[0]
,sense->ext.extended.info[1]
,sense->ext.extended.info[2]
,sense->ext.extended.info[3]
,sense->ext.extended.extra_len);
printf("extra: ");
while(count < sense->ext.extended.extra_len)
{
printf ("%x ",sense->ext.extended.extra_bytes[count++]);
}
printf("\n");
}
#endif /*CDDEBUG*/
switch(sense->error_code & SSD_ERRCODE)
{
/***************************************************************\
* If it's code 70, use the extended stuff and interpret the key *
\***************************************************************/
case 0x71:/* delayed error */
printf("cd%d: DELAYED ERROR, key = 0x%x\n",unit,key);
case 0x70:
if(sense->error_code & SSD_ERRCODE_VALID)
{
info = ntohl(*((long *)sense->ext.extended.info));
}
else
{
info = 0;
}
key=sense->ext.extended.flags & SSD_KEY;
if (!silent)
{
printf("cd%d: %s", unit, error_mes[key - 1]);
if(sense->error_code & SSD_ERRCODE_VALID)
{
switch (key)
{
case 0x2: /* NOT READY */
case 0x5: /* ILLEGAL REQUEST */
case 0x6: /* UNIT ATTENTION */
case 0x7: /* DATA PROTECT */
break;
case 0x8: /* BLANK CHECK */
printf(", requested size: %d (decimal)",
info);
break;
default:
printf(", info = %d (decimal)", info);
}
}
printf("\n");
}
switch (key)
{
case 0x0: /* NO SENSE */
case 0x1: /* RECOVERED ERROR */
xs->resid = 0;
case 0xc: /* EQUAL */
return(ESUCCESS);
case 0x2: /* NOT READY */
cd->flags &= ~(CDVALID | CDHAVELABEL);
return(ENODEV);
case 0x5: /* ILLEGAL REQUEST */
return(EINVAL);
case 0x6: /* UNIT ATTENTION */
cd->flags &= ~(CDVALID | CDHAVELABEL);
if (cd->openparts)
{
return(EIO);
}
return(ESUCCESS);
case 0x7: /* DATA PROTECT */
return(EACCES);
case 0xd: /* VOLUME OVERFLOW */
return(ENOSPC);
case 0x8: /* BLANK CHECK */
return(ESUCCESS);
default:
return(EIO);
}
/*******************************\
* Not code 70, just report it *
\*******************************/
default:
if(!silent)
{
printf("cd%d: error code %d", unit,
sense->error_code & SSD_ERRCODE);
if(sense->error_code & SSD_ERRCODE_VALID)
{
printf(" at block no. %d (decimal)",
(sense->ext.unextended.blockhi <<16)
+ (sense->ext.unextended.blockmed <<8)
+ (sense->ext.unextended.blocklow ));
}
printf("\n");
}
return(EIO);
}
}
int
cdsize(dev_t dev)
{
return (-1);
}
#if 0
show_mem(address,num)
unsigned char *address;
int num;
{
int x,y;
printf("------------------------------");
for (y = 0; y<num; y += 1)
{
if(!(y % 16))
printf("\n%03d: ",y);
printf("%02x ",*address++);
}
printf("\n------------------------------\n");
}
#endif
Continuous source code history from original PDP-7 UNIX to FreeBSD 2, the first fully unencumbered FreeBSD release.