git.oblomov.eu Git - linux-2.6/blob - drivers/scsi/aacraid/commsup.c

   1 /*
   2  *      Adaptec AAC series RAID controller driver
   3  *      (c) Copyright 2001 Red Hat Inc. <alan@redhat.com>
   4  *
   5  * based on the old aacraid driver that is..
   6  * Adaptec aacraid device driver for Linux.
   7  *
   8  * Copyright (c) 2000 Adaptec, Inc. (aacraid@adaptec.com)
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2, or (at your option)
  13  * any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; see the file COPYING.  If not, write to
  22  * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  23  *
  24  * Module Name:
  25  *  commsup.c
  26  *
  27  * Abstract: Contain all routines that are required for FSA host/adapter
  28  *    communication.
  29  *
  30  */
  31
  32 #include <linux/kernel.h>
  33 #include <linux/init.h>
  34 #include <linux/types.h>
  35 #include <linux/sched.h>
  36 #include <linux/pci.h>
  37 #include <linux/spinlock.h>
  38 #include <linux/slab.h>
  39 #include <linux/completion.h>
  40 #include <linux/blkdev.h>
  41 #include <scsi/scsi_host.h>
  42 #include <asm/semaphore.h>
  43
  44 #include "aacraid.h"
  45
  46 /**
  47  *      fib_map_alloc           -       allocate the fib objects
  48  *      @dev: Adapter to allocate for
  49  *
  50  *      Allocate and map the shared PCI space for the FIB blocks used to
  51  *      talk to the Adaptec firmware.
  52  */
  53
  54 static int fib_map_alloc(struct aac_dev *dev)
  55 {
  56         dprintk((KERN_INFO
  57           "allocate hardware fibs pci_alloc_consistent(%p, %d * (%d + %d), %p)\n",
  58           dev->pdev, dev->max_fib_size, dev->scsi_host_ptr->can_queue,
  59           AAC_NUM_MGT_FIB, &dev->hw_fib_pa));
  60         if((dev->hw_fib_va = pci_alloc_consistent(dev->pdev, dev->max_fib_size
  61           * (dev->scsi_host_ptr->can_queue + AAC_NUM_MGT_FIB),
  62           &dev->hw_fib_pa))==NULL)
  63                 return -ENOMEM;
  64         return 0;
  65 }
  66
  67 /**
  68  *      fib_map_free            -       free the fib objects
  69  *      @dev: Adapter to free
  70  *
  71  *      Free the PCI mappings and the memory allocated for FIB blocks
  72  *      on this adapter.
  73  */
  74
  75 void fib_map_free(struct aac_dev *dev)
  76 {
  77         pci_free_consistent(dev->pdev, dev->max_fib_size * (dev->scsi_host_ptr->can_queue + AAC_NUM_MGT_FIB), dev->hw_fib_va, dev->hw_fib_pa);
  78 }
  79
  80 /**
  81  *      fib_setup       -       setup the fibs
  82  *      @dev: Adapter to set up
  83  *
  84  *      Allocate the PCI space for the fibs, map it and then intialise the
  85  *      fib area, the unmapped fib data and also the free list
  86  */
  87
  88 int fib_setup(struct aac_dev * dev)
  89 {
  90         struct fib *fibptr;
  91         struct hw_fib *hw_fib_va;
  92         dma_addr_t hw_fib_pa;
  93         int i;
  94
  95         while (((i = fib_map_alloc(dev)) == -ENOMEM)
  96          && (dev->scsi_host_ptr->can_queue > (64 - AAC_NUM_MGT_FIB))) {
  97                 dev->init->MaxIoCommands = cpu_to_le32((dev->scsi_host_ptr->can_queue + AAC_NUM_MGT_FIB) >> 1);
  98                 dev->scsi_host_ptr->can_queue = le32_to_cpu(dev->init->MaxIoCommands) - AAC_NUM_MGT_FIB;
  99         }
 100         if (i<0)
 101                 return -ENOMEM;
 102
 103         hw_fib_va = dev->hw_fib_va;
 104         hw_fib_pa = dev->hw_fib_pa;
 105         memset(hw_fib_va, 0, dev->max_fib_size * (dev->scsi_host_ptr->can_queue + AAC_NUM_MGT_FIB));
 106         /*
 107          *      Initialise the fibs
 108          */
 109         for (i = 0, fibptr = &dev->fibs[i]; i < (dev->scsi_host_ptr->can_queue + AAC_NUM_MGT_FIB); i++, fibptr++)
 110         {
 111                 fibptr->dev = dev;
 112                 fibptr->hw_fib = hw_fib_va;
 113                 fibptr->data = (void *) fibptr->hw_fib->data;
 114                 fibptr->next = fibptr+1;        /* Forward chain the fibs */
 115                 init_MUTEX_LOCKED(&fibptr->event_wait);
 116                 spin_lock_init(&fibptr->event_lock);
 117                 hw_fib_va->header.XferState = cpu_to_le32(0xffffffff);
 118                 hw_fib_va->header.SenderSize = cpu_to_le16(dev->max_fib_size);
 119                 fibptr->hw_fib_pa = hw_fib_pa;
 120                 hw_fib_va = (struct hw_fib *)((unsigned char *)hw_fib_va + dev->max_fib_size);
 121                 hw_fib_pa = hw_fib_pa + dev->max_fib_size;
 122         }
 123         /*
 124          *      Add the fib chain to the free list
 125          */
 126         dev->fibs[dev->scsi_host_ptr->can_queue + AAC_NUM_MGT_FIB - 1].next = NULL;
 127         /*
 128          *      Enable this to debug out of queue space
 129          */
 130         dev->free_fib = &dev->fibs[0];
 131         return 0;
 132 }
 133
 134 /**
 135  *      fib_alloc       -       allocate a fib
 136  *      @dev: Adapter to allocate the fib for
 137  *
 138  *      Allocate a fib from the adapter fib pool. If the pool is empty we
 139  *      return NULL.
 140  */
 141
 142 struct fib * fib_alloc(struct aac_dev *dev)
 143 {
 144         struct fib * fibptr;
 145         unsigned long flags;
 146         spin_lock_irqsave(&dev->fib_lock, flags);
 147         fibptr = dev->free_fib;
 148         if(!fibptr){
 149                 spin_unlock_irqrestore(&dev->fib_lock, flags);
 150                 return fibptr;
 151         }
 152         dev->free_fib = fibptr->next;
 153         spin_unlock_irqrestore(&dev->fib_lock, flags);
 154         /*
 155          *      Set the proper node type code and node byte size
 156          */
 157         fibptr->type = FSAFS_NTC_FIB_CONTEXT;
 158         fibptr->size = sizeof(struct fib);
 159         /*
 160          *      Null out fields that depend on being zero at the start of
 161          *      each I/O
 162          */
 163         fibptr->hw_fib->header.XferState = 0;
 164         fibptr->callback = NULL;
 165         fibptr->callback_data = NULL;
 166
 167         return fibptr;
 168 }
 169
 170 /**
 171  *      fib_free        -       free a fib
 172  *      @fibptr: fib to free up
 173  *
 174  *      Frees up a fib and places it on the appropriate queue
 175  *      (either free or timed out)
 176  */
 177
 178 void fib_free(struct fib * fibptr)
 179 {
 180         unsigned long flags;
 181
 182         spin_lock_irqsave(&fibptr->dev->fib_lock, flags);
 183         if (fibptr->flags & FIB_CONTEXT_FLAG_TIMED_OUT) {
 184                 aac_config.fib_timeouts++;
 185                 fibptr->next = fibptr->dev->timeout_fib;
 186                 fibptr->dev->timeout_fib = fibptr;
 187         } else {
 188                 if (fibptr->hw_fib->header.XferState != 0) {
 189                         printk(KERN_WARNING "fib_free, XferState != 0, fibptr = 0x%p, XferState = 0x%x\n",
 190                                  (void*)fibptr,
 191                                  le32_to_cpu(fibptr->hw_fib->header.XferState));
 192                 }
 193                 fibptr->next = fibptr->dev->free_fib;
 194                 fibptr->dev->free_fib = fibptr;
 195         }
 196         spin_unlock_irqrestore(&fibptr->dev->fib_lock, flags);
 197 }
 198
 199 /**
 200  *      fib_init        -       initialise a fib
 201  *      @fibptr: The fib to initialize
 202  *
 203  *      Set up the generic fib fields ready for use
 204  */
 205
 206 void fib_init(struct fib *fibptr)
 207 {
 208         struct hw_fib *hw_fib = fibptr->hw_fib;
 209
 210         hw_fib->header.StructType = FIB_MAGIC;
 211         hw_fib->header.Size = cpu_to_le16(fibptr->dev->max_fib_size);
 212         hw_fib->header.XferState = cpu_to_le32(HostOwned | FibInitialized | FibEmpty | FastResponseCapable);
 213         hw_fib->header.SenderFibAddress = cpu_to_le32(fibptr->hw_fib_pa);
 214         hw_fib->header.ReceiverFibAddress = cpu_to_le32(fibptr->hw_fib_pa);
 215         hw_fib->header.SenderSize = cpu_to_le16(fibptr->dev->max_fib_size);
 216 }
 217
 218 /**
 219  *      fib_deallocate          -       deallocate a fib
 220  *      @fibptr: fib to deallocate
 221  *
 222  *      Will deallocate and return to the free pool the FIB pointed to by the
 223  *      caller.
 224  */
 225
 226 static void fib_dealloc(struct fib * fibptr)
 227 {
 228         struct hw_fib *hw_fib = fibptr->hw_fib;
 229         if(hw_fib->header.StructType != FIB_MAGIC)
 230                 BUG();
 231         hw_fib->header.XferState = 0;
 232 }
 233
 234 /*
 235  *      Commuication primitives define and support the queuing method we use to
 236  *      support host to adapter commuication. All queue accesses happen through
 237  *      these routines and are the only routines which have a knowledge of the
 238  *       how these queues are implemented.
 239  */
 240
 241 /**
 242  *      aac_get_entry           -       get a queue entry
 243  *      @dev: Adapter
 244  *      @qid: Queue Number
 245  *      @entry: Entry return
 246  *      @index: Index return
 247  *      @nonotify: notification control
 248  *
 249  *      With a priority the routine returns a queue entry if the queue has free entries. If the queue
 250  *      is full(no free entries) than no entry is returned and the function returns 0 otherwise 1 is
 251  *      returned.
 252  */
 253
 254 static int aac_get_entry (struct aac_dev * dev, u32 qid, struct aac_entry **entry, u32 * index, unsigned long *nonotify)
 255 {
 256         struct aac_queue * q;
 257
 258         /*
 259          *      All of the queues wrap when they reach the end, so we check
 260          *      to see if they have reached the end and if they have we just
 261          *      set the index back to zero. This is a wrap. You could or off
 262          *      the high bits in all updates but this is a bit faster I think.
 263          */
 264
 265         q = &dev->queues->queue[qid];
 266
 267         *index = le32_to_cpu(*(q->headers.producer));
 268         if ((*index - 2) == le32_to_cpu(*(q->headers.consumer)))
 269                         *nonotify = 1;
 270
 271         if (qid == AdapHighCmdQueue) {
 272                 if (*index >= ADAP_HIGH_CMD_ENTRIES)
 273                         *index = 0;
 274         } else if (qid == AdapNormCmdQueue) {
 275                 if (*index >= ADAP_NORM_CMD_ENTRIES)
 276                         *index = 0; /* Wrap to front of the Producer Queue. */
 277         }
 278         else if (qid == AdapHighRespQueue)
 279         {
 280                 if (*index >= ADAP_HIGH_RESP_ENTRIES)
 281                         *index = 0;
 282         }
 283         else if (qid == AdapNormRespQueue)
 284         {
 285                 if (*index >= ADAP_NORM_RESP_ENTRIES)
 286                         *index = 0; /* Wrap to front of the Producer Queue. */
 287         }
 288         else {
 289                 printk("aacraid: invalid qid\n");
 290                 BUG();
 291         }
 292
 293         if ((*index + 1) == le32_to_cpu(*(q->headers.consumer))) { /* Queue is full */
 294                 printk(KERN_WARNING "Queue %d full, %u outstanding.\n",
 295                                 qid, q->numpending);
 296                 return 0;
 297         } else {
 298                 *entry = q->base + *index;
 299                 return 1;
 300         }
 301 }
 302
 303 /**
 304  *      aac_queue_get           -       get the next free QE
 305  *      @dev: Adapter
 306  *      @index: Returned index
 307  *      @priority: Priority of fib
 308  *      @fib: Fib to associate with the queue entry
 309  *      @wait: Wait if queue full
 310  *      @fibptr: Driver fib object to go with fib
 311  *      @nonotify: Don't notify the adapter
 312  *
 313  *      Gets the next free QE off the requested priorty adapter command
 314  *      queue and associates the Fib with the QE. The QE represented by
 315  *      index is ready to insert on the queue when this routine returns
 316  *      success.
 317  */
 318
 319 static int aac_queue_get(struct aac_dev * dev, u32 * index, u32 qid, struct hw_fib * hw_fib, int wait, struct fib * fibptr, unsigned long *nonotify)
 320 {
 321         struct aac_entry * entry = NULL;
 322         int map = 0;
 323         struct aac_queue * q = &dev->queues->queue[qid];
 324
 325         spin_lock_irqsave(q->lock, q->SavedIrql);
 326
 327         if (qid == AdapHighCmdQueue || qid == AdapNormCmdQueue)
 328         {
 329                 /*  if no entries wait for some if caller wants to */
 330                 while (!aac_get_entry(dev, qid, &entry, index, nonotify))
 331                 {
 332                         printk(KERN_ERR "GetEntries failed\n");
 333                 }
 334                 /*
 335                  *      Setup queue entry with a command, status and fib mapped
 336                  */
 337                 entry->size = cpu_to_le32(le16_to_cpu(hw_fib->header.Size));
 338                 map = 1;
 339         }
 340         else if (qid == AdapHighRespQueue || qid == AdapNormRespQueue)
 341         {
 342                 while(!aac_get_entry(dev, qid, &entry, index, nonotify))
 343                 {
 344                         /* if no entries wait for some if caller wants to */
 345                 }
 346                 /*
 347                  *      Setup queue entry with command, status and fib mapped
 348                  */
 349                 entry->size = cpu_to_le32(le16_to_cpu(hw_fib->header.Size));
 350                 entry->addr = hw_fib->header.SenderFibAddress;
 351                         /* Restore adapters pointer to the FIB */
 352                 hw_fib->header.ReceiverFibAddress = hw_fib->header.SenderFibAddress;    /* Let the adapter now where to find its data */
 353                 map = 0;
 354         }
 355         /*
 356          *      If MapFib is true than we need to map the Fib and put pointers
 357          *      in the queue entry.
 358          */
 359         if (map)
 360                 entry->addr = cpu_to_le32(fibptr->hw_fib_pa);
 361         return 0;
 362 }
 363
 364
 365 /**
 366  *      aac_insert_entry        -       insert a queue entry
 367  *      @dev: Adapter
 368  *      @index: Index of entry to insert
 369  *      @qid: Queue number
 370  *      @nonotify: Suppress adapter notification
 371  *
 372  *      Gets the next free QE off the requested priorty adapter command
 373  *      queue and associates the Fib with the QE. The QE represented by
 374  *      index is ready to insert on the queue when this routine returns
 375  *      success.
 376  */
 377
 378 static int aac_insert_entry(struct aac_dev * dev, u32 index, u32 qid, unsigned long nonotify)
 379 {
 380         struct aac_queue * q = &dev->queues->queue[qid];
 381
 382         if(q == NULL)
 383                 BUG();
 384         *(q->headers.producer) = cpu_to_le32(index + 1);
 385         spin_unlock_irqrestore(q->lock, q->SavedIrql);
 386
 387         if (qid == AdapHighCmdQueue ||
 388             qid == AdapNormCmdQueue ||
 389             qid == AdapHighRespQueue ||
 390             qid == AdapNormRespQueue)
 391         {
 392                 if (!nonotify)
 393                         aac_adapter_notify(dev, qid);
 394         }
 395         else
 396                 printk("Suprise insert!\n");
 397         return 0;
 398 }
 399
 400 /*
 401  *      Define the highest level of host to adapter communication routines.
 402  *      These routines will support host to adapter FS commuication. These
 403  *      routines have no knowledge of the commuication method used. This level
 404  *      sends and receives FIBs. This level has no knowledge of how these FIBs
 405  *      get passed back and forth.
 406  */
 407
 408 /**
 409  *      fib_send        -       send a fib to the adapter
 410  *      @command: Command to send
 411  *      @fibptr: The fib
 412  *      @size: Size of fib data area
 413  *      @priority: Priority of Fib
 414  *      @wait: Async/sync select
 415  *      @reply: True if a reply is wanted
 416  *      @callback: Called with reply
 417  *      @callback_data: Passed to callback
 418  *
 419  *      Sends the requested FIB to the adapter and optionally will wait for a
 420  *      response FIB. If the caller does not wish to wait for a response than
 421  *      an event to wait on must be supplied. This event will be set when a
 422  *      response FIB is received from the adapter.
 423  */
 424
 425 int fib_send(u16 command, struct fib * fibptr, unsigned long size,  int priority, int wait, int reply, fib_callback callback, void * callback_data)
 426 {
 427         u32 index;
 428         u32 qid;
 429         struct aac_dev * dev = fibptr->dev;
 430         unsigned long nointr = 0;
 431         struct hw_fib * hw_fib = fibptr->hw_fib;
 432         struct aac_queue * q;
 433         unsigned long flags = 0;
 434         if (!(hw_fib->header.XferState & cpu_to_le32(HostOwned)))
 435                 return -EBUSY;
 436         /*
 437          *      There are 5 cases with the wait and reponse requested flags.
 438          *      The only invalid cases are if the caller requests to wait and
 439          *      does not request a response and if the caller does not want a
 440          *      response and the Fib is not allocated from pool. If a response
 441          *      is not requesed the Fib will just be deallocaed by the DPC
 442          *      routine when the response comes back from the adapter. No
 443          *      further processing will be done besides deleting the Fib. We
 444          *      will have a debug mode where the adapter can notify the host
 445          *      it had a problem and the host can log that fact.
 446          */
 447         if (wait && !reply) {
 448                 return -EINVAL;
 449         } else if (!wait && reply) {
 450                 hw_fib->header.XferState |= cpu_to_le32(Async | ResponseExpected);
 451                 FIB_COUNTER_INCREMENT(aac_config.AsyncSent);
 452         } else if (!wait && !reply) {
 453                 hw_fib->header.XferState |= cpu_to_le32(NoResponseExpected);
 454                 FIB_COUNTER_INCREMENT(aac_config.NoResponseSent);
 455         } else if (wait && reply) {
 456                 hw_fib->header.XferState |= cpu_to_le32(ResponseExpected);
 457                 FIB_COUNTER_INCREMENT(aac_config.NormalSent);
 458         }
 459         /*
 460          *      Map the fib into 32bits by using the fib number
 461          */
 462
 463         hw_fib->header.SenderFibAddress = cpu_to_le32(((u32)(fibptr-dev->fibs)) << 1);
 464         hw_fib->header.SenderData = (u32)(fibptr - dev->fibs);
 465         /*
 466          *      Set FIB state to indicate where it came from and if we want a
 467          *      response from the adapter. Also load the command from the
 468          *      caller.
 469          *
 470          *      Map the hw fib pointer as a 32bit value
 471          */
 472         hw_fib->header.Command = cpu_to_le16(command);
 473         hw_fib->header.XferState |= cpu_to_le32(SentFromHost);
 474         fibptr->hw_fib->header.Flags = 0;       /* 0 the flags field - internal only*/
 475         /*
 476          *      Set the size of the Fib we want to send to the adapter
 477          */
 478         hw_fib->header.Size = cpu_to_le16(sizeof(struct aac_fibhdr) + size);
 479         if (le16_to_cpu(hw_fib->header.Size) > le16_to_cpu(hw_fib->header.SenderSize)) {
 480                 return -EMSGSIZE;
 481         }
 482         /*
 483          *      Get a queue entry connect the FIB to it and send an notify
 484          *      the adapter a command is ready.
 485          */
 486         if (priority == FsaHigh) {
 487                 hw_fib->header.XferState |= cpu_to_le32(HighPriority);
 488                 qid = AdapHighCmdQueue;
 489         } else {
 490                 hw_fib->header.XferState |= cpu_to_le32(NormalPriority);
 491                 qid = AdapNormCmdQueue;
 492         }
 493         q = &dev->queues->queue[qid];
 494
 495         if(wait)
 496                 spin_lock_irqsave(&fibptr->event_lock, flags);
 497         if(aac_queue_get( dev, &index, qid, hw_fib, 1, fibptr, &nointr)<0)
 498                 return -EWOULDBLOCK;
 499         dprintk((KERN_DEBUG "fib_send: inserting a queue entry at index %d.\n",index));
 500         dprintk((KERN_DEBUG "Fib contents:.\n"));
 501         dprintk((KERN_DEBUG "  Command =               %d.\n", hw_fib->header.Command));
 502         dprintk((KERN_DEBUG "  XferState  =            %x.\n", hw_fib->header.XferState));
 503         dprintk((KERN_DEBUG "  hw_fib va being sent=%p\n",fibptr->hw_fib));
 504         dprintk((KERN_DEBUG "  hw_fib pa being sent=%lx\n",(ulong)fibptr->hw_fib_pa));
 505         dprintk((KERN_DEBUG "  fib being sent=%p\n",fibptr));
 506         /*
 507          *      Fill in the Callback and CallbackContext if we are not
 508          *      going to wait.
 509          */
 510         if (!wait) {
 511                 fibptr->callback = callback;
 512                 fibptr->callback_data = callback_data;
 513         }
 514         FIB_COUNTER_INCREMENT(aac_config.FibsSent);
 515         list_add_tail(&fibptr->queue, &q->pendingq);
 516         q->numpending++;
 517
 518         fibptr->done = 0;
 519         fibptr->flags = 0;
 520
 521         if(aac_insert_entry(dev, index, qid, (nointr & aac_config.irq_mod)) < 0)
 522                 return -EWOULDBLOCK;
 523         /*
 524          *      If the caller wanted us to wait for response wait now.
 525          */
 526
 527         if (wait) {
 528                 spin_unlock_irqrestore(&fibptr->event_lock, flags);
 529                 down(&fibptr->event_wait);
 530                 if(fibptr->done == 0)
 531                         BUG();
 532
 533                 if((fibptr->flags & FIB_CONTEXT_FLAG_TIMED_OUT)){
 534                         return -ETIMEDOUT;
 535                 } else {
 536                         return 0;
 537                 }
 538         }
 539         /*
 540          *      If the user does not want a response than return success otherwise
 541          *      return pending
 542          */
 543         if (reply)
 544                 return -EINPROGRESS;
 545         else
 546                 return 0;
 547 }
 548
 549 /**
 550  *      aac_consumer_get        -       get the top of the queue
 551  *      @dev: Adapter
 552  *      @q: Queue
 553  *      @entry: Return entry
 554  *
 555  *      Will return a pointer to the entry on the top of the queue requested that
 556  *      we are a consumer of, and return the address of the queue entry. It does
 557  *      not change the state of the queue.
 558  */
 559
 560 int aac_consumer_get(struct aac_dev * dev, struct aac_queue * q, struct aac_entry **entry)
 561 {
 562         u32 index;
 563         int status;
 564         if (le32_to_cpu(*q->headers.producer) == le32_to_cpu(*q->headers.consumer)) {
 565                 status = 0;
 566         } else {
 567                 /*
 568                  *      The consumer index must be wrapped if we have reached
 569                  *      the end of the queue, else we just use the entry
 570                  *      pointed to by the header index
 571                  */
 572                 if (le32_to_cpu(*q->headers.consumer) >= q->entries)
 573                         index = 0;
 574                 else
 575                         index = le32_to_cpu(*q->headers.consumer);
 576                 *entry = q->base + index;
 577                 status = 1;
 578         }
 579         return(status);
 580 }
 581
 582 /**
 583  *      aac_consumer_free       -       free consumer entry
 584  *      @dev: Adapter
 585  *      @q: Queue
 586  *      @qid: Queue ident
 587  *
 588  *      Frees up the current top of the queue we are a consumer of. If the
 589  *      queue was full notify the producer that the queue is no longer full.
 590  */
 591
 592 void aac_consumer_free(struct aac_dev * dev, struct aac_queue *q, u32 qid)
 593 {
 594         int wasfull = 0;
 595         u32 notify;
 596
 597         if ((le32_to_cpu(*q->headers.producer)+1) == le32_to_cpu(*q->headers.consumer))
 598                 wasfull = 1;
 599
 600         if (le32_to_cpu(*q->headers.consumer) >= q->entries)
 601                 *q->headers.consumer = cpu_to_le32(1);
 602         else
 603                 *q->headers.consumer = cpu_to_le32(le32_to_cpu(*q->headers.consumer)+1);
 604
 605         if (wasfull) {
 606                 switch (qid) {
 607
 608                 case HostNormCmdQueue:
 609                         notify = HostNormCmdNotFull;
 610                         break;
 611                 case HostHighCmdQueue:
 612                         notify = HostHighCmdNotFull;
 613                         break;
 614                 case HostNormRespQueue:
 615                         notify = HostNormRespNotFull;
 616                         break;
 617                 case HostHighRespQueue:
 618                         notify = HostHighRespNotFull;
 619                         break;
 620                 default:
 621                         BUG();
 622                         return;
 623                 }
 624                 aac_adapter_notify(dev, notify);
 625         }
 626 }
 627
 628 /**
 629  *      fib_adapter_complete    -       complete adapter issued fib
 630  *      @fibptr: fib to complete
 631  *      @size: size of fib
 632  *
 633  *      Will do all necessary work to complete a FIB that was sent from
 634  *      the adapter.
 635  */
 636
 637 int fib_adapter_complete(struct fib * fibptr, unsigned short size)
 638 {
 639         struct hw_fib * hw_fib = fibptr->hw_fib;
 640         struct aac_dev * dev = fibptr->dev;
 641         unsigned long nointr = 0;
 642         if (hw_fib->header.XferState == 0)
 643                 return 0;
 644         /*
 645          *      If we plan to do anything check the structure type first.
 646          */
 647         if ( hw_fib->header.StructType != FIB_MAGIC ) {
 648                 return -EINVAL;
 649         }
 650         /*
 651          *      This block handles the case where the adapter had sent us a
 652          *      command and we have finished processing the command. We
 653          *      call completeFib when we are done processing the command
 654          *      and want to send a response back to the adapter. This will
 655          *      send the completed cdb to the adapter.
 656          */
 657         if (hw_fib->header.XferState & cpu_to_le32(SentFromAdapter)) {
 658                 hw_fib->header.XferState |= cpu_to_le32(HostProcessed);
 659                 if (hw_fib->header.XferState & cpu_to_le32(HighPriority)) {
 660                         u32 index;
 661                         if (size)
 662                         {
 663                                 size += sizeof(struct aac_fibhdr);
 664                                 if (size > le16_to_cpu(hw_fib->header.SenderSize))
 665                                         return -EMSGSIZE;
 666                                 hw_fib->header.Size = cpu_to_le16(size);
 667                         }
 668                         if(aac_queue_get(dev, &index, AdapHighRespQueue, hw_fib, 1, NULL, &nointr) < 0) {
 669                                 return -EWOULDBLOCK;
 670                         }
 671                         if (aac_insert_entry(dev, index, AdapHighRespQueue,  (nointr & (int)aac_config.irq_mod)) != 0) {
 672                         }
 673                 } else if (hw_fib->header.XferState &
 674                                 cpu_to_le32(NormalPriority)) {
 675                         u32 index;
 676
 677                         if (size) {
 678                                 size += sizeof(struct aac_fibhdr);
 679                                 if (size > le16_to_cpu(hw_fib->header.SenderSize))
 680                                         return -EMSGSIZE;
 681                                 hw_fib->header.Size = cpu_to_le16(size);
 682                         }
 683                         if (aac_queue_get(dev, &index, AdapNormRespQueue, hw_fib, 1, NULL, &nointr) < 0)
 684                                 return -EWOULDBLOCK;
 685                         if (aac_insert_entry(dev, index, AdapNormRespQueue, (nointr & (int)aac_config.irq_mod)) != 0)
 686                         {
 687                         }
 688                 }
 689         }
 690         else
 691         {
 692                 printk(KERN_WARNING "fib_adapter_complete: Unknown xferstate detected.\n");
 693                 BUG();
 694         }
 695         return 0;
 696 }
 697
 698 /**
 699  *      fib_complete    -       fib completion handler
 700  *      @fib: FIB to complete
 701  *
 702  *      Will do all necessary work to complete a FIB.
 703  */
 704
 705 int fib_complete(struct fib * fibptr)
 706 {
 707         struct hw_fib * hw_fib = fibptr->hw_fib;
 708
 709         /*
 710          *      Check for a fib which has already been completed
 711          */
 712
 713         if (hw_fib->header.XferState == 0)
 714                 return 0;
 715         /*
 716          *      If we plan to do anything check the structure type first.
 717          */
 718
 719         if (hw_fib->header.StructType != FIB_MAGIC)
 720                 return -EINVAL;
 721         /*
 722          *      This block completes a cdb which orginated on the host and we
 723          *      just need to deallocate the cdb or reinit it. At this point the
 724          *      command is complete that we had sent to the adapter and this
 725          *      cdb could be reused.
 726          */
 727         if((hw_fib->header.XferState & cpu_to_le32(SentFromHost)) &&
 728                 (hw_fib->header.XferState & cpu_to_le32(AdapterProcessed)))
 729         {
 730                 fib_dealloc(fibptr);
 731         }
 732         else if(hw_fib->header.XferState & cpu_to_le32(SentFromHost))
 733         {
 734                 /*
 735                  *      This handles the case when the host has aborted the I/O
 736                  *      to the adapter because the adapter is not responding
 737                  */
 738                 fib_dealloc(fibptr);
 739         } else if(hw_fib->header.XferState & cpu_to_le32(HostOwned)) {
 740                 fib_dealloc(fibptr);
 741         } else {
 742                 BUG();
 743         }
 744         return 0;
 745 }
 746
 747 /**
 748  *      aac_printf      -       handle printf from firmware
 749  *      @dev: Adapter
 750  *      @val: Message info
 751  *
 752  *      Print a message passed to us by the controller firmware on the
 753  *      Adaptec board
 754  */
 755
 756 void aac_printf(struct aac_dev *dev, u32 val)
 757 {
 758         char *cp = dev->printfbuf;
 759         if (dev->printf_enabled)
 760         {
 761                 int length = val & 0xffff;
 762                 int level = (val >> 16) & 0xffff;
 763
 764                 /*
 765                  *      The size of the printfbuf is set in port.c
 766                  *      There is no variable or define for it
 767                  */
 768                 if (length > 255)
 769                         length = 255;
 770                 if (cp[length] != 0)
 771                         cp[length] = 0;
 772                 if (level == LOG_AAC_HIGH_ERROR)
 773                         printk(KERN_WARNING "aacraid:%s", cp);
 774                 else
 775                         printk(KERN_INFO "aacraid:%s", cp);
 776         }
 777         memset(cp, 0,  256);
 778 }
 779
 780 /**
 781  *      aac_command_thread      -       command processing thread
 782  *      @dev: Adapter to monitor
 783  *
 784  *      Waits on the commandready event in it's queue. When the event gets set
 785  *      it will pull FIBs off it's queue. It will continue to pull FIBs off
 786  *      until the queue is empty. When the queue is empty it will wait for
 787  *      more FIBs.
 788  */
 789
 790 int aac_command_thread(struct aac_dev * dev)
 791 {
 792         struct hw_fib *hw_fib, *hw_newfib;
 793         struct fib *fib, *newfib;
 794         struct aac_queue_block *queues = dev->queues;
 795         struct aac_fib_context *fibctx;
 796         unsigned long flags;
 797         DECLARE_WAITQUEUE(wait, current);
 798
 799         /*
 800          *      We can only have one thread per adapter for AIF's.
 801          */
 802         if (dev->aif_thread)
 803                 return -EINVAL;
 804         /*
 805          *      Set up the name that will appear in 'ps'
 806          *      stored in  task_struct.comm[16].
 807          */
 808         daemonize("aacraid");
 809         allow_signal(SIGKILL);
 810         /*
 811          *      Let the DPC know it has a place to send the AIF's to.
 812          */
 813         dev->aif_thread = 1;
 814         add_wait_queue(&queues->queue[HostNormCmdQueue].cmdready, &wait);
 815         set_current_state(TASK_INTERRUPTIBLE);
 816         while(1)
 817         {
 818                 spin_lock_irqsave(queues->queue[HostNormCmdQueue].lock, flags);
 819                 while(!list_empty(&(queues->queue[HostNormCmdQueue].cmdq))) {
 820                         struct list_head *entry;
 821                         struct aac_aifcmd * aifcmd;
 822
 823                         set_current_state(TASK_RUNNING);
 824
 825                         entry = queues->queue[HostNormCmdQueue].cmdq.next;
 826                         list_del(entry);
 827
 828                         spin_unlock_irqrestore(queues->queue[HostNormCmdQueue].lock, flags);
 829                         fib = list_entry(entry, struct fib, fiblink);
 830                         /*
 831                          *      We will process the FIB here or pass it to a
 832                          *      worker thread that is TBD. We Really can't
 833                          *      do anything at this point since we don't have
 834                          *      anything defined for this thread to do.
 835                          */
 836                         hw_fib = fib->hw_fib;
 837                         memset(fib, 0, sizeof(struct fib));
 838                         fib->type = FSAFS_NTC_FIB_CONTEXT;
 839                         fib->size = sizeof( struct fib );
 840                         fib->hw_fib = hw_fib;
 841                         fib->data = hw_fib->data;
 842                         fib->dev = dev;
 843                         /*
 844                          *      We only handle AifRequest fibs from the adapter.
 845                          */
 846                         aifcmd = (struct aac_aifcmd *) hw_fib->data;
 847                         if (aifcmd->command == cpu_to_le32(AifCmdDriverNotify)) {
 848                                 /* Handle Driver Notify Events */
 849                                 *(__le32 *)hw_fib->data = cpu_to_le32(ST_OK);
 850                                 fib_adapter_complete(fib, (u16)sizeof(u32));
 851                         } else {
 852                                 struct list_head *entry;
 853                                 /* The u32 here is important and intended. We are using
 854                                    32bit wrapping time to fit the adapter field */
 855
 856                                 u32 time_now, time_last;
 857                                 unsigned long flagv;
 858
 859                                 time_now = jiffies/HZ;
 860
 861                                 spin_lock_irqsave(&dev->fib_lock, flagv);
 862                                 entry = dev->fib_list.next;
 863                                 /*
 864                                  * For each Context that is on the
 865                                  * fibctxList, make a copy of the
 866                                  * fib, and then set the event to wake up the
 867                                  * thread that is waiting for it.
 868                                  */
 869                                 while (entry != &dev->fib_list) {
 870                                         /*
 871                                          * Extract the fibctx
 872                                          */
 873                                         fibctx = list_entry(entry, struct aac_fib_context, next);
 874                                         /*
 875                                          * Check if the queue is getting
 876                                          * backlogged
 877                                          */
 878                                         if (fibctx->count > 20)
 879                                         {
 880                                                 /*
 881                                                  * It's *not* jiffies folks,
 882                                                  * but jiffies / HZ so do not
 883                                                  * panic ...
 884                                                  */
 885                                                 time_last = fibctx->jiffies;
 886                                                 /*
 887                                                  * Has it been > 2 minutes
 888                                                  * since the last read off
 889                                                  * the queue?
 890                                                  */
 891                                                 if ((time_now - time_last) > 120) {
 892                                                         entry = entry->next;
 893                                                         aac_close_fib_context(dev, fibctx);
 894                                                         continue;
 895                                                 }
 896                                         }
 897                                         /*
 898                                          * Warning: no sleep allowed while
 899                                          * holding spinlock
 900                                          */
 901                                         hw_newfib = kmalloc(sizeof(struct hw_fib), GFP_ATOMIC);
 902                                         newfib = kmalloc(sizeof(struct fib), GFP_ATOMIC);
 903                                         if (newfib && hw_newfib) {
 904                                                 /*
 905                                                  * Make the copy of the FIB
 906                                                  */
 907                                                 memcpy(hw_newfib, hw_fib, sizeof(struct hw_fib));
 908                                                 memcpy(newfib, fib, sizeof(struct fib));
 909                                                 newfib->hw_fib = hw_newfib;
 910                                                 /*
 911                                                  * Put the FIB onto the
 912                                                  * fibctx's fibs
 913                                                  */
 914                                                 list_add_tail(&newfib->fiblink, &fibctx->fib_list);
 915                                                 fibctx->count++;
 916                                                 /*
 917                                                  * Set the event to wake up the
 918                                                  * thread that will waiting.
 919                                                  */
 920                                                 up(&fibctx->wait_sem);
 921                                         } else {
 922                                                 printk(KERN_WARNING "aifd: didn't allocate NewFib.\n");
 923                                                 if(newfib)
 924                                                         kfree(newfib);
 925                                                 if(hw_newfib)
 926                                                         kfree(hw_newfib);
 927                                         }
 928                                         entry = entry->next;
 929                                 }
 930                                 /*
 931                                  *      Set the status of this FIB
 932                                  */
 933                                 *(__le32 *)hw_fib->data = cpu_to_le32(ST_OK);
 934                                 fib_adapter_complete(fib, sizeof(u32));
 935                                 spin_unlock_irqrestore(&dev->fib_lock, flagv);
 936                         }
 937                         spin_lock_irqsave(queues->queue[HostNormCmdQueue].lock, flags);
 938                         kfree(fib);
 939                 }
 940                 /*
 941                  *      There are no more AIF's
 942                  */
 943                 spin_unlock_irqrestore(queues->queue[HostNormCmdQueue].lock, flags);
 944                 schedule();
 945
 946                 if(signal_pending(current))
 947                         break;
 948                 set_current_state(TASK_INTERRUPTIBLE);
 949         }
 950         remove_wait_queue(&queues->queue[HostNormCmdQueue].cmdready, &wait);
 951         dev->aif_thread = 0;
 952         complete_and_exit(&dev->aif_completion, 0);
 953 }