• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /* sun3_NCR5380.c -- adapted from atari_NCR5380.c for the sun3 by
2    Sam Creasey. */
3 /*
4  * NCR 5380 generic driver routines.  These should make it *trivial*
5  * 	to implement 5380 SCSI drivers under Linux with a non-trantor
6  *	architecture.
7  *
8  *	Note that these routines also work with NR53c400 family chips.
9  *
10  * Copyright 1993, Drew Eckhardt
11  *	Visionary Computing
12  *	(Unix and Linux consulting and custom programming)
13  * 	drew@colorado.edu
14  *	+1 (303) 666-5836
15  *
16  * DISTRIBUTION RELEASE 6.
17  *
18  * For more information, please consult
19  *
20  * NCR 5380 Family
21  * SCSI Protocol Controller
22  * Databook
23  *
24  * NCR Microelectronics
25  * 1635 Aeroplaza Drive
26  * Colorado Springs, CO 80916
27  * 1+ (719) 578-3400
28  * 1+ (800) 334-5454
29  */
30 
31 /*
32  * ++roman: To port the 5380 driver to the Atari, I had to do some changes in
33  * this file, too:
34  *
35  *  - Some of the debug statements were incorrect (undefined variables and the
36  *    like). I fixed that.
37  *
38  *  - In information_transfer(), I think a #ifdef was wrong. Looking at the
39  *    possible DMA transfer size should also happen for REAL_DMA. I added this
40  *    in the #if statement.
41  *
42  *  - When using real DMA, information_transfer() should return in a DATAOUT
43  *    phase after starting the DMA. It has nothing more to do.
44  *
45  *  - The interrupt service routine should run main after end of DMA, too (not
46  *    only after RESELECTION interrupts). Additionally, it should _not_ test
47  *    for more interrupts after running main, since a DMA process may have
48  *    been started and interrupts are turned on now. The new int could happen
49  *    inside the execution of NCR5380_intr(), leading to recursive
50  *    calls.
51  *
52  *  - I've added a function merge_contiguous_buffers() that tries to
53  *    merge scatter-gather buffers that are located at contiguous
54  *    physical addresses and can be processed with the same DMA setup.
55  *    Since most scatter-gather operations work on a page (4K) of
56  *    4 buffers (1K), in more than 90% of all cases three interrupts and
57  *    DMA setup actions are saved.
58  *
59  * - I've deleted all the stuff for AUTOPROBE_IRQ, REAL_DMA_POLL, PSEUDO_DMA
60  *    and USLEEP, because these were messing up readability and will never be
61  *    needed for Atari SCSI.
62  *
63  * - I've revised the NCR5380_main() calling scheme (relax the 'main_running'
64  *   stuff), and 'main' is executed in a bottom half if awoken by an
65  *   interrupt.
66  *
67  * - The code was quite cluttered up by "#if (NDEBUG & NDEBUG_*) printk..."
68  *   constructs. In my eyes, this made the source rather unreadable, so I
69  *   finally replaced that by the *_PRINTK() macros.
70  *
71  */
72 #include <scsi/scsi_dbg.h>
73 #include <scsi/scsi_transport_spi.h>
74 
75 /*
76  * Further development / testing that should be done :
77  * 1.  Test linked command handling code after Eric is ready with
78  *     the high level code.
79  */
80 
81 #if (NDEBUG & NDEBUG_LISTS)
82 #define LIST(x,y) \
83   { printk("LINE:%d   Adding %p to %p\n", __LINE__, (void*)(x), (void*)(y)); \
84     if ((x)==(y)) udelay(5); }
85 #define REMOVE(w,x,y,z) \
86   { printk("LINE:%d   Removing: %p->%p  %p->%p \n", __LINE__, \
87 	   (void*)(w), (void*)(x), (void*)(y), (void*)(z)); \
88     if ((x)==(y)) udelay(5); }
89 #else
90 #define LIST(x,y)
91 #define REMOVE(w,x,y,z)
92 #endif
93 
94 #ifndef notyet
95 #undef LINKED
96 #endif
97 
98 /*
99  * Design
100  * Issues :
101  *
102  * The other Linux SCSI drivers were written when Linux was Intel PC-only,
103  * and specifically for each board rather than each chip.  This makes their
104  * adaptation to platforms like the Mac (Some of which use NCR5380's)
105  * more difficult than it has to be.
106  *
107  * Also, many of the SCSI drivers were written before the command queuing
108  * routines were implemented, meaning their implementations of queued
109  * commands were hacked on rather than designed in from the start.
110  *
111  * When I designed the Linux SCSI drivers I figured that
112  * while having two different SCSI boards in a system might be useful
113  * for debugging things, two of the same type wouldn't be used.
114  * Well, I was wrong and a number of users have mailed me about running
115  * multiple high-performance SCSI boards in a server.
116  *
117  * Finally, when I get questions from users, I have no idea what
118  * revision of my driver they are running.
119  *
120  * This driver attempts to address these problems :
121  * This is a generic 5380 driver.  To use it on a different platform,
122  * one simply writes appropriate system specific macros (ie, data
123  * transfer - some PC's will use the I/O bus, 68K's must use
124  * memory mapped) and drops this file in their 'C' wrapper.
125  *
126  * As far as command queueing, two queues are maintained for
127  * each 5380 in the system - commands that haven't been issued yet,
128  * and commands that are currently executing.  This means that an
129  * unlimited number of commands may be queued, letting
130  * more commands propagate from the higher driver levels giving higher
131  * throughput.  Note that both I_T_L and I_T_L_Q nexuses are supported,
132  * allowing multiple commands to propagate all the way to a SCSI-II device
133  * while a command is already executing.
134  *
135  * To solve the multiple-boards-in-the-same-system problem,
136  * there is a separate instance structure for each instance
137  * of a 5380 in the system.  So, multiple NCR5380 drivers will
138  * be able to coexist with appropriate changes to the high level
139  * SCSI code.
140  *
141  * A NCR5380_PUBLIC_REVISION macro is provided, with the release
142  * number (updated for each public release) printed by the
143  * NCR5380_print_options command, which should be called from the
144  * wrapper detect function, so that I know what release of the driver
145  * users are using.
146  *
147  * Issues specific to the NCR5380 :
148  *
149  * When used in a PIO or pseudo-dma mode, the NCR5380 is a braindead
150  * piece of hardware that requires you to sit in a loop polling for
151  * the REQ signal as long as you are connected.  Some devices are
152  * brain dead (ie, many TEXEL CD ROM drives) and won't disconnect
153  * while doing long seek operations.
154  *
155  * The workaround for this is to keep track of devices that have
156  * disconnected.  If the device hasn't disconnected, for commands that
157  * should disconnect, we do something like
158  *
159  * while (!REQ is asserted) { sleep for N usecs; poll for M usecs }
160  *
161  * Some tweaking of N and M needs to be done.  An algorithm based
162  * on "time to data" would give the best results as long as short time
163  * to datas (ie, on the same track) were considered, however these
164  * broken devices are the exception rather than the rule and I'd rather
165  * spend my time optimizing for the normal case.
166  *
167  * Architecture :
168  *
169  * At the heart of the design is a coroutine, NCR5380_main,
170  * which is started when not running by the interrupt handler,
171  * timer, and queue command function.  It attempts to establish
172  * I_T_L or I_T_L_Q nexuses by removing the commands from the
173  * issue queue and calling NCR5380_select() if a nexus
174  * is not established.
175  *
176  * Once a nexus is established, the NCR5380_information_transfer()
177  * phase goes through the various phases as instructed by the target.
178  * if the target goes into MSG IN and sends a DISCONNECT message,
179  * the command structure is placed into the per instance disconnected
180  * queue, and NCR5380_main tries to find more work.  If USLEEP
181  * was defined, and the target is idle for too long, the system
182  * will try to sleep.
183  *
184  * If a command has disconnected, eventually an interrupt will trigger,
185  * calling NCR5380_intr()  which will in turn call NCR5380_reselect
186  * to reestablish a nexus.  This will run main if necessary.
187  *
188  * On command termination, the done function will be called as
189  * appropriate.
190  *
191  * SCSI pointers are maintained in the SCp field of SCSI command
192  * structures, being initialized after the command is connected
193  * in NCR5380_select, and set as appropriate in NCR5380_information_transfer.
194  * Note that in violation of the standard, an implicit SAVE POINTERS operation
195  * is done, since some BROKEN disks fail to issue an explicit SAVE POINTERS.
196  */
197 
198 /*
199  * Using this file :
200  * This file a skeleton Linux SCSI driver for the NCR 5380 series
201  * of chips.  To use it, you write an architecture specific functions
202  * and macros and include this file in your driver.
203  *
204  * These macros control options :
205  * AUTOSENSE - if defined, REQUEST SENSE will be performed automatically
206  *	for commands that return with a CHECK CONDITION status.
207  *
208  * LINKED - if defined, linked commands are supported.
209  *
210  * REAL_DMA - if defined, REAL DMA is used during the data transfer phases.
211  *
212  * SUPPORT_TAGS - if defined, SCSI-2 tagged queuing is used where possible
213  *
214  * These macros MUST be defined :
215  *
216  * NCR5380_read(register)  - read from the specified register
217  *
218  * NCR5380_write(register, value) - write to the specific register
219  *
220  * Either real DMA *or* pseudo DMA may be implemented
221  * REAL functions :
222  * NCR5380_REAL_DMA should be defined if real DMA is to be used.
223  * Note that the DMA setup functions should return the number of bytes
224  *	that they were able to program the controller for.
225  *
226  * Also note that generic i386/PC versions of these macros are
227  *	available as NCR5380_i386_dma_write_setup,
228  *	NCR5380_i386_dma_read_setup, and NCR5380_i386_dma_residual.
229  *
230  * NCR5380_dma_write_setup(instance, src, count) - initialize
231  * NCR5380_dma_read_setup(instance, dst, count) - initialize
232  * NCR5380_dma_residual(instance); - residual count
233  *
234  * PSEUDO functions :
235  * NCR5380_pwrite(instance, src, count)
236  * NCR5380_pread(instance, dst, count);
237  *
238  * If nothing specific to this implementation needs doing (ie, with external
239  * hardware), you must also define
240  *
241  * NCR5380_queue_command
242  * NCR5380_reset
243  * NCR5380_abort
244  * NCR5380_proc_info
245  *
246  * to be the global entry points into the specific driver, ie
247  * #define NCR5380_queue_command t128_queue_command.
248  *
249  * If this is not done, the routines will be defined as static functions
250  * with the NCR5380* names and the user must provide a globally
251  * accessible wrapper function.
252  *
253  * The generic driver is initialized by calling NCR5380_init(instance),
254  * after setting the appropriate host specific fields and ID.  If the
255  * driver wishes to autoprobe for an IRQ line, the NCR5380_probe_irq(instance,
256  * possible) function may be used.  Before the specific driver initialization
257  * code finishes, NCR5380_print_options should be called.
258  */
259 
260 static struct Scsi_Host *first_instance = NULL;
261 static struct scsi_host_template *the_template = NULL;
262 
263 /* Macros ease life... :-) */
264 #define	SETUP_HOSTDATA(in)				\
265     struct NCR5380_hostdata *hostdata =			\
266 	(struct NCR5380_hostdata *)(in)->hostdata
267 #define	HOSTDATA(in) ((struct NCR5380_hostdata *)(in)->hostdata)
268 
269 #define	NEXT(cmd)	(*(struct scsi_cmnd **)&((cmd)->host_scribble))
270 #define	NEXTADDR(cmd)	((struct scsi_cmnd **)&((cmd)->host_scribble))
271 
272 #define	HOSTNO		instance->host_no
273 #define	H_NO(cmd)	(cmd)->device->host->host_no
274 
275 #define SGADDR(buffer) (void *)(((unsigned long)sg_virt(((buffer)))))
276 
277 #ifdef SUPPORT_TAGS
278 
279 /*
280  * Functions for handling tagged queuing
281  * =====================================
282  *
283  * ++roman (01/96): Now I've implemented SCSI-2 tagged queuing. Some notes:
284  *
285  * Using consecutive numbers for the tags is no good idea in my eyes. There
286  * could be wrong re-usings if the counter (8 bit!) wraps and some early
287  * command has been preempted for a long time. My solution: a bitfield for
288  * remembering used tags.
289  *
290  * There's also the problem that each target has a certain queue size, but we
291  * cannot know it in advance :-( We just see a QUEUE_FULL status being
292  * returned. So, in this case, the driver internal queue size assumption is
293  * reduced to the number of active tags if QUEUE_FULL is returned by the
294  * target. The command is returned to the mid-level, but with status changed
295  * to BUSY, since --as I've seen-- the mid-level can't handle QUEUE_FULL
296  * correctly.
297  *
298  * We're also not allowed running tagged commands as long as an untagged
299  * command is active. And REQUEST SENSE commands after a contingent allegiance
300  * condition _must_ be untagged. To keep track whether an untagged command has
301  * been issued, the host->busy array is still employed, as it is without
302  * support for tagged queuing.
303  *
304  * One could suspect that there are possible race conditions between
305  * is_lun_busy(), cmd_get_tag() and cmd_free_tag(). But I think this isn't the
306  * case: is_lun_busy() and cmd_get_tag() are both called from NCR5380_main(),
307  * which already guaranteed to be running at most once. It is also the only
308  * place where tags/LUNs are allocated. So no other allocation can slip
309  * between that pair, there could only happen a reselection, which can free a
310  * tag, but that doesn't hurt. Only the sequence in cmd_free_tag() becomes
311  * important: the tag bit must be cleared before 'nr_allocated' is decreased.
312  */
313 
314 /* -1 for TAG_NONE is not possible with unsigned char cmd->tag */
315 #undef TAG_NONE
316 #define TAG_NONE 0xff
317 
318 /* For the m68k, the number of bits in 'allocated' must be a multiple of 32! */
319 #if (MAX_TAGS % 32) != 0
320 #error "MAX_TAGS must be a multiple of 32!"
321 #endif
322 
323 typedef struct {
324     char	allocated[MAX_TAGS/8];
325     int		nr_allocated;
326     int		queue_size;
327 } TAG_ALLOC;
328 
329 static TAG_ALLOC TagAlloc[8][8]; /* 8 targets and 8 LUNs */
330 
331 
init_tags(void)332 static void __init init_tags( void )
333 {
334     int target, lun;
335     TAG_ALLOC *ta;
336 
337     if (!setup_use_tagged_queuing)
338 	return;
339 
340     for( target = 0; target < 8; ++target ) {
341 	for( lun = 0; lun < 8; ++lun ) {
342 	    ta = &TagAlloc[target][lun];
343 	    memset( &ta->allocated, 0, MAX_TAGS/8 );
344 	    ta->nr_allocated = 0;
345 	    /* At the beginning, assume the maximum queue size we could
346 	     * support (MAX_TAGS). This value will be decreased if the target
347 	     * returns QUEUE_FULL status.
348 	     */
349 	    ta->queue_size = MAX_TAGS;
350 	}
351     }
352 }
353 
354 
355 /* Check if we can issue a command to this LUN: First see if the LUN is marked
356  * busy by an untagged command. If the command should use tagged queuing, also
357  * check that there is a free tag and the target's queue won't overflow. This
358  * function should be called with interrupts disabled to avoid race
359  * conditions.
360  */
361 
is_lun_busy(struct scsi_cmnd * cmd,int should_be_tagged)362 static int is_lun_busy(struct scsi_cmnd *cmd, int should_be_tagged)
363 {
364     SETUP_HOSTDATA(cmd->device->host);
365 
366     if (hostdata->busy[cmd->device->id] & (1 << cmd->device->lun))
367 	return( 1 );
368     if (!should_be_tagged ||
369 	!setup_use_tagged_queuing || !cmd->device->tagged_supported)
370 	return( 0 );
371     if (TagAlloc[cmd->device->id][cmd->device->lun].nr_allocated >=
372 	TagAlloc[cmd->device->id][cmd->device->lun].queue_size ) {
373 	TAG_PRINTK( "scsi%d: target %d lun %d: no free tags\n",
374 		    H_NO(cmd), cmd->device->id, cmd->device->lun );
375 	return( 1 );
376     }
377     return( 0 );
378 }
379 
380 
381 /* Allocate a tag for a command (there are no checks anymore, check_lun_busy()
382  * must be called before!), or reserve the LUN in 'busy' if the command is
383  * untagged.
384  */
385 
cmd_get_tag(struct scsi_cmnd * cmd,int should_be_tagged)386 static void cmd_get_tag(struct scsi_cmnd *cmd, int should_be_tagged)
387 {
388     SETUP_HOSTDATA(cmd->device->host);
389 
390     /* If we or the target don't support tagged queuing, allocate the LUN for
391      * an untagged command.
392      */
393     if (!should_be_tagged ||
394 	!setup_use_tagged_queuing || !cmd->device->tagged_supported) {
395 	cmd->tag = TAG_NONE;
396 	hostdata->busy[cmd->device->id] |= (1 << cmd->device->lun);
397 	TAG_PRINTK( "scsi%d: target %d lun %d now allocated by untagged "
398 		    "command\n", H_NO(cmd), cmd->device->id, cmd->device->lun );
399     }
400     else {
401 	TAG_ALLOC *ta = &TagAlloc[cmd->device->id][cmd->device->lun];
402 
403 	cmd->tag = find_first_zero_bit( &ta->allocated, MAX_TAGS );
404 	set_bit( cmd->tag, &ta->allocated );
405 	ta->nr_allocated++;
406 	TAG_PRINTK( "scsi%d: using tag %d for target %d lun %d "
407 		    "(now %d tags in use)\n",
408 		    H_NO(cmd), cmd->tag, cmd->device->id, cmd->device->lun,
409 		    ta->nr_allocated );
410     }
411 }
412 
413 
414 /* Mark the tag of command 'cmd' as free, or in case of an untagged command,
415  * unlock the LUN.
416  */
417 
cmd_free_tag(struct scsi_cmnd * cmd)418 static void cmd_free_tag(struct scsi_cmnd *cmd)
419 {
420     SETUP_HOSTDATA(cmd->device->host);
421 
422     if (cmd->tag == TAG_NONE) {
423 	hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
424 	TAG_PRINTK( "scsi%d: target %d lun %d untagged cmd finished\n",
425 		    H_NO(cmd), cmd->device->id, cmd->device->lun );
426     }
427     else if (cmd->tag >= MAX_TAGS) {
428 	printk(KERN_NOTICE "scsi%d: trying to free bad tag %d!\n",
429 		H_NO(cmd), cmd->tag );
430     }
431     else {
432 	TAG_ALLOC *ta = &TagAlloc[cmd->device->id][cmd->device->lun];
433 	clear_bit( cmd->tag, &ta->allocated );
434 	ta->nr_allocated--;
435 	TAG_PRINTK( "scsi%d: freed tag %d for target %d lun %d\n",
436 		    H_NO(cmd), cmd->tag, cmd->device->id, cmd->device->lun );
437     }
438 }
439 
440 
free_all_tags(void)441 static void free_all_tags( void )
442 {
443     int target, lun;
444     TAG_ALLOC *ta;
445 
446     if (!setup_use_tagged_queuing)
447 	return;
448 
449     for( target = 0; target < 8; ++target ) {
450 	for( lun = 0; lun < 8; ++lun ) {
451 	    ta = &TagAlloc[target][lun];
452 	    memset( &ta->allocated, 0, MAX_TAGS/8 );
453 	    ta->nr_allocated = 0;
454 	}
455     }
456 }
457 
458 #endif /* SUPPORT_TAGS */
459 
460 
461 /*
462  * Function: void merge_contiguous_buffers(struct scsi_cmnd *cmd)
463  *
464  * Purpose: Try to merge several scatter-gather requests into one DMA
465  *    transfer. This is possible if the scatter buffers lie on
466  *    physical contiguous addresses.
467  *
468  * Parameters: struct scsi_cmnd *cmd
469  *    The command to work on. The first scatter buffer's data are
470  *    assumed to be already transfered into ptr/this_residual.
471  */
472 
merge_contiguous_buffers(struct scsi_cmnd * cmd)473 static void merge_contiguous_buffers(struct scsi_cmnd *cmd)
474 {
475     unsigned long endaddr;
476 #if (NDEBUG & NDEBUG_MERGING)
477     unsigned long oldlen = cmd->SCp.this_residual;
478     int		  cnt = 1;
479 #endif
480 
481     for (endaddr = virt_to_phys(cmd->SCp.ptr + cmd->SCp.this_residual - 1) + 1;
482 	 cmd->SCp.buffers_residual &&
483 	 virt_to_phys(SGADDR(&(cmd->SCp.buffer[1]))) == endaddr; ) {
484 
485 	MER_PRINTK("VTOP(%p) == %08lx -> merging\n",
486 		   SGADDR(&(cmd->SCp.buffer[1])), endaddr);
487 #if (NDEBUG & NDEBUG_MERGING)
488 	++cnt;
489 #endif
490 	++cmd->SCp.buffer;
491 	--cmd->SCp.buffers_residual;
492 	cmd->SCp.this_residual += cmd->SCp.buffer->length;
493 	endaddr += cmd->SCp.buffer->length;
494     }
495 #if (NDEBUG & NDEBUG_MERGING)
496     if (oldlen != cmd->SCp.this_residual)
497 	MER_PRINTK("merged %d buffers from %p, new length %08x\n",
498 		   cnt, cmd->SCp.ptr, cmd->SCp.this_residual);
499 #endif
500 }
501 
502 /*
503  * Function : void initialize_SCp(struct scsi_cmnd *cmd)
504  *
505  * Purpose : initialize the saved data pointers for cmd to point to the
506  *	start of the buffer.
507  *
508  * Inputs : cmd - struct scsi_cmnd structure to have pointers reset.
509  */
510 
initialize_SCp(struct scsi_cmnd * cmd)511 static __inline__ void initialize_SCp(struct scsi_cmnd *cmd)
512 {
513     /*
514      * Initialize the Scsi Pointer field so that all of the commands in the
515      * various queues are valid.
516      */
517 
518     if (scsi_bufflen(cmd)) {
519 	cmd->SCp.buffer = scsi_sglist(cmd);
520 	cmd->SCp.buffers_residual = scsi_sg_count(cmd) - 1;
521 	cmd->SCp.ptr = (char *) SGADDR(cmd->SCp.buffer);
522 	cmd->SCp.this_residual = cmd->SCp.buffer->length;
523 
524 	/* ++roman: Try to merge some scatter-buffers if they are at
525 	 * contiguous physical addresses.
526 	 */
527 //	merge_contiguous_buffers( cmd );
528     } else {
529 	cmd->SCp.buffer = NULL;
530 	cmd->SCp.buffers_residual = 0;
531 	cmd->SCp.ptr = NULL;
532 	cmd->SCp.this_residual = 0;
533     }
534 
535 }
536 
537 #include <linux/delay.h>
538 
539 #if 1
540 static struct {
541     unsigned char mask;
542     const char * name;}
543 signals[] = {{ SR_DBP, "PARITY"}, { SR_RST, "RST" }, { SR_BSY, "BSY" },
544     { SR_REQ, "REQ" }, { SR_MSG, "MSG" }, { SR_CD,  "CD" }, { SR_IO, "IO" },
545     { SR_SEL, "SEL" }, {0, NULL}},
546 basrs[] = {{BASR_ATN, "ATN"}, {BASR_ACK, "ACK"}, {0, NULL}},
547 icrs[] = {{ICR_ASSERT_RST, "ASSERT RST"},{ICR_ASSERT_ACK, "ASSERT ACK"},
548     {ICR_ASSERT_BSY, "ASSERT BSY"}, {ICR_ASSERT_SEL, "ASSERT SEL"},
549     {ICR_ASSERT_ATN, "ASSERT ATN"}, {ICR_ASSERT_DATA, "ASSERT DATA"},
550     {0, NULL}},
551 mrs[] = {{MR_BLOCK_DMA_MODE, "MODE BLOCK DMA"}, {MR_TARGET, "MODE TARGET"},
552     {MR_ENABLE_PAR_CHECK, "MODE PARITY CHECK"}, {MR_ENABLE_PAR_INTR,
553     "MODE PARITY INTR"}, {MR_ENABLE_EOP_INTR,"MODE EOP INTR"},
554     {MR_MONITOR_BSY, "MODE MONITOR BSY"},
555     {MR_DMA_MODE, "MODE DMA"}, {MR_ARBITRATE, "MODE ARBITRATION"},
556     {0, NULL}};
557 
558 /*
559  * Function : void NCR5380_print(struct Scsi_Host *instance)
560  *
561  * Purpose : print the SCSI bus signals for debugging purposes
562  *
563  * Input : instance - which NCR5380
564  */
565 
NCR5380_print(struct Scsi_Host * instance)566 static void NCR5380_print(struct Scsi_Host *instance) {
567     unsigned char status, data, basr, mr, icr, i;
568     unsigned long flags;
569 
570     local_irq_save(flags);
571     data = NCR5380_read(CURRENT_SCSI_DATA_REG);
572     status = NCR5380_read(STATUS_REG);
573     mr = NCR5380_read(MODE_REG);
574     icr = NCR5380_read(INITIATOR_COMMAND_REG);
575     basr = NCR5380_read(BUS_AND_STATUS_REG);
576     local_irq_restore(flags);
577     printk("STATUS_REG: %02x ", status);
578     for (i = 0; signals[i].mask ; ++i)
579 	if (status & signals[i].mask)
580 	    printk(",%s", signals[i].name);
581     printk("\nBASR: %02x ", basr);
582     for (i = 0; basrs[i].mask ; ++i)
583 	if (basr & basrs[i].mask)
584 	    printk(",%s", basrs[i].name);
585     printk("\nICR: %02x ", icr);
586     for (i = 0; icrs[i].mask; ++i)
587 	if (icr & icrs[i].mask)
588 	    printk(",%s", icrs[i].name);
589     printk("\nMODE: %02x ", mr);
590     for (i = 0; mrs[i].mask; ++i)
591 	if (mr & mrs[i].mask)
592 	    printk(",%s", mrs[i].name);
593     printk("\n");
594 }
595 
596 static struct {
597     unsigned char value;
598     const char *name;
599 } phases[] = {
600     {PHASE_DATAOUT, "DATAOUT"}, {PHASE_DATAIN, "DATAIN"}, {PHASE_CMDOUT, "CMDOUT"},
601     {PHASE_STATIN, "STATIN"}, {PHASE_MSGOUT, "MSGOUT"}, {PHASE_MSGIN, "MSGIN"},
602     {PHASE_UNKNOWN, "UNKNOWN"}};
603 
604 /*
605  * Function : void NCR5380_print_phase(struct Scsi_Host *instance)
606  *
607  * Purpose : print the current SCSI phase for debugging purposes
608  *
609  * Input : instance - which NCR5380
610  */
611 
NCR5380_print_phase(struct Scsi_Host * instance)612 static void NCR5380_print_phase(struct Scsi_Host *instance)
613 {
614     unsigned char status;
615     int i;
616 
617     status = NCR5380_read(STATUS_REG);
618     if (!(status & SR_REQ))
619 	printk(KERN_DEBUG "scsi%d: REQ not asserted, phase unknown.\n", HOSTNO);
620     else {
621 	for (i = 0; (phases[i].value != PHASE_UNKNOWN) &&
622 	    (phases[i].value != (status & PHASE_MASK)); ++i);
623 	printk(KERN_DEBUG "scsi%d: phase %s\n", HOSTNO, phases[i].name);
624     }
625 }
626 
627 #else /* !NDEBUG */
628 
629 /* dummies... */
NCR5380_print(struct Scsi_Host * instance)630 __inline__ void NCR5380_print(struct Scsi_Host *instance) { };
NCR5380_print_phase(struct Scsi_Host * instance)631 __inline__ void NCR5380_print_phase(struct Scsi_Host *instance) { };
632 
633 #endif
634 
635 /*
636  * ++roman: New scheme of calling NCR5380_main()
637  *
638  * If we're not in an interrupt, we can call our main directly, it cannot be
639  * already running. Else, we queue it on a task queue, if not 'main_running'
640  * tells us that a lower level is already executing it. This way,
641  * 'main_running' needs not be protected in a special way.
642  *
643  * queue_main() is a utility function for putting our main onto the task
644  * queue, if main_running is false. It should be called only from a
645  * interrupt or bottom half.
646  */
647 
648 #include <linux/workqueue.h>
649 #include <linux/interrupt.h>
650 
651 static volatile int main_running = 0;
652 static DECLARE_WORK(NCR5380_tqueue, NCR5380_main);
653 
queue_main(void)654 static __inline__ void queue_main(void)
655 {
656     if (!main_running) {
657 	/* If in interrupt and NCR5380_main() not already running,
658 	   queue it on the 'immediate' task queue, to be processed
659 	   immediately after the current interrupt processing has
660 	   finished. */
661 	schedule_work(&NCR5380_tqueue);
662     }
663     /* else: nothing to do: the running NCR5380_main() will pick up
664        any newly queued command. */
665 }
666 
667 
NCR5380_all_init(void)668 static inline void NCR5380_all_init (void)
669 {
670     static int done = 0;
671     if (!done) {
672 	INI_PRINTK("scsi : NCR5380_all_init()\n");
673 	done = 1;
674     }
675 }
676 
677 
678 /*
679  * Function : void NCR58380_print_options (struct Scsi_Host *instance)
680  *
681  * Purpose : called by probe code indicating the NCR5380 driver
682  *	     options that were selected.
683  *
684  * Inputs : instance, pointer to this instance.  Unused.
685  */
686 
NCR5380_print_options(struct Scsi_Host * instance)687 static void __init NCR5380_print_options (struct Scsi_Host *instance)
688 {
689     printk(" generic options"
690 #ifdef AUTOSENSE
691     " AUTOSENSE"
692 #endif
693 #ifdef REAL_DMA
694     " REAL DMA"
695 #endif
696 #ifdef PARITY
697     " PARITY"
698 #endif
699 #ifdef SUPPORT_TAGS
700     " SCSI-2 TAGGED QUEUING"
701 #endif
702     );
703     printk(" generic release=%d", NCR5380_PUBLIC_RELEASE);
704 }
705 
706 /*
707  * Function : void NCR5380_print_status (struct Scsi_Host *instance)
708  *
709  * Purpose : print commands in the various queues, called from
710  *	NCR5380_abort and NCR5380_debug to aid debugging.
711  *
712  * Inputs : instance, pointer to this instance.
713  */
714 
NCR5380_print_status(struct Scsi_Host * instance)715 static void NCR5380_print_status (struct Scsi_Host *instance)
716 {
717     char *pr_bfr;
718     char *start;
719     int len;
720 
721     NCR_PRINT(NDEBUG_ANY);
722     NCR_PRINT_PHASE(NDEBUG_ANY);
723 
724     pr_bfr = (char *) __get_free_page(GFP_ATOMIC);
725     if (!pr_bfr) {
726 	printk("NCR5380_print_status: no memory for print buffer\n");
727 	return;
728     }
729     len = NCR5380_proc_info(instance, pr_bfr, &start, 0, PAGE_SIZE, 0);
730     pr_bfr[len] = 0;
731     printk("\n%s\n", pr_bfr);
732     free_page((unsigned long) pr_bfr);
733 }
734 
735 
736 /******************************************/
737 /*
738  * /proc/scsi/[dtc pas16 t128 generic]/[0-ASC_NUM_BOARD_SUPPORTED]
739  *
740  * *buffer: I/O buffer
741  * **start: if inout == FALSE pointer into buffer where user read should start
742  * offset: current offset
743  * length: length of buffer
744  * hostno: Scsi_Host host_no
745  * inout: TRUE - user is writing; FALSE - user is reading
746  *
747  * Return the number of bytes read from or written
748 */
749 
750 #undef SPRINTF
751 #define SPRINTF(fmt,args...) \
752   do { if (pos + strlen(fmt) + 20 /* slop */ < buffer + length) \
753 	 pos += sprintf(pos, fmt , ## args); } while(0)
754 static
755 char *lprint_Scsi_Cmnd(struct scsi_cmnd *cmd, char *pos, char *buffer,
756 		       int length);
757 
NCR5380_proc_info(struct Scsi_Host * instance,char * buffer,char ** start,off_t offset,int length,int inout)758 static int NCR5380_proc_info(struct Scsi_Host *instance, char *buffer,
759 			     char **start, off_t offset, int length, int inout)
760 {
761     char *pos = buffer;
762     struct NCR5380_hostdata *hostdata;
763     struct scsi_cmnd *ptr;
764     unsigned long flags;
765     off_t begin = 0;
766 #define check_offset()				\
767     do {					\
768 	if (pos - buffer < offset - begin) {	\
769 	    begin += pos - buffer;		\
770 	    pos = buffer;			\
771 	}					\
772     } while (0)
773 
774     hostdata = (struct NCR5380_hostdata *)instance->hostdata;
775 
776     if (inout) { /* Has data been written to the file ? */
777 	return(-ENOSYS);  /* Currently this is a no-op */
778     }
779     SPRINTF("NCR5380 core release=%d.\n", NCR5380_PUBLIC_RELEASE);
780     check_offset();
781     local_irq_save(flags);
782     SPRINTF("NCR5380: coroutine is%s running.\n", main_running ? "" : "n't");
783     check_offset();
784     if (!hostdata->connected)
785 	SPRINTF("scsi%d: no currently connected command\n", HOSTNO);
786     else
787 	pos = lprint_Scsi_Cmnd ((struct scsi_cmnd *) hostdata->connected,
788 				pos, buffer, length);
789     SPRINTF("scsi%d: issue_queue\n", HOSTNO);
790     check_offset();
791     for (ptr = (struct scsi_cmnd *) hostdata->issue_queue; ptr; ptr = NEXT(ptr))
792     {
793 	pos = lprint_Scsi_Cmnd (ptr, pos, buffer, length);
794 	check_offset();
795     }
796 
797     SPRINTF("scsi%d: disconnected_queue\n", HOSTNO);
798     check_offset();
799     for (ptr = (struct scsi_cmnd *) hostdata->disconnected_queue; ptr;
800 	 ptr = NEXT(ptr)) {
801 	pos = lprint_Scsi_Cmnd (ptr, pos, buffer, length);
802 	check_offset();
803     }
804 
805     local_irq_restore(flags);
806     *start = buffer + (offset - begin);
807     if (pos - buffer < offset - begin)
808 	return 0;
809     else if (pos - buffer - (offset - begin) < length)
810 	return pos - buffer - (offset - begin);
811     return length;
812 }
813 
lprint_Scsi_Cmnd(struct scsi_cmnd * cmd,char * pos,char * buffer,int length)814 static char *lprint_Scsi_Cmnd(struct scsi_cmnd *cmd, char *pos, char *buffer,
815 			      int length)
816 {
817     int i, s;
818     unsigned char *command;
819     SPRINTF("scsi%d: destination target %d, lun %d\n",
820 	    H_NO(cmd), cmd->device->id, cmd->device->lun);
821     SPRINTF("        command = ");
822     command = cmd->cmnd;
823     SPRINTF("%2d (0x%02x)", command[0], command[0]);
824     for (i = 1, s = COMMAND_SIZE(command[0]); i < s; ++i)
825 	SPRINTF(" %02x", command[i]);
826     SPRINTF("\n");
827     return pos;
828 }
829 
830 
831 /*
832  * Function : void NCR5380_init (struct Scsi_Host *instance)
833  *
834  * Purpose : initializes *instance and corresponding 5380 chip.
835  *
836  * Inputs : instance - instantiation of the 5380 driver.
837  *
838  * Notes : I assume that the host, hostno, and id bits have been
839  * 	set correctly.  I don't care about the irq and other fields.
840  *
841  */
842 
NCR5380_init(struct Scsi_Host * instance,int flags)843 static int NCR5380_init (struct Scsi_Host *instance, int flags)
844 {
845     int i;
846     SETUP_HOSTDATA(instance);
847 
848     NCR5380_all_init();
849 
850     hostdata->aborted = 0;
851     hostdata->id_mask = 1 << instance->this_id;
852     hostdata->id_higher_mask = 0;
853     for (i = hostdata->id_mask; i <= 0x80; i <<= 1)
854 	if (i > hostdata->id_mask)
855 	    hostdata->id_higher_mask |= i;
856     for (i = 0; i < 8; ++i)
857 	hostdata->busy[i] = 0;
858 #ifdef SUPPORT_TAGS
859     init_tags();
860 #endif
861 #if defined (REAL_DMA)
862     hostdata->dma_len = 0;
863 #endif
864     hostdata->targets_present = 0;
865     hostdata->connected = NULL;
866     hostdata->issue_queue = NULL;
867     hostdata->disconnected_queue = NULL;
868     hostdata->flags = FLAG_CHECK_LAST_BYTE_SENT;
869 
870     if (!the_template) {
871 	the_template = instance->hostt;
872 	first_instance = instance;
873     }
874 
875 
876 #ifndef AUTOSENSE
877     if ((instance->cmd_per_lun > 1) || (instance->can_queue > 1))
878 	 printk("scsi%d: WARNING : support for multiple outstanding commands enabled\n"
879 	        "        without AUTOSENSE option, contingent allegiance conditions may\n"
880 	        "        be incorrectly cleared.\n", HOSTNO);
881 #endif /* def AUTOSENSE */
882 
883     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
884     NCR5380_write(MODE_REG, MR_BASE);
885     NCR5380_write(TARGET_COMMAND_REG, 0);
886     NCR5380_write(SELECT_ENABLE_REG, 0);
887 
888     return 0;
889 }
890 
891 /*
892  * Function : int NCR5380_queue_command (struct scsi_cmnd *cmd,
893  *	void (*done)(struct scsi_cmnd *))
894  *
895  * Purpose :  enqueues a SCSI command
896  *
897  * Inputs : cmd - SCSI command, done - function called on completion, with
898  *	a pointer to the command descriptor.
899  *
900  * Returns : 0
901  *
902  * Side effects :
903  *      cmd is added to the per instance issue_queue, with minor
904  *	twiddling done to the host specific fields of cmd.  If the
905  *	main coroutine is not running, it is restarted.
906  *
907  */
908 
909 /* Only make static if a wrapper function is used */
NCR5380_queue_command(struct scsi_cmnd * cmd,void (* done)(struct scsi_cmnd *))910 static int NCR5380_queue_command(struct scsi_cmnd *cmd,
911 				 void (*done)(struct scsi_cmnd *))
912 {
913     SETUP_HOSTDATA(cmd->device->host);
914     struct scsi_cmnd *tmp;
915     unsigned long flags;
916 
917 #if (NDEBUG & NDEBUG_NO_WRITE)
918     switch (cmd->cmnd[0]) {
919     case WRITE_6:
920     case WRITE_10:
921 	printk(KERN_NOTICE "scsi%d: WRITE attempted with NO_WRITE debugging flag set\n",
922 	       H_NO(cmd));
923 	cmd->result = (DID_ERROR << 16);
924 	done(cmd);
925 	return 0;
926     }
927 #endif /* (NDEBUG & NDEBUG_NO_WRITE) */
928 
929 
930 #ifdef NCR5380_STATS
931 # if 0
932     if (!hostdata->connected && !hostdata->issue_queue &&
933 	!hostdata->disconnected_queue) {
934 	hostdata->timebase = jiffies;
935     }
936 # endif
937 # ifdef NCR5380_STAT_LIMIT
938     if (scsi_bufflen(cmd) > NCR5380_STAT_LIMIT)
939 # endif
940 	switch (cmd->cmnd[0])
941 	{
942 	    case WRITE:
943 	    case WRITE_6:
944 	    case WRITE_10:
945 		hostdata->time_write[cmd->device->id] -= (jiffies - hostdata->timebase);
946 		hostdata->bytes_write[cmd->device->id] += scsi_bufflen(cmd);
947 		hostdata->pendingw++;
948 		break;
949 	    case READ:
950 	    case READ_6:
951 	    case READ_10:
952 		hostdata->time_read[cmd->device->id] -= (jiffies - hostdata->timebase);
953 		hostdata->bytes_read[cmd->device->id] += scsi_bufflen(cmd);
954 		hostdata->pendingr++;
955 		break;
956 	}
957 #endif
958 
959     /*
960      * We use the host_scribble field as a pointer to the next command
961      * in a queue
962      */
963 
964     NEXT(cmd) = NULL;
965     cmd->scsi_done = done;
966 
967     cmd->result = 0;
968 
969 
970     /*
971      * Insert the cmd into the issue queue. Note that REQUEST SENSE
972      * commands are added to the head of the queue since any command will
973      * clear the contingent allegiance condition that exists and the
974      * sense data is only guaranteed to be valid while the condition exists.
975      */
976 
977     local_irq_save(flags);
978     /* ++guenther: now that the issue queue is being set up, we can lock ST-DMA.
979      * Otherwise a running NCR5380_main may steal the lock.
980      * Lock before actually inserting due to fairness reasons explained in
981      * atari_scsi.c. If we insert first, then it's impossible for this driver
982      * to release the lock.
983      * Stop timer for this command while waiting for the lock, or timeouts
984      * may happen (and they really do), and it's no good if the command doesn't
985      * appear in any of the queues.
986      * ++roman: Just disabling the NCR interrupt isn't sufficient here,
987      * because also a timer int can trigger an abort or reset, which would
988      * alter queues and touch the lock.
989      */
990     if (!(hostdata->issue_queue) || (cmd->cmnd[0] == REQUEST_SENSE)) {
991 	LIST(cmd, hostdata->issue_queue);
992 	NEXT(cmd) = hostdata->issue_queue;
993 	hostdata->issue_queue = cmd;
994     } else {
995 	for (tmp = (struct scsi_cmnd *)hostdata->issue_queue;
996 	     NEXT(tmp); tmp = NEXT(tmp))
997 	    ;
998 	LIST(cmd, tmp);
999 	NEXT(tmp) = cmd;
1000     }
1001 
1002     local_irq_restore(flags);
1003 
1004     QU_PRINTK("scsi%d: command added to %s of queue\n", H_NO(cmd),
1005 	      (cmd->cmnd[0] == REQUEST_SENSE) ? "head" : "tail");
1006 
1007     /* If queue_command() is called from an interrupt (real one or bottom
1008      * half), we let queue_main() do the job of taking care about main. If it
1009      * is already running, this is a no-op, else main will be queued.
1010      *
1011      * If we're not in an interrupt, we can call NCR5380_main()
1012      * unconditionally, because it cannot be already running.
1013      */
1014     if (in_interrupt() || ((flags >> 8) & 7) >= 6)
1015 	queue_main();
1016     else
1017 	NCR5380_main(NULL);
1018     return 0;
1019 }
1020 
1021 /*
1022  * Function : NCR5380_main (void)
1023  *
1024  * Purpose : NCR5380_main is a coroutine that runs as long as more work can
1025  *	be done on the NCR5380 host adapters in a system.  Both
1026  *	NCR5380_queue_command() and NCR5380_intr() will try to start it
1027  *	in case it is not running.
1028  *
1029  * NOTE : NCR5380_main exits with interrupts *disabled*, the caller should
1030  *  reenable them.  This prevents reentrancy and kernel stack overflow.
1031  */
1032 
NCR5380_main(struct work_struct * bl)1033 static void NCR5380_main (struct work_struct *bl)
1034 {
1035     struct scsi_cmnd *tmp, *prev;
1036     struct Scsi_Host *instance = first_instance;
1037     struct NCR5380_hostdata *hostdata = HOSTDATA(instance);
1038     int done;
1039     unsigned long flags;
1040 
1041     /*
1042      * We run (with interrupts disabled) until we're sure that none of
1043      * the host adapters have anything that can be done, at which point
1044      * we set main_running to 0 and exit.
1045      *
1046      * Interrupts are enabled before doing various other internal
1047      * instructions, after we've decided that we need to run through
1048      * the loop again.
1049      *
1050      * this should prevent any race conditions.
1051      *
1052      * ++roman: Just disabling the NCR interrupt isn't sufficient here,
1053      * because also a timer int can trigger an abort or reset, which can
1054      * alter queues and touch the Falcon lock.
1055      */
1056 
1057     /* Tell int handlers main() is now already executing.  Note that
1058        no races are possible here. If an int comes in before
1059        'main_running' is set here, and queues/executes main via the
1060        task queue, it doesn't do any harm, just this instance of main
1061        won't find any work left to do. */
1062     if (main_running)
1063     	return;
1064     main_running = 1;
1065 
1066     local_save_flags(flags);
1067     do {
1068 	local_irq_disable(); /* Freeze request queues */
1069 	done = 1;
1070 
1071 	if (!hostdata->connected) {
1072 	    MAIN_PRINTK( "scsi%d: not connected\n", HOSTNO );
1073 	    /*
1074 	     * Search through the issue_queue for a command destined
1075 	     * for a target that's not busy.
1076 	     */
1077 #if (NDEBUG & NDEBUG_LISTS)
1078 	    for (tmp = (struct scsi_cmnd *) hostdata->issue_queue, prev = NULL;
1079 		 tmp && (tmp != prev); prev = tmp, tmp = NEXT(tmp))
1080 		;
1081 	    if ((tmp == prev) && tmp) printk(" LOOP\n");/* else printk("\n");*/
1082 #endif
1083 	    for (tmp = (struct scsi_cmnd *) hostdata->issue_queue,
1084 		 prev = NULL; tmp; prev = tmp, tmp = NEXT(tmp) ) {
1085 
1086 #if (NDEBUG & NDEBUG_LISTS)
1087 		if (prev != tmp)
1088 		    printk("MAIN tmp=%p   target=%d   busy=%d lun=%d\n",
1089 			   tmp, tmp->target, hostdata->busy[tmp->target],
1090 			   tmp->lun);
1091 #endif
1092 		/*  When we find one, remove it from the issue queue. */
1093 		/* ++guenther: possible race with Falcon locking */
1094 		if (
1095 #ifdef SUPPORT_TAGS
1096 		    !is_lun_busy( tmp, tmp->cmnd[0] != REQUEST_SENSE)
1097 #else
1098 		    !(hostdata->busy[tmp->device->id] & (1 << tmp->device->lun))
1099 #endif
1100 		    ) {
1101 		    /* ++guenther: just to be sure, this must be atomic */
1102 		    local_irq_disable();
1103 		    if (prev) {
1104 		        REMOVE(prev, NEXT(prev), tmp, NEXT(tmp));
1105 			NEXT(prev) = NEXT(tmp);
1106 		    } else {
1107 		        REMOVE(-1, hostdata->issue_queue, tmp, NEXT(tmp));
1108 			hostdata->issue_queue = NEXT(tmp);
1109 		    }
1110 		    NEXT(tmp) = NULL;
1111 
1112 		    /* reenable interrupts after finding one */
1113 		    local_irq_restore(flags);
1114 
1115 		    /*
1116 		     * Attempt to establish an I_T_L nexus here.
1117 		     * On success, instance->hostdata->connected is set.
1118 		     * On failure, we must add the command back to the
1119 		     *   issue queue so we can keep trying.
1120 		     */
1121 		    MAIN_PRINTK("scsi%d: main(): command for target %d "
1122 				"lun %d removed from issue_queue\n",
1123 				HOSTNO, tmp->target, tmp->lun);
1124 		    /*
1125 		     * REQUEST SENSE commands are issued without tagged
1126 		     * queueing, even on SCSI-II devices because the
1127 		     * contingent allegiance condition exists for the
1128 		     * entire unit.
1129 		     */
1130 		    /* ++roman: ...and the standard also requires that
1131 		     * REQUEST SENSE command are untagged.
1132 		     */
1133 
1134 #ifdef SUPPORT_TAGS
1135 		    cmd_get_tag( tmp, tmp->cmnd[0] != REQUEST_SENSE );
1136 #endif
1137 		    if (!NCR5380_select(instance, tmp,
1138 			    (tmp->cmnd[0] == REQUEST_SENSE) ? TAG_NONE :
1139 			    TAG_NEXT)) {
1140 			break;
1141 		    } else {
1142 			local_irq_disable();
1143 			LIST(tmp, hostdata->issue_queue);
1144 			NEXT(tmp) = hostdata->issue_queue;
1145 			hostdata->issue_queue = tmp;
1146 #ifdef SUPPORT_TAGS
1147 			cmd_free_tag( tmp );
1148 #endif
1149 			local_irq_restore(flags);
1150 			MAIN_PRINTK("scsi%d: main(): select() failed, "
1151 				    "returned to issue_queue\n", HOSTNO);
1152 			if (hostdata->connected)
1153 			    break;
1154 		    }
1155 		} /* if target/lun/target queue is not busy */
1156 	    } /* for issue_queue */
1157 	} /* if (!hostdata->connected) */
1158 	if (hostdata->connected
1159 #ifdef REAL_DMA
1160 	    && !hostdata->dma_len
1161 #endif
1162 	    ) {
1163 	    local_irq_restore(flags);
1164 	    MAIN_PRINTK("scsi%d: main: performing information transfer\n",
1165 			HOSTNO);
1166 	    NCR5380_information_transfer(instance);
1167 	    MAIN_PRINTK("scsi%d: main: done set false\n", HOSTNO);
1168 	    done = 0;
1169 	}
1170     } while (!done);
1171 
1172     /* Better allow ints _after_ 'main_running' has been cleared, else
1173        an interrupt could believe we'll pick up the work it left for
1174        us, but we won't see it anymore here... */
1175     main_running = 0;
1176     local_irq_restore(flags);
1177 }
1178 
1179 
1180 #ifdef REAL_DMA
1181 /*
1182  * Function : void NCR5380_dma_complete (struct Scsi_Host *instance)
1183  *
1184  * Purpose : Called by interrupt handler when DMA finishes or a phase
1185  *	mismatch occurs (which would finish the DMA transfer).
1186  *
1187  * Inputs : instance - this instance of the NCR5380.
1188  *
1189  */
1190 
NCR5380_dma_complete(struct Scsi_Host * instance)1191 static void NCR5380_dma_complete( struct Scsi_Host *instance )
1192 {
1193     SETUP_HOSTDATA(instance);
1194     int           transfered;
1195     unsigned char **data;
1196     volatile int  *count;
1197 
1198     if (!hostdata->connected) {
1199 	printk(KERN_WARNING "scsi%d: received end of DMA interrupt with "
1200 	       "no connected cmd\n", HOSTNO);
1201 	return;
1202     }
1203 
1204     DMA_PRINTK("scsi%d: real DMA transfer complete, basr 0x%X, sr 0x%X\n",
1205 	       HOSTNO, NCR5380_read(BUS_AND_STATUS_REG),
1206 	       NCR5380_read(STATUS_REG));
1207 
1208     if((sun3scsi_dma_finish(rq_data_dir(hostdata->connected->request)))) {
1209 	    printk("scsi%d: overrun in UDC counter -- not prepared to deal with this!\n", HOSTNO);
1210 	    printk("please e-mail sammy@sammy.net with a description of how this\n");
1211 	    printk("error was produced.\n");
1212 	    BUG();
1213     }
1214 
1215     /* make sure we're not stuck in a data phase */
1216     if((NCR5380_read(BUS_AND_STATUS_REG) & (BASR_PHASE_MATCH |
1217 					    BASR_ACK)) ==
1218        (BASR_PHASE_MATCH | BASR_ACK)) {
1219 	    printk("scsi%d: BASR %02x\n", HOSTNO, NCR5380_read(BUS_AND_STATUS_REG));
1220 	    printk("scsi%d: bus stuck in data phase -- probably a single byte "
1221 		   "overrun!\n", HOSTNO);
1222 	    printk("not prepared for this error!\n");
1223 	    printk("please e-mail sammy@sammy.net with a description of how this\n");
1224 	    printk("error was produced.\n");
1225 	    BUG();
1226     }
1227 
1228 
1229 
1230     (void) NCR5380_read(RESET_PARITY_INTERRUPT_REG);
1231     NCR5380_write(MODE_REG, MR_BASE);
1232     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
1233 
1234     transfered = hostdata->dma_len - NCR5380_dma_residual(instance);
1235     hostdata->dma_len = 0;
1236 
1237     data = (unsigned char **) &(hostdata->connected->SCp.ptr);
1238     count = &(hostdata->connected->SCp.this_residual);
1239     *data += transfered;
1240     *count -= transfered;
1241 
1242 }
1243 #endif /* REAL_DMA */
1244 
1245 
1246 /*
1247  * Function : void NCR5380_intr (int irq)
1248  *
1249  * Purpose : handle interrupts, reestablishing I_T_L or I_T_L_Q nexuses
1250  *	from the disconnected queue, and restarting NCR5380_main()
1251  *	as required.
1252  *
1253  * Inputs : int irq, irq that caused this interrupt.
1254  *
1255  */
1256 
NCR5380_intr(int irq,void * dev_id)1257 static irqreturn_t NCR5380_intr (int irq, void *dev_id)
1258 {
1259     struct Scsi_Host *instance = first_instance;
1260     int done = 1, handled = 0;
1261     unsigned char basr;
1262 
1263     INT_PRINTK("scsi%d: NCR5380 irq triggered\n", HOSTNO);
1264 
1265     /* Look for pending interrupts */
1266     basr = NCR5380_read(BUS_AND_STATUS_REG);
1267     INT_PRINTK("scsi%d: BASR=%02x\n", HOSTNO, basr);
1268     /* dispatch to appropriate routine if found and done=0 */
1269     if (basr & BASR_IRQ) {
1270 	NCR_PRINT(NDEBUG_INTR);
1271 	if ((NCR5380_read(STATUS_REG) & (SR_SEL|SR_IO)) == (SR_SEL|SR_IO)) {
1272 	    done = 0;
1273 //	    ENABLE_IRQ();
1274 	    INT_PRINTK("scsi%d: SEL interrupt\n", HOSTNO);
1275 	    NCR5380_reselect(instance);
1276 	    (void) NCR5380_read(RESET_PARITY_INTERRUPT_REG);
1277 	}
1278 	else if (basr & BASR_PARITY_ERROR) {
1279 	    INT_PRINTK("scsi%d: PARITY interrupt\n", HOSTNO);
1280 	    (void) NCR5380_read(RESET_PARITY_INTERRUPT_REG);
1281 	}
1282 	else if ((NCR5380_read(STATUS_REG) & SR_RST) == SR_RST) {
1283 	    INT_PRINTK("scsi%d: RESET interrupt\n", HOSTNO);
1284 	    (void)NCR5380_read(RESET_PARITY_INTERRUPT_REG);
1285 	}
1286 	else {
1287 	    /*
1288 	     * The rest of the interrupt conditions can occur only during a
1289 	     * DMA transfer
1290 	     */
1291 
1292 #if defined(REAL_DMA)
1293 	    /*
1294 	     * We should only get PHASE MISMATCH and EOP interrupts if we have
1295 	     * DMA enabled, so do a sanity check based on the current setting
1296 	     * of the MODE register.
1297 	     */
1298 
1299 	    if ((NCR5380_read(MODE_REG) & MR_DMA_MODE) &&
1300 		((basr & BASR_END_DMA_TRANSFER) ||
1301 		 !(basr & BASR_PHASE_MATCH))) {
1302 
1303 		INT_PRINTK("scsi%d: PHASE MISM or EOP interrupt\n", HOSTNO);
1304 		NCR5380_dma_complete( instance );
1305 		done = 0;
1306 //		ENABLE_IRQ();
1307 	    } else
1308 #endif /* REAL_DMA */
1309 	    {
1310 /* MS: Ignore unknown phase mismatch interrupts (caused by EOP interrupt) */
1311 		if (basr & BASR_PHASE_MATCH)
1312 		   INT_PRINTK("scsi%d: unknown interrupt, "
1313 			   "BASR 0x%x, MR 0x%x, SR 0x%x\n",
1314 			   HOSTNO, basr, NCR5380_read(MODE_REG),
1315 			   NCR5380_read(STATUS_REG));
1316 		(void) NCR5380_read(RESET_PARITY_INTERRUPT_REG);
1317 #ifdef SUN3_SCSI_VME
1318 		dregs->csr |= CSR_DMA_ENABLE;
1319 #endif
1320 	    }
1321 	} /* if !(SELECTION || PARITY) */
1322 	handled = 1;
1323     } /* BASR & IRQ */
1324     else {
1325 
1326 	printk(KERN_NOTICE "scsi%d: interrupt without IRQ bit set in BASR, "
1327 	       "BASR 0x%X, MR 0x%X, SR 0x%x\n", HOSTNO, basr,
1328 	       NCR5380_read(MODE_REG), NCR5380_read(STATUS_REG));
1329 	(void) NCR5380_read(RESET_PARITY_INTERRUPT_REG);
1330 #ifdef SUN3_SCSI_VME
1331 		dregs->csr |= CSR_DMA_ENABLE;
1332 #endif
1333     }
1334 
1335     if (!done) {
1336 	INT_PRINTK("scsi%d: in int routine, calling main\n", HOSTNO);
1337 	/* Put a call to NCR5380_main() on the queue... */
1338 	queue_main();
1339     }
1340     return IRQ_RETVAL(handled);
1341 }
1342 
1343 #ifdef NCR5380_STATS
collect_stats(struct NCR5380_hostdata * hostdata,struct scsi_cmnd * cmd)1344 static void collect_stats(struct NCR5380_hostdata *hostdata,
1345 			  struct scsi_cmnd *cmd)
1346 {
1347 # ifdef NCR5380_STAT_LIMIT
1348     if (scsi_bufflen(cmd) > NCR5380_STAT_LIMIT)
1349 # endif
1350 	switch (cmd->cmnd[0])
1351 	{
1352 	    case WRITE:
1353 	    case WRITE_6:
1354 	    case WRITE_10:
1355 		hostdata->time_write[cmd->device->id] += (jiffies - hostdata->timebase);
1356 		/*hostdata->bytes_write[cmd->device->id] += scsi_bufflen(cmd);*/
1357 		hostdata->pendingw--;
1358 		break;
1359 	    case READ:
1360 	    case READ_6:
1361 	    case READ_10:
1362 		hostdata->time_read[cmd->device->id] += (jiffies - hostdata->timebase);
1363 		/*hostdata->bytes_read[cmd->device->id] += scsi_bufflen(cmd);*/
1364 		hostdata->pendingr--;
1365 		break;
1366 	}
1367 }
1368 #endif
1369 
1370 /*
1371  * Function : int NCR5380_select(struct Scsi_Host *instance,
1372  * 				 struct scsi_cmnd *cmd,	int tag);
1373  *
1374  * Purpose : establishes I_T_L or I_T_L_Q nexus for new or existing command,
1375  *	including ARBITRATION, SELECTION, and initial message out for
1376  *	IDENTIFY and queue messages.
1377  *
1378  * Inputs : instance - instantiation of the 5380 driver on which this
1379  * 	target lives, cmd - SCSI command to execute, tag - set to TAG_NEXT for
1380  *	new tag, TAG_NONE for untagged queueing, otherwise set to the tag for
1381  *	the command that is presently connected.
1382  *
1383  * Returns : -1 if selection could not execute for some reason,
1384  *	0 if selection succeeded or failed because the target
1385  * 	did not respond.
1386  *
1387  * Side effects :
1388  * 	If bus busy, arbitration failed, etc, NCR5380_select() will exit
1389  *		with registers as they should have been on entry - ie
1390  *		SELECT_ENABLE will be set appropriately, the NCR5380
1391  *		will cease to drive any SCSI bus signals.
1392  *
1393  *	If successful : I_T_L or I_T_L_Q nexus will be established,
1394  *		instance->connected will be set to cmd.
1395  * 		SELECT interrupt will be disabled.
1396  *
1397  *	If failed (no target) : cmd->scsi_done() will be called, and the
1398  *		cmd->result host byte set to DID_BAD_TARGET.
1399  */
1400 
NCR5380_select(struct Scsi_Host * instance,struct scsi_cmnd * cmd,int tag)1401 static int NCR5380_select(struct Scsi_Host *instance, struct scsi_cmnd *cmd,
1402 			  int tag)
1403 {
1404     SETUP_HOSTDATA(instance);
1405     unsigned char tmp[3], phase;
1406     unsigned char *data;
1407     int len;
1408     unsigned long timeout;
1409     unsigned long flags;
1410 
1411     hostdata->restart_select = 0;
1412     NCR_PRINT(NDEBUG_ARBITRATION);
1413     ARB_PRINTK("scsi%d: starting arbitration, id = %d\n", HOSTNO,
1414 	       instance->this_id);
1415 
1416     /*
1417      * Set the phase bits to 0, otherwise the NCR5380 won't drive the
1418      * data bus during SELECTION.
1419      */
1420 
1421     local_irq_save(flags);
1422     if (hostdata->connected) {
1423 	local_irq_restore(flags);
1424 	return -1;
1425     }
1426     NCR5380_write(TARGET_COMMAND_REG, 0);
1427 
1428 
1429     /*
1430      * Start arbitration.
1431      */
1432 
1433     NCR5380_write(OUTPUT_DATA_REG, hostdata->id_mask);
1434     NCR5380_write(MODE_REG, MR_ARBITRATE);
1435 
1436     local_irq_restore(flags);
1437 
1438     /* Wait for arbitration logic to complete */
1439 #if NCR_TIMEOUT
1440     {
1441       unsigned long timeout = jiffies + 2*NCR_TIMEOUT;
1442 
1443       while (!(NCR5380_read(INITIATOR_COMMAND_REG) & ICR_ARBITRATION_PROGRESS)
1444 	   && time_before(jiffies, timeout) && !hostdata->connected)
1445 	;
1446       if (time_after_eq(jiffies, timeout))
1447       {
1448 	printk("scsi : arbitration timeout at %d\n", __LINE__);
1449 	NCR5380_write(MODE_REG, MR_BASE);
1450 	NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
1451 	return -1;
1452       }
1453     }
1454 #else /* NCR_TIMEOUT */
1455     while (!(NCR5380_read(INITIATOR_COMMAND_REG) & ICR_ARBITRATION_PROGRESS)
1456 	 && !hostdata->connected);
1457 #endif
1458 
1459     ARB_PRINTK("scsi%d: arbitration complete\n", HOSTNO);
1460 
1461     if (hostdata->connected) {
1462 	NCR5380_write(MODE_REG, MR_BASE);
1463 	return -1;
1464     }
1465     /*
1466      * The arbitration delay is 2.2us, but this is a minimum and there is
1467      * no maximum so we can safely sleep for ceil(2.2) usecs to accommodate
1468      * the integral nature of udelay().
1469      *
1470      */
1471 
1472     udelay(3);
1473 
1474     /* Check for lost arbitration */
1475     if ((NCR5380_read(INITIATOR_COMMAND_REG) & ICR_ARBITRATION_LOST) ||
1476 	(NCR5380_read(CURRENT_SCSI_DATA_REG) & hostdata->id_higher_mask) ||
1477 	(NCR5380_read(INITIATOR_COMMAND_REG) & ICR_ARBITRATION_LOST) ||
1478 	hostdata->connected) {
1479 	NCR5380_write(MODE_REG, MR_BASE);
1480 	ARB_PRINTK("scsi%d: lost arbitration, deasserting MR_ARBITRATE\n",
1481 		   HOSTNO);
1482 	return -1;
1483     }
1484 
1485      /* after/during arbitration, BSY should be asserted.
1486 	IBM DPES-31080 Version S31Q works now */
1487      /* Tnx to Thomas_Roesch@m2.maus.de for finding this! (Roman) */
1488     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_SEL |
1489 					 ICR_ASSERT_BSY ) ;
1490 
1491     if ((NCR5380_read(INITIATOR_COMMAND_REG) & ICR_ARBITRATION_LOST) ||
1492 	hostdata->connected) {
1493 	NCR5380_write(MODE_REG, MR_BASE);
1494 	NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
1495 	ARB_PRINTK("scsi%d: lost arbitration, deasserting ICR_ASSERT_SEL\n",
1496 		   HOSTNO);
1497 	return -1;
1498     }
1499 
1500     /*
1501      * Again, bus clear + bus settle time is 1.2us, however, this is
1502      * a minimum so we'll udelay ceil(1.2)
1503      */
1504 
1505 #ifdef CONFIG_ATARI_SCSI_TOSHIBA_DELAY
1506     /* ++roman: But some targets (see above :-) seem to need a bit more... */
1507     udelay(15);
1508 #else
1509     udelay(2);
1510 #endif
1511 
1512     if (hostdata->connected) {
1513 	NCR5380_write(MODE_REG, MR_BASE);
1514 	NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
1515 	return -1;
1516     }
1517 
1518     ARB_PRINTK("scsi%d: won arbitration\n", HOSTNO);
1519 
1520     /*
1521      * Now that we have won arbitration, start Selection process, asserting
1522      * the host and target ID's on the SCSI bus.
1523      */
1524 
1525     NCR5380_write(OUTPUT_DATA_REG, (hostdata->id_mask | (1 << cmd->device->id)));
1526 
1527     /*
1528      * Raise ATN while SEL is true before BSY goes false from arbitration,
1529      * since this is the only way to guarantee that we'll get a MESSAGE OUT
1530      * phase immediately after selection.
1531      */
1532 
1533     NCR5380_write(INITIATOR_COMMAND_REG, (ICR_BASE | ICR_ASSERT_BSY |
1534 	ICR_ASSERT_DATA | ICR_ASSERT_ATN | ICR_ASSERT_SEL ));
1535     NCR5380_write(MODE_REG, MR_BASE);
1536 
1537     /*
1538      * Reselect interrupts must be turned off prior to the dropping of BSY,
1539      * otherwise we will trigger an interrupt.
1540      */
1541 
1542     if (hostdata->connected) {
1543 	NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
1544 	return -1;
1545     }
1546 
1547     NCR5380_write(SELECT_ENABLE_REG, 0);
1548 
1549     /*
1550      * The initiator shall then wait at least two deskew delays and release
1551      * the BSY signal.
1552      */
1553     udelay(1);        /* wingel -- wait two bus deskew delay >2*45ns */
1554 
1555     /* Reset BSY */
1556     NCR5380_write(INITIATOR_COMMAND_REG, (ICR_BASE | ICR_ASSERT_DATA |
1557 	ICR_ASSERT_ATN | ICR_ASSERT_SEL));
1558 
1559     /*
1560      * Something weird happens when we cease to drive BSY - looks
1561      * like the board/chip is letting us do another read before the
1562      * appropriate propagation delay has expired, and we're confusing
1563      * a BSY signal from ourselves as the target's response to SELECTION.
1564      *
1565      * A small delay (the 'C++' frontend breaks the pipeline with an
1566      * unnecessary jump, making it work on my 386-33/Trantor T128, the
1567      * tighter 'C' code breaks and requires this) solves the problem -
1568      * the 1 us delay is arbitrary, and only used because this delay will
1569      * be the same on other platforms and since it works here, it should
1570      * work there.
1571      *
1572      * wingel suggests that this could be due to failing to wait
1573      * one deskew delay.
1574      */
1575 
1576     udelay(1);
1577 
1578     SEL_PRINTK("scsi%d: selecting target %d\n", HOSTNO, cmd->device->id);
1579 
1580     /*
1581      * The SCSI specification calls for a 250 ms timeout for the actual
1582      * selection.
1583      */
1584 
1585     timeout = jiffies + 25;
1586 
1587     /*
1588      * XXX very interesting - we're seeing a bounce where the BSY we
1589      * asserted is being reflected / still asserted (propagation delay?)
1590      * and it's detecting as true.  Sigh.
1591      */
1592 
1593 #if 0
1594     /* ++roman: If a target conformed to the SCSI standard, it wouldn't assert
1595      * IO while SEL is true. But again, there are some disks out the in the
1596      * world that do that nevertheless. (Somebody claimed that this announces
1597      * reselection capability of the target.) So we better skip that test and
1598      * only wait for BSY... (Famous german words: Der Klügere gibt nach :-)
1599      */
1600 
1601     while (time_before(jiffies, timeout) && !(NCR5380_read(STATUS_REG) &
1602 	(SR_BSY | SR_IO)));
1603 
1604     if ((NCR5380_read(STATUS_REG) & (SR_SEL | SR_IO)) ==
1605 	    (SR_SEL | SR_IO)) {
1606 	    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
1607 	    NCR5380_reselect(instance);
1608 	    printk (KERN_ERR "scsi%d: reselection after won arbitration?\n",
1609 		    HOSTNO);
1610 	    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
1611 	    return -1;
1612     }
1613 #else
1614     while (time_before(jiffies, timeout) && !(NCR5380_read(STATUS_REG) & SR_BSY));
1615 #endif
1616 
1617     /*
1618      * No less than two deskew delays after the initiator detects the
1619      * BSY signal is true, it shall release the SEL signal and may
1620      * change the DATA BUS.                                     -wingel
1621      */
1622 
1623     udelay(1);
1624 
1625     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_ATN);
1626 
1627     if (!(NCR5380_read(STATUS_REG) & SR_BSY)) {
1628 	NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
1629 	if (hostdata->targets_present & (1 << cmd->device->id)) {
1630 	    printk(KERN_ERR "scsi%d: weirdness\n", HOSTNO);
1631 	    if (hostdata->restart_select)
1632 		printk(KERN_NOTICE "\trestart select\n");
1633 	    NCR_PRINT(NDEBUG_ANY);
1634 	    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
1635 	    return -1;
1636 	}
1637 	cmd->result = DID_BAD_TARGET << 16;
1638 #ifdef NCR5380_STATS
1639 	collect_stats(hostdata, cmd);
1640 #endif
1641 #ifdef SUPPORT_TAGS
1642 	cmd_free_tag( cmd );
1643 #endif
1644 	cmd->scsi_done(cmd);
1645 	NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
1646 	SEL_PRINTK("scsi%d: target did not respond within 250ms\n", HOSTNO);
1647 	NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
1648 	return 0;
1649     }
1650 
1651     hostdata->targets_present |= (1 << cmd->device->id);
1652 
1653     /*
1654      * Since we followed the SCSI spec, and raised ATN while SEL
1655      * was true but before BSY was false during selection, the information
1656      * transfer phase should be a MESSAGE OUT phase so that we can send the
1657      * IDENTIFY message.
1658      *
1659      * If SCSI-II tagged queuing is enabled, we also send a SIMPLE_QUEUE_TAG
1660      * message (2 bytes) with a tag ID that we increment with every command
1661      * until it wraps back to 0.
1662      *
1663      * XXX - it turns out that there are some broken SCSI-II devices,
1664      *	     which claim to support tagged queuing but fail when more than
1665      *	     some number of commands are issued at once.
1666      */
1667 
1668     /* Wait for start of REQ/ACK handshake */
1669     while (!(NCR5380_read(STATUS_REG) & SR_REQ));
1670 
1671     SEL_PRINTK("scsi%d: target %d selected, going into MESSAGE OUT phase.\n",
1672 	       HOSTNO, cmd->device->id);
1673     tmp[0] = IDENTIFY(1, cmd->device->lun);
1674 
1675 #ifdef SUPPORT_TAGS
1676     if (cmd->tag != TAG_NONE) {
1677 	tmp[1] = hostdata->last_message = SIMPLE_QUEUE_TAG;
1678 	tmp[2] = cmd->tag;
1679 	len = 3;
1680     } else
1681 	len = 1;
1682 #else
1683     len = 1;
1684     cmd->tag=0;
1685 #endif /* SUPPORT_TAGS */
1686 
1687     /* Send message(s) */
1688     data = tmp;
1689     phase = PHASE_MSGOUT;
1690     NCR5380_transfer_pio(instance, &phase, &len, &data);
1691     SEL_PRINTK("scsi%d: nexus established.\n", HOSTNO);
1692     /* XXX need to handle errors here */
1693     hostdata->connected = cmd;
1694 #ifndef SUPPORT_TAGS
1695     hostdata->busy[cmd->device->id] |= (1 << cmd->device->lun);
1696 #endif
1697 #ifdef SUN3_SCSI_VME
1698     dregs->csr |= CSR_INTR;
1699 #endif
1700     initialize_SCp(cmd);
1701 
1702 
1703     return 0;
1704 }
1705 
1706 /*
1707  * Function : int NCR5380_transfer_pio (struct Scsi_Host *instance,
1708  *      unsigned char *phase, int *count, unsigned char **data)
1709  *
1710  * Purpose : transfers data in given phase using polled I/O
1711  *
1712  * Inputs : instance - instance of driver, *phase - pointer to
1713  *	what phase is expected, *count - pointer to number of
1714  *	bytes to transfer, **data - pointer to data pointer.
1715  *
1716  * Returns : -1 when different phase is entered without transferring
1717  *	maximum number of bytes, 0 if all bytes are transfered or exit
1718  *	is in same phase.
1719  *
1720  * 	Also, *phase, *count, *data are modified in place.
1721  *
1722  * XXX Note : handling for bus free may be useful.
1723  */
1724 
1725 /*
1726  * Note : this code is not as quick as it could be, however it
1727  * IS 100% reliable, and for the actual data transfer where speed
1728  * counts, we will always do a pseudo DMA or DMA transfer.
1729  */
1730 
NCR5380_transfer_pio(struct Scsi_Host * instance,unsigned char * phase,int * count,unsigned char ** data)1731 static int NCR5380_transfer_pio( struct Scsi_Host *instance,
1732 				 unsigned char *phase, int *count,
1733 				 unsigned char **data)
1734 {
1735     register unsigned char p = *phase, tmp;
1736     register int c = *count;
1737     register unsigned char *d = *data;
1738 
1739     /*
1740      * The NCR5380 chip will only drive the SCSI bus when the
1741      * phase specified in the appropriate bits of the TARGET COMMAND
1742      * REGISTER match the STATUS REGISTER
1743      */
1744 
1745     NCR5380_write(TARGET_COMMAND_REG, PHASE_SR_TO_TCR(p));
1746 
1747     do {
1748 	/*
1749 	 * Wait for assertion of REQ, after which the phase bits will be
1750 	 * valid
1751 	 */
1752 	while (!((tmp = NCR5380_read(STATUS_REG)) & SR_REQ));
1753 
1754 	HSH_PRINTK("scsi%d: REQ detected\n", HOSTNO);
1755 
1756 	/* Check for phase mismatch */
1757 	if ((tmp & PHASE_MASK) != p) {
1758 	    PIO_PRINTK("scsi%d: phase mismatch\n", HOSTNO);
1759 	    NCR_PRINT_PHASE(NDEBUG_PIO);
1760 	    break;
1761 	}
1762 
1763 	/* Do actual transfer from SCSI bus to / from memory */
1764 	if (!(p & SR_IO))
1765 	    NCR5380_write(OUTPUT_DATA_REG, *d);
1766 	else
1767 	    *d = NCR5380_read(CURRENT_SCSI_DATA_REG);
1768 
1769 	++d;
1770 
1771 	/*
1772 	 * The SCSI standard suggests that in MSGOUT phase, the initiator
1773 	 * should drop ATN on the last byte of the message phase
1774 	 * after REQ has been asserted for the handshake but before
1775 	 * the initiator raises ACK.
1776 	 */
1777 
1778 	if (!(p & SR_IO)) {
1779 	    if (!((p & SR_MSG) && c > 1)) {
1780 		NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE |
1781 		    ICR_ASSERT_DATA);
1782 		NCR_PRINT(NDEBUG_PIO);
1783 		NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE |
1784 			ICR_ASSERT_DATA | ICR_ASSERT_ACK);
1785 	    } else {
1786 		NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE |
1787 		    ICR_ASSERT_DATA | ICR_ASSERT_ATN);
1788 		NCR_PRINT(NDEBUG_PIO);
1789 		NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE |
1790 		    ICR_ASSERT_DATA | ICR_ASSERT_ATN | ICR_ASSERT_ACK);
1791 	    }
1792 	} else {
1793 	    NCR_PRINT(NDEBUG_PIO);
1794 	    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_ACK);
1795 	}
1796 
1797 	while (NCR5380_read(STATUS_REG) & SR_REQ);
1798 
1799 	HSH_PRINTK("scsi%d: req false, handshake complete\n", HOSTNO);
1800 
1801 /*
1802  * We have several special cases to consider during REQ/ACK handshaking :
1803  * 1.  We were in MSGOUT phase, and we are on the last byte of the
1804  *	message.  ATN must be dropped as ACK is dropped.
1805  *
1806  * 2.  We are in a MSGIN phase, and we are on the last byte of the
1807  *	message.  We must exit with ACK asserted, so that the calling
1808  *	code may raise ATN before dropping ACK to reject the message.
1809  *
1810  * 3.  ACK and ATN are clear and the target may proceed as normal.
1811  */
1812 	if (!(p == PHASE_MSGIN && c == 1)) {
1813 	    if (p == PHASE_MSGOUT && c > 1)
1814 		NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_ATN);
1815 	    else
1816 		NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
1817 	}
1818     } while (--c);
1819 
1820     PIO_PRINTK("scsi%d: residual %d\n", HOSTNO, c);
1821 
1822     *count = c;
1823     *data = d;
1824     tmp = NCR5380_read(STATUS_REG);
1825     /* The phase read from the bus is valid if either REQ is (already)
1826      * asserted or if ACK hasn't been released yet. The latter is the case if
1827      * we're in MSGIN and all wanted bytes have been received. */
1828     if ((tmp & SR_REQ) || (p == PHASE_MSGIN && c == 0))
1829 	*phase = tmp & PHASE_MASK;
1830     else
1831 	*phase = PHASE_UNKNOWN;
1832 
1833     if (!c || (*phase == p))
1834 	return 0;
1835     else
1836 	return -1;
1837 }
1838 
1839 /*
1840  * Function : do_abort (Scsi_Host *host)
1841  *
1842  * Purpose : abort the currently established nexus.  Should only be
1843  * 	called from a routine which can drop into a
1844  *
1845  * Returns : 0 on success, -1 on failure.
1846  */
1847 
do_abort(struct Scsi_Host * host)1848 static int do_abort (struct Scsi_Host *host)
1849 {
1850     unsigned char tmp, *msgptr, phase;
1851     int len;
1852 
1853     /* Request message out phase */
1854     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_ATN);
1855 
1856     /*
1857      * Wait for the target to indicate a valid phase by asserting
1858      * REQ.  Once this happens, we'll have either a MSGOUT phase
1859      * and can immediately send the ABORT message, or we'll have some
1860      * other phase and will have to source/sink data.
1861      *
1862      * We really don't care what value was on the bus or what value
1863      * the target sees, so we just handshake.
1864      */
1865 
1866     while (!((tmp = NCR5380_read(STATUS_REG)) & SR_REQ));
1867 
1868     NCR5380_write(TARGET_COMMAND_REG, PHASE_SR_TO_TCR(tmp));
1869 
1870     if ((tmp & PHASE_MASK) != PHASE_MSGOUT) {
1871 	NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_ATN |
1872 		      ICR_ASSERT_ACK);
1873 	while (NCR5380_read(STATUS_REG) & SR_REQ);
1874 	NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_ATN);
1875     }
1876 
1877     tmp = ABORT;
1878     msgptr = &tmp;
1879     len = 1;
1880     phase = PHASE_MSGOUT;
1881     NCR5380_transfer_pio (host, &phase, &len, &msgptr);
1882 
1883     /*
1884      * If we got here, and the command completed successfully,
1885      * we're about to go into bus free state.
1886      */
1887 
1888     return len ? -1 : 0;
1889 }
1890 
1891 #if defined(REAL_DMA)
1892 /*
1893  * Function : int NCR5380_transfer_dma (struct Scsi_Host *instance,
1894  *      unsigned char *phase, int *count, unsigned char **data)
1895  *
1896  * Purpose : transfers data in given phase using either real
1897  *	or pseudo DMA.
1898  *
1899  * Inputs : instance - instance of driver, *phase - pointer to
1900  *	what phase is expected, *count - pointer to number of
1901  *	bytes to transfer, **data - pointer to data pointer.
1902  *
1903  * Returns : -1 when different phase is entered without transferring
1904  *	maximum number of bytes, 0 if all bytes or transfered or exit
1905  *	is in same phase.
1906  *
1907  * 	Also, *phase, *count, *data are modified in place.
1908  *
1909  */
1910 
1911 
NCR5380_transfer_dma(struct Scsi_Host * instance,unsigned char * phase,int * count,unsigned char ** data)1912 static int NCR5380_transfer_dma( struct Scsi_Host *instance,
1913 				 unsigned char *phase, int *count,
1914 				 unsigned char **data)
1915 {
1916     SETUP_HOSTDATA(instance);
1917     register int c = *count;
1918     register unsigned char p = *phase;
1919     unsigned long flags;
1920 
1921     /* sanity check */
1922     if(!sun3_dma_setup_done) {
1923 	 printk("scsi%d: transfer_dma without setup!\n", HOSTNO);
1924 	 BUG();
1925     }
1926     hostdata->dma_len = c;
1927 
1928     DMA_PRINTK("scsi%d: initializing DMA for %s, %d bytes %s %p\n",
1929 	       HOSTNO, (p & SR_IO) ? "reading" : "writing",
1930 	       c, (p & SR_IO) ? "to" : "from", *data);
1931 
1932     /* netbsd turns off ints here, why not be safe and do it too */
1933     local_irq_save(flags);
1934 
1935     /* send start chain */
1936     sun3scsi_dma_start(c, *data);
1937 
1938     if (p & SR_IO) {
1939 	    NCR5380_write(TARGET_COMMAND_REG, 1);
1940 	    NCR5380_read(RESET_PARITY_INTERRUPT_REG);
1941 	    NCR5380_write(INITIATOR_COMMAND_REG, 0);
1942 	    NCR5380_write(MODE_REG, (NCR5380_read(MODE_REG) | MR_DMA_MODE | MR_ENABLE_EOP_INTR));
1943 	    NCR5380_write(START_DMA_INITIATOR_RECEIVE_REG, 0);
1944     } else {
1945 	    NCR5380_write(TARGET_COMMAND_REG, 0);
1946 	    NCR5380_read(RESET_PARITY_INTERRUPT_REG);
1947 	    NCR5380_write(INITIATOR_COMMAND_REG, ICR_ASSERT_DATA);
1948 	    NCR5380_write(MODE_REG, (NCR5380_read(MODE_REG) | MR_DMA_MODE | MR_ENABLE_EOP_INTR));
1949 	    NCR5380_write(START_DMA_SEND_REG, 0);
1950     }
1951 
1952 #ifdef SUN3_SCSI_VME
1953     dregs->csr |= CSR_DMA_ENABLE;
1954 #endif
1955 
1956     local_irq_restore(flags);
1957 
1958     sun3_dma_active = 1;
1959     return 0;
1960 }
1961 #endif /* defined(REAL_DMA) */
1962 
1963 /*
1964  * Function : NCR5380_information_transfer (struct Scsi_Host *instance)
1965  *
1966  * Purpose : run through the various SCSI phases and do as the target
1967  * 	directs us to.  Operates on the currently connected command,
1968  *	instance->connected.
1969  *
1970  * Inputs : instance, instance for which we are doing commands
1971  *
1972  * Side effects : SCSI things happen, the disconnected queue will be
1973  *	modified if a command disconnects, *instance->connected will
1974  *	change.
1975  *
1976  * XXX Note : we need to watch for bus free or a reset condition here
1977  * 	to recover from an unexpected bus free condition.
1978  */
1979 
NCR5380_information_transfer(struct Scsi_Host * instance)1980 static void NCR5380_information_transfer (struct Scsi_Host *instance)
1981 {
1982     SETUP_HOSTDATA(instance);
1983     unsigned long flags;
1984     unsigned char msgout = NOP;
1985     int sink = 0;
1986     int len;
1987 #if defined(REAL_DMA)
1988     int transfersize;
1989 #endif
1990     unsigned char *data;
1991     unsigned char phase, tmp, extended_msg[10], old_phase=0xff;
1992     struct scsi_cmnd *cmd = (struct scsi_cmnd *) hostdata->connected;
1993 
1994 #ifdef SUN3_SCSI_VME
1995     dregs->csr |= CSR_INTR;
1996 #endif
1997 
1998     while (1) {
1999 	tmp = NCR5380_read(STATUS_REG);
2000 	/* We only have a valid SCSI phase when REQ is asserted */
2001 	if (tmp & SR_REQ) {
2002 	    phase = (tmp & PHASE_MASK);
2003  	    if (phase != old_phase) {
2004 		old_phase = phase;
2005 		NCR_PRINT_PHASE(NDEBUG_INFORMATION);
2006 	    }
2007 
2008 	    if(phase == PHASE_CMDOUT) {
2009 		    void *d;
2010 		    unsigned long count;
2011 
2012 		if (!cmd->SCp.this_residual && cmd->SCp.buffers_residual) {
2013 			count = cmd->SCp.buffer->length;
2014 			d = SGADDR(cmd->SCp.buffer);
2015 		} else {
2016 			count = cmd->SCp.this_residual;
2017 			d = cmd->SCp.ptr;
2018 		}
2019 #ifdef REAL_DMA
2020 		/* this command setup for dma yet? */
2021 		if((count > SUN3_DMA_MINSIZE) && (sun3_dma_setup_done
2022 						  != cmd))
2023 		{
2024 			if(blk_fs_request(cmd->request)) {
2025 				sun3scsi_dma_setup(d, count,
2026 						   rq_data_dir(cmd->request));
2027 				sun3_dma_setup_done = cmd;
2028 			}
2029 		}
2030 #endif
2031 #ifdef SUN3_SCSI_VME
2032 		dregs->csr |= CSR_INTR;
2033 #endif
2034 	    }
2035 
2036 
2037 	    if (sink && (phase != PHASE_MSGOUT)) {
2038 		NCR5380_write(TARGET_COMMAND_REG, PHASE_SR_TO_TCR(tmp));
2039 
2040 		NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_ATN |
2041 		    ICR_ASSERT_ACK);
2042 		while (NCR5380_read(STATUS_REG) & SR_REQ);
2043 		NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE |
2044 		    ICR_ASSERT_ATN);
2045 		sink = 0;
2046 		continue;
2047 	    }
2048 
2049 	    switch (phase) {
2050 	    case PHASE_DATAOUT:
2051 #if (NDEBUG & NDEBUG_NO_DATAOUT)
2052 		printk("scsi%d: NDEBUG_NO_DATAOUT set, attempted DATAOUT "
2053 		       "aborted\n", HOSTNO);
2054 		sink = 1;
2055 		do_abort(instance);
2056 		cmd->result = DID_ERROR  << 16;
2057 		cmd->scsi_done(cmd);
2058 		return;
2059 #endif
2060 	    case PHASE_DATAIN:
2061 		/*
2062 		 * If there is no room left in the current buffer in the
2063 		 * scatter-gather list, move onto the next one.
2064 		 */
2065 		if (!cmd->SCp.this_residual && cmd->SCp.buffers_residual) {
2066 		    ++cmd->SCp.buffer;
2067 		    --cmd->SCp.buffers_residual;
2068 		    cmd->SCp.this_residual = cmd->SCp.buffer->length;
2069 		    cmd->SCp.ptr = SGADDR(cmd->SCp.buffer);
2070 
2071 		    /* ++roman: Try to merge some scatter-buffers if
2072 		     * they are at contiguous physical addresses.
2073 		     */
2074 //		    merge_contiguous_buffers( cmd );
2075 		    INF_PRINTK("scsi%d: %d bytes and %d buffers left\n",
2076 			       HOSTNO, cmd->SCp.this_residual,
2077 			       cmd->SCp.buffers_residual);
2078 		}
2079 
2080 		/*
2081 		 * The preferred transfer method is going to be
2082 		 * PSEUDO-DMA for systems that are strictly PIO,
2083 		 * since we can let the hardware do the handshaking.
2084 		 *
2085 		 * For this to work, we need to know the transfersize
2086 		 * ahead of time, since the pseudo-DMA code will sit
2087 		 * in an unconditional loop.
2088 		 */
2089 
2090 /* ++roman: I suggest, this should be
2091  *   #if def(REAL_DMA)
2092  * instead of leaving REAL_DMA out.
2093  */
2094 
2095 #if defined(REAL_DMA)
2096 //		if (!cmd->device->borken &&
2097 		if((transfersize =
2098 		    NCR5380_dma_xfer_len(instance,cmd,phase)) > SUN3_DMA_MINSIZE) {
2099 		    len = transfersize;
2100 		    cmd->SCp.phase = phase;
2101 
2102 		    if (NCR5380_transfer_dma(instance, &phase,
2103 			&len, (unsigned char **) &cmd->SCp.ptr)) {
2104 			/*
2105 			 * If the watchdog timer fires, all future
2106 			 * accesses to this device will use the
2107 			 * polled-IO. */
2108 			printk(KERN_NOTICE "scsi%d: switching target %d "
2109 			       "lun %d to slow handshake\n", HOSTNO,
2110 			       cmd->device->id, cmd->device->lun);
2111 			cmd->device->borken = 1;
2112 			NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE |
2113 			    ICR_ASSERT_ATN);
2114 			sink = 1;
2115 			do_abort(instance);
2116 			cmd->result = DID_ERROR  << 16;
2117 			cmd->scsi_done(cmd);
2118 			/* XXX - need to source or sink data here, as appropriate */
2119 		    } else {
2120 #ifdef REAL_DMA
2121 			/* ++roman: When using real DMA,
2122 			 * information_transfer() should return after
2123 			 * starting DMA since it has nothing more to
2124 			 * do.
2125 			 */
2126 				    return;
2127 #else
2128 			cmd->SCp.this_residual -= transfersize - len;
2129 #endif
2130 		    }
2131 		} else
2132 #endif /* defined(REAL_DMA) */
2133 		  NCR5380_transfer_pio(instance, &phase,
2134 		    (int *) &cmd->SCp.this_residual, (unsigned char **)
2135 		    &cmd->SCp.ptr);
2136 #ifdef REAL_DMA
2137 		/* if we had intended to dma that command clear it */
2138 		if(sun3_dma_setup_done == cmd)
2139 			sun3_dma_setup_done = NULL;
2140 #endif
2141 
2142 		break;
2143 	    case PHASE_MSGIN:
2144 		len = 1;
2145 		data = &tmp;
2146 		NCR5380_write(SELECT_ENABLE_REG, 0); 	/* disable reselects */
2147 		NCR5380_transfer_pio(instance, &phase, &len, &data);
2148 		cmd->SCp.Message = tmp;
2149 
2150 		switch (tmp) {
2151 		/*
2152 		 * Linking lets us reduce the time required to get the
2153 		 * next command out to the device, hopefully this will
2154 		 * mean we don't waste another revolution due to the delays
2155 		 * required by ARBITRATION and another SELECTION.
2156 		 *
2157 		 * In the current implementation proposal, low level drivers
2158 		 * merely have to start the next command, pointed to by
2159 		 * next_link, done() is called as with unlinked commands.
2160 		 */
2161 #ifdef LINKED
2162 		case LINKED_CMD_COMPLETE:
2163 		case LINKED_FLG_CMD_COMPLETE:
2164 		    /* Accept message by clearing ACK */
2165 		    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2166 
2167 		    LNK_PRINTK("scsi%d: target %d lun %d linked command "
2168 			       "complete.\n", HOSTNO, cmd->device->id, cmd->device->lun);
2169 
2170 		    /* Enable reselect interrupts */
2171 		    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
2172 		    /*
2173 		     * Sanity check : A linked command should only terminate
2174 		     * with one of these messages if there are more linked
2175 		     * commands available.
2176 		     */
2177 
2178 		    if (!cmd->next_link) {
2179 			 printk(KERN_NOTICE "scsi%d: target %d lun %d "
2180 				"linked command complete, no next_link\n",
2181 				HOSTNO, cmd->device->id, cmd->device->lun);
2182 			    sink = 1;
2183 			    do_abort (instance);
2184 			    return;
2185 		    }
2186 
2187 		    initialize_SCp(cmd->next_link);
2188 		    /* The next command is still part of this process; copy it
2189 		     * and don't free it! */
2190 		    cmd->next_link->tag = cmd->tag;
2191 		    cmd->result = cmd->SCp.Status | (cmd->SCp.Message << 8);
2192 		    LNK_PRINTK("scsi%d: target %d lun %d linked request "
2193 			       "done, calling scsi_done().\n",
2194 			       HOSTNO, cmd->device->id, cmd->device->lun);
2195 #ifdef NCR5380_STATS
2196 		    collect_stats(hostdata, cmd);
2197 #endif
2198 		    cmd->scsi_done(cmd);
2199 		    cmd = hostdata->connected;
2200 		    break;
2201 #endif /* def LINKED */
2202 		case ABORT:
2203 		case COMMAND_COMPLETE:
2204 		    /* Accept message by clearing ACK */
2205 		    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2206 		    hostdata->connected = NULL;
2207 		    QU_PRINTK("scsi%d: command for target %d, lun %d "
2208 			      "completed\n", HOSTNO, cmd->device->id, cmd->device->lun);
2209 #ifdef SUPPORT_TAGS
2210 		    cmd_free_tag( cmd );
2211 		    if (status_byte(cmd->SCp.Status) == QUEUE_FULL) {
2212 			/* Turn a QUEUE FULL status into BUSY, I think the
2213 			 * mid level cannot handle QUEUE FULL :-( (The
2214 			 * command is retried after BUSY). Also update our
2215 			 * queue size to the number of currently issued
2216 			 * commands now.
2217 			 */
2218 			/* ++Andreas: the mid level code knows about
2219 			   QUEUE_FULL now. */
2220 			TAG_ALLOC *ta = &TagAlloc[cmd->device->id][cmd->device->lun];
2221 			TAG_PRINTK("scsi%d: target %d lun %d returned "
2222 				   "QUEUE_FULL after %d commands\n",
2223 				   HOSTNO, cmd->device->id, cmd->device->lun,
2224 				   ta->nr_allocated);
2225 			if (ta->queue_size > ta->nr_allocated)
2226 			    ta->nr_allocated = ta->queue_size;
2227 		    }
2228 #else
2229 		    hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
2230 #endif
2231 		    /* Enable reselect interrupts */
2232 		    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
2233 
2234 		    /*
2235 		     * I'm not sure what the correct thing to do here is :
2236 		     *
2237 		     * If the command that just executed is NOT a request
2238 		     * sense, the obvious thing to do is to set the result
2239 		     * code to the values of the stored parameters.
2240 		     *
2241 		     * If it was a REQUEST SENSE command, we need some way to
2242 		     * differentiate between the failure code of the original
2243 		     * and the failure code of the REQUEST sense - the obvious
2244 		     * case is success, where we fall through and leave the
2245 		     * result code unchanged.
2246 		     *
2247 		     * The non-obvious place is where the REQUEST SENSE failed
2248 		     */
2249 
2250 		    if (cmd->cmnd[0] != REQUEST_SENSE)
2251 			cmd->result = cmd->SCp.Status | (cmd->SCp.Message << 8);
2252 		    else if (status_byte(cmd->SCp.Status) != GOOD)
2253 			cmd->result = (cmd->result & 0x00ffff) | (DID_ERROR << 16);
2254 
2255 #ifdef AUTOSENSE
2256 		    if ((cmd->cmnd[0] == REQUEST_SENSE) &&
2257 			                        hostdata->ses.cmd_len) {
2258 			scsi_eh_restore_cmnd(cmd, &hostdata->ses);
2259 			hostdata->ses.cmd_len = 0 ;
2260 		    }
2261 
2262 		    if ((cmd->cmnd[0] != REQUEST_SENSE) &&
2263 			(status_byte(cmd->SCp.Status) == CHECK_CONDITION)) {
2264 			scsi_eh_prep_cmnd(cmd, &hostdata->ses, NULL, 0, ~0);
2265 			ASEN_PRINTK("scsi%d: performing request sense\n",
2266 				    HOSTNO);
2267 			/* this is initialized from initialize_SCp
2268 			cmd->SCp.buffer = NULL;
2269 			cmd->SCp.buffers_residual = 0;
2270 			*/
2271 
2272 			local_irq_save(flags);
2273 			LIST(cmd,hostdata->issue_queue);
2274 			NEXT(cmd) = hostdata->issue_queue;
2275 		        hostdata->issue_queue = (struct scsi_cmnd *) cmd;
2276 		        local_irq_restore(flags);
2277 			QU_PRINTK("scsi%d: REQUEST SENSE added to head of "
2278 				  "issue queue\n", H_NO(cmd));
2279 		   } else
2280 #endif /* def AUTOSENSE */
2281 		   {
2282 #ifdef NCR5380_STATS
2283 		       collect_stats(hostdata, cmd);
2284 #endif
2285 		       cmd->scsi_done(cmd);
2286 		    }
2287 
2288 		    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
2289 		    /*
2290 		     * Restore phase bits to 0 so an interrupted selection,
2291 		     * arbitration can resume.
2292 		     */
2293 		    NCR5380_write(TARGET_COMMAND_REG, 0);
2294 
2295 		    while ((NCR5380_read(STATUS_REG) & SR_BSY) && !hostdata->connected)
2296 			barrier();
2297 
2298 		    return;
2299 		case MESSAGE_REJECT:
2300 		    /* Accept message by clearing ACK */
2301 		    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2302 		    /* Enable reselect interrupts */
2303 		    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
2304 		    switch (hostdata->last_message) {
2305 		    case HEAD_OF_QUEUE_TAG:
2306 		    case ORDERED_QUEUE_TAG:
2307 		    case SIMPLE_QUEUE_TAG:
2308 			/* The target obviously doesn't support tagged
2309 			 * queuing, even though it announced this ability in
2310 			 * its INQUIRY data ?!? (maybe only this LUN?) Ok,
2311 			 * clear 'tagged_supported' and lock the LUN, since
2312 			 * the command is treated as untagged further on.
2313 			 */
2314 			cmd->device->tagged_supported = 0;
2315 			hostdata->busy[cmd->device->id] |= (1 << cmd->device->lun);
2316 			cmd->tag = TAG_NONE;
2317 			TAG_PRINTK("scsi%d: target %d lun %d rejected "
2318 				   "QUEUE_TAG message; tagged queuing "
2319 				   "disabled\n",
2320 				   HOSTNO, cmd->device->id, cmd->device->lun);
2321 			break;
2322 		    }
2323 		    break;
2324 		case DISCONNECT:
2325 		    /* Accept message by clearing ACK */
2326 		    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2327 		    local_irq_save(flags);
2328 		    cmd->device->disconnect = 1;
2329 		    LIST(cmd,hostdata->disconnected_queue);
2330 		    NEXT(cmd) = hostdata->disconnected_queue;
2331 		    hostdata->connected = NULL;
2332 		    hostdata->disconnected_queue = cmd;
2333 		    local_irq_restore(flags);
2334 		    QU_PRINTK("scsi%d: command for target %d lun %d was "
2335 			      "moved from connected to the "
2336 			      "disconnected_queue\n", HOSTNO,
2337 			      cmd->device->id, cmd->device->lun);
2338 		    /*
2339 		     * Restore phase bits to 0 so an interrupted selection,
2340 		     * arbitration can resume.
2341 		     */
2342 		    NCR5380_write(TARGET_COMMAND_REG, 0);
2343 
2344 		    /* Enable reselect interrupts */
2345 		    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
2346 		    /* Wait for bus free to avoid nasty timeouts */
2347 		    while ((NCR5380_read(STATUS_REG) & SR_BSY) && !hostdata->connected)
2348 		    	barrier();
2349 #ifdef SUN3_SCSI_VME
2350 		    dregs->csr |= CSR_DMA_ENABLE;
2351 #endif
2352 		    return;
2353 		/*
2354 		 * The SCSI data pointer is *IMPLICITLY* saved on a disconnect
2355 		 * operation, in violation of the SCSI spec so we can safely
2356 		 * ignore SAVE/RESTORE pointers calls.
2357 		 *
2358 		 * Unfortunately, some disks violate the SCSI spec and
2359 		 * don't issue the required SAVE_POINTERS message before
2360 		 * disconnecting, and we have to break spec to remain
2361 		 * compatible.
2362 		 */
2363 		case SAVE_POINTERS:
2364 		case RESTORE_POINTERS:
2365 		    /* Accept message by clearing ACK */
2366 		    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2367 		    /* Enable reselect interrupts */
2368 		    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
2369 		    break;
2370 		case EXTENDED_MESSAGE:
2371 /*
2372  * Extended messages are sent in the following format :
2373  * Byte
2374  * 0		EXTENDED_MESSAGE == 1
2375  * 1		length (includes one byte for code, doesn't
2376  *		include first two bytes)
2377  * 2 		code
2378  * 3..length+1	arguments
2379  *
2380  * Start the extended message buffer with the EXTENDED_MESSAGE
2381  * byte, since spi_print_msg() wants the whole thing.
2382  */
2383 		    extended_msg[0] = EXTENDED_MESSAGE;
2384 		    /* Accept first byte by clearing ACK */
2385 		    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2386 
2387 		    EXT_PRINTK("scsi%d: receiving extended message\n", HOSTNO);
2388 
2389 		    len = 2;
2390 		    data = extended_msg + 1;
2391 		    phase = PHASE_MSGIN;
2392 		    NCR5380_transfer_pio(instance, &phase, &len, &data);
2393 		    EXT_PRINTK("scsi%d: length=%d, code=0x%02x\n", HOSTNO,
2394 			       (int)extended_msg[1], (int)extended_msg[2]);
2395 
2396 		    if (!len && extended_msg[1] <=
2397 			(sizeof (extended_msg) - 1)) {
2398 			/* Accept third byte by clearing ACK */
2399 			NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2400 			len = extended_msg[1] - 1;
2401 			data = extended_msg + 3;
2402 			phase = PHASE_MSGIN;
2403 
2404 			NCR5380_transfer_pio(instance, &phase, &len, &data);
2405 			EXT_PRINTK("scsi%d: message received, residual %d\n",
2406 				   HOSTNO, len);
2407 
2408 			switch (extended_msg[2]) {
2409 			case EXTENDED_SDTR:
2410 			case EXTENDED_WDTR:
2411 			case EXTENDED_MODIFY_DATA_POINTER:
2412 			case EXTENDED_EXTENDED_IDENTIFY:
2413 			    tmp = 0;
2414 			}
2415 		    } else if (len) {
2416 			printk(KERN_NOTICE "scsi%d: error receiving "
2417 			       "extended message\n", HOSTNO);
2418 			tmp = 0;
2419 		    } else {
2420 			printk(KERN_NOTICE "scsi%d: extended message "
2421 			       "code %02x length %d is too long\n",
2422 			       HOSTNO, extended_msg[2], extended_msg[1]);
2423 			tmp = 0;
2424 		    }
2425 		/* Fall through to reject message */
2426 
2427 		/*
2428   		 * If we get something weird that we aren't expecting,
2429  		 * reject it.
2430 		 */
2431 		default:
2432 		    if (!tmp) {
2433 			printk(KERN_DEBUG "scsi%d: rejecting message ", HOSTNO);
2434 			spi_print_msg(extended_msg);
2435 			printk("\n");
2436 		    } else if (tmp != EXTENDED_MESSAGE)
2437 			printk(KERN_DEBUG "scsi%d: rejecting unknown "
2438 			       "message %02x from target %d, lun %d\n",
2439 			       HOSTNO, tmp, cmd->device->id, cmd->device->lun);
2440 		    else
2441 			printk(KERN_DEBUG "scsi%d: rejecting unknown "
2442 			       "extended message "
2443 			       "code %02x, length %d from target %d, lun %d\n",
2444 			       HOSTNO, extended_msg[1], extended_msg[0],
2445 			       cmd->device->id, cmd->device->lun);
2446 
2447 
2448 		    msgout = MESSAGE_REJECT;
2449 		    NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE |
2450 			ICR_ASSERT_ATN);
2451 		    break;
2452 		} /* switch (tmp) */
2453 		break;
2454 	    case PHASE_MSGOUT:
2455 		len = 1;
2456 		data = &msgout;
2457 		hostdata->last_message = msgout;
2458 		NCR5380_transfer_pio(instance, &phase, &len, &data);
2459 		if (msgout == ABORT) {
2460 #ifdef SUPPORT_TAGS
2461 		    cmd_free_tag( cmd );
2462 #else
2463 		    hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
2464 #endif
2465 		    hostdata->connected = NULL;
2466 		    cmd->result = DID_ERROR << 16;
2467 #ifdef NCR5380_STATS
2468 		    collect_stats(hostdata, cmd);
2469 #endif
2470 		    cmd->scsi_done(cmd);
2471 		    NCR5380_write(SELECT_ENABLE_REG, hostdata->id_mask);
2472 		    return;
2473 		}
2474 		msgout = NOP;
2475 		break;
2476 	    case PHASE_CMDOUT:
2477 		len = cmd->cmd_len;
2478 		data = cmd->cmnd;
2479 		/*
2480 		 * XXX for performance reasons, on machines with a
2481 		 * PSEUDO-DMA architecture we should probably
2482 		 * use the dma transfer function.
2483 		 */
2484 		NCR5380_transfer_pio(instance, &phase, &len,
2485 		    &data);
2486 		break;
2487 	    case PHASE_STATIN:
2488 		len = 1;
2489 		data = &tmp;
2490 		NCR5380_transfer_pio(instance, &phase, &len, &data);
2491 		cmd->SCp.Status = tmp;
2492 		break;
2493 	    default:
2494 		printk("scsi%d: unknown phase\n", HOSTNO);
2495 		NCR_PRINT(NDEBUG_ANY);
2496 	    } /* switch(phase) */
2497 	} /* if (tmp * SR_REQ) */
2498     } /* while (1) */
2499 }
2500 
2501 /*
2502  * Function : void NCR5380_reselect (struct Scsi_Host *instance)
2503  *
2504  * Purpose : does reselection, initializing the instance->connected
2505  *	field to point to the struct scsi_cmnd for which the I_T_L or I_T_L_Q
2506  *	nexus has been reestablished,
2507  *
2508  * Inputs : instance - this instance of the NCR5380.
2509  *
2510  */
2511 
2512 /* it might eventually prove necessary to do a dma setup on
2513    reselection, but it doesn't seem to be needed now -- sam */
2514 
NCR5380_reselect(struct Scsi_Host * instance)2515 static void NCR5380_reselect (struct Scsi_Host *instance)
2516 {
2517     SETUP_HOSTDATA(instance);
2518     unsigned char target_mask;
2519     unsigned char lun;
2520 #ifdef SUPPORT_TAGS
2521     unsigned char tag;
2522 #endif
2523     unsigned char msg[3];
2524     struct scsi_cmnd *tmp = NULL, *prev;
2525 /*    unsigned long flags; */
2526 
2527     /*
2528      * Disable arbitration, etc. since the host adapter obviously
2529      * lost, and tell an interrupted NCR5380_select() to restart.
2530      */
2531 
2532     NCR5380_write(MODE_REG, MR_BASE);
2533     hostdata->restart_select = 1;
2534 
2535     target_mask = NCR5380_read(CURRENT_SCSI_DATA_REG) & ~(hostdata->id_mask);
2536 
2537     RSL_PRINTK("scsi%d: reselect\n", HOSTNO);
2538 
2539     /*
2540      * At this point, we have detected that our SCSI ID is on the bus,
2541      * SEL is true and BSY was false for at least one bus settle delay
2542      * (400 ns).
2543      *
2544      * We must assert BSY ourselves, until the target drops the SEL
2545      * signal.
2546      */
2547 
2548     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_BSY);
2549 
2550     while (NCR5380_read(STATUS_REG) & SR_SEL);
2551     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2552 
2553     /*
2554      * Wait for target to go into MSGIN.
2555      */
2556 
2557     while (!(NCR5380_read(STATUS_REG) & SR_REQ));
2558 
2559 #if 1
2560     // acknowledge toggle to MSGIN
2561     NCR5380_write(TARGET_COMMAND_REG, PHASE_SR_TO_TCR(PHASE_MSGIN));
2562 
2563     // peek at the byte without really hitting the bus
2564     msg[0] = NCR5380_read(CURRENT_SCSI_DATA_REG);
2565 #endif
2566 
2567     if (!(msg[0] & 0x80)) {
2568 	printk(KERN_DEBUG "scsi%d: expecting IDENTIFY message, got ", HOSTNO);
2569 	spi_print_msg(msg);
2570 	do_abort(instance);
2571 	return;
2572     }
2573     lun = (msg[0] & 0x07);
2574 
2575     /*
2576      * Find the command corresponding to the I_T_L or I_T_L_Q  nexus we
2577      * just reestablished, and remove it from the disconnected queue.
2578      */
2579 
2580     for (tmp = (struct scsi_cmnd *) hostdata->disconnected_queue, prev = NULL;
2581 	 tmp; prev = tmp, tmp = NEXT(tmp) ) {
2582 	if ((target_mask == (1 << tmp->device->id)) && (lun == tmp->device->lun)
2583 #ifdef SUPPORT_TAGS
2584 	    && (tag == tmp->tag)
2585 #endif
2586 	    ) {
2587 	    if (prev) {
2588 		REMOVE(prev, NEXT(prev), tmp, NEXT(tmp));
2589 		NEXT(prev) = NEXT(tmp);
2590 	    } else {
2591 		REMOVE(-1, hostdata->disconnected_queue, tmp, NEXT(tmp));
2592 		hostdata->disconnected_queue = NEXT(tmp);
2593 	    }
2594 	    NEXT(tmp) = NULL;
2595 	    break;
2596 	}
2597     }
2598 
2599     if (!tmp) {
2600 	printk(KERN_WARNING "scsi%d: warning: target bitmask %02x lun %d "
2601 #ifdef SUPPORT_TAGS
2602 		"tag %d "
2603 #endif
2604 		"not in disconnected_queue.\n",
2605 		HOSTNO, target_mask, lun
2606 #ifdef SUPPORT_TAGS
2607 		, tag
2608 #endif
2609 		);
2610 	/*
2611 	 * Since we have an established nexus that we can't do anything
2612 	 * with, we must abort it.
2613 	 */
2614 	do_abort(instance);
2615 	return;
2616     }
2617 #if 1
2618     /* engage dma setup for the command we just saw */
2619     {
2620 	    void *d;
2621 	    unsigned long count;
2622 
2623 	    if (!tmp->SCp.this_residual && tmp->SCp.buffers_residual) {
2624 		    count = tmp->SCp.buffer->length;
2625 		    d = SGADDR(tmp->SCp.buffer);
2626 	    } else {
2627 		    count = tmp->SCp.this_residual;
2628 		    d = tmp->SCp.ptr;
2629 	    }
2630 #ifdef REAL_DMA
2631 	    /* setup this command for dma if not already */
2632 	    if((count > SUN3_DMA_MINSIZE) && (sun3_dma_setup_done != tmp))
2633 	    {
2634 		    sun3scsi_dma_setup(d, count, rq_data_dir(tmp->request));
2635 		    sun3_dma_setup_done = tmp;
2636 	    }
2637 #endif
2638     }
2639 #endif
2640 
2641     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_ACK);
2642     /* Accept message by clearing ACK */
2643     NCR5380_write(INITIATOR_COMMAND_REG, ICR_BASE);
2644 
2645 #ifdef SUPPORT_TAGS
2646     /* If the phase is still MSGIN, the target wants to send some more
2647      * messages. In case it supports tagged queuing, this is probably a
2648      * SIMPLE_QUEUE_TAG for the I_T_L_Q nexus.
2649      */
2650     tag = TAG_NONE;
2651     if (phase == PHASE_MSGIN && setup_use_tagged_queuing) {
2652 	/* Accept previous IDENTIFY message by clearing ACK */
2653 	NCR5380_write( INITIATOR_COMMAND_REG, ICR_BASE );
2654 	len = 2;
2655 	data = msg+1;
2656 	if (!NCR5380_transfer_pio(instance, &phase, &len, &data) &&
2657 	    msg[1] == SIMPLE_QUEUE_TAG)
2658 	    tag = msg[2];
2659 	TAG_PRINTK("scsi%d: target mask %02x, lun %d sent tag %d at "
2660 		   "reselection\n", HOSTNO, target_mask, lun, tag);
2661     }
2662 #endif
2663 
2664     hostdata->connected = tmp;
2665     RSL_PRINTK("scsi%d: nexus established, target = %d, lun = %d, tag = %d\n",
2666 	       HOSTNO, tmp->target, tmp->lun, tmp->tag);
2667 }
2668 
2669 
2670 /*
2671  * Function : int NCR5380_abort(struct scsi_cmnd *cmd)
2672  *
2673  * Purpose : abort a command
2674  *
2675  * Inputs : cmd - the struct scsi_cmnd to abort, code - code to set the
2676  * 	host byte of the result field to, if zero DID_ABORTED is
2677  *	used.
2678  *
2679  * Returns : 0 - success, -1 on failure.
2680  *
2681  * XXX - there is no way to abort the command that is currently
2682  * 	 connected, you have to wait for it to complete.  If this is
2683  *	 a problem, we could implement longjmp() / setjmp(), setjmp()
2684  * 	 called where the loop started in NCR5380_main().
2685  */
2686 
NCR5380_abort(struct scsi_cmnd * cmd)2687 static int NCR5380_abort(struct scsi_cmnd *cmd)
2688 {
2689     struct Scsi_Host *instance = cmd->device->host;
2690     SETUP_HOSTDATA(instance);
2691     struct scsi_cmnd *tmp, **prev;
2692     unsigned long flags;
2693 
2694     printk(KERN_NOTICE "scsi%d: aborting command\n", HOSTNO);
2695     scsi_print_command(cmd);
2696 
2697     NCR5380_print_status (instance);
2698 
2699     local_irq_save(flags);
2700 
2701     ABRT_PRINTK("scsi%d: abort called basr 0x%02x, sr 0x%02x\n", HOSTNO,
2702 		NCR5380_read(BUS_AND_STATUS_REG),
2703 		NCR5380_read(STATUS_REG));
2704 
2705 #if 1
2706 /*
2707  * Case 1 : If the command is the currently executing command,
2708  * we'll set the aborted flag and return control so that
2709  * information transfer routine can exit cleanly.
2710  */
2711 
2712     if (hostdata->connected == cmd) {
2713 
2714 	ABRT_PRINTK("scsi%d: aborting connected command\n", HOSTNO);
2715 /*
2716  * We should perform BSY checking, and make sure we haven't slipped
2717  * into BUS FREE.
2718  */
2719 
2720 /*	NCR5380_write(INITIATOR_COMMAND_REG, ICR_ASSERT_ATN); */
2721 /*
2722  * Since we can't change phases until we've completed the current
2723  * handshake, we have to source or sink a byte of data if the current
2724  * phase is not MSGOUT.
2725  */
2726 
2727 /*
2728  * Return control to the executing NCR drive so we can clear the
2729  * aborted flag and get back into our main loop.
2730  */
2731 
2732 	if (do_abort(instance) == 0) {
2733 	  hostdata->aborted = 1;
2734 	  hostdata->connected = NULL;
2735 	  cmd->result = DID_ABORT << 16;
2736 #ifdef SUPPORT_TAGS
2737 	  cmd_free_tag( cmd );
2738 #else
2739 	  hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
2740 #endif
2741 	  local_irq_restore(flags);
2742 	  cmd->scsi_done(cmd);
2743 	  return SCSI_ABORT_SUCCESS;
2744 	} else {
2745 /*	  local_irq_restore(flags); */
2746 	  printk("scsi%d: abort of connected command failed!\n", HOSTNO);
2747 	  return SCSI_ABORT_ERROR;
2748 	}
2749    }
2750 #endif
2751 
2752 /*
2753  * Case 2 : If the command hasn't been issued yet, we simply remove it
2754  * 	    from the issue queue.
2755  */
2756     for (prev = (struct scsi_cmnd **) &(hostdata->issue_queue),
2757 	tmp = (struct scsi_cmnd *) hostdata->issue_queue;
2758 	tmp; prev = NEXTADDR(tmp), tmp = NEXT(tmp))
2759 	if (cmd == tmp) {
2760 	    REMOVE(5, *prev, tmp, NEXT(tmp));
2761 	    (*prev) = NEXT(tmp);
2762 	    NEXT(tmp) = NULL;
2763 	    tmp->result = DID_ABORT << 16;
2764 	    local_irq_restore(flags);
2765 	    ABRT_PRINTK("scsi%d: abort removed command from issue queue.\n",
2766 			HOSTNO);
2767 	    /* Tagged queuing note: no tag to free here, hasn't been assigned
2768 	     * yet... */
2769 	    tmp->scsi_done(tmp);
2770 	    return SCSI_ABORT_SUCCESS;
2771 	}
2772 
2773 /*
2774  * Case 3 : If any commands are connected, we're going to fail the abort
2775  *	    and let the high level SCSI driver retry at a later time or
2776  *	    issue a reset.
2777  *
2778  *	    Timeouts, and therefore aborted commands, will be highly unlikely
2779  *          and handling them cleanly in this situation would make the common
2780  *	    case of noresets less efficient, and would pollute our code.  So,
2781  *	    we fail.
2782  */
2783 
2784     if (hostdata->connected) {
2785 	local_irq_restore(flags);
2786 	ABRT_PRINTK("scsi%d: abort failed, command connected.\n", HOSTNO);
2787         return SCSI_ABORT_SNOOZE;
2788     }
2789 
2790 /*
2791  * Case 4: If the command is currently disconnected from the bus, and
2792  * 	there are no connected commands, we reconnect the I_T_L or
2793  *	I_T_L_Q nexus associated with it, go into message out, and send
2794  *      an abort message.
2795  *
2796  * This case is especially ugly. In order to reestablish the nexus, we
2797  * need to call NCR5380_select().  The easiest way to implement this
2798  * function was to abort if the bus was busy, and let the interrupt
2799  * handler triggered on the SEL for reselect take care of lost arbitrations
2800  * where necessary, meaning interrupts need to be enabled.
2801  *
2802  * When interrupts are enabled, the queues may change - so we
2803  * can't remove it from the disconnected queue before selecting it
2804  * because that could cause a failure in hashing the nexus if that
2805  * device reselected.
2806  *
2807  * Since the queues may change, we can't use the pointers from when we
2808  * first locate it.
2809  *
2810  * So, we must first locate the command, and if NCR5380_select()
2811  * succeeds, then issue the abort, relocate the command and remove
2812  * it from the disconnected queue.
2813  */
2814 
2815     for (tmp = (struct scsi_cmnd *) hostdata->disconnected_queue; tmp;
2816 	 tmp = NEXT(tmp))
2817         if (cmd == tmp) {
2818             local_irq_restore(flags);
2819 	    ABRT_PRINTK("scsi%d: aborting disconnected command.\n", HOSTNO);
2820 
2821             if (NCR5380_select (instance, cmd, (int) cmd->tag))
2822 		return SCSI_ABORT_BUSY;
2823 
2824 	    ABRT_PRINTK("scsi%d: nexus reestablished.\n", HOSTNO);
2825 
2826 	    do_abort (instance);
2827 
2828 	    local_irq_save(flags);
2829 	    for (prev = (struct scsi_cmnd **) &(hostdata->disconnected_queue),
2830 		tmp = (struct scsi_cmnd *) hostdata->disconnected_queue;
2831 		tmp; prev = NEXTADDR(tmp), tmp = NEXT(tmp) )
2832 		    if (cmd == tmp) {
2833 		    REMOVE(5, *prev, tmp, NEXT(tmp));
2834 		    *prev = NEXT(tmp);
2835 		    NEXT(tmp) = NULL;
2836 		    tmp->result = DID_ABORT << 16;
2837 		    /* We must unlock the tag/LUN immediately here, since the
2838 		     * target goes to BUS FREE and doesn't send us another
2839 		     * message (COMMAND_COMPLETE or the like)
2840 		     */
2841 #ifdef SUPPORT_TAGS
2842 		    cmd_free_tag( tmp );
2843 #else
2844 		    hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
2845 #endif
2846 		    local_irq_restore(flags);
2847 		    tmp->scsi_done(tmp);
2848 		    return SCSI_ABORT_SUCCESS;
2849 		}
2850 	}
2851 
2852 /*
2853  * Case 5 : If we reached this point, the command was not found in any of
2854  *	    the queues.
2855  *
2856  * We probably reached this point because of an unlikely race condition
2857  * between the command completing successfully and the abortion code,
2858  * so we won't panic, but we will notify the user in case something really
2859  * broke.
2860  */
2861 
2862     local_irq_restore(flags);
2863     printk(KERN_INFO "scsi%d: warning : SCSI command probably completed successfully\n"
2864            KERN_INFO "        before abortion\n", HOSTNO);
2865 
2866     return SCSI_ABORT_NOT_RUNNING;
2867 }
2868 
2869 
2870 /*
2871  * Function : int NCR5380_bus_reset(struct scsi_cmnd *cmd)
2872  *
2873  * Purpose : reset the SCSI bus.
2874  *
2875  * Returns : SCSI_RESET_WAKEUP
2876  *
2877  */
2878 
NCR5380_bus_reset(struct scsi_cmnd * cmd)2879 static int NCR5380_bus_reset(struct scsi_cmnd *cmd)
2880 {
2881     SETUP_HOSTDATA(cmd->device->host);
2882     int           i;
2883     unsigned long flags;
2884 #if 1
2885     struct scsi_cmnd *connected, *disconnected_queue;
2886 #endif
2887 
2888 
2889     NCR5380_print_status (cmd->device->host);
2890 
2891     /* get in phase */
2892     NCR5380_write( TARGET_COMMAND_REG,
2893 		   PHASE_SR_TO_TCR( NCR5380_read(STATUS_REG) ));
2894     /* assert RST */
2895     NCR5380_write( INITIATOR_COMMAND_REG, ICR_BASE | ICR_ASSERT_RST );
2896     udelay (40);
2897     /* reset NCR registers */
2898     NCR5380_write( INITIATOR_COMMAND_REG, ICR_BASE );
2899     NCR5380_write( MODE_REG, MR_BASE );
2900     NCR5380_write( TARGET_COMMAND_REG, 0 );
2901     NCR5380_write( SELECT_ENABLE_REG, 0 );
2902     /* ++roman: reset interrupt condition! otherwise no interrupts don't get
2903      * through anymore ... */
2904     (void)NCR5380_read( RESET_PARITY_INTERRUPT_REG );
2905 
2906 #if 1 /* XXX Should now be done by midlevel code, but it's broken XXX */
2907       /* XXX see below                                            XXX */
2908 
2909     /* MSch: old-style reset: actually abort all command processing here */
2910 
2911     /* After the reset, there are no more connected or disconnected commands
2912      * and no busy units; to avoid problems with re-inserting the commands
2913      * into the issue_queue (via scsi_done()), the aborted commands are
2914      * remembered in local variables first.
2915      */
2916     local_irq_save(flags);
2917     connected = (struct scsi_cmnd *)hostdata->connected;
2918     hostdata->connected = NULL;
2919     disconnected_queue = (struct scsi_cmnd *)hostdata->disconnected_queue;
2920     hostdata->disconnected_queue = NULL;
2921 #ifdef SUPPORT_TAGS
2922     free_all_tags();
2923 #endif
2924     for( i = 0; i < 8; ++i )
2925 	hostdata->busy[i] = 0;
2926 #ifdef REAL_DMA
2927     hostdata->dma_len = 0;
2928 #endif
2929     local_irq_restore(flags);
2930 
2931     /* In order to tell the mid-level code which commands were aborted,
2932      * set the command status to DID_RESET and call scsi_done() !!!
2933      * This ultimately aborts processing of these commands in the mid-level.
2934      */
2935 
2936     if ((cmd = connected)) {
2937 	ABRT_PRINTK("scsi%d: reset aborted a connected command\n", H_NO(cmd));
2938 	cmd->result = (cmd->result & 0xffff) | (DID_RESET << 16);
2939 	cmd->scsi_done( cmd );
2940     }
2941 
2942     for (i = 0; (cmd = disconnected_queue); ++i) {
2943 	disconnected_queue = NEXT(cmd);
2944 	NEXT(cmd) = NULL;
2945 	cmd->result = (cmd->result & 0xffff) | (DID_RESET << 16);
2946 	cmd->scsi_done( cmd );
2947     }
2948     if (i > 0)
2949 	ABRT_PRINTK("scsi: reset aborted %d disconnected command(s)\n", i);
2950 
2951 
2952     /* since all commands have been explicitly terminated, we need to tell
2953      * the midlevel code that the reset was SUCCESSFUL, and there is no
2954      * need to 'wake up' the commands by a request_sense
2955      */
2956     return SCSI_RESET_SUCCESS | SCSI_RESET_BUS_RESET;
2957 #else /* 1 */
2958 
2959     /* MSch: new-style reset handling: let the mid-level do what it can */
2960 
2961     /* ++guenther: MID-LEVEL IS STILL BROKEN.
2962      * Mid-level is supposed to requeue all commands that were active on the
2963      * various low-level queues. In fact it does this, but that's not enough
2964      * because all these commands are subject to timeout. And if a timeout
2965      * happens for any removed command, *_abort() is called but all queues
2966      * are now empty. Abort then gives up the falcon lock, which is fatal,
2967      * since the mid-level will queue more commands and must have the lock
2968      * (it's all happening inside timer interrupt handler!!).
2969      * Even worse, abort will return NOT_RUNNING for all those commands not
2970      * on any queue, so they won't be retried ...
2971      *
2972      * Conclusion: either scsi.c disables timeout for all resetted commands
2973      * immediately, or we lose!  As of linux-2.0.20 it doesn't.
2974      */
2975 
2976     /* After the reset, there are no more connected or disconnected commands
2977      * and no busy units; so clear the low-level status here to avoid
2978      * conflicts when the mid-level code tries to wake up the affected
2979      * commands!
2980      */
2981 
2982     if (hostdata->issue_queue)
2983 	ABRT_PRINTK("scsi%d: reset aborted issued command(s)\n", H_NO(cmd));
2984     if (hostdata->connected)
2985 	ABRT_PRINTK("scsi%d: reset aborted a connected command\n", H_NO(cmd));
2986     if (hostdata->disconnected_queue)
2987 	ABRT_PRINTK("scsi%d: reset aborted disconnected command(s)\n", H_NO(cmd));
2988 
2989     local_irq_save(flags);
2990     hostdata->issue_queue = NULL;
2991     hostdata->connected = NULL;
2992     hostdata->disconnected_queue = NULL;
2993 #ifdef SUPPORT_TAGS
2994     free_all_tags();
2995 #endif
2996     for( i = 0; i < 8; ++i )
2997 	hostdata->busy[i] = 0;
2998 #ifdef REAL_DMA
2999     hostdata->dma_len = 0;
3000 #endif
3001     local_irq_restore(flags);
3002 
3003     /* we did no complete reset of all commands, so a wakeup is required */
3004     return SCSI_RESET_WAKEUP | SCSI_RESET_BUS_RESET;
3005 #endif /* 1 */
3006 }
3007 
3008 /* Local Variables: */
3009 /* tab-width: 8     */
3010 /* End:             */
3011