2 * Simulated SCSI driver.
4 * Copyright (C) 1999, 2001-2003 Hewlett-Packard Co
5 * David Mosberger-Tang <davidm@hpl.hp.com>
6 * Stephane Eranian <eranian@hpl.hp.com>
8 * 02/01/15 David Mosberger Updated for v2.5.1
9 * 99/12/18 David Mosberger Added support for READ10/WRITE10 needed by linux v2.3.33
11 #include <linux/config.h>
12 #include <linux/blk.h>
13 #include <linux/init.h>
14 #include <linux/interrupt.h>
15 #include <linux/kernel.h>
16 #include <linux/timer.h>
18 #include <scsi/scsi.h>
22 #include "../drivers/scsi/scsi.h"
23 #include "../drivers/scsi/sd.h"
24 #include "../drivers/scsi/hosts.h"
27 #define DEBUG_SIMSCSI 1
29 /* Simulator system calls: */
35 #define SSC_GET_COMPLETION 54
36 #define SSC_WAIT_COMPLETION 55
38 #define SSC_WRITE_ACCESS 2
39 #define SSC_READ_ACCESS 1
43 # define DBG simscsi_debug
48 static void simscsi_interrupt (unsigned long val);
49 DECLARE_TASKLET(simscsi_tasklet, simscsi_interrupt, 0);
61 extern long ia64_ssc (long arg0, long arg1, long arg2, long arg3, int nr);
63 static int desc[16] = {
64 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1
67 static struct queue_entry {
69 } queue[SIMSCSI_REQ_QUEUE_LEN];
72 static atomic_t num_reqs = ATOMIC_INIT(0);
74 /* base name for default disks */
75 static char *simscsi_root = DEFAULT_SIMSCSI_ROOT;
77 #define MAX_ROOT_LEN 128
80 * used to setup a new base for disk images
81 * to use /foo/bar/disk[a-z] as disk images
82 * you have to specify simscsi=/foo/bar/disk on the command line
85 simscsi_setup (char *s)
87 /* XXX Fix me we may need to strcpy() ? */
88 if (strlen(s) > MAX_ROOT_LEN) {
89 printk(KERN_ERR "simscsi_setup: prefix too long---using default %s\n",
96 __setup("simscsi=", simscsi_setup);
99 simscsi_interrupt (unsigned long val)
104 spin_lock_irqsave(&io_request_lock, flags);
106 while ((sc = queue[rd].sc) != 0) {
107 atomic_dec(&num_reqs);
110 printk("simscsi_interrupt: done with %ld\n", sc->serial_number);
111 (*sc->scsi_done)(sc);
112 rd = (rd + 1) % SIMSCSI_REQ_QUEUE_LEN;
115 spin_unlock_irqrestore(&io_request_lock, flags);
119 simscsi_detect (Scsi_Host_Template *templ)
121 templ->proc_name = "simscsi";
122 return 1; /* fake one SCSI host adapter */
126 simscsi_release (struct Scsi_Host *host)
128 return 0; /* this is easy... */
132 simscsi_info (struct Scsi_Host *host)
134 return "simulated SCSI host adapter";
138 simscsi_biosparam (Disk *disk, kdev_t n, int ip[])
140 unsigned capacity = disk->capacity;
142 ip[0] = 64; /* heads */
143 ip[1] = 32; /* sectors */
144 ip[2] = capacity >> 11; /* cylinders */
149 simscsi_readwrite (Scsi_Cmnd *sc, int mode, unsigned long offset, unsigned long len)
151 struct disk_stat stat;
154 req.addr = __pa(sc->request_buffer);
155 req.len = len; /* # of bytes to transfer */
157 if (sc->request_bufflen < req.len)
160 stat.fd = desc[sc->target];
162 printk("simscsi_%s @ %lx (off %lx)\n",
163 mode == SSC_READ ? "read":"write", req.addr, offset);
164 ia64_ssc(stat.fd, 1, __pa(&req), offset, mode);
165 ia64_ssc(__pa(&stat), 0, 0, 0, SSC_WAIT_COMPLETION);
167 if (stat.count == req.len) {
170 sc->result = DID_ERROR << 16;
175 simscsi_sg_readwrite (Scsi_Cmnd *sc, int mode, unsigned long offset)
177 int list_len = sc->use_sg;
178 struct scatterlist *sl = (struct scatterlist *)sc->buffer;
179 struct disk_stat stat;
182 stat.fd = desc[sc->target];
185 req.addr = __pa(sl->address);
186 req.len = sl->length;
188 printk("simscsi_sg_%s @ %lx (off %lx) use_sg=%d len=%d\n",
189 mode == SSC_READ ? "read":"write", req.addr, offset,
190 list_len, sl->length);
191 ia64_ssc(stat.fd, 1, __pa(&req), offset, mode);
192 ia64_ssc(__pa(&stat), 0, 0, 0, SSC_WAIT_COMPLETION);
194 /* should not happen in our case */
195 if (stat.count != req.len) {
196 sc->result = DID_ERROR << 16;
199 offset += sl->length;
207 * function handling both READ_6/WRITE_6 (non-scatter/gather mode)
209 * Added 02/26/99 S.Eranian
212 simscsi_readwrite6 (Scsi_Cmnd *sc, int mode)
214 unsigned long offset;
216 offset = (((sc->cmnd[1] & 0x1f) << 16) | (sc->cmnd[2] << 8) | sc->cmnd[3])*512;
218 simscsi_sg_readwrite(sc, mode, offset);
220 simscsi_readwrite(sc, mode, offset, sc->cmnd[4]*512);
224 simscsi_get_disk_size (int fd)
226 struct disk_stat stat;
227 size_t bit, sectors = 0;
232 * This is a bit kludgey: the simulator doesn't provide a direct way of determining
233 * the disk size, so we do a binary search, assuming a maximum disk size of 4GB.
235 for (bit = (4UL << 30)/512; bit != 0; bit >>= 1) {
236 req.addr = __pa(&buf);
237 req.len = sizeof(buf);
238 ia64_ssc(fd, 1, __pa(&req), ((sectors | bit) - 1)*512, SSC_READ);
240 ia64_ssc(__pa(&stat), 0, 0, 0, SSC_WAIT_COMPLETION);
241 if (stat.count == sizeof(buf))
244 return sectors - 1; /* return last valid sector number */
248 simscsi_readwrite10 (Scsi_Cmnd *sc, int mode)
250 unsigned long offset;
252 offset = ( (sc->cmnd[2] << 24) | (sc->cmnd[3] << 16)
253 | (sc->cmnd[4] << 8) | (sc->cmnd[5] << 0))*512;
255 simscsi_sg_readwrite(sc, mode, offset);
257 simscsi_readwrite(sc, mode, offset, ((sc->cmnd[7] << 8) | sc->cmnd[8])*512);
261 simscsi_queuecommand (Scsi_Cmnd *sc, void (*done)(Scsi_Cmnd *))
263 char fname[MAX_ROOT_LEN+16];
267 register long sp asm ("sp");
270 printk("simscsi_queuecommand: target=%d,cmnd=%u,sc=%lu,sp=%lx,done=%p\n",
271 sc->target, sc->cmnd[0], sc->serial_number, sp, done);
274 sc->result = DID_BAD_TARGET << 16;
275 sc->scsi_done = done;
276 if (sc->target <= 15 && sc->lun == 0) {
277 switch (sc->cmnd[0]) {
279 if (sc->request_bufflen < 35) {
282 sprintf (fname, "%s%c", simscsi_root, 'a' + sc->target);
283 desc[sc->target] = ia64_ssc(__pa(fname), SSC_READ_ACCESS|SSC_WRITE_ACCESS,
285 if (desc[sc->target] < 0) {
286 /* disk doesn't exist... */
289 buf = sc->request_buffer;
290 buf[0] = 0; /* magnetic disk */
291 buf[1] = 0; /* not a removable medium */
292 buf[2] = 2; /* SCSI-2 compliant device */
293 buf[3] = 2; /* SCSI-2 response data format */
294 buf[4] = 31; /* additional length (bytes) */
295 buf[5] = 0; /* reserved */
296 buf[6] = 0; /* reserved */
297 buf[7] = 0; /* various flags */
298 memcpy(buf + 8, "HP SIMULATED DISK 0.00", 28);
302 case TEST_UNIT_READY:
307 if (desc[sc->target] < 0 )
309 simscsi_readwrite6(sc, SSC_READ);
313 if (desc[sc->target] < 0 )
315 simscsi_readwrite10(sc, SSC_READ);
319 if (desc[sc->target] < 0)
321 simscsi_readwrite6(sc, SSC_WRITE);
325 if (desc[sc->target] < 0)
327 simscsi_readwrite10(sc, SSC_WRITE);
332 if (desc[sc->target] < 0 || sc->request_bufflen < 8) {
335 buf = sc->request_buffer;
337 disk_size = simscsi_get_disk_size(desc[sc->target]);
338 buf[0] = (disk_size >> 24) & 0xff;
339 buf[1] = (disk_size >> 16) & 0xff;
340 buf[2] = (disk_size >> 8) & 0xff;
341 buf[3] = (disk_size >> 0) & 0xff;
342 /* set block size of 512 bytes: */
351 /* sd.c uses this to determine whether disk does write-caching. */
352 memset(sc->request_buffer, 0, 128);
357 printk(KERN_ERR "START_STOP\n");
361 panic("simscsi: unknown SCSI command %u\n", sc->cmnd[0]);
364 if (sc->result == DID_BAD_TARGET) {
365 sc->result |= DRIVER_SENSE << 24;
366 sc->sense_buffer[0] = 0x70;
367 sc->sense_buffer[2] = 0x00;
369 if (atomic_read(&num_reqs) >= SIMSCSI_REQ_QUEUE_LEN) {
370 panic("Attempt to queue command while command is pending!!");
372 atomic_inc(&num_reqs);
374 wr = (wr + 1) % SIMSCSI_REQ_QUEUE_LEN;
376 tasklet_schedule(&simscsi_tasklet);
381 simscsi_reset (Scsi_Cmnd *cmd, unsigned int reset_flags)
383 printk(KERN_ERR "simscsi_reset: unimplemented\n");
384 return SCSI_RESET_SUCCESS;
388 simscsi_abort (Scsi_Cmnd *cmd)
390 printk(KERN_ERR "simscsi_abort: unimplemented\n");
391 return SCSI_ABORT_SUCCESS;
394 static Scsi_Host_Template driver_template = SIMSCSI;
396 #include "../drivers/scsi/scsi_module.c"