Merge branch 'master'
[linux-2.6] / drivers / scsi / aacraid / rkt.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  *  rkt.c
26  *
27  * Abstract: Hardware miniport for Drawbridge specific hardware functions.
28  *
29  */
30
31 #include <linux/kernel.h>
32 #include <linux/init.h>
33 #include <linux/types.h>
34 #include <linux/sched.h>
35 #include <linux/pci.h>
36 #include <linux/spinlock.h>
37 #include <linux/slab.h>
38 #include <linux/blkdev.h>
39 #include <linux/delay.h>
40 #include <linux/completion.h>
41 #include <linux/time.h>
42 #include <linux/interrupt.h>
43 #include <asm/semaphore.h>
44
45 #include <scsi/scsi_host.h>
46
47 #include "aacraid.h"
48
49 static irqreturn_t aac_rkt_intr(int irq, void *dev_id, struct pt_regs *regs)
50 {
51         struct aac_dev *dev = dev_id;
52
53         if (dev->new_comm_interface) {
54                 u32 Index = rkt_readl(dev, MUnit.OutboundQueue);
55                 if (Index == 0xFFFFFFFFL)
56                         Index = rkt_readl(dev, MUnit.OutboundQueue);
57                 if (Index != 0xFFFFFFFFL) {
58                         do {
59                                 if (aac_intr_normal(dev, Index)) {
60                                         rkt_writel(dev, MUnit.OutboundQueue, Index);
61                                         rkt_writel(dev, MUnit.ODR, DoorBellAdapterNormRespReady);
62                                 }
63                                 Index = rkt_readl(dev, MUnit.OutboundQueue);
64                         } while (Index != 0xFFFFFFFFL);
65                         return IRQ_HANDLED;
66                 }
67         } else {
68                 unsigned long bellbits;
69                 u8 intstat;
70                 intstat = rkt_readb(dev, MUnit.OISR);
71                 /*
72                  *      Read mask and invert because drawbridge is reversed.
73                  *      This allows us to only service interrupts that have 
74                  *      been enabled.
75                  *      Check to see if this is our interrupt.  If it isn't just return
76                  */
77                 if (intstat & ~(dev->OIMR))
78                 {
79                         bellbits = rkt_readl(dev, OutboundDoorbellReg);
80                         if (bellbits & DoorBellPrintfReady) {
81                                 aac_printf(dev, rkt_readl (dev, IndexRegs.Mailbox[5]));
82                                 rkt_writel(dev, MUnit.ODR,DoorBellPrintfReady);
83                                 rkt_writel(dev, InboundDoorbellReg,DoorBellPrintfDone);
84                         }
85                         else if (bellbits & DoorBellAdapterNormCmdReady) {
86                                 rkt_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdReady);
87                                 aac_command_normal(&dev->queues->queue[HostNormCmdQueue]);
88 //                              rkt_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdReady);
89                         }
90                         else if (bellbits & DoorBellAdapterNormRespReady) {
91                                 rkt_writel(dev, MUnit.ODR,DoorBellAdapterNormRespReady);
92                                 aac_response_normal(&dev->queues->queue[HostNormRespQueue]);
93                         }
94                         else if (bellbits & DoorBellAdapterNormCmdNotFull) {
95                                 rkt_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdNotFull);
96                         }
97                         else if (bellbits & DoorBellAdapterNormRespNotFull) {
98                                 rkt_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdNotFull);
99                                 rkt_writel(dev, MUnit.ODR, DoorBellAdapterNormRespNotFull);
100                         }
101                         return IRQ_HANDLED;
102                 }
103         }
104         return IRQ_NONE;
105 }
106
107 /**
108  *      aac_rkt_disable_interrupt       -       Disable interrupts
109  *      @dev: Adapter
110  */
111
112 static void aac_rkt_disable_interrupt(struct aac_dev *dev)
113 {
114         rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
115 }
116
117 /**
118  *      rkt_sync_cmd    -       send a command and wait
119  *      @dev: Adapter
120  *      @command: Command to execute
121  *      @p1: first parameter
122  *      @ret: adapter status
123  *
124  *      This routine will send a synchronous command to the adapter and wait 
125  *      for its completion.
126  */
127
128 static int rkt_sync_cmd(struct aac_dev *dev, u32 command,
129         u32 p1, u32 p2, u32 p3, u32 p4, u32 p5, u32 p6,
130         u32 *status, u32 *r1, u32 *r2, u32 *r3, u32 *r4)
131 {
132         unsigned long start;
133         int ok;
134         /*
135          *      Write the command into Mailbox 0
136          */
137         rkt_writel(dev, InboundMailbox0, command);
138         /*
139          *      Write the parameters into Mailboxes 1 - 6
140          */
141         rkt_writel(dev, InboundMailbox1, p1);
142         rkt_writel(dev, InboundMailbox2, p2);
143         rkt_writel(dev, InboundMailbox3, p3);
144         rkt_writel(dev, InboundMailbox4, p4);
145         /*
146          *      Clear the synch command doorbell to start on a clean slate.
147          */
148         rkt_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
149         /*
150          *      Disable doorbell interrupts
151          */
152         rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
153         /*
154          *      Force the completion of the mask register write before issuing
155          *      the interrupt.
156          */
157         rkt_readb (dev, MUnit.OIMR);
158         /*
159          *      Signal that there is a new synch command
160          */
161         rkt_writel(dev, InboundDoorbellReg, INBOUNDDOORBELL_0);
162
163         ok = 0;
164         start = jiffies;
165
166         /*
167          *      Wait up to 30 seconds
168          */
169         while (time_before(jiffies, start+30*HZ)) 
170         {
171                 udelay(5);      /* Delay 5 microseconds to let Mon960 get info. */
172                 /*
173                  *      Mon960 will set doorbell0 bit when it has completed the command.
174                  */
175                 if (rkt_readl(dev, OutboundDoorbellReg) & OUTBOUNDDOORBELL_0) {
176                         /*
177                          *      Clear the doorbell.
178                          */
179                         rkt_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
180                         ok = 1;
181                         break;
182                 }
183                 /*
184                  *      Yield the processor in case we are slow 
185                  */
186                 set_current_state(TASK_UNINTERRUPTIBLE);
187                 schedule_timeout(1);
188         }
189         if (ok != 1) {
190                 /*
191                  *      Restore interrupt mask even though we timed out
192                  */
193                 if (dev->new_comm_interface)
194                         rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);
195                 else
196                         rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);
197                 return -ETIMEDOUT;
198         }
199         /*
200          *      Pull the synch status from Mailbox 0.
201          */
202         if (status)
203                 *status = rkt_readl(dev, IndexRegs.Mailbox[0]);
204         if (r1)
205                 *r1 = rkt_readl(dev, IndexRegs.Mailbox[1]);
206         if (r2)
207                 *r2 = rkt_readl(dev, IndexRegs.Mailbox[2]);
208         if (r3)
209                 *r3 = rkt_readl(dev, IndexRegs.Mailbox[3]);
210         if (r4)
211                 *r4 = rkt_readl(dev, IndexRegs.Mailbox[4]);
212         /*
213          *      Clear the synch command doorbell.
214          */
215         rkt_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
216         /*
217          *      Restore interrupt mask
218          */
219         if (dev->new_comm_interface)
220                 rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);
221         else
222                 rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);
223         return 0;
224
225 }
226
227 /**
228  *      aac_rkt_interrupt_adapter       -       interrupt adapter
229  *      @dev: Adapter
230  *
231  *      Send an interrupt to the i960 and breakpoint it.
232  */
233
234 static void aac_rkt_interrupt_adapter(struct aac_dev *dev)
235 {
236         rkt_sync_cmd(dev, BREAKPOINT_REQUEST, 0, 0, 0, 0, 0, 0,
237           NULL, NULL, NULL, NULL, NULL);
238 }
239
240 /**
241  *      aac_rkt_notify_adapter          -       send an event to the adapter
242  *      @dev: Adapter
243  *      @event: Event to send
244  *
245  *      Notify the i960 that something it probably cares about has
246  *      happened.
247  */
248
249 static void aac_rkt_notify_adapter(struct aac_dev *dev, u32 event)
250 {
251         switch (event) {
252
253         case AdapNormCmdQue:
254                 rkt_writel(dev, MUnit.IDR,INBOUNDDOORBELL_1);
255                 break;
256         case HostNormRespNotFull:
257                 rkt_writel(dev, MUnit.IDR,INBOUNDDOORBELL_4);
258                 break;
259         case AdapNormRespQue:
260                 rkt_writel(dev, MUnit.IDR,INBOUNDDOORBELL_2);
261                 break;
262         case HostNormCmdNotFull:
263                 rkt_writel(dev, MUnit.IDR,INBOUNDDOORBELL_3);
264                 break;
265         case HostShutdown:
266 //              rkt_sync_cmd(dev, HOST_CRASHING, 0, 0, 0, 0, 0, 0,
267 //                NULL, NULL, NULL, NULL, NULL);
268                 break;
269         case FastIo:
270                 rkt_writel(dev, MUnit.IDR,INBOUNDDOORBELL_6);
271                 break;
272         case AdapPrintfDone:
273                 rkt_writel(dev, MUnit.IDR,INBOUNDDOORBELL_5);
274                 break;
275         default:
276                 BUG();
277                 break;
278         }
279 }
280
281 /**
282  *      aac_rkt_start_adapter           -       activate adapter
283  *      @dev:   Adapter
284  *
285  *      Start up processing on an i960 based AAC adapter
286  */
287
288 static void aac_rkt_start_adapter(struct aac_dev *dev)
289 {
290         struct aac_init *init;
291
292         init = dev->init;
293         init->HostElapsedSeconds = cpu_to_le32(get_seconds());
294         // We can only use a 32 bit address here
295         rkt_sync_cmd(dev, INIT_STRUCT_BASE_ADDRESS, (u32)(ulong)dev->init_pa,
296           0, 0, 0, 0, 0, NULL, NULL, NULL, NULL, NULL);
297 }
298
299 /**
300  *      aac_rkt_check_health
301  *      @dev: device to check if healthy
302  *
303  *      Will attempt to determine if the specified adapter is alive and
304  *      capable of handling requests, returning 0 if alive.
305  */
306 static int aac_rkt_check_health(struct aac_dev *dev)
307 {
308         u32 status = rkt_readl(dev, MUnit.OMRx[0]);
309
310         /*
311          *      Check to see if the board failed any self tests.
312          */
313         if (status & SELF_TEST_FAILED)
314                 return -1;
315         /*
316          *      Check to see if the board panic'd.
317          */
318         if (status & KERNEL_PANIC) {
319                 char * buffer;
320                 struct POSTSTATUS {
321                         __le32 Post_Command;
322                         __le32 Post_Address;
323                 } * post;
324                 dma_addr_t paddr, baddr;
325                 int ret;
326
327                 if ((status & 0xFF000000L) == 0xBC000000L)
328                         return (status >> 16) & 0xFF;
329                 buffer = pci_alloc_consistent(dev->pdev, 512, &baddr);
330                 ret = -2;
331                 if (buffer == NULL)
332                         return ret;
333                 post = pci_alloc_consistent(dev->pdev,
334                   sizeof(struct POSTSTATUS), &paddr);
335                 if (post == NULL) {
336                         pci_free_consistent(dev->pdev, 512, buffer, baddr);
337                         return ret;
338                 }
339                 memset(buffer, 0, 512);
340                 post->Post_Command = cpu_to_le32(COMMAND_POST_RESULTS);
341                 post->Post_Address = cpu_to_le32(baddr);
342                 rkt_writel(dev, MUnit.IMRx[0], paddr);
343                 rkt_sync_cmd(dev, COMMAND_POST_RESULTS, baddr, 0, 0, 0, 0, 0,
344                   NULL, NULL, NULL, NULL, NULL);
345                 pci_free_consistent(dev->pdev, sizeof(struct POSTSTATUS),
346                   post, paddr);
347                 if ((buffer[0] == '0') && (buffer[1] == 'x')) {
348                         ret = (buffer[2] <= '9') ? (buffer[2] - '0') : (buffer[2] - 'A' + 10);
349                         ret <<= 4;
350                         ret += (buffer[3] <= '9') ? (buffer[3] - '0') : (buffer[3] - 'A' + 10);
351                 }
352                 pci_free_consistent(dev->pdev, 512, buffer, baddr);
353                 return ret;
354         }
355         /*
356          *      Wait for the adapter to be up and running.
357          */
358         if (!(status & KERNEL_UP_AND_RUNNING))
359                 return -3;
360         /*
361          *      Everything is OK
362          */
363         return 0;
364 }
365
366 /**
367  *      aac_rkt_send
368  *      @fib: fib to issue
369  *
370  *      Will send a fib, returning 0 if successful.
371  */
372 static int aac_rkt_send(struct fib * fib)
373 {
374         u64 addr = fib->hw_fib_pa;
375         struct aac_dev *dev = fib->dev;
376         volatile void __iomem *device = dev->regs.rkt;
377         u32 Index;
378
379         dprintk((KERN_DEBUG "%p->aac_rkt_send(%p->%llx)\n", dev, fib, addr));
380         Index = rkt_readl(dev, MUnit.InboundQueue);
381         if (Index == 0xFFFFFFFFL)
382                 Index = rkt_readl(dev, MUnit.InboundQueue);
383         dprintk((KERN_DEBUG "Index = 0x%x\n", Index));
384         if (Index == 0xFFFFFFFFL)
385                 return Index;
386         device += Index;
387         dprintk((KERN_DEBUG "entry = %x %x %u\n", (u32)(addr & 0xffffffff),
388           (u32)(addr >> 32), (u32)le16_to_cpu(fib->hw_fib->header.Size)));
389         writel((u32)(addr & 0xffffffff), device);
390         device += sizeof(u32);
391         writel((u32)(addr >> 32), device);
392         device += sizeof(u32);
393         writel(le16_to_cpu(fib->hw_fib->header.Size), device);
394         rkt_writel(dev, MUnit.InboundQueue, Index);
395         dprintk((KERN_DEBUG "aac_rkt_send - return 0\n"));
396         return 0;
397 }
398
399 /**
400  *      aac_rkt_init    -       initialize an i960 based AAC card
401  *      @dev: device to configure
402  *
403  *      Allocate and set up resources for the i960 based AAC variants. The 
404  *      device_interface in the commregion will be allocated and linked 
405  *      to the comm region.
406  */
407
408 int aac_rkt_init(struct aac_dev *dev)
409 {
410         unsigned long start;
411         unsigned long status;
412         int instance;
413         const char * name;
414
415         instance = dev->id;
416         name     = dev->name;
417
418         /*
419          *      Check to see if the board panic'd while booting.
420          */
421         /*
422          *      Check to see if the board failed any self tests.
423          */
424         if (rkt_readl(dev, MUnit.OMRx[0]) & SELF_TEST_FAILED) {
425                 printk(KERN_ERR "%s%d: adapter self-test failed.\n", dev->name, instance);
426                 goto error_iounmap;
427         }
428         /*
429          *      Check to see if the monitor panic'd while booting.
430          */
431         if (rkt_readl(dev, MUnit.OMRx[0]) & MONITOR_PANIC) {
432                 printk(KERN_ERR "%s%d: adapter monitor panic.\n", dev->name, instance);
433                 goto error_iounmap;
434         }
435         /*
436          *      Check to see if the board panic'd while booting.
437          */
438         if (rkt_readl(dev, MUnit.OMRx[0]) & KERNEL_PANIC) {
439                 printk(KERN_ERR "%s%d: adapter kernel panic'd.\n", dev->name, instance);
440                 goto error_iounmap;
441         }
442         start = jiffies;
443         /*
444          *      Wait for the adapter to be up and running. Wait up to 3 minutes
445          */
446         while (!(rkt_readl(dev, MUnit.OMRx[0]) & KERNEL_UP_AND_RUNNING))
447         {
448                 if(time_after(jiffies, start+180*HZ))
449                 {
450                         status = rkt_readl(dev, MUnit.OMRx[0]);
451                         printk(KERN_ERR "%s%d: adapter kernel failed to start, init status = %lx.\n", 
452                                         dev->name, instance, status);
453                         goto error_iounmap;
454                 }
455                 set_current_state(TASK_UNINTERRUPTIBLE);
456                 schedule_timeout(1);
457         }
458         if (request_irq(dev->scsi_host_ptr->irq, aac_rkt_intr, SA_SHIRQ|SA_INTERRUPT, "aacraid", (void *)dev)<0) 
459         {
460                 printk(KERN_ERR "%s%d: Interrupt unavailable.\n", name, instance);
461                 goto error_iounmap;
462         }
463         /*
464          *      Fill in the function dispatch table.
465          */
466         dev->a_ops.adapter_interrupt = aac_rkt_interrupt_adapter;
467         dev->a_ops.adapter_disable_int = aac_rkt_disable_interrupt;
468         dev->a_ops.adapter_notify = aac_rkt_notify_adapter;
469         dev->a_ops.adapter_sync_cmd = rkt_sync_cmd;
470         dev->a_ops.adapter_check_health = aac_rkt_check_health;
471         dev->a_ops.adapter_send = aac_rkt_send;
472
473         /*
474          *      First clear out all interrupts.  Then enable the one's that we
475          *      can handle.
476          */
477         rkt_writeb(dev, MUnit.OIMR, 0xff);
478         rkt_writel(dev, MUnit.ODR, 0xffffffff);
479         rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);
480
481         if (aac_init_adapter(dev) == NULL)
482                 goto error_irq;
483         if (dev->new_comm_interface) {
484                 /*
485                  * FIB Setup has already been done, but we can minimize the
486                  * damage by at least ensuring the OS never issues more
487                  * commands than we can handle. The Rocket adapters currently
488                  * can only handle 246 commands and 8 AIFs at the same time,
489                  * and in fact do notify us accordingly if we negotiate the
490                  * FIB size. The problem that causes us to add this check is
491                  * to ensure that we do not overdo it with the adapter when a
492                  * hard coded FIB override is being utilized. This special
493                  * case warrants this half baked, but convenient, check here.
494                  */
495                 if (dev->scsi_host_ptr->can_queue > (246 - AAC_NUM_MGT_FIB)) {
496                         dev->init->MaxIoCommands = cpu_to_le32(246);
497                         dev->scsi_host_ptr->can_queue = 246 - AAC_NUM_MGT_FIB;
498                 }
499                 rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);
500         }
501         /*
502          *      Tell the adapter that all is configured, and it can start
503          *      accepting requests
504          */
505         aac_rkt_start_adapter(dev);
506         return 0;
507
508 error_irq:
509         rkt_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
510         free_irq(dev->scsi_host_ptr->irq, (void *)dev);
511
512 error_iounmap:
513
514         return -1;
515 }