Return to BSD News archive
Path: sserve!manuel!munnari.oz.au!uunet!portal!lll-winken!sun-barr!ames!agate!tfs.com!tfs.com!julian
From: julian@tfs.com (Julian Elischer)
Newsgroups: comp.unix.bsd
Subject: new new scsi release beta2 part 5 of 5
Message-ID: <1992Sep23.222604.17428@tfs.com>
Date: 23 Sep 92 22:26:04 GMT
Organization: TRW Financial Systems
Lines: 1899
This file contains the scsi cd-rom driver
The ioctls pertaining to AUDIO control have not been seen to work
(in fact they seem to NOT WORK (plays but no sound on headphones))
# This is a shell archive. Save it in a file, remove anything before
# this line, and then unpack it by entering "sh file". Note, it may
# create directories; files and directories will be owned by you and
# have default permissions.
#
# This archive contains:
#
# scsi/scsi_cd.h
# scsi/cd.c
#
echo x - scsi/scsi_cd.h
sed 's/^X//' >scsi/scsi_cd.h << 'END-of-scsi/scsi_cd.h'
X/*
X * Written by Julian Elischer (julian@tfs.com)
X * for TRW Financial Systems.
X *
X * TRW Financial Systems, in accordance with their agreement with Carnegie
X * Mellon University, makes this software available to CMU to distribute
X * or use in any manner that they see fit as long as this message is kept with
X * the software. For this reason TFS also grants any other persons or
X * organisations permission to use or modify this software.
X *
X * TFS supplies this software to be publicly redistributed
X * on the understanding that TFS is not responsible for the correct
X * functioning of this software in any circumstances.
X *
X */
X
X/*
X * Ported to run under 386BSD by Julian Elischer (julian@tfs.com) Sept 1992
X */
X
X/*
X * SCSI command format
X */
X
X#ifdef KERNEL
Xstruct scsi_read_capacity_cd
X{
X u_char op_code;
X u_char :5;
X u_char lun:3;
X u_char addr_3; /* Most Significant */
X u_char addr_2;
X u_char addr_1;
X u_char addr_0; /* Least Significant */
X u_char unused[3];
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
Xstruct scsi_pause
X{
X u_char op_code;
X u_char :5;
X u_char lun:3;
X u_char unused[6];
X u_char resume:1;
X u_char :7;
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X#define PA_PAUSE 1
X#define PA_RESUME 0
X
Xstruct scsi_play_msf
X{
X u_char op_code;
X u_char :5;
X u_char lun:3;
X u_char unused;
X u_char start_m;
X u_char start_s;
X u_char start_f;
X u_char end_m;
X u_char end_s;
X u_char end_f;
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
Xstruct scsi_play_track
X{
X u_char op_code;
X u_char :5;
X u_char lun:3;
X u_char unused[2];
X u_char start_track;
X u_char start_index;
X u_char unused1;
X u_char end_track;
X u_char end_index;
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
Xstruct scsi_play
X{
X u_char op_code;
X u_char reladdr:1;
X u_char :4;
X u_char lun:3;
X u_char blk_addr[4];
X u_char unused;
X u_char xfer_len[2];
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
Xstruct scsi_play_big
X{
X u_char op_code;
X u_char reladdr:1;
X u_char :4;
X u_char lun:3;
X u_char blk_addr[4];
X u_char xfer_len[4];
X u_char unused;
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
Xstruct scsi_play_rel_big
X{
X u_char op_code;
X u_char reladdr:1;
X u_char :4;
X u_char lun:3;
X u_char blk_addr[4];
X u_char xfer_len[4];
X u_char track;
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
Xstruct scsi_read_header
X{
X u_char op_code;
X u_char :1;
X u_char msf:1;
X u_char :3;
X u_char lun:3;
X u_char blk_addr[4];
X u_char unused;
X u_char data_len[2];
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
Xstruct scsi_read_subchannel
X{
X u_char op_code;
X u_char :1;
X u_char msf:1;
X u_char :3;
X u_char lun:3;
X u_char :6;
X u_char subQ:1;
X u_char :1;
X u_char subchan_format;
X u_char unused[2];
X u_char track;
X u_char data_len[2];
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
Xstruct scsi_read_toc
X{
X u_char op_code;
X u_char :1;
X u_char msf:1;
X u_char :3;
X u_char lun:3;
X u_char unused[4];
X u_char from_track;
X u_char data_len[2];
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X;
X
Xstruct scsi_read_cd_capacity
X{
X u_char op_code;
X u_char :5;
X u_char lun:3;
X u_char addr_3; /* Most Significant */
X u_char addr_2;
X u_char addr_1;
X u_char addr_0; /* Least Significant */
X u_char unused[3];
X u_char link:1;
X u_char flag:1;
X u_char :6;
X};
X
X/*
X * Opcodes
X */
X
X#define READ_CD_CAPACITY 0x25 /* slightly different from disk */
X#define READ_SUBCHANNEL 0x42 /* cdrom read Subchannel */
X#define READ_TOC 0x43 /* cdrom read TOC */
X#define READ_HEADER 0x44 /* cdrom read header */
X#define PLAY 0x45 /* cdrom play 'play audio' mode */
X#define PLAY_MSF 0x47 /* cdrom play Min,Sec,Frames mode */
X#define PLAY_TRACK 0x48 /* cdrom play track/index mode */
X#define PLAY_TRACK_REL 0x49 /* cdrom play track/index mode */
X#define PAUSE 0x4b /* cdrom pause in 'play audio' mode */
X#define PLAY_BIG 0xa5 /* cdrom pause in 'play audio' mode */
X#define PLAY_TRACK_REL_BIG 0xa9 /* cdrom play track/index mode */
X
X
Xstruct cd_inquiry_data /* in case there is some special info */
X{
X u_char device_type:5;
X u_char device_qualifier:3;
X u_char dev_qual2:7;
X u_char removable:1;
X u_char ansii_version:3;
X u_char :5;
X u_char response_format;
X u_char additional_length;
X u_char unused[2];
X u_char :3;
X u_char can_link:1;
X u_char can_sync:1;
X u_char :3;
X char vendor[8];
X char product[16];
X char revision[4];
X u_char extra[8];
X};
X
Xstruct scsi_read_cd_cap_data
X{
X u_char addr_3; /* Most significant */
X u_char addr_2;
X u_char addr_1;
X u_char addr_0; /* Least significant */
X u_char length_3; /* Most significant */
X u_char length_2;
X u_char length_1;
X u_char length_0; /* Least significant */
X};
X
Xunion cd_pages
X{
X#define AUDIO_PAGE 0x0e
X struct audio_page
X {
X u_char page_code:6;
X u_char :1;
X u_char ps:1;
X u_char param_len;
X u_char :1;
X u_char sotc:1;
X u_char immed:1;
X u_char :5;
X u_char unused[2];
X u_char format_lba:4;
X u_char :3;
X u_char apr_valid:1;
X u_char lb_per_sec[2];
X struct port_control
X {
X u_char channels:4;
X#define CHANNEL_0 1
X#define CHANNEL_1 2
X#define CHANNEL_2 4
X#define CHANNEL_3 8
X#define LEFT_CHANNEL CHANNEL_0
X#define RIGHT_CHANNEL CHANNEL_1
X u_char :4;
X u_char volume;
X } port[4];
X#define LEFT_PORT 0
X#define RIGHT_PORT 1
X }audio;
X};
X
Xstruct cd_mode_data
X{
X struct scsi_mode_header header;
X struct blk_desc blk_desc;
X union cd_pages page;
X};
X#endif KERNEL
X/***************************************************************\
X* Ioctls for the CD drive *
X\***************************************************************/
Xstruct ioc_play_track
X{
X u_char start_track;
X u_char start_index;
X u_char end_track;
X u_char end_index;
X};
X
X#define CDIOCPLAYTRACKS _IOW('c',1,struct ioc_play_track)
Xstruct ioc_play_blocks
X{
X int blk;
X int len;
X};
X#define CDIOCPLAYBLOCKS _IOW('c',2,struct ioc_play_blocks)
X
Xstruct ioc_patch
X{
X u_char patch[4]; /* one for each channel */
X};
X#define CDIOCSETPATCH _IOW('c',9,struct ioc_patch)
Xstruct ioc_vol
X{
X u_char vol[4]; /* one for each channel */
X};
X#define CDIOCGETVOL _IOR('c',10,struct ioc_vol)
X#define CDIOCSETVOL _IOW('c',11,struct ioc_vol)
X#define CDIOCSETMONO _IO('c',12)
X#define CDIOCSETSTERIO _IO('c',13)
X#define CDIOCSETMUTE _IO('c',14)
X#define CDIOCSETLEFT _IO('c',15)
X#define CDIOCSETRIGHT _IO('c',16)
X#define CDIOCSETDEBUG _IO('c',17)
X#define CDIOCCLRDEBUG _IO('c',18)
X#define CDIOCPAUSE _IO('c',19)
X#define CDIOCRESUME _IO('c',20)
X#define CDIOCRESET _IO('c',21)
X
X
END-of-scsi/scsi_cd.h
echo x - scsi/cd.c
sed 's/^X//' >scsi/cd.c << 'END-of-scsi/cd.c'
X/*
X * Written by Julian Elischer (julian@tfs.com)
X * for TRW Financial Systems for use under the MACH(2.5) operating system.
X *
X * TRW Financial Systems, in accordance with their agreement with Carnegie
X * Mellon University, makes this software available to CMU to distribute
X * or use in any manner that they see fit as long as this message is kept with
X * the software. For this reason TFS also grants any other persons or
X * organisations permission to use or modify this software.
X *
X * TFS supplies this software to be publicly redistributed
X * on the understanding that TFS is not responsible for the correct
X * functioning of this software in any circumstances.
X *
X */
X
X/*
X * Ported to run under 386BSD by Julian Elischer (julian@tfs.com) Sept 1992
X */
X
X/* RCS header and log section
X * $Log: $
X */
X#define SPLCD splbio
X#define ESUCCESS 0
X#include <cd.h>
X#include <sys/types.h>
X#include "param.h"
X#include "dkbad.h"
X#include "systm.h"
X#include "conf.h"
X#include "file.h"
X#include "stat.h"
X#include "ioctl.h"
X#include "buf.h"
X#include "uio.h"
X#include "malloc.h"
X
X#include <sys/errno.h>
X#include <sys/disklabel.h>
X#include <scsi/scsi_all.h>
X#include <scsi/scsi_cd.h>
X#include <scsi/scsi_disk.h> /* rw_big and start_stop come from there */
X#include <scsi/scsiconf.h>
X
Xlong int cdstrats,cdqueues;
X
X
X#include <ddb.h>
X#if NDDB > 0
Xint Debugger();
X#else NDDB > 0
X#define Debugger()
X#endif NDDB > 0
X
X
X#define PAGESIZ 4096
X#define SECSIZE 2048 /* XXX */ /* default only */
X#define CDOUTSTANDING 2
X#define CDQSIZE 4
X#define CD_RETRIES 4
X
X#define UNITSHIFT 3
X#define PARTITION(z) (minor(z) & 0x07)
X#define RAW_PART 3
X#define UNIT(z) ( (minor(z) >> UNITSHIFT) )
X
X
Xextern int hz;
Xint cd_done();
Xint cdstrategy();
Xint cd_debug = 0;
X
Xstruct buf cd_buf_queue[NCD];
Xstruct scsi_xfer cd_scsi_xfer[NCD][CDOUTSTANDING]; /* XXX */
Xstruct scsi_xfer *cd_free_xfer[NCD];
Xint cd_xfer_block_wait[NCD];
X
Xstruct cd_data
X{
X int flags;
X#define CDVALID 0x02 /* PARAMS LOADED */
X#define CDINIT 0x04 /* device has been init'd */
X#define CDWAIT 0x08 /* device has someone waiting */
X#define CDHAVELABEL 0x10 /* have read the label */
X struct scsi_switch *sc_sw; /* address of scsi low level switch */
X int ctlr; /* so they know which one we want */
X int targ; /* our scsi target ID */
X int lu; /* out scsi lu */
X int cmdscount; /* cmds allowed outstanding by board*/
X struct cd_parms
X {
X int blksize;
X u_long disksize; /* total number sectors */
X }params;
X struct disklabel disklabel;
X int partflags[MAXPARTITIONS]; /* per partition flags */
X#define CDOPEN 0x01
X int openparts; /* one bit for each open partition */
X}cd_data[NCD];
X
X
Xstatic int next_cd_unit = 0;
X/***********************************************************************\
X* The routine called by the low level scsi routine when it discovers *
X* A device suitable for this driver *
X\***********************************************************************/
Xint cdattach(ctlr,targ,lu,scsi_switch)
Xstruct scsi_switch *scsi_switch;
X{
X int unit,i;
X unsigned char *tbl;
X struct cd_data *cd;
X struct cd_parms *dp;
X
X unit = next_cd_unit++;
X cd = cd_data + unit;
X dp = &(cd->params);
X if(scsi_debug & PRINTROUTINES) printf("cdattach: ");
X /*******************************************************\
X * Check we have the resources for another drive *
X \*******************************************************/
X if( unit >= NCD)
X {
X printf("Too many scsi CDs..(%d > %d) reconfigure kernel",(unit + 1),NCD);
X return(0);
X }
X /*******************************************************\
X * Store information needed to contact our base driver *
X \*******************************************************/
X cd->sc_sw = scsi_switch;
X cd->ctlr = ctlr;
X cd->targ = targ;
X cd->lu = lu;
X cd->cmdscount = CDOUTSTANDING; /* XXX (ask the board) */
X
X
X i = cd->cmdscount;
X while(i-- )
X {
X cd_scsi_xfer[unit][i].next = cd_free_xfer[unit];
X cd_free_xfer[unit] = &cd_scsi_xfer[unit][i];
X }
X /*******************************************************\
X * Use the subdriver to request information regarding *
X * the drive. We cannot use interrupts yet, so the *
X * request must specify this. *
X \*******************************************************/
X cd_get_parms(unit, SCSI_NOSLEEP | SCSI_NOMASK);
X if(dp->disksize)
X {
X printf("cd present\n");
X }
X else
X {
X printf("drive empty\n");
X }
X cd->flags |= CDINIT;
X return;
X
X}
X
X
X
X/*******************************************************\
X* open the device. Make sure the partition info *
X* is a up-to-date as can be. *
X\*******************************************************/
Xcdopen(dev)
X{
X int errcode = 0;
X int unit, part;
X struct cd_parms cd_parms;
X struct cd_data *cd ;
X
X unit = UNIT(dev);
X part = PARTITION(dev);
X cd = cd_data + unit;
X if(scsi_debug & (PRINTROUTINES | TRACEOPENS))
X printf("cdopen: dev=0x%x (unit %d (of %d),partition %d)\n"
X , dev, unit, NCD, part);
X /*******************************************************\
X * Check the unit is legal *
X \*******************************************************/
X if ( unit >= NCD )
X {
X return(ENXIO);
X }
X /*******************************************************\
X * Make sure the disk has been initialised *
X * At some point in the future, get the scsi driver *
X * to look for a new device if we are not initted *
X \*******************************************************/
X if (! (cd->flags & CDINIT))
X return(ENXIO);
X
X /*******************************************************\
X * If it's been invalidated, and not everybody has *
X * closed it then forbid re-entry. *
X * (may have changed media) *
X \*******************************************************/
X if ((! (cd->flags & CDVALID))
X && ( cd->openparts))
X return(ENXIO);
X /*******************************************************\
X * Check that it is still responding and ok. *
X * if the media has been changed this will result in a *
X * "unit attention" error which the error code will *
X * disregard because the CDVALID flag is not yet set *
X \*******************************************************/
X if (cd_req_sense(unit, 0) != 0) {
X if(scsi_debug & TRACEOPENS)
X printf("not reponding\n");
X return(ENXIO);
X }
X if(scsi_debug & TRACEOPENS)
X printf("Device present\n");
X /*******************************************************\
X * In case it is a funny one, tell it to start *
X * not needed for hard drives *
X \*******************************************************/
X /*cd_start_unit(unit);
X if(scsi_debug & TRACEOPENS)
X printf("started ");*/
X /*******************************************************\
X * Load the physical device parameters *
X \*******************************************************/
X cd_get_parms(unit, 0);
X if(scsi_debug & TRACEOPENS)
X printf("Params loaded ");
X /*******************************************************\
X * Load the partition info if not already loaded *
X \*******************************************************/
X cdgetdisklabel(unit);
X if(scsi_debug & TRACEOPENS)
X printf("Disklabel fabricated ");
X /*******************************************************\
X * Check the partition is legal *
X \*******************************************************/
X if (( part >= cd->disklabel.d_npartitions )
X && (part != RAW_PART))
X {
X if(scsi_debug & TRACEOPENS)
X printf("partition %d > %d\n",part
X ,cd->disklabel.d_npartitions);
X return(ENXIO);
X }
X /*******************************************************\
X * Check that the partition exists *
X \*******************************************************/
X if (( cd->disklabel.d_partitions[part].p_fstype != FS_UNUSED )
X || (part == RAW_PART))
X {
X cd->partflags[part] |= CDOPEN;
X cd->openparts |= (1 << part);
X if(scsi_debug & TRACEOPENS)
X printf("open complete\n");
X cd->flags |= CDVALID;
X }
X else
X {
X if(scsi_debug & TRACEOPENS)
X printf("part %d type UNUSED\n",part);
X return(ENXIO);
X }
X return(0);
X}
X
X/*******************************************************\
X* Get ownership of a scsi_xfer structure *
X* If need be, sleep on it, until it comes free *
X\*******************************************************/
Xstruct scsi_xfer *cd_get_xs(unit,flags)
Xint flags;
Xint unit;
X{
X struct scsi_xfer *xs;
X int s;
X
X if(flags & (SCSI_NOSLEEP | SCSI_NOMASK))
X {
X if (xs = cd_free_xfer[unit])
X {
X cd_free_xfer[unit] = xs->next;
X xs->flags = 0;
X }
X }
X else
X {
X s = SPLCD();
X while (!(xs = cd_free_xfer[unit]))
X {
X cd_xfer_block_wait[unit]++; /* someone waiting! */
X sleep((caddr_t)&cd_free_xfer[unit], PRIBIO+1);
X cd_xfer_block_wait[unit]--;
X }
X cd_free_xfer[unit] = xs->next;
X splx(s);
X xs->flags = 0;
X }
X return(xs);
X}
X
X/*******************************************************\
X* Free a scsi_xfer, wake processes waiting for it *
X\*******************************************************/
Xcd_free_xs(unit,xs,flags)
Xstruct scsi_xfer *xs;
Xint unit;
Xint flags;
X{
X int s;
X
X if(flags & SCSI_NOMASK)
X {
X if (cd_xfer_block_wait[unit])
X {
X printf("doing a wakeup from NOMASK mode\n");
X wakeup((caddr_t)&cd_free_xfer[unit]);
X }
X xs->next = cd_free_xfer[unit];
X cd_free_xfer[unit] = xs;
X }
X else
X {
X s = SPLCD();
X if (cd_xfer_block_wait[unit])
X wakeup((caddr_t)&cd_free_xfer[unit]);
X xs->next = cd_free_xfer[unit];
X cd_free_xfer[unit] = xs;
X splx(s);
X }
X}
X
X/*******************************************************\
X* trim the size of the transfer if needed, *
X* called by physio *
X* basically the smaller of our max and the scsi driver's*
X* minphys (note we have no max ourselves) *
X\*******************************************************/
X/* Trim buffer length if buffer-size is bigger than page size */
Xvoid cdminphys(bp)
Xstruct buf *bp;
X{
X (*(cd_data[UNIT(bp->b_dev)].sc_sw->scsi_minphys))(bp);
X}
X
X/*******************************************************\
X* Actually translate the requested transfer into *
X* one the physical driver can understand *
X* The transfer is described by a buf and will include *
X* only one physical transfer. *
X\*******************************************************/
X
Xint cdstrategy(bp)
Xstruct buf *bp;
X{
X struct buf *dp;
X unsigned int opri;
X struct cd_data *cd ;
X int unit;
X
X cdstrats++;
X unit = UNIT((bp->b_dev));
X cd = cd_data + unit;
X if(scsi_debug & PRINTROUTINES) printf("\ncdstrategy ");
X if(scsi_debug & SHOWREQUESTS) printf("cd%d: %d bytes @ blk%d\n",
X unit,bp->b_bcount,bp->b_blkno);
X cdminphys(bp);
X /*******************************************************\
X * If the device has been made invalid, error out *
X * maybe the media changed *
X \*******************************************************/
X if(!(cd->flags & CDVALID))
X {
X bp->b_error = EIO;
X goto bad;
X }
X /*******************************************************\
X * can't ever write to a CD *
X \*******************************************************/
X if ((bp->b_flags & B_READ) == 0) {
X bp->b_error = EROFS;
X goto bad;
X }
X /*******************************************************\
X * If it's a null transfer, return immediatly *
X \*******************************************************/
X if (bp->b_bcount == 0) {
X goto done;
X }
X
X /*******************************************************\
X * Decide which unit and partition we are talking about *
X \*******************************************************/
X if(PARTITION(bp->b_dev) != RAW_PART)
X {
X if (!(cd->flags & CDHAVELABEL))
X {
X bp->b_error = EIO;
X goto bad;
X }
X /*
X * do bounds checking, adjust transfer. if error, process.
X * if end of partition, just return
X */
X if (bounds_check_with_label(bp,&cd->disklabel,1) <= 0)
X goto done;
X /* otherwise, process transfer request */
X }
X
X opri = SPLCD();
X dp = &cd_buf_queue[unit];
X
X /*******************************************************\
X * Place it in the queue of disk activities for this disk*
X \*******************************************************/
X disksort(dp, bp);
X
X /*******************************************************\
X * Tell the device to get going on the transfer if it's *
X * not doing anything, otherwise just wait for completion*
X \*******************************************************/
X cdstart(unit);
X
X splx(opri);
X return;
Xbad:
X bp->b_flags |= B_ERROR;
Xdone:
X
X /*******************************************************\
X * Correctly set the buf to indicate a completed xfer *
X \*******************************************************/
X bp->b_resid = bp->b_bcount;
X biodone(bp);
X return;
X}
X
X/***************************************************************\
X* cdstart looks to see if there is a buf waiting for the device *
X* and that the device is not already busy. If both are true, *
X* It deques the buf and creates a scsi command to perform the *
X* transfer in the buf. The transfer request will call cd_done *
X* on completion, which will in turn call this routine again *
X* so that the next queued transfer is performed. *
X* The bufs are queued by the strategy routine (cdstrategy) *
X* *
X* This routine is also called after other non-queued requests *
X* have been made of the scsi driver, to ensure that the queue *
X* continues to be drained. *
X* *
X* must be called at the correct (highish) spl level *
X\***************************************************************/
X/* cdstart() is called at SPLCD from cdstrategy and cd_done*/
Xcdstart(unit)
Xint unit;
X{
X int drivecount;
X register struct buf *bp = 0;
X register struct buf *dp;
X struct scsi_xfer *xs;
X struct scsi_rw_big cmd;
X int blkno, nblk;
X struct cd_data *cd = cd_data + unit;
X struct partition *p ;
X
X if(scsi_debug & PRINTROUTINES) printf("cdstart%d ",unit);
X /*******************************************************\
X * See if there is a buf to do and we are not already *
X * doing one *
X \*******************************************************/
X if(!cd_free_xfer[unit])
X {
X return; /* none for us, unit already underway */
X }
X
X if(cd_xfer_block_wait[unit]) /* there is one, but a special waits */
X {
X return; /* give the special that's waiting a chance to run */
X }
X
X
X dp = &cd_buf_queue[unit];
X if ((bp = dp->b_actf) != NULL) /* yes, an assign */
X {
X dp->b_actf = bp->av_forw;
X }
X else
X {
X return;
X }
X
X xs=cd_get_xs(unit,0); /* ok we can grab it */
X xs->flags = INUSE; /* Now ours */
X /***************************************************************\
X * Should reject all queued entries if CDVALID is not true *
X \***************************************************************/
X if(!(cd->flags & CDVALID))
X {
X goto bad; /* no I/O.. media changed or something */
X }
X
X /*******************************************************\
X * We have a buf, now we should move the data into *
X * a scsi_xfer definition and try start it *
X \*******************************************************/
X /*******************************************************\
X * First, translate the block to absolute *
X * and put it in terms of the logical blocksize of the *
X * device.. *
X \*******************************************************/
X p = cd->disklabel.d_partitions + PARTITION(bp->b_dev);
X blkno = ((bp->b_blkno / (cd->params.blksize/512)) + p->p_offset);
X nblk = (bp->b_bcount + (cd->params.blksize - 1)) / (cd->params.blksize);
X
X /*******************************************************\
X * Fill out the scsi command *
X \*******************************************************/
X bzero(&cmd, sizeof(cmd));
X cmd.op_code = READ_BIG;
X cmd.addr_3 = (blkno & 0xff000000) >> 24;
X cmd.addr_2 = (blkno & 0xff0000) >> 16;
X cmd.addr_1 = (blkno & 0xff00) >> 8;
X cmd.addr_0 = blkno & 0xff;
X cmd.length2 = (nblk & 0xff00) >> 8;
X cmd.length1 = (nblk & 0xff);
X /*******************************************************\
X * Fill out the scsi_xfer structure *
X * Note: we cannot sleep as we may be an interrupt *
X \*******************************************************/
X xs->flags |= SCSI_NOSLEEP;
X xs->adapter = cd->ctlr;
X xs->targ = cd->targ;
X xs->lu = cd->lu;
X xs->retries = CD_RETRIES;
X xs->timeout = 10000;/* 10000 millisecs for a disk !*/
X xs->cmd = (struct scsi_generic *)&cmd;
X xs->cmdlen = sizeof(cmd);
X xs->resid = bp->b_bcount;
X xs->when_done = cd_done;
X xs->done_arg = unit;
X xs->done_arg2 = (int)xs;
X xs->error = XS_NOERROR;
X xs->bp = bp;
X xs->data = (u_char *)bp->b_un.b_addr;
X xs->datalen = bp->b_bcount;
X
X /*******************************************************\
X * Pass all this info to the scsi driver. *
X \*******************************************************/
X if ( (*(cd->sc_sw->scsi_cmd))(xs) != SUCCESSFULLY_QUEUED)
X {
X printf("cd%d: oops not queued",unit);
X goto bad;
X }
X cdqueues++;
X return;
Xbad: xs->error = XS_DRIVER_STUFFUP;
X cd_done(unit,xs);
X}
X
X/*******************************************************\
X* This routine is called by the scsi interrupt when *
X* the transfer is complete. (or failed) *
X\*******************************************************/
Xint cd_done(unit,xs)
Xint unit;
Xstruct scsi_xfer *xs;
X{
X struct buf *bp;
X int retval;
X int retries = 0;
X
X if(scsi_debug & PRINTROUTINES) printf("cd_done%d ",unit);
X if (! (xs->flags & INUSE)) /* paranoia always pays off */
X panic("scsi_xfer not in use!");
X if(bp = xs->bp)
X {
X switch(xs->error)
X {
X case XS_NOERROR:
X bp->b_error = 0;
X bp->b_resid = 0;
X break;
X
X case XS_SENSE:
X retval = (cd_interpret_sense(unit,xs));
X if(retval)
X {
X bp->b_flags |= B_ERROR;
X bp->b_error = retval;
X }
X break;
X
X case XS_TIMEOUT:
X printf("cd%d timeout\n",unit);
X
X case XS_BUSY:
X /***********************************\
X * Just resubmit it straight back to *
X * the SCSI driver to try it again *
X \***********************************/
X if(xs->retries--)
X {
X xs->error = XS_NOERROR;
X xs->flags &= ~ITSDONE;
X if ( (*(cd_data[unit].sc_sw->scsi_cmd))(xs)
X == SUCCESSFULLY_QUEUED)
X { /* shhh! don't wake the job, ok? */
X /* don't tell cdstart either, */
X return;
X }
X xs->flags |= ITSDONE;
X /* xs->error is set by the scsi driver */
X } /* Fall through */
X
X case XS_DRIVER_STUFFUP:
X bp->b_flags |= B_ERROR;
X bp->b_error = EIO;
X break;
X default:
X printf("cd%d: unknown error category from scsi driver\n"
X ,unit);
X }
X biodone(bp);
X cd_free_xs(unit,xs,0);
X cdstart(unit); /* If there's anything waiting.. do it */
X }
X else /* special has finished */
X {
X wakeup(xs);
X }
X}
X/*******************************************************\
X* Perform special action on behalf of the user *
X* Knows about the internals of this device *
X\*******************************************************/
Xcdioctl(dev_t dev, int cmd, caddr_t addr, int flag)
X{
X int error = 0;
X unsigned int opri;
X unsigned char unit, part;
X register struct cd_data *cd;
X
X
X /*******************************************************\
X * Find the device that the user is talking about *
X \*******************************************************/
X unit = UNIT(dev);
X part = PARTITION(dev);
X cd = &cd_data[unit];
X if(scsi_debug & PRINTROUTINES) printf("cdioctl%d ",unit);
X
X /*******************************************************\
X * If the device is not valid.. abandon ship *
X \*******************************************************/
X if (!(cd_data[unit].flags & CDVALID))
X return(EIO);
X switch(cmd)
X {
X
X case DIOCSBAD:
X error = EINVAL;
X break;
X
X case DIOCGDINFO:
X *(struct disklabel *)addr = cd->disklabel;
X break;
X
X case DIOCGPART:
X ((struct partinfo *)addr)->disklab = &cd->disklabel;
X ((struct partinfo *)addr)->part =
X &cd->disklabel.d_partitions[PARTITION(dev)];
X break;
X
X case DIOCWDINFO:
X case DIOCSDINFO:
X if ((flag & FWRITE) == 0)
X error = EBADF;
X else
X error = setdisklabel(&cd->disklabel,
X (struct disklabel *)addr,
X /*(cd->flags & DKFL_BSDLABEL) ? cd->openparts : */0,
X 0);
X if (error == 0) {
X cd->flags |= CDHAVELABEL;
X }
X break;
X
X case DIOCWLABEL:
X error = EBADF;
X break;
X
X case CDIOCPLAYTRACKS:
X {
X struct ioc_play_track *args
X = (struct ioc_play_track *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.sotc = 0;
X data.page.audio.immed = 1;
X if(error = cd_set_mode(unit,&data))
X break;
X return(cd_play_tracks(unit
X ,args->start_track
X ,args->start_index
X ,args->end_track
X ,args->end_index
X ));
X }
X break;
X case CDIOCPLAYBLOCKS:
X {
X struct ioc_play_blocks *args
X = (struct ioc_play_blocks *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.sotc = 0;
X data.page.audio.immed = 1;
X if(error = cd_set_mode(unit,&data))
X break;
X return(cd_play(unit,args->blk,args->len));
X
X
X }
X break;
X case CDIOCSETPATCH:
X {
X struct ioc_patch *arg = (struct ioc_patch *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.port[LEFT_PORT].channels = arg->patch[0];
X data.page.audio.port[RIGHT_PORT].channels = arg->patch[1];
X data.page.audio.port[2].channels = arg->patch[2];
X data.page.audio.port[3].channels = arg->patch[3];
X if(error = cd_set_mode(unit,&data))
X break;
X }
X break;
X case CDIOCGETVOL:
X {
X struct ioc_vol *arg = (struct ioc_vol *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X arg->vol[LEFT_PORT] = data.page.audio.port[LEFT_PORT].volume;
X arg->vol[RIGHT_PORT] = data.page.audio.port[RIGHT_PORT].volume;
X arg->vol[2] = data.page.audio.port[2].volume;
X arg->vol[3] = data.page.audio.port[3].volume;
X }
X break;
X case CDIOCSETVOL:
X {
X struct ioc_vol *arg = (struct ioc_vol *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.port[LEFT_PORT].volume = arg->vol[LEFT_PORT];
X data.page.audio.port[RIGHT_PORT].volume = arg->vol[RIGHT_PORT];
X data.page.audio.port[2].volume = arg->vol[2];
X data.page.audio.port[3].volume = arg->vol[3];
X if(error = cd_set_mode(unit,&data))
X break;
X }
X break;
X case CDIOCSETMONO:
X {
X struct ioc_vol *arg = (struct ioc_vol *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.port[LEFT_PORT].channels = LEFT_CHANNEL|RIGHT_CHANNEL|4|8;
X data.page.audio.port[RIGHT_PORT].channels = LEFT_CHANNEL|RIGHT_CHANNEL;
X data.page.audio.port[2].channels = 0;
X data.page.audio.port[3].channels = 0;
X if(error = cd_set_mode(unit,&data))
X break;
X }
X break;
X case CDIOCSETSTERIO:
X {
X struct ioc_vol *arg = (struct ioc_vol *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.port[LEFT_PORT].channels = LEFT_CHANNEL;
X data.page.audio.port[RIGHT_PORT].channels = RIGHT_CHANNEL;
X data.page.audio.port[2].channels = 0;
X data.page.audio.port[3].channels = 0;
X if(error = cd_set_mode(unit,&data))
X break;
X }
X break;
X case CDIOCSETMUTE:
X {
X struct ioc_vol *arg = (struct ioc_vol *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.port[LEFT_PORT].channels = 0;
X data.page.audio.port[RIGHT_PORT].channels = 0;
X data.page.audio.port[2].channels = 0;
X data.page.audio.port[3].channels = 0;
X if(error = cd_set_mode(unit,&data))
X break;
X }
X break;
X case CDIOCSETLEFT:
X {
X struct ioc_vol *arg = (struct ioc_vol *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.port[LEFT_PORT].channels = 15;
X data.page.audio.port[RIGHT_PORT].channels = 15;
X data.page.audio.port[2].channels = 15;
X data.page.audio.port[3].channels = 15;
X if(error = cd_set_mode(unit,&data))
X break;
X }
X break;
X case CDIOCSETRIGHT:
X {
X struct ioc_vol *arg = (struct ioc_vol *)addr;
X struct cd_mode_data data;
X if(error = cd_get_mode(unit,&data,AUDIO_PAGE))
X break;
X data.page.audio.port[LEFT_PORT].channels = RIGHT_CHANNEL;
X data.page.audio.port[RIGHT_PORT].channels = RIGHT_CHANNEL;
X data.page.audio.port[2].channels = 0;
X data.page.audio.port[3].channels = 0;
X if(error = cd_set_mode(unit,&data))
X break;
X }
X break;
X case CDIOCRESUME:
X error = cd_pause(unit,1);
X break;
X case CDIOCPAUSE:
X error = cd_pause(unit,0);
X break;
X case CDIOCSETDEBUG:
X scsi_debug = 0xfff; cd_debug = 0xfff;
X break;
X case CDIOCCLRDEBUG:
X scsi_debug = 0; cd_debug = 0;
X break;
X case CDIOCRESET:
X return(cd_reset(unit));
X break;
X default:
X error = ENOTTY;
X break;
X }
X return (error);
X}
X
X
X/*******************************************************\
X* Load the label information on the named device *
X* *
X* EVENTUALLY take information about different *
X* data tracks from the TOC and put it in the disklabel *
X\*******************************************************/
Xint cdgetdisklabel(unit)
Xunsigned char unit;
X{
X /*unsigned int n, m;*/
X char *errstring;
X struct dos_partition *dos_partition_p;
X struct cd_data *cd = cd_data + unit;
X
X /*******************************************************\
X * If the inflo is already loaded, use it *
X \*******************************************************/
X if(cd->flags & CDHAVELABEL) return;
X
X bzero(&cd->disklabel,sizeof(struct disklabel));
X /*******************************************************\
X * make partition 3 the whole disk in case of failure *
X * then get pdinfo *
X \*******************************************************/
X strncpy(cd->disklabel.d_typename,"scsi cd_rom",16);
X strncpy(cd->disklabel.d_packname,"ficticious",16);
X cd->disklabel.d_secsize = cd->params.blksize; /* as long as it's not 0 */
X cd->disklabel.d_nsectors = 100;
X cd->disklabel.d_ntracks = 1;
X cd->disklabel.d_ncylinders = (cd->params.disksize / 100) + 1;
X cd->disklabel.d_secpercyl = 100;
X cd->disklabel.d_secperunit = cd->params.disksize;
X cd->disklabel.d_rpm = 300;
X cd->disklabel.d_interleave = 1;
X cd->disklabel.d_flags = D_REMOVABLE;
X
X cd->disklabel.d_npartitions = 1;
X cd->disklabel.d_partitions[0].p_offset = 0;
X cd->disklabel.d_partitions[0].p_size = cd->params.disksize;
X cd->disklabel.d_partitions[0].p_fstype = 9;
X
X cd->disklabel.d_magic = DISKMAGIC;
X cd->disklabel.d_magic2 = DISKMAGIC;
X cd->disklabel.d_checksum = dkcksum(&(cd->disklabel));
X
X /*******************************************************\
X * Signal to other users and routines that we now have a *
X * disklabel that represents the media (maybe) *
X \*******************************************************/
X cd->flags |= CDHAVELABEL;
X return(ESUCCESS);
X}
X
X/*******************************************************\
X* Find out form the device what it's capacity is *
X\*******************************************************/
Xcd_size(unit, flags)
X{
X struct scsi_read_cd_cap_data rdcap;
X struct scsi_read_cd_capacity scsi_cmd;
X int size;
X int blksize;
X
X /*******************************************************\
X * make up a scsi command and ask the scsi driver to do *
X * it for you. *
X \*******************************************************/
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X scsi_cmd.op_code = READ_CD_CAPACITY;
X
X /*******************************************************\
X * If the command works, interpret the result as a 4 byte*
X * number of blocks *
X \*******************************************************/
X if (cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X &rdcap,
X sizeof(rdcap),
X 2000,
X flags) != 0)
X {
X printf("could not get size of unit %d\n", unit);
X return(0);
X } else {
X size = rdcap.addr_0 + 1 ;
X size += rdcap.addr_1 << 8;
X size += rdcap.addr_2 << 16;
X size += rdcap.addr_3 << 24;
X blksize = rdcap.length_0 ;
X blksize += rdcap.length_1 << 8;
X blksize += rdcap.length_2 << 16;
X blksize += rdcap.length_3 << 24;
X }
X if(cd_debug)printf("cd%d: %d %d byte blocks\n",unit,size,blksize);
X cd_data[unit].params.disksize = size;
X cd_data[unit].params.blksize = blksize;
X return(size);
X}
X
X/*******************************************************\
X* Check with the device that it is ok, (via scsi driver)*
X\*******************************************************/
Xcd_req_sense(unit, flags)
X{
X struct scsi_sense_data sense_data;
X struct scsi_sense scsi_cmd;
X
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X scsi_cmd.op_code = REQUEST_SENSE;
X scsi_cmd.length = sizeof(sense_data);
X
X if (cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X sense_data,
X sizeof(sense_data),
X 2000,
X flags) != 0)
X {
X return(ENXIO);
X }
X else
X return(0);
X}
X
X/*******************************************************\
X* Get the requested page into the buffer given *
X\*******************************************************/
Xcd_get_mode(unit,data,page)
Xint unit;
Xstruct cd_mode_data *data;
Xint page;
X{
X struct scsi_mode_sense scsi_cmd;
X int retval;
X
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X bzero(data,sizeof(*data));
X scsi_cmd.op_code = MODE_SENSE;
X scsi_cmd.page_code = page;
X scsi_cmd.length = sizeof(*data) & 0xff;
X retval = cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X data,
X sizeof(*data),
X 20000, /* should be immed */
X 0);
X return (retval);
X}
X/*******************************************************\
X* Get the requested page into the buffer given *
X\*******************************************************/
Xcd_set_mode(unit,data)
Xint unit;
Xstruct cd_mode_data *data;
X{
X struct scsi_mode_select scsi_cmd;
X
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X scsi_cmd.op_code = MODE_SELECT;
X scsi_cmd.pf = 1;
X scsi_cmd.length = sizeof(*data) & 0xff;
X data->header.data_length = 0;
X show_mem(data,sizeof(*data));
X return (cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X data,
X sizeof(*data),
X 20000, /* should be immed */
X 0)
X );
X}
X/*******************************************************\
X* Get scsi driver to send a "start playing" command *
X\*******************************************************/
Xcd_play(unit,blk,len)
Xint unit,blk,len;
X{
X struct scsi_play scsi_cmd;
X int retval;
X
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X scsi_cmd.op_code = PLAY;
X scsi_cmd.blk_addr[0] = (blk >> 24) & 0xff;
X scsi_cmd.blk_addr[1] = (blk >> 16) & 0xff;
X scsi_cmd.blk_addr[2] = (blk >> 8) & 0xff;
X scsi_cmd.blk_addr[3] = blk & 0xff;
X scsi_cmd.xfer_len[0] = (len >> 8) & 0xff;
X scsi_cmd.xfer_len[1] = len & 0xff;
X retval = cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X 0,
X 0,
X 200000, /* should be immed */
X 0);
X return(retval);
X}
X/*******************************************************\
X* Get scsi driver to send a "start playing" command *
X\*******************************************************/
Xcd_play_big(unit,blk,len)
Xint unit,blk,len;
X{
X struct scsi_play_big scsi_cmd;
X int retval;
X
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X scsi_cmd.op_code = PLAY_BIG;
X scsi_cmd.blk_addr[0] = (blk >> 24) & 0xff;
X scsi_cmd.blk_addr[1] = (blk >> 16) & 0xff;
X scsi_cmd.blk_addr[2] = (blk >> 8) & 0xff;
X scsi_cmd.blk_addr[3] = blk & 0xff;
X scsi_cmd.xfer_len[0] = (len >> 24) & 0xff;
X scsi_cmd.xfer_len[1] = (len >> 16) & 0xff;
X scsi_cmd.xfer_len[2] = (len >> 8) & 0xff;
X scsi_cmd.xfer_len[3] = len & 0xff;
X retval = cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X 0,
X 0,
X 20000, /* should be immed */
X 0);
X return(retval);
X}
X/*******************************************************\
X* Get scsi driver to send a "start playing" command *
X\*******************************************************/
Xcd_play_tracks(unit,strack,sindex,etrack,eindex)
Xint unit,strack,sindex,etrack,eindex;
X{
X struct scsi_play_track scsi_cmd;
X int retval;
X
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X scsi_cmd.op_code = PLAY_TRACK;
X scsi_cmd.start_track = strack;
X scsi_cmd.start_index = sindex;
X scsi_cmd.end_track = etrack;
X scsi_cmd.end_index = eindex;
X retval = cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X 0,
X 0,
X 20000, /* should be immed */
X 0);
X return(retval);
X}
X/*******************************************************\
X* Get scsi driver to send a "start up" command *
X\*******************************************************/
Xcd_pause(unit,go)
Xint unit,go;
X{
X struct scsi_pause scsi_cmd;
X
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X scsi_cmd.op_code = PAUSE;
X scsi_cmd.resume = go;
X
X return (cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X 0,
X 0,
X 2000,
X 0));
X}
X/*******************************************************\
X* Get scsi driver to send a "start up" command *
X\*******************************************************/
Xcd_reset(unit)
Xint unit;
X{
X return(cd_scsi_cmd(unit,0,0,0,0,2000,SCSI_RESET));
X}
X/*******************************************************\
X* Get scsi driver to send a "start up" command *
X\*******************************************************/
Xcd_start_unit(unit)
X{
X struct scsi_start_stop scsi_cmd;
X
X bzero(&scsi_cmd, sizeof(scsi_cmd));
X scsi_cmd.op_code = START_STOP;
X scsi_cmd.start = 1;
X
X if (cd_scsi_cmd(unit,
X &scsi_cmd,
X sizeof(scsi_cmd),
X 0,
X 0,
X 2000,
X 0) != 0) {
X return(ENXIO);
X } else
X return(0);
X}
X
X#define b2tol(a) (((unsigned)(a##_1) << 8) + (unsigned)a##_0 )
X
X/*******************************************************\
X* Get the scsi driver to send a full inquiry to the *
X* device and use the results to fill out the disk *
X* parameter structure. *
X\*******************************************************/
X
Xint cd_get_parms(unit, flags)
X{
X struct cd_data *cd = cd_data + unit;
X
X /*******************************************************\
X * First check if we have it all loaded *
X \*******************************************************/
X if(cd->flags & CDVALID) return(0);
X /*******************************************************\
X * give a number of sectors so that sec * trks * cyls *
X * is <= disk_size *
X \*******************************************************/
X if(cd_size(unit, flags))
X {
X cd->flags |= CDVALID;
X return(0);
X }
X else
X {
X return(ENXIO);
X }
X}
X
X/*******************************************************\
X* close the device.. only called if we are the LAST *
X* occurence of an open device *
X\*******************************************************/
Xcdclose(dev)
Xdev_t dev;
X{
X unsigned char unit, part;
X unsigned int old_priority;
X
X unit = UNIT(dev);
X part = PARTITION(dev);
X if(scsi_debug & TRACEOPENS)
X printf("closing cd%d part %d\n",unit,part);
X cd_data[unit].partflags[part] &= ~CDOPEN;
X cd_data[unit].openparts &= ~(1 << part);
X return(0);
X}
X
X/*******************************************************\
X* ask the scsi driver to perform a command for us. *
X* Call it through the switch table, and tell it which *
X* sub-unit we want, and what target and lu we wish to *
X* talk to. Also tell it where to find the command *
X* how long int is. *
X* Also tell it where to read/write the data, and how *
X* long the data is supposed to be *
X\*******************************************************/
Xint cd_scsi_cmd(unit,scsi_cmd,cmdlen,data_addr,datalen,timeout,flags)
X
Xint unit,flags;
Xstruct scsi_generic *scsi_cmd;
Xint cmdlen;
Xint timeout;
Xu_char *data_addr;
Xint datalen;
X{
X struct scsi_xfer *xs;
X int retval;
X int s;
X struct cd_data *cd = cd_data + unit;
X
X if(scsi_debug & PRINTROUTINES) printf("\ncd_scsi_cmd%d ",unit);
X if(cd->sc_sw) /* If we have a scsi driver */
X {
X xs = cd_get_xs(unit,flags); /* should wait unless booting */
X if(!xs)
X {
X printf("cd_scsi_cmd%d: controller busy"
X " (this should never happen)\n",unit);
X return(EBUSY);
X }
X xs->flags |= INUSE;
X /*******************************************************\
X * Fill out the scsi_xfer structure *
X \*******************************************************/
X xs->flags |= flags;
X xs->adapter = cd->ctlr;
X xs->targ = cd->targ;
X xs->lu = cd->lu;
X xs->retries = CD_RETRIES;
X xs->timeout = timeout;
X xs->cmd = scsi_cmd;
X xs->cmdlen = cmdlen;
X xs->data = data_addr;
X xs->datalen = datalen;
X xs->resid = datalen;
X xs->when_done = (flags & SCSI_NOMASK)
X ?(int (*)())0
X :cd_done;
X xs->done_arg = unit;
X xs->done_arg2 = (int)xs;
Xretry: xs->error = XS_NOERROR;
X xs->bp = 0;
X retval = (*(cd->sc_sw->scsi_cmd))(xs);
X switch(retval)
X {
X case SUCCESSFULLY_QUEUED:
X while(!(xs->flags & ITSDONE))
X sleep(xs,PRIBIO+1);
X
X case HAD_ERROR:
X /*printf("err = %d ",xs->error);*/
X switch(xs->error)
X {
X case XS_NOERROR:
X retval = ESUCCESS;
X break;
X case XS_SENSE:
X retval = (cd_interpret_sense(unit,xs));
X break;
X case XS_DRIVER_STUFFUP:
X retval = EIO;
X break;
X
X
X case XS_BUSY:
X case XS_TIMEOUT:
X if(xs->retries-- )
X {
X xs->flags &= ~ITSDONE;
X goto retry;
X }
X retval = EIO;
X break;
X default:
X retval = EIO;
X printf("cd%d: unknown error category from scsi driver\n"
X ,unit);
X }
X break;
X case COMPLETE:
X retval = ESUCCESS;
X break;
X case TRY_AGAIN_LATER:
X if(xs->retries-- )
X {
X if(tsleep( 0,PRIBIO + 2,"retry",hz * 2))
X {
X xs->flags &= ~ITSDONE;
X goto retry;
X }
X }
X retval = EIO;
X break;
X default:
X retval = EIO;
X }
X cd_free_xs(unit,xs,flags);
X cdstart(unit); /* check if anything is waiting fr the xs */
X }
X else
X {
X printf("cd%d: not set up\n",unit);
X return(EINVAL);
X }
X return(retval);
X}
X/***************************************************************\
X* Look at the returned sense and act on the error and detirmine *
X* The unix error number to pass back... (0 = report no error) *
X\***************************************************************/
X
Xint cd_interpret_sense(unit,xs)
Xint unit;
Xstruct scsi_xfer *xs;
X{
X struct scsi_sense_data *sense;
X int key;
X int silent;
X
X /***************************************************************\
X * If the flags say errs are ok, then always return ok. *
X \***************************************************************/
X if (xs->flags & SCSI_ERR_OK) return(ESUCCESS);
X silent = (xs->flags & SCSI_SILENT);
X
X sense = &(xs->sense);
X switch(sense->error_class)
X {
X case 7:
X {
X key=sense->ext.extended.sense_key;
X switch(key)
X {
X case 0x0:
X return(ESUCCESS);
X case 0x1:
X if(!silent)
X {
X printf("cd%d: soft error(corrected) ", unit);
X if(sense->valid)
X {
X printf("block no. %d (decimal)",
X (sense->ext.extended.info[0] <<24),
X (sense->ext.extended.info[1] <<16),
X (sense->ext.extended.info[2] <<8),
X (sense->ext.extended.info[3] ));
X }
X printf("\n");
X }
X return(ESUCCESS);
X case 0x2:
X if(!silent)printf("cd%d: not ready\n ",
X unit);
X return(ENODEV);
X case 0x3:
X if(!silent)
X {
X printf("cd%d: medium error ", unit);
X if(sense->valid)
X {
X printf("block no. %d (decimal)",
X (sense->ext.extended.info[0] <<24),
X (sense->ext.extended.info[1] <<16),
X (sense->ext.extended.info[2] <<8),
X (sense->ext.extended.info[3] ));
X }
X printf("\n");
X }
X return(EIO);
X case 0x4:
X if(!silent)printf("cd%d: non-media hardware failure\n ",
X unit);
X return(EIO);
X case 0x5:
X if(!silent)printf("cd%d: illegal request\n ",
X unit);
X return(EINVAL);
X case 0x6:
X if((cd_data[unit].flags & CDVALID)
X && (cd_data[unit].openparts))
X {
X if(!silent)printf("cd%d: Unit attention.\n ",
X unit);
X cd_data[unit].flags & ~(CDVALID | CDHAVELABEL);
X return(EIO);
X }
X cd_data[unit].flags & ~(CDVALID | CDHAVELABEL);
X return(ESUCCESS);
X case 0x7:
X if(!silent)
X {
X printf("cd%d: attempted protection violation ",
X unit);
X if(sense->valid)
X {
X printf("block no. %d (decimal)\n",
X (sense->ext.extended.info[0] <<24),
X (sense->ext.extended.info[1] <<16),
X (sense->ext.extended.info[2] <<8),
X (sense->ext.extended.info[3] ));
X }
X printf("\n");
X }
X return(EACCES);
X case 0x8:
X if(!silent)
X {
X printf("cd%d: block wrong state (worm)\n ",
X unit);
X if(sense->valid)
X {
X printf("block no. %d (decimal)\n",
X (sense->ext.extended.info[0] <<24),
X (sense->ext.extended.info[1] <<16),
X (sense->ext.extended.info[2] <<8),
X (sense->ext.extended.info[3] ));
X }
X printf("\n");
X }
X return(EIO);
X case 0x9:
X if(!silent)printf("cd%d: vendor unique\n",
X unit);
X return(EIO);
X case 0xa:
X if(!silent)printf("cd%d: copy aborted\n ",
X unit);
X return(EIO);
X case 0xb:
X if(!silent)printf("cd%d: command aborted\n ",
X unit);
X return(EIO);
X case 0xc:
X if(!silent)
X {
X printf("cd%d: search returned\n ",
X unit);
X if(sense->valid)
X {
X printf("block no. %d (decimal)\n",
X (sense->ext.extended.info[0] <<24),
X (sense->ext.extended.info[1] <<16),
X (sense->ext.extended.info[2] <<8),
X (sense->ext.extended.info[3] ));
X }
X printf("\n");
X }
X return(ESUCCESS);
X case 0xd:
X if(!silent)printf("cd%d: volume overflow\n ",
X unit);
X return(ENOSPC);
X case 0xe:
X if(!silent)
X {
X printf("cd%d: verify miscompare\n ",
X unit);
X if(sense->valid)
X {
X printf("block no. %d (decimal)\n",
X (sense->ext.extended.info[0] <<24),
X (sense->ext.extended.info[1] <<16),
X (sense->ext.extended.info[2] <<8),
X (sense->ext.extended.info[3] ));
X }
X printf("\n");
X }
X return(EIO);
X case 0xf:
X if(!silent)printf("cd%d: unknown error key\n ",
X unit);
X return(EIO);
X }
X break;
X }
X case 0:
X case 1:
X case 2:
X case 3:
X case 4:
X case 5:
X case 6:
X {
X if(!silent)printf("cd%d: error class %d code %d\n",
X unit,
X sense->error_class,
X sense->error_code);
X if(sense->valid)
X if(!silent)printf("block no. %d (decimal)\n",
X (sense->ext.unextended.blockhi <<16),
X + (sense->ext.unextended.blockmed <<8),
X + (sense->ext.unextended.blocklow ));
X }
X return(EIO);
X }
X}
X
X
X
X
Xint
Xcdsize(dev_t dev)
X{
X return (-1);
X}
X
Xshow_mem(address,num)
Xunsigned char *address;
Xint num;
X{
X int x,y;
X printf("------------------------------");
X for (y = 0; y<num; y += 1)
X {
X if(!(y % 16))
X printf("\n%03d: ",y);
X printf("%02x ",*address++);
X }
X printf("\n------------------------------\n");
X}
X
END-of-scsi/cd.c
exit