RT-AC66 3.0.0.4.374.130 core
[tomato.git] / release / src-rt-6.x / linux / linux-2.6 / drivers / scsi / 53c700.c
blobea27fb9ed25df478644c97e94bc530a16f053878
1 /* -*- mode: c; c-basic-offset: 8 -*- */
3 /* NCR (or Symbios) 53c700 and 53c700-66 Driver
5 * Copyright (C) 2001 by James.Bottomley@HansenPartnership.com
6 **-----------------------------------------------------------------------------
7 **
8 ** This program is free software; you can redistribute it and/or modify
9 ** it under the terms of the GNU General Public License as published by
10 ** the Free Software Foundation; either version 2 of the License, or
11 ** (at your option) any later version.
13 ** This program is distributed in the hope that it will be useful,
14 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
15 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 ** GNU General Public License for more details.
18 ** You should have received a copy of the GNU General Public License
19 ** along with this program; if not, write to the Free Software
20 ** Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 **-----------------------------------------------------------------------------
25 /* Notes:
27 * This driver is designed exclusively for these chips (virtually the
28 * earliest of the scripts engine chips). They need their own drivers
29 * because they are missing so many of the scripts and snazzy register
30 * features of their elder brothers (the 710, 720 and 770).
32 * The 700 is the lowliest of the line, it can only do async SCSI.
33 * The 700-66 can at least do synchronous SCSI up to 10MHz.
35 * The 700 chip has no host bus interface logic of its own. However,
36 * it is usually mapped to a location with well defined register
37 * offsets. Therefore, if you can determine the base address and the
38 * irq your board incorporating this chip uses, you can probably use
39 * this driver to run it (although you'll probably have to write a
40 * minimal wrapper for the purpose---see the NCR_D700 driver for
41 * details about how to do this).
44 * TODO List:
46 * 1. Better statistics in the proc fs
48 * 2. Implement message queue (queues SCSI messages like commands) and make
49 * the abort and device reset functions use them.
50 * */
52 /* CHANGELOG
54 * Version 2.8
56 * Fixed bad bug affecting tag starvation processing (previously the
57 * driver would hang the system if too many tags starved. Also fixed
58 * bad bug having to do with 10 byte command processing and REQUEST
59 * SENSE (the command would loop forever getting a transfer length
60 * mismatch in the CMD phase).
62 * Version 2.7
64 * Fixed scripts problem which caused certain devices (notably CDRWs)
65 * to hang on initial INQUIRY. Updated NCR_700_readl/writel to use
66 * __raw_readl/writel for parisc compatibility (Thomas
67 * Bogendoerfer). Added missing SCp->request_bufflen initialisation
68 * for sense requests (Ryan Bradetich).
70 * Version 2.6
72 * Following test of the 64 bit parisc kernel by Richard Hirst,
73 * several problems have now been corrected. Also adds support for
74 * consistent memory allocation.
76 * Version 2.5
78 * More Compatibility changes for 710 (now actually works). Enhanced
79 * support for odd clock speeds which constrain SDTR negotiations.
80 * correct cacheline separation for scsi messages and status for
81 * incoherent architectures. Use of the pci mapping functions on
82 * buffers to begin support for 64 bit drivers.
84 * Version 2.4
86 * Added support for the 53c710 chip (in 53c700 emulation mode only---no
87 * special 53c710 instructions or registers are used).
89 * Version 2.3
91 * More endianness/cache coherency changes.
93 * Better bad device handling (handles devices lying about tag
94 * queueing support and devices which fail to provide sense data on
95 * contingent allegiance conditions)
97 * Many thanks to Richard Hirst <rhirst@linuxcare.com> for patiently
98 * debugging this driver on the parisc architecture and suggesting
99 * many improvements and bug fixes.
101 * Thanks also go to Linuxcare Inc. for providing several PARISC
102 * machines for me to debug the driver on.
104 * Version 2.2
106 * Made the driver mem or io mapped; added endian invariance; added
107 * dma cache flushing operations for architectures which need it;
108 * added support for more varied clocking speeds.
110 * Version 2.1
112 * Initial modularisation from the D700. See NCR_D700.c for the rest of
113 * the changelog.
114 * */
115 #define NCR_700_VERSION "2.8"
117 #include <linux/kernel.h>
118 #include <linux/types.h>
119 #include <linux/string.h>
120 #include <linux/ioport.h>
121 #include <linux/delay.h>
122 #include <linux/spinlock.h>
123 #include <linux/completion.h>
124 #include <linux/init.h>
125 #include <linux/proc_fs.h>
126 #include <linux/blkdev.h>
127 #include <linux/module.h>
128 #include <linux/interrupt.h>
129 #include <linux/device.h>
130 #include <asm/dma.h>
131 #include <asm/system.h>
132 #include <asm/io.h>
133 #include <asm/pgtable.h>
134 #include <asm/byteorder.h>
136 #include <scsi/scsi.h>
137 #include <scsi/scsi_cmnd.h>
138 #include <scsi/scsi_dbg.h>
139 #include <scsi/scsi_eh.h>
140 #include <scsi/scsi_host.h>
141 #include <scsi/scsi_tcq.h>
142 #include <scsi/scsi_transport.h>
143 #include <scsi/scsi_transport_spi.h>
145 #include "53c700.h"
147 /* NOTE: For 64 bit drivers there are points in the code where we use
148 * a non dereferenceable pointer to point to a structure in dma-able
149 * memory (which is 32 bits) so that we can use all of the structure
150 * operations but take the address at the end. This macro allows us
151 * to truncate the 64 bit pointer down to 32 bits without the compiler
152 * complaining */
153 #define to32bit(x) ((__u32)((unsigned long)(x)))
155 #ifdef NCR_700_DEBUG
156 #define STATIC
157 #else
158 #define STATIC static
159 #endif
161 MODULE_AUTHOR("James Bottomley");
162 MODULE_DESCRIPTION("53c700 and 53c700-66 Driver");
163 MODULE_LICENSE("GPL");
165 /* This is the script */
166 #include "53c700_d.h"
169 STATIC int NCR_700_queuecommand(struct scsi_cmnd *, void (*done)(struct scsi_cmnd *));
170 STATIC int NCR_700_abort(struct scsi_cmnd * SCpnt);
171 STATIC int NCR_700_bus_reset(struct scsi_cmnd * SCpnt);
172 STATIC int NCR_700_host_reset(struct scsi_cmnd * SCpnt);
173 STATIC void NCR_700_chip_setup(struct Scsi_Host *host);
174 STATIC void NCR_700_chip_reset(struct Scsi_Host *host);
175 STATIC int NCR_700_slave_alloc(struct scsi_device *SDpnt);
176 STATIC int NCR_700_slave_configure(struct scsi_device *SDpnt);
177 STATIC void NCR_700_slave_destroy(struct scsi_device *SDpnt);
178 static int NCR_700_change_queue_depth(struct scsi_device *SDpnt, int depth);
179 static int NCR_700_change_queue_type(struct scsi_device *SDpnt, int depth);
181 STATIC struct device_attribute *NCR_700_dev_attrs[];
183 STATIC struct scsi_transport_template *NCR_700_transport_template = NULL;
185 static char *NCR_700_phase[] = {
187 "after selection",
188 "before command phase",
189 "after command phase",
190 "after status phase",
191 "after data in phase",
192 "after data out phase",
193 "during data phase",
196 static char *NCR_700_condition[] = {
198 "NOT MSG_OUT",
199 "UNEXPECTED PHASE",
200 "NOT MSG_IN",
201 "UNEXPECTED MSG",
202 "MSG_IN",
203 "SDTR_MSG RECEIVED",
204 "REJECT_MSG RECEIVED",
205 "DISCONNECT_MSG RECEIVED",
206 "MSG_OUT",
207 "DATA_IN",
211 static char *NCR_700_fatal_messages[] = {
212 "unexpected message after reselection",
213 "still MSG_OUT after message injection",
214 "not MSG_IN after selection",
215 "Illegal message length received",
218 static char *NCR_700_SBCL_bits[] = {
219 "IO ",
220 "CD ",
221 "MSG ",
222 "ATN ",
223 "SEL ",
224 "BSY ",
225 "ACK ",
226 "REQ ",
229 static char *NCR_700_SBCL_to_phase[] = {
230 "DATA_OUT",
231 "DATA_IN",
232 "CMD_OUT",
233 "STATE",
234 "ILLEGAL PHASE",
235 "ILLEGAL PHASE",
236 "MSG OUT",
237 "MSG IN",
240 /* This translates the SDTR message offset and period to a value
241 * which can be loaded into the SXFER_REG.
243 * NOTE: According to SCSI-2, the true transfer period (in ns) is
244 * actually four times this period value */
245 static inline __u8
246 NCR_700_offset_period_to_sxfer(struct NCR_700_Host_Parameters *hostdata,
247 __u8 offset, __u8 period)
249 int XFERP;
251 __u8 min_xferp = (hostdata->chip710
252 ? NCR_710_MIN_XFERP : NCR_700_MIN_XFERP);
253 __u8 max_offset = (hostdata->chip710
254 ? NCR_710_MAX_OFFSET : NCR_700_MAX_OFFSET);
256 if(offset == 0)
257 return 0;
259 if(period < hostdata->min_period) {
260 printk(KERN_WARNING "53c700: Period %dns is less than this chip's minimum, setting to %d\n", period*4, NCR_700_MIN_PERIOD*4);
261 period = hostdata->min_period;
263 XFERP = (period*4 * hostdata->sync_clock)/1000 - 4;
264 if(offset > max_offset) {
265 printk(KERN_WARNING "53c700: Offset %d exceeds chip maximum, setting to %d\n",
266 offset, max_offset);
267 offset = max_offset;
269 if(XFERP < min_xferp) {
270 printk(KERN_WARNING "53c700: XFERP %d is less than minium, setting to %d\n",
271 XFERP, min_xferp);
272 XFERP = min_xferp;
274 return (offset & 0x0f) | (XFERP & 0x07)<<4;
277 static inline __u8
278 NCR_700_get_SXFER(struct scsi_device *SDp)
280 struct NCR_700_Host_Parameters *hostdata =
281 (struct NCR_700_Host_Parameters *)SDp->host->hostdata[0];
283 return NCR_700_offset_period_to_sxfer(hostdata,
284 spi_offset(SDp->sdev_target),
285 spi_period(SDp->sdev_target));
288 struct Scsi_Host *
289 NCR_700_detect(struct scsi_host_template *tpnt,
290 struct NCR_700_Host_Parameters *hostdata, struct device *dev)
292 dma_addr_t pScript, pSlots;
293 __u8 *memory;
294 __u32 *script;
295 struct Scsi_Host *host;
296 static int banner = 0;
297 int j;
299 if(tpnt->sdev_attrs == NULL)
300 tpnt->sdev_attrs = NCR_700_dev_attrs;
302 memory = dma_alloc_noncoherent(hostdata->dev, TOTAL_MEM_SIZE,
303 &pScript, GFP_KERNEL);
304 if(memory == NULL) {
305 printk(KERN_ERR "53c700: Failed to allocate memory for driver, detatching\n");
306 return NULL;
309 script = (__u32 *)memory;
310 hostdata->msgin = memory + MSGIN_OFFSET;
311 hostdata->msgout = memory + MSGOUT_OFFSET;
312 hostdata->status = memory + STATUS_OFFSET;
313 /* all of these offsets are L1_CACHE_BYTES separated. It is fatal
314 * if this isn't sufficient separation to avoid dma flushing issues */
315 BUG_ON(!dma_is_consistent(hostdata->dev, pScript) && L1_CACHE_BYTES < dma_get_cache_alignment());
316 hostdata->slots = (struct NCR_700_command_slot *)(memory + SLOTS_OFFSET);
317 hostdata->dev = dev;
319 pSlots = pScript + SLOTS_OFFSET;
321 /* Fill in the missing routines from the host template */
322 tpnt->queuecommand = NCR_700_queuecommand;
323 tpnt->eh_abort_handler = NCR_700_abort;
324 tpnt->eh_bus_reset_handler = NCR_700_bus_reset;
325 tpnt->eh_host_reset_handler = NCR_700_host_reset;
326 tpnt->can_queue = NCR_700_COMMAND_SLOTS_PER_HOST;
327 tpnt->sg_tablesize = NCR_700_SG_SEGMENTS;
328 tpnt->cmd_per_lun = NCR_700_CMD_PER_LUN;
329 tpnt->use_clustering = ENABLE_CLUSTERING;
330 tpnt->slave_configure = NCR_700_slave_configure;
331 tpnt->slave_destroy = NCR_700_slave_destroy;
332 tpnt->slave_alloc = NCR_700_slave_alloc;
333 tpnt->change_queue_depth = NCR_700_change_queue_depth;
334 tpnt->change_queue_type = NCR_700_change_queue_type;
336 if(tpnt->name == NULL)
337 tpnt->name = "53c700";
338 if(tpnt->proc_name == NULL)
339 tpnt->proc_name = "53c700";
341 host = scsi_host_alloc(tpnt, 4);
342 if (!host)
343 return NULL;
344 memset(hostdata->slots, 0, sizeof(struct NCR_700_command_slot)
345 * NCR_700_COMMAND_SLOTS_PER_HOST);
346 for (j = 0; j < NCR_700_COMMAND_SLOTS_PER_HOST; j++) {
347 dma_addr_t offset = (dma_addr_t)((unsigned long)&hostdata->slots[j].SG[0]
348 - (unsigned long)&hostdata->slots[0].SG[0]);
349 hostdata->slots[j].pSG = (struct NCR_700_SG_List *)((unsigned long)(pSlots + offset));
350 if(j == 0)
351 hostdata->free_list = &hostdata->slots[j];
352 else
353 hostdata->slots[j-1].ITL_forw = &hostdata->slots[j];
354 hostdata->slots[j].state = NCR_700_SLOT_FREE;
357 for (j = 0; j < ARRAY_SIZE(SCRIPT); j++)
358 script[j] = bS_to_host(SCRIPT[j]);
360 /* adjust all labels to be bus physical */
361 for (j = 0; j < PATCHES; j++)
362 script[LABELPATCHES[j]] = bS_to_host(pScript + SCRIPT[LABELPATCHES[j]]);
363 /* now patch up fixed addresses. */
364 script_patch_32(hostdata->dev, script, MessageLocation,
365 pScript + MSGOUT_OFFSET);
366 script_patch_32(hostdata->dev, script, StatusAddress,
367 pScript + STATUS_OFFSET);
368 script_patch_32(hostdata->dev, script, ReceiveMsgAddress,
369 pScript + MSGIN_OFFSET);
371 hostdata->script = script;
372 hostdata->pScript = pScript;
373 dma_sync_single_for_device(hostdata->dev, pScript, sizeof(SCRIPT), DMA_TO_DEVICE);
374 hostdata->state = NCR_700_HOST_FREE;
375 hostdata->cmd = NULL;
376 host->max_id = 8;
377 host->max_lun = NCR_700_MAX_LUNS;
378 BUG_ON(NCR_700_transport_template == NULL);
379 host->transportt = NCR_700_transport_template;
380 host->unique_id = (unsigned long)hostdata->base;
381 hostdata->eh_complete = NULL;
382 host->hostdata[0] = (unsigned long)hostdata;
383 /* kick the chip */
384 NCR_700_writeb(0xff, host, CTEST9_REG);
385 if (hostdata->chip710)
386 hostdata->rev = (NCR_700_readb(host, CTEST8_REG)>>4) & 0x0f;
387 else
388 hostdata->rev = (NCR_700_readb(host, CTEST7_REG)>>4) & 0x0f;
389 hostdata->fast = (NCR_700_readb(host, CTEST9_REG) == 0);
390 if (banner == 0) {
391 printk(KERN_NOTICE "53c700: Version " NCR_700_VERSION " By James.Bottomley@HansenPartnership.com\n");
392 banner = 1;
394 printk(KERN_NOTICE "scsi%d: %s rev %d %s\n", host->host_no,
395 hostdata->chip710 ? "53c710" :
396 (hostdata->fast ? "53c700-66" : "53c700"),
397 hostdata->rev, hostdata->differential ?
398 "(Differential)" : "");
399 /* reset the chip */
400 NCR_700_chip_reset(host);
402 if (scsi_add_host(host, dev)) {
403 dev_printk(KERN_ERR, dev, "53c700: scsi_add_host failed\n");
404 scsi_host_put(host);
405 return NULL;
408 spi_signalling(host) = hostdata->differential ? SPI_SIGNAL_HVD :
409 SPI_SIGNAL_SE;
411 return host;
415 NCR_700_release(struct Scsi_Host *host)
417 struct NCR_700_Host_Parameters *hostdata =
418 (struct NCR_700_Host_Parameters *)host->hostdata[0];
420 dma_free_noncoherent(hostdata->dev, TOTAL_MEM_SIZE,
421 hostdata->script, hostdata->pScript);
422 return 1;
425 static inline __u8
426 NCR_700_identify(int can_disconnect, __u8 lun)
428 return IDENTIFY_BASE |
429 ((can_disconnect) ? 0x40 : 0) |
430 (lun & NCR_700_LUN_MASK);
434 * Function : static int data_residual (Scsi_Host *host)
436 * Purpose : return residual data count of what's in the chip. If you
437 * really want to know what this function is doing, it's almost a
438 * direct transcription of the algorithm described in the 53c710
439 * guide, except that the DBC and DFIFO registers are only 6 bits
440 * wide on a 53c700.
442 * Inputs : host - SCSI host */
443 static inline int
444 NCR_700_data_residual (struct Scsi_Host *host) {
445 struct NCR_700_Host_Parameters *hostdata =
446 (struct NCR_700_Host_Parameters *)host->hostdata[0];
447 int count, synchronous = 0;
448 unsigned int ddir;
450 if(hostdata->chip710) {
451 count = ((NCR_700_readb(host, DFIFO_REG) & 0x7f) -
452 (NCR_700_readl(host, DBC_REG) & 0x7f)) & 0x7f;
453 } else {
454 count = ((NCR_700_readb(host, DFIFO_REG) & 0x3f) -
455 (NCR_700_readl(host, DBC_REG) & 0x3f)) & 0x3f;
458 if(hostdata->fast)
459 synchronous = NCR_700_readb(host, SXFER_REG) & 0x0f;
461 /* get the data direction */
462 ddir = NCR_700_readb(host, CTEST0_REG) & 0x01;
464 if (ddir) {
465 /* Receive */
466 if (synchronous)
467 count += (NCR_700_readb(host, SSTAT2_REG) & 0xf0) >> 4;
468 else
469 if (NCR_700_readb(host, SSTAT1_REG) & SIDL_REG_FULL)
470 ++count;
471 } else {
472 /* Send */
473 __u8 sstat = NCR_700_readb(host, SSTAT1_REG);
474 if (sstat & SODL_REG_FULL)
475 ++count;
476 if (synchronous && (sstat & SODR_REG_FULL))
477 ++count;
479 #ifdef NCR_700_DEBUG
480 if(count)
481 printk("RESIDUAL IS %d (ddir %d)\n", count, ddir);
482 #endif
483 return count;
486 /* print out the SCSI wires and corresponding phase from the SBCL register
487 * in the chip */
488 static inline char *
489 sbcl_to_string(__u8 sbcl)
491 int i;
492 static char ret[256];
494 ret[0]='\0';
495 for(i=0; i<8; i++) {
496 if((1<<i) & sbcl)
497 strcat(ret, NCR_700_SBCL_bits[i]);
499 strcat(ret, NCR_700_SBCL_to_phase[sbcl & 0x07]);
500 return ret;
503 static inline __u8
504 bitmap_to_number(__u8 bitmap)
506 __u8 i;
508 for(i=0; i<8 && !(bitmap &(1<<i)); i++)
510 return i;
513 /* Pull a slot off the free list */
514 STATIC struct NCR_700_command_slot *
515 find_empty_slot(struct NCR_700_Host_Parameters *hostdata)
517 struct NCR_700_command_slot *slot = hostdata->free_list;
519 if(slot == NULL) {
520 /* sanity check */
521 if(hostdata->command_slot_count != NCR_700_COMMAND_SLOTS_PER_HOST)
522 printk(KERN_ERR "SLOTS FULL, but count is %d, should be %d\n", hostdata->command_slot_count, NCR_700_COMMAND_SLOTS_PER_HOST);
523 return NULL;
526 if(slot->state != NCR_700_SLOT_FREE)
527 /* should panic! */
528 printk(KERN_ERR "BUSY SLOT ON FREE LIST!!!\n");
531 hostdata->free_list = slot->ITL_forw;
532 slot->ITL_forw = NULL;
535 /* NOTE: set the state to busy here, not queued, since this
536 * indicates the slot is in use and cannot be run by the IRQ
537 * finish routine. If we cannot queue the command when it
538 * is properly build, we then change to NCR_700_SLOT_QUEUED */
539 slot->state = NCR_700_SLOT_BUSY;
540 slot->flags = 0;
541 hostdata->command_slot_count++;
543 return slot;
546 STATIC void
547 free_slot(struct NCR_700_command_slot *slot,
548 struct NCR_700_Host_Parameters *hostdata)
550 if((slot->state & NCR_700_SLOT_MASK) != NCR_700_SLOT_MAGIC) {
551 printk(KERN_ERR "53c700: SLOT %p is not MAGIC!!!\n", slot);
553 if(slot->state == NCR_700_SLOT_FREE) {
554 printk(KERN_ERR "53c700: SLOT %p is FREE!!!\n", slot);
557 slot->resume_offset = 0;
558 slot->cmnd = NULL;
559 slot->state = NCR_700_SLOT_FREE;
560 slot->ITL_forw = hostdata->free_list;
561 hostdata->free_list = slot;
562 hostdata->command_slot_count--;
566 /* This routine really does very little. The command is indexed on
567 the ITL and (if tagged) the ITLQ lists in _queuecommand */
568 STATIC void
569 save_for_reselection(struct NCR_700_Host_Parameters *hostdata,
570 struct scsi_cmnd *SCp, __u32 dsp)
572 /* Its just possible that this gets executed twice */
573 if(SCp != NULL) {
574 struct NCR_700_command_slot *slot =
575 (struct NCR_700_command_slot *)SCp->host_scribble;
577 slot->resume_offset = dsp;
579 hostdata->state = NCR_700_HOST_FREE;
580 hostdata->cmd = NULL;
583 STATIC inline void
584 NCR_700_unmap(struct NCR_700_Host_Parameters *hostdata, struct scsi_cmnd *SCp,
585 struct NCR_700_command_slot *slot)
587 if(SCp->sc_data_direction != DMA_NONE &&
588 SCp->sc_data_direction != DMA_BIDIRECTIONAL) {
589 if(SCp->use_sg) {
590 dma_unmap_sg(hostdata->dev, SCp->request_buffer,
591 SCp->use_sg, SCp->sc_data_direction);
592 } else {
593 dma_unmap_single(hostdata->dev, slot->dma_handle,
594 SCp->request_bufflen,
595 SCp->sc_data_direction);
600 STATIC inline void
601 NCR_700_scsi_done(struct NCR_700_Host_Parameters *hostdata,
602 struct scsi_cmnd *SCp, int result)
604 hostdata->state = NCR_700_HOST_FREE;
605 hostdata->cmd = NULL;
607 if(SCp != NULL) {
608 struct NCR_700_command_slot *slot =
609 (struct NCR_700_command_slot *)SCp->host_scribble;
611 dma_unmap_single(hostdata->dev, slot->pCmd,
612 sizeof(SCp->cmnd), DMA_TO_DEVICE);
613 if (slot->flags == NCR_700_FLAG_AUTOSENSE) {
614 char *cmnd = NCR_700_get_sense_cmnd(SCp->device);
615 #ifdef NCR_700_DEBUG
616 printk(" ORIGINAL CMD %p RETURNED %d, new return is %d sense is\n",
617 SCp, SCp->cmnd[7], result);
618 scsi_print_sense("53c700", SCp);
620 #endif
621 dma_unmap_single(hostdata->dev, slot->dma_handle,
622 SCSI_SENSE_BUFFERSIZE, DMA_FROM_DEVICE);
623 /* restore the old result if the request sense was
624 * successful */
625 if (result == 0)
626 result = cmnd[7];
627 /* restore the original length */
628 SCp->cmd_len = cmnd[8];
629 } else
630 NCR_700_unmap(hostdata, SCp, slot);
632 free_slot(slot, hostdata);
633 #ifdef NCR_700_DEBUG
634 if(NCR_700_get_depth(SCp->device) == 0 ||
635 NCR_700_get_depth(SCp->device) > SCp->device->queue_depth)
636 printk(KERN_ERR "Invalid depth in NCR_700_scsi_done(): %d\n",
637 NCR_700_get_depth(SCp->device));
638 #endif /* NCR_700_DEBUG */
639 NCR_700_set_depth(SCp->device, NCR_700_get_depth(SCp->device) - 1);
641 SCp->host_scribble = NULL;
642 SCp->result = result;
643 SCp->scsi_done(SCp);
644 } else {
645 printk(KERN_ERR "53c700: SCSI DONE HAS NULL SCp\n");
650 STATIC void
651 NCR_700_internal_bus_reset(struct Scsi_Host *host)
653 /* Bus reset */
654 NCR_700_writeb(ASSERT_RST, host, SCNTL1_REG);
655 udelay(50);
656 NCR_700_writeb(0, host, SCNTL1_REG);
660 STATIC void
661 NCR_700_chip_setup(struct Scsi_Host *host)
663 struct NCR_700_Host_Parameters *hostdata =
664 (struct NCR_700_Host_Parameters *)host->hostdata[0];
665 __u32 dcntl_extra = 0;
666 __u8 min_period;
667 __u8 min_xferp = (hostdata->chip710 ? NCR_710_MIN_XFERP : NCR_700_MIN_XFERP);
669 if(hostdata->chip710) {
670 __u8 burst_disable = 0;
671 __u8 burst_length = 0;
673 switch (hostdata->burst_length) {
674 case 1:
675 burst_length = BURST_LENGTH_1;
676 break;
677 case 2:
678 burst_length = BURST_LENGTH_2;
679 break;
680 case 4:
681 burst_length = BURST_LENGTH_4;
682 break;
683 case 8:
684 burst_length = BURST_LENGTH_8;
685 break;
686 default:
687 burst_disable = BURST_DISABLE;
688 break;
690 dcntl_extra = COMPAT_700_MODE;
692 NCR_700_writeb(dcntl_extra, host, DCNTL_REG);
693 NCR_700_writeb(burst_length | hostdata->dmode_extra,
694 host, DMODE_710_REG);
695 NCR_700_writeb(burst_disable | (hostdata->differential ?
696 DIFF : 0), host, CTEST7_REG);
697 NCR_700_writeb(BTB_TIMER_DISABLE, host, CTEST0_REG);
698 NCR_700_writeb(FULL_ARBITRATION | ENABLE_PARITY | PARITY
699 | AUTO_ATN, host, SCNTL0_REG);
700 } else {
701 NCR_700_writeb(BURST_LENGTH_8 | hostdata->dmode_extra,
702 host, DMODE_700_REG);
703 NCR_700_writeb(hostdata->differential ?
704 DIFF : 0, host, CTEST7_REG);
705 if(hostdata->fast) {
706 /* this is for 700-66, does nothing on 700 */
707 NCR_700_writeb(LAST_DIS_ENBL | ENABLE_ACTIVE_NEGATION
708 | GENERATE_RECEIVE_PARITY, host,
709 CTEST8_REG);
710 } else {
711 NCR_700_writeb(FULL_ARBITRATION | ENABLE_PARITY
712 | PARITY | AUTO_ATN, host, SCNTL0_REG);
716 NCR_700_writeb(1 << host->this_id, host, SCID_REG);
717 NCR_700_writeb(0, host, SBCL_REG);
718 NCR_700_writeb(ASYNC_OPERATION, host, SXFER_REG);
720 NCR_700_writeb(PHASE_MM_INT | SEL_TIMEOUT_INT | GROSS_ERR_INT | UX_DISC_INT
721 | RST_INT | PAR_ERR_INT | SELECT_INT, host, SIEN_REG);
723 NCR_700_writeb(ABORT_INT | INT_INST_INT | ILGL_INST_INT, host, DIEN_REG);
724 NCR_700_writeb(ENABLE_SELECT, host, SCNTL1_REG);
725 if(hostdata->clock > 75) {
726 printk(KERN_ERR "53c700: Clock speed %dMHz is too high: 75Mhz is the maximum this chip can be driven at\n", hostdata->clock);
727 /* do the best we can, but the async clock will be out
728 * of spec: sync divider 2, async divider 3 */
729 DEBUG(("53c700: sync 2 async 3\n"));
730 NCR_700_writeb(SYNC_DIV_2_0, host, SBCL_REG);
731 NCR_700_writeb(ASYNC_DIV_3_0 | dcntl_extra, host, DCNTL_REG);
732 hostdata->sync_clock = hostdata->clock/2;
733 } else if(hostdata->clock > 50 && hostdata->clock <= 75) {
734 /* sync divider 1.5, async divider 3 */
735 DEBUG(("53c700: sync 1.5 async 3\n"));
736 NCR_700_writeb(SYNC_DIV_1_5, host, SBCL_REG);
737 NCR_700_writeb(ASYNC_DIV_3_0 | dcntl_extra, host, DCNTL_REG);
738 hostdata->sync_clock = hostdata->clock*2;
739 hostdata->sync_clock /= 3;
741 } else if(hostdata->clock > 37 && hostdata->clock <= 50) {
742 /* sync divider 1, async divider 2 */
743 DEBUG(("53c700: sync 1 async 2\n"));
744 NCR_700_writeb(SYNC_DIV_1_0, host, SBCL_REG);
745 NCR_700_writeb(ASYNC_DIV_2_0 | dcntl_extra, host, DCNTL_REG);
746 hostdata->sync_clock = hostdata->clock;
747 } else if(hostdata->clock > 25 && hostdata->clock <=37) {
748 /* sync divider 1, async divider 1.5 */
749 DEBUG(("53c700: sync 1 async 1.5\n"));
750 NCR_700_writeb(SYNC_DIV_1_0, host, SBCL_REG);
751 NCR_700_writeb(ASYNC_DIV_1_5 | dcntl_extra, host, DCNTL_REG);
752 hostdata->sync_clock = hostdata->clock;
753 } else {
754 DEBUG(("53c700: sync 1 async 1\n"));
755 NCR_700_writeb(SYNC_DIV_1_0, host, SBCL_REG);
756 NCR_700_writeb(ASYNC_DIV_1_0 | dcntl_extra, host, DCNTL_REG);
757 /* sync divider 1, async divider 1 */
758 hostdata->sync_clock = hostdata->clock;
760 /* Calculate the actual minimum period that can be supported
761 * by our synchronous clock speed. See the 710 manual for
762 * exact details of this calculation which is based on a
763 * setting of the SXFER register */
764 min_period = 1000*(4+min_xferp)/(4*hostdata->sync_clock);
765 hostdata->min_period = NCR_700_MIN_PERIOD;
766 if(min_period > NCR_700_MIN_PERIOD)
767 hostdata->min_period = min_period;
770 STATIC void
771 NCR_700_chip_reset(struct Scsi_Host *host)
773 struct NCR_700_Host_Parameters *hostdata =
774 (struct NCR_700_Host_Parameters *)host->hostdata[0];
775 if(hostdata->chip710) {
776 NCR_700_writeb(SOFTWARE_RESET_710, host, ISTAT_REG);
777 udelay(100);
779 NCR_700_writeb(0, host, ISTAT_REG);
780 } else {
781 NCR_700_writeb(SOFTWARE_RESET, host, DCNTL_REG);
782 udelay(100);
784 NCR_700_writeb(0, host, DCNTL_REG);
787 mdelay(1000);
789 NCR_700_chip_setup(host);
792 /* The heart of the message processing engine is that the instruction
793 * immediately after the INT is the normal case (and so must be CLEAR
794 * ACK). If we want to do something else, we call that routine in
795 * scripts and set temp to be the normal case + 8 (skipping the CLEAR
796 * ACK) so that the routine returns correctly to resume its activity
797 * */
798 STATIC __u32
799 process_extended_message(struct Scsi_Host *host,
800 struct NCR_700_Host_Parameters *hostdata,
801 struct scsi_cmnd *SCp, __u32 dsp, __u32 dsps)
803 __u32 resume_offset = dsp, temp = dsp + 8;
804 __u8 pun = 0xff, lun = 0xff;
806 if(SCp != NULL) {
807 pun = SCp->device->id;
808 lun = SCp->device->lun;
811 switch(hostdata->msgin[2]) {
812 case A_SDTR_MSG:
813 if(SCp != NULL && NCR_700_is_flag_set(SCp->device, NCR_700_DEV_BEGIN_SYNC_NEGOTIATION)) {
814 struct scsi_target *starget = SCp->device->sdev_target;
815 __u8 period = hostdata->msgin[3];
816 __u8 offset = hostdata->msgin[4];
818 if(offset == 0 || period == 0) {
819 offset = 0;
820 period = 0;
823 spi_offset(starget) = offset;
824 spi_period(starget) = period;
826 if(NCR_700_is_flag_set(SCp->device, NCR_700_DEV_PRINT_SYNC_NEGOTIATION)) {
827 spi_display_xfer_agreement(starget);
828 NCR_700_clear_flag(SCp->device, NCR_700_DEV_PRINT_SYNC_NEGOTIATION);
831 NCR_700_set_flag(SCp->device, NCR_700_DEV_NEGOTIATED_SYNC);
832 NCR_700_clear_flag(SCp->device, NCR_700_DEV_BEGIN_SYNC_NEGOTIATION);
834 NCR_700_writeb(NCR_700_get_SXFER(SCp->device),
835 host, SXFER_REG);
837 } else {
838 /* SDTR message out of the blue, reject it */
839 shost_printk(KERN_WARNING, host,
840 "Unexpected SDTR msg\n");
841 hostdata->msgout[0] = A_REJECT_MSG;
842 dma_cache_sync(hostdata->dev, hostdata->msgout, 1, DMA_TO_DEVICE);
843 script_patch_16(hostdata->dev, hostdata->script,
844 MessageCount, 1);
845 /* SendMsgOut returns, so set up the return
846 * address */
847 resume_offset = hostdata->pScript + Ent_SendMessageWithATN;
849 break;
851 case A_WDTR_MSG:
852 printk(KERN_INFO "scsi%d: (%d:%d), Unsolicited WDTR after CMD, Rejecting\n",
853 host->host_no, pun, lun);
854 hostdata->msgout[0] = A_REJECT_MSG;
855 dma_cache_sync(hostdata->dev, hostdata->msgout, 1, DMA_TO_DEVICE);
856 script_patch_16(hostdata->dev, hostdata->script, MessageCount,
858 resume_offset = hostdata->pScript + Ent_SendMessageWithATN;
860 break;
862 default:
863 printk(KERN_INFO "scsi%d (%d:%d): Unexpected message %s: ",
864 host->host_no, pun, lun,
865 NCR_700_phase[(dsps & 0xf00) >> 8]);
866 spi_print_msg(hostdata->msgin);
867 printk("\n");
868 /* just reject it */
869 hostdata->msgout[0] = A_REJECT_MSG;
870 dma_cache_sync(hostdata->dev, hostdata->msgout, 1, DMA_TO_DEVICE);
871 script_patch_16(hostdata->dev, hostdata->script, MessageCount,
873 /* SendMsgOut returns, so set up the return
874 * address */
875 resume_offset = hostdata->pScript + Ent_SendMessageWithATN;
877 NCR_700_writel(temp, host, TEMP_REG);
878 return resume_offset;
881 STATIC __u32
882 process_message(struct Scsi_Host *host, struct NCR_700_Host_Parameters *hostdata,
883 struct scsi_cmnd *SCp, __u32 dsp, __u32 dsps)
885 /* work out where to return to */
886 __u32 temp = dsp + 8, resume_offset = dsp;
887 __u8 pun = 0xff, lun = 0xff;
889 if(SCp != NULL) {
890 pun = SCp->device->id;
891 lun = SCp->device->lun;
894 #ifdef NCR_700_DEBUG
895 printk("scsi%d (%d:%d): message %s: ", host->host_no, pun, lun,
896 NCR_700_phase[(dsps & 0xf00) >> 8]);
897 spi_print_msg(hostdata->msgin);
898 printk("\n");
899 #endif
901 switch(hostdata->msgin[0]) {
903 case A_EXTENDED_MSG:
904 resume_offset = process_extended_message(host, hostdata, SCp,
905 dsp, dsps);
906 break;
908 case A_REJECT_MSG:
909 if(SCp != NULL && NCR_700_is_flag_set(SCp->device, NCR_700_DEV_BEGIN_SYNC_NEGOTIATION)) {
910 /* Rejected our sync negotiation attempt */
911 spi_period(SCp->device->sdev_target) =
912 spi_offset(SCp->device->sdev_target) = 0;
913 NCR_700_set_flag(SCp->device, NCR_700_DEV_NEGOTIATED_SYNC);
914 NCR_700_clear_flag(SCp->device, NCR_700_DEV_BEGIN_SYNC_NEGOTIATION);
915 } else if(SCp != NULL && NCR_700_get_tag_neg_state(SCp->device) == NCR_700_DURING_TAG_NEGOTIATION) {
916 /* rejected our first simple tag message */
917 scmd_printk(KERN_WARNING, SCp,
918 "Rejected first tag queue attempt, turning off tag queueing\n");
919 /* we're done negotiating */
920 NCR_700_set_tag_neg_state(SCp->device, NCR_700_FINISHED_TAG_NEGOTIATION);
921 hostdata->tag_negotiated &= ~(1<<scmd_id(SCp));
922 SCp->device->tagged_supported = 0;
923 scsi_deactivate_tcq(SCp->device, host->cmd_per_lun);
924 } else {
925 shost_printk(KERN_WARNING, host,
926 "(%d:%d) Unexpected REJECT Message %s\n",
927 pun, lun,
928 NCR_700_phase[(dsps & 0xf00) >> 8]);
929 /* however, just ignore it */
931 break;
933 case A_PARITY_ERROR_MSG:
934 printk(KERN_ERR "scsi%d (%d:%d) Parity Error!\n", host->host_no,
935 pun, lun);
936 NCR_700_internal_bus_reset(host);
937 break;
938 case A_SIMPLE_TAG_MSG:
939 printk(KERN_INFO "scsi%d (%d:%d) SIMPLE TAG %d %s\n", host->host_no,
940 pun, lun, hostdata->msgin[1],
941 NCR_700_phase[(dsps & 0xf00) >> 8]);
942 /* just ignore it */
943 break;
944 default:
945 printk(KERN_INFO "scsi%d (%d:%d): Unexpected message %s: ",
946 host->host_no, pun, lun,
947 NCR_700_phase[(dsps & 0xf00) >> 8]);
949 spi_print_msg(hostdata->msgin);
950 printk("\n");
951 /* just reject it */
952 hostdata->msgout[0] = A_REJECT_MSG;
953 dma_cache_sync(hostdata->dev, hostdata->msgout, 1, DMA_TO_DEVICE);
954 script_patch_16(hostdata->dev, hostdata->script, MessageCount,
956 /* SendMsgOut returns, so set up the return
957 * address */
958 resume_offset = hostdata->pScript + Ent_SendMessageWithATN;
960 break;
962 NCR_700_writel(temp, host, TEMP_REG);
963 /* set us up to receive another message */
964 dma_cache_sync(hostdata->dev, hostdata->msgin, MSG_ARRAY_SIZE, DMA_FROM_DEVICE);
965 return resume_offset;
968 STATIC __u32
969 process_script_interrupt(__u32 dsps, __u32 dsp, struct scsi_cmnd *SCp,
970 struct Scsi_Host *host,
971 struct NCR_700_Host_Parameters *hostdata)
973 __u32 resume_offset = 0;
974 __u8 pun = 0xff, lun=0xff;
976 if(SCp != NULL) {
977 pun = SCp->device->id;
978 lun = SCp->device->lun;
981 if(dsps == A_GOOD_STATUS_AFTER_STATUS) {
982 DEBUG((" COMMAND COMPLETE, status=%02x\n",
983 hostdata->status[0]));
984 /* OK, if TCQ still under negotiation, we now know it works */
985 if (NCR_700_get_tag_neg_state(SCp->device) == NCR_700_DURING_TAG_NEGOTIATION)
986 NCR_700_set_tag_neg_state(SCp->device,
987 NCR_700_FINISHED_TAG_NEGOTIATION);
989 /* check for contingent allegiance contitions */
990 if(status_byte(hostdata->status[0]) == CHECK_CONDITION ||
991 status_byte(hostdata->status[0]) == COMMAND_TERMINATED) {
992 struct NCR_700_command_slot *slot =
993 (struct NCR_700_command_slot *)SCp->host_scribble;
994 if(slot->flags == NCR_700_FLAG_AUTOSENSE) {
995 /* OOPS: bad device, returning another
996 * contingent allegiance condition */
997 scmd_printk(KERN_ERR, SCp,
998 "broken device is looping in contingent allegiance: ignoring\n");
999 NCR_700_scsi_done(hostdata, SCp, hostdata->status[0]);
1000 } else {
1001 char *cmnd =
1002 NCR_700_get_sense_cmnd(SCp->device);
1003 #ifdef NCR_DEBUG
1004 scsi_print_command(SCp);
1005 printk(" cmd %p has status %d, requesting sense\n",
1006 SCp, hostdata->status[0]);
1007 #endif
1008 /* we can destroy the command here
1009 * because the contingent allegiance
1010 * condition will cause a retry which
1011 * will re-copy the command from the
1012 * saved data_cmnd. We also unmap any
1013 * data associated with the command
1014 * here */
1015 NCR_700_unmap(hostdata, SCp, slot);
1016 dma_unmap_single(hostdata->dev, slot->pCmd,
1017 sizeof(SCp->cmnd),
1018 DMA_TO_DEVICE);
1020 cmnd[0] = REQUEST_SENSE;
1021 cmnd[1] = (SCp->device->lun & 0x7) << 5;
1022 cmnd[2] = 0;
1023 cmnd[3] = 0;
1024 cmnd[4] = SCSI_SENSE_BUFFERSIZE;
1025 cmnd[5] = 0;
1026 /* Here's a quiet hack: the
1027 * REQUEST_SENSE command is six bytes,
1028 * so store a flag indicating that
1029 * this was an internal sense request
1030 * and the original status at the end
1031 * of the command */
1032 cmnd[6] = NCR_700_INTERNAL_SENSE_MAGIC;
1033 cmnd[7] = hostdata->status[0];
1034 cmnd[8] = SCp->cmd_len;
1035 SCp->cmd_len = 6; /* command length for
1036 * REQUEST_SENSE */
1037 slot->pCmd = dma_map_single(hostdata->dev, cmnd, MAX_COMMAND_SIZE, DMA_TO_DEVICE);
1038 slot->dma_handle = dma_map_single(hostdata->dev, SCp->sense_buffer, SCSI_SENSE_BUFFERSIZE, DMA_FROM_DEVICE);
1039 slot->SG[0].ins = bS_to_host(SCRIPT_MOVE_DATA_IN | SCSI_SENSE_BUFFERSIZE);
1040 slot->SG[0].pAddr = bS_to_host(slot->dma_handle);
1041 slot->SG[1].ins = bS_to_host(SCRIPT_RETURN);
1042 slot->SG[1].pAddr = 0;
1043 slot->resume_offset = hostdata->pScript;
1044 dma_cache_sync(hostdata->dev, slot->SG, sizeof(slot->SG[0])*2, DMA_TO_DEVICE);
1045 dma_cache_sync(hostdata->dev, SCp->sense_buffer, SCSI_SENSE_BUFFERSIZE, DMA_FROM_DEVICE);
1047 /* queue the command for reissue */
1048 slot->state = NCR_700_SLOT_QUEUED;
1049 slot->flags = NCR_700_FLAG_AUTOSENSE;
1050 hostdata->state = NCR_700_HOST_FREE;
1051 hostdata->cmd = NULL;
1053 } else {
1054 // Currently rely on the mid layer evaluation
1055 // of the tag queuing capability
1057 //if(status_byte(hostdata->status[0]) == GOOD &&
1058 // SCp->cmnd[0] == INQUIRY && SCp->use_sg == 0) {
1059 // /* Piggy back the tag queueing support
1060 // * on this command */
1061 // dma_sync_single_for_cpu(hostdata->dev,
1062 // slot->dma_handle,
1063 // SCp->request_bufflen,
1064 // DMA_FROM_DEVICE);
1065 // if(((char *)SCp->request_buffer)[7] & 0x02) {
1066 // scmd_printk(KERN_INFO, SCp,
1067 // "Enabling Tag Command Queuing\n");
1068 // hostdata->tag_negotiated |= (1<<scmd_id(SCp));
1069 // NCR_700_set_flag(SCp->device, NCR_700_DEV_BEGIN_TAG_QUEUEING);
1070 // } else {
1071 // NCR_700_clear_flag(SCp->device, NCR_700_DEV_BEGIN_TAG_QUEUEING);
1072 // hostdata->tag_negotiated &= ~(1<<scmd_id(SCp));
1073 // }
1075 NCR_700_scsi_done(hostdata, SCp, hostdata->status[0]);
1077 } else if((dsps & 0xfffff0f0) == A_UNEXPECTED_PHASE) {
1078 __u8 i = (dsps & 0xf00) >> 8;
1080 scmd_printk(KERN_ERR, SCp, "UNEXPECTED PHASE %s (%s)\n",
1081 NCR_700_phase[i],
1082 sbcl_to_string(NCR_700_readb(host, SBCL_REG)));
1083 scmd_printk(KERN_ERR, SCp, " len = %d, cmd =",
1084 SCp->cmd_len);
1085 scsi_print_command(SCp);
1087 NCR_700_internal_bus_reset(host);
1088 } else if((dsps & 0xfffff000) == A_FATAL) {
1089 int i = (dsps & 0xfff);
1091 printk(KERN_ERR "scsi%d: (%d:%d) FATAL ERROR: %s\n",
1092 host->host_no, pun, lun, NCR_700_fatal_messages[i]);
1093 if(dsps == A_FATAL_ILLEGAL_MSG_LENGTH) {
1094 printk(KERN_ERR " msg begins %02x %02x\n",
1095 hostdata->msgin[0], hostdata->msgin[1]);
1097 NCR_700_internal_bus_reset(host);
1098 } else if((dsps & 0xfffff0f0) == A_DISCONNECT) {
1099 #ifdef NCR_700_DEBUG
1100 __u8 i = (dsps & 0xf00) >> 8;
1102 printk("scsi%d: (%d:%d), DISCONNECTED (%d) %s\n",
1103 host->host_no, pun, lun,
1104 i, NCR_700_phase[i]);
1105 #endif
1106 save_for_reselection(hostdata, SCp, dsp);
1108 } else if(dsps == A_RESELECTION_IDENTIFIED) {
1109 __u8 lun;
1110 struct NCR_700_command_slot *slot;
1111 __u8 reselection_id = hostdata->reselection_id;
1112 struct scsi_device *SDp;
1114 lun = hostdata->msgin[0] & 0x1f;
1116 hostdata->reselection_id = 0xff;
1117 DEBUG(("scsi%d: (%d:%d) RESELECTED!\n",
1118 host->host_no, reselection_id, lun));
1119 /* clear the reselection indicator */
1120 SDp = __scsi_device_lookup(host, 0, reselection_id, lun);
1121 if(unlikely(SDp == NULL)) {
1122 printk(KERN_ERR "scsi%d: (%d:%d) HAS NO device\n",
1123 host->host_no, reselection_id, lun);
1124 BUG();
1126 if(hostdata->msgin[1] == A_SIMPLE_TAG_MSG) {
1127 struct scsi_cmnd *SCp = scsi_find_tag(SDp, hostdata->msgin[2]);
1128 if(unlikely(SCp == NULL)) {
1129 printk(KERN_ERR "scsi%d: (%d:%d) no saved request for tag %d\n",
1130 host->host_no, reselection_id, lun, hostdata->msgin[2]);
1131 BUG();
1134 slot = (struct NCR_700_command_slot *)SCp->host_scribble;
1135 DDEBUG(KERN_DEBUG, SDp,
1136 "reselection is tag %d, slot %p(%d)\n",
1137 hostdata->msgin[2], slot, slot->tag);
1138 } else {
1139 struct scsi_cmnd *SCp = scsi_find_tag(SDp, SCSI_NO_TAG);
1140 if(unlikely(SCp == NULL)) {
1141 sdev_printk(KERN_ERR, SDp,
1142 "no saved request for untagged cmd\n");
1143 BUG();
1145 slot = (struct NCR_700_command_slot *)SCp->host_scribble;
1148 if(slot == NULL) {
1149 printk(KERN_ERR "scsi%d: (%d:%d) RESELECTED but no saved command (MSG = %02x %02x %02x)!!\n",
1150 host->host_no, reselection_id, lun,
1151 hostdata->msgin[0], hostdata->msgin[1],
1152 hostdata->msgin[2]);
1153 } else {
1154 if(hostdata->state != NCR_700_HOST_BUSY)
1155 printk(KERN_ERR "scsi%d: FATAL, host not busy during valid reselection!\n",
1156 host->host_no);
1157 resume_offset = slot->resume_offset;
1158 hostdata->cmd = slot->cmnd;
1160 /* re-patch for this command */
1161 script_patch_32_abs(hostdata->dev, hostdata->script,
1162 CommandAddress, slot->pCmd);
1163 script_patch_16(hostdata->dev, hostdata->script,
1164 CommandCount, slot->cmnd->cmd_len);
1165 script_patch_32_abs(hostdata->dev, hostdata->script,
1166 SGScriptStartAddress,
1167 to32bit(&slot->pSG[0].ins));
1169 /* Note: setting SXFER only works if we're
1170 * still in the MESSAGE phase, so it is vital
1171 * that ACK is still asserted when we process
1172 * the reselection message. The resume offset
1173 * should therefore always clear ACK */
1174 NCR_700_writeb(NCR_700_get_SXFER(hostdata->cmd->device),
1175 host, SXFER_REG);
1176 dma_cache_sync(hostdata->dev, hostdata->msgin,
1177 MSG_ARRAY_SIZE, DMA_FROM_DEVICE);
1178 dma_cache_sync(hostdata->dev, hostdata->msgout,
1179 MSG_ARRAY_SIZE, DMA_TO_DEVICE);
1180 /* I'm just being paranoid here, the command should
1181 * already have been flushed from the cache */
1182 dma_cache_sync(hostdata->dev, slot->cmnd->cmnd,
1183 slot->cmnd->cmd_len, DMA_TO_DEVICE);
1188 } else if(dsps == A_RESELECTED_DURING_SELECTION) {
1190 /* This section is full of debugging code because I've
1191 * never managed to reach it. I think what happens is
1192 * that, because the 700 runs with selection
1193 * interrupts enabled the whole time that we take a
1194 * selection interrupt before we manage to get to the
1195 * reselected script interrupt */
1197 __u8 reselection_id = NCR_700_readb(host, SFBR_REG);
1198 struct NCR_700_command_slot *slot;
1200 /* Take out our own ID */
1201 reselection_id &= ~(1<<host->this_id);
1203 /* I've never seen this happen, so keep this as a printk rather
1204 * than a debug */
1205 printk(KERN_INFO "scsi%d: (%d:%d) RESELECTION DURING SELECTION, dsp=%08x[%04x] state=%d, count=%d\n",
1206 host->host_no, reselection_id, lun, dsp, dsp - hostdata->pScript, hostdata->state, hostdata->command_slot_count);
1209 /* FIXME: DEBUGGING CODE */
1210 __u32 SG = (__u32)bS_to_cpu(hostdata->script[A_SGScriptStartAddress_used[0]]);
1211 int i;
1213 for(i=0; i< NCR_700_COMMAND_SLOTS_PER_HOST; i++) {
1214 if(SG >= to32bit(&hostdata->slots[i].pSG[0])
1215 && SG <= to32bit(&hostdata->slots[i].pSG[NCR_700_SG_SEGMENTS]))
1216 break;
1218 printk(KERN_INFO "IDENTIFIED SG segment as being %08x in slot %p, cmd %p, slot->resume_offset=%08x\n", SG, &hostdata->slots[i], hostdata->slots[i].cmnd, hostdata->slots[i].resume_offset);
1219 SCp = hostdata->slots[i].cmnd;
1222 if(SCp != NULL) {
1223 slot = (struct NCR_700_command_slot *)SCp->host_scribble;
1224 /* change slot from busy to queued to redo command */
1225 slot->state = NCR_700_SLOT_QUEUED;
1227 hostdata->cmd = NULL;
1229 if(reselection_id == 0) {
1230 if(hostdata->reselection_id == 0xff) {
1231 printk(KERN_ERR "scsi%d: Invalid reselection during selection!!\n", host->host_no);
1232 return 0;
1233 } else {
1234 printk(KERN_ERR "scsi%d: script reselected and we took a selection interrupt\n",
1235 host->host_no);
1236 reselection_id = hostdata->reselection_id;
1238 } else {
1240 /* convert to real ID */
1241 reselection_id = bitmap_to_number(reselection_id);
1243 hostdata->reselection_id = reselection_id;
1244 /* just in case we have a stale simple tag message, clear it */
1245 hostdata->msgin[1] = 0;
1246 dma_cache_sync(hostdata->dev, hostdata->msgin,
1247 MSG_ARRAY_SIZE, DMA_BIDIRECTIONAL);
1248 if(hostdata->tag_negotiated & (1<<reselection_id)) {
1249 resume_offset = hostdata->pScript + Ent_GetReselectionWithTag;
1250 } else {
1251 resume_offset = hostdata->pScript + Ent_GetReselectionData;
1253 } else if(dsps == A_COMPLETED_SELECTION_AS_TARGET) {
1254 /* we've just disconnected from the bus, do nothing since
1255 * a return here will re-run the queued command slot
1256 * that may have been interrupted by the initial selection */
1257 DEBUG((" SELECTION COMPLETED\n"));
1258 } else if((dsps & 0xfffff0f0) == A_MSG_IN) {
1259 resume_offset = process_message(host, hostdata, SCp,
1260 dsp, dsps);
1261 } else if((dsps & 0xfffff000) == 0) {
1262 __u8 i = (dsps & 0xf0) >> 4, j = (dsps & 0xf00) >> 8;
1263 printk(KERN_ERR "scsi%d: (%d:%d), unhandled script condition %s %s at %04x\n",
1264 host->host_no, pun, lun, NCR_700_condition[i],
1265 NCR_700_phase[j], dsp - hostdata->pScript);
1266 if(SCp != NULL) {
1267 scsi_print_command(SCp);
1269 if(SCp->use_sg) {
1270 for(i = 0; i < SCp->use_sg + 1; i++) {
1271 printk(KERN_INFO " SG[%d].length = %d, move_insn=%08x, addr %08x\n", i, ((struct scatterlist *)SCp->request_buffer)[i].length, ((struct NCR_700_command_slot *)SCp->host_scribble)->SG[i].ins, ((struct NCR_700_command_slot *)SCp->host_scribble)->SG[i].pAddr);
1275 NCR_700_internal_bus_reset(host);
1276 } else if((dsps & 0xfffff000) == A_DEBUG_INTERRUPT) {
1277 printk(KERN_NOTICE "scsi%d (%d:%d) DEBUG INTERRUPT %d AT %08x[%04x], continuing\n",
1278 host->host_no, pun, lun, dsps & 0xfff, dsp, dsp - hostdata->pScript);
1279 resume_offset = dsp;
1280 } else {
1281 printk(KERN_ERR "scsi%d: (%d:%d), unidentified script interrupt 0x%x at %04x\n",
1282 host->host_no, pun, lun, dsps, dsp - hostdata->pScript);
1283 NCR_700_internal_bus_reset(host);
1285 return resume_offset;
1288 /* We run the 53c700 with selection interrupts always enabled. This
1289 * means that the chip may be selected as soon as the bus frees. On a
1290 * busy bus, this can be before the scripts engine finishes its
1291 * processing. Therefore, part of the selection processing has to be
1292 * to find out what the scripts engine is doing and complete the
1293 * function if necessary (i.e. process the pending disconnect or save
1294 * the interrupted initial selection */
1295 STATIC inline __u32
1296 process_selection(struct Scsi_Host *host, __u32 dsp)
1298 __u8 id = 0; /* Squash compiler warning */
1299 int count = 0;
1300 __u32 resume_offset = 0;
1301 struct NCR_700_Host_Parameters *hostdata =
1302 (struct NCR_700_Host_Parameters *)host->hostdata[0];
1303 struct scsi_cmnd *SCp = hostdata->cmd;
1304 __u8 sbcl;
1306 for(count = 0; count < 5; count++) {
1307 id = NCR_700_readb(host, hostdata->chip710 ?
1308 CTEST9_REG : SFBR_REG);
1310 /* Take out our own ID */
1311 id &= ~(1<<host->this_id);
1312 if(id != 0)
1313 break;
1314 udelay(5);
1316 sbcl = NCR_700_readb(host, SBCL_REG);
1317 if((sbcl & SBCL_IO) == 0) {
1318 /* mark as having been selected rather than reselected */
1319 id = 0xff;
1320 } else {
1321 /* convert to real ID */
1322 hostdata->reselection_id = id = bitmap_to_number(id);
1323 DEBUG(("scsi%d: Reselected by %d\n",
1324 host->host_no, id));
1326 if(hostdata->state == NCR_700_HOST_BUSY && SCp != NULL) {
1327 struct NCR_700_command_slot *slot =
1328 (struct NCR_700_command_slot *)SCp->host_scribble;
1329 DEBUG((" ID %d WARNING: RESELECTION OF BUSY HOST, saving cmd %p, slot %p, addr %x [%04x], resume %x!\n", id, hostdata->cmd, slot, dsp, dsp - hostdata->pScript, resume_offset));
1331 switch(dsp - hostdata->pScript) {
1332 case Ent_Disconnect1:
1333 case Ent_Disconnect2:
1334 save_for_reselection(hostdata, SCp, Ent_Disconnect2 + hostdata->pScript);
1335 break;
1336 case Ent_Disconnect3:
1337 case Ent_Disconnect4:
1338 save_for_reselection(hostdata, SCp, Ent_Disconnect4 + hostdata->pScript);
1339 break;
1340 case Ent_Disconnect5:
1341 case Ent_Disconnect6:
1342 save_for_reselection(hostdata, SCp, Ent_Disconnect6 + hostdata->pScript);
1343 break;
1344 case Ent_Disconnect7:
1345 case Ent_Disconnect8:
1346 save_for_reselection(hostdata, SCp, Ent_Disconnect8 + hostdata->pScript);
1347 break;
1348 case Ent_Finish1:
1349 case Ent_Finish2:
1350 process_script_interrupt(A_GOOD_STATUS_AFTER_STATUS, dsp, SCp, host, hostdata);
1351 break;
1353 default:
1354 slot->state = NCR_700_SLOT_QUEUED;
1355 break;
1358 hostdata->state = NCR_700_HOST_BUSY;
1359 hostdata->cmd = NULL;
1360 /* clear any stale simple tag message */
1361 hostdata->msgin[1] = 0;
1362 dma_cache_sync(hostdata->dev, hostdata->msgin, MSG_ARRAY_SIZE,
1363 DMA_BIDIRECTIONAL);
1365 if(id == 0xff) {
1366 /* Selected as target, Ignore */
1367 resume_offset = hostdata->pScript + Ent_SelectedAsTarget;
1368 } else if(hostdata->tag_negotiated & (1<<id)) {
1369 resume_offset = hostdata->pScript + Ent_GetReselectionWithTag;
1370 } else {
1371 resume_offset = hostdata->pScript + Ent_GetReselectionData;
1373 return resume_offset;
1376 static inline void
1377 NCR_700_clear_fifo(struct Scsi_Host *host) {
1378 const struct NCR_700_Host_Parameters *hostdata
1379 = (struct NCR_700_Host_Parameters *)host->hostdata[0];
1380 if(hostdata->chip710) {
1381 NCR_700_writeb(CLR_FIFO_710, host, CTEST8_REG);
1382 } else {
1383 NCR_700_writeb(CLR_FIFO, host, DFIFO_REG);
1387 static inline void
1388 NCR_700_flush_fifo(struct Scsi_Host *host) {
1389 const struct NCR_700_Host_Parameters *hostdata
1390 = (struct NCR_700_Host_Parameters *)host->hostdata[0];
1391 if(hostdata->chip710) {
1392 NCR_700_writeb(FLUSH_DMA_FIFO_710, host, CTEST8_REG);
1393 udelay(10);
1394 NCR_700_writeb(0, host, CTEST8_REG);
1395 } else {
1396 NCR_700_writeb(FLUSH_DMA_FIFO, host, DFIFO_REG);
1397 udelay(10);
1398 NCR_700_writeb(0, host, DFIFO_REG);
1403 /* The queue lock with interrupts disabled must be held on entry to
1404 * this function */
1405 STATIC int
1406 NCR_700_start_command(struct scsi_cmnd *SCp)
1408 struct NCR_700_command_slot *slot =
1409 (struct NCR_700_command_slot *)SCp->host_scribble;
1410 struct NCR_700_Host_Parameters *hostdata =
1411 (struct NCR_700_Host_Parameters *)SCp->device->host->hostdata[0];
1412 __u16 count = 1; /* for IDENTIFY message */
1414 if(hostdata->state != NCR_700_HOST_FREE) {
1415 /* keep this inside the lock to close the race window where
1416 * the running command finishes on another CPU while we don't
1417 * change the state to queued on this one */
1418 slot->state = NCR_700_SLOT_QUEUED;
1420 DEBUG(("scsi%d: host busy, queueing command %p, slot %p\n",
1421 SCp->device->host->host_no, slot->cmnd, slot));
1422 return 0;
1424 hostdata->state = NCR_700_HOST_BUSY;
1425 hostdata->cmd = SCp;
1426 slot->state = NCR_700_SLOT_BUSY;
1427 /* keep interrupts disabled until we have the command correctly
1428 * set up so we cannot take a selection interrupt */
1430 hostdata->msgout[0] = NCR_700_identify((SCp->cmnd[0] != REQUEST_SENSE &&
1431 slot->flags != NCR_700_FLAG_AUTOSENSE),
1432 SCp->device->lun);
1433 /* for INQUIRY or REQUEST_SENSE commands, we cannot be sure
1434 * if the negotiated transfer parameters still hold, so
1435 * always renegotiate them */
1436 if(SCp->cmnd[0] == INQUIRY || SCp->cmnd[0] == REQUEST_SENSE ||
1437 slot->flags == NCR_700_FLAG_AUTOSENSE) {
1438 NCR_700_clear_flag(SCp->device, NCR_700_DEV_NEGOTIATED_SYNC);
1441 /* REQUEST_SENSE is asking for contingent I_T_L(_Q) status.
1442 * If a contingent allegiance condition exists, the device
1443 * will refuse all tags, so send the request sense as untagged
1444 * */
1445 if((hostdata->tag_negotiated & (1<<scmd_id(SCp)))
1446 && (slot->tag != SCSI_NO_TAG && SCp->cmnd[0] != REQUEST_SENSE &&
1447 slot->flags != NCR_700_FLAG_AUTOSENSE)) {
1448 count += scsi_populate_tag_msg(SCp, &hostdata->msgout[count]);
1451 if(hostdata->fast &&
1452 NCR_700_is_flag_clear(SCp->device, NCR_700_DEV_NEGOTIATED_SYNC)) {
1453 count += spi_populate_sync_msg(&hostdata->msgout[count],
1454 spi_period(SCp->device->sdev_target),
1455 spi_offset(SCp->device->sdev_target));
1456 NCR_700_set_flag(SCp->device, NCR_700_DEV_BEGIN_SYNC_NEGOTIATION);
1459 script_patch_16(hostdata->dev, hostdata->script, MessageCount, count);
1462 script_patch_ID(hostdata->dev, hostdata->script,
1463 Device_ID, 1<<scmd_id(SCp));
1465 script_patch_32_abs(hostdata->dev, hostdata->script, CommandAddress,
1466 slot->pCmd);
1467 script_patch_16(hostdata->dev, hostdata->script, CommandCount,
1468 SCp->cmd_len);
1469 /* finally plumb the beginning of the SG list into the script
1470 * */
1471 script_patch_32_abs(hostdata->dev, hostdata->script,
1472 SGScriptStartAddress, to32bit(&slot->pSG[0].ins));
1473 NCR_700_clear_fifo(SCp->device->host);
1475 if(slot->resume_offset == 0)
1476 slot->resume_offset = hostdata->pScript;
1477 /* now perform all the writebacks and invalidates */
1478 dma_cache_sync(hostdata->dev, hostdata->msgout, count, DMA_TO_DEVICE);
1479 dma_cache_sync(hostdata->dev, hostdata->msgin, MSG_ARRAY_SIZE,
1480 DMA_FROM_DEVICE);
1481 dma_cache_sync(hostdata->dev, SCp->cmnd, SCp->cmd_len, DMA_TO_DEVICE);
1482 dma_cache_sync(hostdata->dev, hostdata->status, 1, DMA_FROM_DEVICE);
1484 /* set the synchronous period/offset */
1485 NCR_700_writeb(NCR_700_get_SXFER(SCp->device),
1486 SCp->device->host, SXFER_REG);
1487 NCR_700_writel(slot->temp, SCp->device->host, TEMP_REG);
1488 NCR_700_writel(slot->resume_offset, SCp->device->host, DSP_REG);
1490 return 1;
1493 irqreturn_t
1494 NCR_700_intr(int irq, void *dev_id)
1496 struct Scsi_Host *host = (struct Scsi_Host *)dev_id;
1497 struct NCR_700_Host_Parameters *hostdata =
1498 (struct NCR_700_Host_Parameters *)host->hostdata[0];
1499 __u8 istat;
1500 __u32 resume_offset = 0;
1501 __u8 pun = 0xff, lun = 0xff;
1502 unsigned long flags;
1503 int handled = 0;
1505 /* Use the host lock to serialise acess to the 53c700
1506 * hardware. Note: In future, we may need to take the queue
1507 * lock to enter the done routines. When that happens, we
1508 * need to ensure that for this driver, the host lock and the
1509 * queue lock point to the same thing. */
1510 spin_lock_irqsave(host->host_lock, flags);
1511 if((istat = NCR_700_readb(host, ISTAT_REG))
1512 & (SCSI_INT_PENDING | DMA_INT_PENDING)) {
1513 __u32 dsps;
1514 __u8 sstat0 = 0, dstat = 0;
1515 __u32 dsp;
1516 struct scsi_cmnd *SCp = hostdata->cmd;
1517 enum NCR_700_Host_State state;
1519 handled = 1;
1520 state = hostdata->state;
1521 SCp = hostdata->cmd;
1523 if(istat & SCSI_INT_PENDING) {
1524 udelay(10);
1526 sstat0 = NCR_700_readb(host, SSTAT0_REG);
1529 if(istat & DMA_INT_PENDING) {
1530 udelay(10);
1532 dstat = NCR_700_readb(host, DSTAT_REG);
1535 dsps = NCR_700_readl(host, DSPS_REG);
1536 dsp = NCR_700_readl(host, DSP_REG);
1538 DEBUG(("scsi%d: istat %02x sstat0 %02x dstat %02x dsp %04x[%08x] dsps 0x%x\n",
1539 host->host_no, istat, sstat0, dstat,
1540 (dsp - (__u32)(hostdata->pScript))/4,
1541 dsp, dsps));
1543 if(SCp != NULL) {
1544 pun = SCp->device->id;
1545 lun = SCp->device->lun;
1548 if(sstat0 & SCSI_RESET_DETECTED) {
1549 struct scsi_device *SDp;
1550 int i;
1552 hostdata->state = NCR_700_HOST_BUSY;
1554 printk(KERN_ERR "scsi%d: Bus Reset detected, executing command %p, slot %p, dsp %08x[%04x]\n",
1555 host->host_no, SCp, SCp == NULL ? NULL : SCp->host_scribble, dsp, dsp - hostdata->pScript);
1557 scsi_report_bus_reset(host, 0);
1559 /* clear all the negotiated parameters */
1560 __shost_for_each_device(SDp, host)
1561 NCR_700_clear_flag(SDp, ~0);
1563 /* clear all the slots and their pending commands */
1564 for(i = 0; i < NCR_700_COMMAND_SLOTS_PER_HOST; i++) {
1565 struct scsi_cmnd *SCp;
1566 struct NCR_700_command_slot *slot =
1567 &hostdata->slots[i];
1569 if(slot->state == NCR_700_SLOT_FREE)
1570 continue;
1572 SCp = slot->cmnd;
1573 printk(KERN_ERR " failing command because of reset, slot %p, cmnd %p\n",
1574 slot, SCp);
1575 free_slot(slot, hostdata);
1576 SCp->host_scribble = NULL;
1577 NCR_700_set_depth(SCp->device, 0);
1578 /* NOTE: deadlock potential here: we
1579 * rely on mid-layer guarantees that
1580 * scsi_done won't try to issue the
1581 * command again otherwise we'll
1582 * deadlock on the
1583 * hostdata->state_lock */
1584 SCp->result = DID_RESET << 16;
1585 SCp->scsi_done(SCp);
1587 mdelay(25);
1588 NCR_700_chip_setup(host);
1590 hostdata->state = NCR_700_HOST_FREE;
1591 hostdata->cmd = NULL;
1592 /* signal back if this was an eh induced reset */
1593 if(hostdata->eh_complete != NULL)
1594 complete(hostdata->eh_complete);
1595 goto out_unlock;
1596 } else if(sstat0 & SELECTION_TIMEOUT) {
1597 DEBUG(("scsi%d: (%d:%d) selection timeout\n",
1598 host->host_no, pun, lun));
1599 NCR_700_scsi_done(hostdata, SCp, DID_NO_CONNECT<<16);
1600 } else if(sstat0 & PHASE_MISMATCH) {
1601 struct NCR_700_command_slot *slot = (SCp == NULL) ? NULL :
1602 (struct NCR_700_command_slot *)SCp->host_scribble;
1604 if(dsp == Ent_SendMessage + 8 + hostdata->pScript) {
1605 /* It wants to reply to some part of
1606 * our message */
1607 #ifdef NCR_700_DEBUG
1608 __u32 temp = NCR_700_readl(host, TEMP_REG);
1609 int count = (hostdata->script[Ent_SendMessage/4] & 0xffffff) - ((NCR_700_readl(host, DBC_REG) & 0xffffff) + NCR_700_data_residual(host));
1610 printk("scsi%d (%d:%d) PHASE MISMATCH IN SEND MESSAGE %d remain, return %p[%04x], phase %s\n", host->host_no, pun, lun, count, (void *)temp, temp - hostdata->pScript, sbcl_to_string(NCR_700_readb(host, SBCL_REG)));
1611 #endif
1612 resume_offset = hostdata->pScript + Ent_SendMessagePhaseMismatch;
1613 } else if(dsp >= to32bit(&slot->pSG[0].ins) &&
1614 dsp <= to32bit(&slot->pSG[NCR_700_SG_SEGMENTS].ins)) {
1615 int data_transfer = NCR_700_readl(host, DBC_REG) & 0xffffff;
1616 int SGcount = (dsp - to32bit(&slot->pSG[0].ins))/sizeof(struct NCR_700_SG_List);
1617 int residual = NCR_700_data_residual(host);
1618 int i;
1619 #ifdef NCR_700_DEBUG
1620 __u32 naddr = NCR_700_readl(host, DNAD_REG);
1622 printk("scsi%d: (%d:%d) Expected phase mismatch in slot->SG[%d], transferred 0x%x\n",
1623 host->host_no, pun, lun,
1624 SGcount, data_transfer);
1625 scsi_print_command(SCp);
1626 if(residual) {
1627 printk("scsi%d: (%d:%d) Expected phase mismatch in slot->SG[%d], transferred 0x%x, residual %d\n",
1628 host->host_no, pun, lun,
1629 SGcount, data_transfer, residual);
1631 #endif
1632 data_transfer += residual;
1634 if(data_transfer != 0) {
1635 int count;
1636 __u32 pAddr;
1638 SGcount--;
1640 count = (bS_to_cpu(slot->SG[SGcount].ins) & 0x00ffffff);
1641 DEBUG(("DATA TRANSFER MISMATCH, count = %d, transferred %d\n", count, count-data_transfer));
1642 slot->SG[SGcount].ins &= bS_to_host(0xff000000);
1643 slot->SG[SGcount].ins |= bS_to_host(data_transfer);
1644 pAddr = bS_to_cpu(slot->SG[SGcount].pAddr);
1645 pAddr += (count - data_transfer);
1646 #ifdef NCR_700_DEBUG
1647 if(pAddr != naddr) {
1648 printk("scsi%d (%d:%d) transfer mismatch pAddr=%lx, naddr=%lx, data_transfer=%d, residual=%d\n", host->host_no, pun, lun, (unsigned long)pAddr, (unsigned long)naddr, data_transfer, residual);
1650 #endif
1651 slot->SG[SGcount].pAddr = bS_to_host(pAddr);
1653 /* set the executed moves to nops */
1654 for(i=0; i<SGcount; i++) {
1655 slot->SG[i].ins = bS_to_host(SCRIPT_NOP);
1656 slot->SG[i].pAddr = 0;
1658 dma_cache_sync(hostdata->dev, slot->SG, sizeof(slot->SG), DMA_TO_DEVICE);
1659 /* and pretend we disconnected after
1660 * the command phase */
1661 resume_offset = hostdata->pScript + Ent_MsgInDuringData;
1662 /* make sure all the data is flushed */
1663 NCR_700_flush_fifo(host);
1664 } else {
1665 __u8 sbcl = NCR_700_readb(host, SBCL_REG);
1666 printk(KERN_ERR "scsi%d: (%d:%d) phase mismatch at %04x, phase %s\n",
1667 host->host_no, pun, lun, dsp - hostdata->pScript, sbcl_to_string(sbcl));
1668 NCR_700_internal_bus_reset(host);
1671 } else if(sstat0 & SCSI_GROSS_ERROR) {
1672 printk(KERN_ERR "scsi%d: (%d:%d) GROSS ERROR\n",
1673 host->host_no, pun, lun);
1674 NCR_700_scsi_done(hostdata, SCp, DID_ERROR<<16);
1675 } else if(sstat0 & PARITY_ERROR) {
1676 printk(KERN_ERR "scsi%d: (%d:%d) PARITY ERROR\n",
1677 host->host_no, pun, lun);
1678 NCR_700_scsi_done(hostdata, SCp, DID_ERROR<<16);
1679 } else if(dstat & SCRIPT_INT_RECEIVED) {
1680 DEBUG(("scsi%d: (%d:%d) ====>SCRIPT INTERRUPT<====\n",
1681 host->host_no, pun, lun));
1682 resume_offset = process_script_interrupt(dsps, dsp, SCp, host, hostdata);
1683 } else if(dstat & (ILGL_INST_DETECTED)) {
1684 printk(KERN_ERR "scsi%d: (%d:%d) Illegal Instruction detected at 0x%08x[0x%x]!!!\n"
1685 " Please email James.Bottomley@HansenPartnership.com with the details\n",
1686 host->host_no, pun, lun,
1687 dsp, dsp - hostdata->pScript);
1688 NCR_700_scsi_done(hostdata, SCp, DID_ERROR<<16);
1689 } else if(dstat & (WATCH_DOG_INTERRUPT|ABORTED)) {
1690 printk(KERN_ERR "scsi%d: (%d:%d) serious DMA problem, dstat=%02x\n",
1691 host->host_no, pun, lun, dstat);
1692 NCR_700_scsi_done(hostdata, SCp, DID_ERROR<<16);
1696 /* NOTE: selection interrupt processing MUST occur
1697 * after script interrupt processing to correctly cope
1698 * with the case where we process a disconnect and
1699 * then get reselected before we process the
1700 * disconnection */
1701 if(sstat0 & SELECTED) {
1702 /* FIXME: It currently takes at least FOUR
1703 * interrupts to complete a command that
1704 * disconnects: one for the disconnect, one
1705 * for the reselection, one to get the
1706 * reselection data and one to complete the
1707 * command. If we guess the reselected
1708 * command here and prepare it, we only need
1709 * to get a reselection data interrupt if we
1710 * guessed wrongly. Since the interrupt
1711 * overhead is much greater than the command
1712 * setup, this would be an efficient
1713 * optimisation particularly as we probably
1714 * only have one outstanding command on a
1715 * target most of the time */
1717 resume_offset = process_selection(host, dsp);
1723 if(resume_offset) {
1724 if(hostdata->state != NCR_700_HOST_BUSY) {
1725 printk(KERN_ERR "scsi%d: Driver error: resume at 0x%08x [0x%04x] with non busy host!\n",
1726 host->host_no, resume_offset, resume_offset - hostdata->pScript);
1727 hostdata->state = NCR_700_HOST_BUSY;
1730 DEBUG(("Attempting to resume at %x\n", resume_offset));
1731 NCR_700_clear_fifo(host);
1732 NCR_700_writel(resume_offset, host, DSP_REG);
1734 /* There is probably a technical no-no about this: If we're a
1735 * shared interrupt and we got this interrupt because the
1736 * other device needs servicing not us, we're still going to
1737 * check our queued commands here---of course, there shouldn't
1738 * be any outstanding.... */
1739 if(hostdata->state == NCR_700_HOST_FREE) {
1740 int i;
1742 for(i = 0; i < NCR_700_COMMAND_SLOTS_PER_HOST; i++) {
1743 /* fairness: always run the queue from the last
1744 * position we left off */
1745 int j = (i + hostdata->saved_slot_position)
1746 % NCR_700_COMMAND_SLOTS_PER_HOST;
1748 if(hostdata->slots[j].state != NCR_700_SLOT_QUEUED)
1749 continue;
1750 if(NCR_700_start_command(hostdata->slots[j].cmnd)) {
1751 DEBUG(("scsi%d: Issuing saved command slot %p, cmd %p\t\n",
1752 host->host_no, &hostdata->slots[j],
1753 hostdata->slots[j].cmnd));
1754 hostdata->saved_slot_position = j + 1;
1757 break;
1760 out_unlock:
1761 spin_unlock_irqrestore(host->host_lock, flags);
1762 return IRQ_RETVAL(handled);
1765 STATIC int
1766 NCR_700_queuecommand(struct scsi_cmnd *SCp, void (*done)(struct scsi_cmnd *))
1768 struct NCR_700_Host_Parameters *hostdata =
1769 (struct NCR_700_Host_Parameters *)SCp->device->host->hostdata[0];
1770 __u32 move_ins;
1771 enum dma_data_direction direction;
1772 struct NCR_700_command_slot *slot;
1774 if(hostdata->command_slot_count >= NCR_700_COMMAND_SLOTS_PER_HOST) {
1775 /* We're over our allocation, this should never happen
1776 * since we report the max allocation to the mid layer */
1777 printk(KERN_WARNING "scsi%d: Command depth has gone over queue depth\n", SCp->device->host->host_no);
1778 return 1;
1780 /* check for untagged commands. We cannot have any outstanding
1781 * commands if we accept them. Commands could be untagged because:
1783 * - The tag negotiated bitmap is clear
1784 * - The blk layer sent and untagged command
1786 if(NCR_700_get_depth(SCp->device) != 0
1787 && (!(hostdata->tag_negotiated & (1<<scmd_id(SCp)))
1788 || !blk_rq_tagged(SCp->request))) {
1789 CDEBUG(KERN_ERR, SCp, "has non zero depth %d\n",
1790 NCR_700_get_depth(SCp->device));
1791 return SCSI_MLQUEUE_DEVICE_BUSY;
1793 if(NCR_700_get_depth(SCp->device) >= SCp->device->queue_depth) {
1794 CDEBUG(KERN_ERR, SCp, "has max tag depth %d\n",
1795 NCR_700_get_depth(SCp->device));
1796 return SCSI_MLQUEUE_DEVICE_BUSY;
1798 NCR_700_set_depth(SCp->device, NCR_700_get_depth(SCp->device) + 1);
1800 /* begin the command here */
1801 /* no need to check for NULL, test for command_slot_count above
1802 * ensures a slot is free */
1803 slot = find_empty_slot(hostdata);
1805 slot->cmnd = SCp;
1807 SCp->scsi_done = done;
1808 SCp->host_scribble = (unsigned char *)slot;
1809 SCp->SCp.ptr = NULL;
1810 SCp->SCp.buffer = NULL;
1812 #ifdef NCR_700_DEBUG
1813 printk("53c700: scsi%d, command ", SCp->device->host->host_no);
1814 scsi_print_command(SCp);
1815 #endif
1816 if(blk_rq_tagged(SCp->request)
1817 && (hostdata->tag_negotiated &(1<<scmd_id(SCp))) == 0
1818 && NCR_700_get_tag_neg_state(SCp->device) == NCR_700_START_TAG_NEGOTIATION) {
1819 scmd_printk(KERN_ERR, SCp, "Enabling Tag Command Queuing\n");
1820 hostdata->tag_negotiated |= (1<<scmd_id(SCp));
1821 NCR_700_set_tag_neg_state(SCp->device, NCR_700_DURING_TAG_NEGOTIATION);
1824 /* here we may have to process an untagged command. The gate
1825 * above ensures that this will be the only one outstanding,
1826 * so clear the tag negotiated bit.
1828 * FIXME: This will royally screw up on multiple LUN devices
1829 * */
1830 if(!blk_rq_tagged(SCp->request)
1831 && (hostdata->tag_negotiated &(1<<scmd_id(SCp)))) {
1832 scmd_printk(KERN_INFO, SCp, "Disabling Tag Command Queuing\n");
1833 hostdata->tag_negotiated &= ~(1<<scmd_id(SCp));
1836 if((hostdata->tag_negotiated &(1<<scmd_id(SCp)))
1837 && scsi_get_tag_type(SCp->device)) {
1838 slot->tag = SCp->request->tag;
1839 CDEBUG(KERN_DEBUG, SCp, "sending out tag %d, slot %p\n",
1840 slot->tag, slot);
1841 } else {
1842 slot->tag = SCSI_NO_TAG;
1843 /* must populate current_cmnd for scsi_find_tag to work */
1844 SCp->device->current_cmnd = SCp;
1846 /* sanity check: some of the commands generated by the mid-layer
1847 * have an eccentric idea of their sc_data_direction */
1848 if(!SCp->use_sg && !SCp->request_bufflen
1849 && SCp->sc_data_direction != DMA_NONE) {
1850 #ifdef NCR_700_DEBUG
1851 printk("53c700: Command");
1852 scsi_print_command(SCp);
1853 printk("Has wrong data direction %d\n", SCp->sc_data_direction);
1854 #endif
1855 SCp->sc_data_direction = DMA_NONE;
1858 switch (SCp->cmnd[0]) {
1859 case REQUEST_SENSE:
1860 /* clear the internal sense magic */
1861 SCp->cmnd[6] = 0;
1862 /* fall through */
1863 default:
1864 /* OK, get it from the command */
1865 switch(SCp->sc_data_direction) {
1866 case DMA_BIDIRECTIONAL:
1867 default:
1868 printk(KERN_ERR "53c700: Unknown command for data direction ");
1869 scsi_print_command(SCp);
1871 move_ins = 0;
1872 break;
1873 case DMA_NONE:
1874 move_ins = 0;
1875 break;
1876 case DMA_FROM_DEVICE:
1877 move_ins = SCRIPT_MOVE_DATA_IN;
1878 break;
1879 case DMA_TO_DEVICE:
1880 move_ins = SCRIPT_MOVE_DATA_OUT;
1881 break;
1885 /* now build the scatter gather list */
1886 direction = SCp->sc_data_direction;
1887 if(move_ins != 0) {
1888 int i;
1889 int sg_count;
1890 dma_addr_t vPtr = 0;
1891 __u32 count = 0;
1893 if(SCp->use_sg) {
1894 sg_count = dma_map_sg(hostdata->dev,
1895 SCp->request_buffer, SCp->use_sg,
1896 direction);
1897 } else {
1898 vPtr = dma_map_single(hostdata->dev,
1899 SCp->request_buffer,
1900 SCp->request_bufflen,
1901 direction);
1902 count = SCp->request_bufflen;
1903 slot->dma_handle = vPtr;
1904 sg_count = 1;
1908 for(i = 0; i < sg_count; i++) {
1910 if(SCp->use_sg) {
1911 struct scatterlist *sg = SCp->request_buffer;
1913 vPtr = sg_dma_address(&sg[i]);
1914 count = sg_dma_len(&sg[i]);
1917 slot->SG[i].ins = bS_to_host(move_ins | count);
1918 DEBUG((" scatter block %d: move %d[%08x] from 0x%lx\n",
1919 i, count, slot->SG[i].ins, (unsigned long)vPtr));
1920 slot->SG[i].pAddr = bS_to_host(vPtr);
1922 slot->SG[i].ins = bS_to_host(SCRIPT_RETURN);
1923 slot->SG[i].pAddr = 0;
1924 dma_cache_sync(hostdata->dev, slot->SG, sizeof(slot->SG), DMA_TO_DEVICE);
1925 DEBUG((" SETTING %08lx to %x\n",
1926 (&slot->pSG[i].ins),
1927 slot->SG[i].ins));
1929 slot->resume_offset = 0;
1930 slot->pCmd = dma_map_single(hostdata->dev, SCp->cmnd,
1931 sizeof(SCp->cmnd), DMA_TO_DEVICE);
1932 NCR_700_start_command(SCp);
1933 return 0;
1936 STATIC int
1937 NCR_700_abort(struct scsi_cmnd * SCp)
1939 struct NCR_700_command_slot *slot;
1941 scmd_printk(KERN_INFO, SCp,
1942 "New error handler wants to abort command\n\t");
1943 scsi_print_command(SCp);
1945 slot = (struct NCR_700_command_slot *)SCp->host_scribble;
1947 if(slot == NULL)
1948 /* no outstanding command to abort */
1949 return SUCCESS;
1950 if(SCp->cmnd[0] == TEST_UNIT_READY) {
1951 /* FIXME: This is because of a problem in the new
1952 * error handler. When it is in error recovery, it
1953 * will send a TUR to a device it thinks may still be
1954 * showing a problem. If the TUR isn't responded to,
1955 * it will abort it and mark the device off line.
1956 * Unfortunately, it does no other error recovery, so
1957 * this would leave us with an outstanding command
1958 * occupying a slot. Rather than allow this to
1959 * happen, we issue a bus reset to force all
1960 * outstanding commands to terminate here. */
1961 NCR_700_internal_bus_reset(SCp->device->host);
1962 /* still drop through and return failed */
1964 return FAILED;
1968 STATIC int
1969 NCR_700_bus_reset(struct scsi_cmnd * SCp)
1971 DECLARE_COMPLETION_ONSTACK(complete);
1972 struct NCR_700_Host_Parameters *hostdata =
1973 (struct NCR_700_Host_Parameters *)SCp->device->host->hostdata[0];
1975 scmd_printk(KERN_INFO, SCp,
1976 "New error handler wants BUS reset, cmd %p\n\t", SCp);
1977 scsi_print_command(SCp);
1979 /* In theory, eh_complete should always be null because the
1980 * eh is single threaded, but just in case we're handling a
1981 * reset via sg or something */
1982 spin_lock_irq(SCp->device->host->host_lock);
1983 while (hostdata->eh_complete != NULL) {
1984 spin_unlock_irq(SCp->device->host->host_lock);
1985 msleep_interruptible(100);
1986 spin_lock_irq(SCp->device->host->host_lock);
1989 hostdata->eh_complete = &complete;
1990 NCR_700_internal_bus_reset(SCp->device->host);
1992 spin_unlock_irq(SCp->device->host->host_lock);
1993 wait_for_completion(&complete);
1994 spin_lock_irq(SCp->device->host->host_lock);
1996 hostdata->eh_complete = NULL;
1997 /* Revalidate the transport parameters of the failing device */
1998 if(hostdata->fast)
1999 spi_schedule_dv_device(SCp->device);
2001 spin_unlock_irq(SCp->device->host->host_lock);
2002 return SUCCESS;
2005 STATIC int
2006 NCR_700_host_reset(struct scsi_cmnd * SCp)
2008 scmd_printk(KERN_INFO, SCp, "New error handler wants HOST reset\n\t");
2009 scsi_print_command(SCp);
2011 spin_lock_irq(SCp->device->host->host_lock);
2013 NCR_700_internal_bus_reset(SCp->device->host);
2014 NCR_700_chip_reset(SCp->device->host);
2016 spin_unlock_irq(SCp->device->host->host_lock);
2018 return SUCCESS;
2021 STATIC void
2022 NCR_700_set_period(struct scsi_target *STp, int period)
2024 struct Scsi_Host *SHp = dev_to_shost(STp->dev.parent);
2025 struct NCR_700_Host_Parameters *hostdata =
2026 (struct NCR_700_Host_Parameters *)SHp->hostdata[0];
2028 if(!hostdata->fast)
2029 return;
2031 if(period < hostdata->min_period)
2032 period = hostdata->min_period;
2034 spi_period(STp) = period;
2035 spi_flags(STp) &= ~(NCR_700_DEV_NEGOTIATED_SYNC |
2036 NCR_700_DEV_BEGIN_SYNC_NEGOTIATION);
2037 spi_flags(STp) |= NCR_700_DEV_PRINT_SYNC_NEGOTIATION;
2040 STATIC void
2041 NCR_700_set_offset(struct scsi_target *STp, int offset)
2043 struct Scsi_Host *SHp = dev_to_shost(STp->dev.parent);
2044 struct NCR_700_Host_Parameters *hostdata =
2045 (struct NCR_700_Host_Parameters *)SHp->hostdata[0];
2046 int max_offset = hostdata->chip710
2047 ? NCR_710_MAX_OFFSET : NCR_700_MAX_OFFSET;
2049 if(!hostdata->fast)
2050 return;
2052 if(offset > max_offset)
2053 offset = max_offset;
2055 /* if we're currently async, make sure the period is reasonable */
2056 if(spi_offset(STp) == 0 && (spi_period(STp) < hostdata->min_period ||
2057 spi_period(STp) > 0xff))
2058 spi_period(STp) = hostdata->min_period;
2060 spi_offset(STp) = offset;
2061 spi_flags(STp) &= ~(NCR_700_DEV_NEGOTIATED_SYNC |
2062 NCR_700_DEV_BEGIN_SYNC_NEGOTIATION);
2063 spi_flags(STp) |= NCR_700_DEV_PRINT_SYNC_NEGOTIATION;
2066 STATIC int
2067 NCR_700_slave_alloc(struct scsi_device *SDp)
2069 SDp->hostdata = kzalloc(sizeof(struct NCR_700_Device_Parameters),
2070 GFP_KERNEL);
2072 if (!SDp->hostdata)
2073 return -ENOMEM;
2075 return 0;
2078 STATIC int
2079 NCR_700_slave_configure(struct scsi_device *SDp)
2081 struct NCR_700_Host_Parameters *hostdata =
2082 (struct NCR_700_Host_Parameters *)SDp->host->hostdata[0];
2084 /* to do here: allocate memory; build a queue_full list */
2085 if(SDp->tagged_supported) {
2086 scsi_set_tag_type(SDp, MSG_ORDERED_TAG);
2087 scsi_activate_tcq(SDp, NCR_700_DEFAULT_TAGS);
2088 NCR_700_set_tag_neg_state(SDp, NCR_700_START_TAG_NEGOTIATION);
2089 } else {
2090 /* initialise to default depth */
2091 scsi_adjust_queue_depth(SDp, 0, SDp->host->cmd_per_lun);
2093 if(hostdata->fast) {
2094 /* Find the correct offset and period via domain validation */
2095 if (!spi_initial_dv(SDp->sdev_target))
2096 spi_dv_device(SDp);
2097 } else {
2098 spi_offset(SDp->sdev_target) = 0;
2099 spi_period(SDp->sdev_target) = 0;
2101 return 0;
2104 STATIC void
2105 NCR_700_slave_destroy(struct scsi_device *SDp)
2107 kfree(SDp->hostdata);
2108 SDp->hostdata = NULL;
2111 static int
2112 NCR_700_change_queue_depth(struct scsi_device *SDp, int depth)
2114 if (depth > NCR_700_MAX_TAGS)
2115 depth = NCR_700_MAX_TAGS;
2117 scsi_adjust_queue_depth(SDp, scsi_get_tag_type(SDp), depth);
2118 return depth;
2121 static int NCR_700_change_queue_type(struct scsi_device *SDp, int tag_type)
2123 int change_tag = ((tag_type ==0 && scsi_get_tag_type(SDp) != 0)
2124 || (tag_type != 0 && scsi_get_tag_type(SDp) == 0));
2125 struct NCR_700_Host_Parameters *hostdata =
2126 (struct NCR_700_Host_Parameters *)SDp->host->hostdata[0];
2128 scsi_set_tag_type(SDp, tag_type);
2130 /* We have a global (per target) flag to track whether TCQ is
2131 * enabled, so we'll be turning it off for the entire target here.
2132 * our tag algorithm will fail if we mix tagged and untagged commands,
2133 * so quiesce the device before doing this */
2134 if (change_tag)
2135 scsi_target_quiesce(SDp->sdev_target);
2137 if (!tag_type) {
2138 /* shift back to the default unqueued number of commands
2139 * (the user can still raise this) */
2140 scsi_deactivate_tcq(SDp, SDp->host->cmd_per_lun);
2141 hostdata->tag_negotiated &= ~(1 << sdev_id(SDp));
2142 } else {
2143 /* Here, we cleared the negotiation flag above, so this
2144 * will force the driver to renegotiate */
2145 scsi_activate_tcq(SDp, SDp->queue_depth);
2146 if (change_tag)
2147 NCR_700_set_tag_neg_state(SDp, NCR_700_START_TAG_NEGOTIATION);
2149 if (change_tag)
2150 scsi_target_resume(SDp->sdev_target);
2152 return tag_type;
2155 static ssize_t
2156 NCR_700_show_active_tags(struct device *dev, struct device_attribute *attr, char *buf)
2158 struct scsi_device *SDp = to_scsi_device(dev);
2160 return snprintf(buf, 20, "%d\n", NCR_700_get_depth(SDp));
2163 static struct device_attribute NCR_700_active_tags_attr = {
2164 .attr = {
2165 .name = "active_tags",
2166 .mode = S_IRUGO,
2168 .show = NCR_700_show_active_tags,
2171 STATIC struct device_attribute *NCR_700_dev_attrs[] = {
2172 &NCR_700_active_tags_attr,
2173 NULL,
2176 EXPORT_SYMBOL(NCR_700_detect);
2177 EXPORT_SYMBOL(NCR_700_release);
2178 EXPORT_SYMBOL(NCR_700_intr);
2180 static struct spi_function_template NCR_700_transport_functions = {
2181 .set_period = NCR_700_set_period,
2182 .show_period = 1,
2183 .set_offset = NCR_700_set_offset,
2184 .show_offset = 1,
2187 static int __init NCR_700_init(void)
2189 NCR_700_transport_template = spi_attach_transport(&NCR_700_transport_functions);
2190 if(!NCR_700_transport_template)
2191 return -ENODEV;
2192 return 0;
2195 static void __exit NCR_700_exit(void)
2197 spi_release_transport(NCR_700_transport_template);
2200 module_init(NCR_700_init);
2201 module_exit(NCR_700_exit);