/* * Written By Julian ELischer * Copyright julian Elischer 1993. * Permission is granted to use or redistribute this file in any way as long * as this notice remains. Julian Elischer does not guarantee that this file * is totally correct for any given task and users of this file must * accept responsibility for any damage that occurs from the application of this * file. * * Written by Julian Elischer (julian@dialix.oz.au) * $Id: scsi_base.c,v 1.23 1995/03/15 14:44:01 dufault Exp $ */ #define SPLSD splbio #define ESUCCESS 0 #include #include #include #include #include #include #include #include #include #include #include #include static errval sc_err1(struct scsi_xfer *); static errval scsi_interpret_sense(struct scsi_xfer *); struct scsi_xfer *next_free_xs; /* * Get a scsi transfer structure for the caller. Charge the structure * to the device that is referenced by the sc_link structure. If the * sc_link structure has no 'credits' then the device already has the * maximum number or outstanding operations under way. In this stage, * wait on the structure so that when one is freed, we are awoken again * If the SCSI_NOSLEEP flag is set, then do not wait, but rather, return * a NULL pointer, signifying that no slots were available * Note in the link structure, that we are waiting on it. */ struct scsi_xfer * get_xs(sc_link, flags) struct scsi_link *sc_link; /* who to charge the xs to */ u_int32 flags; /* if this call can sleep */ { struct scsi_xfer *xs; u_int32 s; SC_DEBUG(sc_link, SDEV_DB3, ("get_xs\n")); s = splbio(); while (!sc_link->opennings) { SC_DEBUG(sc_link, SDEV_DB3, ("sleeping\n")); if (flags & SCSI_NOSLEEP) { splx(s); return 0; } sc_link->flags |= SDEV_WAITING; tsleep((caddr_t)sc_link, PRIBIO, "scsiget", 0); } sc_link->opennings--; if (xs = next_free_xs) { next_free_xs = xs->next; splx(s); } else { splx(s); SC_DEBUG(sc_link, SDEV_DB3, ("making\n")); xs = malloc(sizeof(*xs), M_TEMP, ((flags & SCSI_NOSLEEP) ? M_NOWAIT : M_WAITOK)); if (xs == NULL) { sc_print_addr(sc_link); printf("cannot allocate scsi xs\n"); return (NULL); } } SC_DEBUG(sc_link, SDEV_DB3, ("returning\n")); xs->sc_link = sc_link; return (xs); } /* * Given a scsi_xfer struct, and a device (referenced through sc_link) * return the struct to the free pool and credit the device with it * If another process is waiting for an xs, do a wakeup, let it proceed */ void free_xs(xs, sc_link, flags) struct scsi_xfer *xs; struct scsi_link *sc_link; /* who to credit for returning it */ u_int32 flags; { xs->next = next_free_xs; next_free_xs = xs; SC_DEBUG(sc_link, SDEV_DB3, ("free_xs\n")); /* if was 0 and someone waits, wake them up */ if ((!sc_link->opennings++) && (sc_link->flags & SDEV_WAITING)) { sc_link->flags &= ~SDEV_WAITING; wakeup((caddr_t)sc_link); /* remember, it wakes them ALL up */ } else { if (sc_link->device->start) { SC_DEBUG(sc_link, SDEV_DB2, ("calling private start()\n")); (*(sc_link->device->start)) (sc_link->dev_unit); } } } /* XXX dufault: Replace "sd_size" with "scsi_read_capacity" * when bde is done with sd.c */ /* * Find out from the device what its capacity is. */ u_int32 scsi_read_capacity(sc_link, blk_size, flags) struct scsi_link *sc_link; u_int32 *blk_size; u_int32 flags; { struct scsi_read_cap_data rdcap; struct scsi_read_capacity scsi_cmd; u_int32 size; /* * 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_CAPACITY; /* * If the command works, interpret the result as a 4 byte * number of blocks */ if (scsi_scsi_cmd(sc_link, (struct scsi_generic *) &scsi_cmd, sizeof(scsi_cmd), (u_char *) & rdcap, sizeof(rdcap), 2, 20000, NULL, flags | SCSI_DATA_IN) != 0) { sc_print_addr(sc_link); printf("could not get size\n"); return (0); } else { size = scsi_4btou(&rdcap.addr_3) + 1; if (blk_size) *blk_size = scsi_4btou(&rdcap.length_3); } return (size); } /* * Get scsi driver to send a "are you ready?" command */ errval scsi_test_unit_ready(sc_link, flags) struct scsi_link *sc_link; u_int32 flags; { struct scsi_test_unit_ready scsi_cmd; bzero(&scsi_cmd, sizeof(scsi_cmd)); scsi_cmd.op_code = TEST_UNIT_READY; return (scsi_scsi_cmd(sc_link, (struct scsi_generic *) &scsi_cmd, sizeof(scsi_cmd), 0, 0, 2, 100000, NULL, flags)); } /* * Do a scsi operation, asking a device to run as SCSI-II if it can. */ errval scsi_change_def(sc_link, flags) struct scsi_link *sc_link; u_int32 flags; { struct scsi_changedef scsi_cmd; bzero(&scsi_cmd, sizeof(scsi_cmd)); scsi_cmd.op_code = CHANGE_DEFINITION; scsi_cmd.how = SC_SCSI_2; return (scsi_scsi_cmd(sc_link, (struct scsi_generic *) &scsi_cmd, sizeof(scsi_cmd), 0, 0, 2, 100000, NULL, flags)); } /* * Do a scsi operation asking a device what it is * Use the scsi_cmd routine in the switch table. */ errval scsi_inquire(sc_link, inqbuf, flags) struct scsi_link *sc_link; struct scsi_inquiry_data *inqbuf; u_int32 flags; { struct scsi_inquiry scsi_cmd; bzero(&scsi_cmd, sizeof(scsi_cmd)); scsi_cmd.op_code = INQUIRY; scsi_cmd.length = sizeof(struct scsi_inquiry_data); return (scsi_scsi_cmd(sc_link, (struct scsi_generic *) &scsi_cmd, sizeof(scsi_cmd), (u_char *) inqbuf, sizeof(struct scsi_inquiry_data), 2, 100000, NULL, SCSI_DATA_IN | flags)); } /* * Prevent or allow the user to remove the media */ errval scsi_prevent(sc_link, type, flags) struct scsi_link *sc_link; u_int32 type, flags; { struct scsi_prevent scsi_cmd; bzero(&scsi_cmd, sizeof(scsi_cmd)); scsi_cmd.op_code = PREVENT_ALLOW; scsi_cmd.how = type; return (scsi_scsi_cmd(sc_link, (struct scsi_generic *) &scsi_cmd, sizeof(scsi_cmd), 0, 0, 2, 5000, NULL, flags)); } /* * Get scsi driver to send a "start up" command */ errval scsi_start_unit(sc_link, flags) struct scsi_link *sc_link; u_int32 flags; { struct scsi_start_stop scsi_cmd; bzero(&scsi_cmd, sizeof(scsi_cmd)); scsi_cmd.op_code = START_STOP; scsi_cmd.how = SSS_START; return (scsi_scsi_cmd(sc_link, (struct scsi_generic *) &scsi_cmd, sizeof(scsi_cmd), 0, 0, 2, 10000, NULL, flags)); } /* * Get scsi driver to send a "stop" command */ errval scsi_stop_unit(sc_link, eject, flags) struct scsi_link *sc_link; u_int32 eject; u_int32 flags; { struct scsi_start_stop scsi_cmd; bzero(&scsi_cmd, sizeof(scsi_cmd)); scsi_cmd.op_code = START_STOP; if (eject) { scsi_cmd.how = SSS_LOEJ; } return (scsi_scsi_cmd(sc_link, (struct scsi_generic *) &scsi_cmd, sizeof(scsi_cmd), 0, 0, 2, 10000, NULL, flags)); } /* * This routine is called by the scsi interrupt when the transfer is complete. */ void scsi_done(xs) struct scsi_xfer *xs; { struct scsi_link *sc_link = xs->sc_link; struct buf *bp = xs->bp; errval retval; SC_DEBUG(sc_link, SDEV_DB2, ("scsi_done\n")); #ifdef SCSIDEBUG if (sc_link->flags & SDEV_DB1) { show_scsi_cmd(xs); } #endif /*SCSIDEBUG */ /* * If it's a user level request, bypass all usual completion processing, * let the user work it out.. We take reponsibility for freeing the * xs when the user returns. (and restarting the device's queue). */ if (xs->flags & SCSI_USER) { SC_DEBUG(sc_link, SDEV_DB3, ("calling user done()\n")); scsi_user_done(xs); /* to take a copy of the sense etc. */ SC_DEBUG(sc_link, SDEV_DB3, ("returned from user done()\n ")); free_xs(xs, sc_link, SCSI_NOSLEEP); /* restarts queue too */ SC_DEBUG(sc_link, SDEV_DB3, ("returning to adapter\n")); return; } /* * If the device has it's own done routine, call it first. * If it returns a legit error value, return that, otherwise * it wants us to continue with normal processing. */ if (sc_link->device->done) { SC_DEBUG(sc_link, SDEV_DB2, ("calling private done()\n")); retval = (*sc_link->device->done) (xs); if (retval == -1) { free_xs(xs, sc_link, SCSI_NOSLEEP); /*XXX */ return; /* it did it all, finish up */ } /* BUG: This isn't used anywhere. Do you have plans for it, * Julian? (dufault@hda.com). */ if (retval == -2) { return; /* it did it all, finish up */ } SC_DEBUG(sc_link, SDEV_DB3, ("continuing with generic done()\n")); } if ((bp = xs->bp) == NULL) { /* * if it's a normal upper level request, then ask * the upper level code to handle error checking * rather than doing it here at interrupt time */ wakeup((caddr_t)xs); return; } /* * Go and handle errors now. * If it returns -1 then we should RETRY */ if ((retval = sc_err1(xs)) == -1) { if ((*(sc_link->adapter->scsi_cmd)) (xs) == SUCCESSFULLY_QUEUED) { /* don't wake the job, ok? */ return; } xs->flags |= ITSDONE; } free_xs(xs, sc_link, SCSI_NOSLEEP); /* does a start if needed */ biodone(bp); } /* * ask the scsi driver to perform a command for us. * tell it where to read/write the data, and how * long the data is supposed to be. If we have a buf * to associate with the transfer, we need that too. */ errval scsi_scsi_cmd(sc_link, scsi_cmd, cmdlen, data_addr, datalen, retries, timeout, bp, flags) struct scsi_link *sc_link; struct scsi_generic *scsi_cmd; u_int32 cmdlen; u_char *data_addr; u_int32 datalen; u_int32 retries; u_int32 timeout; struct buf *bp; u_int32 flags; { struct scsi_xfer *xs; errval retval; u_int32 s; /* * Illegal command lengths will wedge host adapter software. * Reject zero length commands and assert all defined commands * are the correct length. */ if (cmdlen == 0) return EFAULT; else { static u_int8 sizes[] = {6, 10, 10, 0, 0, 12, 0, 0 }; u_int8 size = sizes[((scsi_cmd->opcode) >> 5)]; if (size && (size != cmdlen)) return EIO; } if (bp && !(flags & SCSI_USER)) flags |= SCSI_NOSLEEP; SC_DEBUG(sc_link, SDEV_DB2, ("scsi_cmd\n")); xs = get_xs(sc_link, flags); /* should wait unless booting */ if (!xs) return (ENOMEM); /* * Fill out the scsi_xfer structure. We don't know whose context * the cmd is in, so copy it. */ bcopy(scsi_cmd, &(xs->cmdstore), cmdlen); xs->flags = INUSE | flags; xs->sc_link = sc_link; xs->retries = retries; xs->timeout = timeout; xs->cmd = &xs->cmdstore; xs->cmdlen = cmdlen; xs->data = data_addr; xs->datalen = datalen; xs->resid = datalen; xs->bp = bp; /*XXX*/ /*use constant not magic number */ if (datalen && ((caddr_t) data_addr < (caddr_t) KERNBASE)) { if (bp) { printf("Data buffered space not in kernel context\n"); #ifdef SCSIDEBUG show_scsi_cmd(xs); #endif /* SCSIDEBUG */ retval = EFAULT; goto bad; } #ifdef BOUNCE_BUFFERS xs->data = (caddr_t) vm_bounce_kva_alloc( (datalen + PAGE_SIZE - 1)/PAGE_SIZE); #else xs->data = malloc(datalen, M_TEMP, M_WAITOK); #endif /* I think waiting is ok *//*XXX */ switch ((int)(flags & (SCSI_DATA_IN | SCSI_DATA_OUT))) { case 0: printf("No direction flags, assuming both\n"); #ifdef SCSIDEBUG show_scsi_cmd(xs); #endif /* SCSIDEBUG */ case SCSI_DATA_IN | SCSI_DATA_OUT: /* weird */ case SCSI_DATA_OUT: bcopy(data_addr, xs->data, datalen); break; case SCSI_DATA_IN: bzero(xs->data, datalen); } } retry: xs->error = XS_NOERROR; #ifdef PARANOID if (datalen && ((caddr_t) xs->data < (caddr_t) KERNBASE)) { printf("It's still wrong!\n"); } #endif /*PARANOID*/ #ifdef SCSIDEBUG if (sc_link->flags & SDEV_DB3) show_scsi_xs(xs); #endif /* SCSIDEBUG */ /* * Do the transfer. If we are polling we will return: * COMPLETE, Was poll, and scsi_done has been called * TRY_AGAIN_LATER, Adapter short resources, try again * * if under full steam (interrupts) it will return: * SUCCESSFULLY_QUEUED, will do a wakeup when complete * 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 = (*(sc_link->adapter->scsi_cmd)) (xs); switch (retval) { case SUCCESSFULLY_QUEUED: if (bp) return retval; /* will sleep (or not) elsewhere */ s = splbio(); while (!(xs->flags & ITSDONE)) { tsleep((caddr_t)xs, PRIBIO + 1, "scsicmd", 0); } splx(s); /* fall through to check success of completed command */ case COMPLETE: /* Polling command completed ok */ /*XXX*/ case HAD_ERROR: /* Polling command completed with error */ SC_DEBUG(sc_link, SDEV_DB3, ("back in cmd()\n")); if ((retval = sc_err1(xs)) == -1) goto retry; break; case TRY_AGAIN_LATER: /* adapter resource shortage */ SC_DEBUG(sc_link, SDEV_DB3, ("will try again \n")); /* should sleep 1 sec here */ if (xs->retries--) { xs->flags &= ~ITSDONE; goto retry; } default: retval = EIO; } /* * If we had to copy the data out of the user's context, * then do the other half (copy it back or whatever) * and free the memory buffer */ if (datalen && (xs->data != data_addr)) { switch ((int)(flags & (SCSI_DATA_IN | SCSI_DATA_OUT))) { case 0: case SCSI_DATA_IN | SCSI_DATA_OUT: /* weird */ case SCSI_DATA_IN: bcopy(xs->data, data_addr, datalen); break; } #ifdef BOUNCE_BUFFERS vm_bounce_kva_alloc_free(xs->data, (datalen + PAGE_SIZE - 1)/PAGE_SIZE, 0); #else free(xs->data, M_TEMP); #endif } /* * we have finished with the xfer stuct, free it and * check if anyone else needs to be started up. */ bad: free_xs(xs, sc_link, flags); /* includes the 'start' op */ if (bp && retval) { bp->b_error = retval; bp->b_flags |= B_ERROR; biodone(bp); } return (retval); } static errval sc_err1(xs) struct scsi_xfer *xs; { struct buf *bp = xs->bp; errval retval; SC_DEBUG(xs->sc_link, SDEV_DB3, ("sc_err1,err = 0x%x \n", xs->error)); /* * If it has a buf, we might be working with * a request from the buffer cache or some other * piece of code that requires us to process * errors at inetrrupt time. We have probably * been called by scsi_done() */ switch ((int)xs->error) { case XS_NOERROR: /* nearly always hit this one */ retval = ESUCCESS; if (bp) { bp->b_error = 0; bp->b_resid = 0; } break; case XS_SENSE: retval = scsi_interpret_sense(xs); if (retval == SCSIRET_DO_RETRY) { if (xs->retries--) { xs->error = XS_NOERROR; xs->flags &= ~ITSDONE; goto retry; } } retval = EIO; /* Too many retries */ if (bp) { bp->b_error = 0; bp->b_resid = 0; if (retval) { bp->b_flags |= B_ERROR; bp->b_error = retval; bp->b_resid = bp->b_bcount; } SC_DEBUG(xs->sc_link, SDEV_DB3, ("scsi_interpret_sense (bp) returned %d\n", retval)); } else { SC_DEBUG(xs->sc_link, SDEV_DB3, ("scsi_interpret_sense (no bp) returned %d\n", retval)); } break; case XS_BUSY: /*should somehow arange for a 1 sec delay here (how?) */ /* XXX tsleep(&localvar, priority, "foo", hz); that's how! */ case XS_TIMEOUT: /* * If we can, resubmit it to the adapter. */ if (xs->retries--) { xs->error = XS_NOERROR; xs->flags &= ~ITSDONE; goto retry; } /* fall through */ case XS_DRIVER_STUFFUP: if (bp) { bp->b_flags |= B_ERROR; bp->b_error = EIO; } retval = EIO; break; default: retval = EIO; sc_print_addr(xs->sc_link); printf("unknown error category from scsi driver\n"); } return retval; retry: return (-1); } /* * scsi_sense_print will decode the sense data into human * readable form. Sense handlers can use this to generate * a report. This NOW DOES send the closing "\n". */ void scsi_sense_print(xs) struct scsi_xfer *xs; { struct scsi_sense_data_new *sense; struct scsi_sense_extended *ext; u_int32 key; u_int32 info; errval errcode; int asc, ascq; /* This sense key text now matches what is in the SCSI spec * (Yes, even the capitals) * so that it is easier to look through the spec to find the * appropriate place. */ static char *sense_key_text[] = { "NO SENSE", "RECOVERED ERROR", "NOT READY", "MEDIUM ERROR", "HARDWARE FAILURE", "ILLEGAL REQUEST", "UNIT ATTENTION", "DATA PROTECT", "BLANK CHECK", "Vendor Specific", "COPY ABORTED", "ABORTED COMMAND", "EQUAL", "VOLUME OVERFLOW", "MISCOMPARE", "RESERVED" }; sc_print_addr(xs->sc_link); sense = (struct scsi_sense_data_new *)&(xs->sense); ext = &(sense->ext.extended); key = ext->flags & SSD_KEY; switch (sense->error_code & SSD_ERRCODE) { case 0x71: /* deferred error */ printf("Deferred Error: "); /* DROP THROUGH */ case 0x70: printf("%s", sense_key_text[key]); info = ntohl(*((long *) ext->info)); if (sense->error_code & SSD_ERRCODE_VALID) { switch ((int)key) { case 0x2: /* NOT READY */ case 0x5: /* ILLEGAL REQUEST */ case 0x6: /* UNIT ATTENTION */ case 0x7: /* DATA PROTECT */ break; case 0x8: /* BLANK CHECK */ printf(" req sz: %ld (decimal)", info); break; default: if (info) printf(" info:%lx", info); } } else if (info) printf(" info?:%lx", info); if (ext->extra_len >= 4) { if (memcmp(ext->cmd_spec_info, "\0\0\0\0", 4)) { printf(" csi:%x,%x,%x,%x", ext->cmd_spec_info[0], ext->cmd_spec_info[1], ext->cmd_spec_info[2], ext->cmd_spec_info[3]); } } asc = (ext->extra_len >= 5) ? ext->add_sense_code : 0; ascq = (ext->extra_len >= 6) ? ext->add_sense_code_qual : 0; if (asc || ascq) { char *desc = scsi_sense_desc(asc, ascq); printf(" asc:%x,%x", asc, ascq); if (strlen(desc) > 40) sc_print_addr(xs->sc_link);; printf("%s", desc); } if (ext->extra_len >= 7 && ext->fru) { printf(" fru:%x", ext->fru); } if (ext->extra_len >= 10 && (ext->sense_key_spec_1 & SSD_SCS_VALID)) { printf(" sks:%x,%x", ext->sense_key_spec_1, (ext->sense_key_spec_2 | ext->sense_key_spec_3)); } break; /* * Not code 70, just report it */ default: printf("error code %d", sense->error_code & SSD_ERRCODE); if (sense->error_code & SSD_ERRCODE_VALID) { printf(" at block no. %ld (decimal)", (((unsigned long)sense->ext.unextended.blockhi) << 16) + (((unsigned long)sense->ext.unextended.blockmed) << 8) + ((unsigned long)sense->ext.unextended.blocklow)); } } printf("\n"); } /* * Look at the returned sense and act on the error, determining * the unix error number to pass back. (0 = report no error) * * THIS IS THE DEFAULT SENSE HANDLER */ static errval scsi_interpret_sense(xs) struct scsi_xfer *xs; { struct scsi_sense_data *sense; struct scsi_link *sc_link = xs->sc_link; u_int32 key; u_int32 silent; errval errcode; /* * If the flags say errs are ok, then always return ok. * BUG: What if it is a deferred error? */ if (xs->flags & SCSI_ERR_OK) return (ESUCCESS); sense = &(xs->sense); #ifdef SCSIDEBUG if (sc_link->flags & SDEV_DB1) { u_int32 count = 0; printf("code%x valid%x ", 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 /*SCSIDEBUG */ /* * If the device has it's own sense handler, call it first. * If it returns a legit errno value, return that, otherwise * it should return either DO_RETRY or CONTINUE to either * request a retry or continue with default sense handling. */ if (sc_link->device->err_handler) { SC_DEBUG(sc_link, SDEV_DB2, ("calling private err_handler()\n")); errcode = (*sc_link->device->err_handler) (xs); if (errcode >= 0) return errcode; /* valid errno value */ switch(errcode) { case SCSIRET_DO_RETRY: /* Requested a retry */ return errcode; case SCSIRET_CONTINUE: /* Continue with default sense processing */ break; default: sc_print_addr(xs->sc_link); printf("unknown return code %d from sense handler.\n", errcode); return errcode; } } /* otherwise use the default */ silent = (xs->flags & SCSI_SILENT); key = sense->ext.extended.flags & SSD_KEY; if (!silent) { scsi_sense_print(xs); } switch (sense->error_code & SSD_ERRCODE) { case 0x71: /* deferred error */ /* Print even if silent (not silent was already done) */ if (silent) { scsi_sense_print(xs); } /* BUG: * This error doesn't relate to the command associated * with this request sense. A deferred error is an error * for a command that has already returned GOOD status (see 7.2.14.2). * * By my reading of that section, it looks like the current command * has been cancelled, we should now clean things up (hopefully * recovering any lost data) and then * retry the current command. There are two easy choices, both * wrong: * 1. Drop through (like we had been doing), thus treating this as * if the error were for the current command and return and stop * the current command. * 2. Issue a retry (like I made it do) thus hopefully recovering * the current transfer, and ignoring the fact that we've dropped * a command. * * These should probably be handled in a device specific * sense handler or punted back up to a user mode daemon */ return SCSIRET_DO_RETRY; /* * If it's code 70, use the extended stuff and interpret the key */ case 0x70: switch ((int)key) { case 0x0: /* NO SENSE */ case 0x1: /* RECOVERED ERROR */ if (xs->resid == xs->datalen) xs->resid = 0; /* not short read */ case 0xc: /* EQUAL */ return (ESUCCESS); case 0x2: /* NOT READY */ sc_link->flags &= ~SDEV_MEDIA_LOADED; return (EBUSY); case 0x5: /* ILLEGAL REQUEST */ return (EINVAL); case 0x6: /* UNIT ATTENTION */ sc_link->flags &= ~SDEV_MEDIA_LOADED; if (sc_link->flags & SDEV_OPEN) { return (EIO); } else { return 0; } case 0x7: /* DATA PROTECT */ return (EACCES); case 0xd: /* VOLUME OVERFLOW */ return (ENOSPC); case 0x8: /* BLANK CHECK */ return (ESUCCESS); default: return (EIO); } /* * Not code 70, return EIO */ default: return (EIO); } } /* * Utility routines often used in SCSI stuff */ /* * convert a physical address to 3 bytes, * MSB at the lowest address, * LSB at the highest. */ void scsi_uto3b(val, bytes) u_int32 val; u_char *bytes; { *bytes++ = (val & 0xff0000) >> 16; *bytes++ = (val & 0xff00) >> 8; *bytes = val & 0xff; } u_int32 scsi_3btou(bytes) u_char *bytes; { u_int32 rc; rc = (*bytes++ << 16); rc += (*bytes++ << 8); rc += *bytes; return rc; } int32 scsi_3btoi(bytes) u_char *bytes; { u_int32 rc = scsi_3btou(bytes); if (rc & 0x00800000) rc |= 0xff000000; return (int32) rc; } void scsi_uto2b(val, bytes) u_int32 val; u_char *bytes; { *bytes++ = (val & 0xff00) >> 8; *bytes = val & 0xff; } u_int32 scsi_2btou(bytes) u_char *bytes; { u_int32 rc; rc = (*bytes++ << 8); rc += *bytes; return rc; } void scsi_uto4b(val, bytes) u_int32 val; u_char *bytes; { *bytes++ = (val & 0xff000000) >> 24; *bytes++ = (val & 0xff0000) >> 16; *bytes++ = (val & 0xff00) >> 8; *bytes = val & 0xff; } u_int32 scsi_4btou(bytes) u_char *bytes; { u_int32 rc; rc = (*bytes++ << 24); rc += (*bytes++ << 16); rc += (*bytes++ << 8); rc += *bytes; return rc; } static sc_printing; void sc_print_start(sc_link) struct scsi_link *sc_link; { sc_print_addr(sc_link); sc_printing = 1; } void sc_print_finish() { sc_printing = 0; } /* * Print out the scsi_link structure's address info. */ void sc_print_addr(sc_link) struct scsi_link *sc_link; { if (sc_printing) printf("\n"); if (strcmp(sc_link->device->name, "probe") != 0) printf("%s%d", sc_link->device->name, sc_link->dev_unit); printf("(%s%d:%d:%d): ", sc_link->adapter->name, sc_link->adapter_unit, sc_link->target, sc_link->lun); } #ifdef SCSIDEBUG /* * Given a scsi_xfer, dump the request, in all it's glory */ void show_scsi_xs(xs) struct scsi_xfer *xs; { printf("xs(0x%x): ", xs); printf("flg(0x%x)", xs->flags); printf("sc_link(0x%x)", xs->sc_link); printf("retr(0x%x)", xs->retries); printf("timo(0x%x)", xs->timeout); printf("cmd(0x%x)", xs->cmd); printf("len(0x%x)", xs->cmdlen); printf("data(0x%x)", xs->data); printf("len(0x%x)", xs->datalen); printf("res(0x%x)", xs->resid); printf("err(0x%x)", xs->error); printf("bp(0x%x)", xs->bp); show_scsi_cmd(xs); } void show_scsi_cmd(struct scsi_xfer *xs) { u_char *b = (u_char *) xs->cmd; int i = 0; sc_print_addr(xs->sc_link); printf("command: "); if (!(xs->flags & SCSI_RESET)) { while (i < xs->cmdlen) { if (i) printf(","); printf("%x", b[i++]); } printf("-[%d bytes]\n", xs->datalen); if (xs->datalen) show_mem(xs->data, min(64, xs->datalen)); } else { printf("-RESET-\n"); } } void show_mem(address, num) unsigned char *address; u_int32 num; { u_int32 x, y; printf("------------------------------"); for (y = 0; y < num; y += 1) { if (!(y % 16)) printf("\n%03d: ", y); printf("%02x ", *address++); } printf("\n------------------------------\n"); } #endif /*SCSIDEBUG */