root/drivers/scsi/pas16.c

/* [previous][next][first][last][top][bottom][index][help] */

DEFINITIONS

This source file includes following definitions.
  1. enable_board
  2. init_board
  3. pas16_hw_detect
  4. pas16_setup
  5. pas16_detect
  6. pas16_biosparam
  7. NCR5380_pread
  8. NCR5380_pwrite

   1 #define AUTOSENSE
   2 #define PSEUDO_DMA
   3 #define FOO
   4 #define UNSAFE  /* Not unsafe for PAS16 -- use it */
   5 
   6 /*
   7  * This driver adapted from Drew Eckhardt's Trantor T128 driver
   8  *
   9  * Copyright 1993, Drew Eckhardt
  10  *      Visionary Computing
  11  *      (Unix and Linux consulting and custom programming)
  12  *      drew@colorado.edu
  13  *      +1 (303) 666-5836
  14  *
  15  *  ( Based on T128 - DISTRIBUTION RELEASE 3. ) 
  16  *
  17  * Modified to work with the Pro Audio Spectrum/Studio 16
  18  * by John Weidman.
  19  *
  20  *
  21  * For more information, please consult 
  22  *
  23  * Media Vision
  24  * (510) 770-8600
  25  * (800) 348-7116
  26  * 
  27  * and 
  28  *
  29  * NCR 5380 Family
  30  * SCSI Protocol Controller
  31  * Databook
  32  *
  33  * NCR Microelectronics
  34  * 1635 Aeroplaza Drive
  35  * Colorado Springs, CO 80916
  36  * 1+ (719) 578-3400
  37  * 1+ (800) 334-5454
  38  */
  39 
  40 /*
  41  * Options : 
  42  * AUTOSENSE - if defined, REQUEST SENSE will be performed automatically
  43  *      for commands that return with a CHECK CONDITION status. 
  44  *
  45  * LIMIT_TRANSFERSIZE - if defined, limit the pseudo-dma transfers to 512
  46  *      bytes at a time.  Since interrupts are disabled by default during
  47  *      these transfers, we might need this to give reasonable interrupt
  48  *      service time if the transfer size gets too large.
  49  *
  50  * PSEUDO_DMA - enables PSEUDO-DMA hardware, should give a 3-4X performance
  51  * increase compared to polled I/O.
  52  *
  53  * PARITY - enable parity checking.  Not supported.
  54  * 
  55  * SCSI2 - enable support for SCSI-II tagged queueing.  Untested.
  56  *
  57  * UNSAFE - leave interrupts enabled during pseudo-DMA transfers.  This
  58  *          parameter comes from the NCR5380 code.  It is NOT unsafe with
  59  *          the PAS16 and you should use it.  If you don't you will have
  60  *          a problem with dropped characters during high speed
  61  *          communications during SCSI transfers.  If you really don't
  62  *          want to use UNSAFE you can try defining LIMIT_TRANSFERSIZE or
  63  *          twiddle with the transfer size in the high level code.
  64  *
  65  * USLEEP - enable support for devices that don't disconnect.  Untested.
  66  *
  67  * The card is detected and initialized in one of several ways : 
  68  * 1.  Autoprobe (default) - There are many different models of
  69  *     the Pro Audio Spectrum/Studio 16, and I only have one of
  70  *     them, so this may require a little tweaking.  An interrupt
  71  *     is triggered to autoprobe for the interrupt line.  Note:
  72  *     with the newer model boards, the interrupt is set via
  73  *     software after reset using the default_irq for the
  74  *     current board number.
  75  *
  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  *     Note that if the override methods are used, place holders must
  87  *     be specified for other boards in the system.
  88  *
  89  *
  90  * Configuration notes :
  91  *   The current driver does not support interrupt sharing with the
  92  *   sound portion of the card.  If you use the same irq for the
  93  *   scsi port and sound you will have problems.  Either use
  94  *   a different irq for the scsi port or don't use interrupts
  95  *   for the scsi port.
  96  *
  97  *   If you have problems with your card not being recognized, use
  98  *   the LILO command line override.  Try to get it recognized without
  99  *   interrupts.  Ie, for a board at the default 0x388 base port,
 100  *   boot: linux pas16=0x388,255
 101  *
 102  *     (255 is the IRQ_NONE constant in NCR5380.h)
 103  */
 104  
 105 #ifdef MODULE
 106 #include <linux/module.h>
 107 #endif
 108 
 109 #include <asm/system.h>
 110 #include <linux/signal.h>
 111 #include <linux/proc_fs.h>
 112 #include <linux/sched.h>
 113 #include <asm/io.h>
 114 #include "../block/blk.h"
 115 #include "scsi.h"
 116 #include "hosts.h"
 117 #include "pas16.h"
 118 #define AUTOPROBE_IRQ
 119 #include "NCR5380.h"
 120 #include "constants.h"
 121 #include "sd.h"
 122 
 123 
 124 int scsi_irq_translate[] =
 125         { 0,  0,  1,  2,  3,  4,  5,  6, 0,  0,  7,  8,  9,  0, 10, 11 };
 126 
 127 /* The default_irqs array contains values used to set the irq into the
 128  * board via software (as must be done on newer model boards without
 129  * irq jumpers on the board).  The first value in the array will be
 130  * assigned to logical board 0, the next to board 1, etc.
 131  */
 132 int default_irqs[] = {  PAS16_DEFAULT_BOARD_1_IRQ,
 133                         PAS16_DEFAULT_BOARD_2_IRQ,
 134                         PAS16_DEFAULT_BOARD_3_IRQ,
 135                         PAS16_DEFAULT_BOARD_4_IRQ
 136                      };
 137 
 138 static struct override {
 139     unsigned short io_port;
 140     int  irq;
 141 } overrides 
 142 #ifdef PAS16_OVERRIDE
 143     [] = PAS16_OVERRIDE;
 144 #else
 145     [4] = {{0,IRQ_AUTO}, {0,IRQ_AUTO}, {0,IRQ_AUTO},
 146         {0,IRQ_AUTO}};
 147 #endif
 148 
 149 #define NO_OVERRIDES (sizeof(overrides) / sizeof(struct override))
 150 
 151 static struct base {
 152     unsigned short io_port;
 153     int noauto;
 154 } bases[] = { {PAS16_DEFAULT_BASE_1, 0},
 155               {PAS16_DEFAULT_BASE_2, 0},
 156               {PAS16_DEFAULT_BASE_3, 0},
 157               {PAS16_DEFAULT_BASE_4, 0}
 158             };
 159 
 160 #define NO_BASES (sizeof (bases) / sizeof (struct base))
 161 
 162 unsigned short  pas16_offset[ 8 ] =
 163     {
 164         0x1c00,    /* OUTPUT_DATA_REG */
 165         0x1c01,    /* INITIATOR_COMMAND_REG */
 166         0x1c02,    /* MODE_REG */
 167         0x1c03,    /* TARGET_COMMAND_REG */
 168         0x3c00,    /* STATUS_REG ro, SELECT_ENABLE_REG wo */
 169         0x3c01,    /* BUS_AND_STATUS_REG ro, START_DMA_SEND_REG wo */
 170         0x3c02,    /* INPUT_DATA_REGISTER ro, (N/A on PAS16 ?)
 171                     * START_DMA_TARGET_RECEIVE_REG wo
 172                     */
 173         0x3c03,    /* RESET_PARITY_INTERRUPT_REG ro,
 174                     * START_DMA_INITIATOR_RECEIVE_REG wo
 175                     */
 176     };
 177 
 178 
 179 
 180 /*
 181  * Function : enable_board( int  board_num, unsigned short port )
 182  *
 183  * Purpose :  set address in new model board
 184  *
 185  * Inputs : board_num - logical board number 0-3, port - base address
 186  *
 187  */
 188 
 189 void    enable_board( int  board_num,  unsigned short port )
     /* [previous][next][first][last][top][bottom][index][help] */
 190 {
 191     outb( 0xbc + board_num, MASTER_ADDRESS_PTR );
 192     outb( port >> 2, MASTER_ADDRESS_PTR );
 193 }
 194 
 195 
 196 
 197 /*
 198  * Function : init_board( unsigned short port, int irq )
 199  *
 200  * Purpose :  Set the board up to handle the SCSI interface
 201  *
 202  * Inputs : port - base address of the board,
 203  *          irq - irq to assign to the SCSI port
 204  *          force_irq - set it even if it conflicts with sound driver
 205  *
 206  */
 207 
 208 void    init_board( unsigned short io_port, int irq, int force_irq )
     /* [previous][next][first][last][top][bottom][index][help] */
 209 {
 210         unsigned int    tmp;
 211         unsigned int    pas_irq_code;
 212 
 213         /* Initialize the SCSI part of the board */
 214 
 215         outb( 0x30, io_port + P_TIMEOUT_COUNTER_REG );  /* Timeout counter */
 216         outb( 0x01, io_port + P_TIMEOUT_STATUS_REG_OFFSET );   /* Reset TC */
 217         outb( 0x01, io_port + WAIT_STATE );   /* 1 Wait state */
 218 
 219         NCR5380_read( RESET_PARITY_INTERRUPT_REG );
 220 
 221         /* Set the SCSI interrupt pointer without mucking up the sound
 222          * interrupt pointer in the same byte.
 223          */
 224         pas_irq_code = ( irq < 16 ) ? scsi_irq_translate[irq] : 0;
 225         tmp = inb( io_port + IO_CONFIG_3 );
 226 
 227         if( (( tmp & 0x0f ) == pas_irq_code) && pas_irq_code > 0 
 228             && !force_irq )
 229         {
 230             printk( "pas16: WARNING: Can't use same irq as sound "
 231                     "driver -- interrupts disabled\n" );
 232             /* Set up the drive parameters, disable 5380 interrupts */
 233             outb( 0x4d, io_port + SYS_CONFIG_4 );
 234         }
 235         else
 236         {
 237             tmp = (  tmp & 0x0f ) | ( pas_irq_code << 4 );
 238             outb( tmp, io_port + IO_CONFIG_3 );
 239 
 240             /* Set up the drive parameters and enable 5380 interrupts */
 241             outb( 0x6d, io_port + SYS_CONFIG_4 );
 242         }
 243 }
 244 
 245 
 246 /*
 247  * Function : pas16_hw_detect( unsigned short board_num )
 248  *
 249  * Purpose : determine if a pas16 board is present
 250  * 
 251  * Inputs : board_num - logical board number ( 0 - 3 )
 252  *
 253  * Returns : 0 if board not found, 1 if found.
 254  */
 255 
 256 int     pas16_hw_detect( unsigned short  board_num )
     /* [previous][next][first][last][top][bottom][index][help] */
 257 {
 258     unsigned char       board_rev, tmp;
 259     unsigned short      io_port = bases[ board_num ].io_port;
 260 
 261     /* See if we can find a PAS16 board at the address associated
 262      * with this logical board number.
 263      */
 264 
 265     /* First, attempt to take a newer model board out of reset and
 266      * give it a base address.  This shouldn't affect older boards.
 267      */
 268     enable_board( board_num, io_port );
 269 
 270     /* Now see if it looks like a PAS16 board */
 271     board_rev = inb( io_port + PCB_CONFIG );
 272 
 273     if( board_rev == 0xff )
 274         return 0;
 275 
 276     tmp = board_rev ^ 0xe0;
 277 
 278     outb( tmp, io_port + PCB_CONFIG );
 279     tmp = inb( io_port + PCB_CONFIG );
 280     outb( board_rev, io_port + PCB_CONFIG );
 281 
 282     if( board_rev != tmp )      /* Not a PAS-16 */
 283         return 0;
 284 
 285     if( ( inb( io_port + OPERATION_MODE_1 ) & 0x03 ) != 0x03 ) 
 286         return 0;       /* return if no SCSI interface found */
 287 
 288     /* Mediavision has some new model boards that return ID bits
 289      * that indicate a SCSI interface, but they're not (LMS).  We'll
 290      * put in an additional test to try and weed them out.
 291      */
 292 
 293     outb( 0x01, io_port + WAIT_STATE );         /* 1 Wait state */
 294     NCR5380_write( MODE_REG, 0x20 );            /* Is it really SCSI? */
 295     if( NCR5380_read( MODE_REG ) != 0x20 )      /* Write to a reg.    */
 296         return 0;                               /* and try to read    */
 297     NCR5380_write( MODE_REG, 0x00 );            /* it back.           */
 298     if( NCR5380_read( MODE_REG ) != 0x00 )
 299         return 0;
 300 
 301     return 1;
 302 }
 303 
 304 
 305 /*
 306  * Function : pas16_setup(char *str, int *ints)
 307  *
 308  * Purpose : LILO command line initialization of the overrides array,
 309  * 
 310  * Inputs : str - unused, ints - array of integer parameters with ints[0]
 311  *      equal to the number of ints.
 312  *
 313  */
 314 
 315 void pas16_setup(char *str, int *ints) {
     /* [previous][next][first][last][top][bottom][index][help] */
 316     static int commandline_current = 0;
 317     int i;
 318     if (ints[0] != 2) 
 319         printk("pas16_setup : usage pas16=io_port,irq\n");
 320     else 
 321         if (commandline_current < NO_OVERRIDES) {
 322             overrides[commandline_current].io_port = (unsigned short) ints[1];
 323             overrides[commandline_current].irq = ints[2];
 324             for (i = 0; i < NO_BASES; ++i)
 325                 if (bases[i].io_port == (unsigned short) ints[1]) {
 326                     bases[i].noauto = 1;
 327                     break;
 328                 }
 329             ++commandline_current;
 330         }
 331 }
 332 
 333 /* 
 334  * Function : int pas16_detect(Scsi_Host_Template * tpnt)
 335  *
 336  * Purpose : detects and initializes PAS16 controllers
 337  *      that were autoprobed, overridden on the LILO command line, 
 338  *      or specified at compile time.
 339  *
 340  * Inputs : tpnt - template for this SCSI adapter.
 341  * 
 342  * Returns : 1 if a host adapter was found, 0 if not.
 343  *
 344  */
 345 
 346 int pas16_detect(Scsi_Host_Template * tpnt) {
     /* [previous][next][first][last][top][bottom][index][help] */
 347     static int current_override = 0;
 348     static unsigned short current_base = 0;
 349     struct Scsi_Host *instance;
 350     unsigned short io_port;
 351     int  count;
 352 
 353     for (count = 0; current_override < NO_OVERRIDES; ++current_override) {
 354         io_port = 0;
 355 
 356         if (overrides[current_override].io_port)
 357         {
 358             io_port = overrides[current_override].io_port;
 359             enable_board( current_override, io_port );
 360             init_board( io_port, overrides[current_override].irq, 1 );
 361         }
 362         else
 363             for (; !io_port && (current_base < NO_BASES); ++current_base) {
 364 #if (PDEBUG & PDEBUG_INIT)
 365     printk("scsi-pas16 : probing io_port %04x\n", (unsigned int) bases[current_base].io_port);
 366 #endif
 367                 if ( !bases[current_base].noauto &&
 368                      pas16_hw_detect( current_base ) ){
 369                         io_port = bases[current_base].io_port;
 370                         init_board( io_port, default_irqs[ current_base ], 0 ); 
 371 #if (PDEBUG & PDEBUG_INIT)
 372                         printk("scsi-pas16 : detected board.\n");
 373 #endif
 374                 }
 375     }
 376 
 377 
 378 #if defined(PDEBUG) && (PDEBUG & PDEBUG_INIT)
 379         printk("scsi-pas16 : io_port = %04x\n", (unsigned int) io_port);
 380 #endif
 381 
 382         if (!io_port)
 383             break;
 384 
 385         instance = scsi_register (tpnt, sizeof(struct NCR5380_hostdata));
 386         instance->io_port = io_port;
 387 
 388         NCR5380_init(instance, 0);
 389 
 390         if (overrides[current_override].irq != IRQ_AUTO)
 391             instance->irq = overrides[current_override].irq;
 392         else 
 393             instance->irq = NCR5380_probe_irq(instance, PAS16_IRQS);
 394 
 395         if (instance->irq != IRQ_NONE) 
 396             if (request_irq(instance->irq, pas16_intr, SA_INTERRUPT, "pas16")) {
 397                 printk("scsi%d : IRQ%d not free, interrupts disabled\n", 
 398                     instance->host_no, instance->irq);
 399                 instance->irq = IRQ_NONE;
 400             } 
 401 
 402         if (instance->irq == IRQ_NONE) {
 403             printk("scsi%d : interrupts not enabled. for better interactive performance,\n", instance->host_no);
 404             printk("scsi%d : please jumper the board for a free IRQ.\n", instance->host_no);
 405             /* Disable 5380 interrupts, leave drive params the same */
 406             outb( 0x4d, io_port + SYS_CONFIG_4 );
 407             outb( (inb(io_port + IO_CONFIG_3) & 0x0f), io_port + IO_CONFIG_3 );
 408         }
 409 
 410 #if defined(PDEBUG) && (PDEBUG & PDEBUG_INIT)
 411         printk("scsi%d : irq = %d\n", instance->host_no, instance->irq);
 412 #endif
 413 
 414         printk("scsi%d : at 0x%04x", instance->host_no, (int) 
 415             instance->io_port);
 416         if (instance->irq == IRQ_NONE)
 417             printk (" interrupts disabled");
 418         else 
 419             printk (" irq %d", instance->irq);
 420         printk(" options CAN_QUEUE=%d  CMD_PER_LUN=%d release=%d",
 421             CAN_QUEUE, CMD_PER_LUN, PAS16_PUBLIC_RELEASE);
 422         NCR5380_print_options(instance);
 423         printk("\n");
 424 
 425         ++current_override;
 426         ++count;
 427     }
 428     return count;
 429 }
 430 
 431 /*
 432  * Function : int pas16_biosparam(Disk *disk, int dev, int *ip)
 433  *
 434  * Purpose : Generates a BIOS / DOS compatible H-C-S mapping for 
 435  *      the specified device / size.
 436  * 
 437  * Inputs : size = size of device in sectors (512 bytes), dev = block device
 438  *      major / minor, ip[] = {heads, sectors, cylinders}  
 439  *
 440  * Returns : always 0 (success), initializes ip
 441  *      
 442  */
 443 
 444 /* 
 445  * XXX Most SCSI boards use this mapping, I could be incorrect.  Some one
 446  * using hard disks on a trantor should verify that this mapping corresponds
 447  * to that used by the BIOS / ASPI driver by running the linux fdisk program
 448  * and matching the H_C_S coordinates to what DOS uses.
 449  */
 450 
 451 int pas16_biosparam(Disk * disk, int dev, int * ip)
     /* [previous][next][first][last][top][bottom][index][help] */
 452 {
 453   int size = disk->capacity;
 454   ip[0] = 64;
 455   ip[1] = 32;
 456   ip[2] = size >> 11;           /* I think I have it as /(32*64) */
 457   if( ip[2] > 1024 ) {          /* yes, >, not >= */
 458         ip[0]=255;
 459         ip[1]=63;
 460         ip[2]=size/(63*255);
 461         if( ip[2] > 1023 )      /* yes >1023... */
 462                 ip[2] = 1023;
 463   }
 464 
 465   return 0;
 466 }
 467 
 468 /*
 469  * Function : int NCR5380_pread (struct Scsi_Host *instance, 
 470  *      unsigned char *dst, int len)
 471  *
 472  * Purpose : Fast 5380 pseudo-dma read function, transfers len bytes to 
 473  *      dst
 474  * 
 475  * Inputs : dst = destination, len = length in bytes
 476  *
 477  * Returns : 0 on success, non zero on a failure such as a watchdog 
 478  *      timeout.
 479  */
 480 
 481 static inline int NCR5380_pread (struct Scsi_Host *instance, unsigned char *dst,
     /* [previous][next][first][last][top][bottom][index][help] */
 482     int len) {
 483     register unsigned char  *d = dst;
 484     register unsigned short reg = (unsigned short) (instance->io_port + 
 485         P_DATA_REG_OFFSET);
 486     register i = len;
 487 
 488     while ( !(inb(instance->io_port + P_STATUS_REG_OFFSET) & P_ST_RDY) );
 489 
 490     insb( reg, d, i );
 491 
 492     if ( inb(instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET) & P_TS_TIM) {
 493         outb( P_TS_CT, instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET);
 494         printk("scsi%d : watchdog timer fired in NCR5380_pread()\n",
 495             instance->host_no);
 496         return -1;
 497     } else
 498         return 0;
 499 }
 500 
 501 /*
 502  * Function : int NCR5380_pwrite (struct Scsi_Host *instance, 
 503  *      unsigned char *src, int len)
 504  *
 505  * Purpose : Fast 5380 pseudo-dma write function, transfers len bytes from
 506  *      src
 507  * 
 508  * Inputs : src = source, len = length in bytes
 509  *
 510  * Returns : 0 on success, non zero on a failure such as a watchdog 
 511  *      timeout.
 512  */
 513 
 514 static inline int NCR5380_pwrite (struct Scsi_Host *instance, unsigned char *src,
     /* [previous][next][first][last][top][bottom][index][help] */
 515     int len) {
 516     register unsigned char *s = src;
 517     register unsigned short reg = (instance->io_port + P_DATA_REG_OFFSET);
 518     register i = len;
 519 
 520     while ( !((inb(instance->io_port + P_STATUS_REG_OFFSET)) & P_ST_RDY) );
 521  
 522     outsb( reg, s, i );
 523 
 524     if (inb(instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET) & P_TS_TIM) {
 525         outb( P_TS_CT, instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET);
 526         printk("scsi%d : watchdog timer fired in NCR5380_pwrite()\n",
 527             instance->host_no);
 528         return -1;
 529     } else 
 530         return 0;
 531 }
 532 
 533 #include "NCR5380.c"

/* [previous][next][first][last][top][bottom][index][help] */