diff options
Diffstat (limited to 'scsi/scsi_tape.c')
| -rw-r--r-- | scsi/scsi_tape.c | 415 |
1 files changed, 0 insertions, 415 deletions
diff --git a/scsi/scsi_tape.c b/scsi/scsi_tape.c deleted file mode 100644 index c73f432..0000000 --- a/scsi/scsi_tape.c +++ /dev/null @@ -1,415 +0,0 @@ -/* - * Mach Operating System - * Copyright (c) 1991,1990 Carnegie Mellon University - * All Rights Reserved. - * - * Permission to use, copy, modify and distribute this software and its - * documentation is hereby granted, provided that both the copyright - * notice and this permission notice appear in all copies of the - * software, derivative works or modified versions, and any portions - * thereof, and that both notices appear in supporting documentation. - * - * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS" - * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR - * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. - * - * Carnegie Mellon requests users of this software to return to - * - * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU - * School of Computer Science - * Carnegie Mellon University - * Pittsburgh PA 15213-3890 - * - * any improvements or extensions that they make and grant Carnegie Mellon - * the rights to redistribute these changes. - */ -/* - * File: scsi_tape.c - * Author: Alessandro Forin, Carnegie Mellon University - * Date: 10/90 - * - * Middle layer of the SCSI driver: SCSI protocol implementation - * - * This file contains code for SCSI commands for SEQUENTIAL ACCESS devices. - */ - -#include <mach/std_types.h> -#include <scsi/compat_30.h> - -#include <scsi/scsi.h> -#include <scsi/scsi_defs.h> - -#if (NSCSI > 0) - - -char *sctape_name(internal) - boolean_t internal; -{ - return internal ? "tz" : "tape"; -} - -void sctape_optimize(tgt) - target_info_t *tgt; -{ - register int i; - char result[6]; - - /* Some (DEC) tapes want to send you the self-test results */ - for (i = 0; i < 10; i++) { - if (scsi_receive_diag( tgt, result, sizeof(result), 0) - == SCSI_RET_SUCCESS) - break; - } - if (scsi_debug) - printf("[tape_rcvdiag: after %d, x%x x%x x%x x%x x%x x%x]\n", i+1, - result[0], result[1], result[2], result[3], result[4], result[5]); -} - -/* - * SCSI commands specific to sequential access devices - */ -int sctape_mode_select( tgt, vuque_data, vuque_data_len, newspeed, ior) - register target_info_t *tgt; - unsigned char *vuque_data; - int vuque_data_len; - int newspeed; - io_req_t ior; -{ - scsi_cmd_mode_select_t *cmd; - scsi_mode_select_param_t *parm; - - bzero(tgt->cmd_ptr, sizeof(*cmd) + 2 * sizeof(*parm)); - cmd = (scsi_cmd_mode_select_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_MODE_SELECT; - cmd->scsi_cmd_lun_and_lba1 = 0; - cmd->scsi_cmd_xfer_len = sizeof(scsi_mode_select_param_t) + vuque_data_len; - - parm = (scsi_mode_select_param_t*) (cmd + 1); - if (newspeed) { - parm->speed = tgt->dev_info.tape.speed; - } else { - /* Standard sez 0 -> no change */ - parm->speed = 0; - } - /* parm->medium_type = 0; reserved */ - parm->descs[0].density_code = tgt->dev_info.tape.density; - parm->buffer_mode = 1; - parm->desc_len = 8; - if (tgt->dev_info.tape.fixed_size) { - register int reclen = tgt->block_size; - parm->descs[0].reclen1 = reclen >> 16; - parm->descs[0].reclen2 = reclen >> 8; - parm->descs[0].reclen3 = reclen; - } - - if (vuque_data_len) - bcopy(vuque_data, (char*)(parm+1), vuque_data_len); - - tgt->cur_cmd = SCSI_CMD_MODE_SELECT; - - scsi_go_and_wait(tgt, sizeof(*cmd) + sizeof(*parm) + vuque_data_len, 0, ior); - - return tgt->done; -} - -void sctape_read( tgt, ior) - register target_info_t *tgt; - io_req_t ior; -{ - scsi_cmd_read_t *cmd; - register unsigned len, max; -# define nbytes max - boolean_t fixed = FALSE; - - max = scsi_softc[(unsigned char)tgt->masterno]->max_dma_data; - - len = ior->io_count; - if (tgt->dev_info.tape.fixed_size) { - unsigned int bs = tgt->block_size; - fixed = TRUE; - nbytes = len; - ior->io_residual += len % bs; - len = len / bs; - } else { - if (max > tgt->dev_info.tape.maxreclen) - max = tgt->dev_info.tape.maxreclen; - if (len > max) { - ior->io_residual = len - max; - len = max; - } - if (len < tgt->block_size) - len = tgt->block_size; - nbytes = len; - } - - cmd = (scsi_cmd_read_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_READ; - cmd->scsi_cmd_lun_and_lba1 = fixed ? SCSI_CMD_TP_FIXED : 0; - cmd->scsi_cmd_lba2 = len >> 16; - cmd->scsi_cmd_lba3 = len >> 8; - cmd->scsi_cmd_xfer_len = len; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - tgt->cur_cmd = SCSI_CMD_READ; - - scsi_go(tgt, sizeof(*cmd), nbytes, FALSE); -#undef nbytes -} - -void sctape_write( tgt, ior) - register target_info_t *tgt; - io_req_t ior; -{ - scsi_cmd_write_t *cmd; - register unsigned len, max; - boolean_t fixed = FALSE; - - len = ior->io_count; - max = scsi_softc[(unsigned char)tgt->masterno]->max_dma_data; - - if (tgt->dev_info.tape.fixed_size) { - unsigned int bs = tgt->block_size; - fixed = TRUE; - ior->io_residual += len % bs; - len = len / bs; - } else { - if (max > tgt->dev_info.tape.maxreclen) - max = tgt->dev_info.tape.maxreclen; - if (len > max) { - ior->io_residual = len - max; - len = max; - } - if (len < tgt->block_size) - len = tgt->block_size; - } - - cmd = (scsi_cmd_write_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_WRITE; - cmd->scsi_cmd_lun_and_lba1 = fixed ? SCSI_CMD_TP_FIXED : 0; - cmd->scsi_cmd_lba2 = len >> 16; - cmd->scsi_cmd_lba3 = len >> 8; - cmd->scsi_cmd_xfer_len = len; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - tgt->cur_cmd = SCSI_CMD_WRITE; - - scsi_go(tgt, sizeof(*cmd), 0, FALSE); -} - -int scsi_rewind( tgt, ior, wait) - register target_info_t *tgt; - io_req_t ior; - boolean_t wait; -{ - scsi_cmd_rewind_t *cmd; - - - cmd = (scsi_cmd_rewind_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_REWIND; - cmd->scsi_cmd_lun_and_lba1 = wait ? 0 : SCSI_CMD_REW_IMMED; - cmd->scsi_cmd_lba2 = 0; - cmd->scsi_cmd_lba3 = 0; - cmd->scsi_cmd_xfer_len = 0; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - tgt->cur_cmd = SCSI_CMD_REWIND; - - scsi_go( tgt, sizeof(*cmd), 0, FALSE); - return SCSI_RET_SUCCESS; -} - -int scsi_write_filemarks( tgt, count, ior) - register target_info_t *tgt; - register unsigned int count; - io_req_t ior; -{ - scsi_cmd_write_fil_t *cmd; - - cmd = (scsi_cmd_write_fil_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_WRITE_FILEMARKS; - cmd->scsi_cmd_lun_and_lba1 = 0; - cmd->scsi_cmd_lba2 = count >> 16; - cmd->scsi_cmd_lba3 = count >> 8; - cmd->scsi_cmd_xfer_len = count; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - - tgt->cur_cmd = SCSI_CMD_WRITE_FILEMARKS; - - scsi_go_and_wait(tgt, sizeof(*cmd), 0, ior); - - return tgt->done; -} - -int scsi_space( tgt, mode, count, ior) - register target_info_t *tgt; - int mode; - register int count; - io_req_t ior; -{ - scsi_cmd_space_t *cmd; - - cmd = (scsi_cmd_space_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_SPACE; - cmd->scsi_cmd_lun_and_lba1 = mode & 0x3; - cmd->scsi_cmd_lba2 = count >> 16; - cmd->scsi_cmd_lba3 = count >> 8; - cmd->scsi_cmd_xfer_len = count; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - - tgt->cur_cmd = SCSI_CMD_SPACE; - - scsi_go_and_wait(tgt, sizeof(*cmd), 0, ior); - - return tgt->done; -} - - -int scsi_read_block_limits( tgt, ior) - register target_info_t *tgt; - io_req_t ior; -{ - scsi_cmd_block_limits_t *cmd; - - cmd = (scsi_cmd_block_limits_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_READ_BLOCK_LIMITS; - cmd->scsi_cmd_lun_and_lba1 = 0; - cmd->scsi_cmd_lba2 = 0; - cmd->scsi_cmd_lba3 = 0; - cmd->scsi_cmd_xfer_len = 0; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - - tgt->cur_cmd = SCSI_CMD_READ_BLOCK_LIMITS; - - scsi_go_and_wait(tgt, sizeof(*cmd), sizeof(scsi_blimits_data_t), ior); - return tgt->done; -} - -#if 0 /* unused */ - -void scsi_track_select( tgt, trackno, ior) - register target_info_t *tgt; - register unsigned char trackno; - io_req_t ior; -{ - scsi_cmd_seek_t *cmd; - - cmd = (scsi_cmd_seek_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_TRACK_SELECT; - cmd->scsi_cmd_lun_and_lba1 = 0; - cmd->scsi_cmd_lba2 = 0; - cmd->scsi_cmd_lba3 = 0; - cmd->scsi_cmd_tp_trackno = trackno; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - - tgt->cur_cmd = SCSI_CMD_TRACK_SELECT; - - scsi_go_and_wait(tgt, sizeof(*cmd), 0, ior); -} - -void scsi_read_reverse( tgt, ior) - register target_info_t *tgt; - io_req_t ior; -{ - scsi_cmd_rev_read_t *cmd; - register unsigned len; - unsigned int max_dma_data; - - max_dma_data = scsi_softc[(unsigned char)tgt->masterno]->max_dma_data; - - len = ior->io_count; - if (len > max_dma_data) - len = max_dma_data; - - cmd = (scsi_cmd_rev_read_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_READ_REVERSE; - cmd->scsi_cmd_lun_and_lba1 = 0; - cmd->scsi_cmd_lba2 = len >> 16; - cmd->scsi_cmd_lba3 = len >> 8; - cmd->scsi_cmd_xfer_len = len; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - tgt->cur_cmd = SCSI_CMD_READ_REVERSE; - - scsi_go(tgt, sizeof(*cmd), len, FALSE); -} - -void sctape_verify( tgt, len, ior) - register target_info_t *tgt; - register unsigned int len; - io_req_t ior; -{ - scsi_cmd_verify_t *cmd; - - cmd = (scsi_cmd_verify_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_VERIFY_0; - cmd->scsi_cmd_lun_and_lba1 = 0;/* XXX */ - cmd->scsi_cmd_lba2 = len >> 16; - cmd->scsi_cmd_lba3 = len >> 8; - cmd->scsi_cmd_xfer_len = len; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - - tgt->cur_cmd = SCSI_CMD_VERIFY_0; - - scsi_go_and_wait(tgt, sizeof(*cmd), 0, ior); -} - - -void scsi_recover_buffered_data( tgt, ior) - register target_info_t *tgt; - io_req_t ior; -{ - scsi_cmd_recover_buffer_t *cmd; - register unsigned len; - unsigned int max_dma_data; - - max_dma_data = scsi_softc[(unsigned char)tgt->masterno]->max_dma_data; - - len = ior->io_count; - if (len > max_dma_data) - len = max_dma_data; - - cmd = (scsi_cmd_recover_buffer_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_RECOVER_BUFFERED_DATA; - cmd->scsi_cmd_lun_and_lba1 = 0; - cmd->scsi_cmd_lba2 = len >> 16; - cmd->scsi_cmd_lba3 = len >> 8; - cmd->scsi_cmd_xfer_len = len; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - tgt->cur_cmd = SCSI_CMD_RECOVER_BUFFERED_DATA; - - scsi_go(tgt, sizeof(*cmd), len, FALSE); -} - -void scsi_erase( tgt, mode, ior) - register target_info_t *tgt; - io_req_t ior; -{ - scsi_cmd_erase_t *cmd; - - cmd = (scsi_cmd_erase_t*) (tgt->cmd_ptr); - cmd->scsi_cmd_code = SCSI_CMD_ERASE; - cmd->scsi_cmd_lun_and_lba1 = mode & SCSI_CMD_ER_LONG; - cmd->scsi_cmd_lba2 = 0; - cmd->scsi_cmd_lba3 = 0; - cmd->scsi_cmd_xfer_len = 0; - cmd->scsi_cmd_ctrl_byte = 0; /* not linked */ - - - tgt->cur_cmd = SCSI_CMD_ERASE; - - scsi_go_and_wait(tgt, sizeof(*cmd), 0, ior); -} - -#endif - -#ifdef SCSI2 -scsi_locate -scsi_read_position -#endif SCSI2 -#endif /* NSCSI > 0 */ |