git.oblomov.eu Git - linux-2.6/blob - drivers/block/cciss_scsi.c

   1 /*
   2  *    Disk Array driver for Compaq SA53xx Controllers, SCSI Tape module
   3  *    Copyright 2001 Compaq Computer Corporation
   4  *
   5  *    This program is free software; you can redistribute it and/or modify
   6  *    it under the terms of the GNU General Public License as published by
   7  *    the Free Software Foundation; either version 2 of the License, or
   8  *    (at your option) any later version.
   9  *
  10  *    This program is distributed in the hope that it will be useful,
  11  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *    MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
  13  *    NON INFRINGEMENT.  See the GNU General Public License for more details.
  14  *
  15  *    You should have received a copy of the GNU General Public License
  16  *    along with this program; if not, write to the Free Software
  17  *    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18  *
  19  *    Questions/Comments/Bugfixes to iss_storagedev@hp.com
  20  *
  21  *    Author: Stephen M. Cameron
  22  */
  23 #ifdef CONFIG_CISS_SCSI_TAPE
  24
  25 /* Here we have code to present the driver as a scsi driver
  26    as it is simultaneously presented as a block driver.  The
  27    reason for doing this is to allow access to SCSI tape drives
  28    through the array controller.  Note in particular, neither
  29    physical nor logical disks are presented through the scsi layer. */
  30
  31 #include <linux/timer.h>
  32 #include <linux/completion.h>
  33 #include <linux/slab.h>
  34 #include <linux/string.h>
  35
  36 #include <asm/atomic.h>
  37
  38 #include <scsi/scsi.h>
  39 #include <scsi/scsi_cmnd.h>
  40 #include <scsi/scsi_device.h>
  41 #include <scsi/scsi_host.h>
  42
  43 #include "cciss_scsi.h"
  44
  45 #define CCISS_ABORT_MSG 0x00
  46 #define CCISS_RESET_MSG 0x01
  47
  48 /* some prototypes... */
  49 static int sendcmd(
  50         __u8    cmd,
  51         int     ctlr,
  52         void    *buff,
  53         size_t  size,
  54         unsigned int use_unit_num, /* 0: address the controller,
  55                                       1: address logical volume log_unit,
  56                                       2: address is in scsi3addr */
  57         unsigned int log_unit,
  58         __u8    page_code,
  59         unsigned char *scsi3addr,
  60         int cmd_type);
  61
  62
  63 static int cciss_scsi_proc_info(
  64                 struct Scsi_Host *sh,
  65                 char *buffer, /* data buffer */
  66                 char **start,      /* where data in buffer starts */
  67                 off_t offset,      /* offset from start of imaginary file */
  68                 int length,        /* length of data in buffer */
  69                 int func);         /* 0 == read, 1 == write */
  70
  71 static int cciss_scsi_queue_command (struct scsi_cmnd *cmd,
  72                 void (* done)(struct scsi_cmnd *));
  73 static int cciss_eh_device_reset_handler(struct scsi_cmnd *);
  74 static int cciss_eh_abort_handler(struct scsi_cmnd *);
  75
  76 static struct cciss_scsi_hba_t ccissscsi[MAX_CTLR] = {
  77         { .name = "cciss0", .ndevices = 0 },
  78         { .name = "cciss1", .ndevices = 0 },
  79         { .name = "cciss2", .ndevices = 0 },
  80         { .name = "cciss3", .ndevices = 0 },
  81         { .name = "cciss4", .ndevices = 0 },
  82         { .name = "cciss5", .ndevices = 0 },
  83         { .name = "cciss6", .ndevices = 0 },
  84         { .name = "cciss7", .ndevices = 0 },
  85 };
  86
  87 static struct scsi_host_template cciss_driver_template = {
  88         .module                 = THIS_MODULE,
  89         .name                   = "cciss",
  90         .proc_name              = "cciss",
  91         .proc_info              = cciss_scsi_proc_info,
  92         .queuecommand           = cciss_scsi_queue_command,
  93         .can_queue              = SCSI_CCISS_CAN_QUEUE,
  94         .this_id                = 7,
  95         .sg_tablesize           = MAXSGENTRIES,
  96         .cmd_per_lun            = 1,
  97         .use_clustering         = DISABLE_CLUSTERING,
  98         /* Can't have eh_bus_reset_handler or eh_host_reset_handler for cciss */
  99         .eh_device_reset_handler= cciss_eh_device_reset_handler,
 100         .eh_abort_handler       = cciss_eh_abort_handler,
 101 };
 102
 103 #pragma pack(1)
 104 struct cciss_scsi_cmd_stack_elem_t {
 105         CommandList_struct cmd;
 106         ErrorInfo_struct Err;
 107         __u32 busaddr;
 108         __u32 pad;
 109 };
 110
 111 #pragma pack()
 112
 113 #define CMD_STACK_SIZE (SCSI_CCISS_CAN_QUEUE * \
 114                 CCISS_MAX_SCSI_DEVS_PER_HBA + 2)
 115                         // plus two for init time usage
 116
 117 #pragma pack(1)
 118 struct cciss_scsi_cmd_stack_t {
 119         struct cciss_scsi_cmd_stack_elem_t *pool;
 120         struct cciss_scsi_cmd_stack_elem_t *elem[CMD_STACK_SIZE];
 121         dma_addr_t cmd_pool_handle;
 122         int top;
 123 };
 124 #pragma pack()
 125
 126 struct cciss_scsi_adapter_data_t {
 127         struct Scsi_Host *scsi_host;
 128         struct cciss_scsi_cmd_stack_t cmd_stack;
 129         int registered;
 130         spinlock_t lock; // to protect ccissscsi[ctlr];
 131 };
 132
 133 #define CPQ_TAPE_LOCK(ctlr, flags) spin_lock_irqsave( \
 134         &(((struct cciss_scsi_adapter_data_t *) \
 135         hba[ctlr]->scsi_ctlr)->lock), flags);
 136 #define CPQ_TAPE_UNLOCK(ctlr, flags) spin_unlock_irqrestore( \
 137         &(((struct cciss_scsi_adapter_data_t *) \
 138         hba[ctlr]->scsi_ctlr)->lock), flags);
 139
 140 static CommandList_struct *
 141 scsi_cmd_alloc(ctlr_info_t *h)
 142 {
 143         /* assume only one process in here at a time, locking done by caller. */
 144         /* use CCISS_LOCK(ctlr) */
 145         /* might be better to rewrite how we allocate scsi commands in a way that */
 146         /* needs no locking at all. */
 147
 148         /* take the top memory chunk off the stack and return it, if any. */
 149         struct cciss_scsi_cmd_stack_elem_t *c;
 150         struct cciss_scsi_adapter_data_t *sa;
 151         struct cciss_scsi_cmd_stack_t *stk;
 152         u64bit temp64;
 153
 154         sa = (struct cciss_scsi_adapter_data_t *) h->scsi_ctlr;
 155         stk = &sa->cmd_stack;
 156
 157         if (stk->top < 0)
 158                 return NULL;
 159         c = stk->elem[stk->top];
 160         /* memset(c, 0, sizeof(*c)); */
 161         memset(&c->cmd, 0, sizeof(c->cmd));
 162         memset(&c->Err, 0, sizeof(c->Err));
 163         /* set physical addr of cmd and addr of scsi parameters */
 164         c->cmd.busaddr = c->busaddr;
 165         /* (__u32) (stk->cmd_pool_handle +
 166                 (sizeof(struct cciss_scsi_cmd_stack_elem_t)*stk->top)); */
 167
 168         temp64.val = (__u64) (c->busaddr + sizeof(CommandList_struct));
 169         /* (__u64) (stk->cmd_pool_handle +
 170                 (sizeof(struct cciss_scsi_cmd_stack_elem_t)*stk->top) +
 171                  sizeof(CommandList_struct)); */
 172         stk->top--;
 173         c->cmd.ErrDesc.Addr.lower = temp64.val32.lower;
 174         c->cmd.ErrDesc.Addr.upper = temp64.val32.upper;
 175         c->cmd.ErrDesc.Len = sizeof(ErrorInfo_struct);
 176
 177         c->cmd.ctlr = h->ctlr;
 178         c->cmd.err_info = &c->Err;
 179
 180         return (CommandList_struct *) c;
 181 }
 182
 183 static void
 184 scsi_cmd_free(ctlr_info_t *h, CommandList_struct *cmd)
 185 {
 186         /* assume only one process in here at a time, locking done by caller. */
 187         /* use CCISS_LOCK(ctlr) */
 188         /* drop the free memory chunk on top of the stack. */
 189
 190         struct cciss_scsi_adapter_data_t *sa;
 191         struct cciss_scsi_cmd_stack_t *stk;
 192
 193         sa = (struct cciss_scsi_adapter_data_t *) h->scsi_ctlr;
 194         stk = &sa->cmd_stack;
 195         if (stk->top >= CMD_STACK_SIZE) {
 196                 printk("cciss: scsi_cmd_free called too many times.\n");
 197                 BUG();
 198         }
 199         stk->top++;
 200         stk->elem[stk->top] = (struct cciss_scsi_cmd_stack_elem_t *) cmd;
 201 }
 202
 203 static int
 204 scsi_cmd_stack_setup(int ctlr, struct cciss_scsi_adapter_data_t *sa)
 205 {
 206         int i;
 207         struct cciss_scsi_cmd_stack_t *stk;
 208         size_t size;
 209
 210         stk = &sa->cmd_stack;
 211         size = sizeof(struct cciss_scsi_cmd_stack_elem_t) * CMD_STACK_SIZE;
 212
 213         // pci_alloc_consistent guarantees 32-bit DMA address will
 214         // be used
 215
 216         stk->pool = (struct cciss_scsi_cmd_stack_elem_t *)
 217                 pci_alloc_consistent(hba[ctlr]->pdev, size, &stk->cmd_pool_handle);
 218
 219         if (stk->pool == NULL) {
 220                 printk("stk->pool is null\n");
 221                 return -1;
 222         }
 223
 224         for (i=0; i<CMD_STACK_SIZE; i++) {
 225                 stk->elem[i] = &stk->pool[i];
 226                 stk->elem[i]->busaddr = (__u32) (stk->cmd_pool_handle +
 227                         (sizeof(struct cciss_scsi_cmd_stack_elem_t) * i));
 228         }
 229         stk->top = CMD_STACK_SIZE-1;
 230         return 0;
 231 }
 232
 233 static void
 234 scsi_cmd_stack_free(int ctlr)
 235 {
 236         struct cciss_scsi_adapter_data_t *sa;
 237         struct cciss_scsi_cmd_stack_t *stk;
 238         size_t size;
 239
 240         sa = (struct cciss_scsi_adapter_data_t *) hba[ctlr]->scsi_ctlr;
 241         stk = &sa->cmd_stack;
 242         if (stk->top != CMD_STACK_SIZE-1) {
 243                 printk( "cciss: %d scsi commands are still outstanding.\n",
 244                         CMD_STACK_SIZE - stk->top);
 245                 // BUG();
 246                 printk("WE HAVE A BUG HERE!!! stk=0x%p\n", stk);
 247         }
 248         size = sizeof(struct cciss_scsi_cmd_stack_elem_t) * CMD_STACK_SIZE;
 249
 250         pci_free_consistent(hba[ctlr]->pdev, size, stk->pool, stk->cmd_pool_handle);
 251         stk->pool = NULL;
 252 }
 253
 254 /* scsi_device_types comes from scsi.h */
 255 #define DEVICETYPE(n) (n<0 || n>MAX_SCSI_DEVICE_CODE) ? \
 256         "Unknown" : scsi_device_types[n]
 257
 258 #if 0
 259 static int xmargin=8;
 260 static int amargin=60;
 261
 262 static void
 263 print_bytes (unsigned char *c, int len, int hex, int ascii)
 264 {
 265
 266         int i;
 267         unsigned char *x;
 268
 269         if (hex)
 270         {
 271                 x = c;
 272                 for (i=0;i<len;i++)
 273                 {
 274                         if ((i % xmargin) == 0 && i>0) printk("\n");
 275                         if ((i % xmargin) == 0) printk("0x%04x:", i);
 276                         printk(" %02x", *x);
 277                         x++;
 278                 }
 279                 printk("\n");
 280         }
 281         if (ascii)
 282         {
 283                 x = c;
 284                 for (i=0;i<len;i++)
 285                 {
 286                         if ((i % amargin) == 0 && i>0) printk("\n");
 287                         if ((i % amargin) == 0) printk("0x%04x:", i);
 288                         if (*x > 26 && *x < 128) printk("%c", *x);
 289                         else printk(".");
 290                         x++;
 291                 }
 292                 printk("\n");
 293         }
 294 }
 295
 296 static void
 297 print_cmd(CommandList_struct *cp)
 298 {
 299         printk("queue:%d\n", cp->Header.ReplyQueue);
 300         printk("sglist:%d\n", cp->Header.SGList);
 301         printk("sgtot:%d\n", cp->Header.SGTotal);
 302         printk("Tag:0x%08x/0x%08x\n", cp->Header.Tag.upper,
 303                         cp->Header.Tag.lower);
 304         printk("LUN:0x%02x%02x%02x%02x%02x%02x%02x%02x\n",
 305                 cp->Header.LUN.LunAddrBytes[0],
 306                 cp->Header.LUN.LunAddrBytes[1],
 307                 cp->Header.LUN.LunAddrBytes[2],
 308                 cp->Header.LUN.LunAddrBytes[3],
 309                 cp->Header.LUN.LunAddrBytes[4],
 310                 cp->Header.LUN.LunAddrBytes[5],
 311                 cp->Header.LUN.LunAddrBytes[6],
 312                 cp->Header.LUN.LunAddrBytes[7]);
 313         printk("CDBLen:%d\n", cp->Request.CDBLen);
 314         printk("Type:%d\n",cp->Request.Type.Type);
 315         printk("Attr:%d\n",cp->Request.Type.Attribute);
 316         printk(" Dir:%d\n",cp->Request.Type.Direction);
 317         printk("Timeout:%d\n",cp->Request.Timeout);
 318         printk( "CDB: %02x %02x %02x %02x %02x %02x %02x %02x"
 319                 " %02x %02x %02x %02x %02x %02x %02x %02x\n",
 320                 cp->Request.CDB[0], cp->Request.CDB[1],
 321                 cp->Request.CDB[2], cp->Request.CDB[3],
 322                 cp->Request.CDB[4], cp->Request.CDB[5],
 323                 cp->Request.CDB[6], cp->Request.CDB[7],
 324                 cp->Request.CDB[8], cp->Request.CDB[9],
 325                 cp->Request.CDB[10], cp->Request.CDB[11],
 326                 cp->Request.CDB[12], cp->Request.CDB[13],
 327                 cp->Request.CDB[14], cp->Request.CDB[15]),
 328         printk("edesc.Addr: 0x%08x/0%08x, Len  = %d\n",
 329                 cp->ErrDesc.Addr.upper, cp->ErrDesc.Addr.lower,
 330                         cp->ErrDesc.Len);
 331         printk("sgs..........Errorinfo:\n");
 332         printk("scsistatus:%d\n", cp->err_info->ScsiStatus);
 333         printk("senselen:%d\n", cp->err_info->SenseLen);
 334         printk("cmd status:%d\n", cp->err_info->CommandStatus);
 335         printk("resid cnt:%d\n", cp->err_info->ResidualCnt);
 336         printk("offense size:%d\n", cp->err_info->MoreErrInfo.Invalid_Cmd.offense_size);
 337         printk("offense byte:%d\n", cp->err_info->MoreErrInfo.Invalid_Cmd.offense_num);
 338         printk("offense value:%d\n", cp->err_info->MoreErrInfo.Invalid_Cmd.offense_value);
 339
 340 }
 341
 342 #endif
 343
 344 static int
 345 find_bus_target_lun(int ctlr, int *bus, int *target, int *lun)
 346 {
 347         /* finds an unused bus, target, lun for a new device */
 348         /* assumes hba[ctlr]->scsi_ctlr->lock is held */
 349         int i, found=0;
 350         unsigned char target_taken[CCISS_MAX_SCSI_DEVS_PER_HBA];
 351
 352         memset(&target_taken[0], 0, CCISS_MAX_SCSI_DEVS_PER_HBA);
 353
 354         target_taken[SELF_SCSI_ID] = 1;
 355         for (i=0;i<ccissscsi[ctlr].ndevices;i++)
 356                 target_taken[ccissscsi[ctlr].dev[i].target] = 1;
 357
 358         for (i=0;i<CCISS_MAX_SCSI_DEVS_PER_HBA;i++) {
 359                 if (!target_taken[i]) {
 360                         *bus = 0; *target=i; *lun = 0; found=1;
 361                         break;
 362                 }
 363         }
 364         return (!found);
 365 }
 366
 367 static int
 368 cciss_scsi_add_entry(int ctlr, int hostno,
 369                 unsigned char *scsi3addr, int devtype)
 370 {
 371         /* assumes hba[ctlr]->scsi_ctlr->lock is held */
 372         int n = ccissscsi[ctlr].ndevices;
 373         struct cciss_scsi_dev_t *sd;
 374
 375         if (n >= CCISS_MAX_SCSI_DEVS_PER_HBA) {
 376                 printk("cciss%d: Too many devices, "
 377                         "some will be inaccessible.\n", ctlr);
 378                 return -1;
 379         }
 380         sd = &ccissscsi[ctlr].dev[n];
 381         if (find_bus_target_lun(ctlr, &sd->bus, &sd->target, &sd->lun) != 0)
 382                 return -1;
 383         memcpy(&sd->scsi3addr[0], scsi3addr, 8);
 384         sd->devtype = devtype;
 385         ccissscsi[ctlr].ndevices++;
 386
 387         /* initially, (before registering with scsi layer) we don't
 388            know our hostno and we don't want to print anything first
 389            time anyway (the scsi layer's inquiries will show that info) */
 390         if (hostno != -1)
 391                 printk("cciss%d: %s device c%db%dt%dl%d added.\n",
 392                         ctlr, DEVICETYPE(sd->devtype), hostno,
 393                         sd->bus, sd->target, sd->lun);
 394         return 0;
 395 }
 396
 397 static void
 398 cciss_scsi_remove_entry(int ctlr, int hostno, int entry)
 399 {
 400         /* assumes hba[ctlr]->scsi_ctlr->lock is held */
 401         int i;
 402         struct cciss_scsi_dev_t sd;
 403
 404         if (entry < 0 || entry >= CCISS_MAX_SCSI_DEVS_PER_HBA) return;
 405         sd = ccissscsi[ctlr].dev[entry];
 406         for (i=entry;i<ccissscsi[ctlr].ndevices-1;i++)
 407                 ccissscsi[ctlr].dev[i] = ccissscsi[ctlr].dev[i+1];
 408         ccissscsi[ctlr].ndevices--;
 409         printk("cciss%d: %s device c%db%dt%dl%d removed.\n",
 410                 ctlr, DEVICETYPE(sd.devtype), hostno,
 411                         sd.bus, sd.target, sd.lun);
 412 }
 413
 414
 415 #define SCSI3ADDR_EQ(a,b) ( \
 416         (a)[7] == (b)[7] && \
 417         (a)[6] == (b)[6] && \
 418         (a)[5] == (b)[5] && \
 419         (a)[4] == (b)[4] && \
 420         (a)[3] == (b)[3] && \
 421         (a)[2] == (b)[2] && \
 422         (a)[1] == (b)[1] && \
 423         (a)[0] == (b)[0])
 424
 425 static int
 426 adjust_cciss_scsi_table(int ctlr, int hostno,
 427         struct cciss_scsi_dev_t sd[], int nsds)
 428 {
 429         /* sd contains scsi3 addresses and devtypes, but
 430            bus target and lun are not filled in.  This funciton
 431            takes what's in sd to be the current and adjusts
 432            ccissscsi[] to be in line with what's in sd. */
 433
 434         int i,j, found, changes=0;
 435         struct cciss_scsi_dev_t *csd;
 436         unsigned long flags;
 437
 438         CPQ_TAPE_LOCK(ctlr, flags);
 439
 440         /* find any devices in ccissscsi[] that are not in
 441            sd[] and remove them from ccissscsi[] */
 442
 443         i = 0;
 444         while(i<ccissscsi[ctlr].ndevices) {
 445                 csd = &ccissscsi[ctlr].dev[i];
 446                 found=0;
 447                 for (j=0;j<nsds;j++) {
 448                         if (SCSI3ADDR_EQ(sd[j].scsi3addr,
 449                                 csd->scsi3addr)) {
 450                                 if (sd[j].devtype == csd->devtype)
 451                                         found=2;
 452                                 else
 453                                         found=1;
 454                                 break;
 455                         }
 456                 }
 457
 458                 if (found == 0) { /* device no longer present. */
 459                         changes++;
 460                         /* printk("cciss%d: %s device c%db%dt%dl%d removed.\n",
 461                                 ctlr, DEVICETYPE(csd->devtype), hostno,
 462                                         csd->bus, csd->target, csd->lun); */
 463                         cciss_scsi_remove_entry(ctlr, hostno, i);
 464                         /* note, i not incremented */
 465                 }
 466                 else if (found == 1) { /* device is different kind */
 467                         changes++;
 468                         printk("cciss%d: device c%db%dt%dl%d type changed "
 469                                 "(device type now %s).\n",
 470                                 ctlr, hostno, csd->bus, csd->target, csd->lun,
 471                                         DEVICETYPE(csd->devtype));
 472                         csd->devtype = sd[j].devtype;
 473                         i++;    /* so just move along. */
 474                 } else          /* device is same as it ever was, */
 475                         i++;    /* so just move along. */
 476         }
 477
 478         /* Now, make sure every device listed in sd[] is also
 479            listed in ccissscsi[], adding them if they aren't found */
 480
 481         for (i=0;i<nsds;i++) {
 482                 found=0;
 483                 for (j=0;j<ccissscsi[ctlr].ndevices;j++) {
 484                         csd = &ccissscsi[ctlr].dev[j];
 485                         if (SCSI3ADDR_EQ(sd[i].scsi3addr,
 486                                 csd->scsi3addr)) {
 487                                 if (sd[i].devtype == csd->devtype)
 488                                         found=2;        /* found device */
 489                                 else
 490                                         found=1;        /* found a bug. */
 491                                 break;
 492                         }
 493                 }
 494                 if (!found) {
 495                         changes++;
 496                         if (cciss_scsi_add_entry(ctlr, hostno,
 497                                 &sd[i].scsi3addr[0], sd[i].devtype) != 0)
 498                                 break;
 499                 } else if (found == 1) {
 500                         /* should never happen... */
 501                         changes++;
 502                         printk("cciss%d: device unexpectedly changed type\n",
 503                                 ctlr);
 504                         /* but if it does happen, we just ignore that device */
 505                 }
 506         }
 507         CPQ_TAPE_UNLOCK(ctlr, flags);
 508
 509         if (!changes)
 510                 printk("cciss%d: No device changes detected.\n", ctlr);
 511
 512         return 0;
 513 }
 514
 515 static int
 516 lookup_scsi3addr(int ctlr, int bus, int target, int lun, char *scsi3addr)
 517 {
 518         int i;
 519         struct cciss_scsi_dev_t *sd;
 520         unsigned long flags;
 521
 522         CPQ_TAPE_LOCK(ctlr, flags);
 523         for (i=0;i<ccissscsi[ctlr].ndevices;i++) {
 524                 sd = &ccissscsi[ctlr].dev[i];
 525                 if (sd->bus == bus &&
 526                     sd->target == target &&
 527                     sd->lun == lun) {
 528                         memcpy(scsi3addr, &sd->scsi3addr[0], 8);
 529                         CPQ_TAPE_UNLOCK(ctlr, flags);
 530                         return 0;
 531                 }
 532         }
 533         CPQ_TAPE_UNLOCK(ctlr, flags);
 534         return -1;
 535 }
 536
 537 static void
 538 cciss_scsi_setup(int cntl_num)
 539 {
 540         struct cciss_scsi_adapter_data_t * shba;
 541
 542         ccissscsi[cntl_num].ndevices = 0;
 543         shba = (struct cciss_scsi_adapter_data_t *)
 544                 kmalloc(sizeof(*shba), GFP_KERNEL);
 545         if (shba == NULL)
 546                 return;
 547         shba->scsi_host = NULL;
 548         spin_lock_init(&shba->lock);
 549         shba->registered = 0;
 550         if (scsi_cmd_stack_setup(cntl_num, shba) != 0) {
 551                 kfree(shba);
 552                 shba = NULL;
 553         }
 554         hba[cntl_num]->scsi_ctlr = (void *) shba;
 555         return;
 556 }
 557
 558 static void
 559 complete_scsi_command( CommandList_struct *cp, int timeout, __u32 tag)
 560 {
 561         struct scsi_cmnd *cmd;
 562         ctlr_info_t *ctlr;
 563         u64bit addr64;
 564         ErrorInfo_struct *ei;
 565
 566         ei = cp->err_info;
 567
 568         /* First, see if it was a message rather than a command */
 569         if (cp->Request.Type.Type == TYPE_MSG)  {
 570                 cp->cmd_type = CMD_MSG_DONE;
 571                 return;
 572         }
 573
 574         cmd = (struct scsi_cmnd *) cp->scsi_cmd;
 575         ctlr = hba[cp->ctlr];
 576
 577         /* undo the DMA mappings */
 578
 579         if (cmd->use_sg) {
 580                 pci_unmap_sg(ctlr->pdev,
 581                         cmd->buffer, cmd->use_sg,
 582                                 cmd->sc_data_direction);
 583         }
 584         else if (cmd->request_bufflen) {
 585                 addr64.val32.lower = cp->SG[0].Addr.lower;
 586                 addr64.val32.upper = cp->SG[0].Addr.upper;
 587                 pci_unmap_single(ctlr->pdev, (dma_addr_t) addr64.val,
 588                         cmd->request_bufflen,
 589                                 cmd->sc_data_direction);
 590         }
 591
 592         cmd->result = (DID_OK << 16);           /* host byte */
 593         cmd->result |= (COMMAND_COMPLETE << 8); /* msg byte */
 594         /* cmd->result |= (GOOD < 1); */                /* status byte */
 595
 596         cmd->result |= (ei->ScsiStatus);
 597         /* printk("Scsistatus is 0x%02x\n", ei->ScsiStatus);  */
 598
 599         /* copy the sense data whether we need to or not. */
 600
 601         memcpy(cmd->sense_buffer, ei->SenseInfo,
 602                 ei->SenseLen > SCSI_SENSE_BUFFERSIZE ?
 603                         SCSI_SENSE_BUFFERSIZE :
 604                         ei->SenseLen);
 605         cmd->resid = ei->ResidualCnt;
 606
 607         if(ei->CommandStatus != 0)
 608         { /* an error has occurred */
 609                 switch(ei->CommandStatus)
 610                 {
 611                         case CMD_TARGET_STATUS:
 612                                 /* Pass it up to the upper layers... */
 613                                 if( ei->ScsiStatus)
 614                                 {
 615 #if 0
 616                                         printk(KERN_WARNING "cciss: cmd %p "
 617                                         "has SCSI Status = %x\n",
 618                                                 cp,
 619                                                 ei->ScsiStatus);
 620 #endif
 621                                         cmd->result |= (ei->ScsiStatus < 1);
 622                                 }
 623                                 else {  /* scsi status is zero??? How??? */
 624
 625         /* Ordinarily, this case should never happen, but there is a bug
 626            in some released firmware revisions that allows it to happen
 627            if, for example, a 4100 backplane loses power and the tape
 628            drive is in it.  We assume that it's a fatal error of some
 629            kind because we can't show that it wasn't. We will make it
 630            look like selection timeout since that is the most common
 631            reason for this to occur, and it's severe enough. */
 632
 633                                         cmd->result = DID_NO_CONNECT << 16;
 634                                 }
 635                         break;
 636                         case CMD_DATA_UNDERRUN: /* let mid layer handle it. */
 637                         break;
 638                         case CMD_DATA_OVERRUN:
 639                                 printk(KERN_WARNING "cciss: cp %p has"
 640                                         " completed with data overrun "
 641                                         "reported\n", cp);
 642                         break;
 643                         case CMD_INVALID: {
 644                                 /* print_bytes(cp, sizeof(*cp), 1, 0);
 645                                 print_cmd(cp); */
 646      /* We get CMD_INVALID if you address a non-existent tape drive instead
 647         of a selection timeout (no response).  You will see this if you yank
 648         out a tape drive, then try to access it. This is kind of a shame
 649         because it means that any other CMD_INVALID (e.g. driver bug) will
 650         get interpreted as a missing target. */
 651                                 cmd->result = DID_NO_CONNECT << 16;
 652                                 }
 653                         break;
 654                         case CMD_PROTOCOL_ERR:
 655                                 printk(KERN_WARNING "cciss: cp %p has "
 656                                         "protocol error \n", cp);
 657                         break;
 658                         case CMD_HARDWARE_ERR:
 659                                 cmd->result = DID_ERROR << 16;
 660                                 printk(KERN_WARNING "cciss: cp %p had "
 661                                         " hardware error\n", cp);
 662                         break;
 663                         case CMD_CONNECTION_LOST:
 664                                 cmd->result = DID_ERROR << 16;
 665                                 printk(KERN_WARNING "cciss: cp %p had "
 666                                         "connection lost\n", cp);
 667                         break;
 668                         case CMD_ABORTED:
 669                                 cmd->result = DID_ABORT << 16;
 670                                 printk(KERN_WARNING "cciss: cp %p was "
 671                                         "aborted\n", cp);
 672                         break;
 673                         case CMD_ABORT_FAILED:
 674                                 cmd->result = DID_ERROR << 16;
 675                                 printk(KERN_WARNING "cciss: cp %p reports "
 676                                         "abort failed\n", cp);
 677                         break;
 678                         case CMD_UNSOLICITED_ABORT:
 679                                 cmd->result = DID_ABORT << 16;
 680                                 printk(KERN_WARNING "cciss: cp %p aborted "
 681                                         "do to an unsolicited abort\n", cp);
 682                         break;
 683                         case CMD_TIMEOUT:
 684                                 cmd->result = DID_TIME_OUT << 16;
 685                                 printk(KERN_WARNING "cciss: cp %p timedout\n",
 686                                         cp);
 687                         break;
 688                         default:
 689                                 cmd->result = DID_ERROR << 16;
 690                                 printk(KERN_WARNING "cciss: cp %p returned "
 691                                         "unknown status %x\n", cp,
 692                                                 ei->CommandStatus);
 693                 }
 694         }
 695         // printk("c:%p:c%db%dt%dl%d ", cmd, ctlr->ctlr, cmd->channel,
 696         //      cmd->target, cmd->lun);
 697         cmd->scsi_done(cmd);
 698         scsi_cmd_free(ctlr, cp);
 699 }
 700
 701 static int
 702 cciss_scsi_detect(int ctlr)
 703 {
 704         struct Scsi_Host *sh;
 705         int error;
 706
 707         sh = scsi_host_alloc(&cciss_driver_template, sizeof(struct ctlr_info *));
 708         if (sh == NULL)
 709                 goto fail;
 710         sh->io_port = 0;        // good enough?  FIXME,
 711         sh->n_io_port = 0;      // I don't think we use these two...
 712         sh->this_id = SELF_SCSI_ID;
 713
 714         ((struct cciss_scsi_adapter_data_t *)
 715                 hba[ctlr]->scsi_ctlr)->scsi_host = (void *) sh;
 716         sh->hostdata[0] = (unsigned long) hba[ctlr];
 717         sh->irq = hba[ctlr]->intr[SIMPLE_MODE_INT];
 718         sh->unique_id = sh->irq;
 719         error = scsi_add_host(sh, &hba[ctlr]->pdev->dev);
 720         if (error)
 721                 goto fail_host_put;
 722         scsi_scan_host(sh);
 723         return 1;
 724
 725  fail_host_put:
 726         scsi_host_put(sh);
 727  fail:
 728         return 0;
 729 }
 730
 731 static void
 732 cciss_unmap_one(struct pci_dev *pdev,
 733                 CommandList_struct *cp,
 734                 size_t buflen,
 735                 int data_direction)
 736 {
 737         u64bit addr64;
 738
 739         addr64.val32.lower = cp->SG[0].Addr.lower;
 740         addr64.val32.upper = cp->SG[0].Addr.upper;
 741         pci_unmap_single(pdev, (dma_addr_t) addr64.val, buflen, data_direction);
 742 }
 743
 744 static void
 745 cciss_map_one(struct pci_dev *pdev,
 746                 CommandList_struct *cp,
 747                 unsigned char *buf,
 748                 size_t buflen,
 749                 int data_direction)
 750 {
 751         __u64 addr64;
 752
 753         addr64 = (__u64) pci_map_single(pdev, buf, buflen, data_direction);
 754         cp->SG[0].Addr.lower =
 755           (__u32) (addr64 & (__u64) 0x00000000FFFFFFFF);
 756         cp->SG[0].Addr.upper =
 757           (__u32) ((addr64 >> 32) & (__u64) 0x00000000FFFFFFFF);
 758         cp->SG[0].Len = buflen;
 759         cp->Header.SGList = (__u8) 1;   /* no. SGs contig in this cmd */
 760         cp->Header.SGTotal = (__u16) 1; /* total sgs in this cmd list */
 761 }
 762
 763 static int
 764 cciss_scsi_do_simple_cmd(ctlr_info_t *c,
 765                         CommandList_struct *cp,
 766                         unsigned char *scsi3addr,
 767                         unsigned char *cdb,
 768                         unsigned char cdblen,
 769                         unsigned char *buf, int bufsize,
 770                         int direction)
 771 {
 772         unsigned long flags;
 773         DECLARE_COMPLETION(wait);
 774
 775         cp->cmd_type = CMD_IOCTL_PEND;          // treat this like an ioctl
 776         cp->scsi_cmd = NULL;
 777         cp->Header.ReplyQueue = 0;  // unused in simple mode
 778         memcpy(&cp->Header.LUN, scsi3addr, sizeof(cp->Header.LUN));
 779         cp->Header.Tag.lower = cp->busaddr;  // Use k. address of cmd as tag
 780         // Fill in the request block...
 781
 782         /* printk("Using scsi3addr 0x%02x%0x2%0x2%0x2%0x2%0x2%0x2%0x2\n",
 783                 scsi3addr[0], scsi3addr[1], scsi3addr[2], scsi3addr[3],
 784                 scsi3addr[4], scsi3addr[5], scsi3addr[6], scsi3addr[7]); */
 785
 786         memset(cp->Request.CDB, 0, sizeof(cp->Request.CDB));
 787         memcpy(cp->Request.CDB, cdb, cdblen);
 788         cp->Request.Timeout = 0;
 789         cp->Request.CDBLen = cdblen;
 790         cp->Request.Type.Type = TYPE_CMD;
 791         cp->Request.Type.Attribute = ATTR_SIMPLE;
 792         cp->Request.Type.Direction = direction;
 793
 794         /* Fill in the SG list and do dma mapping */
 795         cciss_map_one(c->pdev, cp, (unsigned char *) buf,
 796                         bufsize, DMA_FROM_DEVICE);
 797
 798         cp->waiting = &wait;
 799
 800         /* Put the request on the tail of the request queue */
 801         spin_lock_irqsave(CCISS_LOCK(c->ctlr), flags);
 802         addQ(&c->reqQ, cp);
 803         c->Qdepth++;
 804         start_io(c);
 805         spin_unlock_irqrestore(CCISS_LOCK(c->ctlr), flags);
 806
 807         wait_for_completion(&wait);
 808
 809         /* undo the dma mapping */
 810         cciss_unmap_one(c->pdev, cp, bufsize, DMA_FROM_DEVICE);
 811         return(0);
 812 }
 813
 814 static void
 815 cciss_scsi_interpret_error(CommandList_struct *cp)
 816 {
 817         ErrorInfo_struct *ei;
 818
 819         ei = cp->err_info;
 820         switch(ei->CommandStatus)
 821         {
 822                 case CMD_TARGET_STATUS:
 823                         printk(KERN_WARNING "cciss: cmd %p has "
 824                                 "completed with errors\n", cp);
 825                         printk(KERN_WARNING "cciss: cmd %p "
 826                                 "has SCSI Status = %x\n",
 827                                         cp,
 828                                         ei->ScsiStatus);
 829                         if (ei->ScsiStatus == 0)
 830                                 printk(KERN_WARNING
 831                                 "cciss:SCSI status is abnormally zero.  "
 832                                 "(probably indicates selection timeout "
 833                                 "reported incorrectly due to a known "
 834                                 "firmware bug, circa July, 2001.)\n");
 835                 break;
 836                 case CMD_DATA_UNDERRUN: /* let mid layer handle it. */
 837                         printk("UNDERRUN\n");
 838                 break;
 839                 case CMD_DATA_OVERRUN:
 840                         printk(KERN_WARNING "cciss: cp %p has"
 841                                 " completed with data overrun "
 842                                 "reported\n", cp);
 843                 break;
 844                 case CMD_INVALID: {
 845                         /* controller unfortunately reports SCSI passthru's */
 846                         /* to non-existent targets as invalid commands. */
 847                         printk(KERN_WARNING "cciss: cp %p is "
 848                                 "reported invalid (probably means "
 849                                 "target device no longer present)\n",
 850                                 cp);
 851                         /* print_bytes((unsigned char *) cp, sizeof(*cp), 1, 0);
 852                         print_cmd(cp);  */
 853                         }
 854                 break;
 855                 case CMD_PROTOCOL_ERR:
 856                         printk(KERN_WARNING "cciss: cp %p has "
 857                                 "protocol error \n", cp);
 858                 break;
 859                 case CMD_HARDWARE_ERR:
 860                         /* cmd->result = DID_ERROR << 16; */
 861                         printk(KERN_WARNING "cciss: cp %p had "
 862                                 " hardware error\n", cp);
 863                 break;
 864                 case CMD_CONNECTION_LOST:
 865                         printk(KERN_WARNING "cciss: cp %p had "
 866                                 "connection lost\n", cp);
 867                 break;
 868                 case CMD_ABORTED:
 869                         printk(KERN_WARNING "cciss: cp %p was "
 870                                 "aborted\n", cp);
 871                 break;
 872                 case CMD_ABORT_FAILED:
 873                         printk(KERN_WARNING "cciss: cp %p reports "
 874                                 "abort failed\n", cp);
 875                 break;
 876                 case CMD_UNSOLICITED_ABORT:
 877                         printk(KERN_WARNING "cciss: cp %p aborted "
 878                                 "do to an unsolicited abort\n", cp);
 879                 break;
 880                 case CMD_TIMEOUT:
 881                         printk(KERN_WARNING "cciss: cp %p timedout\n",
 882                                 cp);
 883                 break;
 884                 default:
 885                         printk(KERN_WARNING "cciss: cp %p returned "
 886                                 "unknown status %x\n", cp,
 887                                         ei->CommandStatus);
 888         }
 889 }
 890
 891 static int
 892 cciss_scsi_do_inquiry(ctlr_info_t *c, unsigned char *scsi3addr,
 893                  unsigned char *buf, unsigned char bufsize)
 894 {
 895         int rc;
 896         CommandList_struct *cp;
 897         char cdb[6];
 898         ErrorInfo_struct *ei;
 899         unsigned long flags;
 900
 901         spin_lock_irqsave(CCISS_LOCK(c->ctlr), flags);
 902         cp = scsi_cmd_alloc(c);
 903         spin_unlock_irqrestore(CCISS_LOCK(c->ctlr), flags);
 904
 905         if (cp == NULL) {                       /* trouble... */
 906                 printk("cmd_alloc returned NULL!\n");
 907                 return -1;
 908         }
 909
 910         ei = cp->err_info;
 911
 912         cdb[0] = CISS_INQUIRY;
 913         cdb[1] = 0;
 914         cdb[2] = 0;
 915         cdb[3] = 0;
 916         cdb[4] = bufsize;
 917         cdb[5] = 0;
 918         rc = cciss_scsi_do_simple_cmd(c, cp, scsi3addr, cdb,
 919                                 6, buf, bufsize, XFER_READ);
 920
 921         if (rc != 0) return rc; /* something went wrong */
 922
 923         if (ei->CommandStatus != 0 &&
 924             ei->CommandStatus != CMD_DATA_UNDERRUN) {
 925                 cciss_scsi_interpret_error(cp);
 926                 rc = -1;
 927         }
 928         spin_lock_irqsave(CCISS_LOCK(c->ctlr), flags);
 929         scsi_cmd_free(c, cp);
 930         spin_unlock_irqrestore(CCISS_LOCK(c->ctlr), flags);
 931         return rc;
 932 }
 933
 934 static int
 935 cciss_scsi_do_report_phys_luns(ctlr_info_t *c,
 936                 ReportLunData_struct *buf, int bufsize)
 937 {
 938         int rc;
 939         CommandList_struct *cp;
 940         unsigned char cdb[12];
 941         unsigned char scsi3addr[8];
 942         ErrorInfo_struct *ei;
 943         unsigned long flags;
 944
 945         spin_lock_irqsave(CCISS_LOCK(c->ctlr), flags);
 946         cp = scsi_cmd_alloc(c);
 947         spin_unlock_irqrestore(CCISS_LOCK(c->ctlr), flags);
 948         if (cp == NULL) {                       /* trouble... */
 949                 printk("cmd_alloc returned NULL!\n");
 950                 return -1;
 951         }
 952
 953         memset(&scsi3addr[0], 0, 8); /* address the controller */
 954         cdb[0] = CISS_REPORT_PHYS;
 955         cdb[1] = 0;
 956         cdb[2] = 0;
 957         cdb[3] = 0;
 958         cdb[4] = 0;
 959         cdb[5] = 0;
 960         cdb[6] = (bufsize >> 24) & 0xFF;  //MSB
 961         cdb[7] = (bufsize >> 16) & 0xFF;
 962         cdb[8] = (bufsize >> 8) & 0xFF;
 963         cdb[9] = bufsize & 0xFF;
 964         cdb[10] = 0;
 965         cdb[11] = 0;
 966
 967         rc = cciss_scsi_do_simple_cmd(c, cp, scsi3addr,
 968                                 cdb, 12,
 969                                 (unsigned char *) buf,
 970                                 bufsize, XFER_READ);
 971
 972         if (rc != 0) return rc; /* something went wrong */
 973
 974         ei = cp->err_info;
 975         if (ei->CommandStatus != 0 &&
 976             ei->CommandStatus != CMD_DATA_UNDERRUN) {
 977                 cciss_scsi_interpret_error(cp);
 978                 rc = -1;
 979         }
 980         spin_lock_irqsave(CCISS_LOCK(c->ctlr), flags);
 981         scsi_cmd_free(c, cp);
 982         spin_unlock_irqrestore(CCISS_LOCK(c->ctlr), flags);
 983         return rc;
 984 }
 985
 986 static void
 987 cciss_update_non_disk_devices(int cntl_num, int hostno)
 988 {
 989         /* the idea here is we could get notified from /proc
 990            that some devices have changed, so we do a report
 991            physical luns cmd, and adjust our list of devices
 992            accordingly.  (We can't rely on the scsi-mid layer just
 993            doing inquiries, because the "busses" that the scsi
 994            mid-layer probes are totally fabricated by this driver,
 995            so new devices wouldn't show up.
 996
 997            the scsi3addr's of devices won't change so long as the
 998            adapter is not reset.  That means we can rescan and
 999            tell which devices we already know about, vs. new
1000            devices, vs.  disappearing devices.
1001
1002            Also, if you yank out a tape drive, then put in a disk
1003            in it's place, (say, a configured volume from another
1004            array controller for instance)  _don't_ poke this driver
1005            (so it thinks it's still a tape, but _do_ poke the scsi
1006            mid layer, so it does an inquiry... the scsi mid layer
1007            will see the physical disk.  This would be bad.  Need to
1008            think about how to prevent that.  One idea would be to
1009            snoop all scsi responses and if an inquiry repsonse comes
1010            back that reports a disk, chuck it an return selection
1011            timeout instead and adjust our table...  Not sure i like
1012            that though.
1013
1014          */
1015 #define OBDR_TAPE_INQ_SIZE 49
1016 #define OBDR_TAPE_SIG "$DR-10"
1017         ReportLunData_struct *ld_buff;
1018         unsigned char *inq_buff;
1019         unsigned char scsi3addr[8];
1020         ctlr_info_t *c;
1021         __u32 num_luns=0;
1022         unsigned char *ch;
1023         /* unsigned char found[CCISS_MAX_SCSI_DEVS_PER_HBA]; */
1024         struct cciss_scsi_dev_t currentsd[CCISS_MAX_SCSI_DEVS_PER_HBA];
1025         int ncurrent=0;
1026         int reportlunsize = sizeof(*ld_buff) + CISS_MAX_PHYS_LUN * 8;
1027         int i;
1028
1029         c = (ctlr_info_t *) hba[cntl_num];
1030         ld_buff = kmalloc(reportlunsize, GFP_KERNEL);
1031         if (ld_buff == NULL) {
1032                 printk(KERN_ERR "cciss: out of memory\n");
1033                 return;
1034         }
1035         memset(ld_buff, 0, reportlunsize);
1036         inq_buff = kmalloc(OBDR_TAPE_INQ_SIZE, GFP_KERNEL);
1037         if (inq_buff == NULL) {
1038                 printk(KERN_ERR "cciss: out of memory\n");
1039                 kfree(ld_buff);
1040                 return;
1041         }
1042
1043         if (cciss_scsi_do_report_phys_luns(c, ld_buff, reportlunsize) == 0) {
1044                 ch = &ld_buff->LUNListLength[0];
1045                 num_luns = ((ch[0]<<24) | (ch[1]<<16) | (ch[2]<<8) | ch[3]) / 8;
1046                 if (num_luns > CISS_MAX_PHYS_LUN) {
1047                         printk(KERN_WARNING
1048                                 "cciss: Maximum physical LUNs (%d) exceeded.  "
1049                                 "%d LUNs ignored.\n", CISS_MAX_PHYS_LUN,
1050                                 num_luns - CISS_MAX_PHYS_LUN);
1051                         num_luns = CISS_MAX_PHYS_LUN;
1052                 }
1053         }
1054         else {
1055                 printk(KERN_ERR  "cciss: Report physical LUNs failed.\n");
1056                 goto out;
1057         }
1058
1059
1060         /* adjust our table of devices */
1061         for(i=0; i<num_luns; i++)
1062         {
1063                 int devtype;
1064
1065                 /* for each physical lun, do an inquiry */
1066                 if (ld_buff->LUN[i][3] & 0xC0) continue;
1067                 memset(inq_buff, 0, OBDR_TAPE_INQ_SIZE);
1068                 memcpy(&scsi3addr[0], &ld_buff->LUN[i][0], 8);
1069
1070                 if (cciss_scsi_do_inquiry(hba[cntl_num], scsi3addr, inq_buff,
1071                         (unsigned char) OBDR_TAPE_INQ_SIZE) != 0) {
1072                         /* Inquiry failed (msg printed already) */
1073                         devtype = 0; /* so we will skip this device. */
1074                 } else /* what kind of device is this? */
1075                         devtype = (inq_buff[0] & 0x1f);
1076
1077                 switch (devtype)
1078                 {
1079                   case 0x05: /* CD-ROM */ {
1080
1081                         /* We don't *really* support actual CD-ROM devices,
1082                          * just this "One Button Disaster Recovery" tape drive
1083                          * which temporarily pretends to be a CD-ROM drive.
1084                          * So we check that the device is really an OBDR tape
1085                          * device by checking for "$DR-10" in bytes 43-48 of
1086                          * the inquiry data.
1087                          */
1088                                 char obdr_sig[7];
1089
1090                                 strncpy(obdr_sig, &inq_buff[43], 6);
1091                                 obdr_sig[6] = '\0';
1092                                 if (strncmp(obdr_sig, OBDR_TAPE_SIG, 6) != 0)
1093                                         /* Not OBDR device, ignore it. */
1094                                         break;
1095                         }
1096                         /* fall through . . . */
1097                   case 0x01: /* sequential access, (tape) */
1098                   case 0x08: /* medium changer */
1099                         if (ncurrent >= CCISS_MAX_SCSI_DEVS_PER_HBA) {
1100                                 printk(KERN_INFO "cciss%d: %s ignored, "
1101                                         "too many devices.\n", cntl_num,
1102                                         DEVICETYPE(devtype));
1103                                 break;
1104                         }
1105                         memcpy(&currentsd[ncurrent].scsi3addr[0],
1106                                 &scsi3addr[0], 8);
1107                         currentsd[ncurrent].devtype = devtype;
1108                         currentsd[ncurrent].bus = -1;
1109                         currentsd[ncurrent].target = -1;
1110                         currentsd[ncurrent].lun = -1;
1111                         ncurrent++;
1112                         break;
1113                   default:
1114                         break;
1115                 }
1116         }
1117
1118         adjust_cciss_scsi_table(cntl_num, hostno, currentsd, ncurrent);
1119 out:
1120         kfree(inq_buff);
1121         kfree(ld_buff);
1122         return;
1123 }
1124
1125 static int
1126 is_keyword(char *ptr, int len, char *verb)  // Thanks to ncr53c8xx.c
1127 {
1128         int verb_len = strlen(verb);
1129         if (len >= verb_len && !memcmp(verb,ptr,verb_len))
1130                 return verb_len;
1131         else
1132                 return 0;
1133 }
1134
1135 static int
1136 cciss_scsi_user_command(int ctlr, int hostno, char *buffer, int length)
1137 {
1138         int arg_len;
1139
1140         if ((arg_len = is_keyword(buffer, length, "rescan")) != 0)
1141                 cciss_update_non_disk_devices(ctlr, hostno);
1142         else
1143                 return -EINVAL;
1144         return length;
1145 }
1146
1147
1148 static int
1149 cciss_scsi_proc_info(struct Scsi_Host *sh,
1150                 char *buffer, /* data buffer */
1151                 char **start,      /* where data in buffer starts */
1152                 off_t offset,      /* offset from start of imaginary file */
1153                 int length,        /* length of data in buffer */
1154                 int func)          /* 0 == read, 1 == write */
1155 {
1156
1157         int buflen, datalen;
1158         ctlr_info_t *ci;
1159         int i;
1160         int cntl_num;
1161
1162
1163         ci = (ctlr_info_t *) sh->hostdata[0];
1164         if (ci == NULL)  /* This really shouldn't ever happen. */
1165                 return -EINVAL;
1166
1167         cntl_num = ci->ctlr;    /* Get our index into the hba[] array */
1168
1169         if (func == 0) {        /* User is reading from /proc/scsi/ciss*?/?*  */
1170                 buflen = sprintf(buffer, "cciss%d: SCSI host: %d\n",
1171                                 cntl_num, sh->host_no);
1172
1173                 /* this information is needed by apps to know which cciss
1174                    device corresponds to which scsi host number without
1175                    having to open a scsi target device node.  The device
1176                    information is not a duplicate of /proc/scsi/scsi because
1177                    the two may be out of sync due to scsi hotplug, rather
1178                    this info is for an app to be able to use to know how to
1179                    get them back in sync. */
1180
1181                 for (i=0;i<ccissscsi[cntl_num].ndevices;i++) {
1182                         struct cciss_scsi_dev_t *sd = &ccissscsi[cntl_num].dev[i];
1183                         buflen += sprintf(&buffer[buflen], "c%db%dt%dl%d %02d "
1184                                 "0x%02x%02x%02x%02x%02x%02x%02x%02x\n",
1185                                 sh->host_no, sd->bus, sd->target, sd->lun,
1186                                 sd->devtype,
1187                                 sd->scsi3addr[0], sd->scsi3addr[1],
1188                                 sd->scsi3addr[2], sd->scsi3addr[3],
1189                                 sd->scsi3addr[4], sd->scsi3addr[5],
1190                                 sd->scsi3addr[6], sd->scsi3addr[7]);
1191                 }
1192                 datalen = buflen - offset;
1193                 if (datalen < 0) {      /* they're reading past EOF. */
1194                         datalen = 0;
1195                         *start = buffer+buflen;
1196                 } else
1197                         *start = buffer + offset;
1198                 return(datalen);
1199         } else  /* User is writing to /proc/scsi/cciss*?/?*  ... */
1200                 return cciss_scsi_user_command(cntl_num, sh->host_no,
1201                         buffer, length);
1202 }
1203
1204 /* cciss_scatter_gather takes a struct scsi_cmnd, (cmd), and does the pci
1205    dma mapping  and fills in the scatter gather entries of the
1206    cciss command, cp. */
1207
1208 static void
1209 cciss_scatter_gather(struct pci_dev *pdev,
1210                 CommandList_struct *cp,
1211                 struct scsi_cmnd *cmd)
1212 {
1213         unsigned int use_sg, nsegs=0, len;
1214         struct scatterlist *scatter = (struct scatterlist *) cmd->buffer;
1215         __u64 addr64;
1216
1217         /* is it just one virtual address? */
1218         if (!cmd->use_sg) {
1219                 if (cmd->request_bufflen) {     /* anything to xfer? */
1220
1221                         addr64 = (__u64) pci_map_single(pdev,
1222                                 cmd->request_buffer,
1223                                 cmd->request_bufflen,
1224                                 cmd->sc_data_direction);
1225
1226                         cp->SG[0].Addr.lower =
1227                           (__u32) (addr64 & (__u64) 0x00000000FFFFFFFF);
1228                         cp->SG[0].Addr.upper =
1229                           (__u32) ((addr64 >> 32) & (__u64) 0x00000000FFFFFFFF);
1230                         cp->SG[0].Len = cmd->request_bufflen;
1231                         nsegs=1;
1232                 }
1233         } /* else, must be a list of virtual addresses.... */
1234         else if (cmd->use_sg <= MAXSGENTRIES) { /* not too many addrs? */
1235
1236                 use_sg = pci_map_sg(pdev, cmd->buffer, cmd->use_sg,
1237                         cmd->sc_data_direction);
1238
1239                 for (nsegs=0; nsegs < use_sg; nsegs++) {
1240                         addr64 = (__u64) sg_dma_address(&scatter[nsegs]);
1241                         len  = sg_dma_len(&scatter[nsegs]);
1242                         cp->SG[nsegs].Addr.lower =
1243                           (__u32) (addr64 & (__u64) 0x00000000FFFFFFFF);
1244                         cp->SG[nsegs].Addr.upper =
1245                           (__u32) ((addr64 >> 32) & (__u64) 0x00000000FFFFFFFF);
1246                         cp->SG[nsegs].Len = len;
1247                         cp->SG[nsegs].Ext = 0;  // we are not chaining
1248                 }
1249         } else BUG();
1250
1251         cp->Header.SGList = (__u8) nsegs;   /* no. SGs contig in this cmd */
1252         cp->Header.SGTotal = (__u16) nsegs; /* total sgs in this cmd list */
1253         return;
1254 }
1255
1256
1257 static int
1258 cciss_scsi_queue_command (struct scsi_cmnd *cmd, void (* done)(struct scsi_cmnd *))
1259 {
1260         ctlr_info_t **c;
1261         int ctlr, rc;
1262         unsigned char scsi3addr[8];
1263         CommandList_struct *cp;
1264         unsigned long flags;
1265
1266         // Get the ptr to our adapter structure (hba[i]) out of cmd->host.
1267         // We violate cmd->host privacy here.  (Is there another way?)
1268         c = (ctlr_info_t **) &cmd->device->host->hostdata[0];
1269         ctlr = (*c)->ctlr;
1270
1271         rc = lookup_scsi3addr(ctlr, cmd->device->channel, cmd->device->id,
1272                         cmd->device->lun, scsi3addr);
1273         if (rc != 0) {
1274                 /* the scsi nexus does not match any that we presented... */
1275                 /* pretend to mid layer that we got selection timeout */
1276                 cmd->result = DID_NO_CONNECT << 16;
1277                 done(cmd);
1278                 /* we might want to think about registering controller itself
1279                    as a processor device on the bus so sg binds to it. */
1280                 return 0;
1281         }
1282
1283         /* printk("cciss_queue_command, p=%p, cmd=0x%02x, c%db%dt%dl%d\n",
1284                 cmd, cmd->cmnd[0], ctlr, cmd->channel, cmd->target, cmd->lun);*/
1285         // printk("q:%p:c%db%dt%dl%d ", cmd, ctlr, cmd->channel,
1286         //      cmd->target, cmd->lun);
1287
1288         /* Ok, we have a reasonable scsi nexus, so send the cmd down, and
1289            see what the device thinks of it. */
1290
1291         spin_lock_irqsave(CCISS_LOCK(ctlr), flags);
1292         cp = scsi_cmd_alloc(*c);
1293         spin_unlock_irqrestore(CCISS_LOCK(ctlr), flags);
1294         if (cp == NULL) {                       /* trouble... */
1295                 printk("scsi_cmd_alloc returned NULL!\n");
1296                 /* FIXME: next 3 lines are -> BAD! <- */
1297                 cmd->result = DID_NO_CONNECT << 16;
1298                 done(cmd);
1299                 return 0;
1300         }
1301
1302         // Fill in the command list header
1303
1304         cmd->scsi_done = done;    // save this for use by completion code
1305
1306         // save cp in case we have to abort it
1307         cmd->host_scribble = (unsigned char *) cp;
1308
1309         cp->cmd_type = CMD_SCSI;
1310         cp->scsi_cmd = cmd;
1311         cp->Header.ReplyQueue = 0;  // unused in simple mode
1312         memcpy(&cp->Header.LUN.LunAddrBytes[0], &scsi3addr[0], 8);
1313         cp->Header.Tag.lower = cp->busaddr;  // Use k. address of cmd as tag
1314
1315         // Fill in the request block...
1316
1317         cp->Request.Timeout = 0;
1318         memset(cp->Request.CDB, 0, sizeof(cp->Request.CDB));
1319         if (cmd->cmd_len > sizeof(cp->Request.CDB)) BUG();
1320         cp->Request.CDBLen = cmd->cmd_len;
1321         memcpy(cp->Request.CDB, cmd->cmnd, cmd->cmd_len);
1322         cp->Request.Type.Type = TYPE_CMD;
1323         cp->Request.Type.Attribute = ATTR_SIMPLE;
1324         switch(cmd->sc_data_direction)
1325         {
1326           case DMA_TO_DEVICE: cp->Request.Type.Direction = XFER_WRITE; break;
1327           case DMA_FROM_DEVICE: cp->Request.Type.Direction = XFER_READ; break;
1328           case DMA_NONE: cp->Request.Type.Direction = XFER_NONE; break;
1329           case DMA_BIDIRECTIONAL:
1330                 // This can happen if a buggy application does a scsi passthru
1331                 // and sets both inlen and outlen to non-zero. ( see
1332                 // ../scsi/scsi_ioctl.c:scsi_ioctl_send_command() )
1333
1334                 cp->Request.Type.Direction = XFER_RSVD;
1335                 // This is technically wrong, and cciss controllers should
1336                 // reject it with CMD_INVALID, which is the most correct
1337                 // response, but non-fibre backends appear to let it
1338                 // slide by, and give the same results as if this field
1339                 // were set correctly.  Either way is acceptable for
1340                 // our purposes here.
1341
1342                 break;
1343
1344           default:
1345                 printk("cciss: unknown data direction: %d\n",
1346                         cmd->sc_data_direction);
1347                 BUG();
1348                 break;
1349         }
1350
1351         cciss_scatter_gather((*c)->pdev, cp, cmd); // Fill the SG list
1352
1353         /* Put the request on the tail of the request queue */
1354
1355         spin_lock_irqsave(CCISS_LOCK(ctlr), flags);
1356         addQ(&(*c)->reqQ, cp);
1357         (*c)->Qdepth++;
1358         start_io(*c);
1359         spin_unlock_irqrestore(CCISS_LOCK(ctlr), flags);
1360
1361         /* the cmd'll come back via intr handler in complete_scsi_command()  */
1362         return 0;
1363 }
1364
1365 static void
1366 cciss_unregister_scsi(int ctlr)
1367 {
1368         struct cciss_scsi_adapter_data_t *sa;
1369         struct cciss_scsi_cmd_stack_t *stk;
1370         unsigned long flags;
1371
1372         /* we are being forcibly unloaded, and may not refuse. */
1373
1374         spin_lock_irqsave(CCISS_LOCK(ctlr), flags);
1375         sa = (struct cciss_scsi_adapter_data_t *) hba[ctlr]->scsi_ctlr;
1376         stk = &sa->cmd_stack;
1377
1378         /* if we weren't ever actually registered, don't unregister */
1379         if (sa->registered) {
1380                 spin_unlock_irqrestore(CCISS_LOCK(ctlr), flags);
1381                 scsi_remove_host(sa->scsi_host);
1382                 scsi_host_put(sa->scsi_host);
1383                 spin_lock_irqsave(CCISS_LOCK(ctlr), flags);
1384         }
1385
1386         /* set scsi_host to NULL so our detect routine will
1387            find us on register */
1388         sa->scsi_host = NULL;
1389         scsi_cmd_stack_free(ctlr);
1390         kfree(sa);
1391         spin_unlock_irqrestore(CCISS_LOCK(ctlr), flags);
1392 }
1393
1394 static int
1395 cciss_register_scsi(int ctlr)
1396 {
1397         unsigned long flags;
1398
1399         CPQ_TAPE_LOCK(ctlr, flags);
1400
1401         /* Since this is really a block driver, the SCSI core may not be
1402            initialized at init time, in which case, calling scsi_register_host
1403            would hang.  Instead, we do it later, via /proc filesystem
1404            and rc scripts, when we know SCSI core is good to go. */
1405
1406         /* Only register if SCSI devices are detected. */
1407         if (ccissscsi[ctlr].ndevices != 0) {
1408                 ((struct cciss_scsi_adapter_data_t *)
1409                         hba[ctlr]->scsi_ctlr)->registered = 1;
1410                 CPQ_TAPE_UNLOCK(ctlr, flags);
1411                 return cciss_scsi_detect(ctlr);
1412         }
1413         CPQ_TAPE_UNLOCK(ctlr, flags);
1414         printk(KERN_INFO
1415                 "cciss%d: No appropriate SCSI device detected, "
1416                 "SCSI subsystem not engaged.\n", ctlr);
1417         return 0;
1418 }
1419
1420 static int
1421 cciss_engage_scsi(int ctlr)
1422 {
1423         struct cciss_scsi_adapter_data_t *sa;
1424         struct cciss_scsi_cmd_stack_t *stk;
1425         unsigned long flags;
1426
1427         spin_lock_irqsave(CCISS_LOCK(ctlr), flags);
1428         sa = (struct cciss_scsi_adapter_data_t *) hba[ctlr]->scsi_ctlr;
1429         stk = &sa->cmd_stack;
1430
1431         if (((struct cciss_scsi_adapter_data_t *)
1432                 hba[ctlr]->scsi_ctlr)->registered) {
1433                 printk("cciss%d: SCSI subsystem already engaged.\n", ctlr);
1434                 spin_unlock_irqrestore(CCISS_LOCK(ctlr), flags);
1435                 return ENXIO;
1436         }
1437         spin_unlock_irqrestore(CCISS_LOCK(ctlr), flags);
1438         cciss_update_non_disk_devices(ctlr, -1);
1439         cciss_register_scsi(ctlr);
1440         return 0;
1441 }
1442
1443 static void
1444 cciss_proc_tape_report(int ctlr, unsigned char *buffer, off_t *pos, off_t *len)
1445 {
1446         unsigned long flags;
1447         int size;
1448
1449         *pos = *pos -1; *len = *len - 1; // cut off the last trailing newline
1450
1451         CPQ_TAPE_LOCK(ctlr, flags);
1452         size = sprintf(buffer + *len,
1453                 "Sequential access devices: %d\n\n",
1454                         ccissscsi[ctlr].ndevices);
1455         CPQ_TAPE_UNLOCK(ctlr, flags);
1456         *pos += size; *len += size;
1457 }
1458
1459 /* Need at least one of these error handlers to keep ../scsi/hosts.c from
1460  * complaining.  Doing a host- or bus-reset can't do anything good here.
1461  * Despite what it might say in scsi_error.c, there may well be commands
1462  * on the controller, as the cciss driver registers twice, once as a block
1463  * device for the logical drives, and once as a scsi device, for any tape
1464  * drives.  So we know there are no commands out on the tape drives, but we
1465  * don't know there are no commands on the controller, and it is likely
1466  * that there probably are, as the cciss block device is most commonly used
1467  * as a boot device (embedded controller on HP/Compaq systems.)
1468 */
1469
1470 static int cciss_eh_device_reset_handler(struct scsi_cmnd *scsicmd)
1471 {
1472         int rc;
1473         CommandList_struct *cmd_in_trouble;
1474         ctlr_info_t **c;
1475         int ctlr;
1476
1477         /* find the controller to which the command to be aborted was sent */
1478         c = (ctlr_info_t **) &scsicmd->device->host->hostdata[0];
1479         if (c == NULL) /* paranoia */
1480                 return FAILED;
1481         ctlr = (*c)->ctlr;
1482         printk(KERN_WARNING "cciss%d: resetting tape drive or medium changer.\n", ctlr);
1483
1484         /* find the command that's giving us trouble */
1485         cmd_in_trouble = (CommandList_struct *) scsicmd->host_scribble;
1486         if (cmd_in_trouble == NULL) { /* paranoia */
1487                 return FAILED;
1488         }
1489         /* send a reset to the SCSI LUN which the command was sent to */
1490         rc = sendcmd(CCISS_RESET_MSG, ctlr, NULL, 0, 2, 0, 0,
1491                 (unsigned char *) &cmd_in_trouble->Header.LUN.LunAddrBytes[0],
1492                 TYPE_MSG);
1493         /* sendcmd turned off interrputs on the board, turn 'em back on. */
1494         (*c)->access.set_intr_mask(*c, CCISS_INTR_ON);
1495         if (rc == 0)
1496                 return SUCCESS;
1497         printk(KERN_WARNING "cciss%d: resetting device failed.\n", ctlr);
1498         return FAILED;
1499 }
1500
1501 static int  cciss_eh_abort_handler(struct scsi_cmnd *scsicmd)
1502 {
1503         int rc;
1504         CommandList_struct *cmd_to_abort;
1505         ctlr_info_t **c;
1506         int ctlr;
1507
1508         /* find the controller to which the command to be aborted was sent */
1509         c = (ctlr_info_t **) &scsicmd->device->host->hostdata[0];
1510         if (c == NULL) /* paranoia */
1511                 return FAILED;
1512         ctlr = (*c)->ctlr;
1513         printk(KERN_WARNING "cciss%d: aborting tardy SCSI cmd\n", ctlr);
1514
1515         /* find the command to be aborted */
1516         cmd_to_abort = (CommandList_struct *) scsicmd->host_scribble;
1517         if (cmd_to_abort == NULL) /* paranoia */
1518                 return FAILED;
1519         rc = sendcmd(CCISS_ABORT_MSG, ctlr, &cmd_to_abort->Header.Tag,
1520                 0, 2, 0, 0,
1521                 (unsigned char *) &cmd_to_abort->Header.LUN.LunAddrBytes[0],
1522                 TYPE_MSG);
1523         /* sendcmd turned off interrputs on the board, turn 'em back on. */
1524         (*c)->access.set_intr_mask(*c, CCISS_INTR_ON);
1525         if (rc == 0)
1526                 return SUCCESS;
1527         return FAILED;
1528
1529 }
1530
1531 #else /* no CONFIG_CISS_SCSI_TAPE */
1532
1533 /* If no tape support, then these become defined out of existence */
1534
1535 #define cciss_scsi_setup(cntl_num)
1536 #define cciss_unregister_scsi(ctlr)
1537 #define cciss_register_scsi(ctlr)
1538 #define cciss_proc_tape_report(ctlr, buffer, pos, len)
1539
1540 #endif /* CONFIG_CISS_SCSI_TAPE */