blob: 1434209a8ac54a99dc618310d7065490b2de5988 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001#define AUTOSENSE
2#define PSEUDO_DMA
3#define FOO
4#define UNSAFE /* Not unsafe for PAS16 -- use it */
Olaf Hering44456d32005-07-27 11:45:17 -07005#define PDEBUG 0
Linus Torvalds1da177e2005-04-16 15:20:36 -07006
7/*
8 * This driver adapted from Drew Eckhardt's Trantor T128 driver
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 * ( Based on T128 - DISTRIBUTION RELEASE 3. )
17 *
18 * Modified to work with the Pro Audio Spectrum/Studio 16
19 * by John Weidman.
20 *
21 *
22 * For more information, please consult
23 *
24 * Media Vision
25 * (510) 770-8600
26 * (800) 348-7116
27 *
28 * and
29 *
30 * NCR 5380 Family
31 * SCSI Protocol Controller
32 * Databook
33 *
34 * NCR Microelectronics
35 * 1635 Aeroplaza Drive
36 * Colorado Springs, CO 80916
37 * 1+ (719) 578-3400
38 * 1+ (800) 334-5454
39 */
40
41/*
42 * Options :
43 * AUTOSENSE - if defined, REQUEST SENSE will be performed automatically
44 * for commands that return with a CHECK CONDITION status.
45 *
46 * LIMIT_TRANSFERSIZE - if defined, limit the pseudo-dma transfers to 512
47 * bytes at a time. Since interrupts are disabled by default during
48 * these transfers, we might need this to give reasonable interrupt
49 * service time if the transfer size gets too large.
50 *
51 * PSEUDO_DMA - enables PSEUDO-DMA hardware, should give a 3-4X performance
52 * increase compared to polled I/O.
53 *
54 * PARITY - enable parity checking. Not supported.
55 *
56 * SCSI2 - enable support for SCSI-II tagged queueing. Untested.
57 *
58 * UNSAFE - leave interrupts enabled during pseudo-DMA transfers. This
59 * parameter comes from the NCR5380 code. It is NOT unsafe with
60 * the PAS16 and you should use it. If you don't you will have
61 * a problem with dropped characters during high speed
62 * communications during SCSI transfers. If you really don't
63 * want to use UNSAFE you can try defining LIMIT_TRANSFERSIZE or
64 * twiddle with the transfer size in the high level code.
65 *
66 * USLEEP - enable support for devices that don't disconnect. Untested.
67 *
68 * The card is detected and initialized in one of several ways :
69 * 1. Autoprobe (default) - There are many different models of
70 * the Pro Audio Spectrum/Studio 16, and I only have one of
71 * them, so this may require a little tweaking. An interrupt
72 * is triggered to autoprobe for the interrupt line. Note:
73 * with the newer model boards, the interrupt is set via
74 * software after reset using the default_irq for the
75 * current board number.
76 *
77 * 2. With command line overrides - pas16=port,irq may be
78 * used on the LILO command line to override the defaults.
79 *
80 * 3. With the PAS16_OVERRIDE compile time define. This is
81 * specified as an array of address, irq tuples. Ie, for
82 * one board at the default 0x388 address, IRQ10, I could say
83 * -DPAS16_OVERRIDE={{0x388, 10}}
84 * NOTE: Untested.
85 *
86 * 4. When included as a module, with arguments passed on the command line:
87 * pas16_irq=xx the interrupt
88 * pas16_addr=xx the port
89 * e.g. "modprobe pas16 pas16_addr=0x388 pas16_irq=5"
90 *
91 * Note that if the override methods are used, place holders must
92 * be specified for other boards in the system.
93 *
94 *
95 * Configuration notes :
96 * The current driver does not support interrupt sharing with the
97 * sound portion of the card. If you use the same irq for the
98 * scsi port and sound you will have problems. Either use
99 * a different irq for the scsi port or don't use interrupts
100 * for the scsi port.
101 *
102 * If you have problems with your card not being recognized, use
103 * the LILO command line override. Try to get it recognized without
104 * interrupts. Ie, for a board at the default 0x388 base port,
105 * boot: linux pas16=0x388,255
106 *
107 * SCSI_IRQ_NONE (255) should be specified for no interrupt,
108 * IRQ_AUTO (254) to autoprobe for an IRQ line if overridden
109 * on the command line.
110 *
111 * (IRQ_AUTO == 254, SCSI_IRQ_NONE == 255 in NCR5380.h)
112 */
113
114#include <linux/module.h>
115
116#include <asm/system.h>
117#include <linux/signal.h>
118#include <linux/proc_fs.h>
119#include <linux/sched.h>
120#include <asm/io.h>
121#include <asm/dma.h>
122#include <linux/blkdev.h>
123#include <linux/delay.h>
124#include <linux/interrupt.h>
125#include <linux/stat.h>
126#include <linux/init.h>
127
128#include "scsi.h"
129#include <scsi/scsi_host.h>
130#include "pas16.h"
131#define AUTOPROBE_IRQ
132#include "NCR5380.h"
133
134
135static int pas_maxi = 0;
136static int pas_wmaxi = 0;
137static unsigned short pas16_addr = 0;
138static int pas16_irq = 0;
139
140
Adrian Bunk408b6642005-05-01 08:59:29 -0700141static const int scsi_irq_translate[] =
Linus Torvalds1da177e2005-04-16 15:20:36 -0700142 { 0, 0, 1, 2, 3, 4, 5, 6, 0, 0, 7, 8, 9, 0, 10, 11 };
143
144/* The default_irqs array contains values used to set the irq into the
145 * board via software (as must be done on newer model boards without
146 * irq jumpers on the board). The first value in the array will be
147 * assigned to logical board 0, the next to board 1, etc.
148 */
Adrian Bunk408b6642005-05-01 08:59:29 -0700149static int default_irqs[] __initdata =
Linus Torvalds1da177e2005-04-16 15:20:36 -0700150 { PAS16_DEFAULT_BOARD_1_IRQ,
151 PAS16_DEFAULT_BOARD_2_IRQ,
152 PAS16_DEFAULT_BOARD_3_IRQ,
153 PAS16_DEFAULT_BOARD_4_IRQ
154 };
155
156static struct override {
157 unsigned short io_port;
158 int irq;
Tobias Klauser6391a112006-06-08 22:23:48 -0700159} overrides
Linus Torvalds1da177e2005-04-16 15:20:36 -0700160#ifdef PAS16_OVERRIDE
161 [] __initdata = PAS16_OVERRIDE;
162#else
163 [4] __initdata = {{0,IRQ_AUTO}, {0,IRQ_AUTO}, {0,IRQ_AUTO},
164 {0,IRQ_AUTO}};
165#endif
166
Tobias Klauser6391a112006-06-08 22:23:48 -0700167#define NO_OVERRIDES ARRAY_SIZE(overrides)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700168
169static struct base {
170 unsigned short io_port;
171 int noauto;
Tobias Klauser6391a112006-06-08 22:23:48 -0700172} bases[] __initdata =
Linus Torvalds1da177e2005-04-16 15:20:36 -0700173 { {PAS16_DEFAULT_BASE_1, 0},
174 {PAS16_DEFAULT_BASE_2, 0},
175 {PAS16_DEFAULT_BASE_3, 0},
176 {PAS16_DEFAULT_BASE_4, 0}
177 };
178
Tobias Klauser6391a112006-06-08 22:23:48 -0700179#define NO_BASES ARRAY_SIZE(bases)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700180
Adrian Bunk408b6642005-05-01 08:59:29 -0700181static const unsigned short pas16_offset[ 8 ] =
Linus Torvalds1da177e2005-04-16 15:20:36 -0700182 {
183 0x1c00, /* OUTPUT_DATA_REG */
184 0x1c01, /* INITIATOR_COMMAND_REG */
185 0x1c02, /* MODE_REG */
186 0x1c03, /* TARGET_COMMAND_REG */
187 0x3c00, /* STATUS_REG ro, SELECT_ENABLE_REG wo */
188 0x3c01, /* BUS_AND_STATUS_REG ro, START_DMA_SEND_REG wo */
189 0x3c02, /* INPUT_DATA_REGISTER ro, (N/A on PAS16 ?)
190 * START_DMA_TARGET_RECEIVE_REG wo
191 */
192 0x3c03, /* RESET_PARITY_INTERRUPT_REG ro,
193 * START_DMA_INITIATOR_RECEIVE_REG wo
194 */
195 };
196/*----------------------------------------------------------------*/
197/* the following will set the monitor border color (useful to find
198 where something crashed or gets stuck at */
199/* 1 = blue
200 2 = green
201 3 = cyan
202 4 = red
203 5 = magenta
204 6 = yellow
205 7 = white
206*/
207#if 1
208#define rtrc(i) {inb(0x3da); outb(0x31, 0x3c0); outb((i), 0x3c0);}
209#else
210#define rtrc(i) {}
211#endif
212
213
214/*
215 * Function : enable_board( int board_num, unsigned short port )
216 *
217 * Purpose : set address in new model board
218 *
219 * Inputs : board_num - logical board number 0-3, port - base address
220 *
221 */
222
223static void __init
224 enable_board( int board_num, unsigned short port )
225{
226 outb( 0xbc + board_num, MASTER_ADDRESS_PTR );
227 outb( port >> 2, MASTER_ADDRESS_PTR );
228}
229
230
231
232/*
233 * Function : init_board( unsigned short port, int irq )
234 *
235 * Purpose : Set the board up to handle the SCSI interface
236 *
237 * Inputs : port - base address of the board,
238 * irq - irq to assign to the SCSI port
239 * force_irq - set it even if it conflicts with sound driver
240 *
241 */
242
243static void __init
244 init_board( unsigned short io_port, int irq, int force_irq )
245{
246 unsigned int tmp;
247 unsigned int pas_irq_code;
248
249 /* Initialize the SCSI part of the board */
250
251 outb( 0x30, io_port + P_TIMEOUT_COUNTER_REG ); /* Timeout counter */
252 outb( 0x01, io_port + P_TIMEOUT_STATUS_REG_OFFSET ); /* Reset TC */
253 outb( 0x01, io_port + WAIT_STATE ); /* 1 Wait state */
254
255 NCR5380_read( RESET_PARITY_INTERRUPT_REG );
256
257 /* Set the SCSI interrupt pointer without mucking up the sound
258 * interrupt pointer in the same byte.
259 */
260 pas_irq_code = ( irq < 16 ) ? scsi_irq_translate[irq] : 0;
261 tmp = inb( io_port + IO_CONFIG_3 );
262
263 if( (( tmp & 0x0f ) == pas_irq_code) && pas_irq_code > 0
264 && !force_irq )
265 {
266 printk( "pas16: WARNING: Can't use same irq as sound "
267 "driver -- interrupts disabled\n" );
268 /* Set up the drive parameters, disable 5380 interrupts */
269 outb( 0x4d, io_port + SYS_CONFIG_4 );
270 }
271 else
272 {
273 tmp = ( tmp & 0x0f ) | ( pas_irq_code << 4 );
274 outb( tmp, io_port + IO_CONFIG_3 );
275
276 /* Set up the drive parameters and enable 5380 interrupts */
277 outb( 0x6d, io_port + SYS_CONFIG_4 );
278 }
279}
280
281
282/*
283 * Function : pas16_hw_detect( unsigned short board_num )
284 *
285 * Purpose : determine if a pas16 board is present
286 *
287 * Inputs : board_num - logical board number ( 0 - 3 )
288 *
289 * Returns : 0 if board not found, 1 if found.
290 */
291
292static int __init
293 pas16_hw_detect( unsigned short board_num )
294{
295 unsigned char board_rev, tmp;
296 unsigned short io_port = bases[ board_num ].io_port;
297
298 /* See if we can find a PAS16 board at the address associated
299 * with this logical board number.
300 */
301
302 /* First, attempt to take a newer model board out of reset and
303 * give it a base address. This shouldn't affect older boards.
304 */
305 enable_board( board_num, io_port );
306
307 /* Now see if it looks like a PAS16 board */
308 board_rev = inb( io_port + PCB_CONFIG );
309
310 if( board_rev == 0xff )
311 return 0;
312
313 tmp = board_rev ^ 0xe0;
314
315 outb( tmp, io_port + PCB_CONFIG );
316 tmp = inb( io_port + PCB_CONFIG );
317 outb( board_rev, io_port + PCB_CONFIG );
318
319 if( board_rev != tmp ) /* Not a PAS-16 */
320 return 0;
321
322 if( ( inb( io_port + OPERATION_MODE_1 ) & 0x03 ) != 0x03 )
323 return 0; /* return if no SCSI interface found */
324
325 /* Mediavision has some new model boards that return ID bits
326 * that indicate a SCSI interface, but they're not (LMS). We'll
327 * put in an additional test to try to weed them out.
328 */
329
330 outb( 0x01, io_port + WAIT_STATE ); /* 1 Wait state */
331 NCR5380_write( MODE_REG, 0x20 ); /* Is it really SCSI? */
332 if( NCR5380_read( MODE_REG ) != 0x20 ) /* Write to a reg. */
333 return 0; /* and try to read */
334 NCR5380_write( MODE_REG, 0x00 ); /* it back. */
335 if( NCR5380_read( MODE_REG ) != 0x00 )
336 return 0;
337
338 return 1;
339}
340
341
342/*
343 * Function : pas16_setup(char *str, int *ints)
344 *
345 * Purpose : LILO command line initialization of the overrides array,
346 *
347 * Inputs : str - unused, ints - array of integer parameters with ints[0]
348 * equal to the number of ints.
349 *
350 */
351
352void __init pas16_setup(char *str, int *ints)
353{
354 static int commandline_current = 0;
355 int i;
356 if (ints[0] != 2)
357 printk("pas16_setup : usage pas16=io_port,irq\n");
358 else
359 if (commandline_current < NO_OVERRIDES) {
360 overrides[commandline_current].io_port = (unsigned short) ints[1];
361 overrides[commandline_current].irq = ints[2];
362 for (i = 0; i < NO_BASES; ++i)
363 if (bases[i].io_port == (unsigned short) ints[1]) {
364 bases[i].noauto = 1;
365 break;
366 }
367 ++commandline_current;
368 }
369}
370
371/*
Christoph Hellwigd0be4a7d2005-10-31 18:31:40 +0100372 * Function : int pas16_detect(struct scsi_host_template * tpnt)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700373 *
374 * Purpose : detects and initializes PAS16 controllers
375 * that were autoprobed, overridden on the LILO command line,
376 * or specified at compile time.
377 *
378 * Inputs : tpnt - template for this SCSI adapter.
379 *
380 * Returns : 1 if a host adapter was found, 0 if not.
381 *
382 */
383
Christoph Hellwigd0be4a7d2005-10-31 18:31:40 +0100384int __init pas16_detect(struct scsi_host_template * tpnt)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700385{
386 static int current_override = 0;
387 static unsigned short current_base = 0;
388 struct Scsi_Host *instance;
389 unsigned short io_port;
390 int count;
391
392 tpnt->proc_name = "pas16";
393 tpnt->proc_info = &pas16_proc_info;
394
395 if (pas16_addr != 0) {
396 overrides[0].io_port = pas16_addr;
397 /*
398 * This is how we avoid seeing more than
399 * one host adapter at the same I/O port.
400 * Cribbed shamelessly from pas16_setup().
401 */
402 for (count = 0; count < NO_BASES; ++count)
403 if (bases[count].io_port == pas16_addr) {
404 bases[count].noauto = 1;
405 break;
406 }
407 }
408 if (pas16_irq != 0)
409 overrides[0].irq = pas16_irq;
410
411 for (count = 0; current_override < NO_OVERRIDES; ++current_override) {
412 io_port = 0;
413
414 if (overrides[current_override].io_port)
415 {
416 io_port = overrides[current_override].io_port;
417 enable_board( current_override, io_port );
418 init_board( io_port, overrides[current_override].irq, 1 );
419 }
420 else
421 for (; !io_port && (current_base < NO_BASES); ++current_base) {
422#if (PDEBUG & PDEBUG_INIT)
423 printk("scsi-pas16 : probing io_port %04x\n", (unsigned int) bases[current_base].io_port);
424#endif
425 if ( !bases[current_base].noauto &&
426 pas16_hw_detect( current_base ) ){
427 io_port = bases[current_base].io_port;
428 init_board( io_port, default_irqs[ current_base ], 0 );
429#if (PDEBUG & PDEBUG_INIT)
430 printk("scsi-pas16 : detected board.\n");
431#endif
432 }
433 }
434
435
436#if defined(PDEBUG) && (PDEBUG & PDEBUG_INIT)
437 printk("scsi-pas16 : io_port = %04x\n", (unsigned int) io_port);
438#endif
439
440 if (!io_port)
441 break;
442
443 instance = scsi_register (tpnt, sizeof(struct NCR5380_hostdata));
444 if(instance == NULL)
445 break;
446
447 instance->io_port = io_port;
448
449 NCR5380_init(instance, 0);
450
451 if (overrides[current_override].irq != IRQ_AUTO)
452 instance->irq = overrides[current_override].irq;
453 else
454 instance->irq = NCR5380_probe_irq(instance, PAS16_IRQS);
455
456 if (instance->irq != SCSI_IRQ_NONE)
Thomas Gleixner1d6f3592006-07-01 19:29:42 -0700457 if (request_irq(instance->irq, pas16_intr, IRQF_DISABLED, "pas16", instance)) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700458 printk("scsi%d : IRQ%d not free, interrupts disabled\n",
459 instance->host_no, instance->irq);
460 instance->irq = SCSI_IRQ_NONE;
461 }
462
463 if (instance->irq == SCSI_IRQ_NONE) {
464 printk("scsi%d : interrupts not enabled. for better interactive performance,\n", instance->host_no);
465 printk("scsi%d : please jumper the board for a free IRQ.\n", instance->host_no);
466 /* Disable 5380 interrupts, leave drive params the same */
467 outb( 0x4d, io_port + SYS_CONFIG_4 );
468 outb( (inb(io_port + IO_CONFIG_3) & 0x0f), io_port + IO_CONFIG_3 );
469 }
470
471#if defined(PDEBUG) && (PDEBUG & PDEBUG_INIT)
472 printk("scsi%d : irq = %d\n", instance->host_no, instance->irq);
473#endif
474
475 printk("scsi%d : at 0x%04x", instance->host_no, (int)
476 instance->io_port);
477 if (instance->irq == SCSI_IRQ_NONE)
478 printk (" interrupts disabled");
479 else
480 printk (" irq %d", instance->irq);
481 printk(" options CAN_QUEUE=%d CMD_PER_LUN=%d release=%d",
482 CAN_QUEUE, CMD_PER_LUN, PAS16_PUBLIC_RELEASE);
483 NCR5380_print_options(instance);
484 printk("\n");
485
486 ++current_override;
487 ++count;
488 }
489 return count;
490}
491
492/*
493 * Function : int pas16_biosparam(Disk *disk, struct block_device *dev, int *ip)
494 *
495 * Purpose : Generates a BIOS / DOS compatible H-C-S mapping for
496 * the specified device / size.
497 *
498 * Inputs : size = size of device in sectors (512 bytes), dev = block device
499 * major / minor, ip[] = {heads, sectors, cylinders}
500 *
501 * Returns : always 0 (success), initializes ip
502 *
503 */
504
505/*
506 * XXX Most SCSI boards use this mapping, I could be incorrect. Some one
507 * using hard disks on a trantor should verify that this mapping corresponds
508 * to that used by the BIOS / ASPI driver by running the linux fdisk program
509 * and matching the H_C_S coordinates to what DOS uses.
510 */
511
512int pas16_biosparam(struct scsi_device *sdev, struct block_device *dev,
513 sector_t capacity, int * ip)
514{
515 int size = capacity;
516 ip[0] = 64;
517 ip[1] = 32;
518 ip[2] = size >> 11; /* I think I have it as /(32*64) */
519 if( ip[2] > 1024 ) { /* yes, >, not >= */
520 ip[0]=255;
521 ip[1]=63;
522 ip[2]=size/(63*255);
523 if( ip[2] > 1023 ) /* yes >1023... */
524 ip[2] = 1023;
525 }
526
527 return 0;
528}
529
530/*
531 * Function : int NCR5380_pread (struct Scsi_Host *instance,
532 * unsigned char *dst, int len)
533 *
534 * Purpose : Fast 5380 pseudo-dma read function, transfers len bytes to
535 * dst
536 *
537 * Inputs : dst = destination, len = length in bytes
538 *
539 * Returns : 0 on success, non zero on a failure such as a watchdog
540 * timeout.
541 */
542
543static inline int NCR5380_pread (struct Scsi_Host *instance, unsigned char *dst,
544 int len) {
545 register unsigned char *d = dst;
546 register unsigned short reg = (unsigned short) (instance->io_port +
547 P_DATA_REG_OFFSET);
548 register int i = len;
549 int ii = 0;
550
551 while ( !(inb(instance->io_port + P_STATUS_REG_OFFSET) & P_ST_RDY) )
552 ++ii;
553
554 insb( reg, d, i );
555
556 if ( inb(instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET) & P_TS_TIM) {
557 outb( P_TS_CT, instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET);
558 printk("scsi%d : watchdog timer fired in NCR5380_pread()\n",
559 instance->host_no);
560 return -1;
561 }
562 if (ii > pas_maxi)
563 pas_maxi = ii;
564 return 0;
565}
566
567/*
568 * Function : int NCR5380_pwrite (struct Scsi_Host *instance,
569 * unsigned char *src, int len)
570 *
571 * Purpose : Fast 5380 pseudo-dma write function, transfers len bytes from
572 * src
573 *
574 * Inputs : src = source, len = length in bytes
575 *
576 * Returns : 0 on success, non zero on a failure such as a watchdog
577 * timeout.
578 */
579
580static inline int NCR5380_pwrite (struct Scsi_Host *instance, unsigned char *src,
581 int len) {
582 register unsigned char *s = src;
583 register unsigned short reg = (instance->io_port + P_DATA_REG_OFFSET);
584 register int i = len;
585 int ii = 0;
586
587 while ( !((inb(instance->io_port + P_STATUS_REG_OFFSET)) & P_ST_RDY) )
588 ++ii;
589
590 outsb( reg, s, i );
591
592 if (inb(instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET) & P_TS_TIM) {
593 outb( P_TS_CT, instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET);
594 printk("scsi%d : watchdog timer fired in NCR5380_pwrite()\n",
595 instance->host_no);
596 return -1;
597 }
598 if (ii > pas_maxi)
599 pas_wmaxi = ii;
600 return 0;
601}
602
603#include "NCR5380.c"
604
605static int pas16_release(struct Scsi_Host *shost)
606{
607 if (shost->irq)
608 free_irq(shost->irq, NULL);
609 NCR5380_exit(shost);
610 if (shost->dma_channel != 0xff)
611 free_dma(shost->dma_channel);
612 if (shost->io_port && shost->n_io_port)
613 release_region(shost->io_port, shost->n_io_port);
614 scsi_unregister(shost);
615 return 0;
616}
617
Christoph Hellwigd0be4a7d2005-10-31 18:31:40 +0100618static struct scsi_host_template driver_template = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700619 .name = "Pro Audio Spectrum-16 SCSI",
620 .detect = pas16_detect,
621 .release = pas16_release,
622 .queuecommand = pas16_queue_command,
623 .eh_abort_handler = pas16_abort,
624 .eh_bus_reset_handler = pas16_bus_reset,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700625 .bios_param = pas16_biosparam,
626 .can_queue = CAN_QUEUE,
627 .this_id = 7,
628 .sg_tablesize = SG_ALL,
629 .cmd_per_lun = CMD_PER_LUN,
630 .use_clustering = DISABLE_CLUSTERING,
631};
632#include "scsi_module.c"
633
634#ifdef MODULE
635module_param(pas16_addr, ushort, 0);
636module_param(pas16_irq, int, 0);
637#endif
638MODULE_LICENSE("GPL");