------ =_NextPart_000_01BE5EA2.FB497BC4
Content-Type: text/plain
Many changes were made since the last update. Logical drives now show
up as luns to upper layer, so Probe Multiple Luns must be enabled to detect
more than one array. Previously, issuing multiple commands simultaneously
was not fully implemented... there is now a #define MULTI_IO which can be
set to 1 to enable fully parallel io which may improve performance (I
haven't
done any benchmarks yet). I still set MULTI_IO to 0 by default because even
though it worked stably on one system I tested under, another one was having
problems (locks after about 20 minutes of heavy io with no error messages).
Some other minor performance/stability enhancements were also made.
Any testing or benchmarks done with MULTI_IO enabled especially appreciated.
Also, there will very soon be a megamgr utility released for dynamically
configuration
of the drives. This will use the slang library and look similar to the
Ctrl-M utility from
startup.
thanks,
Jeff L Jones <jeffreyj@ami.com>
RAID SW Dev., American Megatrends Inc.
<<megaraid.c>> <<megaraid.h>>
------ =_NextPart_000_01BE5EA2.FB497BC4
Content-Type: application/octet-stream;
name="megaraid.c"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
filename="megaraid.c"
/*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
*
* Linux MegaRAID device driver
*
* Copyright 1998 American Megatrends Inc.
*
* This program is free software; you can redistribute it =
and/or
* modify it under the terms of the GNU General Public =
License
* as published by the Free Software Foundation; either =
version
* 2 of the License, or (at your option) any later =
version.
*
* Version : 0.96
*=20
* Description: Linux device driver for AMI MegaRAID controller
*
* Supported controllers: MegaRAID 418, 428, 438, 466, 762
*=20
* Maintainer: Jeff L Jones <jeffreyj@ami.com>
*
* History:
*
* Version 0.90:
* Original source contributed by Dell; integrated it into the =
kernel and
* cleaned up some things. Added support for 438/466 controllers.
*
* Version 0.91:
* Aligned mailbox area on 16-byte boundry.
* Added schedule() at the end to properly clean up.
* Made improvements for conformity to linux driver standards.
*
* Version 0.92:
* Added support for 2.1 kernels.
* Reads from pci_dev struct, so it's not dependent on pcibios.
* Added some missing virt_to_bus() translations.
* Added support for SMP.
* Changed global cli()'s to spinlocks for 2.1, and simulated
* spinlocks for 2.0.
* Removed setting of SA_INTERRUPT flag when requesting Irq.
*
* Version 0.92ac:
* Small changes to the comments/formatting. Plus a couple of
* added notes. Returned to the authors. No actual code changes
* save printk levels.
* 8 Oct 98 Alan Cox <alan.cox@linux.org>
*
* Merged with 2.1.131 source tree.
* 12 Dec 98 K. Baranowski <kgb@knm.org.pl> =
=20
*
* Version 0.93:
* Added support for vendor specific ioctl commands (0x80+xxh)
* Changed some fields in MEGARAID struct to better values.
* Added signature check for Rp controllers under 2.0 kernels
* Changed busy-wait loop to be time-based
* Fixed SMP race condition in isr
* Added kfree (sgList) on release
* Added #include linux/version.h to megaraid.h for hosts.h
* Changed max_id to represent max logical drives instead of =
targets.
*
* Version 0.94:
* Got rid of some excess locking/unlocking
* Fixed slight memory corruption problem while memcpy'ing into =
mailbox
* Changed logical drives to be reported as luns rather than =
targets
* Changed max_id to 16 since it is now max targets/chan again.
* Improved ioctl interface for upcoming megamgr
*
* Version 0.95:
* Fixed problem of queueing multiple commands to adapter;
* still has some strange problems on some setups, so still
* defaults to single. To enable parallel commands change
* #define MULTI_IO in megaraid.h
* Changed kmalloc allocation to be done in beginning.
* Got rid of C++ style comments
*
* Version 0.96:
* 762 fully supported.
*
* BUGS:
* Some older 2.1 kernels (eg. 2.1.90) have a bug in pci.c that
* fails to detect the controller as a pci device on the system.
*
=
*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D*/
#define CRLFSTR "\n"
#include <linux/config.h>
#include <linux/version.h>
#ifdef MODULE
#include <linux/module.h>
#if LINUX_VERSION_CODE >=3D 0x20100
char kernel_version[] =3D UTS_RELEASE;
MODULE_AUTHOR ("American Megatrends Inc.");
MODULE_DESCRIPTION ("AMI MegaRAID driver");
#endif
#endif
#include <linux/types.h>
#include <linux/errno.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/malloc.h>
#include <linux/ioport.h>
#include <linux/fcntl.h>
#include <linux/delay.h>
#include <linux/pci.h>
#include <linux/proc_fs.h>
#include <linux/blk.h>
#include <linux/wait.h>
#include <linux/tqueue.h>
#include <linux/interrupt.h>
#include <linux/sched.h>
#include <linux/stat.h>
#include <linux/malloc.h> /* for kmalloc() */
#include <linux/config.h> /* for CONFIG_PCI */
#if LINUX_VERSION_CODE < 0x20100
#include <linux/bios32.h>
#else
#include <asm/spinlock.h>
#endif
#include <asm/io.h>
#include <asm/irq.h>
#include "sd.h"
#include "scsi.h"
#include "hosts.h"
#include "megaraid.h"
/*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
*
* #Defines
*
=
*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
*/
#if LINUX_VERSION_CODE < 0x020100
#define ioremap vremap
#define iounmap vfree
/* simulate spin locks */
typedef struct {
volatile char lock;
} spinlock_t;
#define spin_lock_init(x) { (x)->lock =3D 0;}
#define spin_lock_irqsave(x,flags) { while ((x)->lock) barrier();\
(x)->lock=3D1; =
save_flags(flags);\
cli();}
#define spin_unlock_irqrestore(x,flags) { (x)->lock=3D0; =
restore_flags(flags);}
#endif
#if LINUX_VERSION_CODE >=3D 0x020100
#define queue_task_irq(a,b) queue_task(a,b)
#define queue_task_irq_off(a,b) queue_task(a,b)
#endif
#define MAX_SERBUF 160
#define COM_BASE 0x2f8
#define ENQUEUE(obj,type,list,next) \
{ type **node; long cpuflag; \
spin_lock_irqsave(&mega_lock,cpuflag);\
for(node=3D&(list); *node; node=3D(type **)&(*node)->##next); \
(*node) =3D obj; \
(*node)->##next =3D NULL; \
spin_unlock_irqrestore(&mega_lock,cpuflag);\
}
/* a non-locking version (if we already have the lock) */
#define ENQUEUE_NL(obj,type,list,next) \
{ type **node; \
for(node=3D&(list); *node; node=3D(type **)&(*node)->##next); \
(*node) =3D obj; \
(*node)->##next =3D NULL; \
}
#define DEQUEUE(obj,type,list,next) \
{ long cpuflag; \
spin_lock_irqsave(&mega_lock,cpuflag);\
if ((obj=3Dlist) !=3D NULL) {\
list =3D (type *)(list)->##next; \
} \
spin_unlock_irqrestore(&mega_lock,cpuflag);\
};
u_long RDINDOOR (mega_host_config * megaCfg)
{
return readl (megaCfg->base + 0x20);
}
void WRINDOOR (mega_host_config * megaCfg, u_long value)
{
writel (value, megaCfg->base + 0x20);
}
u_long RDOUTDOOR (mega_host_config * megaCfg)
{
return readl (megaCfg->base + 0x2C);
}
void WROUTDOOR (mega_host_config * megaCfg, u_long value)
{
writel (value, megaCfg->base + 0x2C);
}
/*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
*
* Function prototypes
*
=
*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
*/
static int MegaIssueCmd (mega_host_config * megaCfg,
u_char * mboxData,
mega_scb * scb,
int intr);
static int build_sglist (mega_host_config * megaCfg, mega_scb * scb,
u_long * buffer, u_long * length);
static void mega_runque (void *);
static void mega_rundoneq (void);
static void mega_cmd_done (mega_host_config *, mega_scb *, int);
static mega_scb *mega_ioctl (mega_host_config * megaCfg, Scsi_Cmnd * =
SCpnt);
static inline void freeSgList(mega_host_config *megaCfg);
/* set SERDEBUG to 1 to enable serial debugging */
#define SERDEBUG 0
#if SERDEBUG
static void ser_init (void);
static void ser_puts (char *str);
static void ser_putc (char c);
static int ser_printk (const char *fmt,...);
#endif
/*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
*
* Global variables
*
=
*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
*/
static int numCtlrs =3D 0;
static mega_host_config *megaCtlrs[12] =3D {0};
/* Queue of pending/completed SCBs */
static mega_scb *qPending =3D NULL;
static Scsi_Cmnd *qCompleted =3D NULL;
volatile static spinlock_t mega_lock;
static struct tq_struct runq =3D {0, 0, mega_runque, NULL};
struct proc_dir_entry proc_scsi_megaraid =3D
{
PROC_SCSI_MEGARAID, 8, "megaraid",
S_IFDIR | S_IRUGO | S_IXUGO, 2
};
#if SERDEBUG
static char strbuf[MAX_SERBUF + 1];
static void ser_init ()
{
unsigned port =3D COM_BASE;
outb (0x80, port + 3);
outb (0, port + 1);
/* 9600 Baud, if 19200: outb(6,port) */
outb (12, port);
outb (3, port + 3);
outb (0, port + 1);
}
static void ser_puts (char *str)
{
char *ptr;
ser_init ();
for (ptr =3D str; *ptr; ++ptr)
ser_putc (*ptr);
}
static void ser_putc (char c)
{
unsigned port =3D COM_BASE;
while ((inb (port + 5) & 0x20) =3D=3D 0);
outb (c, port);
if (c =3D=3D 0x0a) {
while ((inb (port + 5) & 0x20) =3D=3D 0);
outb (0x0d, port);
}
}
static int ser_printk (const char *fmt,...)
{
va_list args;
int i;
long flags;
va_start (args, fmt);
i =3D vsprintf (strbuf, fmt, args);
ser_puts (strbuf);
va_end (args);
return i;
}
#define TRACE(a) { ser_printk a;}
#else
#define TRACE(A)
#endif
void callDone (Scsi_Cmnd * SCpnt)
{
if (SCpnt->result) {
TRACE (("*** %.08lx %.02x <%d.%d.%d> =3D %x\n", =
SCpnt->serial_number,
SCpnt->cmnd[0], SCpnt->channel, SCpnt->target, SCpnt->lun,
SCpnt->result));
}
SCpnt->scsi_done (SCpnt);
}
/*----------------------------------------------------------------------=
--- * * Local functions * = *-----------------------------------------------------------------------= --*//*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
* Initialize SCB structures = *=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
*/ static int initSCB (mega_host_config * megaCfg) { int idx;
for (idx =3D 0; idx < megaCfg->max_cmds; idx++) { megaCfg->scbList[idx].idx =3D -1; megaCfg->scbList[idx].flag =3D 0; megaCfg->scbList[idx].sgList =3D kmalloc(sizeof(mega_sglist) * = MAX_SGLIST, GFP_ATOMIC | GFP_DMA); if (megaCfg->scbList[idx].sgList =3D=3D NULL) { printk(KERN_WARNING "Can't allocate sglist for id %d\n",idx); freeSgList(megaCfg); return -1; } megaCfg->scbList[idx].SCpnt =3D NULL; } return 0; }
/*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D * Allocate a SCB structure = *=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D */ static mega_scb * allocateSCB (mega_host_config * megaCfg, Scsi_Cmnd * = SCpnt) { int idx; long flags;
spin_lock_irqsave (&mega_lock, flags); for (idx =3D 0; idx < megaCfg->max_cmds; idx++) { if (megaCfg->scbList[idx].idx < 0) {
/* Set Index and SCB pointer */ megaCfg->scbList[idx].idx =3D idx; spin_unlock_irqrestore (&mega_lock, flags); megaCfg->scbList[idx].flag =3D 0; megaCfg->scbList[idx].SCpnt =3D SCpnt; megaCfg->scbList[idx].next =3D NULL;
return &megaCfg->scbList[idx]; } } spin_unlock_irqrestore (&mega_lock, flags);
printk (KERN_WARNING "Megaraid: Could not allocate free SCB!!!\n");
return NULL; }
/*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D * Free a SCB structure *=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D */ static void freeSCB (mega_scb * scb) { scb->flag =3D 0; scb->next =3D NULL; scb->SCpnt =3D NULL; scb->idx =3D -1; }
/* Run through the list of completed requests */ static void mega_rundoneq () { mega_host_config *megaCfg; Scsi_Cmnd *SCpnt; char islogical;
while (1) { DEQUEUE (SCpnt, Scsi_Cmnd, qCompleted, host_scribble); if (SCpnt =3D=3D NULL) return;
megaCfg =3D (mega_host_config *) SCpnt->host->hostdata;
islogical =3D (SCpnt->channel =3D=3D megaCfg->host->max_channel && SCpnt->target =3D=3D 0); if (SCpnt->cmnd[0] =3D=3D INQUIRY && ((((u_char *) SCpnt->request_buffer)[0] & 0x1F) =3D=3D TYPE_DISK) && !islogical) { SCpnt->result =3D 0xF0; }
/* Convert result to error */ switch (SCpnt->result) { case 0x00: case 0x02: SCpnt->result |=3D (DID_OK << 16); break; case 0x8: SCpnt->result |=3D (DID_BUS_BUSY << 16); break; default: SCpnt->result |=3D (DID_BAD_TARGET << 16); break; }
/* Callback */ callDone (SCpnt); } }
/* Add command to the list of completed requests */ static void mega_cmd_done (mega_host_config * megaCfg, mega_scb * pScb, = int status) { pScb->SCpnt->result =3D status; ENQUEUE (pScb->SCpnt, Scsi_Cmnd, qCompleted, host_scribble); freeSCB (pScb); }
/*---------------------------------------------------- * Process pending queue list * * Run as a scheduled task=20 *----------------------------------------------------*/ static void mega_runque (void *dummy) { mega_host_config *megaCfg; mega_scb *pScb; long flags;
/* Take care of any completed requests */ mega_rundoneq ();
DEQUEUE (pScb, mega_scb, qPending, next);
if (pScb) { if (pScb->SCpnt) { TRACE(("NULL SCpnt for idx %d!\n",pScb->idx)); } megaCfg =3D (mega_host_config *) pScb->SCpnt->host->hostdata;
if (megaCfg->mbox->busy || megaCfg->flag & (IN_ISR | PENDING)) { TRACE (("%.08lx %.02x <%d.%d.%d> busy%d isr%d pending%d\n", pScb->SCpnt->serial_number, pScb->SCpnt->cmnd[0], pScb->SCpnt->channel, pScb->SCpnt->target, pScb->SCpnt->lun, megaCfg->mbox->busy, (megaCfg->flag & IN_ISR) ? 1 : 0, (megaCfg->flag & PENDING) ? 1 : 0)); }
if (MegaIssueCmd (megaCfg, pScb->mboxData, pScb, 1)) { /* We're BUSY... come back later */ spin_lock_irqsave (&mega_lock, flags); pScb->next =3D qPending; qPending =3D pScb; spin_unlock_irqrestore (&mega_lock, flags);
if (!(megaCfg->flag & PENDING)) { /* If PENDING, irq will schedule task */ queue_task (&runq, &tq_scheduler); } } } }
/*------------------------------------------------------------------- * * Build a SCB from a Scsi_Cmnd * * Returns a SCB pointer, or NULL * If NULL is returned, the scsi_done function MUST have been called * *-------------------------------------------------------------------*/ static mega_scb * mega_build_cmd (mega_host_config * megaCfg, Scsi_Cmnd = * SCpnt) { mega_scb *pScb; mega_mailbox *mbox; mega_passthru *pthru; long seg; char islogical;
if (SCpnt->cmnd[0] & 0x80) /* ioctl from megamgr */ return mega_ioctl (megaCfg, SCpnt);
islogical =3D (SCpnt->channel =3D=3D megaCfg->host->max_channel && = SCpnt->target =3D=3D 0);
if (!islogical && SCpnt->lun !=3D 0) { SCpnt->result =3D (DID_BAD_TARGET << 16); callDone (SCpnt); return NULL; }
/*----------------------------------------------------- * * Logical drive commands * *-----------------------------------------------------*/ if (islogical) { switch (SCpnt->cmnd[0]) { case TEST_UNIT_READY: memset (SCpnt->request_buffer, 0, SCpnt->request_bufflen); SCpnt->result =3D (DID_OK << 16); callDone (SCpnt); return NULL;
case MODE_SENSE: memset (SCpnt->request_buffer, 0, SCpnt->cmnd[4]); SCpnt->result =3D (DID_OK << 16); callDone (SCpnt); return NULL;
case READ_CAPACITY: case INQUIRY: /* Allocate a SCB and initialize passthru */ if ((pScb =3D allocateSCB (megaCfg, SCpnt)) =3D=3D NULL) { SCpnt->result =3D (DID_ERROR << 16); callDone (SCpnt); return NULL; } pthru =3D &pScb->pthru; mbox =3D (mega_mailbox *) & pScb->mboxData;
memset (mbox, 0, sizeof (pScb->mboxData)); memset (pthru, 0, sizeof (mega_passthru)); pthru->timeout =3D 0; pthru->ars =3D 1; pthru->reqsenselen =3D 14; pthru->islogical =3D 1; pthru->logdrv =3D SCpnt->lun; pthru->cdblen =3D SCpnt->cmd_len; pthru->dataxferaddr =3D virt_to_bus (SCpnt->request_buffer); pthru->dataxferlen =3D SCpnt->request_bufflen; memcpy (pthru->cdb, SCpnt->cmnd, SCpnt->cmd_len);
/* Initialize mailbox area */ mbox->cmd =3D MEGA_MBOXCMD_PASSTHRU; mbox->xferaddr =3D virt_to_bus (pthru);
return pScb;
case READ_6: case WRITE_6: case READ_10: case WRITE_10: /* Allocate a SCB and initialize mailbox */ if ((pScb =3D allocateSCB (megaCfg, SCpnt)) =3D=3D NULL) { SCpnt->result =3D (DID_ERROR << 16); callDone (SCpnt); return NULL; } mbox =3D (mega_mailbox *) & pScb->mboxData;
memset (mbox, 0, sizeof (pScb->mboxData)); mbox->logdrv =3D SCpnt->lun; mbox->cmd =3D (*SCpnt->cmnd =3D=3D READ_6 || *SCpnt->cmnd =3D=3D = READ_10) ? MEGA_MBOXCMD_LREAD : MEGA_MBOXCMD_LWRITE;
/* 6-byte */ if (*SCpnt->cmnd =3D=3D READ_6 || *SCpnt->cmnd =3D=3D WRITE_6) { mbox->numsectors =3D (u_long) SCpnt->cmnd[4]; mbox->lba =3D ((u_long) SCpnt->cmnd[1] << 16) | ((u_long) SCpnt->cmnd[2] << 8) | (u_long) SCpnt->cmnd[3]; mbox->lba &=3D 0x1FFFFF; }
/* 10-byte */ if (*SCpnt->cmnd =3D=3D READ_10 || *SCpnt->cmnd =3D=3D WRITE_10) = { mbox->numsectors =3D (u_long) SCpnt->cmnd[8] | ((u_long) SCpnt->cmnd[7] << 8); mbox->lba =3D ((u_long) SCpnt->cmnd[2] << 24) | ((u_long) SCpnt->cmnd[3] << 16) | ((u_long) SCpnt->cmnd[4] << 8) | (u_long) SCpnt->cmnd[5]; }
/* Calculate Scatter-Gather info */ mbox->numsgelements =3D build_sglist (megaCfg, pScb, (u_long *) & mbox->xferaddr, (u_long *) & seg);
return pScb;
default: SCpnt->result =3D (DID_BAD_TARGET << 16); callDone (SCpnt); return NULL; } } /*----------------------------------------------------- * * Passthru drive commands * *-----------------------------------------------------*/ else { /* Allocate a SCB and initialize passthru */ if ((pScb =3D allocateSCB (megaCfg, SCpnt)) =3D=3D NULL) { SCpnt->result =3D (DID_ERROR << 16); callDone (SCpnt); return NULL; } pthru =3D &pScb->pthru; mbox =3D (mega_mailbox *) pScb->mboxData;
memset (mbox, 0, sizeof (pScb->mboxData)); memset (pthru, 0, sizeof (mega_passthru)); pthru->timeout =3D 0; pthru->ars =3D 1; pthru->reqsenselen =3D 14; pthru->islogical =3D 0; pthru->channel =3D SCpnt->channel; pthru->target =3D SCpnt->target; pthru->cdblen =3D SCpnt->cmd_len; memcpy (pthru->cdb, SCpnt->cmnd, SCpnt->cmd_len);
pthru->numsgelements =3D build_sglist (megaCfg, pScb, (u_long *) & pthru->dataxferaddr, (u_long *) & pthru->dataxferlen);
/* Initialize mailbox */ mbox->cmd =3D MEGA_MBOXCMD_PASSTHRU; mbox->xferaddr =3D virt_to_bus (pthru);
return pScb; } return NULL; }
/*-------------------------------------------------------------------- * build RAID commands for controller, passed down through ioctl() = *--------------------------------------------------------------------*/ static mega_scb * mega_ioctl (mega_host_config * megaCfg, Scsi_Cmnd * = SCpnt) { mega_scb *pScb; mega_ioctl_mbox *mbox; mega_mailbox *mailbox; mega_passthru *pthru; long seg; unsigned char *data =3D (unsigned char *)SCpnt->request_buffer; int i;
if ((pScb =3D allocateSCB (megaCfg, SCpnt)) =3D=3D NULL) { SCpnt->result =3D (DID_ERROR << 16); callDone (SCpnt); return NULL; }
#if 0 printk("\nBUF: "); for (i=3D0;i<18;i++) { printk(" %x",data[i]); } printk("......\n"); #endif
mbox =3D (mega_ioctl_mbox *) & pScb->mboxData; mailbox =3D (mega_mailbox *) & pScb->mboxData; memset (mailbox, 0, sizeof (pScb->mboxData));
if (data[0] =3D=3D 0x03) { /* passthrough command */ unsigned char cdblen =3D data[2];
pthru =3D &pScb->pthru; memset (pthru, 0, sizeof (mega_passthru)); pthru->islogical =3D (data[cdblen+3] & 0x80) ? 1:0; pthru->timeout =3D data[cdblen+3] & 0x07; pthru->reqsenselen =3D 14; pthru->ars =3D (data[cdblen+3] & 0x08) ? 1:0; pthru->logdrv =3D data[cdblen+4]; pthru->channel =3D data[cdblen+5]; pthru->target =3D data[cdblen+6]; pthru->cdblen =3D cdblen; memcpy (pthru->cdb, &data[3], cdblen);
mailbox->cmd =3D MEGA_MBOXCMD_PASSTHRU; mailbox->xferaddr =3D virt_to_bus (pthru);
pthru->numsgelements =3D build_sglist (megaCfg, pScb, (u_long *) & pthru->dataxferaddr, (u_long *) & pthru->dataxferlen);
for (i=3D0;i<(SCpnt->request_bufflen-cdblen-7);i++) { data[i] =3D data[i+cdblen+7]; }
return pScb; } /* else normal (nonpassthru) command */
mbox->cmd =3D data[0]; mbox->channel =3D data[1]; mbox->param =3D data[2]; mbox->pad[0] =3D data[3]; mbox->logdrv =3D data[4];
mbox->numsgelements =3D build_sglist (megaCfg, pScb, (u_long *) & mbox->xferaddr, (u_long *) & seg);
for (i=3D0;i<(SCpnt->request_bufflen-6);i++) { data[i] =3D data[i+6]; }
return (pScb); }
/*-------------------------------------------------------------------- * Interrupt service routine = *--------------------------------------------------------------------*/ static void megaraid_isr (int irq, void *devp, struct pt_regs *regs) { mega_host_config *megaCfg; u_char byte, idx, sIdx; u_long dword; mega_mailbox *mbox; mega_scb *pScb; long flags; int qCnt, qStatus;
megaCfg =3D (mega_host_config *) devp; mbox =3D (mega_mailbox *) megaCfg->mbox;
if (megaCfg->host->irq =3D=3D irq) {
#if LINUX_VERSION_CODE >=3D 0x20100 spin_lock_irqsave (&io_request_lock, flags); #endif
spin_lock_irqsave (&mega_lock, flags);
if (megaCfg->flag & IN_ISR) { TRACE (("ISR called reentrantly!!\n")); }
megaCfg->flag |=3D IN_ISR;
/* Check if a valid interrupt is pending */ if (megaCfg->flag & BOARD_QUARTZ) { dword =3D RDOUTDOOR (megaCfg); if (dword !=3D 0x10001234) { /* Spurious interrupt */ megaCfg->flag &=3D ~IN_ISR; spin_unlock_irqrestore (&mega_lock, flags); #if LINUX_VERSION_CODE >=3D 0x20100 spin_unlock_irqrestore (&io_request_lock, flags); #endif return; } WROUTDOOR (megaCfg, dword); } else { byte =3D READ_PORT (megaCfg->host->io_port, INTR_PORT); if ((byte & VALID_INTR_BYTE) =3D=3D 0) { /* Spurious interrupt */ megaCfg->flag &=3D ~IN_ISR; spin_unlock_irqrestore (&mega_lock, flags); #if LINUX_VERSION_CODE >=3D 0x20100 spin_unlock_irqrestore (&io_request_lock, flags); #endif return; } WRITE_PORT (megaCfg->host->io_port, INTR_PORT, byte); }
qCnt =3D mbox->numstatus; qStatus =3D mbox->status;
if (qCnt > 1) { TRACE (("ISR: Received %d status\n", qCnt)) printk (KERN_DEBUG "Got numstatus =3D %d\n", qCnt); }
for (idx =3D 0; idx < qCnt; idx++) { sIdx =3D mbox->completed[idx]; if (sIdx > 0) { pScb =3D &megaCfg->scbList[sIdx - 1]; /* FVF: let's try to avoid un/locking for no good reason */ pScb->SCpnt->result =3D qStatus; ENQUEUE_NL (pScb->SCpnt, Scsi_Cmnd, qCompleted, host_scribble); freeSCB (pScb); } } if (megaCfg->flag & BOARD_QUARTZ) { WRINDOOR (megaCfg, virt_to_bus (megaCfg->mbox) | 0x2); while (RDINDOOR (megaCfg) & 0x02); } else { CLEAR_INTR (megaCfg->host->io_port); }
megaCfg->flag &=3D ~IN_ISR; megaCfg->flag &=3D ~PENDING;
spin_unlock_irqrestore (&mega_lock, flags); mega_runque (NULL);
#if LINUX_VERSION_CODE >=3D 0x20100 spin_unlock_irqrestore (&io_request_lock, flags); #endif
#if 0 /* Queue as a delayed ISR routine */ queue_task_irq_off (&runq, &tq_immediate); mark_bh (IMMEDIATE_BH); #endif
} }
/*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D*/ /* Wait until the controller's mailbox is available */ /*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D*/ static int busyWaitMbox (mega_host_config * megaCfg) { mega_mailbox *mbox =3D (mega_mailbox *) megaCfg->mbox; long counter;
for (counter =3D 0; counter < 10000; counter++) { udelay (100); if (!mbox->busy) return 0; } return -1; /* give up after 1 second */ }
/*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D * Post a command to the card * * Arguments: * mega_host_config *megaCfg - Controller structure * u_char *mboxData - Mailbox area, 16 bytes * mega_scb *pScb - SCB posting (or NULL if N/A) * int intr - if 1, interrupt, 0 is blocking = *=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D */ static int MegaIssueCmd (mega_host_config * megaCfg, u_char * mboxData, mega_scb * pScb, int intr) { mega_mailbox *mbox =3D (mega_mailbox *) megaCfg->mbox; long flags; u_char byte; u_long cmdDone;
mboxData[0x1] =3D (pScb ? pScb->idx + 1 : 0x00); /* Set cmdid */ mboxData[0xF] =3D 1; /* Set busy */
spin_lock_irqsave(&mega_lock,flags);
#if !MULTI_IO if (megaCfg->flag & PENDING) { spin_unlock_irqrestore(&mega_lock,flags); return -1; } #endif
/* Wait until mailbox is free */ if (busyWaitMbox (megaCfg)) { if (pScb) { TRACE (("Mailbox busy %.08lx <%d.%d.%d>\n", = pScb->SCpnt->serial_number, pScb->SCpnt->channel, pScb->SCpnt->target, pScb->SCpnt->lun)); } else { TRACE(("pScb NULL in MegaIssueCmd!\n")); } spin_unlock_irqrestore(&mega_lock,flags); return -1; }
/* Copy mailbox data into host structure */ memset (mbox, 0, 16); memcpy (mbox, mboxData, 16);
/* Kick IO */ megaCfg->flag |=3D PENDING; if (intr) { /* Issue interrupt (non-blocking) command */ if (megaCfg->flag & BOARD_QUARTZ) { mbox->mraid_poll =3D 0; mbox->mraid_ack =3D 0; WRINDOOR (megaCfg, virt_to_bus (megaCfg->mbox) | 0x1); } else { ENABLE_INTR (megaCfg->host->io_port); ISSUE_COMMAND (megaCfg->host->io_port); } spin_unlock_irqrestore(&mega_lock,flags); } else { /* Issue non-ISR (blocking) command */
if (megaCfg->flag & BOARD_QUARTZ) {
mbox->mraid_poll =3D 0; mbox->mraid_ack =3D 0; WRINDOOR (megaCfg, virt_to_bus (megaCfg->mbox) | 0x1);
while ((cmdDone =3D RDOUTDOOR (megaCfg)) !=3D 0x10001234); WROUTDOOR (megaCfg, cmdDone);
spin_unlock_irqrestore(&mega_lock,flags); if (pScb) { mega_cmd_done (megaCfg, pScb, mbox->status); mega_rundoneq (); }
WRINDOOR (megaCfg, virt_to_bus (megaCfg->mbox) | 0x2); while (RDINDOOR (megaCfg) & 0x2);
megaCfg->flag &=3D ~PENDING;
} else { DISABLE_INTR (megaCfg->host->io_port); ISSUE_COMMAND (megaCfg->host->io_port);
while (!((byte =3D READ_PORT (megaCfg->host->io_port, INTR_PORT)) = & INTR_VALID)); WRITE_PORT (megaCfg->host->io_port, INTR_PORT, byte);
ENABLE_INTR (megaCfg->host->io_port); CLEAR_INTR (megaCfg->host->io_port); megaCfg->flag &=3D ~PENDING; spin_unlock_irqrestore(&mega_lock,flags);
if (pScb) { mega_cmd_done (megaCfg, pScb, mbox->status); mega_rundoneq (); } else { TRACE (("Error: NULL pScb!\n")); }
} }
return 0; }
/*------------------------------------------------------------------- * Copies data to SGLIST *-------------------------------------------------------------------*/ static int build_sglist (mega_host_config * megaCfg, mega_scb * scb, u_long * buffer, u_long * length) { struct scatterlist *sgList; int idx;
/* Scatter-gather not used */ if (scb->SCpnt->use_sg =3D=3D 0) { *buffer =3D virt_to_bus (scb->SCpnt->request_buffer); *length =3D (u_long) scb->SCpnt->request_bufflen; return 0; }
sgList =3D (struct scatterlist *) scb->SCpnt->request_buffer; if (scb->SCpnt->use_sg =3D=3D 1) { *buffer =3D virt_to_bus (sgList[0].address); *length =3D (u_long) sgList[0].length; return 0; }
/* Copy Scatter-Gather list info into controller structure */ for (idx =3D 0; idx < scb->SCpnt->use_sg; idx++) { scb->sgList[idx].address =3D virt_to_bus (sgList[idx].address); scb->sgList[idx].length =3D (u_long) sgList[idx].length; }
/* Reset pointer and length fields */ *buffer =3D virt_to_bus (scb->sgList); *length =3D 0;
/* Return count of SG requests */ return scb->SCpnt->use_sg; }
/*-------------------------------------------------------------------- * Initializes the adress of the controller's mailbox register * The mailbox register is used to issue commands to the card. * Format of the mailbox area: * 00 01 command * 01 01 command id * 02 02 # of sectors * 04 04 logical bus address * 08 04 physical buffer address * 0C 01 logical drive # * 0D 01 length of scatter/gather list * 0E 01 reserved * 0F 01 mailbox busy * 10 01 numstatus byte * 11 01 status byte = *--------------------------------------------------------------------*/ static int mega_register_mailbox (mega_host_config * megaCfg, u_long = paddr) { /* align on 16-byte boundry */ megaCfg->mbox =3D &megaCfg->mailbox; megaCfg->mbox =3D (mega_mailbox *) ((((ulong) megaCfg->mbox) + 16) & = 0xfffffff0); paddr =3D (paddr + 16) & 0xfffffff0;
/* Register mailbox area with the firmware */ if (megaCfg->flag & BOARD_QUARTZ) { } else { WRITE_PORT (megaCfg->host->io_port, MBOX_PORT0, paddr & 0xFF); WRITE_PORT (megaCfg->host->io_port, MBOX_PORT1, (paddr >> 8) & = 0xFF); WRITE_PORT (megaCfg->host->io_port, MBOX_PORT2, (paddr >> 16) & = 0xFF); WRITE_PORT (megaCfg->host->io_port, MBOX_PORT3, (paddr >> 24) & = 0xFF); WRITE_PORT (megaCfg->host->io_port, ENABLE_MBOX_REGION, = ENABLE_MBOX_BYTE);
CLEAR_INTR (megaCfg->host->io_port); ENABLE_INTR (megaCfg->host->io_port); } return 0; }
/*------------------------------------------------------------------- * Issue an adapter info query to the controller *-------------------------------------------------------------------*/ static int mega_i_query_adapter (mega_host_config * megaCfg) { mega_RAIDINQ *adapterInfo; mega_mailbox *mbox; u_char mboxData[16]; u_long paddr;
spin_lock_init (&mega_lock); /* Initialize adapter inquiry */ paddr =3D virt_to_bus (megaCfg->mega_buffer); mbox =3D (mega_mailbox *) mboxData;
memset ((void *) megaCfg->mega_buffer, 0, sizeof = (megaCfg->mega_buffer)); memset (mbox, 0, 16);
/* Initialize mailbox registers */ mbox->cmd =3D MEGA_MBOXCMD_ADAPTERINQ; mbox->xferaddr =3D paddr;
/* Issue a blocking command to the card */ MegaIssueCmd (megaCfg, mboxData, NULL, 0);
/* Initialize host/local structures with Adapter info */ adapterInfo =3D (mega_RAIDINQ *) megaCfg->mega_buffer; megaCfg->host->max_channel =3D adapterInfo->AdpInfo.ChanPresent; /* megaCfg->host->max_id =3D adapterInfo->AdpInfo.MaxTargPerChan; */ megaCfg->host->max_id =3D 16; /* max targets/chan */ megaCfg->numldrv =3D adapterInfo->LogdrvInfo.NumLDrv;
#if 0 printk ("KERN_DEBUG ---- Logical drive info ----\n"); for (i =3D 0; i < megaCfg->numldrv; i++) { printk ("%d: size: %ld prop: %x state: %x\n", i, adapterInfo->LogdrvInfo.LDrvSize[i], adapterInfo->LogdrvInfo.LDrvProp[i], adapterInfo->LogdrvInfo.LDrvState[i]); } printk (KERN_DEBUG "---- Physical drive info ----\n"); for (i =3D 0; i < MAX_PHYSICAL_DRIVES; i++) { if (i && !(i % 8)) printk ("\n"); printk ("%d: %x ", i, adapterInfo->PhysdrvInfo.PDrvState[i]); } printk ("\n"); #endif
megaCfg->max_cmds =3D adapterInfo->AdpInfo.MaxConcCmds;
#ifdef HP /* use HP firmware and bios version encoding */ sprintf (megaCfg->fwVer, "%c%d%d.%d%d", adapterInfo->AdpInfo.FwVer[2], adapterInfo->AdpInfo.FwVer[1] >> 8, adapterInfo->AdpInfo.FwVer[1] & 0x0f, adapterInfo->AdpInfo.FwVer[2] >> 8, adapterInfo->AdpInfo.FwVer[2] & 0x0f); sprintf (megaCfg->biosVer, "%c%d%d.%d%d", adapterInfo->AdpInfo.BiosVer[2], adapterInfo->AdpInfo.BiosVer[1] >> 8, adapterInfo->AdpInfo.BiosVer[1] & 0x0f, adapterInfo->AdpInfo.BiosVer[2] >> 8, adapterInfo->AdpInfo.BiosVer[2] & 0x0f); #else memcpy (megaCfg->fwVer, adapterInfo->AdpInfo.FwVer, 4); megaCfg->fwVer[4] =3D 0;
memcpy (megaCfg->biosVer, adapterInfo->AdpInfo.BiosVer, 4); megaCfg->biosVer[4] =3D 0; #endif
printk (KERN_INFO "megaraid: [%s:%s] detected %d logical drives" = CRLFSTR, megaCfg->fwVer, megaCfg->biosVer, megaCfg->numldrv); return 0; }
/*----------------------------------------------------------------------=
--- * * Driver interface functions * = *-----------------------------------------------------------------------= --*//*---------------------------------------------------------- * Returns data to be displayed in /proc/scsi/megaraid/X *----------------------------------------------------------*/ int megaraid_proc_info (char *buffer, char **start, off_t offset, int length, int inode, int inout) { *start =3D buffer; return 0; }
int findCard (Scsi_Host_Template * pHostTmpl, u_short pciVendor, u_short pciDev, long flag) { mega_host_config *megaCfg; struct Scsi_Host *host; u_char pciBus, pciDevFun, megaIrq; u_long megaBase; u_short pciIdx =3D 0; u_short numFound =3D 0;
#if LINUX_VERSION_CODE < 0x20100 while (!pcibios_find_device (pciVendor, pciDev, pciIdx, &pciBus, = &pciDevFun)) { #if 0 if (flag & BOARD_QUARTZ) { u_int magic; pcibios_read_config_dword (pciBus, pciDevFun, PCI_CONF_AMISIG, &magic); if (magic !=3D AMI_SIGNATURE) { pciIdx++; continue; /* not an AMI board */ } } #endif
#if 0 } /* keep auto-indenters happy */ #endif
#else struct pci_dev *pdev =3D pci_devices;
while ((pdev =3D pci_find_device (pciVendor, pciDev, pdev))) { pciBus =3D pdev->bus->number; pciDevFun =3D pdev->devfn; #endif printk (KERN_INFO "megaraid: found 0x%4.04x:0x%4.04x:idx %d:bus = %d:slot %d:fun %d\n", pciVendor, pciDev, pciIdx, pciBus, PCI_SLOT (pciDevFun), PCI_FUNC (pciDevFun));
/* Read the base port and IRQ from PCI */ #if LINUX_VERSION_CODE < 0x20100 pcibios_read_config_dword (pciBus, pciDevFun, PCI_BASE_ADDRESS_0, (u_int *) & megaBase); pcibios_read_config_byte (pciBus, pciDevFun, PCI_INTERRUPT_LINE, &megaIrq); #else megaBase =3D pdev->base_address[0]; megaIrq =3D pdev->irq; #endif pciIdx++;
if (flag & BOARD_QUARTZ) { megaBase &=3D PCI_BASE_ADDRESS_MEM_MASK; megaBase =3D (long) ioremap (megaBase, 128); } else { megaBase &=3D PCI_BASE_ADDRESS_IO_MASK; megaBase +=3D 0x10; }
/* Initialize SCSI Host structure */ host =3D scsi_register (pHostTmpl, sizeof (mega_host_config)); megaCfg =3D (mega_host_config *) host->hostdata; memset (megaCfg, 0, sizeof (mega_host_config));
printk (KERN_INFO " scsi%d: Found a MegaRAID controller at 0x%x, = IRQ: %d" CRLFSTR, host->host_no, (u_int) megaBase, megaIrq);
/* Copy resource info into structure */ megaCfg->flag =3D flag; megaCfg->host =3D host; megaCfg->base =3D megaBase; megaCfg->host->irq =3D megaIrq; megaCfg->host->io_port =3D megaBase; megaCfg->host->n_io_port =3D 16; megaCfg->host->unique_id =3D (pciBus << 8) | pciDevFun; megaCtlrs[numCtlrs++] =3D megaCfg;
if (flag !=3D BOARD_QUARTZ) { /* Request our IO Range */ if (check_region (megaBase, 16)) { printk (KERN_WARNING "megaraid: Couldn't register I/O range!" = CRLFSTR); scsi_unregister (host); continue; } request_region (megaBase, 16, "megaraid"); }
/* Request our IRQ */ if (request_irq (megaIrq, megaraid_isr, SA_SHIRQ, "megaraid", megaCfg)) { printk (KERN_WARNING "megaraid: Couldn't register IRQ %d!" = CRLFSTR, megaIrq); scsi_unregister (host); continue; }
mega_register_mailbox (megaCfg, virt_to_bus ((void *) = &megaCfg->mailbox)); mega_i_query_adapter (megaCfg);
/* Initialize SCBs */ if (initSCB (megaCfg)) { scsi_unregister (host); continue; }
numFound++; } return numFound; }
/*--------------------------------------------------------- * Detects if a megaraid controller exists in this system *---------------------------------------------------------*/ int megaraid_detect (Scsi_Host_Template * pHostTmpl) { int count =3D 0;
pHostTmpl->proc_dir =3D &proc_scsi_megaraid;
#if LINUX_VERSION_CODE < 0x20100 if (!pcibios_present ()) { printk (KERN_WARNING "megaraid: PCI bios not present." CRLFSTR); return 0; } #endif
count +=3D findCard (pHostTmpl, 0x101E, 0x9010, 0); count +=3D findCard (pHostTmpl, 0x101E, 0x9060, 0); count +=3D findCard (pHostTmpl, 0x8086, 0x1960, BOARD_QUARTZ);
return count; }
/*--------------------------------------------------------------------- * Release the controller's resources = *---------------------------------------------------------------------*/=
int megaraid_release (struct Scsi_Host *pSHost) { mega_host_config *megaCfg; mega_mailbox *mbox; u_char mboxData[16];
megaCfg =3D (mega_host_config *) pSHost->hostdata; mbox =3D (mega_mailbox *) mboxData;
/* Flush cache to disk */ memset (mbox, 0, 16); mboxData[0] =3D 0xA;
/* Issue a blocking (interrupts disabled) command to the card */ MegaIssueCmd (megaCfg, mboxData, NULL, 0);
schedule ();
/* Free our resources */ if (megaCfg->flag & BOARD_QUARTZ) { iounmap ((void *) megaCfg->base); } else { release_region (megaCfg->host->io_port, 16); } free_irq (megaCfg->host->irq, megaCfg); /* Must be freed first, = otherwise
extra interrupt is generated */ freeSgList(megaCfg); scsi_unregister (pSHost);
return 0; }
static inline void freeSgList(mega_host_config *megaCfg) { int i;
for (i =3D 0; i < megaCfg->max_cmds; i++) { if (megaCfg->scbList[i].sgList) kfree (megaCfg->scbList[i].sgList); /* free sgList */ } }
/*---------------------------------------------- * Get information about the card/driver=20 *----------------------------------------------*/ const char * megaraid_info (struct Scsi_Host *pSHost) { static char buffer[512]; mega_host_config *megaCfg; mega_RAIDINQ *adapterInfo;
megaCfg =3D (mega_host_config *) pSHost->hostdata; adapterInfo =3D (mega_RAIDINQ *) megaCfg->mega_buffer;
sprintf (buffer, "AMI MegaRAID %s %d commands %d targs %d chans", megaCfg->fwVer, adapterInfo->AdpInfo.MaxConcCmds, megaCfg->host->max_id, megaCfg->host->max_channel); return buffer; }
/*----------------------------------------------------------------- * Perform a SCSI command * Mailbox area: * 00 01 command * 01 01 command id * 02 02 # of sectors * 04 04 logical bus address * 08 04 physical buffer address * 0C 01 logical drive # * 0D 01 length of scatter/gather list * 0E 01 reserved * 0F 01 mailbox busy * 10 01 numstatus byte * 11 01 status byte=20 *-----------------------------------------------------------------*/ int megaraid_queue (Scsi_Cmnd * SCpnt, void (*pktComp) (Scsi_Cmnd *)) { mega_host_config *megaCfg; mega_scb *pScb;
megaCfg =3D (mega_host_config *) SCpnt->host->hostdata;
if (!(megaCfg->flag & (1L << SCpnt->channel))) { printk (KERN_INFO "scsi%d: scanning channel %c for devices.\n", megaCfg->host->host_no, SCpnt->channel + 'A'); megaCfg->flag |=3D (1L << SCpnt->channel); }
SCpnt->scsi_done =3D pktComp;
/* Allocate and build a SCB request */ if ((pScb =3D mega_build_cmd (megaCfg, SCpnt)) !=3D NULL) { /* Add SCB to the head of the pending queue */ ENQUEUE (pScb, mega_scb, qPending, next);
/* Issue the command to the card */ mega_runque (NULL); }
return 0; }
/*----------------------------------------------------------------------=
* Issue a blocking command to the controller = *----------------------------------------------------------------------*= / volatile static int internal_done_flag =3D 0; volatile static int internal_done_errcode =3D 0;
static void internal_done (Scsi_Cmnd * SCpnt) { internal_done_errcode =3D SCpnt->result; internal_done_flag++; }
/* * This seems dangerous in an SMP environment because * while spinning on internal_done_flag in 2.0.x SMP * no IRQ's will be taken, including those that might * be needed to clear this. * * I think this should be using a wait queue ? * -- AC */ =20
/* * I'll probably fix this in the next version, but * megaraid_command() will never get called since can_queue is = set, * except maybe in a *really* old kernel in which case it's very * unlikely they'd be using SMP anyway. Really this function is * just here for completeness. * - JLJ */
int megaraid_command (Scsi_Cmnd * SCpnt) { internal_done_flag =3D 0;
/* Queue command, and wait until it has completed */ megaraid_queue (SCpnt, internal_done);
while (!internal_done_flag) barrier ();
return internal_done_errcode; }
/*--------------------------------------------------------------------- * Abort a previous SCSI request = *---------------------------------------------------------------------*/=
int megaraid_abort (Scsi_Cmnd * SCpnt) { mega_host_config *megaCfg; int idx; long flags;
spin_lock_irqsave (&mega_lock, flags);
megaCfg =3D (mega_host_config *) SCpnt->host->hostdata;
TRACE (("ABORT!!! %.08lx %.02x <%d.%d.%d>\n", SCpnt->serial_number, SCpnt->cmnd[0], SCpnt->channel, SCpnt->target, SCpnt->lun)); /* * Walk list of SCBs for any that are still outstanding */ for (idx =3D 0; idx < megaCfg->max_cmds; idx++) { if (megaCfg->scbList[idx].idx >=3D 0) { if (megaCfg->scbList[idx].SCpnt =3D=3D SCpnt) { freeSCB (&megaCfg->scbList[idx]);
SCpnt->result =3D (DID_RESET << 16) | (SUGGEST_RETRY << 24); callDone (SCpnt); } } } spin_unlock_irqrestore (&mega_lock, flags); return SCSI_ABORT_SNOOZE; }
/*--------------------------------------------------------------------- * Reset a previous SCSI request = *---------------------------------------------------------------------*/=
int megaraid_reset (Scsi_Cmnd * SCpnt, unsigned int rstflags) { mega_host_config *megaCfg; int idx; long flags;
spin_lock_irqsave (&mega_lock, flags);
megaCfg =3D (mega_host_config *) SCpnt->host->hostdata;
TRACE (("RESET: %.08lx %.02x <%d.%d.%d>\n", SCpnt->serial_number, SCpnt->cmnd[0], SCpnt->channel, SCpnt->target, SCpnt->lun));
/* * Walk list of SCBs for any that are still outstanding */ for (idx =3D 0; idx < megaCfg->max_cmds; idx++) { if (megaCfg->scbList[idx].idx >=3D 0) { SCpnt =3D megaCfg->scbList[idx].SCpnt; freeSCB (&megaCfg->scbList[idx]); SCpnt->result =3D (DID_RESET << 16) | (SUGGEST_RETRY << 24); callDone (SCpnt); } } spin_unlock_irqrestore (&mega_lock, flags); return SCSI_RESET_PUNT; }
/*------------------------------------------------------------- * Return the disk geometry for a particular disk * Input: * Disk *disk - Disk geometry * kdev_t dev - Device node * int *geom - Returns geometry fields * geom[0] =3D heads * geom[1] =3D sectors * geom[2] =3D cylinders *-------------------------------------------------------------*/ int megaraid_biosparam (Disk * disk, kdev_t dev, int *geom) { int heads, sectors, cylinders; mega_host_config *megaCfg;
/* Get pointer to host config structure */ megaCfg =3D (mega_host_config *) disk->device->host->hostdata;
/* Default heads (64) & sectors (32) */ heads =3D 64; sectors =3D 32; cylinders =3D disk->capacity / (heads * sectors);
/* Handle extended translation size for logical drives > 1Gb */ if (disk->capacity >=3D 0x200000) { heads =3D 255; sectors =3D 63; cylinders =3D disk->capacity / (heads * sectors); }
/* return result */ geom[0] =3D heads; geom[1] =3D sectors; geom[2] =3D cylinders;
return 0; }
#ifdef MODULE Scsi_Host_Template driver_template =3D MEGARAID;
#include "scsi_module.c" #endif
------ =_NextPart_000_01BE5EA2.FB497BC4 Content-Type: application/octet-stream; name="megaraid.h" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename="megaraid.h"
#ifndef __MEGARAID_H__ #define __MEGARAID_H__
#ifndef LINUX_VERSION_CODE #include <linux/version.h> #endif
#define MULTI_IO 0 /* change to 1 for fully parallel I/O to adapter = */ /* works on some systems, not on others yet */
#define IN_ISR 0x80000000L #define NO_INTR 0x40000000L #define IN_TIMEOUT 0x20000000L #define PENDING 0x10000000L #define BOARD_QUARTZ 0x08000000L
#define SCB_ACTIVE 0x1 #define SCB_WAITQ 0x2 #define SCB_ISSUED 0x4
#define SCB_FREE -1 #define SCB_RESET -2 #define SCB_ABORT -3 #define SCB_LOCKED -4
#define MEGA_CMD_TIMEOUT 10
#define MAX_SGLIST 17 #define MAX_COMMANDS 254
#define MAX_LOGICAL_DRIVES 8 #define MAX_CHANNEL 5 #define MAX_TARGET 15 #define MAX_PHYSICAL_DRIVES MAX_CHANNEL*MAX_TARGET
#define INQUIRY_DATA_SIZE 0x24 #define MAX_CDB_LEN 0x0A #define MAX_REQ_SENSE_LEN 0x20
#define INTR_VALID 0x40
/* Mailbox commands */ #define MEGA_MBOXCMD_LREAD 0x01 #define MEGA_MBOXCMD_LWRITE 0x02 #define MEGA_MBOXCMD_PASSTHRU 0x03 #define MEGA_MBOXCMD_ADAPTERINQ 0x05
/* Offsets into Mailbox */ #define COMMAND_PORT 0x00 #define COMMAND_ID_PORT 0x01 #define SG_LIST_PORT0 0x08 #define SG_LIST_PORT1 0x09 #define SG_LIST_PORT2 0x0a #define SG_LIST_PORT3 0x0b #define SG_ELEMENT_PORT 0x0d #define NO_FIRED_PORT 0x0f
/* I/O Port offsets */ #define I_CMD_PORT 0x00 #define I_ACK_PORT 0x00 #define I_TOGGLE_PORT 0x01 #define INTR_PORT 0x0a
#define MAILBOX_SIZE (sizeof(mega_mailbox)-16) #define MBOX_BUSY_PORT 0x00 #define MBOX_PORT0 0x04 #define MBOX_PORT1 0x05 #define MBOX_PORT2 0x06 #define MBOX_PORT3 0x07 #define ENABLE_MBOX_REGION 0x0B
/* I/O Port Values */ #define ISSUE_BYTE 0x10 #define ACK_BYTE 0x08 #define ENABLE_INTR_BYTE 0xc0 #define DISABLE_INTR_BYTE 0x00 #define VALID_INTR_BYTE 0x40 #define MBOX_BUSY_BYTE 0x10 #define ENABLE_MBOX_BYTE 0x00
/* Setup some port macros here */ #define WRITE_MAILBOX(base,offset,value) *(base+offset)=3Dvalue #define READ_MAILBOX(base,offset) *(base+offset)
#define WRITE_PORT(base,offset,value) outb_p(value,base+offset) #define READ_PORT(base,offset) inb_p(base+offset)
#define ISSUE_COMMAND(base) WRITE_PORT(base,I_CMD_PORT,ISSUE_BYTE) #define CLEAR_INTR(base) WRITE_PORT(base,I_ACK_PORT,ACK_BYTE) #define ENABLE_INTR(base) = WRITE_PORT(base,I_TOGGLE_PORT,ENABLE_INTR_BYTE) #define DISABLE_INTR(base) = WRITE_PORT(base,I_TOGGLE_PORT,DISABLE_INTR_BYTE)
/* Define AMI's PCI codes */ #undef PCI_VENDOR_ID_AMI #undef PCI_DEVICE_ID_AMI_MEGARAID
#ifndef PCI_VENDOR_ID_AMI #define PCI_VENDOR_ID_AMI 0x101E #define PCI_DEVICE_ID_AMI_MEGARAID 0x9010 #endif
#define PCI_CONF_BASE_ADDR_OFFSET 0x10 #define PCI_CONF_IRQ_OFFSET 0x3c #define PCI_CONF_AMISIG 0xa0 #define AMI_SIGNATURE 0x11223344
#if LINUX_VERSION_CODE < 0x20100 #define MEGARAID \ { NULL, /* Next = */\ NULL, /* Usage Count Pointer = */\ NULL, /* /proc Directory Entry = */\ megaraid_proc_info, /* /proc Info Function = */\ "MegaRAID", /* Driver Name = */\ megaraid_detect, /* Detect Host Adapter = */\ megaraid_release, /* Release Host Adapter = */\ megaraid_info, /* Driver Info Function = */\ megaraid_command, /* Command Function = */\ megaraid_queue, /* Queue Command Function = */\ megaraid_abort, /* Abort Command Function = */\ megaraid_reset, /* Reset Command Function = */\ NULL, /* Slave Attach Function = */\ megaraid_biosparam, /* Disk BIOS Parameters = */\ 254, /* # of cmds that can be\ outstanding at any time */\ 7, /* HBA Target ID = */\ MAX_SGLIST, /* Scatter/Gather Table Size = */\ 64, /* SCSI Commands per LUN = */\ 0, /* Present = */\ 0, /* Default Unchecked ISA DMA = */\ ENABLE_CLUSTERING } /* Enable Clustering */ #else #define MEGARAID \ {\ name: "MegaRAID", /* Driver Name = */\ proc_info: megaraid_proc_info, /* /proc driver info = */\ detect: megaraid_detect, /* Detect Host Adapter = */\ release: megaraid_release, /* Release Host Adapter = */\ info: megaraid_info, /* Driver Info Function = */\ command: megaraid_command, /* Command Function = */\ queuecommand: megaraid_queue, /* Queue Command = Function */\ abort: megaraid_abort, /* Abort Command = Function */\ reset: megaraid_reset, /* Reset Command = Function */\ bios_param: megaraid_biosparam, /* Disk BIOS Parameters = */\ can_queue: 1 /* MAX_COMMANDS */, /* Can Queue = */\ this_id: 7, /* HBA Target ID = */\ sg_tablesize: MAX_SGLIST, /* Scatter/Gather Table = Size */\ cmd_per_lun: 64, /* SCSI Commands per LUN = */\ present: 0, /* Present = */\ unchecked_isa_dma:0, /* Default Unchecked ISA = DMA */\ use_clustering: ENABLE_CLUSTERING /* Enable Clustering = */\ } #endif
/* Structures */ typedef struct _mega_ADP_INFO { u_char MaxConcCmds; u_char RbldRate; u_char MaxTargPerChan; u_char ChanPresent; u_char FwVer[4]; u_short AgeOfFlash; u_char ChipSet; u_char DRAMSize; u_char CacheFlushInterval; u_char BiosVer[4]; u_char resvd[7]; } mega_ADP_INFO;
typedef struct _mega_LDRV_INFO { u_char NumLDrv; u_char resvd[3]; u_long LDrvSize[MAX_LOGICAL_DRIVES]; u_char LDrvProp[MAX_LOGICAL_DRIVES]; u_char LDrvState[MAX_LOGICAL_DRIVES]; } mega_LDRV_INFO;
typedef struct _mega_PDRV_INFO { u_char PDrvState[MAX_PHYSICAL_DRIVES]; u_char resvd; } mega_PDRV_INFO;
// RAID inquiry: Mailbox command 0x5 typedef struct _mega_RAIDINQ { mega_ADP_INFO AdpInfo; mega_LDRV_INFO LogdrvInfo; mega_PDRV_INFO PhysdrvInfo; } mega_RAIDINQ;
// Passthrough command: Mailbox command 0x3 typedef struct mega_passthru { u_char timeout:3; /* 0=3D6sec/1=3D60sec/2=3D10min/3=3D3hrs */ u_char ars:1; u_char reserved:3; u_char islogical:1; u_char logdrv; /* if islogical =3D=3D 1 */ u_char channel; /* if islogical =3D=3D 0 */ u_char target; /* if islogical =3D=3D 0 */ u_char queuetag; /* unused */ u_char queueaction; /* unused */ u_char cdb[MAX_CDB_LEN]; u_char cdblen; u_char reqsenselen; u_char reqsensearea[MAX_REQ_SENSE_LEN]; u_char numsgelements; u_char scsistatus; u_long dataxferaddr; u_long dataxferlen; } mega_passthru;
typedef struct _mega_mailbox { /* 0x0 */ u_char cmd; /* 0x1 */ u_char cmdid; /* 0x2 */ u_short numsectors; /* 0x4 */ u_long lba; /* 0x8 */ u_long xferaddr; /* 0xC */ u_char logdrv; /* 0xD */ u_char numsgelements; /* 0xE */ u_char resvd; /* 0xF */ u_char busy; /* 0x10 */ u_char numstatus; /* 0x11 */ u_char status; /* 0x12 */ u_char completed[46]; u_char mraid_poll; u_char mraid_ack; u_char pad[16]; } mega_mailbox;
typedef struct _mega_ioctl_mbox { /* 0x0 */ u_char cmd; /* 0x1 */ u_char cmdid; /* 0x2 */ u_char channel; /* 0x3 */ u_char param; /* 0x4 */ u_char pad[4]; /* 0x8 */ u_long xferaddr; /* 0xC */ u_char logdrv; /* 0xD */ u_char numsgelements; /* 0xE */ u_char resvd; /* 0xF */ u_char busy; /* 0x10 */ u_char numstatus; /* 0x11 */ u_char status; /* 0x12 */ u_char completed[46]; u_char mraid_poll; u_char mraid_ack; u_char malign[16]; } mega_ioctl_mbox;
typedef struct _mega_sglist { u_long address; u_long length; } mega_sglist;
/* Queued command data */ typedef struct _mega_scb mega_scb;
struct _mega_scb { int idx; u_long flag; Scsi_Cmnd *SCpnt; u_char mboxData[16]; mega_passthru pthru; mega_sglist *sgList; mega_scb *next; };
/* Per-controller data */ typedef struct _mega_host_config { u_char numldrv; u_long flag; u_long base;
struct tq_struct megaTq;
/* Host adapter parameters */ u_char fwVer[7]; u_char biosVer[7];
struct Scsi_Host *host;
/* The following must be DMA-able!! */ volatile mega_mailbox *mbox; volatile mega_mailbox mailbox; volatile u_char mega_buffer[2 * 1024L];
u_char max_cmds; mega_scb scbList[MAX_COMMANDS]; } mega_host_config;
extern struct proc_dir_entry proc_scsi_megaraid;
const char *megaraid_info(struct Scsi_Host *); int megaraid_detect(Scsi_Host_Template *); int megaraid_release(struct Scsi_Host *); int megaraid_command(Scsi_Cmnd *); int megaraid_abort(Scsi_Cmnd *); int megaraid_reset(Scsi_Cmnd *, unsigned int); int megaraid_queue(Scsi_Cmnd *, void (*done) (Scsi_Cmnd *)); int megaraid_biosparam(Disk *, kdev_t, int *); int megaraid_proc_info(char *buffer, char **start, off_t offset, int length, int hostno, int inout);
#endif
------ =_NextPart_000_01BE5EA2.FB497BC4--
- To unsubscribe from this list: send the line "unsubscribe linux-kernel" in the body of a message to majordomo@vger.rutgers.edu Please read the FAQ at http://www.tux.org/lkml/