1 /*
2  *  NCR53c406.c
3  *  Low-level SCSI driver for NCR53c406a chip.
4  *  Copyright (C) 1994, 1995, 1996 Normunds Saumanis (normunds@fi.ibm.com)
5  *
6  *  LILO command line usage: ncr53c406a=<PORTBASE>[,<IRQ>[,<FASTPIO>]]
7  *  Specify IRQ = 0 for non-interrupt driven mode.
8  *  FASTPIO = 1 for fast pio mode, 0 for slow mode.
9  *
10  *  This program is free software; you can redistribute it and/or modify it
11  *  under the terms of the GNU General Public License as published by the
12  *  Free Software Foundation; either version 2, or (at your option) any
13  *  later version.
14  *
15  *  This program is distributed in the hope that it will be useful, but
16  *  WITHOUT ANY WARRANTY; without even the implied warranty of
17  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18  *  General Public License for more details.
19  *
20  */
21 
22 #define NCR53C406A_DEBUG 0
23 #define VERBOSE_NCR53C406A_DEBUG 0
24 
25 /* Set this to 1 for PIO mode (recommended) or to 0 for DMA mode */
26 #define USE_PIO 1
27 
28 #define USE_BIOS 0
29 				/* #define BIOS_ADDR 0xD8000 *//* define this if autoprobe fails */
30 				/* #define PORT_BASE 0x330 *//* define this if autoprobe fails */
31 				/* #define IRQ_LEV   0	*//* define this if autoprobe fails */
32 #define DMA_CHAN  5		/* this is ignored if DMA is disabled */
33 
34 /* Set this to 0 if you encounter kernel lockups while transferring
35  * data in PIO mode */
36 #define USE_FAST_PIO 1
37 
38 /* ============= End of user configurable parameters ============= */
39 
40 #include <linux/module.h>
41 
42 #include <linux/errno.h>
43 #include <linux/ioport.h>
44 #include <linux/interrupt.h>
45 #include <linux/proc_fs.h>
46 #include <linux/stat.h>
47 #include <linux/init.h>
48 #include <linux/bitops.h>
49 #include <asm/io.h>
50 #include <asm/dma.h>
51 #include <asm/irq.h>
52 
53 #include <linux/blkdev.h>
54 #include <linux/spinlock.h>
55 #include "scsi.h"
56 #include <scsi/scsi_host.h>
57 
58 /* ============================================================= */
59 
60 #define WATCHDOG 5000000
61 
62 #define SYNC_MODE 0		/* Synchronous transfer mode */
63 
64 #ifdef DEBUG
65 #undef NCR53C406A_DEBUG
66 #define NCR53C406A_DEBUG 1
67 #endif
68 
69 #if USE_PIO
70 #define USE_DMA 0
71 #else
72 #define USE_DMA 1
73 #endif
74 
75 /* Default configuration */
76 #define C1_IMG   0x07		/* ID=7 */
77 #define C2_IMG   0x48		/* FE SCSI2 */
78 #if USE_DMA
79 #define C3_IMG   0x21		/* CDB TE */
80 #else
81 #define C3_IMG   0x20		/* CDB */
82 #endif
83 #define C4_IMG   0x04		/* ANE */
84 #define C5_IMG   0xb6		/* AA PI SIE POL */
85 
86 #define REG0 (outb(C4_IMG, CONFIG4))
87 #define REG1 (outb(C5_IMG, CONFIG5))
88 
89 #if NCR53C406A_DEBUG
90 #define DEB(x) x
91 #else
92 #define DEB(x)
93 #endif
94 
95 #if VERBOSE_NCR53C406A_DEBUG
96 #define VDEB(x) x
97 #else
98 #define VDEB(x)
99 #endif
100 
101 #define LOAD_DMA_COUNT(count) \
102   outb(count & 0xff, TC_LSB); \
103   outb((count >> 8) & 0xff, TC_MSB); \
104   outb((count >> 16) & 0xff, TC_HIGH);
105 
106 /* Chip commands */
107 #define DMA_OP               0x80
108 
109 #define SCSI_NOP             0x00
110 #define FLUSH_FIFO           0x01
111 #define CHIP_RESET           0x02
112 #define SCSI_RESET           0x03
113 #define RESELECT             0x40
114 #define SELECT_NO_ATN        0x41
115 #define SELECT_ATN           0x42
116 #define SELECT_ATN_STOP      0x43
117 #define ENABLE_SEL           0x44
118 #define DISABLE_SEL          0x45
119 #define SELECT_ATN3          0x46
120 #define RESELECT3            0x47
121 #define TRANSFER_INFO        0x10
122 #define INIT_CMD_COMPLETE    0x11
123 #define MSG_ACCEPT           0x12
124 #define TRANSFER_PAD         0x18
125 #define SET_ATN              0x1a
126 #define RESET_ATN            0x1b
127 #define SEND_MSG             0x20
128 #define SEND_STATUS          0x21
129 #define SEND_DATA            0x22
130 #define DISCONN_SEQ          0x23
131 #define TERMINATE_SEQ        0x24
132 #define TARG_CMD_COMPLETE    0x25
133 #define DISCONN              0x27
134 #define RECV_MSG             0x28
135 #define RECV_CMD             0x29
136 #define RECV_DATA            0x2a
137 #define RECV_CMD_SEQ         0x2b
138 #define TARGET_ABORT_DMA     0x04
139 
140 /*----------------------------------------------------------------*/
141 /* the following will set the monitor border color (useful to find
142    where something crashed or gets stuck at */
143 /* 1 = blue
144    2 = green
145    3 = cyan
146    4 = red
147    5 = magenta
148    6 = yellow
149    7 = white
150 */
151 
152 #if NCR53C406A_DEBUG
153 #define rtrc(i) {inb(0x3da);outb(0x31,0x3c0);outb((i),0x3c0);}
154 #else
155 #define rtrc(i) {}
156 #endif
157 /*----------------------------------------------------------------*/
158 
159 enum Phase {
160 	idle,
161 	data_out,
162 	data_in,
163 	command_ph,
164 	status_ph,
165 	message_out,
166 	message_in
167 };
168 
169 /* Static function prototypes */
170 static void NCR53c406a_intr(void *);
171 static irqreturn_t do_NCR53c406a_intr(int, void *);
172 static void chip_init(void);
173 static void calc_port_addr(void);
174 #ifndef IRQ_LEV
175 static int irq_probe(void);
176 #endif
177 
178 /* ================================================================= */
179 
180 #if USE_BIOS
181 static void *bios_base;
182 #endif
183 
184 #ifdef PORT_BASE
185 static int port_base = PORT_BASE;
186 #else
187 static int port_base;
188 #endif
189 
190 #ifdef IRQ_LEV
191 static int irq_level = IRQ_LEV;
192 #else
193 static int irq_level = -1;	/* 0 is 'no irq', so use -1 for 'uninitialized' */
194 #endif
195 
196 #if USE_DMA
197 static int dma_chan;
198 #endif
199 
200 #if USE_PIO
201 static int fast_pio = USE_FAST_PIO;
202 #endif
203 
204 static Scsi_Cmnd *current_SC;
205 static char info_msg[256];
206 
207 /* ================================================================= */
208 
209 /* possible BIOS locations */
210 #if USE_BIOS
211 static void *addresses[] = {
212 	(void *) 0xd8000,
213 	(void *) 0xc8000
214 };
215 #define ADDRESS_COUNT ARRAY_SIZE(addresses)
216 #endif				/* USE_BIOS */
217 
218 /* possible i/o port addresses */
219 static unsigned short ports[] = { 0x230, 0x330, 0x280, 0x290, 0x330, 0x340, 0x300, 0x310, 0x348, 0x350 };
220 #define PORT_COUNT ARRAY_SIZE(ports)
221 
222 #ifndef MODULE
223 /* possible interrupt channels */
224 static unsigned short intrs[] = { 10, 11, 12, 15 };
225 #define INTR_COUNT ARRAY_SIZE(intrs)
226 #endif /* !MODULE */
227 
228 /* signatures for NCR 53c406a based controllers */
229 #if USE_BIOS
230 struct signature {
231 	char *signature;
232 	int sig_offset;
233 	int sig_length;
234 } signatures[] __initdata = {
235 	/*          1         2         3         4         5         6 */
236 	/* 123456789012345678901234567890123456789012345678901234567890 */
237 	{
238 "Copyright (C) Acculogic, Inc.\r\n2.8M Diskette Extension Bios ver 4.04.03 03/01/1993", 61, 82},};
239 
240 #define SIGNATURE_COUNT ARRAY_SIZE(signatures)
241 #endif				/* USE_BIOS */
242 
243 /* ============================================================ */
244 
245 /* Control Register Set 0 */
246 static int TC_LSB;		/* transfer counter lsb         */
247 static int TC_MSB;		/* transfer counter msb */
248 static int SCSI_FIFO;		/* scsi fifo register   */
249 static int CMD_REG;		/* command register             */
250 static int STAT_REG;		/* status register              */
251 static int DEST_ID;		/* selection/reselection bus id */
252 static int INT_REG;		/* interrupt status register    */
253 static int SRTIMOUT;		/* select/reselect timeout reg  */
254 static int SEQ_REG;		/* sequence step register       */
255 static int SYNCPRD;		/* synchronous transfer period  */
256 static int FIFO_FLAGS;		/* indicates # of bytes in fifo */
257 static int SYNCOFF;		/* synchronous offset register  */
258 static int CONFIG1;		/* configuration register       */
259 static int CLKCONV;		/* clock conversion reg */
260 				/*static int TESTREG;*//* test mode register           */
261 static int CONFIG2;		/* Configuration 2 Register     */
262 static int CONFIG3;		/* Configuration 3 Register     */
263 static int CONFIG4;		/* Configuration 4 Register     */
264 static int TC_HIGH;		/* Transfer Counter High */
265 				/*static int FIFO_BOTTOM;*//* Reserve FIFO byte register   */
266 
267 /* Control Register Set 1 */
268 				/*static int JUMPER_SENSE;*//* Jumper sense port reg (r/w) */
269 				/*static int SRAM_PTR;*//* SRAM address pointer reg (r/w) */
270 				/*static int SRAM_DATA;*//* SRAM data register (r/w) */
271 static int PIO_FIFO;		/* PIO FIFO registers (r/w) */
272 				/*static int PIO_FIFO1;*//*  */
273 				/*static int PIO_FIFO2;*//*  */
274 				/*static int PIO_FIFO3;*//*  */
275 static int PIO_STATUS;		/* PIO status (r/w) */
276 				/*static int ATA_CMD;*//* ATA command/status reg (r/w) */
277 				/*static int ATA_ERR;*//* ATA features/error register (r/w) */
278 static int PIO_FLAG;		/* PIO flag interrupt enable (r/w) */
279 static int CONFIG5;		/* Configuration 5 register (r/w) */
280 				/*static int SIGNATURE;*//* Signature Register (r) */
281 				/*static int CONFIG6;*//* Configuration 6 register (r) */
282 
283 /* ============================================================== */
284 
285 #if USE_DMA
NCR53c406a_dma_setup(unsigned char * ptr,unsigned int count,unsigned char mode)286 static __inline__ int NCR53c406a_dma_setup(unsigned char *ptr, unsigned int count, unsigned char mode)
287 {
288 	unsigned limit;
289 	unsigned long flags = 0;
290 
291 	VDEB(printk("dma: before count=%d   ", count));
292 	if (dma_chan <= 3) {
293 		if (count > 65536)
294 			count = 65536;
295 		limit = 65536 - (((unsigned) ptr) & 0xFFFF);
296 	} else {
297 		if (count > (65536 << 1))
298 			count = (65536 << 1);
299 		limit = (65536 << 1) - (((unsigned) ptr) & 0x1FFFF);
300 	}
301 
302 	if (count > limit)
303 		count = limit;
304 
305 	VDEB(printk("after count=%d\n", count));
306 	if ((count & 1) || (((unsigned) ptr) & 1))
307 		panic("NCR53c406a: attempted unaligned DMA transfer\n");
308 
309 	flags = claim_dma_lock();
310 	disable_dma(dma_chan);
311 	clear_dma_ff(dma_chan);
312 	set_dma_addr(dma_chan, (long) ptr);
313 	set_dma_count(dma_chan, count);
314 	set_dma_mode(dma_chan, mode);
315 	enable_dma(dma_chan);
316 	release_dma_lock(flags);
317 
318 	return count;
319 }
320 
NCR53c406a_dma_write(unsigned char * src,unsigned int count)321 static __inline__ int NCR53c406a_dma_write(unsigned char *src, unsigned int count)
322 {
323 	return NCR53c406a_dma_setup(src, count, DMA_MODE_WRITE);
324 }
325 
NCR53c406a_dma_read(unsigned char * src,unsigned int count)326 static __inline__ int NCR53c406a_dma_read(unsigned char *src, unsigned int count)
327 {
328 	return NCR53c406a_dma_setup(src, count, DMA_MODE_READ);
329 }
330 
NCR53c406a_dma_residual(void)331 static __inline__ int NCR53c406a_dma_residual(void)
332 {
333 	register int tmp;
334 	unsigned long flags;
335 
336 	flags = claim_dma_lock();
337 	clear_dma_ff(dma_chan);
338 	tmp = get_dma_residue(dma_chan);
339 	release_dma_lock(flags);
340 
341 	return tmp;
342 }
343 #endif				/* USE_DMA */
344 
345 #if USE_PIO
NCR53c406a_pio_read(unsigned char * request,unsigned int reqlen)346 static __inline__ int NCR53c406a_pio_read(unsigned char *request, unsigned int reqlen)
347 {
348 	int i;
349 	int len;		/* current scsi fifo size */
350 
351 	REG1;
352 	while (reqlen) {
353 		i = inb(PIO_STATUS);
354 		/*    VDEB(printk("pio_status=%x\n", i)); */
355 		if (i & 0x80)
356 			return 0;
357 
358 		switch (i & 0x1e) {
359 		default:
360 		case 0x10:
361 			len = 0;
362 			break;
363 		case 0x0:
364 			len = 1;
365 			break;
366 		case 0x8:
367 			len = 42;
368 			break;
369 		case 0xc:
370 			len = 84;
371 			break;
372 		case 0xe:
373 			len = 128;
374 			break;
375 		}
376 
377 		if ((i & 0x40) && len == 0) {	/* fifo empty and interrupt occurred */
378 			return 0;
379 		}
380 
381 		if (len) {
382 			if (len > reqlen)
383 				len = reqlen;
384 
385 			if (fast_pio && len > 3) {
386 				insl(PIO_FIFO, request, len >> 2);
387 				request += len & 0xfc;
388 				reqlen -= len & 0xfc;
389 			} else {
390 				while (len--) {
391 					*request++ = inb(PIO_FIFO);
392 					reqlen--;
393 				}
394 			}
395 		}
396 	}
397 	return 0;
398 }
399 
NCR53c406a_pio_write(unsigned char * request,unsigned int reqlen)400 static __inline__ int NCR53c406a_pio_write(unsigned char *request, unsigned int reqlen)
401 {
402 	int i = 0;
403 	int len;		/* current scsi fifo size */
404 
405 	REG1;
406 	while (reqlen && !(i & 0x40)) {
407 		i = inb(PIO_STATUS);
408 		/*    VDEB(printk("pio_status=%x\n", i)); */
409 		if (i & 0x80)	/* error */
410 			return 0;
411 
412 		switch (i & 0x1e) {
413 		case 0x10:
414 			len = 128;
415 			break;
416 		case 0x0:
417 			len = 84;
418 			break;
419 		case 0x8:
420 			len = 42;
421 			break;
422 		case 0xc:
423 			len = 1;
424 			break;
425 		default:
426 		case 0xe:
427 			len = 0;
428 			break;
429 		}
430 
431 		if (len) {
432 			if (len > reqlen)
433 				len = reqlen;
434 
435 			if (fast_pio && len > 3) {
436 				outsl(PIO_FIFO, request, len >> 2);
437 				request += len & 0xfc;
438 				reqlen -= len & 0xfc;
439 			} else {
440 				while (len--) {
441 					outb(*request++, PIO_FIFO);
442 					reqlen--;
443 				}
444 			}
445 		}
446 	}
447 	return 0;
448 }
449 #endif				/* USE_PIO */
450 
NCR53c406a_detect(struct scsi_host_template * tpnt)451 static int __init NCR53c406a_detect(struct scsi_host_template * tpnt)
452 {
453 	int present = 0;
454 	struct Scsi_Host *shpnt = NULL;
455 #ifndef PORT_BASE
456 	int i;
457 #endif
458 
459 #if USE_BIOS
460 	int ii, jj;
461 	bios_base = 0;
462 	/* look for a valid signature */
463 	for (ii = 0; ii < ADDRESS_COUNT && !bios_base; ii++)
464 		for (jj = 0; (jj < SIGNATURE_COUNT) && !bios_base; jj++)
465 			if (!memcmp((void *) addresses[ii] + signatures[jj].sig_offset, (void *) signatures[jj].signature, (int) signatures[jj].sig_length))
466 				bios_base = addresses[ii];
467 
468 	if (!bios_base) {
469 		printk("NCR53c406a: BIOS signature not found\n");
470 		return 0;
471 	}
472 
473 	DEB(printk("NCR53c406a BIOS found at 0x%x\n", (unsigned int) bios_base);
474 	    );
475 #endif				/* USE_BIOS */
476 
477 #ifdef PORT_BASE
478 	if (!request_region(port_base, 0x10, "NCR53c406a"))	/* ports already snatched */
479 		port_base = 0;
480 
481 #else				/* autodetect */
482 	if (port_base) {	/* LILO override */
483 		if (!request_region(port_base, 0x10, "NCR53c406a"))
484 			port_base = 0;
485 	} else {
486 		for (i = 0; i < PORT_COUNT && !port_base; i++) {
487 			if (!request_region(ports[i], 0x10, "NCR53c406a")) {
488 				DEB(printk("NCR53c406a: port 0x%x in use\n", ports[i]));
489 			} else {
490 				VDEB(printk("NCR53c406a: port 0x%x available\n", ports[i]));
491 				outb(C5_IMG, ports[i] + 0x0d);	/* reg set 1 */
492 				if ((inb(ports[i] + 0x0e) ^ inb(ports[i] + 0x0e)) == 7 && (inb(ports[i] + 0x0e) ^ inb(ports[i] + 0x0e)) == 7 && (inb(ports[i] + 0x0e) & 0xf8) == 0x58) {
493 					port_base = ports[i];
494 					VDEB(printk("NCR53c406a: Sig register valid\n"));
495 					VDEB(printk("port_base=0x%x\n", port_base));
496 					break;
497 				}
498 				release_region(ports[i], 0x10);
499 			}
500 		}
501 	}
502 #endif				/* PORT_BASE */
503 
504 	if (!port_base) {	/* no ports found */
505 		printk("NCR53c406a: no available ports found\n");
506 		return 0;
507 	}
508 
509 	DEB(printk("NCR53c406a detected\n"));
510 
511 	calc_port_addr();
512 	chip_init();
513 
514 #ifndef IRQ_LEV
515 	if (irq_level < 0) {	/* LILO override if >= 0 */
516 		irq_level = irq_probe();
517 		if (irq_level < 0) {	/* Trouble */
518 			printk("NCR53c406a: IRQ problem, irq_level=%d, giving up\n", irq_level);
519 			goto err_release;
520 		}
521 	}
522 #endif
523 
524 	DEB(printk("NCR53c406a: using port_base 0x%x\n", port_base));
525 
526 	present = 1;
527 	tpnt->proc_name = "NCR53c406a";
528 
529 	shpnt = scsi_register(tpnt, 0);
530 	if (!shpnt) {
531 		printk("NCR53c406a: Unable to register host, giving up.\n");
532 		goto err_release;
533 	}
534 
535 	if (irq_level > 0) {
536 		if (request_irq(irq_level, do_NCR53c406a_intr, 0, "NCR53c406a", shpnt)) {
537 			printk("NCR53c406a: unable to allocate IRQ %d\n", irq_level);
538 			goto err_free_scsi;
539 		}
540 		tpnt->can_queue = 1;
541 		DEB(printk("NCR53c406a: allocated IRQ %d\n", irq_level));
542 	} else if (irq_level == 0) {
543 		tpnt->can_queue = 0;
544 		DEB(printk("NCR53c406a: No interrupts detected\n"));
545 		printk("NCR53c406a driver no longer supports polling interface\n");
546 		printk("Please email linux-scsi@vger.kernel.org\n");
547 
548 #if USE_DMA
549 		printk("NCR53c406a: No interrupts found and DMA mode defined. Giving up.\n");
550 #endif				/* USE_DMA */
551 		goto err_free_scsi;
552 	} else {
553 		DEB(printk("NCR53c406a: Shouldn't get here!\n"));
554 		goto err_free_scsi;
555 	}
556 
557 #if USE_DMA
558 	dma_chan = DMA_CHAN;
559 	if (request_dma(dma_chan, "NCR53c406a") != 0) {
560 		printk("NCR53c406a: unable to allocate DMA channel %d\n", dma_chan);
561 		goto err_free_irq;
562 	}
563 
564 	DEB(printk("Allocated DMA channel %d\n", dma_chan));
565 #endif				/* USE_DMA */
566 
567 	shpnt->irq = irq_level;
568 	shpnt->io_port = port_base;
569 	shpnt->n_io_port = 0x10;
570 #if USE_DMA
571 	shpnt->dma = dma_chan;
572 #endif
573 
574 #if USE_DMA
575 	sprintf(info_msg, "NCR53c406a at 0x%x, IRQ %d, DMA channel %d.", port_base, irq_level, dma_chan);
576 #else
577 	sprintf(info_msg, "NCR53c406a at 0x%x, IRQ %d, %s PIO mode.", port_base, irq_level, fast_pio ? "fast" : "slow");
578 #endif
579 
580 	return (present);
581 
582 #if USE_DMA
583       err_free_irq:
584 	if (irq_level)
585 		free_irq(irq_level, shpnt);
586 #endif
587       err_free_scsi:
588 	scsi_unregister(shpnt);
589       err_release:
590 	release_region(port_base, 0x10);
591 	return 0;
592 }
593 
NCR53c406a_release(struct Scsi_Host * shost)594 static int NCR53c406a_release(struct Scsi_Host *shost)
595 {
596 	if (shost->irq)
597 		free_irq(shost->irq, NULL);
598 #ifdef USE_DMA
599 	if (shost->dma_channel != 0xff)
600 		free_dma(shost->dma_channel);
601 #endif
602 	if (shost->io_port && shost->n_io_port)
603 		release_region(shost->io_port, shost->n_io_port);
604 
605 	scsi_unregister(shost);
606 	return 0;
607 }
608 
609 #ifndef MODULE
610 /* called from init/main.c */
NCR53c406a_setup(char * str)611 static int __init NCR53c406a_setup(char *str)
612 {
613 	static size_t setup_idx = 0;
614 	size_t i;
615 	int ints[4];
616 
617 	DEB(printk("NCR53c406a: Setup called\n");
618 	    );
619 
620 	if (setup_idx >= PORT_COUNT - 1) {
621 		printk("NCR53c406a: Setup called too many times.  Bad LILO params?\n");
622 		return 0;
623 	}
624 	get_options(str, 4, ints);
625 	if (ints[0] < 1 || ints[0] > 3) {
626 		printk("NCR53c406a: Malformed command line\n");
627 		printk("NCR53c406a: Usage: ncr53c406a=<PORTBASE>[,<IRQ>[,<FASTPIO>]]\n");
628 		return 0;
629 	}
630 	for (i = 0; i < PORT_COUNT && !port_base; i++)
631 		if (ports[i] == ints[1]) {
632 			port_base = ints[1];
633 			DEB(printk("NCR53c406a: Specified port_base 0x%x\n", port_base);
634 			    )
635 		}
636 	if (!port_base) {
637 		printk("NCR53c406a: Invalid PORTBASE 0x%x specified\n", ints[1]);
638 		return 0;
639 	}
640 
641 	if (ints[0] > 1) {
642 		if (ints[2] == 0) {
643 			irq_level = 0;
644 			DEB(printk("NCR53c406a: Specified irq %d\n", irq_level);
645 			    )
646 		} else
647 			for (i = 0; i < INTR_COUNT && irq_level < 0; i++)
648 				if (intrs[i] == ints[2]) {
649 					irq_level = ints[2];
650 					DEB(printk("NCR53c406a: Specified irq %d\n", port_base);
651 					    )
652 				}
653 		if (irq_level < 0)
654 			printk("NCR53c406a: Invalid IRQ %d specified\n", ints[2]);
655 	}
656 
657 	if (ints[0] > 2)
658 		fast_pio = ints[3];
659 
660 	DEB(printk("NCR53c406a: port_base=0x%x, irq=%d, fast_pio=%d\n", port_base, irq_level, fast_pio);)
661 	return 1;
662 }
663 
664 __setup("ncr53c406a=", NCR53c406a_setup);
665 
666 #endif /* !MODULE */
667 
NCR53c406a_info(struct Scsi_Host * SChost)668 static const char *NCR53c406a_info(struct Scsi_Host *SChost)
669 {
670 	DEB(printk("NCR53c406a_info called\n"));
671 	return (info_msg);
672 }
673 
674 #if 0
675 static void wait_intr(void)
676 {
677 	unsigned long i = jiffies + WATCHDOG;
678 
679 	while (time_after(i, jiffies) && !(inb(STAT_REG) & 0xe0)) {	/* wait for a pseudo-interrupt */
680 		cpu_relax();
681 		barrier();
682 	}
683 
684 	if (time_before_eq(i, jiffies)) {	/* Timed out */
685 		rtrc(0);
686 		current_SC->result = DID_TIME_OUT << 16;
687 		current_SC->SCp.phase = idle;
688 		current_SC->scsi_done(current_SC);
689 		return;
690 	}
691 
692 	NCR53c406a_intr(NULL);
693 }
694 #endif
695 
NCR53c406a_queue_lck(Scsi_Cmnd * SCpnt,void (* done)(Scsi_Cmnd *))696 static int NCR53c406a_queue_lck(Scsi_Cmnd * SCpnt, void (*done) (Scsi_Cmnd *))
697 {
698 	int i;
699 
700 	VDEB(printk("NCR53c406a_queue called\n"));
701 	DEB(printk("cmd=%02x, cmd_len=%02x, target=%02x, lun=%02x, bufflen=%d\n", SCpnt->cmnd[0], SCpnt->cmd_len, SCpnt->target, SCpnt->lun, scsi_bufflen(SCpnt)));
702 
703 #if 0
704 	VDEB(for (i = 0; i < SCpnt->cmd_len; i++)
705 	     printk("cmd[%d]=%02x  ", i, SCpnt->cmnd[i]));
706 	VDEB(printk("\n"));
707 #endif
708 
709 	current_SC = SCpnt;
710 	current_SC->scsi_done = done;
711 	current_SC->SCp.phase = command_ph;
712 	current_SC->SCp.Status = 0;
713 	current_SC->SCp.Message = 0;
714 
715 	/* We are locked here already by the mid layer */
716 	REG0;
717 	outb(scmd_id(SCpnt), DEST_ID);	/* set destination */
718 	outb(FLUSH_FIFO, CMD_REG);	/* reset the fifos */
719 
720 	for (i = 0; i < SCpnt->cmd_len; i++) {
721 		outb(SCpnt->cmnd[i], SCSI_FIFO);
722 	}
723 	outb(SELECT_NO_ATN, CMD_REG);
724 
725 	rtrc(1);
726 	return 0;
727 }
728 
DEF_SCSI_QCMD(NCR53c406a_queue)729 static DEF_SCSI_QCMD(NCR53c406a_queue)
730 
731 static int NCR53c406a_host_reset(Scsi_Cmnd * SCpnt)
732 {
733 	DEB(printk("NCR53c406a_reset called\n"));
734 
735 	spin_lock_irq(SCpnt->device->host->host_lock);
736 
737 	outb(C4_IMG, CONFIG4);	/* Select reg set 0 */
738 	outb(CHIP_RESET, CMD_REG);
739 	outb(SCSI_NOP, CMD_REG);	/* required after reset */
740 	outb(SCSI_RESET, CMD_REG);
741 	chip_init();
742 
743 	rtrc(2);
744 
745 	spin_unlock_irq(SCpnt->device->host->host_lock);
746 
747 	return SUCCESS;
748 }
749 
NCR53c406a_biosparm(struct scsi_device * disk,struct block_device * dev,sector_t capacity,int * info_array)750 static int NCR53c406a_biosparm(struct scsi_device *disk,
751                                struct block_device *dev,
752 			       sector_t capacity, int *info_array)
753 {
754 	int size;
755 
756 	DEB(printk("NCR53c406a_biosparm called\n"));
757 
758 	size = capacity;
759 	info_array[0] = 64;	/* heads */
760 	info_array[1] = 32;	/* sectors */
761 	info_array[2] = size >> 11;	/* cylinders */
762 	if (info_array[2] > 1024) {	/* big disk */
763 		info_array[0] = 255;
764 		info_array[1] = 63;
765 		info_array[2] = size / (255 * 63);
766 	}
767 	return 0;
768 }
769 
do_NCR53c406a_intr(int unused,void * dev_id)770 static irqreturn_t do_NCR53c406a_intr(int unused, void *dev_id)
771 {
772 	unsigned long flags;
773 	struct Scsi_Host *dev = dev_id;
774 
775 	spin_lock_irqsave(dev->host_lock, flags);
776 	NCR53c406a_intr(dev_id);
777 	spin_unlock_irqrestore(dev->host_lock, flags);
778 	return IRQ_HANDLED;
779 }
780 
NCR53c406a_intr(void * dev_id)781 static void NCR53c406a_intr(void *dev_id)
782 {
783 	DEB(unsigned char fifo_size;
784 	    )
785 	    DEB(unsigned char seq_reg;
786 	    )
787 	unsigned char status, int_reg;
788 #if USE_PIO
789 	unsigned char pio_status;
790 	struct scatterlist *sg;
791         int i;
792 #endif
793 
794 	VDEB(printk("NCR53c406a_intr called\n"));
795 
796 #if USE_PIO
797 	REG1;
798 	pio_status = inb(PIO_STATUS);
799 #endif
800 	REG0;
801 	status = inb(STAT_REG);
802 	DEB(seq_reg = inb(SEQ_REG));
803 	int_reg = inb(INT_REG);
804 	DEB(fifo_size = inb(FIFO_FLAGS) & 0x1f);
805 
806 #if NCR53C406A_DEBUG
807 	printk("status=%02x, seq_reg=%02x, int_reg=%02x, fifo_size=%02x", status, seq_reg, int_reg, fifo_size);
808 #if (USE_DMA)
809 	printk("\n");
810 #else
811 	printk(", pio=%02x\n", pio_status);
812 #endif				/* USE_DMA */
813 #endif				/* NCR53C406A_DEBUG */
814 
815 	if (int_reg & 0x80) {	/* SCSI reset intr */
816 		rtrc(3);
817 		DEB(printk("NCR53c406a: reset intr received\n"));
818 		current_SC->SCp.phase = idle;
819 		current_SC->result = DID_RESET << 16;
820 		current_SC->scsi_done(current_SC);
821 		return;
822 	}
823 #if USE_PIO
824 	if (pio_status & 0x80) {
825 		printk("NCR53C406A: Warning: PIO error!\n");
826 		current_SC->SCp.phase = idle;
827 		current_SC->result = DID_ERROR << 16;
828 		current_SC->scsi_done(current_SC);
829 		return;
830 	}
831 #endif				/* USE_PIO */
832 
833 	if (status & 0x20) {	/* Parity error */
834 		printk("NCR53c406a: Warning: parity error!\n");
835 		current_SC->SCp.phase = idle;
836 		current_SC->result = DID_PARITY << 16;
837 		current_SC->scsi_done(current_SC);
838 		return;
839 	}
840 
841 	if (status & 0x40) {	/* Gross error */
842 		printk("NCR53c406a: Warning: gross error!\n");
843 		current_SC->SCp.phase = idle;
844 		current_SC->result = DID_ERROR << 16;
845 		current_SC->scsi_done(current_SC);
846 		return;
847 	}
848 
849 	if (int_reg & 0x20) {	/* Disconnect */
850 		DEB(printk("NCR53c406a: disconnect intr received\n"));
851 		if (current_SC->SCp.phase != message_in) {	/* Unexpected disconnect */
852 			current_SC->result = DID_NO_CONNECT << 16;
853 		} else {	/* Command complete, return status and message */
854 			current_SC->result = (current_SC->SCp.Status & 0xff)
855 			    | ((current_SC->SCp.Message & 0xff) << 8) | (DID_OK << 16);
856 		}
857 
858 		rtrc(0);
859 		current_SC->SCp.phase = idle;
860 		current_SC->scsi_done(current_SC);
861 		return;
862 	}
863 
864 	switch (status & 0x07) {	/* scsi phase */
865 	case 0x00:		/* DATA-OUT */
866 		if (int_reg & 0x10) {	/* Target requesting info transfer */
867 			rtrc(5);
868 			current_SC->SCp.phase = data_out;
869 			VDEB(printk("NCR53c406a: Data-Out phase\n"));
870 			outb(FLUSH_FIFO, CMD_REG);
871 			LOAD_DMA_COUNT(scsi_bufflen(current_SC));	/* Max transfer size */
872 #if USE_DMA			/* No s/g support for DMA */
873 			NCR53c406a_dma_write(scsi_sglist(current_SC),
874                                              scsdi_bufflen(current_SC));
875 
876 #endif				/* USE_DMA */
877 			outb(TRANSFER_INFO | DMA_OP, CMD_REG);
878 #if USE_PIO
879                         scsi_for_each_sg(current_SC, sg, scsi_sg_count(current_SC), i) {
880                                 NCR53c406a_pio_write(sg_virt(sg), sg->length);
881                         }
882 			REG0;
883 #endif				/* USE_PIO */
884 		}
885 		break;
886 
887 	case 0x01:		/* DATA-IN */
888 		if (int_reg & 0x10) {	/* Target requesting info transfer */
889 			rtrc(6);
890 			current_SC->SCp.phase = data_in;
891 			VDEB(printk("NCR53c406a: Data-In phase\n"));
892 			outb(FLUSH_FIFO, CMD_REG);
893 			LOAD_DMA_COUNT(scsi_bufflen(current_SC));	/* Max transfer size */
894 #if USE_DMA			/* No s/g support for DMA */
895 			NCR53c406a_dma_read(scsi_sglist(current_SC),
896                                             scsdi_bufflen(current_SC));
897 #endif				/* USE_DMA */
898 			outb(TRANSFER_INFO | DMA_OP, CMD_REG);
899 #if USE_PIO
900                         scsi_for_each_sg(current_SC, sg, scsi_sg_count(current_SC), i) {
901                                 NCR53c406a_pio_read(sg_virt(sg), sg->length);
902                         }
903 			REG0;
904 #endif				/* USE_PIO */
905 		}
906 		break;
907 
908 	case 0x02:		/* COMMAND */
909 		current_SC->SCp.phase = command_ph;
910 		printk("NCR53c406a: Warning: Unknown interrupt occurred in command phase!\n");
911 		break;
912 
913 	case 0x03:		/* STATUS */
914 		rtrc(7);
915 		current_SC->SCp.phase = status_ph;
916 		VDEB(printk("NCR53c406a: Status phase\n"));
917 		outb(FLUSH_FIFO, CMD_REG);
918 		outb(INIT_CMD_COMPLETE, CMD_REG);
919 		break;
920 
921 	case 0x04:		/* Reserved */
922 	case 0x05:		/* Reserved */
923 		printk("NCR53c406a: WARNING: Reserved phase!!!\n");
924 		break;
925 
926 	case 0x06:		/* MESSAGE-OUT */
927 		DEB(printk("NCR53c406a: Message-Out phase\n"));
928 		current_SC->SCp.phase = message_out;
929 		outb(SET_ATN, CMD_REG);	/* Reject the message */
930 		outb(MSG_ACCEPT, CMD_REG);
931 		break;
932 
933 	case 0x07:		/* MESSAGE-IN */
934 		rtrc(4);
935 		VDEB(printk("NCR53c406a: Message-In phase\n"));
936 		current_SC->SCp.phase = message_in;
937 
938 		current_SC->SCp.Status = inb(SCSI_FIFO);
939 		current_SC->SCp.Message = inb(SCSI_FIFO);
940 
941 		VDEB(printk("SCSI FIFO size=%d\n", inb(FIFO_FLAGS) & 0x1f));
942 		DEB(printk("Status = %02x  Message = %02x\n", current_SC->SCp.Status, current_SC->SCp.Message));
943 
944 		if (current_SC->SCp.Message == SAVE_POINTERS || current_SC->SCp.Message == DISCONNECT) {
945 			outb(SET_ATN, CMD_REG);	/* Reject message */
946 			DEB(printk("Discarding SAVE_POINTERS message\n"));
947 		}
948 		outb(MSG_ACCEPT, CMD_REG);
949 		break;
950 	}
951 }
952 
953 #ifndef IRQ_LEV
irq_probe(void)954 static int irq_probe(void)
955 {
956 	int irqs, irq;
957 	unsigned long i;
958 
959 	inb(INT_REG);		/* clear the interrupt register */
960 	irqs = probe_irq_on();
961 
962 	/* Invalid command will cause an interrupt */
963 	REG0;
964 	outb(0xff, CMD_REG);
965 
966 	/* Wait for the interrupt to occur */
967 	i = jiffies + WATCHDOG;
968 	while (time_after(i, jiffies) && !(inb(STAT_REG) & 0x80))
969 		barrier();
970 	if (time_before_eq(i, jiffies)) {	/* Timed out, must be hardware trouble */
971 		probe_irq_off(irqs);
972 		return -1;
973 	}
974 
975 	irq = probe_irq_off(irqs);
976 
977 	/* Kick the chip */
978 	outb(CHIP_RESET, CMD_REG);
979 	outb(SCSI_NOP, CMD_REG);
980 	chip_init();
981 
982 	return irq;
983 }
984 #endif				/* IRQ_LEV */
985 
chip_init(void)986 static void chip_init(void)
987 {
988 	REG1;
989 #if USE_DMA
990 	outb(0x00, PIO_STATUS);
991 #else				/* USE_PIO */
992 	outb(0x01, PIO_STATUS);
993 #endif
994 	outb(0x00, PIO_FLAG);
995 
996 	outb(C4_IMG, CONFIG4);	/* REG0; */
997 	outb(C3_IMG, CONFIG3);
998 	outb(C2_IMG, CONFIG2);
999 	outb(C1_IMG, CONFIG1);
1000 
1001 	outb(0x05, CLKCONV);	/* clock conversion factor */
1002 	outb(0x9C, SRTIMOUT);	/* Selection timeout */
1003 	outb(0x05, SYNCPRD);	/* Synchronous transfer period */
1004 	outb(SYNC_MODE, SYNCOFF);	/* synchronous mode */
1005 }
1006 
calc_port_addr(void)1007 static void __init calc_port_addr(void)
1008 {
1009 	/* Control Register Set 0 */
1010 	TC_LSB = (port_base + 0x00);
1011 	TC_MSB = (port_base + 0x01);
1012 	SCSI_FIFO = (port_base + 0x02);
1013 	CMD_REG = (port_base + 0x03);
1014 	STAT_REG = (port_base + 0x04);
1015 	DEST_ID = (port_base + 0x04);
1016 	INT_REG = (port_base + 0x05);
1017 	SRTIMOUT = (port_base + 0x05);
1018 	SEQ_REG = (port_base + 0x06);
1019 	SYNCPRD = (port_base + 0x06);
1020 	FIFO_FLAGS = (port_base + 0x07);
1021 	SYNCOFF = (port_base + 0x07);
1022 	CONFIG1 = (port_base + 0x08);
1023 	CLKCONV = (port_base + 0x09);
1024 	/* TESTREG          = (port_base+0x0A); */
1025 	CONFIG2 = (port_base + 0x0B);
1026 	CONFIG3 = (port_base + 0x0C);
1027 	CONFIG4 = (port_base + 0x0D);
1028 	TC_HIGH = (port_base + 0x0E);
1029 	/* FIFO_BOTTOM      = (port_base+0x0F); */
1030 
1031 	/* Control Register Set 1 */
1032 	/* JUMPER_SENSE     = (port_base+0x00); */
1033 	/* SRAM_PTR         = (port_base+0x01); */
1034 	/* SRAM_DATA        = (port_base+0x02); */
1035 	PIO_FIFO = (port_base + 0x04);
1036 	/* PIO_FIFO1        = (port_base+0x05); */
1037 	/* PIO_FIFO2        = (port_base+0x06); */
1038 	/* PIO_FIFO3        = (port_base+0x07); */
1039 	PIO_STATUS = (port_base + 0x08);
1040 	/* ATA_CMD          = (port_base+0x09); */
1041 	/* ATA_ERR          = (port_base+0x0A); */
1042 	PIO_FLAG = (port_base + 0x0B);
1043 	CONFIG5 = (port_base + 0x0D);
1044 	/* SIGNATURE        = (port_base+0x0E); */
1045 	/* CONFIG6          = (port_base+0x0F); */
1046 }
1047 
1048 MODULE_LICENSE("GPL");
1049 
1050 /* NOTE:  scatter-gather support only works in PIO mode.
1051  * Use SG_NONE if DMA mode is enabled!
1052  */
1053 
1054 static struct scsi_host_template driver_template =
1055 {
1056      .proc_name         	= "NCR53c406a"		/* proc_name */,
1057      .name              	= "NCR53c406a"		/* name */,
1058      .detect            	= NCR53c406a_detect	/* detect */,
1059      .release            	= NCR53c406a_release,
1060      .info              	= NCR53c406a_info		/* info */,
1061      .queuecommand      	= NCR53c406a_queue	/* queuecommand */,
1062      .eh_host_reset_handler     = NCR53c406a_host_reset	/* reset */,
1063      .bios_param        	= NCR53c406a_biosparm	/* biosparm */,
1064      .can_queue         	= 1			/* can_queue */,
1065      .this_id           	= 7			/* SCSI ID of the chip */,
1066      .sg_tablesize      	= 32			/*SG_ALL*/ /*SG_NONE*/,
1067      .cmd_per_lun       	= 1			/* commands per lun */,
1068      .unchecked_isa_dma 	= 1			/* unchecked_isa_dma */,
1069      .use_clustering    	= ENABLE_CLUSTERING,
1070 };
1071 
1072 #include "scsi_module.c"
1073 
1074 /*
1075  * Overrides for Emacs so that we get a uniform tabbing style.
1076  * Emacs will notice this stuff at the end of the file and automatically
1077  * adjust the settings for this buffer only.  This must remain at the end
1078  * of the file.
1079  * ---------------------------------------------------------------------------
1080  * Local variables:
1081  * c-indent-level: 4
1082  * c-brace-imaginary-offset: 0
1083  * c-brace-offset: -4
1084  * c-argdecl-indent: 4
1085  * c-label-offset: -4
1086  * c-continued-statement-offset: 4
1087  * c-continued-brace-offset: 0
1088  * indent-tabs-mode: nil
1089  * tab-width: 8
1090  * End:
1091  */
1092