aboutsummaryrefslogtreecommitdiffstats
path: root/drivers/scsi/NCR53C9x.c
diff options
context:
space:
mode:
authorLinus Torvalds <torvalds@ppc970.osdl.org>2005-04-16 18:20:36 -0400
committerLinus Torvalds <torvalds@ppc970.osdl.org>2005-04-16 18:20:36 -0400
commit1da177e4c3f41524e886b7f1b8a0c1fc7321cac2 (patch)
tree0bba044c4ce775e45a88a51686b5d9f90697ea9d /drivers/scsi/NCR53C9x.c
Linux-2.6.12-rc2v2.6.12-rc2
Initial git repository build. I'm not bothering with the full history, even though we have it. We can create a separate "historical" git archive of that later if we want to, and in the meantime it's about 3.2GB when imported into git - space that would just make the early git days unnecessarily complicated, when we don't have a lot of good infrastructure for it. Let it rip!
Diffstat (limited to 'drivers/scsi/NCR53C9x.c')
-rw-r--r--drivers/scsi/NCR53C9x.c3649
1 files changed, 3649 insertions, 0 deletions
diff --git a/drivers/scsi/NCR53C9x.c b/drivers/scsi/NCR53C9x.c
new file mode 100644
index 000000000000..3c86655a5f33
--- /dev/null
+++ b/drivers/scsi/NCR53C9x.c
@@ -0,0 +1,3649 @@
1/* NCR53C9x.c: Generic SCSI driver code for NCR53C9x chips.
2 *
3 * Originally esp.c : EnhancedScsiProcessor Sun SCSI driver code.
4 *
5 * Copyright (C) 1995, 1998 David S. Miller (davem@caip.rutgers.edu)
6 *
7 * Most DMA dependencies put in driver specific files by
8 * Jesper Skov (jskov@cygnus.co.uk)
9 *
10 * Set up to use esp_read/esp_write (preprocessor macros in NCR53c9x.h) by
11 * Tymm Twillman (tymm@coe.missouri.edu)
12 */
13
14/* TODO:
15 *
16 * 1) Maybe disable parity checking in config register one for SCSI1
17 * targets. (Gilmore says parity error on the SBus can lock up
18 * old sun4c's)
19 * 2) Add support for DMA2 pipelining.
20 * 3) Add tagged queueing.
21 * 4) Maybe change use of "esp" to something more "NCR"'ish.
22 */
23
24#include <linux/module.h>
25
26#include <linux/config.h>
27#include <linux/kernel.h>
28#include <linux/delay.h>
29#include <linux/types.h>
30#include <linux/string.h>
31#include <linux/slab.h>
32#include <linux/blkdev.h>
33#include <linux/interrupt.h>
34#include <linux/proc_fs.h>
35#include <linux/stat.h>
36#include <linux/init.h>
37
38#include "scsi.h"
39#include <scsi/scsi_host.h>
40#include "NCR53C9x.h"
41
42#include <asm/system.h>
43#include <asm/ptrace.h>
44#include <asm/pgtable.h>
45#include <asm/io.h>
46#include <asm/irq.h>
47
48/* Command phase enumeration. */
49enum {
50 not_issued = 0x00, /* Still in the issue_SC queue. */
51
52 /* Various forms of selecting a target. */
53#define in_slct_mask 0x10
54 in_slct_norm = 0x10, /* ESP is arbitrating, normal selection */
55 in_slct_stop = 0x11, /* ESP will select, then stop with IRQ */
56 in_slct_msg = 0x12, /* select, then send a message */
57 in_slct_tag = 0x13, /* select and send tagged queue msg */
58 in_slct_sneg = 0x14, /* select and acquire sync capabilities */
59
60 /* Any post selection activity. */
61#define in_phases_mask 0x20
62 in_datain = 0x20, /* Data is transferring from the bus */
63 in_dataout = 0x21, /* Data is transferring to the bus */
64 in_data_done = 0x22, /* Last DMA data operation done (maybe) */
65 in_msgin = 0x23, /* Eating message from target */
66 in_msgincont = 0x24, /* Eating more msg bytes from target */
67 in_msgindone = 0x25, /* Decide what to do with what we got */
68 in_msgout = 0x26, /* Sending message to target */
69 in_msgoutdone = 0x27, /* Done sending msg out */
70 in_cmdbegin = 0x28, /* Sending cmd after abnormal selection */
71 in_cmdend = 0x29, /* Done sending slow cmd */
72 in_status = 0x2a, /* Was in status phase, finishing cmd */
73 in_freeing = 0x2b, /* freeing the bus for cmd cmplt or disc */
74 in_the_dark = 0x2c, /* Don't know what bus phase we are in */
75
76 /* Special states, ie. not normal bus transitions... */
77#define in_spec_mask 0x80
78 in_abortone = 0x80, /* Aborting one command currently */
79 in_abortall = 0x81, /* Blowing away all commands we have */
80 in_resetdev = 0x82, /* SCSI target reset in progress */
81 in_resetbus = 0x83, /* SCSI bus reset in progress */
82 in_tgterror = 0x84, /* Target did something stupid */
83};
84
85enum {
86 /* Zero has special meaning, see skipahead[12]. */
87/*0*/ do_never,
88
89/*1*/ do_phase_determine,
90/*2*/ do_reset_bus,
91/*3*/ do_reset_complete,
92/*4*/ do_work_bus,
93/*5*/ do_intr_end
94};
95
96/* The master ring of all esp hosts we are managing in this driver. */
97struct NCR_ESP *espchain;
98int nesps = 0, esps_in_use = 0, esps_running = 0;
99
100irqreturn_t esp_intr(int irq, void *dev_id, struct pt_regs *pregs);
101
102/* Debugging routines */
103static struct esp_cmdstrings {
104 unchar cmdchar;
105 char *text;
106} esp_cmd_strings[] = {
107 /* Miscellaneous */
108 { ESP_CMD_NULL, "ESP_NOP", },
109 { ESP_CMD_FLUSH, "FIFO_FLUSH", },
110 { ESP_CMD_RC, "RSTESP", },
111 { ESP_CMD_RS, "RSTSCSI", },
112 /* Disconnected State Group */
113 { ESP_CMD_RSEL, "RESLCTSEQ", },
114 { ESP_CMD_SEL, "SLCTNATN", },
115 { ESP_CMD_SELA, "SLCTATN", },
116 { ESP_CMD_SELAS, "SLCTATNSTOP", },
117 { ESP_CMD_ESEL, "ENSLCTRESEL", },
118 { ESP_CMD_DSEL, "DISSELRESEL", },
119 { ESP_CMD_SA3, "SLCTATN3", },
120 { ESP_CMD_RSEL3, "RESLCTSEQ", },
121 /* Target State Group */
122 { ESP_CMD_SMSG, "SNDMSG", },
123 { ESP_CMD_SSTAT, "SNDSTATUS", },
124 { ESP_CMD_SDATA, "SNDDATA", },
125 { ESP_CMD_DSEQ, "DISCSEQ", },
126 { ESP_CMD_TSEQ, "TERMSEQ", },
127 { ESP_CMD_TCCSEQ, "TRGTCMDCOMPSEQ", },
128 { ESP_CMD_DCNCT, "DISC", },
129 { ESP_CMD_RMSG, "RCVMSG", },
130 { ESP_CMD_RCMD, "RCVCMD", },
131 { ESP_CMD_RDATA, "RCVDATA", },
132 { ESP_CMD_RCSEQ, "RCVCMDSEQ", },
133 /* Initiator State Group */
134 { ESP_CMD_TI, "TRANSINFO", },
135 { ESP_CMD_ICCSEQ, "INICMDSEQCOMP", },
136 { ESP_CMD_MOK, "MSGACCEPTED", },
137 { ESP_CMD_TPAD, "TPAD", },
138 { ESP_CMD_SATN, "SATN", },
139 { ESP_CMD_RATN, "RATN", },
140};
141#define NUM_ESP_COMMANDS ((sizeof(esp_cmd_strings)) / (sizeof(struct esp_cmdstrings)))
142
143/* Print textual representation of an ESP command */
144static inline void esp_print_cmd(unchar espcmd)
145{
146 unchar dma_bit = espcmd & ESP_CMD_DMA;
147 int i;
148
149 espcmd &= ~dma_bit;
150 for(i=0; i<NUM_ESP_COMMANDS; i++)
151 if(esp_cmd_strings[i].cmdchar == espcmd)
152 break;
153 if(i==NUM_ESP_COMMANDS)
154 printk("ESP_Unknown");
155 else
156 printk("%s%s", esp_cmd_strings[i].text,
157 ((dma_bit) ? "+DMA" : ""));
158}
159
160/* Print the status register's value */
161static inline void esp_print_statreg(unchar statreg)
162{
163 unchar phase;
164
165 printk("STATUS<");
166 phase = statreg & ESP_STAT_PMASK;
167 printk("%s,", (phase == ESP_DOP ? "DATA-OUT" :
168 (phase == ESP_DIP ? "DATA-IN" :
169 (phase == ESP_CMDP ? "COMMAND" :
170 (phase == ESP_STATP ? "STATUS" :
171 (phase == ESP_MOP ? "MSG-OUT" :
172 (phase == ESP_MIP ? "MSG_IN" :
173 "unknown")))))));
174 if(statreg & ESP_STAT_TDONE)
175 printk("TRANS_DONE,");
176 if(statreg & ESP_STAT_TCNT)
177 printk("TCOUNT_ZERO,");
178 if(statreg & ESP_STAT_PERR)
179 printk("P_ERROR,");
180 if(statreg & ESP_STAT_SPAM)
181 printk("SPAM,");
182 if(statreg & ESP_STAT_INTR)
183 printk("IRQ,");
184 printk(">");
185}
186
187/* Print the interrupt register's value */
188static inline void esp_print_ireg(unchar intreg)
189{
190 printk("INTREG< ");
191 if(intreg & ESP_INTR_S)
192 printk("SLCT_NATN ");
193 if(intreg & ESP_INTR_SATN)
194 printk("SLCT_ATN ");
195 if(intreg & ESP_INTR_RSEL)
196 printk("RSLCT ");
197 if(intreg & ESP_INTR_FDONE)
198 printk("FDONE ");
199 if(intreg & ESP_INTR_BSERV)
200 printk("BSERV ");
201 if(intreg & ESP_INTR_DC)
202 printk("DISCNCT ");
203 if(intreg & ESP_INTR_IC)
204 printk("ILL_CMD ");
205 if(intreg & ESP_INTR_SR)
206 printk("SCSI_BUS_RESET ");
207 printk(">");
208}
209
210/* Print the sequence step registers contents */
211static inline void esp_print_seqreg(unchar stepreg)
212{
213 stepreg &= ESP_STEP_VBITS;
214 printk("STEP<%s>",
215 (stepreg == ESP_STEP_ASEL ? "SLCT_ARB_CMPLT" :
216 (stepreg == ESP_STEP_SID ? "1BYTE_MSG_SENT" :
217 (stepreg == ESP_STEP_NCMD ? "NOT_IN_CMD_PHASE" :
218 (stepreg == ESP_STEP_PPC ? "CMD_BYTES_LOST" :
219 (stepreg == ESP_STEP_FINI4 ? "CMD_SENT_OK" :
220 "UNKNOWN"))))));
221}
222
223static char *phase_string(int phase)
224{
225 switch(phase) {
226 case not_issued:
227 return "UNISSUED";
228 case in_slct_norm:
229 return "SLCTNORM";
230 case in_slct_stop:
231 return "SLCTSTOP";
232 case in_slct_msg:
233 return "SLCTMSG";
234 case in_slct_tag:
235 return "SLCTTAG";
236 case in_slct_sneg:
237 return "SLCTSNEG";
238 case in_datain:
239 return "DATAIN";
240 case in_dataout:
241 return "DATAOUT";
242 case in_data_done:
243 return "DATADONE";
244 case in_msgin:
245 return "MSGIN";
246 case in_msgincont:
247 return "MSGINCONT";
248 case in_msgindone:
249 return "MSGINDONE";
250 case in_msgout:
251 return "MSGOUT";
252 case in_msgoutdone:
253 return "MSGOUTDONE";
254 case in_cmdbegin:
255 return "CMDBEGIN";
256 case in_cmdend:
257 return "CMDEND";
258 case in_status:
259 return "STATUS";
260 case in_freeing:
261 return "FREEING";
262 case in_the_dark:
263 return "CLUELESS";
264 case in_abortone:
265 return "ABORTONE";
266 case in_abortall:
267 return "ABORTALL";
268 case in_resetdev:
269 return "RESETDEV";
270 case in_resetbus:
271 return "RESETBUS";
272 case in_tgterror:
273 return "TGTERROR";
274 default:
275 return "UNKNOWN";
276 };
277}
278
279#ifdef DEBUG_STATE_MACHINE
280static inline void esp_advance_phase(Scsi_Cmnd *s, int newphase)
281{
282 ESPLOG(("<%s>", phase_string(newphase)));
283 s->SCp.sent_command = s->SCp.phase;
284 s->SCp.phase = newphase;
285}
286#else
287#define esp_advance_phase(__s, __newphase) \
288 (__s)->SCp.sent_command = (__s)->SCp.phase; \
289 (__s)->SCp.phase = (__newphase);
290#endif
291
292#ifdef DEBUG_ESP_CMDS
293static inline void esp_cmd(struct NCR_ESP *esp, struct ESP_regs *eregs,
294 unchar cmd)
295{
296 esp->espcmdlog[esp->espcmdent] = cmd;
297 esp->espcmdent = (esp->espcmdent + 1) & 31;
298 esp_write(eregs->esp_cmnd, cmd);
299}
300#else
301#define esp_cmd(__esp, __eregs, __cmd) esp_write((__eregs)->esp_cmnd, (__cmd))
302#endif
303
304/* How we use the various Linux SCSI data structures for operation.
305 *
306 * struct scsi_cmnd:
307 *
308 * We keep track of the syncronous capabilities of a target
309 * in the device member, using sync_min_period and
310 * sync_max_offset. These are the values we directly write
311 * into the ESP registers while running a command. If offset
312 * is zero the ESP will use asynchronous transfers.
313 * If the borken flag is set we assume we shouldn't even bother
314 * trying to negotiate for synchronous transfer as this target
315 * is really stupid. If we notice the target is dropping the
316 * bus, and we have been allowing it to disconnect, we clear
317 * the disconnect flag.
318 */
319
320/* Manipulation of the ESP command queues. Thanks to the aha152x driver
321 * and its author, Juergen E. Fischer, for the methods used here.
322 * Note that these are per-ESP queues, not global queues like
323 * the aha152x driver uses.
324 */
325static inline void append_SC(Scsi_Cmnd **SC, Scsi_Cmnd *new_SC)
326{
327 Scsi_Cmnd *end;
328
329 new_SC->host_scribble = (unsigned char *) NULL;
330 if(!*SC)
331 *SC = new_SC;
332 else {
333 for(end=*SC;end->host_scribble;end=(Scsi_Cmnd *)end->host_scribble)
334 ;
335 end->host_scribble = (unsigned char *) new_SC;
336 }
337}
338
339static inline void prepend_SC(Scsi_Cmnd **SC, Scsi_Cmnd *new_SC)
340{
341 new_SC->host_scribble = (unsigned char *) *SC;
342 *SC = new_SC;
343}
344
345static inline Scsi_Cmnd *remove_first_SC(Scsi_Cmnd **SC)
346{
347 Scsi_Cmnd *ptr;
348
349 ptr = *SC;
350 if(ptr)
351 *SC = (Scsi_Cmnd *) (*SC)->host_scribble;
352 return ptr;
353}
354
355static inline Scsi_Cmnd *remove_SC(Scsi_Cmnd **SC, int target, int lun)
356{
357 Scsi_Cmnd *ptr, *prev;
358
359 for(ptr = *SC, prev = NULL;
360 ptr && ((ptr->device->id != target) || (ptr->device->lun != lun));
361 prev = ptr, ptr = (Scsi_Cmnd *) ptr->host_scribble)
362 ;
363 if(ptr) {
364 if(prev)
365 prev->host_scribble=ptr->host_scribble;
366 else
367 *SC=(Scsi_Cmnd *)ptr->host_scribble;
368 }
369 return ptr;
370}
371
372/* Resetting various pieces of the ESP scsi driver chipset */
373
374/* Reset the ESP chip, _not_ the SCSI bus. */
375static void esp_reset_esp(struct NCR_ESP *esp, struct ESP_regs *eregs)
376{
377 int family_code, version, i;
378 volatile int trash;
379
380 /* Now reset the ESP chip */
381 esp_cmd(esp, eregs, ESP_CMD_RC);
382 esp_cmd(esp, eregs, ESP_CMD_NULL | ESP_CMD_DMA);
383 if(esp->erev == fast)
384 esp_write(eregs->esp_cfg2, ESP_CONFIG2_FENAB);
385 esp_cmd(esp, eregs, ESP_CMD_NULL | ESP_CMD_DMA);
386
387 /* This is the only point at which it is reliable to read
388 * the ID-code for a fast ESP chip variant.
389 */
390 esp->max_period = ((35 * esp->ccycle) / 1000);
391 if(esp->erev == fast) {
392 char *erev2string[] = {
393 "Emulex FAS236",
394 "Emulex FPESP100A",
395 "fast",
396 "QLogic FAS366",
397 "Emulex FAS216",
398 "Symbios Logic 53CF9x-2",
399 "unknown!"
400 };
401
402 version = esp_read(eregs->esp_uid);
403 family_code = (version & 0xf8) >> 3;
404 if(family_code == 0x02) {
405 if ((version & 7) == 2)
406 esp->erev = fas216;
407 else
408 esp->erev = fas236;
409 } else if(family_code == 0x0a)
410 esp->erev = fas366; /* Version is usually '5'. */
411 else if(family_code == 0x00) {
412 if ((version & 7) == 2)
413 esp->erev = fas100a; /* NCR53C9X */
414 else
415 esp->erev = espunknown;
416 } else if(family_code == 0x14) {
417 if ((version & 7) == 2)
418 esp->erev = fsc;
419 else
420 esp->erev = espunknown;
421 } else if(family_code == 0x00) {
422 if ((version & 7) == 2)
423 esp->erev = fas100a; /* NCR53C9X */
424 else
425 esp->erev = espunknown;
426 } else
427 esp->erev = espunknown;
428 ESPLOG(("esp%d: FAST chip is %s (family=%d, version=%d)\n",
429 esp->esp_id, erev2string[esp->erev - fas236],
430 family_code, (version & 7)));
431
432 esp->min_period = ((4 * esp->ccycle) / 1000);
433 } else {
434 esp->min_period = ((5 * esp->ccycle) / 1000);
435 }
436
437 /* Reload the configuration registers */
438 esp_write(eregs->esp_cfact, esp->cfact);
439 esp->prev_stp = 0;
440 esp_write(eregs->esp_stp, 0);
441 esp->prev_soff = 0;
442 esp_write(eregs->esp_soff, 0);
443 esp_write(eregs->esp_timeo, esp->neg_defp);
444 esp->max_period = (esp->max_period + 3)>>2;
445 esp->min_period = (esp->min_period + 3)>>2;
446
447 esp_write(eregs->esp_cfg1, esp->config1);
448 switch(esp->erev) {
449 case esp100:
450 /* nothing to do */
451 break;
452 case esp100a:
453 esp_write(eregs->esp_cfg2, esp->config2);
454 break;
455 case esp236:
456 /* Slow 236 */
457 esp_write(eregs->esp_cfg2, esp->config2);
458 esp->prev_cfg3 = esp->config3[0];
459 esp_write(eregs->esp_cfg3, esp->prev_cfg3);
460 break;
461 case fas366:
462 panic("esp: FAS366 support not present, please notify "
463 "jongk@cs.utwente.nl");
464 break;
465 case fas216:
466 case fas236:
467 case fsc:
468 /* Fast ESP variants */
469 esp_write(eregs->esp_cfg2, esp->config2);
470 for(i=0; i<8; i++)
471 esp->config3[i] |= ESP_CONFIG3_FCLK;
472 esp->prev_cfg3 = esp->config3[0];
473 esp_write(eregs->esp_cfg3, esp->prev_cfg3);
474 if(esp->diff)
475 esp->radelay = 0;
476 else
477 esp->radelay = 16;
478 /* Different timeout constant for these chips */
479 esp->neg_defp =
480 FSC_NEG_DEFP(esp->cfreq,
481 (esp->cfact == ESP_CCF_F0 ?
482 ESP_CCF_F7 + 1 : esp->cfact));
483 esp_write(eregs->esp_timeo, esp->neg_defp);
484 /* Enable Active Negotiation if possible */
485 if((esp->erev == fsc) && !esp->diff)
486 esp_write(eregs->esp_cfg4, ESP_CONFIG4_EAN);
487 break;
488 case fas100a:
489 /* Fast 100a */
490 esp_write(eregs->esp_cfg2, esp->config2);
491 for(i=0; i<8; i++)
492 esp->config3[i] |= ESP_CONFIG3_FCLOCK;
493 esp->prev_cfg3 = esp->config3[0];
494 esp_write(eregs->esp_cfg3, esp->prev_cfg3);
495 esp->radelay = 32;
496 break;
497 default:
498 panic("esp: what could it be... I wonder...");
499 break;
500 };
501
502 /* Eat any bitrot in the chip */
503 trash = esp_read(eregs->esp_intrpt);
504 udelay(100);
505}
506
507/* This places the ESP into a known state at boot time. */
508void esp_bootup_reset(struct NCR_ESP *esp, struct ESP_regs *eregs)
509{
510 volatile unchar trash;
511
512 /* Reset the DMA */
513 if(esp->dma_reset)
514 esp->dma_reset(esp);
515
516 /* Reset the ESP */
517 esp_reset_esp(esp, eregs);
518
519 /* Reset the SCSI bus, but tell ESP not to generate an irq */
520 esp_write(eregs->esp_cfg1, (esp_read(eregs->esp_cfg1) | ESP_CONFIG1_SRRDISAB));
521 esp_cmd(esp, eregs, ESP_CMD_RS);
522 udelay(400);
523 esp_write(eregs->esp_cfg1, esp->config1);
524
525 /* Eat any bitrot in the chip and we are done... */
526 trash = esp_read(eregs->esp_intrpt);
527}
528
529/* Allocate structure and insert basic data such as SCSI chip frequency
530 * data and a pointer to the device
531 */
532struct NCR_ESP* esp_allocate(Scsi_Host_Template *tpnt, void *esp_dev)
533{
534 struct NCR_ESP *esp, *elink;
535 struct Scsi_Host *esp_host;
536
537 esp_host = scsi_register(tpnt, sizeof(struct NCR_ESP));
538 if(!esp_host)
539 panic("Cannot register ESP SCSI host");
540 esp = (struct NCR_ESP *) esp_host->hostdata;
541 if(!esp)
542 panic("No esp in hostdata");
543 esp->ehost = esp_host;
544 esp->edev = esp_dev;
545 esp->esp_id = nesps++;
546
547 /* Set bitshift value (only used on Amiga with multiple ESPs) */
548 esp->shift = 2;
549
550 /* Put into the chain of esp chips detected */
551 if(espchain) {
552 elink = espchain;
553 while(elink->next) elink = elink->next;
554 elink->next = esp;
555 } else {
556 espchain = esp;
557 }
558 esp->next = NULL;
559
560 return esp;
561}
562
563void esp_deallocate(struct NCR_ESP *esp)
564{
565 struct NCR_ESP *elink;
566
567 if(espchain == esp) {
568 espchain = NULL;
569 } else {
570 for(elink = espchain; elink && (elink->next != esp); elink = elink->next);
571 if(elink)
572 elink->next = esp->next;
573 }
574 nesps--;
575}
576
577/* Complete initialization of ESP structure and device
578 * Caller must have initialized appropriate parts of the ESP structure
579 * between the call to esp_allocate and this function.
580 */
581void esp_initialize(struct NCR_ESP *esp)
582{
583 struct ESP_regs *eregs = esp->eregs;
584 unsigned int fmhz;
585 unchar ccf;
586 int i;
587
588 /* Check out the clock properties of the chip. */
589
590 /* This is getting messy but it has to be done
591 * correctly or else you get weird behavior all
592 * over the place. We are trying to basically
593 * figure out three pieces of information.
594 *
595 * a) Clock Conversion Factor
596 *
597 * This is a representation of the input
598 * crystal clock frequency going into the
599 * ESP on this machine. Any operation whose
600 * timing is longer than 400ns depends on this
601 * value being correct. For example, you'll
602 * get blips for arbitration/selection during
603 * high load or with multiple targets if this
604 * is not set correctly.
605 *
606 * b) Selection Time-Out
607 *
608 * The ESP isn't very bright and will arbitrate
609 * for the bus and try to select a target
610 * forever if you let it. This value tells
611 * the ESP when it has taken too long to
612 * negotiate and that it should interrupt
613 * the CPU so we can see what happened.
614 * The value is computed as follows (from
615 * NCR/Symbios chip docs).
616 *
617 * (Time Out Period) * (Input Clock)
618 * STO = ----------------------------------
619 * (8192) * (Clock Conversion Factor)
620 *
621 * You usually want the time out period to be
622 * around 250ms, I think we'll set it a little
623 * bit higher to account for fully loaded SCSI
624 * bus's and slow devices that don't respond so
625 * quickly to selection attempts. (yeah, I know
626 * this is out of spec. but there is a lot of
627 * buggy pieces of firmware out there so bite me)
628 *
629 * c) Imperical constants for synchronous offset
630 * and transfer period register values
631 *
632 * This entails the smallest and largest sync
633 * period we could ever handle on this ESP.
634 */
635
636 fmhz = esp->cfreq;
637
638 if(fmhz <= (5000000))
639 ccf = 0;
640 else
641 ccf = (((5000000 - 1) + (fmhz))/(5000000));
642 if(!ccf || ccf > 8) {
643 /* If we can't find anything reasonable,
644 * just assume 20MHZ. This is the clock
645 * frequency of the older sun4c's where I've
646 * been unable to find the clock-frequency
647 * PROM property. All other machines provide
648 * useful values it seems.
649 */
650 ccf = ESP_CCF_F4;
651 fmhz = (20000000);
652 }
653 if(ccf==(ESP_CCF_F7+1))
654 esp->cfact = ESP_CCF_F0;
655 else if(ccf == ESP_CCF_NEVER)
656 esp->cfact = ESP_CCF_F2;
657 else
658 esp->cfact = ccf;
659 esp->cfreq = fmhz;
660 esp->ccycle = ESP_MHZ_TO_CYCLE(fmhz);
661 esp->ctick = ESP_TICK(ccf, esp->ccycle);
662 esp->neg_defp = ESP_NEG_DEFP(fmhz, ccf);
663 esp->sync_defp = SYNC_DEFP_SLOW;
664
665 printk("SCSI ID %d Clk %dMHz CCF=%d TOut %d ",
666 esp->scsi_id, (esp->cfreq / 1000000),
667 ccf, (int) esp->neg_defp);
668
669 /* Fill in ehost data */
670 esp->ehost->base = (unsigned long)eregs;
671 esp->ehost->this_id = esp->scsi_id;
672 esp->ehost->irq = esp->irq;
673
674 /* SCSI id mask */
675 esp->scsi_id_mask = (1 << esp->scsi_id);
676
677 /* Probe the revision of this esp */
678 esp->config1 = (ESP_CONFIG1_PENABLE | (esp->scsi_id & 7));
679 esp->config2 = (ESP_CONFIG2_SCSI2ENAB | ESP_CONFIG2_REGPARITY);
680 esp_write(eregs->esp_cfg2, esp->config2);
681 if((esp_read(eregs->esp_cfg2) & ~(ESP_CONFIG2_MAGIC)) !=
682 (ESP_CONFIG2_SCSI2ENAB | ESP_CONFIG2_REGPARITY)) {
683 printk("NCR53C90(esp100)\n");
684 esp->erev = esp100;
685 } else {
686 esp->config2 = 0;
687 esp_write(eregs->esp_cfg2, 0);
688 esp_write(eregs->esp_cfg3, 5);
689 if(esp_read(eregs->esp_cfg3) != 5) {
690 printk("NCR53C90A(esp100a)\n");
691 esp->erev = esp100a;
692 } else {
693 int target;
694
695 for(target=0; target<8; target++)
696 esp->config3[target] = 0;
697 esp->prev_cfg3 = 0;
698 esp_write(eregs->esp_cfg3, 0);
699 if(ccf > ESP_CCF_F5) {
700 printk("NCR53C9XF(espfast)\n");
701 esp->erev = fast;
702 esp->sync_defp = SYNC_DEFP_FAST;
703 } else {
704 printk("NCR53C9x(esp236)\n");
705 esp->erev = esp236;
706 }
707 }
708 }
709
710 /* Initialize the command queues */
711 esp->current_SC = NULL;
712 esp->disconnected_SC = NULL;
713 esp->issue_SC = NULL;
714
715 /* Clear the state machines. */
716 esp->targets_present = 0;
717 esp->resetting_bus = 0;
718 esp->snip = 0;
719
720 init_waitqueue_head(&esp->reset_queue);
721
722 esp->fas_premature_intr_workaround = 0;
723 for(i = 0; i < 32; i++)
724 esp->espcmdlog[i] = 0;
725 esp->espcmdent = 0;
726 for(i = 0; i < 16; i++) {
727 esp->cur_msgout[i] = 0;
728 esp->cur_msgin[i] = 0;
729 }
730 esp->prevmsgout = esp->prevmsgin = 0;
731 esp->msgout_len = esp->msgin_len = 0;
732
733 /* Clear the one behind caches to hold unmatchable values. */
734 esp->prev_soff = esp->prev_stp = esp->prev_cfg3 = 0xff;
735
736 /* Reset the thing before we try anything... */
737 esp_bootup_reset(esp, eregs);
738
739 esps_in_use++;
740}
741
742/* The info function will return whatever useful
743 * information the developer sees fit. If not provided, then
744 * the name field will be used instead.
745 */
746const char *esp_info(struct Scsi_Host *host)
747{
748 struct NCR_ESP *esp;
749
750 esp = (struct NCR_ESP *) host->hostdata;
751 switch(esp->erev) {
752 case esp100:
753 return "ESP100 (NCR53C90)";
754 case esp100a:
755 return "ESP100A (NCR53C90A)";
756 case esp236:
757 return "ESP236 (NCR53C9x)";
758 case fas216:
759 return "Emulex FAS216";
760 case fas236:
761 return "Emulex FAS236";
762 case fas366:
763 return "QLogic FAS366";
764 case fas100a:
765 return "FPESP100A";
766 case fsc:
767 return "Symbios Logic 53CF9x-2";
768 default:
769 panic("Bogon ESP revision");
770 };
771}
772
773/* From Wolfgang Stanglmeier's NCR scsi driver. */
774struct info_str
775{
776 char *buffer;
777 int length;
778 int offset;
779 int pos;
780};
781
782static void copy_mem_info(struct info_str *info, char *data, int len)
783{
784 if (info->pos + len > info->length)
785 len = info->length - info->pos;
786
787 if (info->pos + len < info->offset) {
788 info->pos += len;
789 return;
790 }
791 if (info->pos < info->offset) {
792 data += (info->offset - info->pos);
793 len -= (info->offset - info->pos);
794 }
795
796 if (len > 0) {
797 memcpy(info->buffer + info->pos, data, len);
798 info->pos += len;
799 }
800}
801
802static int copy_info(struct info_str *info, char *fmt, ...)
803{
804 va_list args;
805 char buf[81];
806 int len;
807
808 va_start(args, fmt);
809 len = vsprintf(buf, fmt, args);
810 va_end(args);
811
812 copy_mem_info(info, buf, len);
813 return len;
814}
815
816static int esp_host_info(struct NCR_ESP *esp, char *ptr, off_t offset, int len)
817{
818 struct scsi_device *sdev;
819 struct info_str info;
820 int i;
821
822 info.buffer = ptr;
823 info.length = len;
824 info.offset = offset;
825 info.pos = 0;
826
827 copy_info(&info, "ESP Host Adapter:\n");
828 copy_info(&info, "\tESP Model\t\t");
829 switch(esp->erev) {
830 case esp100:
831 copy_info(&info, "ESP100 (NCR53C90)\n");
832 break;
833 case esp100a:
834 copy_info(&info, "ESP100A (NCR53C90A)\n");
835 break;
836 case esp236:
837 copy_info(&info, "ESP236 (NCR53C9x)\n");
838 break;
839 case fas216:
840 copy_info(&info, "Emulex FAS216\n");
841 break;
842 case fas236:
843 copy_info(&info, "Emulex FAS236\n");
844 break;
845 case fas100a:
846 copy_info(&info, "FPESP100A\n");
847 break;
848 case fast:
849 copy_info(&info, "Generic FAST\n");
850 break;
851 case fas366:
852 copy_info(&info, "QLogic FAS366\n");
853 break;
854 case fsc:
855 copy_info(&info, "Symbios Logic 53C9x-2\n");
856 break;
857 case espunknown:
858 default:
859 copy_info(&info, "Unknown!\n");
860 break;
861 };
862 copy_info(&info, "\tLive Targets\t\t[ ");
863 for(i = 0; i < 15; i++) {
864 if(esp->targets_present & (1 << i))
865 copy_info(&info, "%d ", i);
866 }
867 copy_info(&info, "]\n\n");
868
869 /* Now describe the state of each existing target. */
870 copy_info(&info, "Target #\tconfig3\t\tSync Capabilities\tDisconnect\n");
871
872 shost_for_each_device(sdev, esp->ehost) {
873 struct esp_device *esp_dev = sdev->hostdata;
874 uint id = sdev->id;
875
876 if (!(esp->targets_present & (1 << id)))
877 continue;
878
879 copy_info(&info, "%d\t\t", id);
880 copy_info(&info, "%08lx\t", esp->config3[id]);
881 copy_info(&info, "[%02lx,%02lx]\t\t\t",
882 esp_dev->sync_max_offset,
883 esp_dev->sync_min_period);
884 copy_info(&info, "%s\n", esp_dev->disconnect ? "yes" : "no");
885 }
886
887 return info.pos > info.offset? info.pos - info.offset : 0;
888}
889
890/* ESP proc filesystem code. */
891int esp_proc_info(struct Scsi_Host *shost, char *buffer, char **start, off_t offset, int length,
892 int inout)
893{
894 struct NCR_ESP *esp = (struct NCR_ESP *)shost->hostdata;
895
896 if(inout)
897 return -EINVAL; /* not yet */
898 if(start)
899 *start = buffer;
900 return esp_host_info(esp, buffer, offset, length);
901}
902
903static void esp_get_dmabufs(struct NCR_ESP *esp, Scsi_Cmnd *sp)
904{
905 if(sp->use_sg == 0) {
906 sp->SCp.this_residual = sp->request_bufflen;
907 sp->SCp.buffer = (struct scatterlist *) sp->request_buffer;
908 sp->SCp.buffers_residual = 0;
909 if (esp->dma_mmu_get_scsi_one)
910 esp->dma_mmu_get_scsi_one(esp, sp);
911 else
912 sp->SCp.ptr =
913 (char *) virt_to_phys(sp->request_buffer);
914 } else {
915 sp->SCp.buffer = (struct scatterlist *) sp->buffer;
916 sp->SCp.buffers_residual = sp->use_sg - 1;
917 sp->SCp.this_residual = sp->SCp.buffer->length;
918 if (esp->dma_mmu_get_scsi_sgl)
919 esp->dma_mmu_get_scsi_sgl(esp, sp);
920 else
921 sp->SCp.ptr =
922 (char *) virt_to_phys((page_address(sp->SCp.buffer->page) + sp->SCp.buffer->offset));
923 }
924}
925
926static void esp_release_dmabufs(struct NCR_ESP *esp, Scsi_Cmnd *sp)
927{
928 if(sp->use_sg == 0) {
929 if (esp->dma_mmu_release_scsi_one)
930 esp->dma_mmu_release_scsi_one(esp, sp);
931 } else {
932 if (esp->dma_mmu_release_scsi_sgl)
933 esp->dma_mmu_release_scsi_sgl(esp, sp);
934 }
935}
936
937static void esp_restore_pointers(struct NCR_ESP *esp, Scsi_Cmnd *sp)
938{
939 struct esp_pointers *ep = &esp->data_pointers[sp->device->id];
940
941 sp->SCp.ptr = ep->saved_ptr;
942 sp->SCp.buffer = ep->saved_buffer;
943 sp->SCp.this_residual = ep->saved_this_residual;
944 sp->SCp.buffers_residual = ep->saved_buffers_residual;
945}
946
947static void esp_save_pointers(struct NCR_ESP *esp, Scsi_Cmnd *sp)
948{
949 struct esp_pointers *ep = &esp->data_pointers[sp->device->id];
950
951 ep->saved_ptr = sp->SCp.ptr;
952 ep->saved_buffer = sp->SCp.buffer;
953 ep->saved_this_residual = sp->SCp.this_residual;
954 ep->saved_buffers_residual = sp->SCp.buffers_residual;
955}
956
957/* Some rules:
958 *
959 * 1) Never ever panic while something is live on the bus.
960 * If there is to be any chance of syncing the disks this
961 * rule is to be obeyed.
962 *
963 * 2) Any target that causes a foul condition will no longer
964 * have synchronous transfers done to it, no questions
965 * asked.
966 *
967 * 3) Keep register accesses to a minimum. Think about some
968 * day when we have Xbus machines this is running on and
969 * the ESP chip is on the other end of the machine on a
970 * different board from the cpu where this is running.
971 */
972
973/* Fire off a command. We assume the bus is free and that the only
974 * case where we could see an interrupt is where we have disconnected
975 * commands active and they are trying to reselect us.
976 */
977static inline void esp_check_cmd(struct NCR_ESP *esp, Scsi_Cmnd *sp)
978{
979 switch(sp->cmd_len) {
980 case 6:
981 case 10:
982 case 12:
983 esp->esp_slowcmd = 0;
984 break;
985
986 default:
987 esp->esp_slowcmd = 1;
988 esp->esp_scmdleft = sp->cmd_len;
989 esp->esp_scmdp = &sp->cmnd[0];
990 break;
991 };
992}
993
994static inline void build_sync_nego_msg(struct NCR_ESP *esp, int period, int offset)
995{
996 esp->cur_msgout[0] = EXTENDED_MESSAGE;
997 esp->cur_msgout[1] = 3;
998 esp->cur_msgout[2] = EXTENDED_SDTR;
999 esp->cur_msgout[3] = period;
1000 esp->cur_msgout[4] = offset;
1001 esp->msgout_len = 5;
1002}
1003
1004static void esp_exec_cmd(struct NCR_ESP *esp)
1005{
1006 struct ESP_regs *eregs = esp->eregs;
1007 struct esp_device *esp_dev;
1008 Scsi_Cmnd *SCptr;
1009 Scsi_Device *SDptr;
1010 volatile unchar *cmdp = esp->esp_command;
1011 unsigned char the_esp_command;
1012 int lun, target;
1013 int i;
1014
1015 /* Hold off if we have disconnected commands and
1016 * an IRQ is showing...
1017 */
1018 if(esp->disconnected_SC && esp->dma_irq_p(esp))
1019 return;
1020
1021 /* Grab first member of the issue queue. */
1022 SCptr = esp->current_SC = remove_first_SC(&esp->issue_SC);
1023
1024 /* Safe to panic here because current_SC is null. */
1025 if(!SCptr)
1026 panic("esp: esp_exec_cmd and issue queue is NULL");
1027
1028 SDptr = SCptr->device;
1029 esp_dev = SDptr->hostdata;
1030 lun = SCptr->device->lun;
1031 target = SCptr->device->id;
1032
1033 esp->snip = 0;
1034 esp->msgout_len = 0;
1035
1036 /* Send it out whole, or piece by piece? The ESP
1037 * only knows how to automatically send out 6, 10,
1038 * and 12 byte commands. I used to think that the
1039 * Linux SCSI code would never throw anything other
1040 * than that to us, but then again there is the
1041 * SCSI generic driver which can send us anything.
1042 */
1043 esp_check_cmd(esp, SCptr);
1044
1045 /* If arbitration/selection is successful, the ESP will leave
1046 * ATN asserted, causing the target to go into message out
1047 * phase. The ESP will feed the target the identify and then
1048 * the target can only legally go to one of command,
1049 * datain/out, status, or message in phase, or stay in message
1050 * out phase (should we be trying to send a sync negotiation
1051 * message after the identify). It is not allowed to drop
1052 * BSY, but some buggy targets do and we check for this
1053 * condition in the selection complete code. Most of the time
1054 * we'll make the command bytes available to the ESP and it
1055 * will not interrupt us until it finishes command phase, we
1056 * cannot do this for command sizes the ESP does not
1057 * understand and in this case we'll get interrupted right
1058 * when the target goes into command phase.
1059 *
1060 * It is absolutely _illegal_ in the presence of SCSI-2 devices
1061 * to use the ESP select w/o ATN command. When SCSI-2 devices are
1062 * present on the bus we _must_ always go straight to message out
1063 * phase with an identify message for the target. Being that
1064 * selection attempts in SCSI-1 w/o ATN was an option, doing SCSI-2
1065 * selections should not confuse SCSI-1 we hope.
1066 */
1067
1068 if(esp_dev->sync) {
1069 /* this targets sync is known */
1070#ifdef CONFIG_SCSI_MAC_ESP
1071do_sync_known:
1072#endif
1073 if(esp_dev->disconnect)
1074 *cmdp++ = IDENTIFY(1, lun);
1075 else
1076 *cmdp++ = IDENTIFY(0, lun);
1077
1078 if(esp->esp_slowcmd) {
1079 the_esp_command = (ESP_CMD_SELAS | ESP_CMD_DMA);
1080 esp_advance_phase(SCptr, in_slct_stop);
1081 } else {
1082 the_esp_command = (ESP_CMD_SELA | ESP_CMD_DMA);
1083 esp_advance_phase(SCptr, in_slct_norm);
1084 }
1085 } else if(!(esp->targets_present & (1<<target)) || !(esp_dev->disconnect)) {
1086 /* After the bootup SCSI code sends both the
1087 * TEST_UNIT_READY and INQUIRY commands we want
1088 * to at least attempt allowing the device to
1089 * disconnect.
1090 */
1091 ESPMISC(("esp: Selecting device for first time. target=%d "
1092 "lun=%d\n", target, SCptr->device->lun));
1093 if(!SDptr->borken && !esp_dev->disconnect)
1094 esp_dev->disconnect = 1;
1095
1096 *cmdp++ = IDENTIFY(0, lun);
1097 esp->prevmsgout = NOP;
1098 esp_advance_phase(SCptr, in_slct_norm);
1099 the_esp_command = (ESP_CMD_SELA | ESP_CMD_DMA);
1100
1101 /* Take no chances... */
1102 esp_dev->sync_max_offset = 0;
1103 esp_dev->sync_min_period = 0;
1104 } else {
1105 int toshiba_cdrom_hwbug_wkaround = 0;
1106
1107#ifdef CONFIG_SCSI_MAC_ESP
1108 /* Never allow synchronous transfers (disconnect OK) on
1109 * Macintosh. Well, maybe later when we figured out how to
1110 * do DMA on the machines that support it ...
1111 */
1112 esp_dev->disconnect = 1;
1113 esp_dev->sync_max_offset = 0;
1114 esp_dev->sync_min_period = 0;
1115 esp_dev->sync = 1;
1116 esp->snip = 0;
1117 goto do_sync_known;
1118#endif
1119 /* We've talked to this guy before,
1120 * but never negotiated. Let's try
1121 * sync negotiation.
1122 */
1123 if(!SDptr->borken) {
1124 if((SDptr->type == TYPE_ROM) &&
1125 (!strncmp(SDptr->vendor, "TOSHIBA", 7))) {
1126 /* Nice try sucker... */
1127 ESPMISC(("esp%d: Disabling sync for buggy "
1128 "Toshiba CDROM.\n", esp->esp_id));
1129 toshiba_cdrom_hwbug_wkaround = 1;
1130 build_sync_nego_msg(esp, 0, 0);
1131 } else {
1132 build_sync_nego_msg(esp, esp->sync_defp, 15);
1133 }
1134 } else {
1135 build_sync_nego_msg(esp, 0, 0);
1136 }
1137 esp_dev->sync = 1;
1138 esp->snip = 1;
1139
1140 /* A fix for broken SCSI1 targets, when they disconnect
1141 * they lock up the bus and confuse ESP. So disallow
1142 * disconnects for SCSI1 targets for now until we
1143 * find a better fix.
1144 *
1145 * Addendum: This is funny, I figured out what was going
1146 * on. The blotzed SCSI1 target would disconnect,
1147 * one of the other SCSI2 targets or both would be
1148 * disconnected as well. The SCSI1 target would
1149 * stay disconnected long enough that we start
1150 * up a command on one of the SCSI2 targets. As
1151 * the ESP is arbitrating for the bus the SCSI1
1152 * target begins to arbitrate as well to reselect
1153 * the ESP. The SCSI1 target refuses to drop it's
1154 * ID bit on the data bus even though the ESP is
1155 * at ID 7 and is the obvious winner for any
1156 * arbitration. The ESP is a poor sport and refuses
1157 * to lose arbitration, it will continue indefinitely
1158 * trying to arbitrate for the bus and can only be
1159 * stopped via a chip reset or SCSI bus reset.
1160 * Therefore _no_ disconnects for SCSI1 targets
1161 * thank you very much. ;-)
1162 */
1163 if(((SDptr->scsi_level < 3) && (SDptr->type != TYPE_TAPE)) ||
1164 toshiba_cdrom_hwbug_wkaround || SDptr->borken) {
1165 ESPMISC((KERN_INFO "esp%d: Disabling DISCONNECT for target %d "
1166 "lun %d\n", esp->esp_id, SCptr->device->id, SCptr->device->lun));
1167 esp_dev->disconnect = 0;
1168 *cmdp++ = IDENTIFY(0, lun);
1169 } else {
1170 *cmdp++ = IDENTIFY(1, lun);
1171 }
1172
1173 /* ESP fifo is only so big...
1174 * Make this look like a slow command.
1175 */
1176 esp->esp_slowcmd = 1;
1177 esp->esp_scmdleft = SCptr->cmd_len;
1178 esp->esp_scmdp = &SCptr->cmnd[0];
1179
1180 the_esp_command = (ESP_CMD_SELAS | ESP_CMD_DMA);
1181 esp_advance_phase(SCptr, in_slct_msg);
1182 }
1183
1184 if(!esp->esp_slowcmd)
1185 for(i = 0; i < SCptr->cmd_len; i++)
1186 *cmdp++ = SCptr->cmnd[i];
1187
1188 esp_write(eregs->esp_busid, (target & 7));
1189 if (esp->prev_soff != esp_dev->sync_max_offset ||
1190 esp->prev_stp != esp_dev->sync_min_period ||
1191 (esp->erev > esp100a &&
1192 esp->prev_cfg3 != esp->config3[target])) {
1193 esp->prev_soff = esp_dev->sync_max_offset;
1194 esp_write(eregs->esp_soff, esp->prev_soff);
1195 esp->prev_stp = esp_dev->sync_min_period;
1196 esp_write(eregs->esp_stp, esp->prev_stp);
1197 if(esp->erev > esp100a) {
1198 esp->prev_cfg3 = esp->config3[target];
1199 esp_write(eregs->esp_cfg3, esp->prev_cfg3);
1200 }
1201 }
1202 i = (cmdp - esp->esp_command);
1203
1204 /* Set up the DMA and ESP counters */
1205 if(esp->do_pio_cmds){
1206 int j = 0;
1207
1208 /*
1209 * XXX MSch:
1210 *
1211 * It seems this is required, at least to clean up
1212 * after failed commands when using PIO mode ...
1213 */
1214 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
1215
1216 for(;j<i;j++)
1217 esp_write(eregs->esp_fdata, esp->esp_command[j]);
1218 the_esp_command &= ~ESP_CMD_DMA;
1219
1220 /* Tell ESP to "go". */
1221 esp_cmd(esp, eregs, the_esp_command);
1222 } else {
1223 /* Set up the ESP counters */
1224 esp_write(eregs->esp_tclow, i);
1225 esp_write(eregs->esp_tcmed, 0);
1226 esp->dma_init_write(esp, esp->esp_command_dvma, i);
1227
1228 /* Tell ESP to "go". */
1229 esp_cmd(esp, eregs, the_esp_command);
1230 }
1231}
1232
1233/* Queue a SCSI command delivered from the mid-level Linux SCSI code. */
1234int esp_queue(Scsi_Cmnd *SCpnt, void (*done)(Scsi_Cmnd *))
1235{
1236 struct NCR_ESP *esp;
1237
1238 /* Set up func ptr and initial driver cmd-phase. */
1239 SCpnt->scsi_done = done;
1240 SCpnt->SCp.phase = not_issued;
1241
1242 esp = (struct NCR_ESP *) SCpnt->device->host->hostdata;
1243
1244 if(esp->dma_led_on)
1245 esp->dma_led_on(esp);
1246
1247 /* We use the scratch area. */
1248 ESPQUEUE(("esp_queue: target=%d lun=%d ", SCpnt->device->id, SCpnt->lun));
1249 ESPDISC(("N<%02x,%02x>", SCpnt->device->id, SCpnt->lun));
1250
1251 esp_get_dmabufs(esp, SCpnt);
1252 esp_save_pointers(esp, SCpnt); /* FIXME for tag queueing */
1253
1254 SCpnt->SCp.Status = CHECK_CONDITION;
1255 SCpnt->SCp.Message = 0xff;
1256 SCpnt->SCp.sent_command = 0;
1257
1258 /* Place into our queue. */
1259 if(SCpnt->cmnd[0] == REQUEST_SENSE) {
1260 ESPQUEUE(("RQSENSE\n"));
1261 prepend_SC(&esp->issue_SC, SCpnt);
1262 } else {
1263 ESPQUEUE(("\n"));
1264 append_SC(&esp->issue_SC, SCpnt);
1265 }
1266
1267 /* Run it now if we can. */
1268 if(!esp->current_SC && !esp->resetting_bus)
1269 esp_exec_cmd(esp);
1270
1271 return 0;
1272}
1273
1274/* Dump driver state. */
1275static void esp_dump_cmd(Scsi_Cmnd *SCptr)
1276{
1277 ESPLOG(("[tgt<%02x> lun<%02x> "
1278 "pphase<%s> cphase<%s>]",
1279 SCptr->device->id, SCptr->device->lun,
1280 phase_string(SCptr->SCp.sent_command),
1281 phase_string(SCptr->SCp.phase)));
1282}
1283
1284static void esp_dump_state(struct NCR_ESP *esp,
1285 struct ESP_regs *eregs)
1286{
1287 Scsi_Cmnd *SCptr = esp->current_SC;
1288#ifdef DEBUG_ESP_CMDS
1289 int i;
1290#endif
1291
1292 ESPLOG(("esp%d: dumping state\n", esp->esp_id));
1293
1294 /* Print DMA status */
1295 esp->dma_dump_state(esp);
1296
1297 ESPLOG(("esp%d: SW [sreg<%02x> sstep<%02x> ireg<%02x>]\n",
1298 esp->esp_id, esp->sreg, esp->seqreg, esp->ireg));
1299 ESPLOG(("esp%d: HW reread [sreg<%02x> sstep<%02x> ireg<%02x>]\n",
1300 esp->esp_id, esp_read(eregs->esp_status), esp_read(eregs->esp_sstep),
1301 esp_read(eregs->esp_intrpt)));
1302#ifdef DEBUG_ESP_CMDS
1303 printk("esp%d: last ESP cmds [", esp->esp_id);
1304 i = (esp->espcmdent - 1) & 31;
1305 printk("<");
1306 esp_print_cmd(esp->espcmdlog[i]);
1307 printk(">");
1308 i = (i - 1) & 31;
1309 printk("<");
1310 esp_print_cmd(esp->espcmdlog[i]);
1311 printk(">");
1312 i = (i - 1) & 31;
1313 printk("<");
1314 esp_print_cmd(esp->espcmdlog[i]);
1315 printk(">");
1316 i = (i - 1) & 31;
1317 printk("<");
1318 esp_print_cmd(esp->espcmdlog[i]);
1319 printk(">");
1320 printk("]\n");
1321#endif /* (DEBUG_ESP_CMDS) */
1322
1323 if(SCptr) {
1324 ESPLOG(("esp%d: current command ", esp->esp_id));
1325 esp_dump_cmd(SCptr);
1326 }
1327 ESPLOG(("\n"));
1328 SCptr = esp->disconnected_SC;
1329 ESPLOG(("esp%d: disconnected ", esp->esp_id));
1330 while(SCptr) {
1331 esp_dump_cmd(SCptr);
1332 SCptr = (Scsi_Cmnd *) SCptr->host_scribble;
1333 }
1334 ESPLOG(("\n"));
1335}
1336
1337/* Abort a command. The host_lock is acquired by caller. */
1338int esp_abort(Scsi_Cmnd *SCptr)
1339{
1340 struct NCR_ESP *esp = (struct NCR_ESP *) SCptr->device->host->hostdata;
1341 struct ESP_regs *eregs = esp->eregs;
1342 int don;
1343
1344 ESPLOG(("esp%d: Aborting command\n", esp->esp_id));
1345 esp_dump_state(esp, eregs);
1346
1347 /* Wheee, if this is the current command on the bus, the
1348 * best we can do is assert ATN and wait for msgout phase.
1349 * This should even fix a hung SCSI bus when we lose state
1350 * in the driver and timeout because the eventual phase change
1351 * will cause the ESP to (eventually) give an interrupt.
1352 */
1353 if(esp->current_SC == SCptr) {
1354 esp->cur_msgout[0] = ABORT;
1355 esp->msgout_len = 1;
1356 esp->msgout_ctr = 0;
1357 esp_cmd(esp, eregs, ESP_CMD_SATN);
1358 return SUCCESS;
1359 }
1360
1361 /* If it is still in the issue queue then we can safely
1362 * call the completion routine and report abort success.
1363 */
1364 don = esp->dma_ports_p(esp);
1365 if(don) {
1366 esp->dma_ints_off(esp);
1367 synchronize_irq(esp->irq);
1368 }
1369 if(esp->issue_SC) {
1370 Scsi_Cmnd **prev, *this;
1371 for(prev = (&esp->issue_SC), this = esp->issue_SC;
1372 this;
1373 prev = (Scsi_Cmnd **) &(this->host_scribble),
1374 this = (Scsi_Cmnd *) this->host_scribble) {
1375 if(this == SCptr) {
1376 *prev = (Scsi_Cmnd *) this->host_scribble;
1377 this->host_scribble = NULL;
1378 esp_release_dmabufs(esp, this);
1379 this->result = DID_ABORT << 16;
1380 this->done(this);
1381 if(don)
1382 esp->dma_ints_on(esp);
1383 return SUCCESS;
1384 }
1385 }
1386 }
1387
1388 /* Yuck, the command to abort is disconnected, it is not
1389 * worth trying to abort it now if something else is live
1390 * on the bus at this time. So, we let the SCSI code wait
1391 * a little bit and try again later.
1392 */
1393 if(esp->current_SC) {
1394 if(don)
1395 esp->dma_ints_on(esp);
1396 return FAILED;
1397 }
1398
1399 /* It's disconnected, we have to reconnect to re-establish
1400 * the nexus and tell the device to abort. However, we really
1401 * cannot 'reconnect' per se. Don't try to be fancy, just
1402 * indicate failure, which causes our caller to reset the whole
1403 * bus.
1404 */
1405
1406 if(don)
1407 esp->dma_ints_on(esp);
1408 return FAILED;
1409}
1410
1411/* We've sent ESP_CMD_RS to the ESP, the interrupt had just
1412 * arrived indicating the end of the SCSI bus reset. Our job
1413 * is to clean out the command queues and begin re-execution
1414 * of SCSI commands once more.
1415 */
1416static int esp_finish_reset(struct NCR_ESP *esp,
1417 struct ESP_regs *eregs)
1418{
1419 Scsi_Cmnd *sp = esp->current_SC;
1420
1421 /* Clean up currently executing command, if any. */
1422 if (sp != NULL) {
1423 esp_release_dmabufs(esp, sp);
1424 sp->result = (DID_RESET << 16);
1425 sp->scsi_done(sp);
1426 esp->current_SC = NULL;
1427 }
1428
1429 /* Clean up disconnected queue, they have been invalidated
1430 * by the bus reset.
1431 */
1432 if (esp->disconnected_SC) {
1433 while((sp = remove_first_SC(&esp->disconnected_SC)) != NULL) {
1434 esp_release_dmabufs(esp, sp);
1435 sp->result = (DID_RESET << 16);
1436 sp->scsi_done(sp);
1437 }
1438 }
1439
1440 /* SCSI bus reset is complete. */
1441 esp->resetting_bus = 0;
1442 wake_up(&esp->reset_queue);
1443
1444 /* Ok, now it is safe to get commands going once more. */
1445 if(esp->issue_SC)
1446 esp_exec_cmd(esp);
1447
1448 return do_intr_end;
1449}
1450
1451static int esp_do_resetbus(struct NCR_ESP *esp,
1452 struct ESP_regs *eregs)
1453{
1454 ESPLOG(("esp%d: Resetting scsi bus\n", esp->esp_id));
1455 esp->resetting_bus = 1;
1456 esp_cmd(esp, eregs, ESP_CMD_RS);
1457
1458 return do_intr_end;
1459}
1460
1461/* Reset ESP chip, reset hanging bus, then kill active and
1462 * disconnected commands for targets without soft reset.
1463 *
1464 * The host_lock is acquired by caller.
1465 */
1466int esp_reset(Scsi_Cmnd *SCptr)
1467{
1468 struct NCR_ESP *esp = (struct NCR_ESP *) SCptr->device->host->hostdata;
1469
1470 (void) esp_do_resetbus(esp, esp->eregs);
1471
1472 spin_unlock_irq(esp->ehost->host_lock);
1473
1474 wait_event(esp->reset_queue, (esp->resetting_bus == 0));
1475
1476 spin_lock_irq(esp->ehost->host_lock);
1477
1478 return SUCCESS;
1479}
1480
1481/* Internal ESP done function. */
1482static void esp_done(struct NCR_ESP *esp, int error)
1483{
1484 Scsi_Cmnd *done_SC;
1485
1486 if(esp->current_SC) {
1487 done_SC = esp->current_SC;
1488 esp->current_SC = NULL;
1489 esp_release_dmabufs(esp, done_SC);
1490 done_SC->result = error;
1491 done_SC->scsi_done(done_SC);
1492
1493 /* Bus is free, issue any commands in the queue. */
1494 if(esp->issue_SC && !esp->current_SC)
1495 esp_exec_cmd(esp);
1496 } else {
1497 /* Panic is safe as current_SC is null so we may still
1498 * be able to accept more commands to sync disk buffers.
1499 */
1500 ESPLOG(("panicing\n"));
1501 panic("esp: done() called with NULL esp->current_SC");
1502 }
1503}
1504
1505/* Wheee, ESP interrupt engine. */
1506
1507/* Forward declarations. */
1508static int esp_do_phase_determine(struct NCR_ESP *esp,
1509 struct ESP_regs *eregs);
1510static int esp_do_data_finale(struct NCR_ESP *esp, struct ESP_regs *eregs);
1511static int esp_select_complete(struct NCR_ESP *esp, struct ESP_regs *eregs);
1512static int esp_do_status(struct NCR_ESP *esp, struct ESP_regs *eregs);
1513static int esp_do_msgin(struct NCR_ESP *esp, struct ESP_regs *eregs);
1514static int esp_do_msgindone(struct NCR_ESP *esp, struct ESP_regs *eregs);
1515static int esp_do_msgout(struct NCR_ESP *esp, struct ESP_regs *eregs);
1516static int esp_do_cmdbegin(struct NCR_ESP *esp, struct ESP_regs *eregs);
1517
1518#define sreg_datainp(__sreg) (((__sreg) & ESP_STAT_PMASK) == ESP_DIP)
1519#define sreg_dataoutp(__sreg) (((__sreg) & ESP_STAT_PMASK) == ESP_DOP)
1520
1521/* We try to avoid some interrupts by jumping ahead and see if the ESP
1522 * has gotten far enough yet. Hence the following.
1523 */
1524static inline int skipahead1(struct NCR_ESP *esp, struct ESP_regs *eregs,
1525 Scsi_Cmnd *scp, int prev_phase, int new_phase)
1526{
1527 if(scp->SCp.sent_command != prev_phase)
1528 return 0;
1529
1530 if(esp->dma_irq_p(esp)) {
1531 /* Yes, we are able to save an interrupt. */
1532 esp->sreg = (esp_read(eregs->esp_status) & ~(ESP_STAT_INTR));
1533 esp->ireg = esp_read(eregs->esp_intrpt);
1534 if(!(esp->ireg & ESP_INTR_SR))
1535 return 0;
1536 else
1537 return do_reset_complete;
1538 }
1539 /* Ho hum, target is taking forever... */
1540 scp->SCp.sent_command = new_phase; /* so we don't recurse... */
1541 return do_intr_end;
1542}
1543
1544static inline int skipahead2(struct NCR_ESP *esp,
1545 struct ESP_regs *eregs,
1546 Scsi_Cmnd *scp, int prev_phase1, int prev_phase2,
1547 int new_phase)
1548{
1549 if(scp->SCp.sent_command != prev_phase1 &&
1550 scp->SCp.sent_command != prev_phase2)
1551 return 0;
1552 if(esp->dma_irq_p(esp)) {
1553 /* Yes, we are able to save an interrupt. */
1554 esp->sreg = (esp_read(eregs->esp_status) & ~(ESP_STAT_INTR));
1555 esp->ireg = esp_read(eregs->esp_intrpt);
1556 if(!(esp->ireg & ESP_INTR_SR))
1557 return 0;
1558 else
1559 return do_reset_complete;
1560 }
1561 /* Ho hum, target is taking forever... */
1562 scp->SCp.sent_command = new_phase; /* so we don't recurse... */
1563 return do_intr_end;
1564}
1565
1566/* Misc. esp helper macros. */
1567#define esp_setcount(__eregs, __cnt) \
1568 esp_write((__eregs)->esp_tclow, ((__cnt) & 0xff)); \
1569 esp_write((__eregs)->esp_tcmed, (((__cnt) >> 8) & 0xff))
1570
1571#define esp_getcount(__eregs) \
1572 ((esp_read((__eregs)->esp_tclow)&0xff) | \
1573 ((esp_read((__eregs)->esp_tcmed)&0xff) << 8))
1574
1575#define fcount(__esp, __eregs) \
1576 (esp_read((__eregs)->esp_fflags) & ESP_FF_FBYTES)
1577
1578#define fnzero(__esp, __eregs) \
1579 (esp_read((__eregs)->esp_fflags) & ESP_FF_ONOTZERO)
1580
1581/* XXX speculative nops unnecessary when continuing amidst a data phase
1582 * XXX even on esp100!!! another case of flooding the bus with I/O reg
1583 * XXX writes...
1584 */
1585#define esp_maybe_nop(__esp, __eregs) \
1586 if((__esp)->erev == esp100) \
1587 esp_cmd((__esp), (__eregs), ESP_CMD_NULL)
1588
1589#define sreg_to_dataphase(__sreg) \
1590 ((((__sreg) & ESP_STAT_PMASK) == ESP_DOP) ? in_dataout : in_datain)
1591
1592/* The ESP100 when in synchronous data phase, can mistake a long final
1593 * REQ pulse from the target as an extra byte, it places whatever is on
1594 * the data lines into the fifo. For now, we will assume when this
1595 * happens that the target is a bit quirky and we don't want to
1596 * be talking synchronously to it anyways. Regardless, we need to
1597 * tell the ESP to eat the extraneous byte so that we can proceed
1598 * to the next phase.
1599 */
1600static inline int esp100_sync_hwbug(struct NCR_ESP *esp, struct ESP_regs *eregs,
1601 Scsi_Cmnd *sp, int fifocnt)
1602{
1603 /* Do not touch this piece of code. */
1604 if((!(esp->erev == esp100)) ||
1605 (!(sreg_datainp((esp->sreg = esp_read(eregs->esp_status))) && !fifocnt) &&
1606 !(sreg_dataoutp(esp->sreg) && !fnzero(esp, eregs)))) {
1607 if(sp->SCp.phase == in_dataout)
1608 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
1609 return 0;
1610 } else {
1611 /* Async mode for this guy. */
1612 build_sync_nego_msg(esp, 0, 0);
1613
1614 /* Ack the bogus byte, but set ATN first. */
1615 esp_cmd(esp, eregs, ESP_CMD_SATN);
1616 esp_cmd(esp, eregs, ESP_CMD_MOK);
1617 return 1;
1618 }
1619}
1620
1621/* This closes the window during a selection with a reselect pending, because
1622 * we use DMA for the selection process the FIFO should hold the correct
1623 * contents if we get reselected during this process. So we just need to
1624 * ack the possible illegal cmd interrupt pending on the esp100.
1625 */
1626static inline int esp100_reconnect_hwbug(struct NCR_ESP *esp,
1627 struct ESP_regs *eregs)
1628{
1629 volatile unchar junk;
1630
1631 if(esp->erev != esp100)
1632 return 0;
1633 junk = esp_read(eregs->esp_intrpt);
1634
1635 if(junk & ESP_INTR_SR)
1636 return 1;
1637 return 0;
1638}
1639
1640/* This verifies the BUSID bits during a reselection so that we know which
1641 * target is talking to us.
1642 */
1643static inline int reconnect_target(struct NCR_ESP *esp, struct ESP_regs *eregs)
1644{
1645 int it, me = esp->scsi_id_mask, targ = 0;
1646
1647 if(2 != fcount(esp, eregs))
1648 return -1;
1649 it = esp_read(eregs->esp_fdata);
1650 if(!(it & me))
1651 return -1;
1652 it &= ~me;
1653 if(it & (it - 1))
1654 return -1;
1655 while(!(it & 1))
1656 targ++, it >>= 1;
1657 return targ;
1658}
1659
1660/* This verifies the identify from the target so that we know which lun is
1661 * being reconnected.
1662 */
1663static inline int reconnect_lun(struct NCR_ESP *esp, struct ESP_regs *eregs)
1664{
1665 int lun;
1666
1667 if((esp->sreg & ESP_STAT_PMASK) != ESP_MIP)
1668 return -1;
1669 lun = esp_read(eregs->esp_fdata);
1670
1671 /* Yes, you read this correctly. We report lun of zero
1672 * if we see parity error. ESP reports parity error for
1673 * the lun byte, and this is the only way to hope to recover
1674 * because the target is connected.
1675 */
1676 if(esp->sreg & ESP_STAT_PERR)
1677 return 0;
1678
1679 /* Check for illegal bits being set in the lun. */
1680 if((lun & 0x40) || !(lun & 0x80))
1681 return -1;
1682
1683 return lun & 7;
1684}
1685
1686/* This puts the driver in a state where it can revitalize a command that
1687 * is being continued due to reselection.
1688 */
1689static inline void esp_connect(struct NCR_ESP *esp, struct ESP_regs *eregs,
1690 Scsi_Cmnd *sp)
1691{
1692 Scsi_Device *dp = sp->device;
1693 struct esp_device *esp_dev = dp->hostdata;
1694
1695 if(esp->prev_soff != esp_dev->sync_max_offset ||
1696 esp->prev_stp != esp_dev->sync_min_period ||
1697 (esp->erev > esp100a &&
1698 esp->prev_cfg3 != esp->config3[sp->device->id])) {
1699 esp->prev_soff = esp_dev->sync_max_offset;
1700 esp_write(eregs->esp_soff, esp->prev_soff);
1701 esp->prev_stp = esp_dev->sync_min_period;
1702 esp_write(eregs->esp_stp, esp->prev_stp);
1703 if(esp->erev > esp100a) {
1704 esp->prev_cfg3 = esp->config3[sp->device->id];
1705 esp_write(eregs->esp_cfg3, esp->prev_cfg3);
1706 }
1707 }
1708 esp->current_SC = sp;
1709}
1710
1711/* This will place the current working command back into the issue queue
1712 * if we are to receive a reselection amidst a selection attempt.
1713 */
1714static inline void esp_reconnect(struct NCR_ESP *esp, Scsi_Cmnd *sp)
1715{
1716 if(!esp->disconnected_SC)
1717 ESPLOG(("esp%d: Weird, being reselected but disconnected "
1718 "command queue is empty.\n", esp->esp_id));
1719 esp->snip = 0;
1720 esp->current_SC = NULL;
1721 sp->SCp.phase = not_issued;
1722 append_SC(&esp->issue_SC, sp);
1723}
1724
1725/* Begin message in phase. */
1726static int esp_do_msgin(struct NCR_ESP *esp, struct ESP_regs *eregs)
1727{
1728 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
1729 esp_maybe_nop(esp, eregs);
1730 esp_cmd(esp, eregs, ESP_CMD_TI);
1731 esp->msgin_len = 1;
1732 esp->msgin_ctr = 0;
1733 esp_advance_phase(esp->current_SC, in_msgindone);
1734 return do_work_bus;
1735}
1736
1737static inline void advance_sg(struct NCR_ESP *esp, Scsi_Cmnd *sp)
1738{
1739 ++sp->SCp.buffer;
1740 --sp->SCp.buffers_residual;
1741 sp->SCp.this_residual = sp->SCp.buffer->length;
1742 if (esp->dma_advance_sg)
1743 esp->dma_advance_sg (sp);
1744 else
1745 sp->SCp.ptr = (char *) virt_to_phys((page_address(sp->SCp.buffer->page) + sp->SCp.buffer->offset));
1746
1747}
1748
1749/* Please note that the way I've coded these routines is that I _always_
1750 * check for a disconnect during any and all information transfer
1751 * phases. The SCSI standard states that the target _can_ cause a BUS
1752 * FREE condition by dropping all MSG/CD/IO/BSY signals. Also note
1753 * that during information transfer phases the target controls every
1754 * change in phase, the only thing the initiator can do is "ask" for
1755 * a message out phase by driving ATN true. The target can, and sometimes
1756 * will, completely ignore this request so we cannot assume anything when
1757 * we try to force a message out phase to abort/reset a target. Most of
1758 * the time the target will eventually be nice and go to message out, so
1759 * we may have to hold on to our state about what we want to tell the target
1760 * for some period of time.
1761 */
1762
1763/* I think I have things working here correctly. Even partial transfers
1764 * within a buffer or sub-buffer should not upset us at all no matter
1765 * how bad the target and/or ESP fucks things up.
1766 */
1767static int esp_do_data(struct NCR_ESP *esp, struct ESP_regs *eregs)
1768{
1769 Scsi_Cmnd *SCptr = esp->current_SC;
1770 int thisphase, hmuch;
1771
1772 ESPDATA(("esp_do_data: "));
1773 esp_maybe_nop(esp, eregs);
1774 thisphase = sreg_to_dataphase(esp->sreg);
1775 esp_advance_phase(SCptr, thisphase);
1776 ESPDATA(("newphase<%s> ", (thisphase == in_datain) ? "DATAIN" : "DATAOUT"));
1777 hmuch = esp->dma_can_transfer(esp, SCptr);
1778
1779 /*
1780 * XXX MSch: cater for PIO transfer here; PIO used if hmuch == 0
1781 */
1782 if (hmuch) { /* DMA */
1783 /*
1784 * DMA
1785 */
1786 ESPDATA(("hmuch<%d> ", hmuch));
1787 esp->current_transfer_size = hmuch;
1788 esp_setcount(eregs, (esp->fas_premature_intr_workaround ?
1789 (hmuch + 0x40) : hmuch));
1790 esp->dma_setup(esp, (__u32)((unsigned long)SCptr->SCp.ptr),
1791 hmuch, (thisphase == in_datain));
1792 ESPDATA(("DMA|TI --> do_intr_end\n"));
1793 esp_cmd(esp, eregs, ESP_CMD_DMA | ESP_CMD_TI);
1794 return do_intr_end;
1795 /*
1796 * end DMA
1797 */
1798 } else {
1799 /*
1800 * PIO
1801 */
1802 int oldphase, i = 0; /* or where we left off last time ?? esp->current_data ?? */
1803 int fifocnt = 0;
1804
1805 oldphase = esp_read(eregs->esp_status) & ESP_STAT_PMASK;
1806
1807 /*
1808 * polled transfer; ugly, can we make this happen in a DRQ
1809 * interrupt handler ??
1810 * requires keeping track of state information in host or
1811 * command struct!
1812 * Problem: I've never seen a DRQ happen on Mac, not even
1813 * with ESP_CMD_DMA ...
1814 */
1815
1816 /* figure out how much needs to be transferred */
1817 hmuch = SCptr->SCp.this_residual;
1818 ESPDATA(("hmuch<%d> pio ", hmuch));
1819 esp->current_transfer_size = hmuch;
1820
1821 /* tell the ESP ... */
1822 esp_setcount(eregs, hmuch);
1823
1824 /* loop */
1825 while (hmuch) {
1826 int j, fifo_stuck = 0, newphase;
1827 unsigned long flags, timeout;
1828#if 0
1829 if ( i % 10 )
1830 ESPDATA(("\r"));
1831 else
1832 ESPDATA(( /*"\n"*/ "\r"));
1833#endif
1834#if 0
1835 local_irq_save(flags);
1836#endif
1837 if(thisphase == in_datain) {
1838 /* 'go' ... */
1839 esp_cmd(esp, eregs, ESP_CMD_TI);
1840
1841 /* wait for data */
1842 timeout = 1000000;
1843 while (!((esp->sreg=esp_read(eregs->esp_status)) & ESP_STAT_INTR) && --timeout)
1844 udelay(2);
1845 if (timeout == 0)
1846 printk("DRQ datain timeout! \n");
1847
1848 newphase = esp->sreg & ESP_STAT_PMASK;
1849
1850 /* see how much we got ... */
1851 fifocnt = (esp_read(eregs->esp_fflags) & ESP_FF_FBYTES);
1852
1853 if (!fifocnt)
1854 fifo_stuck++;
1855 else
1856 fifo_stuck = 0;
1857
1858 ESPDATA(("\rgot %d st %x ph %x", fifocnt, esp->sreg, newphase));
1859
1860 /* read fifo */
1861 for(j=0;j<fifocnt;j++)
1862 SCptr->SCp.ptr[i++] = esp_read(eregs->esp_fdata);
1863
1864 ESPDATA(("(%d) ", i));
1865
1866 /* how many to go ?? */
1867 hmuch -= fifocnt;
1868
1869 /* break if status phase !! */
1870 if(newphase == ESP_STATP) {
1871 /* clear int. */
1872 esp->ireg = esp_read(eregs->esp_intrpt);
1873 break;
1874 }
1875 } else {
1876#define MAX_FIFO 8
1877 /* how much will fit ? */
1878 int this_count = MAX_FIFO - fifocnt;
1879 if (this_count > hmuch)
1880 this_count = hmuch;
1881
1882 /* fill fifo */
1883 for(j=0;j<this_count;j++)
1884 esp_write(eregs->esp_fdata, SCptr->SCp.ptr[i++]);
1885
1886 /* how many left if this goes out ?? */
1887 hmuch -= this_count;
1888
1889 /* 'go' ... */
1890 esp_cmd(esp, eregs, ESP_CMD_TI);
1891
1892 /* wait for 'got it' */
1893 timeout = 1000000;
1894 while (!((esp->sreg=esp_read(eregs->esp_status)) & ESP_STAT_INTR) && --timeout)
1895 udelay(2);
1896 if (timeout == 0)
1897 printk("DRQ dataout timeout! \n");
1898
1899 newphase = esp->sreg & ESP_STAT_PMASK;
1900
1901 /* need to check how much was sent ?? */
1902 fifocnt = (esp_read(eregs->esp_fflags) & ESP_FF_FBYTES);
1903
1904 ESPDATA(("\rsent %d st %x ph %x", this_count - fifocnt, esp->sreg, newphase));
1905
1906 ESPDATA(("(%d) ", i));
1907
1908 /* break if status phase !! */
1909 if(newphase == ESP_STATP) {
1910 /* clear int. */
1911 esp->ireg = esp_read(eregs->esp_intrpt);
1912 break;
1913 }
1914
1915 }
1916
1917 /* clear int. */
1918 esp->ireg = esp_read(eregs->esp_intrpt);
1919
1920 ESPDATA(("ir %x ... ", esp->ireg));
1921
1922 if (hmuch == 0)
1923 ESPDATA(("done! \n"));
1924
1925#if 0
1926 local_irq_restore(flags);
1927#endif
1928
1929 /* check new bus phase */
1930 if (newphase != oldphase && i < esp->current_transfer_size) {
1931 /* something happened; disconnect ?? */
1932 ESPDATA(("phase change, dropped out with %d done ... ", i));
1933 break;
1934 }
1935
1936 /* check int. status */
1937 if (esp->ireg & ESP_INTR_DC) {
1938 /* disconnect */
1939 ESPDATA(("disconnect; %d transferred ... ", i));
1940 break;
1941 } else if (esp->ireg & ESP_INTR_FDONE) {
1942 /* function done */
1943 ESPDATA(("function done; %d transferred ... ", i));
1944 break;
1945 }
1946
1947 /* XXX fixme: bail out on stall */
1948 if (fifo_stuck > 10) {
1949 /* we're stuck */
1950 ESPDATA(("fifo stall; %d transferred ... ", i));
1951 break;
1952 }
1953 }
1954
1955 ESPDATA(("\n"));
1956 /* check successful completion ?? */
1957
1958 if (thisphase == in_dataout)
1959 hmuch += fifocnt; /* stuck?? adjust data pointer ...*/
1960
1961 /* tell do_data_finale how much was transferred */
1962 esp->current_transfer_size -= hmuch;
1963
1964 /* still not completely sure on this one ... */
1965 return /*do_intr_end*/ do_work_bus /*do_phase_determine*/ ;
1966
1967 /*
1968 * end PIO
1969 */
1970 }
1971 return do_intr_end;
1972}
1973
1974/* See how successful the data transfer was. */
1975static int esp_do_data_finale(struct NCR_ESP *esp,
1976 struct ESP_regs *eregs)
1977{
1978 Scsi_Cmnd *SCptr = esp->current_SC;
1979 struct esp_device *esp_dev = SCptr->device->hostdata;
1980 int bogus_data = 0, bytes_sent = 0, fifocnt, ecount = 0;
1981
1982 if(esp->dma_led_off)
1983 esp->dma_led_off(esp);
1984
1985 ESPDATA(("esp_do_data_finale: "));
1986
1987 if(SCptr->SCp.phase == in_datain) {
1988 if(esp->sreg & ESP_STAT_PERR) {
1989 /* Yuck, parity error. The ESP asserts ATN
1990 * so that we can go to message out phase
1991 * immediately and inform the target that
1992 * something bad happened.
1993 */
1994 ESPLOG(("esp%d: data bad parity detected.\n",
1995 esp->esp_id));
1996 esp->cur_msgout[0] = INITIATOR_ERROR;
1997 esp->msgout_len = 1;
1998 }
1999 if(esp->dma_drain)
2000 esp->dma_drain(esp);
2001 }
2002 if(esp->dma_invalidate)
2003 esp->dma_invalidate(esp);
2004
2005 /* This could happen for the above parity error case. */
2006 if(!(esp->ireg == ESP_INTR_BSERV)) {
2007 /* Please go to msgout phase, please please please... */
2008 ESPLOG(("esp%d: !BSERV after data, probably to msgout\n",
2009 esp->esp_id));
2010 return esp_do_phase_determine(esp, eregs);
2011 }
2012
2013 /* Check for partial transfers and other horrible events. */
2014 fifocnt = (esp_read(eregs->esp_fflags) & ESP_FF_FBYTES);
2015 ecount = esp_getcount(eregs);
2016 if(esp->fas_premature_intr_workaround)
2017 ecount -= 0x40;
2018 bytes_sent = esp->current_transfer_size;
2019
2020 ESPDATA(("trans_sz=%d, ", bytes_sent));
2021 if(!(esp->sreg & ESP_STAT_TCNT))
2022 bytes_sent -= ecount;
2023 if(SCptr->SCp.phase == in_dataout)
2024 bytes_sent -= fifocnt;
2025
2026 ESPDATA(("bytes_sent=%d (ecount=%d, fifocnt=%d), ", bytes_sent,
2027 ecount, fifocnt));
2028
2029 /* If we were in synchronous mode, check for peculiarities. */
2030 if(esp_dev->sync_max_offset)
2031 bogus_data = esp100_sync_hwbug(esp, eregs, SCptr, fifocnt);
2032 else
2033 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
2034
2035 /* Until we are sure of what has happened, we are certainly
2036 * in the dark.
2037 */
2038 esp_advance_phase(SCptr, in_the_dark);
2039
2040 /* Check for premature interrupt condition. Can happen on FAS2x6
2041 * chips. QLogic recommends a workaround by overprogramming the
2042 * transfer counters, but this makes doing scatter-gather impossible.
2043 * Until there is a way to disable scatter-gather for a single target,
2044 * and not only for the entire host adapter as it is now, the workaround
2045 * is way to expensive performance wise.
2046 * Instead, it turns out that when this happens the target has disconnected
2047 * already but it doesn't show in the interrupt register. Compensate for
2048 * that here to try and avoid a SCSI bus reset.
2049 */
2050 if(!esp->fas_premature_intr_workaround && (fifocnt == 1) &&
2051 sreg_dataoutp(esp->sreg)) {
2052 ESPLOG(("esp%d: Premature interrupt, enabling workaround\n",
2053 esp->esp_id));
2054#if 0
2055 /* Disable scatter-gather operations, they are not possible
2056 * when using this workaround.
2057 */
2058 esp->ehost->sg_tablesize = 0;
2059 esp->ehost->use_clustering = ENABLE_CLUSTERING;
2060 esp->fas_premature_intr_workaround = 1;
2061 bytes_sent = 0;
2062 if(SCptr->use_sg) {
2063 ESPLOG(("esp%d: Aborting scatter-gather operation\n",
2064 esp->esp_id));
2065 esp->cur_msgout[0] = ABORT;
2066 esp->msgout_len = 1;
2067 esp->msgout_ctr = 0;
2068 esp_cmd(esp, eregs, ESP_CMD_SATN);
2069 esp_setcount(eregs, 0xffff);
2070 esp_cmd(esp, eregs, ESP_CMD_NULL);
2071 esp_cmd(esp, eregs, ESP_CMD_TPAD | ESP_CMD_DMA);
2072 return do_intr_end;
2073 }
2074#else
2075 /* Just set the disconnected bit. That's what appears to
2076 * happen anyway. The state machine will pick it up when
2077 * we return.
2078 */
2079 esp->ireg |= ESP_INTR_DC;
2080#endif
2081 }
2082
2083 if(bytes_sent < 0) {
2084 /* I've seen this happen due to lost state in this
2085 * driver. No idea why it happened, but allowing
2086 * this value to be negative caused things to
2087 * lock up. This allows greater chance of recovery.
2088 * In fact every time I've seen this, it has been
2089 * a driver bug without question.
2090 */
2091 ESPLOG(("esp%d: yieee, bytes_sent < 0!\n", esp->esp_id));
2092 ESPLOG(("esp%d: csz=%d fifocount=%d ecount=%d\n",
2093 esp->esp_id,
2094 esp->current_transfer_size, fifocnt, ecount));
2095 ESPLOG(("esp%d: use_sg=%d ptr=%p this_residual=%d\n",
2096 esp->esp_id,
2097 SCptr->use_sg, SCptr->SCp.ptr, SCptr->SCp.this_residual));
2098 ESPLOG(("esp%d: Forcing async for target %d\n", esp->esp_id,
2099 SCptr->device->id));
2100 SCptr->device->borken = 1;
2101 esp_dev->sync = 0;
2102 bytes_sent = 0;
2103 }
2104
2105 /* Update the state of our transfer. */
2106 SCptr->SCp.ptr += bytes_sent;
2107 SCptr->SCp.this_residual -= bytes_sent;
2108 if(SCptr->SCp.this_residual < 0) {
2109 /* shit */
2110 ESPLOG(("esp%d: Data transfer overrun.\n", esp->esp_id));
2111 SCptr->SCp.this_residual = 0;
2112 }
2113
2114 /* Maybe continue. */
2115 if(!bogus_data) {
2116 ESPDATA(("!bogus_data, "));
2117 /* NO MATTER WHAT, we advance the scatterlist,
2118 * if the target should decide to disconnect
2119 * in between scatter chunks (which is common)
2120 * we could die horribly! I used to have the sg
2121 * advance occur only if we are going back into
2122 * (or are staying in) a data phase, you can
2123 * imagine the hell I went through trying to
2124 * figure this out.
2125 */
2126 if(!SCptr->SCp.this_residual && SCptr->SCp.buffers_residual)
2127 advance_sg(esp, SCptr);
2128#ifdef DEBUG_ESP_DATA
2129 if(sreg_datainp(esp->sreg) || sreg_dataoutp(esp->sreg)) {
2130 ESPDATA(("to more data\n"));
2131 } else {
2132 ESPDATA(("to new phase\n"));
2133 }
2134#endif
2135 return esp_do_phase_determine(esp, eregs);
2136 }
2137 /* Bogus data, just wait for next interrupt. */
2138 ESPLOG(("esp%d: bogus_data during end of data phase\n",
2139 esp->esp_id));
2140 return do_intr_end;
2141}
2142
2143/* We received a non-good status return at the end of
2144 * running a SCSI command. This is used to decide if
2145 * we should clear our synchronous transfer state for
2146 * such a device when that happens.
2147 *
2148 * The idea is that when spinning up a disk or rewinding
2149 * a tape, we don't want to go into a loop re-negotiating
2150 * synchronous capabilities over and over.
2151 */
2152static int esp_should_clear_sync(Scsi_Cmnd *sp)
2153{
2154 unchar cmd1 = sp->cmnd[0];
2155 unchar cmd2 = sp->data_cmnd[0];
2156
2157 /* These cases are for spinning up a disk and
2158 * waiting for that spinup to complete.
2159 */
2160 if(cmd1 == START_STOP ||
2161 cmd2 == START_STOP)
2162 return 0;
2163
2164 if(cmd1 == TEST_UNIT_READY ||
2165 cmd2 == TEST_UNIT_READY)
2166 return 0;
2167
2168 /* One more special case for SCSI tape drives,
2169 * this is what is used to probe the device for
2170 * completion of a rewind or tape load operation.
2171 */
2172 if(sp->device->type == TYPE_TAPE) {
2173 if(cmd1 == MODE_SENSE ||
2174 cmd2 == MODE_SENSE)
2175 return 0;
2176 }
2177
2178 return 1;
2179}
2180
2181/* Either a command is completing or a target is dropping off the bus
2182 * to continue the command in the background so we can do other work.
2183 */
2184static int esp_do_freebus(struct NCR_ESP *esp, struct ESP_regs *eregs)
2185{
2186 Scsi_Cmnd *SCptr = esp->current_SC;
2187 int rval;
2188
2189 rval = skipahead2(esp, eregs, SCptr, in_status, in_msgindone, in_freeing);
2190 if(rval)
2191 return rval;
2192
2193 if(esp->ireg != ESP_INTR_DC) {
2194 ESPLOG(("esp%d: Target will not disconnect\n", esp->esp_id));
2195 return do_reset_bus; /* target will not drop BSY... */
2196 }
2197 esp->msgout_len = 0;
2198 esp->prevmsgout = NOP;
2199 if(esp->prevmsgin == COMMAND_COMPLETE) {
2200 struct esp_device *esp_dev = SCptr->device->hostdata;
2201 /* Normal end of nexus. */
2202 if(esp->disconnected_SC)
2203 esp_cmd(esp, eregs, ESP_CMD_ESEL);
2204
2205 if(SCptr->SCp.Status != GOOD &&
2206 SCptr->SCp.Status != CONDITION_GOOD &&
2207 ((1<<SCptr->device->id) & esp->targets_present) &&
2208 esp_dev->sync && esp_dev->sync_max_offset) {
2209 /* SCSI standard says that the synchronous capabilities
2210 * should be renegotiated at this point. Most likely
2211 * we are about to request sense from this target
2212 * in which case we want to avoid using sync
2213 * transfers until we are sure of the current target
2214 * state.
2215 */
2216 ESPMISC(("esp: Status <%d> for target %d lun %d\n",
2217 SCptr->SCp.Status, SCptr->device->id, SCptr->device->lun));
2218
2219 /* But don't do this when spinning up a disk at
2220 * boot time while we poll for completion as it
2221 * fills up the console with messages. Also, tapes
2222 * can report not ready many times right after
2223 * loading up a tape.
2224 */
2225 if(esp_should_clear_sync(SCptr) != 0)
2226 esp_dev->sync = 0;
2227 }
2228 ESPDISC(("F<%02x,%02x>", SCptr->device->id, SCptr->device->lun));
2229 esp_done(esp, ((SCptr->SCp.Status & 0xff) |
2230 ((SCptr->SCp.Message & 0xff)<<8) |
2231 (DID_OK << 16)));
2232 } else if(esp->prevmsgin == DISCONNECT) {
2233 /* Normal disconnect. */
2234 esp_cmd(esp, eregs, ESP_CMD_ESEL);
2235 ESPDISC(("D<%02x,%02x>", SCptr->device->id, SCptr->device->lun));
2236 append_SC(&esp->disconnected_SC, SCptr);
2237 esp->current_SC = NULL;
2238 if(esp->issue_SC)
2239 esp_exec_cmd(esp);
2240 } else {
2241 /* Driver bug, we do not expect a disconnect here
2242 * and should not have advanced the state engine
2243 * to in_freeing.
2244 */
2245 ESPLOG(("esp%d: last msg not disc and not cmd cmplt.\n",
2246 esp->esp_id));
2247 return do_reset_bus;
2248 }
2249 return do_intr_end;
2250}
2251
2252/* When a reselect occurs, and we cannot find the command to
2253 * reconnect to in our queues, we do this.
2254 */
2255static int esp_bad_reconnect(struct NCR_ESP *esp)
2256{
2257 Scsi_Cmnd *sp;
2258
2259 ESPLOG(("esp%d: Eieeee, reconnecting unknown command!\n",
2260 esp->esp_id));
2261 ESPLOG(("QUEUE DUMP\n"));
2262 sp = esp->issue_SC;
2263 ESPLOG(("esp%d: issue_SC[", esp->esp_id));
2264 while(sp) {
2265 ESPLOG(("<%02x,%02x>", sp->device->id, sp->device->lun));
2266 sp = (Scsi_Cmnd *) sp->host_scribble;
2267 }
2268 ESPLOG(("]\n"));
2269 sp = esp->current_SC;
2270 ESPLOG(("esp%d: current_SC[", esp->esp_id));
2271 while(sp) {
2272 ESPLOG(("<%02x,%02x>", sp->device->id, sp->device->lun));
2273 sp = (Scsi_Cmnd *) sp->host_scribble;
2274 }
2275 ESPLOG(("]\n"));
2276 sp = esp->disconnected_SC;
2277 ESPLOG(("esp%d: disconnected_SC[", esp->esp_id));
2278 while(sp) {
2279 ESPLOG(("<%02x,%02x>", sp->device->id, sp->device->lun));
2280 sp = (Scsi_Cmnd *) sp->host_scribble;
2281 }
2282 ESPLOG(("]\n"));
2283 return do_reset_bus;
2284}
2285
2286/* Do the needy when a target tries to reconnect to us. */
2287static int esp_do_reconnect(struct NCR_ESP *esp,
2288 struct ESP_regs *eregs)
2289{
2290 int lun, target;
2291 Scsi_Cmnd *SCptr;
2292
2293 /* Check for all bogus conditions first. */
2294 target = reconnect_target(esp, eregs);
2295 if(target < 0) {
2296 ESPDISC(("bad bus bits\n"));
2297 return do_reset_bus;
2298 }
2299 lun = reconnect_lun(esp, eregs);
2300 if(lun < 0) {
2301 ESPDISC(("target=%2x, bad identify msg\n", target));
2302 return do_reset_bus;
2303 }
2304
2305 /* Things look ok... */
2306 ESPDISC(("R<%02x,%02x>", target, lun));
2307
2308 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
2309 if(esp100_reconnect_hwbug(esp, eregs))
2310 return do_reset_bus;
2311 esp_cmd(esp, eregs, ESP_CMD_NULL);
2312
2313 SCptr = remove_SC(&esp->disconnected_SC, (unchar) target, (unchar) lun);
2314 if(!SCptr)
2315 return esp_bad_reconnect(esp);
2316
2317 esp_connect(esp, eregs, SCptr);
2318 esp_cmd(esp, eregs, ESP_CMD_MOK);
2319
2320 /* Reconnect implies a restore pointers operation. */
2321 esp_restore_pointers(esp, SCptr);
2322
2323 esp->snip = 0;
2324 esp_advance_phase(SCptr, in_the_dark);
2325 return do_intr_end;
2326}
2327
2328/* End of NEXUS (hopefully), pick up status + message byte then leave if
2329 * all goes well.
2330 */
2331static int esp_do_status(struct NCR_ESP *esp, struct ESP_regs *eregs)
2332{
2333 Scsi_Cmnd *SCptr = esp->current_SC;
2334 int intr, rval;
2335
2336 rval = skipahead1(esp, eregs, SCptr, in_the_dark, in_status);
2337 if(rval)
2338 return rval;
2339
2340 intr = esp->ireg;
2341 ESPSTAT(("esp_do_status: "));
2342 if(intr != ESP_INTR_DC) {
2343 int message_out = 0; /* for parity problems */
2344
2345 /* Ack the message. */
2346 ESPSTAT(("ack msg, "));
2347 esp_cmd(esp, eregs, ESP_CMD_MOK);
2348
2349 if(esp->dma_poll)
2350 esp->dma_poll(esp, (unsigned char *) esp->esp_command);
2351
2352 ESPSTAT(("got something, "));
2353 /* ESP chimes in with one of
2354 *
2355 * 1) function done interrupt:
2356 * both status and message in bytes
2357 * are available
2358 *
2359 * 2) bus service interrupt:
2360 * only status byte was acquired
2361 *
2362 * 3) Anything else:
2363 * can't happen, but we test for it
2364 * anyways
2365 *
2366 * ALSO: If bad parity was detected on either
2367 * the status _or_ the message byte then
2368 * the ESP has asserted ATN on the bus
2369 * and we must therefore wait for the
2370 * next phase change.
2371 */
2372 if(intr & ESP_INTR_FDONE) {
2373 /* We got it all, hallejulia. */
2374 ESPSTAT(("got both, "));
2375 SCptr->SCp.Status = esp->esp_command[0];
2376 SCptr->SCp.Message = esp->esp_command[1];
2377 esp->prevmsgin = SCptr->SCp.Message;
2378 esp->cur_msgin[0] = SCptr->SCp.Message;
2379 if(esp->sreg & ESP_STAT_PERR) {
2380 /* There was bad parity for the
2381 * message byte, the status byte
2382 * was ok.
2383 */
2384 message_out = MSG_PARITY_ERROR;
2385 }
2386 } else if(intr == ESP_INTR_BSERV) {
2387 /* Only got status byte. */
2388 ESPLOG(("esp%d: got status only, ", esp->esp_id));
2389 if(!(esp->sreg & ESP_STAT_PERR)) {
2390 SCptr->SCp.Status = esp->esp_command[0];
2391 SCptr->SCp.Message = 0xff;
2392 } else {
2393 /* The status byte had bad parity.
2394 * we leave the scsi_pointer Status
2395 * field alone as we set it to a default
2396 * of CHECK_CONDITION in esp_queue.
2397 */
2398 message_out = INITIATOR_ERROR;
2399 }
2400 } else {
2401 /* This shouldn't happen ever. */
2402 ESPSTAT(("got bolixed\n"));
2403 esp_advance_phase(SCptr, in_the_dark);
2404 return esp_do_phase_determine(esp, eregs);
2405 }
2406
2407 if(!message_out) {
2408 ESPSTAT(("status=%2x msg=%2x, ", SCptr->SCp.Status,
2409 SCptr->SCp.Message));
2410 if(SCptr->SCp.Message == COMMAND_COMPLETE) {
2411 ESPSTAT(("and was COMMAND_COMPLETE\n"));
2412 esp_advance_phase(SCptr, in_freeing);
2413 return esp_do_freebus(esp, eregs);
2414 } else {
2415 ESPLOG(("esp%d: and _not_ COMMAND_COMPLETE\n",
2416 esp->esp_id));
2417 esp->msgin_len = esp->msgin_ctr = 1;
2418 esp_advance_phase(SCptr, in_msgindone);
2419 return esp_do_msgindone(esp, eregs);
2420 }
2421 } else {
2422 /* With luck we'll be able to let the target
2423 * know that bad parity happened, it will know
2424 * which byte caused the problems and send it
2425 * again. For the case where the status byte
2426 * receives bad parity, I do not believe most
2427 * targets recover very well. We'll see.
2428 */
2429 ESPLOG(("esp%d: bad parity somewhere mout=%2x\n",
2430 esp->esp_id, message_out));
2431 esp->cur_msgout[0] = message_out;
2432 esp->msgout_len = esp->msgout_ctr = 1;
2433 esp_advance_phase(SCptr, in_the_dark);
2434 return esp_do_phase_determine(esp, eregs);
2435 }
2436 } else {
2437 /* If we disconnect now, all hell breaks loose. */
2438 ESPLOG(("esp%d: whoops, disconnect\n", esp->esp_id));
2439 esp_advance_phase(SCptr, in_the_dark);
2440 return esp_do_phase_determine(esp, eregs);
2441 }
2442}
2443
2444static int esp_enter_status(struct NCR_ESP *esp,
2445 struct ESP_regs *eregs)
2446{
2447 unchar thecmd = ESP_CMD_ICCSEQ;
2448
2449 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
2450
2451 if(esp->do_pio_cmds) {
2452 esp_advance_phase(esp->current_SC, in_status);
2453 esp_cmd(esp, eregs, thecmd);
2454 while(!(esp_read(esp->eregs->esp_status) & ESP_STAT_INTR));
2455 esp->esp_command[0] = esp_read(eregs->esp_fdata);
2456 while(!(esp_read(esp->eregs->esp_status) & ESP_STAT_INTR));
2457 esp->esp_command[1] = esp_read(eregs->esp_fdata);
2458 } else {
2459 esp->esp_command[0] = esp->esp_command[1] = 0xff;
2460 esp_write(eregs->esp_tclow, 2);
2461 esp_write(eregs->esp_tcmed, 0);
2462 esp->dma_init_read(esp, esp->esp_command_dvma, 2);
2463 thecmd |= ESP_CMD_DMA;
2464 esp_cmd(esp, eregs, thecmd);
2465 esp_advance_phase(esp->current_SC, in_status);
2466 }
2467
2468 return esp_do_status(esp, eregs);
2469}
2470
2471static int esp_disconnect_amidst_phases(struct NCR_ESP *esp,
2472 struct ESP_regs *eregs)
2473{
2474 Scsi_Cmnd *sp = esp->current_SC;
2475 struct esp_device *esp_dev = sp->device->hostdata;
2476
2477 /* This means real problems if we see this
2478 * here. Unless we were actually trying
2479 * to force the device to abort/reset.
2480 */
2481 ESPLOG(("esp%d: Disconnect amidst phases, ", esp->esp_id));
2482 ESPLOG(("pphase<%s> cphase<%s>, ",
2483 phase_string(sp->SCp.phase),
2484 phase_string(sp->SCp.sent_command)));
2485
2486 if(esp->disconnected_SC)
2487 esp_cmd(esp, eregs, ESP_CMD_ESEL);
2488
2489 switch(esp->cur_msgout[0]) {
2490 default:
2491 /* We didn't expect this to happen at all. */
2492 ESPLOG(("device is bolixed\n"));
2493 esp_advance_phase(sp, in_tgterror);
2494 esp_done(esp, (DID_ERROR << 16));
2495 break;
2496
2497 case BUS_DEVICE_RESET:
2498 ESPLOG(("device reset successful\n"));
2499 esp_dev->sync_max_offset = 0;
2500 esp_dev->sync_min_period = 0;
2501 esp_dev->sync = 0;
2502 esp_advance_phase(sp, in_resetdev);
2503 esp_done(esp, (DID_RESET << 16));
2504 break;
2505
2506 case ABORT:
2507 ESPLOG(("device abort successful\n"));
2508 esp_advance_phase(sp, in_abortone);
2509 esp_done(esp, (DID_ABORT << 16));
2510 break;
2511
2512 };
2513 return do_intr_end;
2514}
2515
2516static int esp_enter_msgout(struct NCR_ESP *esp,
2517 struct ESP_regs *eregs)
2518{
2519 esp_advance_phase(esp->current_SC, in_msgout);
2520 return esp_do_msgout(esp, eregs);
2521}
2522
2523static int esp_enter_msgin(struct NCR_ESP *esp,
2524 struct ESP_regs *eregs)
2525{
2526 esp_advance_phase(esp->current_SC, in_msgin);
2527 return esp_do_msgin(esp, eregs);
2528}
2529
2530static int esp_enter_cmd(struct NCR_ESP *esp,
2531 struct ESP_regs *eregs)
2532{
2533 esp_advance_phase(esp->current_SC, in_cmdbegin);
2534 return esp_do_cmdbegin(esp, eregs);
2535}
2536
2537static int esp_enter_badphase(struct NCR_ESP *esp,
2538 struct ESP_regs *eregs)
2539{
2540 ESPLOG(("esp%d: Bizarre bus phase %2x.\n", esp->esp_id,
2541 esp->sreg & ESP_STAT_PMASK));
2542 return do_reset_bus;
2543}
2544
2545typedef int (*espfunc_t)(struct NCR_ESP *,
2546 struct ESP_regs *);
2547
2548static espfunc_t phase_vector[] = {
2549 esp_do_data, /* ESP_DOP */
2550 esp_do_data, /* ESP_DIP */
2551 esp_enter_cmd, /* ESP_CMDP */
2552 esp_enter_status, /* ESP_STATP */
2553 esp_enter_badphase, /* ESP_STAT_PMSG */
2554 esp_enter_badphase, /* ESP_STAT_PMSG | ESP_STAT_PIO */
2555 esp_enter_msgout, /* ESP_MOP */
2556 esp_enter_msgin, /* ESP_MIP */
2557};
2558
2559/* The target has control of the bus and we have to see where it has
2560 * taken us.
2561 */
2562static int esp_do_phase_determine(struct NCR_ESP *esp,
2563 struct ESP_regs *eregs)
2564{
2565 if ((esp->ireg & ESP_INTR_DC) != 0)
2566 return esp_disconnect_amidst_phases(esp, eregs);
2567 return phase_vector[esp->sreg & ESP_STAT_PMASK](esp, eregs);
2568}
2569
2570/* First interrupt after exec'ing a cmd comes here. */
2571static int esp_select_complete(struct NCR_ESP *esp, struct ESP_regs *eregs)
2572{
2573 Scsi_Cmnd *SCptr = esp->current_SC;
2574 struct esp_device *esp_dev = SCptr->device->hostdata;
2575 int cmd_bytes_sent, fcnt;
2576
2577 fcnt = (esp_read(eregs->esp_fflags) & ESP_FF_FBYTES);
2578 cmd_bytes_sent = esp->dma_bytes_sent(esp, fcnt);
2579 if(esp->dma_invalidate)
2580 esp->dma_invalidate(esp);
2581
2582 /* Let's check to see if a reselect happened
2583 * while we we're trying to select. This must
2584 * be checked first.
2585 */
2586 if(esp->ireg == (ESP_INTR_RSEL | ESP_INTR_FDONE)) {
2587 esp_reconnect(esp, SCptr);
2588 return esp_do_reconnect(esp, eregs);
2589 }
2590
2591 /* Looks like things worked, we should see a bus service &
2592 * a function complete interrupt at this point. Note we
2593 * are doing a direct comparison because we don't want to
2594 * be fooled into thinking selection was successful if
2595 * ESP_INTR_DC is set, see below.
2596 */
2597 if(esp->ireg == (ESP_INTR_FDONE | ESP_INTR_BSERV)) {
2598 /* target speaks... */
2599 esp->targets_present |= (1<<SCptr->device->id);
2600
2601 /* What if the target ignores the sdtr? */
2602 if(esp->snip)
2603 esp_dev->sync = 1;
2604
2605 /* See how far, if at all, we got in getting
2606 * the information out to the target.
2607 */
2608 switch(esp->seqreg) {
2609 default:
2610
2611 case ESP_STEP_ASEL:
2612 /* Arbitration won, target selected, but
2613 * we are in some phase which is not command
2614 * phase nor is it message out phase.
2615 *
2616 * XXX We've confused the target, obviously.
2617 * XXX So clear it's state, but we also end
2618 * XXX up clearing everyone elses. That isn't
2619 * XXX so nice. I'd like to just reset this
2620 * XXX target, but if I cannot even get it's
2621 * XXX attention and finish selection to talk
2622 * XXX to it, there is not much more I can do.
2623 * XXX If we have a loaded bus we're going to
2624 * XXX spend the next second or so renegotiating
2625 * XXX for synchronous transfers.
2626 */
2627 ESPLOG(("esp%d: STEP_ASEL for tgt %d\n",
2628 esp->esp_id, SCptr->device->id));
2629
2630 case ESP_STEP_SID:
2631 /* Arbitration won, target selected, went
2632 * to message out phase, sent one message
2633 * byte, then we stopped. ATN is asserted
2634 * on the SCSI bus and the target is still
2635 * there hanging on. This is a legal
2636 * sequence step if we gave the ESP a select
2637 * and stop command.
2638 *
2639 * XXX See above, I could set the borken flag
2640 * XXX in the device struct and retry the
2641 * XXX command. But would that help for
2642 * XXX tagged capable targets?
2643 */
2644
2645 case ESP_STEP_NCMD:
2646 /* Arbitration won, target selected, maybe
2647 * sent the one message byte in message out
2648 * phase, but we did not go to command phase
2649 * in the end. Actually, we could have sent
2650 * only some of the message bytes if we tried
2651 * to send out the entire identify and tag
2652 * message using ESP_CMD_SA3.
2653 */
2654 cmd_bytes_sent = 0;
2655 break;
2656
2657 case ESP_STEP_PPC:
2658 /* No, not the powerPC pinhead. Arbitration
2659 * won, all message bytes sent if we went to
2660 * message out phase, went to command phase
2661 * but only part of the command was sent.
2662 *
2663 * XXX I've seen this, but usually in conjunction
2664 * XXX with a gross error which appears to have
2665 * XXX occurred between the time I told the
2666 * XXX ESP to arbitrate and when I got the
2667 * XXX interrupt. Could I have misloaded the
2668 * XXX command bytes into the fifo? Actually,
2669 * XXX I most likely missed a phase, and therefore
2670 * XXX went into never never land and didn't even
2671 * XXX know it. That was the old driver though.
2672 * XXX What is even more peculiar is that the ESP
2673 * XXX showed the proper function complete and
2674 * XXX bus service bits in the interrupt register.
2675 */
2676
2677 case ESP_STEP_FINI4:
2678 case ESP_STEP_FINI5:
2679 case ESP_STEP_FINI6:
2680 case ESP_STEP_FINI7:
2681 /* Account for the identify message */
2682 if(SCptr->SCp.phase == in_slct_norm)
2683 cmd_bytes_sent -= 1;
2684 };
2685 esp_cmd(esp, eregs, ESP_CMD_NULL);
2686
2687 /* Be careful, we could really get fucked during synchronous
2688 * data transfers if we try to flush the fifo now.
2689 */
2690 if(!fcnt && /* Fifo is empty and... */
2691 /* either we are not doing synchronous transfers or... */
2692 (!esp_dev->sync_max_offset ||
2693 /* We are not going into data in phase. */
2694 ((esp->sreg & ESP_STAT_PMASK) != ESP_DIP)))
2695 esp_cmd(esp, eregs, ESP_CMD_FLUSH); /* flush is safe */
2696
2697 /* See how far we got if this is not a slow command. */
2698 if(!esp->esp_slowcmd) {
2699 if(cmd_bytes_sent < 0)
2700 cmd_bytes_sent = 0;
2701 if(cmd_bytes_sent != SCptr->cmd_len) {
2702 /* Crapola, mark it as a slowcmd
2703 * so that we have some chance of
2704 * keeping the command alive with
2705 * good luck.
2706 *
2707 * XXX Actually, if we didn't send it all
2708 * XXX this means either we didn't set things
2709 * XXX up properly (driver bug) or the target
2710 * XXX or the ESP detected parity on one of
2711 * XXX the command bytes. This makes much
2712 * XXX more sense, and therefore this code
2713 * XXX should be changed to send out a
2714 * XXX parity error message or if the status
2715 * XXX register shows no parity error then
2716 * XXX just expect the target to bring the
2717 * XXX bus into message in phase so that it
2718 * XXX can send us the parity error message.
2719 * XXX SCSI sucks...
2720 */
2721 esp->esp_slowcmd = 1;
2722 esp->esp_scmdp = &(SCptr->cmnd[cmd_bytes_sent]);
2723 esp->esp_scmdleft = (SCptr->cmd_len - cmd_bytes_sent);
2724 }
2725 }
2726
2727 /* Now figure out where we went. */
2728 esp_advance_phase(SCptr, in_the_dark);
2729 return esp_do_phase_determine(esp, eregs);
2730 }
2731
2732 /* Did the target even make it? */
2733 if(esp->ireg == ESP_INTR_DC) {
2734 /* wheee... nobody there or they didn't like
2735 * what we told it to do, clean up.
2736 */
2737
2738 /* If anyone is off the bus, but working on
2739 * a command in the background for us, tell
2740 * the ESP to listen for them.
2741 */
2742 if(esp->disconnected_SC)
2743 esp_cmd(esp, eregs, ESP_CMD_ESEL);
2744
2745 if(((1<<SCptr->device->id) & esp->targets_present) &&
2746 esp->seqreg && esp->cur_msgout[0] == EXTENDED_MESSAGE &&
2747 (SCptr->SCp.phase == in_slct_msg ||
2748 SCptr->SCp.phase == in_slct_stop)) {
2749 /* shit */
2750 esp->snip = 0;
2751 ESPLOG(("esp%d: Failed synchronous negotiation for target %d "
2752 "lun %d\n", esp->esp_id, SCptr->device->id, SCptr->device->lun));
2753 esp_dev->sync_max_offset = 0;
2754 esp_dev->sync_min_period = 0;
2755 esp_dev->sync = 1; /* so we don't negotiate again */
2756
2757 /* Run the command again, this time though we
2758 * won't try to negotiate for synchronous transfers.
2759 *
2760 * XXX I'd like to do something like send an
2761 * XXX INITIATOR_ERROR or ABORT message to the
2762 * XXX target to tell it, "Sorry I confused you,
2763 * XXX please come back and I will be nicer next
2764 * XXX time". But that requires having the target
2765 * XXX on the bus, and it has dropped BSY on us.
2766 */
2767 esp->current_SC = NULL;
2768 esp_advance_phase(SCptr, not_issued);
2769 prepend_SC(&esp->issue_SC, SCptr);
2770 esp_exec_cmd(esp);
2771 return do_intr_end;
2772 }
2773
2774 /* Ok, this is normal, this is what we see during boot
2775 * or whenever when we are scanning the bus for targets.
2776 * But first make sure that is really what is happening.
2777 */
2778 if(((1<<SCptr->device->id) & esp->targets_present)) {
2779 ESPLOG(("esp%d: Warning, live target %d not responding to "
2780 "selection.\n", esp->esp_id, SCptr->device->id));
2781
2782 /* This _CAN_ happen. The SCSI standard states that
2783 * the target is to _not_ respond to selection if
2784 * _it_ detects bad parity on the bus for any reason.
2785 * Therefore, we assume that if we've talked successfully
2786 * to this target before, bad parity is the problem.
2787 */
2788 esp_done(esp, (DID_PARITY << 16));
2789 } else {
2790 /* Else, there really isn't anyone there. */
2791 ESPMISC(("esp: selection failure, maybe nobody there?\n"));
2792 ESPMISC(("esp: target %d lun %d\n",
2793 SCptr->device->id, SCptr->device->lun));
2794 esp_done(esp, (DID_BAD_TARGET << 16));
2795 }
2796 return do_intr_end;
2797 }
2798
2799
2800 ESPLOG(("esp%d: Selection failure.\n", esp->esp_id));
2801 printk("esp%d: Currently -- ", esp->esp_id);
2802 esp_print_ireg(esp->ireg);
2803 printk(" ");
2804 esp_print_statreg(esp->sreg);
2805 printk(" ");
2806 esp_print_seqreg(esp->seqreg);
2807 printk("\n");
2808 printk("esp%d: New -- ", esp->esp_id);
2809 esp->sreg = esp_read(eregs->esp_status);
2810 esp->seqreg = esp_read(eregs->esp_sstep);
2811 esp->ireg = esp_read(eregs->esp_intrpt);
2812 esp_print_ireg(esp->ireg);
2813 printk(" ");
2814 esp_print_statreg(esp->sreg);
2815 printk(" ");
2816 esp_print_seqreg(esp->seqreg);
2817 printk("\n");
2818 ESPLOG(("esp%d: resetting bus\n", esp->esp_id));
2819 return do_reset_bus; /* ugh... */
2820}
2821
2822/* Continue reading bytes for msgin phase. */
2823static int esp_do_msgincont(struct NCR_ESP *esp, struct ESP_regs *eregs)
2824{
2825 if(esp->ireg & ESP_INTR_BSERV) {
2826 /* in the right phase too? */
2827 if((esp->sreg & ESP_STAT_PMASK) == ESP_MIP) {
2828 /* phew... */
2829 esp_cmd(esp, eregs, ESP_CMD_TI);
2830 esp_advance_phase(esp->current_SC, in_msgindone);
2831 return do_intr_end;
2832 }
2833
2834 /* We changed phase but ESP shows bus service,
2835 * in this case it is most likely that we, the
2836 * hacker who has been up for 20hrs straight
2837 * staring at the screen, drowned in coffee
2838 * smelling like retched cigarette ashes
2839 * have miscoded something..... so, try to
2840 * recover as best we can.
2841 */
2842 ESPLOG(("esp%d: message in mis-carriage.\n", esp->esp_id));
2843 }
2844 esp_advance_phase(esp->current_SC, in_the_dark);
2845 return do_phase_determine;
2846}
2847
2848static int check_singlebyte_msg(struct NCR_ESP *esp,
2849 struct ESP_regs *eregs)
2850{
2851 esp->prevmsgin = esp->cur_msgin[0];
2852 if(esp->cur_msgin[0] & 0x80) {
2853 /* wheee... */
2854 ESPLOG(("esp%d: target sends identify amidst phases\n",
2855 esp->esp_id));
2856 esp_advance_phase(esp->current_SC, in_the_dark);
2857 return 0;
2858 } else if(((esp->cur_msgin[0] & 0xf0) == 0x20) ||
2859 (esp->cur_msgin[0] == EXTENDED_MESSAGE)) {
2860 esp->msgin_len = 2;
2861 esp_advance_phase(esp->current_SC, in_msgincont);
2862 return 0;
2863 }
2864 esp_advance_phase(esp->current_SC, in_the_dark);
2865 switch(esp->cur_msgin[0]) {
2866 default:
2867 /* We don't want to hear about it. */
2868 ESPLOG(("esp%d: msg %02x which we don't know about\n", esp->esp_id,
2869 esp->cur_msgin[0]));
2870 return MESSAGE_REJECT;
2871
2872 case NOP:
2873 ESPLOG(("esp%d: target %d sends a nop\n", esp->esp_id,
2874 esp->current_SC->device->id));
2875 return 0;
2876
2877 case RESTORE_POINTERS:
2878 /* In this case we might also have to backup the
2879 * "slow command" pointer. It is rare to get such
2880 * a save/restore pointer sequence so early in the
2881 * bus transition sequences, but cover it.
2882 */
2883 if(esp->esp_slowcmd) {
2884 esp->esp_scmdleft = esp->current_SC->cmd_len;
2885 esp->esp_scmdp = &esp->current_SC->cmnd[0];
2886 }
2887 esp_restore_pointers(esp, esp->current_SC);
2888 return 0;
2889
2890 case SAVE_POINTERS:
2891 esp_save_pointers(esp, esp->current_SC);
2892 return 0;
2893
2894 case COMMAND_COMPLETE:
2895 case DISCONNECT:
2896 /* Freeing the bus, let it go. */
2897 esp->current_SC->SCp.phase = in_freeing;
2898 return 0;
2899
2900 case MESSAGE_REJECT:
2901 ESPMISC(("msg reject, "));
2902 if(esp->prevmsgout == EXTENDED_MESSAGE) {
2903 struct esp_device *esp_dev = esp->current_SC->device->hostdata;
2904
2905 /* Doesn't look like this target can
2906 * do synchronous or WIDE transfers.
2907 */
2908 ESPSDTR(("got reject, was trying nego, clearing sync/WIDE\n"));
2909 esp_dev->sync = 1;
2910 esp_dev->wide = 1;
2911 esp_dev->sync_min_period = 0;
2912 esp_dev->sync_max_offset = 0;
2913 return 0;
2914 } else {
2915 ESPMISC(("not sync nego, sending ABORT\n"));
2916 return ABORT;
2917 }
2918 };
2919}
2920
2921/* Target negotiates for synchronous transfers before we do, this
2922 * is legal although very strange. What is even funnier is that
2923 * the SCSI2 standard specifically recommends against targets doing
2924 * this because so many initiators cannot cope with this occurring.
2925 */
2926static int target_with_ants_in_pants(struct NCR_ESP *esp,
2927 Scsi_Cmnd *SCptr,
2928 struct esp_device *esp_dev)
2929{
2930 if(esp_dev->sync || SCptr->device->borken) {
2931 /* sorry, no can do */
2932 ESPSDTR(("forcing to async, "));
2933 build_sync_nego_msg(esp, 0, 0);
2934 esp_dev->sync = 1;
2935 esp->snip = 1;
2936 ESPLOG(("esp%d: hoping for msgout\n", esp->esp_id));
2937 esp_advance_phase(SCptr, in_the_dark);
2938 return EXTENDED_MESSAGE;
2939 }
2940
2941 /* Ok, we'll check them out... */
2942 return 0;
2943}
2944
2945static void sync_report(struct NCR_ESP *esp)
2946{
2947 int msg3, msg4;
2948 char *type;
2949
2950 msg3 = esp->cur_msgin[3];
2951 msg4 = esp->cur_msgin[4];
2952 if(msg4) {
2953 int hz = 1000000000 / (msg3 * 4);
2954 int integer = hz / 1000000;
2955 int fraction = (hz - (integer * 1000000)) / 10000;
2956 if((msg3 * 4) < 200) {
2957 type = "FAST";
2958 } else {
2959 type = "synchronous";
2960 }
2961
2962 /* Do not transform this back into one big printk
2963 * again, it triggers a bug in our sparc64-gcc272
2964 * sibling call optimization. -DaveM
2965 */
2966 ESPLOG((KERN_INFO "esp%d: target %d ",
2967 esp->esp_id, esp->current_SC->device->id));
2968 ESPLOG(("[period %dns offset %d %d.%02dMHz ",
2969 (int) msg3 * 4, (int) msg4,
2970 integer, fraction));
2971 ESPLOG(("%s SCSI%s]\n", type,
2972 (((msg3 * 4) < 200) ? "-II" : "")));
2973 } else {
2974 ESPLOG((KERN_INFO "esp%d: target %d asynchronous\n",
2975 esp->esp_id, esp->current_SC->device->id));
2976 }
2977}
2978
2979static int check_multibyte_msg(struct NCR_ESP *esp,
2980 struct ESP_regs *eregs)
2981{
2982 Scsi_Cmnd *SCptr = esp->current_SC;
2983 struct esp_device *esp_dev = SCptr->device->hostdata;
2984 unchar regval = 0;
2985 int message_out = 0;
2986
2987 ESPSDTR(("chk multibyte msg: "));
2988 if(esp->cur_msgin[2] == EXTENDED_SDTR) {
2989 int period = esp->cur_msgin[3];
2990 int offset = esp->cur_msgin[4];
2991
2992 ESPSDTR(("is sync nego response, "));
2993 if(!esp->snip) {
2994 int rval;
2995
2996 /* Target negotiates first! */
2997 ESPSDTR(("target jumps the gun, "));
2998 message_out = EXTENDED_MESSAGE; /* we must respond */
2999 rval = target_with_ants_in_pants(esp, SCptr, esp_dev);
3000 if(rval)
3001 return rval;
3002 }
3003
3004 ESPSDTR(("examining sdtr, "));
3005
3006 /* Offset cannot be larger than ESP fifo size. */
3007 if(offset > 15) {
3008 ESPSDTR(("offset too big %2x, ", offset));
3009 offset = 15;
3010 ESPSDTR(("sending back new offset\n"));
3011 build_sync_nego_msg(esp, period, offset);
3012 return EXTENDED_MESSAGE;
3013 }
3014
3015 if(offset && period > esp->max_period) {
3016 /* Yeee, async for this slow device. */
3017 ESPSDTR(("period too long %2x, ", period));
3018 build_sync_nego_msg(esp, 0, 0);
3019 ESPSDTR(("hoping for msgout\n"));
3020 esp_advance_phase(esp->current_SC, in_the_dark);
3021 return EXTENDED_MESSAGE;
3022 } else if (offset && period < esp->min_period) {
3023 ESPSDTR(("period too short %2x, ", period));
3024 period = esp->min_period;
3025 if(esp->erev > esp236)
3026 regval = 4;
3027 else
3028 regval = 5;
3029 } else if(offset) {
3030 int tmp;
3031
3032 ESPSDTR(("period is ok, "));
3033 tmp = esp->ccycle / 1000;
3034 regval = (((period << 2) + tmp - 1) / tmp);
3035 if(regval && (esp->erev > esp236)) {
3036 if(period >= 50)
3037 regval--;
3038 }
3039 }
3040
3041 if(offset) {
3042 unchar bit;
3043
3044 esp_dev->sync_min_period = (regval & 0x1f);
3045 esp_dev->sync_max_offset = (offset | esp->radelay);
3046 if(esp->erev > esp236) {
3047 if(esp->erev == fas100a)
3048 bit = ESP_CONFIG3_FAST;
3049 else
3050 bit = ESP_CONFIG3_FSCSI;
3051 if(period < 50)
3052 esp->config3[SCptr->device->id] |= bit;
3053 else
3054 esp->config3[SCptr->device->id] &= ~bit;
3055 esp->prev_cfg3 = esp->config3[SCptr->device->id];
3056 esp_write(eregs->esp_cfg3, esp->prev_cfg3);
3057 }
3058 esp->prev_soff = esp_dev->sync_min_period;
3059 esp_write(eregs->esp_soff, esp->prev_soff);
3060 esp->prev_stp = esp_dev->sync_max_offset;
3061 esp_write(eregs->esp_stp, esp->prev_stp);
3062
3063 ESPSDTR(("soff=%2x stp=%2x cfg3=%2x\n",
3064 esp_dev->sync_max_offset,
3065 esp_dev->sync_min_period,
3066 esp->config3[SCptr->device->id]));
3067
3068 esp->snip = 0;
3069 } else if(esp_dev->sync_max_offset) {
3070 unchar bit;
3071
3072 /* back to async mode */
3073 ESPSDTR(("unaccaptable sync nego, forcing async\n"));
3074 esp_dev->sync_max_offset = 0;
3075 esp_dev->sync_min_period = 0;
3076 esp->prev_soff = 0;
3077 esp_write(eregs->esp_soff, 0);
3078 esp->prev_stp = 0;
3079 esp_write(eregs->esp_stp, 0);
3080 if(esp->erev > esp236) {
3081 if(esp->erev == fas100a)
3082 bit = ESP_CONFIG3_FAST;
3083 else
3084 bit = ESP_CONFIG3_FSCSI;
3085 esp->config3[SCptr->device->id] &= ~bit;
3086 esp->prev_cfg3 = esp->config3[SCptr->device->id];
3087 esp_write(eregs->esp_cfg3, esp->prev_cfg3);
3088 }
3089 }
3090
3091 sync_report(esp);
3092
3093 ESPSDTR(("chk multibyte msg: sync is known, "));
3094 esp_dev->sync = 1;
3095
3096 if(message_out) {
3097 ESPLOG(("esp%d: sending sdtr back, hoping for msgout\n",
3098 esp->esp_id));
3099 build_sync_nego_msg(esp, period, offset);
3100 esp_advance_phase(SCptr, in_the_dark);
3101 return EXTENDED_MESSAGE;
3102 }
3103
3104 ESPSDTR(("returning zero\n"));
3105 esp_advance_phase(SCptr, in_the_dark); /* ...or else! */
3106 return 0;
3107 } else if(esp->cur_msgin[2] == EXTENDED_WDTR) {
3108 ESPLOG(("esp%d: AIEEE wide msg received\n", esp->esp_id));
3109 message_out = MESSAGE_REJECT;
3110 } else if(esp->cur_msgin[2] == EXTENDED_MODIFY_DATA_POINTER) {
3111 ESPLOG(("esp%d: rejecting modify data ptr msg\n", esp->esp_id));
3112 message_out = MESSAGE_REJECT;
3113 }
3114 esp_advance_phase(SCptr, in_the_dark);
3115 return message_out;
3116}
3117
3118static int esp_do_msgindone(struct NCR_ESP *esp, struct ESP_regs *eregs)
3119{
3120 Scsi_Cmnd *SCptr = esp->current_SC;
3121 int message_out = 0, it = 0, rval;
3122
3123 rval = skipahead1(esp, eregs, SCptr, in_msgin, in_msgindone);
3124 if(rval)
3125 return rval;
3126 if(SCptr->SCp.sent_command != in_status) {
3127 if(!(esp->ireg & ESP_INTR_DC)) {
3128 if(esp->msgin_len && (esp->sreg & ESP_STAT_PERR)) {
3129 message_out = MSG_PARITY_ERROR;
3130 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
3131 } else if((it = (esp_read(eregs->esp_fflags) & ESP_FF_FBYTES))!=1) {
3132 /* We certainly dropped the ball somewhere. */
3133 message_out = INITIATOR_ERROR;
3134 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
3135 } else if(!esp->msgin_len) {
3136 it = esp_read(eregs->esp_fdata);
3137 esp_advance_phase(SCptr, in_msgincont);
3138 } else {
3139 /* it is ok and we want it */
3140 it = esp->cur_msgin[esp->msgin_ctr] =
3141 esp_read(eregs->esp_fdata);
3142 esp->msgin_ctr++;
3143 }
3144 } else {
3145 esp_advance_phase(SCptr, in_the_dark);
3146 return do_work_bus;
3147 }
3148 } else {
3149 it = esp->cur_msgin[0];
3150 }
3151 if(!message_out && esp->msgin_len) {
3152 if(esp->msgin_ctr < esp->msgin_len) {
3153 esp_advance_phase(SCptr, in_msgincont);
3154 } else if(esp->msgin_len == 1) {
3155 message_out = check_singlebyte_msg(esp, eregs);
3156 } else if(esp->msgin_len == 2) {
3157 if(esp->cur_msgin[0] == EXTENDED_MESSAGE) {
3158 if((it+2) >= 15) {
3159 message_out = MESSAGE_REJECT;
3160 } else {
3161 esp->msgin_len = (it + 2);
3162 esp_advance_phase(SCptr, in_msgincont);
3163 }
3164 } else {
3165 message_out = MESSAGE_REJECT; /* foo on you */
3166 }
3167 } else {
3168 message_out = check_multibyte_msg(esp, eregs);
3169 }
3170 }
3171 if(message_out < 0) {
3172 return -message_out;
3173 } else if(message_out) {
3174 if(((message_out != 1) &&
3175 ((message_out < 0x20) || (message_out & 0x80))))
3176 esp->msgout_len = 1;
3177 esp->cur_msgout[0] = message_out;
3178 esp_cmd(esp, eregs, ESP_CMD_SATN);
3179 esp_advance_phase(SCptr, in_the_dark);
3180 esp->msgin_len = 0;
3181 }
3182 esp->sreg = esp_read(eregs->esp_status);
3183 esp->sreg &= ~(ESP_STAT_INTR);
3184 if((esp->sreg & (ESP_STAT_PMSG|ESP_STAT_PCD)) == (ESP_STAT_PMSG|ESP_STAT_PCD))
3185 esp_cmd(esp, eregs, ESP_CMD_MOK);
3186 if((SCptr->SCp.sent_command == in_msgindone) &&
3187 (SCptr->SCp.phase == in_freeing))
3188 return esp_do_freebus(esp, eregs);
3189 return do_intr_end;
3190}
3191
3192static int esp_do_cmdbegin(struct NCR_ESP *esp, struct ESP_regs *eregs)
3193{
3194 unsigned char tmp;
3195 Scsi_Cmnd *SCptr = esp->current_SC;
3196
3197 esp_advance_phase(SCptr, in_cmdend);
3198 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
3199 tmp = *esp->esp_scmdp++;
3200 esp->esp_scmdleft--;
3201 esp_write(eregs->esp_fdata, tmp);
3202 esp_cmd(esp, eregs, ESP_CMD_TI);
3203 return do_intr_end;
3204}
3205
3206static int esp_do_cmddone(struct NCR_ESP *esp, struct ESP_regs *eregs)
3207{
3208 esp_cmd(esp, eregs, ESP_CMD_NULL);
3209 if(esp->ireg & ESP_INTR_BSERV) {
3210 esp_advance_phase(esp->current_SC, in_the_dark);
3211 return esp_do_phase_determine(esp, eregs);
3212 }
3213 ESPLOG(("esp%d: in do_cmddone() but didn't get BSERV interrupt.\n",
3214 esp->esp_id));
3215 return do_reset_bus;
3216}
3217
3218static int esp_do_msgout(struct NCR_ESP *esp, struct ESP_regs *eregs)
3219{
3220 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
3221 switch(esp->msgout_len) {
3222 case 1:
3223 esp_write(eregs->esp_fdata, esp->cur_msgout[0]);
3224 esp_cmd(esp, eregs, ESP_CMD_TI);
3225 break;
3226
3227 case 2:
3228 if(esp->do_pio_cmds){
3229 esp_write(eregs->esp_fdata, esp->cur_msgout[0]);
3230 esp_write(eregs->esp_fdata, esp->cur_msgout[1]);
3231 esp_cmd(esp, eregs, ESP_CMD_TI);
3232 } else {
3233 esp->esp_command[0] = esp->cur_msgout[0];
3234 esp->esp_command[1] = esp->cur_msgout[1];
3235 esp->dma_setup(esp, esp->esp_command_dvma, 2, 0);
3236 esp_setcount(eregs, 2);
3237 esp_cmd(esp, eregs, ESP_CMD_DMA | ESP_CMD_TI);
3238 }
3239 break;
3240
3241 case 4:
3242 esp->snip = 1;
3243 if(esp->do_pio_cmds){
3244 esp_write(eregs->esp_fdata, esp->cur_msgout[0]);
3245 esp_write(eregs->esp_fdata, esp->cur_msgout[1]);
3246 esp_write(eregs->esp_fdata, esp->cur_msgout[2]);
3247 esp_write(eregs->esp_fdata, esp->cur_msgout[3]);
3248 esp_cmd(esp, eregs, ESP_CMD_TI);
3249 } else {
3250 esp->esp_command[0] = esp->cur_msgout[0];
3251 esp->esp_command[1] = esp->cur_msgout[1];
3252 esp->esp_command[2] = esp->cur_msgout[2];
3253 esp->esp_command[3] = esp->cur_msgout[3];
3254 esp->dma_setup(esp, esp->esp_command_dvma, 4, 0);
3255 esp_setcount(eregs, 4);
3256 esp_cmd(esp, eregs, ESP_CMD_DMA | ESP_CMD_TI);
3257 }
3258 break;
3259
3260 case 5:
3261 esp->snip = 1;
3262 if(esp->do_pio_cmds){
3263 esp_write(eregs->esp_fdata, esp->cur_msgout[0]);
3264 esp_write(eregs->esp_fdata, esp->cur_msgout[1]);
3265 esp_write(eregs->esp_fdata, esp->cur_msgout[2]);
3266 esp_write(eregs->esp_fdata, esp->cur_msgout[3]);
3267 esp_write(eregs->esp_fdata, esp->cur_msgout[4]);
3268 esp_cmd(esp, eregs, ESP_CMD_TI);
3269 } else {
3270 esp->esp_command[0] = esp->cur_msgout[0];
3271 esp->esp_command[1] = esp->cur_msgout[1];
3272 esp->esp_command[2] = esp->cur_msgout[2];
3273 esp->esp_command[3] = esp->cur_msgout[3];
3274 esp->esp_command[4] = esp->cur_msgout[4];
3275 esp->dma_setup(esp, esp->esp_command_dvma, 5, 0);
3276 esp_setcount(eregs, 5);
3277 esp_cmd(esp, eregs, ESP_CMD_DMA | ESP_CMD_TI);
3278 }
3279 break;
3280
3281 default:
3282 /* whoops */
3283 ESPMISC(("bogus msgout sending NOP\n"));
3284 esp->cur_msgout[0] = NOP;
3285 esp_write(eregs->esp_fdata, esp->cur_msgout[0]);
3286 esp->msgout_len = 1;
3287 esp_cmd(esp, eregs, ESP_CMD_TI);
3288 break;
3289 }
3290 esp_advance_phase(esp->current_SC, in_msgoutdone);
3291 return do_intr_end;
3292}
3293
3294static int esp_do_msgoutdone(struct NCR_ESP *esp,
3295 struct ESP_regs *eregs)
3296{
3297 if((esp->msgout_len > 1) && esp->dma_barrier)
3298 esp->dma_barrier(esp);
3299
3300 if(!(esp->ireg & ESP_INTR_DC)) {
3301 esp_cmd(esp, eregs, ESP_CMD_NULL);
3302 switch(esp->sreg & ESP_STAT_PMASK) {
3303 case ESP_MOP:
3304 /* whoops, parity error */
3305 ESPLOG(("esp%d: still in msgout, parity error assumed\n",
3306 esp->esp_id));
3307 if(esp->msgout_len > 1)
3308 esp_cmd(esp, eregs, ESP_CMD_SATN);
3309 esp_advance_phase(esp->current_SC, in_msgout);
3310 return do_work_bus;
3311
3312 case ESP_DIP:
3313 break;
3314
3315 default:
3316 if(!fcount(esp, eregs) &&
3317 !(((struct esp_device *)esp->current_SC->device->hostdata)->sync_max_offset))
3318 esp_cmd(esp, eregs, ESP_CMD_FLUSH);
3319 break;
3320
3321 };
3322 }
3323
3324 /* If we sent out a synchronous negotiation message, update
3325 * our state.
3326 */
3327 if(esp->cur_msgout[2] == EXTENDED_MESSAGE &&
3328 esp->cur_msgout[4] == EXTENDED_SDTR) {
3329 esp->snip = 1; /* anal retentiveness... */
3330 }
3331
3332 esp->prevmsgout = esp->cur_msgout[0];
3333 esp->msgout_len = 0;
3334 esp_advance_phase(esp->current_SC, in_the_dark);
3335 return esp_do_phase_determine(esp, eregs);
3336}
3337
3338static int esp_bus_unexpected(struct NCR_ESP *esp, struct ESP_regs *eregs)
3339{
3340 ESPLOG(("esp%d: command in weird state %2x\n",
3341 esp->esp_id, esp->current_SC->SCp.phase));
3342 return do_reset_bus;
3343}
3344
3345static espfunc_t bus_vector[] = {
3346 esp_do_data_finale,
3347 esp_do_data_finale,
3348 esp_bus_unexpected,
3349 esp_do_msgin,
3350 esp_do_msgincont,
3351 esp_do_msgindone,
3352 esp_do_msgout,
3353 esp_do_msgoutdone,
3354 esp_do_cmdbegin,
3355 esp_do_cmddone,
3356 esp_do_status,
3357 esp_do_freebus,
3358 esp_do_phase_determine,
3359 esp_bus_unexpected,
3360 esp_bus_unexpected,
3361 esp_bus_unexpected,
3362};
3363
3364/* This is the second tier in our dual-level SCSI state machine. */
3365static int esp_work_bus(struct NCR_ESP *esp, struct ESP_regs *eregs)
3366{
3367 Scsi_Cmnd *SCptr = esp->current_SC;
3368 unsigned int phase;
3369
3370 ESPBUS(("esp_work_bus: "));
3371 if(!SCptr) {
3372 ESPBUS(("reconnect\n"));
3373 return esp_do_reconnect(esp, eregs);
3374 }
3375 phase = SCptr->SCp.phase;
3376 if ((phase & 0xf0) == in_phases_mask)
3377 return bus_vector[(phase & 0x0f)](esp, eregs);
3378 else if((phase & 0xf0) == in_slct_mask)
3379 return esp_select_complete(esp, eregs);
3380 else
3381 return esp_bus_unexpected(esp, eregs);
3382}
3383
3384static espfunc_t isvc_vector[] = {
3385 NULL,
3386 esp_do_phase_determine,
3387 esp_do_resetbus,
3388 esp_finish_reset,
3389 esp_work_bus
3390};
3391
3392/* Main interrupt handler for an esp adapter. */
3393void esp_handle(struct NCR_ESP *esp)
3394{
3395 struct ESP_regs *eregs;
3396 Scsi_Cmnd *SCptr;
3397 int what_next = do_intr_end;
3398 eregs = esp->eregs;
3399 SCptr = esp->current_SC;
3400
3401 if(esp->dma_irq_entry)
3402 esp->dma_irq_entry(esp);
3403
3404 /* Check for errors. */
3405 esp->sreg = esp_read(eregs->esp_status);
3406 esp->sreg &= (~ESP_STAT_INTR);
3407 esp->seqreg = (esp_read(eregs->esp_sstep) & ESP_STEP_VBITS);
3408 esp->ireg = esp_read(eregs->esp_intrpt); /* Unlatch intr and stat regs */
3409 ESPIRQ(("handle_irq: [sreg<%02x> sstep<%02x> ireg<%02x>]\n",
3410 esp->sreg, esp->seqreg, esp->ireg));
3411 if(esp->sreg & (ESP_STAT_SPAM)) {
3412 /* Gross error, could be due to one of:
3413 *
3414 * - top of fifo overwritten, could be because
3415 * we tried to do a synchronous transfer with
3416 * an offset greater than ESP fifo size
3417 *
3418 * - top of command register overwritten
3419 *
3420 * - DMA setup to go in one direction, SCSI
3421 * bus points in the other, whoops
3422 *
3423 * - weird phase change during asynchronous
3424 * data phase while we are initiator
3425 */
3426 ESPLOG(("esp%d: Gross error sreg=%2x\n", esp->esp_id, esp->sreg));
3427
3428 /* If a command is live on the bus we cannot safely
3429 * reset the bus, so we'll just let the pieces fall
3430 * where they may. Here we are hoping that the
3431 * target will be able to cleanly go away soon
3432 * so we can safely reset things.
3433 */
3434 if(!SCptr) {
3435 ESPLOG(("esp%d: No current cmd during gross error, "
3436 "resetting bus\n", esp->esp_id));
3437 what_next = do_reset_bus;
3438 goto state_machine;
3439 }
3440 }
3441
3442 /* No current cmd is only valid at this point when there are
3443 * commands off the bus or we are trying a reset.
3444 */
3445 if(!SCptr && !esp->disconnected_SC && !(esp->ireg & ESP_INTR_SR)) {
3446 /* Panic is safe, since current_SC is null. */
3447 ESPLOG(("esp%d: no command in esp_handle()\n", esp->esp_id));
3448 panic("esp_handle: current_SC == penguin within interrupt!");
3449 }
3450
3451 if(esp->ireg & (ESP_INTR_IC)) {
3452 /* Illegal command fed to ESP. Outside of obvious
3453 * software bugs that could cause this, there is
3454 * a condition with ESP100 where we can confuse the
3455 * ESP into an erroneous illegal command interrupt
3456 * because it does not scrape the FIFO properly
3457 * for reselection. See esp100_reconnect_hwbug()
3458 * to see how we try very hard to avoid this.
3459 */
3460 ESPLOG(("esp%d: invalid command\n", esp->esp_id));
3461
3462 esp_dump_state(esp, eregs);
3463
3464 if(SCptr) {
3465 /* Devices with very buggy firmware can drop BSY
3466 * during a scatter list interrupt when using sync
3467 * mode transfers. We continue the transfer as
3468 * expected, the target drops the bus, the ESP
3469 * gets confused, and we get a illegal command
3470 * interrupt because the bus is in the disconnected
3471 * state now and ESP_CMD_TI is only allowed when
3472 * a nexus is alive on the bus.
3473 */
3474 ESPLOG(("esp%d: Forcing async and disabling disconnect for "
3475 "target %d\n", esp->esp_id, SCptr->device->id));
3476 SCptr->device->borken = 1; /* foo on you */
3477 }
3478
3479 what_next = do_reset_bus;
3480 } else if(!(esp->ireg & ~(ESP_INTR_FDONE | ESP_INTR_BSERV | ESP_INTR_DC))) {
3481 int phase;
3482
3483 if(SCptr) {
3484 phase = SCptr->SCp.phase;
3485 if(phase & in_phases_mask) {
3486 what_next = esp_work_bus(esp, eregs);
3487 } else if(phase & in_slct_mask) {
3488 what_next = esp_select_complete(esp, eregs);
3489 } else {
3490 ESPLOG(("esp%d: interrupt for no good reason...\n",
3491 esp->esp_id));
3492 what_next = do_intr_end;
3493 }
3494 } else {
3495 ESPLOG(("esp%d: BSERV or FDONE or DC while SCptr==NULL\n",
3496 esp->esp_id));
3497 what_next = do_reset_bus;
3498 }
3499 } else if(esp->ireg & ESP_INTR_SR) {
3500 ESPLOG(("esp%d: SCSI bus reset interrupt\n", esp->esp_id));
3501 what_next = do_reset_complete;
3502 } else if(esp->ireg & (ESP_INTR_S | ESP_INTR_SATN)) {
3503 ESPLOG(("esp%d: AIEEE we have been selected by another initiator!\n",
3504 esp->esp_id));
3505 what_next = do_reset_bus;
3506 } else if(esp->ireg & ESP_INTR_RSEL) {
3507 if(!SCptr) {
3508 /* This is ok. */
3509 what_next = esp_do_reconnect(esp, eregs);
3510 } else if(SCptr->SCp.phase & in_slct_mask) {
3511 /* Only selection code knows how to clean
3512 * up properly.
3513 */
3514 ESPDISC(("Reselected during selection attempt\n"));
3515 what_next = esp_select_complete(esp, eregs);
3516 } else {
3517 ESPLOG(("esp%d: Reselected while bus is busy\n",
3518 esp->esp_id));
3519 what_next = do_reset_bus;
3520 }
3521 }
3522
3523 /* This is tier-one in our dual level SCSI state machine. */
3524state_machine:
3525 while(what_next != do_intr_end) {
3526 if (what_next >= do_phase_determine &&
3527 what_next < do_intr_end)
3528 what_next = isvc_vector[what_next](esp, eregs);
3529 else {
3530 /* state is completely lost ;-( */
3531 ESPLOG(("esp%d: interrupt engine loses state, resetting bus\n",
3532 esp->esp_id));
3533 what_next = do_reset_bus;
3534 }
3535 }
3536 if(esp->dma_irq_exit)
3537 esp->dma_irq_exit(esp);
3538}
3539
3540#ifndef CONFIG_SMP
3541irqreturn_t esp_intr(int irq, void *dev_id, struct pt_regs *pregs)
3542{
3543 struct NCR_ESP *esp;
3544 unsigned long flags;
3545 int again;
3546 struct Scsi_Host *dev = dev_id;
3547
3548 /* Handle all ESP interrupts showing at this IRQ level. */
3549 spin_lock_irqsave(dev->host_lock, flags);
3550repeat:
3551 again = 0;
3552 for_each_esp(esp) {
3553#ifndef __mips__
3554 if(((esp)->irq & 0xff) == irq) {
3555#endif
3556 if(esp->dma_irq_p(esp)) {
3557 again = 1;
3558
3559 esp->dma_ints_off(esp);
3560
3561 ESPIRQ(("I%d(", esp->esp_id));
3562 esp_handle(esp);
3563 ESPIRQ((")"));
3564
3565 esp->dma_ints_on(esp);
3566 }
3567#ifndef __mips__
3568 }
3569#endif
3570 }
3571 if(again)
3572 goto repeat;
3573 spin_unlock_irqrestore(dev->host_lock, flags);
3574 return IRQ_HANDLED;
3575}
3576#else
3577/* For SMP we only service one ESP on the list list at our IRQ level! */
3578irqreturn_t esp_intr(int irq, void *dev_id, struct pt_regs *pregs)
3579{
3580 struct NCR_ESP *esp;
3581 unsigned long flags;
3582 struct Scsi_Host *dev = dev_id;
3583
3584 /* Handle all ESP interrupts showing at this IRQ level. */
3585 spin_lock_irqsave(dev->host_lock, flags);
3586 for_each_esp(esp) {
3587 if(((esp)->irq & 0xf) == irq) {
3588 if(esp->dma_irq_p(esp)) {
3589 esp->dma_ints_off(esp);
3590
3591 ESPIRQ(("I[%d:%d](",
3592 smp_processor_id(), esp->esp_id));
3593 esp_handle(esp);
3594 ESPIRQ((")"));
3595
3596 esp->dma_ints_on(esp);
3597 goto out;
3598 }
3599 }
3600 }
3601out:
3602 spin_unlock_irqrestore(dev->host_lock, flags);
3603 return IRQ_HANDLED;
3604}
3605#endif
3606
3607int esp_slave_alloc(Scsi_Device *SDptr)
3608{
3609 struct esp_device *esp_dev =
3610 kmalloc(sizeof(struct esp_device), GFP_ATOMIC);
3611
3612 if (!esp_dev)
3613 return -ENOMEM;
3614 memset(esp_dev, 0, sizeof(struct esp_device));
3615 SDptr->hostdata = esp_dev;
3616 return 0;
3617}
3618
3619void esp_slave_destroy(Scsi_Device *SDptr)
3620{
3621 struct NCR_ESP *esp = (struct NCR_ESP *) SDptr->host->hostdata;
3622
3623 esp->targets_present &= ~(1 << SDptr->id);
3624 kfree(SDptr->hostdata);
3625 SDptr->hostdata = NULL;
3626}
3627
3628#ifdef MODULE
3629int init_module(void) { return 0; }
3630void cleanup_module(void) {}
3631void esp_release(void)
3632{
3633 esps_in_use--;
3634 esps_running = esps_in_use;
3635}
3636#endif
3637
3638EXPORT_SYMBOL(esp_abort);
3639EXPORT_SYMBOL(esp_allocate);
3640EXPORT_SYMBOL(esp_deallocate);
3641EXPORT_SYMBOL(esp_initialize);
3642EXPORT_SYMBOL(esp_intr);
3643EXPORT_SYMBOL(esp_queue);
3644EXPORT_SYMBOL(esp_reset);
3645EXPORT_SYMBOL(esp_slave_alloc);
3646EXPORT_SYMBOL(esp_slave_destroy);
3647EXPORT_SYMBOL(esps_in_use);
3648
3649MODULE_LICENSE("GPL");