?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Full support for Ginger Console
[linux-ginger.git] / drivers / scsi / dpt_i2o.c
blobb6af63ca980b4f1cb6be6acb2ca6762fe3f67548
1 /***************************************************************************
2 dpti.c - description
3 -------------------
4 begin : Thu Sep 7 2000
5 copyright : (C) 2000 by Adaptec
6
7 July 30, 2001 First version being submitted
8 for inclusion in the kernel. V2.4
9
10 See Documentation/scsi/dpti.txt for history, notes, license info
11 and credits
12 ***************************************************************************/
13
14 /***************************************************************************
15 * *
16 * This program is free software; you can redistribute it and/or modify *
17 * it under the terms of the GNU General Public License as published by *
18 * the Free Software Foundation; either version 2 of the License, or *
19 * (at your option) any later version. *
20 * *
21 ***************************************************************************/
22 /***************************************************************************
23 * Sat Dec 20 2003 Go Taniguchi <go@turbolinux.co.jp>
24 - Support 2.6 kernel and DMA-mapping
25 - ioctl fix for raid tools
26 - use schedule_timeout in long long loop
27 **************************************************************************/
28
29 /*#define DEBUG 1 */
30 /*#define UARTDELAY 1 */
31
32 #include <linux/module.h>
33
34 MODULE_AUTHOR("Deanna Bonds, with _lots_ of help from Mark Salyzyn");
35 MODULE_DESCRIPTION("Adaptec I2O RAID Driver");
36
37 ////////////////////////////////////////////////////////////////
38
39 #include <linux/ioctl.h> /* For SCSI-Passthrough */
40 #include <asm/uaccess.h>
41
42 #include <linux/stat.h>
43 #include <linux/slab.h> /* for kmalloc() */
44 #include <linux/pci.h> /* for PCI support */
45 #include <linux/proc_fs.h>
46 #include <linux/blkdev.h>
47 #include <linux/delay.h> /* for udelay */
48 #include <linux/interrupt.h>
49 #include <linux/kernel.h> /* for printk */
50 #include <linux/sched.h>
51 #include <linux/reboot.h>
52 #include <linux/smp_lock.h>
53 #include <linux/spinlock.h>
54 #include <linux/dma-mapping.h>
55
56 #include <linux/timer.h>
57 #include <linux/string.h>
58 #include <linux/ioport.h>
59 #include <linux/mutex.h>
60
61 #include <asm/processor.h> /* for boot_cpu_data */
62 #include <asm/pgtable.h>
63 #include <asm/io.h> /* for virt_to_bus, etc. */
64
65 #include <scsi/scsi.h>
66 #include <scsi/scsi_cmnd.h>
67 #include <scsi/scsi_device.h>
68 #include <scsi/scsi_host.h>
69 #include <scsi/scsi_tcq.h>
70
71 #include "dpt/dptsig.h"
72 #include "dpti.h"
73
74 /*============================================================================
75 * Create a binary signature - this is read by dptsig
76 * Needed for our management apps
77 *============================================================================
78 */
79 static dpt_sig_S DPTI_sig = {
80 {'d', 'P', 't', 'S', 'i', 'G'}, SIG_VERSION,
81 #ifdef __i386__
82 PROC_INTEL, PROC_386 | PROC_486 | PROC_PENTIUM | PROC_SEXIUM,
83 #elif defined(__ia64__)
84 PROC_INTEL, PROC_IA64,
85 #elif defined(__sparc__)
86 PROC_ULTRASPARC, PROC_ULTRASPARC,
87 #elif defined(__alpha__)
88 PROC_ALPHA, PROC_ALPHA,
89 #else
90 (-1),(-1),
91 #endif
92 FT_HBADRVR, 0, OEM_DPT, OS_LINUX, CAP_OVERLAP, DEV_ALL,
93 ADF_ALL_SC5, 0, 0, DPT_VERSION, DPT_REVISION, DPT_SUBREVISION,
94 DPT_MONTH, DPT_DAY, DPT_YEAR, "Adaptec Linux I2O RAID Driver"
95 };
96
97
98
99
100 /*============================================================================
101 * Globals
102 *============================================================================
103 */
104
105 static DEFINE_MUTEX(adpt_configuration_lock);
106
107 static struct i2o_sys_tbl *sys_tbl;
108 static dma_addr_t sys_tbl_pa;
109 static int sys_tbl_ind;
110 static int sys_tbl_len;
111
112 static adpt_hba* hba_chain = NULL;
113 static int hba_count = 0;
114
115 static struct class *adpt_sysfs_class;
116
117 #ifdef CONFIG_COMPAT
118 static long compat_adpt_ioctl(struct file *, unsigned int, unsigned long);
119 #endif
120
121 static const struct file_operations adpt_fops = {
122 .ioctl = adpt_ioctl,
123 .open = adpt_open,
124 .release = adpt_close,
125 #ifdef CONFIG_COMPAT
126 .compat_ioctl = compat_adpt_ioctl,
127 #endif
128 };
129
130 /* Structures and definitions for synchronous message posting.
131 * See adpt_i2o_post_wait() for description
132 * */
133 struct adpt_i2o_post_wait_data
134 {
135 int status;
136 u32 id;
137 adpt_wait_queue_head_t *wq;
138 struct adpt_i2o_post_wait_data *next;
139 };
140
141 static struct adpt_i2o_post_wait_data *adpt_post_wait_queue = NULL;
142 static u32 adpt_post_wait_id = 0;
143 static DEFINE_SPINLOCK(adpt_post_wait_lock);
144
145
146 /*============================================================================
147 * Functions
148 *============================================================================
149 */
150
151 static inline int dpt_dma64(adpt_hba *pHba)
152 {
153 return (sizeof(dma_addr_t) > 4 && (pHba)->dma64);
154 }
155
156 static inline u32 dma_high(dma_addr_t addr)
157 {
158 return upper_32_bits(addr);
159 }
160
161 static inline u32 dma_low(dma_addr_t addr)
162 {
163 return (u32)addr;
164 }
165
166 static u8 adpt_read_blink_led(adpt_hba* host)
167 {
168 if (host->FwDebugBLEDflag_P) {
169 if( readb(host->FwDebugBLEDflag_P) == 0xbc ){
170 return readb(host->FwDebugBLEDvalue_P);
171 }
172 }
173 return 0;
174 }
175
176 /*============================================================================
177 * Scsi host template interface functions
178 *============================================================================
179 */
180
181 static struct pci_device_id dptids[] = {
182 { PCI_DPT_VENDOR_ID, PCI_DPT_DEVICE_ID, PCI_ANY_ID, PCI_ANY_ID,},
183 { PCI_DPT_VENDOR_ID, PCI_DPT_RAPTOR_DEVICE_ID, PCI_ANY_ID, PCI_ANY_ID,},
184 { 0, }
185 };
186 MODULE_DEVICE_TABLE(pci,dptids);
187
188 static int adpt_detect(struct scsi_host_template* sht)
189 {
190 struct pci_dev *pDev = NULL;
191 adpt_hba* pHba;
192
193 PINFO("Detecting Adaptec I2O RAID controllers...\n");
194
195 /* search for all Adatpec I2O RAID cards */
196 while ((pDev = pci_get_device( PCI_DPT_VENDOR_ID, PCI_ANY_ID, pDev))) {
197 if(pDev->device == PCI_DPT_DEVICE_ID ||
198 pDev->device == PCI_DPT_RAPTOR_DEVICE_ID){
199 if(adpt_install_hba(sht, pDev) ){
200 PERROR("Could not Init an I2O RAID device\n");
201 PERROR("Will not try to detect others.\n");
202 return hba_count-1;
203 }
204 pci_dev_get(pDev);
205 }
206 }
207
208 /* In INIT state, Activate IOPs */
209 for (pHba = hba_chain; pHba; pHba = pHba->next) {
210 // Activate does get status , init outbound, and get hrt
211 if (adpt_i2o_activate_hba(pHba) < 0) {
212 adpt_i2o_delete_hba(pHba);
213 }
214 }
215
216
217 /* Active IOPs in HOLD state */
218
219 rebuild_sys_tab:
220 if (hba_chain == NULL)
221 return 0;
222
223 /*
224 * If build_sys_table fails, we kill everything and bail
225 * as we can't init the IOPs w/o a system table
226 */
227 if (adpt_i2o_build_sys_table() < 0) {
228 adpt_i2o_sys_shutdown();
229 return 0;
230 }
231
232 PDEBUG("HBA's in HOLD state\n");
233
234 /* If IOP don't get online, we need to rebuild the System table */
235 for (pHba = hba_chain; pHba; pHba = pHba->next) {
236 if (adpt_i2o_online_hba(pHba) < 0) {
237 adpt_i2o_delete_hba(pHba);
238 goto rebuild_sys_tab;
239 }
240 }
241
242 /* Active IOPs now in OPERATIONAL state */
243 PDEBUG("HBA's in OPERATIONAL state\n");
244
245 printk("dpti: If you have a lot of devices this could take a few minutes.\n");
246 for (pHba = hba_chain; pHba; pHba = pHba->next) {
247 printk(KERN_INFO"%s: Reading the hardware resource table.\n", pHba->name);
248 if (adpt_i2o_lct_get(pHba) < 0){
249 adpt_i2o_delete_hba(pHba);
250 continue;
251 }
252
253 if (adpt_i2o_parse_lct(pHba) < 0){
254 adpt_i2o_delete_hba(pHba);
255 continue;
256 }
257 adpt_inquiry(pHba);
258 }
259
260 adpt_sysfs_class = class_create(THIS_MODULE, "dpt_i2o");
261 if (IS_ERR(adpt_sysfs_class)) {
262 printk(KERN_WARNING"dpti: unable to create dpt_i2o class\n");
263 adpt_sysfs_class = NULL;
264 }
265
266 for (pHba = hba_chain; pHba; pHba = pHba->next) {
267 if (adpt_scsi_host_alloc(pHba, sht) < 0){
268 adpt_i2o_delete_hba(pHba);
269 continue;
270 }
271 pHba->initialized = TRUE;
272 pHba->state &= ~DPTI_STATE_RESET;
273 if (adpt_sysfs_class) {
274 struct device *dev = device_create(adpt_sysfs_class,
275 NULL, MKDEV(DPTI_I2O_MAJOR, pHba->unit), NULL,
276 "dpti%d", pHba->unit);
277 if (IS_ERR(dev)) {
278 printk(KERN_WARNING"dpti%d: unable to "
279 "create device in dpt_i2o class\n",
280 pHba->unit);
281 }
282 }
283 }
284
285 // Register our control device node
286 // nodes will need to be created in /dev to access this
287 // the nodes can not be created from within the driver
288 if (hba_count && register_chrdev(DPTI_I2O_MAJOR, DPT_DRIVER, &adpt_fops)) {
289 adpt_i2o_sys_shutdown();
290 return 0;
291 }
292 return hba_count;
293 }
294
295
296 /*
297 * scsi_unregister will be called AFTER we return.
298 */
299 static int adpt_release(struct Scsi_Host *host)
300 {
301 adpt_hba* pHba = (adpt_hba*) host->hostdata[0];
302 // adpt_i2o_quiesce_hba(pHba);
303 adpt_i2o_delete_hba(pHba);
304 scsi_unregister(host);
305 return 0;
306 }
307
308
309 static void adpt_inquiry(adpt_hba* pHba)
310 {
311 u32 msg[17];
312 u32 *mptr;
313 u32 *lenptr;
314 int direction;
315 int scsidir;
316 u32 len;
317 u32 reqlen;
318 u8* buf;
319 dma_addr_t addr;
320 u8 scb[16];
321 s32 rcode;
322
323 memset(msg, 0, sizeof(msg));
324 buf = dma_alloc_coherent(&pHba->pDev->dev, 80, &addr, GFP_KERNEL);
325 if(!buf){
326 printk(KERN_ERR"%s: Could not allocate buffer\n",pHba->name);
327 return;
328 }
329 memset((void*)buf, 0, 36);
330
331 len = 36;
332 direction = 0x00000000;
333 scsidir =0x40000000; // DATA IN (iop<--dev)
334
335 if (dpt_dma64(pHba))
336 reqlen = 17; // SINGLE SGE, 64 bit
337 else
338 reqlen = 14; // SINGLE SGE, 32 bit
339 /* Stick the headers on */
340 msg[0] = reqlen<<16 | SGL_OFFSET_12;
341 msg[1] = (0xff<<24|HOST_TID<<12|ADAPTER_TID);
342 msg[2] = 0;
343 msg[3] = 0;
344 // Adaptec/DPT Private stuff
345 msg[4] = I2O_CMD_SCSI_EXEC|DPT_ORGANIZATION_ID<<16;
346 msg[5] = ADAPTER_TID | 1<<16 /* Interpret*/;
347 /* Direction, disconnect ok | sense data | simple queue , CDBLen */
348 // I2O_SCB_FLAG_ENABLE_DISCONNECT |
349 // I2O_SCB_FLAG_SIMPLE_QUEUE_TAG |
350 // I2O_SCB_FLAG_SENSE_DATA_IN_MESSAGE;
351 msg[6] = scsidir|0x20a00000| 6 /* cmd len*/;
352
353 mptr=msg+7;
354
355 memset(scb, 0, sizeof(scb));
356 // Write SCSI command into the message - always 16 byte block
357 scb[0] = INQUIRY;
358 scb[1] = 0;
359 scb[2] = 0;
360 scb[3] = 0;
361 scb[4] = 36;
362 scb[5] = 0;
363 // Don't care about the rest of scb
364
365 memcpy(mptr, scb, sizeof(scb));
366 mptr+=4;
367 lenptr=mptr++; /* Remember me - fill in when we know */
368
369 /* Now fill in the SGList and command */
370 *lenptr = len;
371 if (dpt_dma64(pHba)) {
372 *mptr++ = (0x7C<<24)+(2<<16)+0x02; /* Enable 64 bit */
373 *mptr++ = 1 << PAGE_SHIFT;
374 *mptr++ = 0xD0000000|direction|len;
375 *mptr++ = dma_low(addr);
376 *mptr++ = dma_high(addr);
377 } else {
378 *mptr++ = 0xD0000000|direction|len;
379 *mptr++ = addr;
380 }
381
382 // Send it on it's way
383 rcode = adpt_i2o_post_wait(pHba, msg, reqlen<<2, 120);
384 if (rcode != 0) {
385 sprintf(pHba->detail, "Adaptec I2O RAID");
386 printk(KERN_INFO "%s: Inquiry Error (%d)\n",pHba->name,rcode);
387 if (rcode != -ETIME && rcode != -EINTR)
388 dma_free_coherent(&pHba->pDev->dev, 80, buf, addr);
389 } else {
390 memset(pHba->detail, 0, sizeof(pHba->detail));
391 memcpy(&(pHba->detail), "Vendor: Adaptec ", 16);
392 memcpy(&(pHba->detail[16]), " Model: ", 8);
393 memcpy(&(pHba->detail[24]), (u8*) &buf[16], 16);
394 memcpy(&(pHba->detail[40]), " FW: ", 4);
395 memcpy(&(pHba->detail[44]), (u8*) &buf[32], 4);
396 pHba->detail[48] = '\0'; /* precautionary */
397 dma_free_coherent(&pHba->pDev->dev, 80, buf, addr);
398 }
399 adpt_i2o_status_get(pHba);
400 return ;
401 }
402
403
404 static int adpt_slave_configure(struct scsi_device * device)
405 {
406 struct Scsi_Host *host = device->host;
407 adpt_hba* pHba;
408
409 pHba = (adpt_hba *) host->hostdata[0];
410
411 if (host->can_queue && device->tagged_supported) {
412 scsi_adjust_queue_depth(device, MSG_SIMPLE_TAG,
413 host->can_queue - 1);
414 } else {
415 scsi_adjust_queue_depth(device, 0, 1);
416 }
417 return 0;
418 }
419
420 static int adpt_queue(struct scsi_cmnd * cmd, void (*done) (struct scsi_cmnd *))
421 {
422 adpt_hba* pHba = NULL;
423 struct adpt_device* pDev = NULL; /* dpt per device information */
424
425 cmd->scsi_done = done;
426 /*
427 * SCSI REQUEST_SENSE commands will be executed automatically by the
428 * Host Adapter for any errors, so they should not be executed
429 * explicitly unless the Sense Data is zero indicating that no error
430 * occurred.
431 */
432
433 if ((cmd->cmnd[0] == REQUEST_SENSE) && (cmd->sense_buffer[0] != 0)) {
434 cmd->result = (DID_OK << 16);
435 cmd->scsi_done(cmd);
436 return 0;
437 }
438
439 pHba = (adpt_hba*)cmd->device->host->hostdata[0];
440 if (!pHba) {
441 return FAILED;
442 }
443
444 rmb();
445 /*
446 * TODO: I need to block here if I am processing ioctl cmds
447 * but if the outstanding cmds all finish before the ioctl,
448 * the scsi-core will not know to start sending cmds to me again.
449 * I need to a way to restart the scsi-cores queues or should I block
450 * calling scsi_done on the outstanding cmds instead
451 * for now we don't set the IOCTL state
452 */
453 if(((pHba->state) & DPTI_STATE_IOCTL) || ((pHba->state) & DPTI_STATE_RESET)) {
454 pHba->host->last_reset = jiffies;
455 pHba->host->resetting = 1;
456 return 1;
457 }
458
459 // TODO if the cmd->device if offline then I may need to issue a bus rescan
460 // followed by a get_lct to see if the device is there anymore
461 if((pDev = (struct adpt_device*) (cmd->device->hostdata)) == NULL) {
462 /*
463 * First command request for this device. Set up a pointer
464 * to the device structure. This should be a TEST_UNIT_READY
465 * command from scan_scsis_single.
466 */
467 if ((pDev = adpt_find_device(pHba, (u32)cmd->device->channel, (u32)cmd->device->id, (u32)cmd->device->lun)) == NULL) {
468 // TODO: if any luns are at this bus, scsi id then fake a TEST_UNIT_READY and INQUIRY response
469 // with type 7F (for all luns less than the max for this bus,id) so the lun scan will continue.
470 cmd->result = (DID_NO_CONNECT << 16);
471 cmd->scsi_done(cmd);
472 return 0;
473 }
474 cmd->device->hostdata = pDev;
475 }
476 pDev->pScsi_dev = cmd->device;
477
478 /*
479 * If we are being called from when the device is being reset,
480 * delay processing of the command until later.
481 */
482 if (pDev->state & DPTI_DEV_RESET ) {
483 return FAILED;
484 }
485 return adpt_scsi_to_i2o(pHba, cmd, pDev);
486 }
487
488 static int adpt_bios_param(struct scsi_device *sdev, struct block_device *dev,
489 sector_t capacity, int geom[])
490 {
491 int heads=-1;
492 int sectors=-1;
493 int cylinders=-1;
494
495 // *** First lets set the default geometry ****
496
497 // If the capacity is less than ox2000
498 if (capacity < 0x2000 ) { // floppy
499 heads = 18;
500 sectors = 2;
501 }
502 // else if between 0x2000 and 0x20000
503 else if (capacity < 0x20000) {
504 heads = 64;
505 sectors = 32;
506 }
507 // else if between 0x20000 and 0x40000
508 else if (capacity < 0x40000) {
509 heads = 65;
510 sectors = 63;
511 }
512 // else if between 0x4000 and 0x80000
513 else if (capacity < 0x80000) {
514 heads = 128;
515 sectors = 63;
516 }
517 // else if greater than 0x80000
518 else {
519 heads = 255;
520 sectors = 63;
521 }
522 cylinders = sector_div(capacity, heads * sectors);
523
524 // Special case if CDROM
525 if(sdev->type == 5) { // CDROM
526 heads = 252;
527 sectors = 63;
528 cylinders = 1111;
529 }
530
531 geom[0] = heads;
532 geom[1] = sectors;
533 geom[2] = cylinders;
534
535 PDEBUG("adpt_bios_param: exit\n");
536 return 0;
537 }
538
539
540 static const char *adpt_info(struct Scsi_Host *host)
541 {
542 adpt_hba* pHba;
543
544 pHba = (adpt_hba *) host->hostdata[0];
545 return (char *) (pHba->detail);
546 }
547
548 static int adpt_proc_info(struct Scsi_Host *host, char *buffer, char **start, off_t offset,
549 int length, int inout)
550 {
551 struct adpt_device* d;
552 int id;
553 int chan;
554 int len = 0;
555 int begin = 0;
556 int pos = 0;
557 adpt_hba* pHba;
558 int unit;
559
560 *start = buffer;
561 if (inout == TRUE) {
562 /*
563 * The user has done a write and wants us to take the
564 * data in the buffer and do something with it.
565 * proc_scsiwrite calls us with inout = 1
566 *
567 * Read data from buffer (writing to us) - NOT SUPPORTED
568 */
569 return -EINVAL;
570 }
571
572 /*
573 * inout = 0 means the user has done a read and wants information
574 * returned, so we write information about the cards into the buffer
575 * proc_scsiread() calls us with inout = 0
576 */
577
578 // Find HBA (host bus adapter) we are looking for
579 mutex_lock(&adpt_configuration_lock);
580 for (pHba = hba_chain; pHba; pHba = pHba->next) {
581 if (pHba->host == host) {
582 break; /* found adapter */
583 }
584 }
585 mutex_unlock(&adpt_configuration_lock);
586 if (pHba == NULL) {
587 return 0;
588 }
589 host = pHba->host;
590
591 len = sprintf(buffer , "Adaptec I2O RAID Driver Version: %s\n\n", DPT_I2O_VERSION);
592 len += sprintf(buffer+len, "%s\n", pHba->detail);
593 len += sprintf(buffer+len, "SCSI Host=scsi%d Control Node=/dev/%s irq=%d\n",
594 pHba->host->host_no, pHba->name, host->irq);
595 len += sprintf(buffer+len, "\tpost fifo size = %d\n\treply fifo size = %d\n\tsg table size = %d\n\n",
596 host->can_queue, (int) pHba->reply_fifo_size , host->sg_tablesize);
597
598 pos = begin + len;
599
600 /* CHECKPOINT */
601 if(pos > offset + length) {
602 goto stop_output;
603 }
604 if(pos <= offset) {
605 /*
606 * If we haven't even written to where we last left
607 * off (the last time we were called), reset the
608 * beginning pointer.
609 */
610 len = 0;
611 begin = pos;
612 }
613 len += sprintf(buffer+len, "Devices:\n");
614 for(chan = 0; chan < MAX_CHANNEL; chan++) {
615 for(id = 0; id < MAX_ID; id++) {
616 d = pHba->channel[chan].device[id];
617 while(d){
618 len += sprintf(buffer+len,"\t%-24.24s", d->pScsi_dev->vendor);
619 len += sprintf(buffer+len," Rev: %-8.8s\n", d->pScsi_dev->rev);
620 pos = begin + len;
621
622
623 /* CHECKPOINT */
624 if(pos > offset + length) {
625 goto stop_output;
626 }
627 if(pos <= offset) {
628 len = 0;
629 begin = pos;
630 }
631
632 unit = d->pI2o_dev->lct_data.tid;
633 len += sprintf(buffer+len, "\tTID=%d, (Channel=%d, Target=%d, Lun=%d) (%s)\n\n",
634 unit, (int)d->scsi_channel, (int)d->scsi_id, (int)d->scsi_lun,
635 scsi_device_online(d->pScsi_dev)? "online":"offline");
636 pos = begin + len;
637
638 /* CHECKPOINT */
639 if(pos > offset + length) {
640 goto stop_output;
641 }
642 if(pos <= offset) {
643 len = 0;
644 begin = pos;
645 }
646
647 d = d->next_lun;
648 }
649 }
650 }
651
652 /*
653 * begin is where we last checked our position with regards to offset
654 * begin is always less than offset. len is relative to begin. It
655 * is the number of bytes written past begin
656 *
657 */
658 stop_output:
659 /* stop the output and calculate the correct length */
660 *(buffer + len) = '\0';
661
662 *start = buffer + (offset - begin); /* Start of wanted data */
663 len -= (offset - begin);
664 if(len > length) {
665 len = length;
666 } else if(len < 0){
667 len = 0;
668 **start = '\0';
669 }
670 return len;
671 }
672
673 /*
674 * Turn a struct scsi_cmnd * into a unique 32 bit 'context'.
675 */
676 static u32 adpt_cmd_to_context(struct scsi_cmnd *cmd)
677 {
678 return (u32)cmd->serial_number;
679 }
680
681 /*
682 * Go from a u32 'context' to a struct scsi_cmnd * .
683 * This could probably be made more efficient.
684 */
685 static struct scsi_cmnd *
686 adpt_cmd_from_context(adpt_hba * pHba, u32 context)
687 {
688 struct scsi_cmnd * cmd;
689 struct scsi_device * d;
690
691 if (context == 0)
692 return NULL;
693
694 spin_unlock(pHba->host->host_lock);
695 shost_for_each_device(d, pHba->host) {
696 unsigned long flags;
697 spin_lock_irqsave(&d->list_lock, flags);
698 list_for_each_entry(cmd, &d->cmd_list, list) {
699 if (((u32)cmd->serial_number == context)) {
700 spin_unlock_irqrestore(&d->list_lock, flags);
701 scsi_device_put(d);
702 spin_lock(pHba->host->host_lock);
703 return cmd;
704 }
705 }
706 spin_unlock_irqrestore(&d->list_lock, flags);
707 }
708 spin_lock(pHba->host->host_lock);
709
710 return NULL;
711 }
712
713 /*
714 * Turn a pointer to ioctl reply data into an u32 'context'
715 */
716 static u32 adpt_ioctl_to_context(adpt_hba * pHba, void *reply)
717 {
718 #if BITS_PER_LONG == 32
719 return (u32)(unsigned long)reply;
720 #else
721 ulong flags = 0;
722 u32 nr, i;
723
724 spin_lock_irqsave(pHba->host->host_lock, flags);
725 nr = ARRAY_SIZE(pHba->ioctl_reply_context);
726 for (i = 0; i < nr; i++) {
727 if (pHba->ioctl_reply_context[i] == NULL) {
728 pHba->ioctl_reply_context[i] = reply;
729 break;
730 }
731 }
732 spin_unlock_irqrestore(pHba->host->host_lock, flags);
733 if (i >= nr) {
734 kfree (reply);
735 printk(KERN_WARNING"%s: Too many outstanding "
736 "ioctl commands\n", pHba->name);
737 return (u32)-1;
738 }
739
740 return i;
741 #endif
742 }
743
744 /*
745 * Go from an u32 'context' to a pointer to ioctl reply data.
746 */
747 static void *adpt_ioctl_from_context(adpt_hba *pHba, u32 context)
748 {
749 #if BITS_PER_LONG == 32
750 return (void *)(unsigned long)context;
751 #else
752 void *p = pHba->ioctl_reply_context[context];
753 pHba->ioctl_reply_context[context] = NULL;
754
755 return p;
756 #endif
757 }
758
759 /*===========================================================================
760 * Error Handling routines
761 *===========================================================================
762 */
763
764 static int adpt_abort(struct scsi_cmnd * cmd)
765 {
766 adpt_hba* pHba = NULL; /* host bus adapter structure */
767 struct adpt_device* dptdevice; /* dpt per device information */
768 u32 msg[5];
769 int rcode;
770
771 if(cmd->serial_number == 0){
772 return FAILED;
773 }
774 pHba = (adpt_hba*) cmd->device->host->hostdata[0];
775 printk(KERN_INFO"%s: Trying to Abort cmd=%ld\n",pHba->name, cmd->serial_number);
776 if ((dptdevice = (void*) (cmd->device->hostdata)) == NULL) {
777 printk(KERN_ERR "%s: Unable to abort: No device in cmnd\n",pHba->name);
778 return FAILED;
779 }
780
781 memset(msg, 0, sizeof(msg));
782 msg[0] = FIVE_WORD_MSG_SIZE|SGL_OFFSET_0;
783 msg[1] = I2O_CMD_SCSI_ABORT<<24|HOST_TID<<12|dptdevice->tid;
784 msg[2] = 0;
785 msg[3]= 0;
786 msg[4] = adpt_cmd_to_context(cmd);
787 if (pHba->host)
788 spin_lock_irq(pHba->host->host_lock);
789 rcode = adpt_i2o_post_wait(pHba, msg, sizeof(msg), FOREVER);
790 if (pHba->host)
791 spin_unlock_irq(pHba->host->host_lock);
792 if (rcode != 0) {
793 if(rcode == -EOPNOTSUPP ){
794 printk(KERN_INFO"%s: Abort cmd not supported\n",pHba->name);
795 return FAILED;
796 }
797 printk(KERN_INFO"%s: Abort cmd=%ld failed.\n",pHba->name, cmd->serial_number);
798 return FAILED;
799 }
800 printk(KERN_INFO"%s: Abort cmd=%ld complete.\n",pHba->name, cmd->serial_number);
801 return SUCCESS;
802 }
803
804
805 #define I2O_DEVICE_RESET 0x27
806 // This is the same for BLK and SCSI devices
807 // NOTE this is wrong in the i2o.h definitions
808 // This is not currently supported by our adapter but we issue it anyway
809 static int adpt_device_reset(struct scsi_cmnd* cmd)
810 {
811 adpt_hba* pHba;
812 u32 msg[4];
813 u32 rcode;
814 int old_state;
815 struct adpt_device* d = cmd->device->hostdata;
816
817 pHba = (void*) cmd->device->host->hostdata[0];
818 printk(KERN_INFO"%s: Trying to reset device\n",pHba->name);
819 if (!d) {
820 printk(KERN_INFO"%s: Reset Device: Device Not found\n",pHba->name);
821 return FAILED;
822 }
823 memset(msg, 0, sizeof(msg));
824 msg[0] = FOUR_WORD_MSG_SIZE|SGL_OFFSET_0;
825 msg[1] = (I2O_DEVICE_RESET<<24|HOST_TID<<12|d->tid);
826 msg[2] = 0;
827 msg[3] = 0;
828
829 if (pHba->host)
830 spin_lock_irq(pHba->host->host_lock);
831 old_state = d->state;
832 d->state |= DPTI_DEV_RESET;
833 rcode = adpt_i2o_post_wait(pHba, msg,sizeof(msg), FOREVER);
834 d->state = old_state;
835 if (pHba->host)
836 spin_unlock_irq(pHba->host->host_lock);
837 if (rcode != 0) {
838 if(rcode == -EOPNOTSUPP ){
839 printk(KERN_INFO"%s: Device reset not supported\n",pHba->name);
840 return FAILED;
841 }
842 printk(KERN_INFO"%s: Device reset failed\n",pHba->name);
843 return FAILED;
844 } else {
845 printk(KERN_INFO"%s: Device reset successful\n",pHba->name);
846 return SUCCESS;
847 }
848 }
849
850
851 #define I2O_HBA_BUS_RESET 0x87
852 // This version of bus reset is called by the eh_error handler
853 static int adpt_bus_reset(struct scsi_cmnd* cmd)
854 {
855 adpt_hba* pHba;
856 u32 msg[4];
857 u32 rcode;
858
859 pHba = (adpt_hba*)cmd->device->host->hostdata[0];
860 memset(msg, 0, sizeof(msg));
861 printk(KERN_WARNING"%s: Bus reset: SCSI Bus %d: tid: %d\n",pHba->name, cmd->device->channel,pHba->channel[cmd->device->channel].tid );
862 msg[0] = FOUR_WORD_MSG_SIZE|SGL_OFFSET_0;
863 msg[1] = (I2O_HBA_BUS_RESET<<24|HOST_TID<<12|pHba->channel[cmd->device->channel].tid);
864 msg[2] = 0;
865 msg[3] = 0;
866 if (pHba->host)
867 spin_lock_irq(pHba->host->host_lock);
868 rcode = adpt_i2o_post_wait(pHba, msg,sizeof(msg), FOREVER);
869 if (pHba->host)
870 spin_unlock_irq(pHba->host->host_lock);
871 if (rcode != 0) {
872 printk(KERN_WARNING"%s: Bus reset failed.\n",pHba->name);
873 return FAILED;
874 } else {
875 printk(KERN_WARNING"%s: Bus reset success.\n",pHba->name);
876 return SUCCESS;
877 }
878 }
879
880 // This version of reset is called by the eh_error_handler
881 static int __adpt_reset(struct scsi_cmnd* cmd)
882 {
883 adpt_hba* pHba;
884 int rcode;
885 pHba = (adpt_hba*)cmd->device->host->hostdata[0];
886 printk(KERN_WARNING"%s: Hba Reset: scsi id %d: tid: %d\n",pHba->name,cmd->device->channel,pHba->channel[cmd->device->channel].tid );
887 rcode = adpt_hba_reset(pHba);
888 if(rcode == 0){
889 printk(KERN_WARNING"%s: HBA reset complete\n",pHba->name);
890 return SUCCESS;
891 } else {
892 printk(KERN_WARNING"%s: HBA reset failed (%x)\n",pHba->name, rcode);
893 return FAILED;
894 }
895 }
896
897 static int adpt_reset(struct scsi_cmnd* cmd)
898 {
899 int rc;
900
901 spin_lock_irq(cmd->device->host->host_lock);
902 rc = __adpt_reset(cmd);
903 spin_unlock_irq(cmd->device->host->host_lock);
904
905 return rc;
906 }
907
908 // This version of reset is called by the ioctls and indirectly from eh_error_handler via adpt_reset
909 static int adpt_hba_reset(adpt_hba* pHba)
910 {
911 int rcode;
912
913 pHba->state |= DPTI_STATE_RESET;
914
915 // Activate does get status , init outbound, and get hrt
916 if ((rcode=adpt_i2o_activate_hba(pHba)) < 0) {
917 printk(KERN_ERR "%s: Could not activate\n", pHba->name);
918 adpt_i2o_delete_hba(pHba);
919 return rcode;
920 }
921
922 if ((rcode=adpt_i2o_build_sys_table()) < 0) {
923 adpt_i2o_delete_hba(pHba);
924 return rcode;
925 }
926 PDEBUG("%s: in HOLD state\n",pHba->name);
927
928 if ((rcode=adpt_i2o_online_hba(pHba)) < 0) {
929 adpt_i2o_delete_hba(pHba);
930 return rcode;
931 }
932 PDEBUG("%s: in OPERATIONAL state\n",pHba->name);
933
934 if ((rcode=adpt_i2o_lct_get(pHba)) < 0){
935 adpt_i2o_delete_hba(pHba);
936 return rcode;
937 }
938
939 if ((rcode=adpt_i2o_reparse_lct(pHba)) < 0){
940 adpt_i2o_delete_hba(pHba);
941 return rcode;
942 }
943 pHba->state &= ~DPTI_STATE_RESET;
944
945 adpt_fail_posted_scbs(pHba);
946 return 0; /* return success */
947 }
948
949 /*===========================================================================
950 *
951 *===========================================================================
952 */
953
954
955 static void adpt_i2o_sys_shutdown(void)
956 {
957 adpt_hba *pHba, *pNext;
958 struct adpt_i2o_post_wait_data *p1, *old;
959
960 printk(KERN_INFO"Shutting down Adaptec I2O controllers.\n");
961 printk(KERN_INFO" This could take a few minutes if there are many devices attached\n");
962 /* Delete all IOPs from the controller chain */
963 /* They should have already been released by the
964 * scsi-core
965 */
966 for (pHba = hba_chain; pHba; pHba = pNext) {
967 pNext = pHba->next;
968 adpt_i2o_delete_hba(pHba);
969 }
970
971 /* Remove any timedout entries from the wait queue. */
972 // spin_lock_irqsave(&adpt_post_wait_lock, flags);
973 /* Nothing should be outstanding at this point so just
974 * free them
975 */
976 for(p1 = adpt_post_wait_queue; p1;) {
977 old = p1;
978 p1 = p1->next;
979 kfree(old);
980 }
981 // spin_unlock_irqrestore(&adpt_post_wait_lock, flags);
982 adpt_post_wait_queue = NULL;
983
984 printk(KERN_INFO "Adaptec I2O controllers down.\n");
985 }
986
987 static int adpt_install_hba(struct scsi_host_template* sht, struct pci_dev* pDev)
988 {
989
990 adpt_hba* pHba = NULL;
991 adpt_hba* p = NULL;
992 ulong base_addr0_phys = 0;
993 ulong base_addr1_phys = 0;
994 u32 hba_map0_area_size = 0;
995 u32 hba_map1_area_size = 0;
996 void __iomem *base_addr_virt = NULL;
997 void __iomem *msg_addr_virt = NULL;
998 int dma64 = 0;
999
1000 int raptorFlag = FALSE;
1001
1002 if(pci_enable_device(pDev)) {
1003 return -EINVAL;
1004 }
1005
1006 if (pci_request_regions(pDev, "dpt_i2o")) {
1007 PERROR("dpti: adpt_config_hba: pci request region failed\n");
1008 return -EINVAL;
1009 }
1010
1011 pci_set_master(pDev);
1012
1013 /*
1014 * See if we should enable dma64 mode.
1015 */
1016 if (sizeof(dma_addr_t) > 4 &&
1017 pci_set_dma_mask(pDev, DMA_BIT_MASK(64)) == 0) {
1018 if (dma_get_required_mask(&pDev->dev) > DMA_BIT_MASK(32))
1019 dma64 = 1;
1020 }
1021 if (!dma64 && pci_set_dma_mask(pDev, DMA_BIT_MASK(32)) != 0)
1022 return -EINVAL;
1023
1024 /* adapter only supports message blocks below 4GB */
1025 pci_set_consistent_dma_mask(pDev, DMA_BIT_MASK(32));
1026
1027 base_addr0_phys = pci_resource_start(pDev,0);
1028 hba_map0_area_size = pci_resource_len(pDev,0);
1029
1030 // Check if standard PCI card or single BAR Raptor
1031 if(pDev->device == PCI_DPT_DEVICE_ID){
1032 if(pDev->subsystem_device >=0xc032 && pDev->subsystem_device <= 0xc03b){
1033 // Raptor card with this device id needs 4M
1034 hba_map0_area_size = 0x400000;
1035 } else { // Not Raptor - it is a PCI card
1036 if(hba_map0_area_size > 0x100000 ){
1037 hba_map0_area_size = 0x100000;
1038 }
1039 }
1040 } else {// Raptor split BAR config
1041 // Use BAR1 in this configuration
1042 base_addr1_phys = pci_resource_start(pDev,1);
1043 hba_map1_area_size = pci_resource_len(pDev,1);
1044 raptorFlag = TRUE;
1045 }
1046
1047 #if BITS_PER_LONG == 64
1048 /*
1049 * The original Adaptec 64 bit driver has this comment here:
1050 * "x86_64 machines need more optimal mappings"
1051 *
1052 * I assume some HBAs report ridiculously large mappings
1053 * and we need to limit them on platforms with IOMMUs.
1054 */
1055 if (raptorFlag == TRUE) {
1056 if (hba_map0_area_size > 128)
1057 hba_map0_area_size = 128;
1058 if (hba_map1_area_size > 524288)
1059 hba_map1_area_size = 524288;
1060 } else {
1061 if (hba_map0_area_size > 524288)
1062 hba_map0_area_size = 524288;
1063 }
1064 #endif
1065
1066 base_addr_virt = ioremap(base_addr0_phys,hba_map0_area_size);
1067 if (!base_addr_virt) {
1068 pci_release_regions(pDev);
1069 PERROR("dpti: adpt_config_hba: io remap failed\n");
1070 return -EINVAL;
1071 }
1072
1073 if(raptorFlag == TRUE) {
1074 msg_addr_virt = ioremap(base_addr1_phys, hba_map1_area_size );
1075 if (!msg_addr_virt) {
1076 PERROR("dpti: adpt_config_hba: io remap failed on BAR1\n");
1077 iounmap(base_addr_virt);
1078 pci_release_regions(pDev);
1079 return -EINVAL;
1080 }
1081 } else {
1082 msg_addr_virt = base_addr_virt;
1083 }
1084
1085 // Allocate and zero the data structure
1086 pHba = kzalloc(sizeof(adpt_hba), GFP_KERNEL);
1087 if (!pHba) {
1088 if (msg_addr_virt != base_addr_virt)
1089 iounmap(msg_addr_virt);
1090 iounmap(base_addr_virt);
1091 pci_release_regions(pDev);
1092 return -ENOMEM;
1093 }
1094
1095 mutex_lock(&adpt_configuration_lock);
1096
1097 if(hba_chain != NULL){
1098 for(p = hba_chain; p->next; p = p->next);
1099 p->next = pHba;
1100 } else {
1101 hba_chain = pHba;
1102 }
1103 pHba->next = NULL;
1104 pHba->unit = hba_count;
1105 sprintf(pHba->name, "dpti%d", hba_count);
1106 hba_count++;
1107
1108 mutex_unlock(&adpt_configuration_lock);
1109
1110 pHba->pDev = pDev;
1111 pHba->base_addr_phys = base_addr0_phys;
1112
1113 // Set up the Virtual Base Address of the I2O Device
1114 pHba->base_addr_virt = base_addr_virt;
1115 pHba->msg_addr_virt = msg_addr_virt;
1116 pHba->irq_mask = base_addr_virt+0x30;
1117 pHba->post_port = base_addr_virt+0x40;
1118 pHba->reply_port = base_addr_virt+0x44;
1119
1120 pHba->hrt = NULL;
1121 pHba->lct = NULL;
1122 pHba->lct_size = 0;
1123 pHba->status_block = NULL;
1124 pHba->post_count = 0;
1125 pHba->state = DPTI_STATE_RESET;
1126 pHba->pDev = pDev;
1127 pHba->devices = NULL;
1128 pHba->dma64 = dma64;
1129
1130 // Initializing the spinlocks
1131 spin_lock_init(&pHba->state_lock);
1132 spin_lock_init(&adpt_post_wait_lock);
1133
1134 if(raptorFlag == 0){
1135 printk(KERN_INFO "Adaptec I2O RAID controller"
1136 " %d at %p size=%x irq=%d%s\n",
1137 hba_count-1, base_addr_virt,
1138 hba_map0_area_size, pDev->irq,
1139 dma64 ? " (64-bit DMA)" : "");
1140 } else {
1141 printk(KERN_INFO"Adaptec I2O RAID controller %d irq=%d%s\n",
1142 hba_count-1, pDev->irq,
1143 dma64 ? " (64-bit DMA)" : "");
1144 printk(KERN_INFO" BAR0 %p - size= %x\n",base_addr_virt,hba_map0_area_size);
1145 printk(KERN_INFO" BAR1 %p - size= %x\n",msg_addr_virt,hba_map1_area_size);
1146 }
1147
1148 if (request_irq (pDev->irq, adpt_isr, IRQF_SHARED, pHba->name, pHba)) {
1149 printk(KERN_ERR"%s: Couldn't register IRQ %d\n", pHba->name, pDev->irq);
1150 adpt_i2o_delete_hba(pHba);
1151 return -EINVAL;
1152 }
1153
1154 return 0;
1155 }
1156
1157
1158 static void adpt_i2o_delete_hba(adpt_hba* pHba)
1159 {
1160 adpt_hba* p1;
1161 adpt_hba* p2;
1162 struct i2o_device* d;
1163 struct i2o_device* next;
1164 int i;
1165 int j;
1166 struct adpt_device* pDev;
1167 struct adpt_device* pNext;
1168
1169
1170 mutex_lock(&adpt_configuration_lock);
1171 // scsi_unregister calls our adpt_release which
1172 // does a quiese
1173 if(pHba->host){
1174 free_irq(pHba->host->irq, pHba);
1175 }
1176 p2 = NULL;
1177 for( p1 = hba_chain; p1; p2 = p1,p1=p1->next){
1178 if(p1 == pHba) {
1179 if(p2) {
1180 p2->next = p1->next;
1181 } else {
1182 hba_chain = p1->next;
1183 }
1184 break;
1185 }
1186 }
1187
1188 hba_count--;
1189 mutex_unlock(&adpt_configuration_lock);
1190
1191 iounmap(pHba->base_addr_virt);
1192 pci_release_regions(pHba->pDev);
1193 if(pHba->msg_addr_virt != pHba->base_addr_virt){
1194 iounmap(pHba->msg_addr_virt);
1195 }
1196 if(pHba->FwDebugBuffer_P)
1197 iounmap(pHba->FwDebugBuffer_P);
1198 if(pHba->hrt) {
1199 dma_free_coherent(&pHba->pDev->dev,
1200 pHba->hrt->num_entries * pHba->hrt->entry_len << 2,
1201 pHba->hrt, pHba->hrt_pa);
1202 }
1203 if(pHba->lct) {
1204 dma_free_coherent(&pHba->pDev->dev, pHba->lct_size,
1205 pHba->lct, pHba->lct_pa);
1206 }
1207 if(pHba->status_block) {
1208 dma_free_coherent(&pHba->pDev->dev, sizeof(i2o_status_block),
1209 pHba->status_block, pHba->status_block_pa);
1210 }
1211 if(pHba->reply_pool) {
1212 dma_free_coherent(&pHba->pDev->dev,
1213 pHba->reply_fifo_size * REPLY_FRAME_SIZE * 4,
1214 pHba->reply_pool, pHba->reply_pool_pa);
1215 }
1216
1217 for(d = pHba->devices; d ; d = next){
1218 next = d->next;
1219 kfree(d);
1220 }
1221 for(i = 0 ; i < pHba->top_scsi_channel ; i++){
1222 for(j = 0; j < MAX_ID; j++){
1223 if(pHba->channel[i].device[j] != NULL){
1224 for(pDev = pHba->channel[i].device[j]; pDev; pDev = pNext){
1225 pNext = pDev->next_lun;
1226 kfree(pDev);
1227 }
1228 }
1229 }
1230 }
1231 pci_dev_put(pHba->pDev);
1232 kfree(pHba);
1233
1234 if (adpt_sysfs_class)
1235 device_destroy(adpt_sysfs_class,
1236 MKDEV(DPTI_I2O_MAJOR, pHba->unit));
1237
1238 if(hba_count <= 0){
1239 unregister_chrdev(DPTI_I2O_MAJOR, DPT_DRIVER);
1240 if (adpt_sysfs_class) {
1241 class_destroy(adpt_sysfs_class);
1242 adpt_sysfs_class = NULL;
1243 }
1244 }
1245 }
1246
1247 static struct adpt_device* adpt_find_device(adpt_hba* pHba, u32 chan, u32 id, u32 lun)
1248 {
1249 struct adpt_device* d;
1250
1251 if(chan < 0 || chan >= MAX_CHANNEL)
1252 return NULL;
1253
1254 if( pHba->channel[chan].device == NULL){
1255 printk(KERN_DEBUG"Adaptec I2O RAID: Trying to find device before they are allocated\n");
1256 return NULL;
1257 }
1258
1259 d = pHba->channel[chan].device[id];
1260 if(!d || d->tid == 0) {
1261 return NULL;
1262 }
1263
1264 /* If it is the only lun at that address then this should match*/
1265 if(d->scsi_lun == lun){
1266 return d;
1267 }
1268
1269 /* else we need to look through all the luns */
1270 for(d=d->next_lun ; d ; d = d->next_lun){
1271 if(d->scsi_lun == lun){
1272 return d;
1273 }
1274 }
1275 return NULL;
1276 }
1277
1278
1279 static int adpt_i2o_post_wait(adpt_hba* pHba, u32* msg, int len, int timeout)
1280 {
1281 // I used my own version of the WAIT_QUEUE_HEAD
1282 // to handle some version differences
1283 // When embedded in the kernel this could go back to the vanilla one
1284 ADPT_DECLARE_WAIT_QUEUE_HEAD(adpt_wq_i2o_post);
1285 int status = 0;
1286 ulong flags = 0;
1287 struct adpt_i2o_post_wait_data *p1, *p2;
1288 struct adpt_i2o_post_wait_data *wait_data =
1289 kmalloc(sizeof(struct adpt_i2o_post_wait_data),GFP_KERNEL);
1290 DECLARE_WAITQUEUE(wait, current);
1291
1292 if (!wait_data)
1293 return -ENOMEM;
1294
1295 /*
1296 * The spin locking is needed to keep anyone from playing
1297 * with the queue pointers and id while we do the same
1298 */
1299 spin_lock_irqsave(&adpt_post_wait_lock, flags);
1300 // TODO we need a MORE unique way of getting ids
1301 // to support async LCT get
1302 wait_data->next = adpt_post_wait_queue;
1303 adpt_post_wait_queue = wait_data;
1304 adpt_post_wait_id++;
1305 adpt_post_wait_id &= 0x7fff;
1306 wait_data->id = adpt_post_wait_id;
1307 spin_unlock_irqrestore(&adpt_post_wait_lock, flags);
1308
1309 wait_data->wq = &adpt_wq_i2o_post;
1310 wait_data->status = -ETIMEDOUT;
1311
1312 add_wait_queue(&adpt_wq_i2o_post, &wait);
1313
1314 msg[2] |= 0x80000000 | ((u32)wait_data->id);
1315 timeout *= HZ;
1316 if((status = adpt_i2o_post_this(pHba, msg, len)) == 0){
1317 set_current_state(TASK_INTERRUPTIBLE);
1318 if(pHba->host)
1319 spin_unlock_irq(pHba->host->host_lock);
1320 if (!timeout)
1321 schedule();
1322 else{
1323 timeout = schedule_timeout(timeout);
1324 if (timeout == 0) {
1325 // I/O issued, but cannot get result in
1326 // specified time. Freeing resorces is
1327 // dangerous.
1328 status = -ETIME;
1329 }
1330 }
1331 if(pHba->host)
1332 spin_lock_irq(pHba->host->host_lock);
1333 }
1334 remove_wait_queue(&adpt_wq_i2o_post, &wait);
1335
1336 if(status == -ETIMEDOUT){
1337 printk(KERN_INFO"dpti%d: POST WAIT TIMEOUT\n",pHba->unit);
1338 // We will have to free the wait_data memory during shutdown
1339 return status;
1340 }
1341
1342 /* Remove the entry from the queue. */
1343 p2 = NULL;
1344 spin_lock_irqsave(&adpt_post_wait_lock, flags);
1345 for(p1 = adpt_post_wait_queue; p1; p2 = p1, p1 = p1->next) {
1346 if(p1 == wait_data) {
1347 if(p1->status == I2O_DETAIL_STATUS_UNSUPPORTED_FUNCTION ) {
1348 status = -EOPNOTSUPP;
1349 }
1350 if(p2) {
1351 p2->next = p1->next;
1352 } else {
1353 adpt_post_wait_queue = p1->next;
1354 }
1355 break;
1356 }
1357 }
1358 spin_unlock_irqrestore(&adpt_post_wait_lock, flags);
1359
1360 kfree(wait_data);
1361
1362 return status;
1363 }
1364
1365
1366 static s32 adpt_i2o_post_this(adpt_hba* pHba, u32* data, int len)
1367 {
1368
1369 u32 m = EMPTY_QUEUE;
1370 u32 __iomem *msg;
1371 ulong timeout = jiffies + 30*HZ;
1372 do {
1373 rmb();
1374 m = readl(pHba->post_port);
1375 if (m != EMPTY_QUEUE) {
1376 break;
1377 }
1378 if(time_after(jiffies,timeout)){
1379 printk(KERN_WARNING"dpti%d: Timeout waiting for message frame!\n", pHba->unit);
1380 return -ETIMEDOUT;
1381 }
1382 schedule_timeout_uninterruptible(1);
1383 } while(m == EMPTY_QUEUE);
1384
1385 msg = pHba->msg_addr_virt + m;
1386 memcpy_toio(msg, data, len);
1387 wmb();
1388
1389 //post message
1390 writel(m, pHba->post_port);
1391 wmb();
1392
1393 return 0;
1394 }
1395
1396
1397 static void adpt_i2o_post_wait_complete(u32 context, int status)
1398 {
1399 struct adpt_i2o_post_wait_data *p1 = NULL;
1400 /*
1401 * We need to search through the adpt_post_wait
1402 * queue to see if the given message is still
1403 * outstanding. If not, it means that the IOP
1404 * took longer to respond to the message than we
1405 * had allowed and timer has already expired.
1406 * Not much we can do about that except log
1407 * it for debug purposes, increase timeout, and recompile
1408 *
1409 * Lock needed to keep anyone from moving queue pointers
1410 * around while we're looking through them.
1411 */
1412
1413 context &= 0x7fff;
1414
1415 spin_lock(&adpt_post_wait_lock);
1416 for(p1 = adpt_post_wait_queue; p1; p1 = p1->next) {
1417 if(p1->id == context) {
1418 p1->status = status;
1419 spin_unlock(&adpt_post_wait_lock);
1420 wake_up_interruptible(p1->wq);
1421 return;
1422 }
1423 }
1424 spin_unlock(&adpt_post_wait_lock);
1425 // If this happens we lose commands that probably really completed
1426 printk(KERN_DEBUG"dpti: Could Not find task %d in wait queue\n",context);
1427 printk(KERN_DEBUG" Tasks in wait queue:\n");
1428 for(p1 = adpt_post_wait_queue; p1; p1 = p1->next) {
1429 printk(KERN_DEBUG" %d\n",p1->id);
1430 }
1431 return;
1432 }
1433
1434 static s32 adpt_i2o_reset_hba(adpt_hba* pHba)
1435 {
1436 u32 msg[8];
1437 u8* status;
1438 dma_addr_t addr;
1439 u32 m = EMPTY_QUEUE ;
1440 ulong timeout = jiffies + (TMOUT_IOPRESET*HZ);
1441
1442 if(pHba->initialized == FALSE) { // First time reset should be quick
1443 timeout = jiffies + (25*HZ);
1444 } else {
1445 adpt_i2o_quiesce_hba(pHba);
1446 }
1447
1448 do {
1449 rmb();
1450 m = readl(pHba->post_port);
1451 if (m != EMPTY_QUEUE) {
1452 break;
1453 }
1454 if(time_after(jiffies,timeout)){
1455 printk(KERN_WARNING"Timeout waiting for message!\n");
1456 return -ETIMEDOUT;
1457 }
1458 schedule_timeout_uninterruptible(1);
1459 } while (m == EMPTY_QUEUE);
1460
1461 status = dma_alloc_coherent(&pHba->pDev->dev, 4, &addr, GFP_KERNEL);
1462 if(status == NULL) {
1463 adpt_send_nop(pHba, m);
1464 printk(KERN_ERR"IOP reset failed - no free memory.\n");
1465 return -ENOMEM;
1466 }
1467 memset(status,0,4);
1468
1469 msg[0]=EIGHT_WORD_MSG_SIZE|SGL_OFFSET_0;
1470 msg[1]=I2O_CMD_ADAPTER_RESET<<24|HOST_TID<<12|ADAPTER_TID;
1471 msg[2]=0;
1472 msg[3]=0;
1473 msg[4]=0;
1474 msg[5]=0;
1475 msg[6]=dma_low(addr);
1476 msg[7]=dma_high(addr);
1477
1478 memcpy_toio(pHba->msg_addr_virt+m, msg, sizeof(msg));
1479 wmb();
1480 writel(m, pHba->post_port);
1481 wmb();
1482
1483 while(*status == 0){
1484 if(time_after(jiffies,timeout)){
1485 printk(KERN_WARNING"%s: IOP Reset Timeout\n",pHba->name);
1486 /* We lose 4 bytes of "status" here, but we cannot
1487 free these because controller may awake and corrupt
1488 those bytes at any time */
1489 /* dma_free_coherent(&pHba->pDev->dev, 4, buf, addr); */
1490 return -ETIMEDOUT;
1491 }
1492 rmb();
1493 schedule_timeout_uninterruptible(1);
1494 }
1495
1496 if(*status == 0x01 /*I2O_EXEC_IOP_RESET_IN_PROGRESS*/) {
1497 PDEBUG("%s: Reset in progress...\n", pHba->name);
1498 // Here we wait for message frame to become available
1499 // indicated that reset has finished
1500 do {
1501 rmb();
1502 m = readl(pHba->post_port);
1503 if (m != EMPTY_QUEUE) {
1504 break;
1505 }
1506 if(time_after(jiffies,timeout)){
1507 printk(KERN_ERR "%s:Timeout waiting for IOP Reset.\n",pHba->name);
1508 /* We lose 4 bytes of "status" here, but we
1509 cannot free these because controller may
1510 awake and corrupt those bytes at any time */
1511 /* dma_free_coherent(&pHba->pDev->dev, 4, buf, addr); */
1512 return -ETIMEDOUT;
1513 }
1514 schedule_timeout_uninterruptible(1);
1515 } while (m == EMPTY_QUEUE);
1516 // Flush the offset
1517 adpt_send_nop(pHba, m);
1518 }
1519 adpt_i2o_status_get(pHba);
1520 if(*status == 0x02 ||
1521 pHba->status_block->iop_state != ADAPTER_STATE_RESET) {
1522 printk(KERN_WARNING"%s: Reset reject, trying to clear\n",
1523 pHba->name);
1524 } else {
1525 PDEBUG("%s: Reset completed.\n", pHba->name);
1526 }
1527
1528 dma_free_coherent(&pHba->pDev->dev, 4, status, addr);
1529 #ifdef UARTDELAY
1530 // This delay is to allow someone attached to the card through the debug UART to
1531 // set up the dump levels that they want before the rest of the initialization sequence
1532 adpt_delay(20000);
1533 #endif
1534 return 0;
1535 }
1536
1537
1538 static int adpt_i2o_parse_lct(adpt_hba* pHba)
1539 {
1540 int i;
1541 int max;
1542 int tid;
1543 struct i2o_device *d;
1544 i2o_lct *lct = pHba->lct;
1545 u8 bus_no = 0;
1546 s16 scsi_id;
1547 s16 scsi_lun;
1548 u32 buf[10]; // larger than 7, or 8 ...
1549 struct adpt_device* pDev;
1550
1551 if (lct == NULL) {
1552 printk(KERN_ERR "%s: LCT is empty???\n",pHba->name);
1553 return -1;
1554 }
1555
1556 max = lct->table_size;
1557 max -= 3;
1558 max /= 9;
1559
1560 for(i=0;i<max;i++) {
1561 if( lct->lct_entry[i].user_tid != 0xfff){
1562 /*
1563 * If we have hidden devices, we need to inform the upper layers about
1564 * the possible maximum id reference to handle device access when
1565 * an array is disassembled. This code has no other purpose but to
1566 * allow us future access to devices that are currently hidden
1567 * behind arrays, hotspares or have not been configured (JBOD mode).
1568 */
1569 if( lct->lct_entry[i].class_id != I2O_CLASS_RANDOM_BLOCK_STORAGE &&
1570 lct->lct_entry[i].class_id != I2O_CLASS_SCSI_PERIPHERAL &&
1571 lct->lct_entry[i].class_id != I2O_CLASS_FIBRE_CHANNEL_PERIPHERAL ){
1572 continue;
1573 }
1574 tid = lct->lct_entry[i].tid;
1575 // I2O_DPT_DEVICE_INFO_GROUP_NO;
1576 if(adpt_i2o_query_scalar(pHba, tid, 0x8000, -1, buf, 32)<0) {
1577 continue;
1578 }
1579 bus_no = buf[0]>>16;
1580 scsi_id = buf[1];
1581 scsi_lun = (buf[2]>>8 )&0xff;
1582 if(bus_no >= MAX_CHANNEL) { // Something wrong skip it
1583 printk(KERN_WARNING"%s: Channel number %d out of range \n", pHba->name, bus_no);
1584 continue;
1585 }
1586 if (scsi_id >= MAX_ID){
1587 printk(KERN_WARNING"%s: SCSI ID %d out of range \n", pHba->name, bus_no);
1588 continue;
1589 }
1590 if(bus_no > pHba->top_scsi_channel){
1591 pHba->top_scsi_channel = bus_no;
1592 }
1593 if(scsi_id > pHba->top_scsi_id){
1594 pHba->top_scsi_id = scsi_id;
1595 }
1596 if(scsi_lun > pHba->top_scsi_lun){
1597 pHba->top_scsi_lun = scsi_lun;
1598 }
1599 continue;
1600 }
1601 d = kmalloc(sizeof(struct i2o_device), GFP_KERNEL);
1602 if(d==NULL)
1603 {
1604 printk(KERN_CRIT"%s: Out of memory for I2O device data.\n",pHba->name);
1605 return -ENOMEM;
1606 }
1607
1608 d->controller = pHba;
1609 d->next = NULL;
1610
1611 memcpy(&d->lct_data, &lct->lct_entry[i], sizeof(i2o_lct_entry));
1612
1613 d->flags = 0;
1614 tid = d->lct_data.tid;
1615 adpt_i2o_report_hba_unit(pHba, d);
1616 adpt_i2o_install_device(pHba, d);
1617 }
1618 bus_no = 0;
1619 for(d = pHba->devices; d ; d = d->next) {
1620 if(d->lct_data.class_id == I2O_CLASS_BUS_ADAPTER_PORT ||
1621 d->lct_data.class_id == I2O_CLASS_FIBRE_CHANNEL_PORT){
1622 tid = d->lct_data.tid;
1623 // TODO get the bus_no from hrt-but for now they are in order
1624 //bus_no =
1625 if(bus_no > pHba->top_scsi_channel){
1626 pHba->top_scsi_channel = bus_no;
1627 }
1628 pHba->channel[bus_no].type = d->lct_data.class_id;
1629 pHba->channel[bus_no].tid = tid;
1630 if(adpt_i2o_query_scalar(pHba, tid, 0x0200, -1, buf, 28)>=0)
1631 {
1632 pHba->channel[bus_no].scsi_id = buf[1];
1633 PDEBUG("Bus %d - SCSI ID %d.\n", bus_no, buf[1]);
1634 }
1635 // TODO remove - this is just until we get from hrt
1636 bus_no++;
1637 if(bus_no >= MAX_CHANNEL) { // Something wrong skip it
1638 printk(KERN_WARNING"%s: Channel number %d out of range - LCT\n", pHba->name, bus_no);
1639 break;
1640 }
1641 }
1642 }
1643
1644 // Setup adpt_device table
1645 for(d = pHba->devices; d ; d = d->next) {
1646 if(d->lct_data.class_id == I2O_CLASS_RANDOM_BLOCK_STORAGE ||
1647 d->lct_data.class_id == I2O_CLASS_SCSI_PERIPHERAL ||
1648 d->lct_data.class_id == I2O_CLASS_FIBRE_CHANNEL_PERIPHERAL ){
1649
1650 tid = d->lct_data.tid;
1651 scsi_id = -1;
1652 // I2O_DPT_DEVICE_INFO_GROUP_NO;
1653 if(adpt_i2o_query_scalar(pHba, tid, 0x8000, -1, buf, 32)>=0) {
1654 bus_no = buf[0]>>16;
1655 scsi_id = buf[1];
1656 scsi_lun = (buf[2]>>8 )&0xff;
1657 if(bus_no >= MAX_CHANNEL) { // Something wrong skip it
1658 continue;
1659 }
1660 if (scsi_id >= MAX_ID) {
1661 continue;
1662 }
1663 if( pHba->channel[bus_no].device[scsi_id] == NULL){
1664 pDev = kzalloc(sizeof(struct adpt_device),GFP_KERNEL);
1665 if(pDev == NULL) {
1666 return -ENOMEM;
1667 }
1668 pHba->channel[bus_no].device[scsi_id] = pDev;
1669 } else {
1670 for( pDev = pHba->channel[bus_no].device[scsi_id];
1671 pDev->next_lun; pDev = pDev->next_lun){
1672 }
1673 pDev->next_lun = kzalloc(sizeof(struct adpt_device),GFP_KERNEL);
1674 if(pDev->next_lun == NULL) {
1675 return -ENOMEM;
1676 }
1677 pDev = pDev->next_lun;
1678 }
1679 pDev->tid = tid;
1680 pDev->scsi_channel = bus_no;
1681 pDev->scsi_id = scsi_id;
1682 pDev->scsi_lun = scsi_lun;
1683 pDev->pI2o_dev = d;
1684 d->owner = pDev;
1685 pDev->type = (buf[0])&0xff;
1686 pDev->flags = (buf[0]>>8)&0xff;
1687 if(scsi_id > pHba->top_scsi_id){
1688 pHba->top_scsi_id = scsi_id;
1689 }
1690 if(scsi_lun > pHba->top_scsi_lun){
1691 pHba->top_scsi_lun = scsi_lun;
1692 }
1693 }
1694 if(scsi_id == -1){
1695 printk(KERN_WARNING"Could not find SCSI ID for %s\n",
1696 d->lct_data.identity_tag);
1697 }
1698 }
1699 }
1700 return 0;
1701 }
1702
1703
1704 /*
1705 * Each I2O controller has a chain of devices on it - these match
1706 * the useful parts of the LCT of the board.
1707 */
1708
1709 static int adpt_i2o_install_device(adpt_hba* pHba, struct i2o_device *d)
1710 {
1711 mutex_lock(&adpt_configuration_lock);
1712 d->controller=pHba;
1713 d->owner=NULL;
1714 d->next=pHba->devices;
1715 d->prev=NULL;
1716 if (pHba->devices != NULL){
1717 pHba->devices->prev=d;
1718 }
1719 pHba->devices=d;
1720 *d->dev_name = 0;
1721
1722 mutex_unlock(&adpt_configuration_lock);
1723 return 0;
1724 }
1725
1726 static int adpt_open(struct inode *inode, struct file *file)
1727 {
1728 int minor;
1729 adpt_hba* pHba;
1730
1731 lock_kernel();
1732 //TODO check for root access
1733 //
1734 minor = iminor(inode);
1735 if (minor >= hba_count) {
1736 unlock_kernel();
1737 return -ENXIO;
1738 }
1739 mutex_lock(&adpt_configuration_lock);
1740 for (pHba = hba_chain; pHba; pHba = pHba->next) {
1741 if (pHba->unit == minor) {
1742 break; /* found adapter */
1743 }
1744 }
1745 if (pHba == NULL) {
1746 mutex_unlock(&adpt_configuration_lock);
1747 unlock_kernel();
1748 return -ENXIO;
1749 }
1750
1751 // if(pHba->in_use){
1752 // mutex_unlock(&adpt_configuration_lock);
1753 // return -EBUSY;
1754 // }
1755
1756 pHba->in_use = 1;
1757 mutex_unlock(&adpt_configuration_lock);
1758 unlock_kernel();
1759
1760 return 0;
1761 }
1762
1763 static int adpt_close(struct inode *inode, struct file *file)
1764 {
1765 int minor;
1766 adpt_hba* pHba;
1767
1768 minor = iminor(inode);
1769 if (minor >= hba_count) {
1770 return -ENXIO;
1771 }
1772 mutex_lock(&adpt_configuration_lock);
1773 for (pHba = hba_chain; pHba; pHba = pHba->next) {
1774 if (pHba->unit == minor) {
1775 break; /* found adapter */
1776 }
1777 }
1778 mutex_unlock(&adpt_configuration_lock);
1779 if (pHba == NULL) {
1780 return -ENXIO;
1781 }
1782
1783 pHba->in_use = 0;
1784
1785 return 0;
1786 }
1787
1788
1789 static int adpt_i2o_passthru(adpt_hba* pHba, u32 __user *arg)
1790 {
1791 u32 msg[MAX_MESSAGE_SIZE];
1792 u32* reply = NULL;
1793 u32 size = 0;
1794 u32 reply_size = 0;
1795 u32 __user *user_msg = arg;
1796 u32 __user * user_reply = NULL;
1797 void *sg_list[pHba->sg_tablesize];
1798 u32 sg_offset = 0;
1799 u32 sg_count = 0;
1800 int sg_index = 0;
1801 u32 i = 0;
1802 u32 rcode = 0;
1803 void *p = NULL;
1804 dma_addr_t addr;
1805 ulong flags = 0;
1806
1807 memset(&msg, 0, MAX_MESSAGE_SIZE*4);
1808 // get user msg size in u32s
1809 if(get_user(size, &user_msg[0])){
1810 return -EFAULT;
1811 }
1812 size = size>>16;
1813
1814 user_reply = &user_msg[size];
1815 if(size > MAX_MESSAGE_SIZE){
1816 return -EFAULT;
1817 }
1818 size *= 4; // Convert to bytes
1819
1820 /* Copy in the user's I2O command */
1821 if(copy_from_user(msg, user_msg, size)) {
1822 return -EFAULT;
1823 }
1824 get_user(reply_size, &user_reply[0]);
1825 reply_size = reply_size>>16;
1826 if(reply_size > REPLY_FRAME_SIZE){
1827 reply_size = REPLY_FRAME_SIZE;
1828 }
1829 reply_size *= 4;
1830 reply = kzalloc(REPLY_FRAME_SIZE*4, GFP_KERNEL);
1831 if(reply == NULL) {
1832 printk(KERN_WARNING"%s: Could not allocate reply buffer\n",pHba->name);
1833 return -ENOMEM;
1834 }
1835 sg_offset = (msg[0]>>4)&0xf;
1836 msg[2] = 0x40000000; // IOCTL context
1837 msg[3] = adpt_ioctl_to_context(pHba, reply);
1838 if (msg[3] == (u32)-1)
1839 return -EBUSY;
1840
1841 memset(sg_list,0, sizeof(sg_list[0])*pHba->sg_tablesize);
1842 if(sg_offset) {
1843 // TODO add 64 bit API
1844 struct sg_simple_element *sg = (struct sg_simple_element*) (msg+sg_offset);
1845 sg_count = (size - sg_offset*4) / sizeof(struct sg_simple_element);
1846 if (sg_count > pHba->sg_tablesize){
1847 printk(KERN_DEBUG"%s:IOCTL SG List too large (%u)\n", pHba->name,sg_count);
1848 kfree (reply);
1849 return -EINVAL;
1850 }
1851
1852 for(i = 0; i < sg_count; i++) {
1853 int sg_size;
1854
1855 if (!(sg[i].flag_count & 0x10000000 /*I2O_SGL_FLAGS_SIMPLE_ADDRESS_ELEMENT*/)) {
1856 printk(KERN_DEBUG"%s:Bad SG element %d - not simple (%x)\n",pHba->name,i, sg[i].flag_count);
1857 rcode = -EINVAL;
1858 goto cleanup;
1859 }
1860 sg_size = sg[i].flag_count & 0xffffff;
1861 /* Allocate memory for the transfer */
1862 p = dma_alloc_coherent(&pHba->pDev->dev, sg_size, &addr, GFP_KERNEL);
1863 if(!p) {
1864 printk(KERN_DEBUG"%s: Could not allocate SG buffer - size = %d buffer number %d of %d\n",
1865 pHba->name,sg_size,i,sg_count);
1866 rcode = -ENOMEM;
1867 goto cleanup;
1868 }
1869 sg_list[sg_index++] = p; // sglist indexed with input frame, not our internal frame.
1870 /* Copy in the user's SG buffer if necessary */
1871 if(sg[i].flag_count & 0x04000000 /*I2O_SGL_FLAGS_DIR*/) {
1872 // sg_simple_element API is 32 bit
1873 if (copy_from_user(p,(void __user *)(ulong)sg[i].addr_bus, sg_size)) {
1874 printk(KERN_DEBUG"%s: Could not copy SG buf %d FROM user\n",pHba->name,i);
1875 rcode = -EFAULT;
1876 goto cleanup;
1877 }
1878 }
1879 /* sg_simple_element API is 32 bit, but addr < 4GB */
1880 sg[i].addr_bus = addr;
1881 }
1882 }
1883
1884 do {
1885 if(pHba->host)
1886 spin_lock_irqsave(pHba->host->host_lock, flags);
1887 // This state stops any new commands from enterring the
1888 // controller while processing the ioctl
1889 // pHba->state |= DPTI_STATE_IOCTL;
1890 // We can't set this now - The scsi subsystem sets host_blocked and
1891 // the queue empties and stops. We need a way to restart the queue
1892 rcode = adpt_i2o_post_wait(pHba, msg, size, FOREVER);
1893 if (rcode != 0)
1894 printk("adpt_i2o_passthru: post wait failed %d %p\n",
1895 rcode, reply);
1896 // pHba->state &= ~DPTI_STATE_IOCTL;
1897 if(pHba->host)
1898 spin_unlock_irqrestore(pHba->host->host_lock, flags);
1899 } while(rcode == -ETIMEDOUT);
1900
1901 if(rcode){
1902 goto cleanup;
1903 }
1904
1905 if(sg_offset) {
1906 /* Copy back the Scatter Gather buffers back to user space */
1907 u32 j;
1908 // TODO add 64 bit API
1909 struct sg_simple_element* sg;
1910 int sg_size;
1911
1912 // re-acquire the original message to handle correctly the sg copy operation
1913 memset(&msg, 0, MAX_MESSAGE_SIZE*4);
1914 // get user msg size in u32s
1915 if(get_user(size, &user_msg[0])){
1916 rcode = -EFAULT;
1917 goto cleanup;
1918 }
1919 size = size>>16;
1920 size *= 4;
1921 /* Copy in the user's I2O command */
1922 if (copy_from_user (msg, user_msg, size)) {
1923 rcode = -EFAULT;
1924 goto cleanup;
1925 }
1926 sg_count = (size - sg_offset*4) / sizeof(struct sg_simple_element);
1927
1928 // TODO add 64 bit API
1929 sg = (struct sg_simple_element*)(msg + sg_offset);
1930 for (j = 0; j < sg_count; j++) {
1931 /* Copy out the SG list to user's buffer if necessary */
1932 if(! (sg[j].flag_count & 0x4000000 /*I2O_SGL_FLAGS_DIR*/)) {
1933 sg_size = sg[j].flag_count & 0xffffff;
1934 // sg_simple_element API is 32 bit
1935 if (copy_to_user((void __user *)(ulong)sg[j].addr_bus,sg_list[j], sg_size)) {
1936 printk(KERN_WARNING"%s: Could not copy %p TO user %x\n",pHba->name, sg_list[j], sg[j].addr_bus);
1937 rcode = -EFAULT;
1938 goto cleanup;
1939 }
1940 }
1941 }
1942 }
1943
1944 /* Copy back the reply to user space */
1945 if (reply_size) {
1946 // we wrote our own values for context - now restore the user supplied ones
1947 if(copy_from_user(reply+2, user_msg+2, sizeof(u32)*2)) {
1948 printk(KERN_WARNING"%s: Could not copy message context FROM user\n",pHba->name);
1949 rcode = -EFAULT;
1950 }
1951 if(copy_to_user(user_reply, reply, reply_size)) {
1952 printk(KERN_WARNING"%s: Could not copy reply TO user\n",pHba->name);
1953 rcode = -EFAULT;
1954 }
1955 }
1956
1957
1958 cleanup:
1959 if (rcode != -ETIME && rcode != -EINTR) {
1960 struct sg_simple_element *sg =
1961 (struct sg_simple_element*) (msg +sg_offset);
1962 kfree (reply);
1963 while(sg_index) {
1964 if(sg_list[--sg_index]) {
1965 dma_free_coherent(&pHba->pDev->dev,
1966 sg[sg_index].flag_count & 0xffffff,
1967 sg_list[sg_index],
1968 sg[sg_index].addr_bus);
1969 }
1970 }
1971 }
1972 return rcode;
1973 }
1974
1975 #if defined __ia64__
1976 static void adpt_ia64_info(sysInfo_S* si)
1977 {
1978 // This is all the info we need for now
1979 // We will add more info as our new
1980 // managmenent utility requires it
1981 si->processorType = PROC_IA64;
1982 }
1983 #endif
1984
1985 #if defined __sparc__
1986 static void adpt_sparc_info(sysInfo_S* si)
1987 {
1988 // This is all the info we need for now
1989 // We will add more info as our new
1990 // managmenent utility requires it
1991 si->processorType = PROC_ULTRASPARC;
1992 }
1993 #endif
1994 #if defined __alpha__
1995 static void adpt_alpha_info(sysInfo_S* si)
1996 {
1997 // This is all the info we need for now
1998 // We will add more info as our new
1999 // managmenent utility requires it
2000 si->processorType = PROC_ALPHA;
2001 }
2002 #endif
2003
2004 #if defined __i386__
2005 static void adpt_i386_info(sysInfo_S* si)
2006 {
2007 // This is all the info we need for now
2008 // We will add more info as our new
2009 // managmenent utility requires it
2010 switch (boot_cpu_data.x86) {
2011 case CPU_386:
2012 si->processorType = PROC_386;
2013 break;
2014 case CPU_486:
2015 si->processorType = PROC_486;
2016 break;
2017 case CPU_586:
2018 si->processorType = PROC_PENTIUM;
2019 break;
2020 default: // Just in case
2021 si->processorType = PROC_PENTIUM;
2022 break;
2023 }
2024 }
2025 #endif
2026
2027 /*
2028 * This routine returns information about the system. This does not effect
2029 * any logic and if the info is wrong - it doesn't matter.
2030 */
2031
2032 /* Get all the info we can not get from kernel services */
2033 static int adpt_system_info(void __user *buffer)
2034 {
2035 sysInfo_S si;
2036
2037 memset(&si, 0, sizeof(si));
2038
2039 si.osType = OS_LINUX;
2040 si.osMajorVersion = 0;
2041 si.osMinorVersion = 0;
2042 si.osRevision = 0;
2043 si.busType = SI_PCI_BUS;
2044 si.processorFamily = DPTI_sig.dsProcessorFamily;
2045
2046 #if defined __i386__
2047 adpt_i386_info(&si);
2048 #elif defined (__ia64__)
2049 adpt_ia64_info(&si);
2050 #elif defined(__sparc__)
2051 adpt_sparc_info(&si);
2052 #elif defined (__alpha__)
2053 adpt_alpha_info(&si);
2054 #else
2055 si.processorType = 0xff ;
2056 #endif
2057 if (copy_to_user(buffer, &si, sizeof(si))){
2058 printk(KERN_WARNING"dpti: Could not copy buffer TO user\n");
2059 return -EFAULT;
2060 }
2061
2062 return 0;
2063 }
2064
2065 static int adpt_ioctl(struct inode *inode, struct file *file, uint cmd,
2066 ulong arg)
2067 {
2068 int minor;
2069 int error = 0;
2070 adpt_hba* pHba;
2071 ulong flags = 0;
2072 void __user *argp = (void __user *)arg;
2073
2074 minor = iminor(inode);
2075 if (minor >= DPTI_MAX_HBA){
2076 return -ENXIO;
2077 }
2078 mutex_lock(&adpt_configuration_lock);
2079 for (pHba = hba_chain; pHba; pHba = pHba->next) {
2080 if (pHba->unit == minor) {
2081 break; /* found adapter */
2082 }
2083 }
2084 mutex_unlock(&adpt_configuration_lock);
2085 if(pHba == NULL){
2086 return -ENXIO;
2087 }
2088
2089 while((volatile u32) pHba->state & DPTI_STATE_RESET )
2090 schedule_timeout_uninterruptible(2);
2091
2092 switch (cmd) {
2093 // TODO: handle 3 cases
2094 case DPT_SIGNATURE:
2095 if (copy_to_user(argp, &DPTI_sig, sizeof(DPTI_sig))) {
2096 return -EFAULT;
2097 }
2098 break;
2099 case I2OUSRCMD:
2100 return adpt_i2o_passthru(pHba, argp);
2101
2102 case DPT_CTRLINFO:{
2103 drvrHBAinfo_S HbaInfo;
2104
2105 #define FLG_OSD_PCI_VALID 0x0001
2106 #define FLG_OSD_DMA 0x0002
2107 #define FLG_OSD_I2O 0x0004
2108 memset(&HbaInfo, 0, sizeof(HbaInfo));
2109 HbaInfo.drvrHBAnum = pHba->unit;
2110 HbaInfo.baseAddr = (ulong) pHba->base_addr_phys;
2111 HbaInfo.blinkState = adpt_read_blink_led(pHba);
2112 HbaInfo.pciBusNum = pHba->pDev->bus->number;
2113 HbaInfo.pciDeviceNum=PCI_SLOT(pHba->pDev->devfn);
2114 HbaInfo.Interrupt = pHba->pDev->irq;
2115 HbaInfo.hbaFlags = FLG_OSD_PCI_VALID | FLG_OSD_DMA | FLG_OSD_I2O;
2116 if(copy_to_user(argp, &HbaInfo, sizeof(HbaInfo))){
2117 printk(KERN_WARNING"%s: Could not copy HbaInfo TO user\n",pHba->name);
2118 return -EFAULT;
2119 }
2120 break;
2121 }
2122 case DPT_SYSINFO:
2123 return adpt_system_info(argp);
2124 case DPT_BLINKLED:{
2125 u32 value;
2126 value = (u32)adpt_read_blink_led(pHba);
2127 if (copy_to_user(argp, &value, sizeof(value))) {
2128 return -EFAULT;
2129 }
2130 break;
2131 }
2132 case I2ORESETCMD:
2133 if(pHba->host)
2134 spin_lock_irqsave(pHba->host->host_lock, flags);
2135 adpt_hba_reset(pHba);
2136 if(pHba->host)
2137 spin_unlock_irqrestore(pHba->host->host_lock, flags);
2138 break;
2139 case I2ORESCANCMD:
2140 adpt_rescan(pHba);
2141 break;
2142 default:
2143 return -EINVAL;
2144 }
2145
2146 return error;
2147 }
2148
2149 #ifdef CONFIG_COMPAT
2150 static long compat_adpt_ioctl(struct file *file,
2151 unsigned int cmd, unsigned long arg)
2152 {
2153 struct inode *inode;
2154 long ret;
2155
2156 inode = file->f_dentry->d_inode;
2157
2158 lock_kernel();
2159
2160 switch(cmd) {
2161 case DPT_SIGNATURE:
2162 case I2OUSRCMD:
2163 case DPT_CTRLINFO:
2164 case DPT_SYSINFO:
2165 case DPT_BLINKLED:
2166 case I2ORESETCMD:
2167 case I2ORESCANCMD:
2168 case (DPT_TARGET_BUSY & 0xFFFF):
2169 case DPT_TARGET_BUSY:
2170 ret = adpt_ioctl(inode, file, cmd, arg);
2171 break;
2172 default:
2173 ret = -ENOIOCTLCMD;
2174 }
2175
2176 unlock_kernel();
2177
2178 return ret;
2179 }
2180 #endif
2181
2182 static irqreturn_t adpt_isr(int irq, void *dev_id)
2183 {
2184 struct scsi_cmnd* cmd;
2185 adpt_hba* pHba = dev_id;
2186 u32 m;
2187 void __iomem *reply;
2188 u32 status=0;
2189 u32 context;
2190 ulong flags = 0;
2191 int handled = 0;
2192
2193 if (pHba == NULL){
2194 printk(KERN_WARNING"adpt_isr: NULL dev_id\n");
2195 return IRQ_NONE;
2196 }
2197 if(pHba->host)
2198 spin_lock_irqsave(pHba->host->host_lock, flags);
2199
2200 while( readl(pHba->irq_mask) & I2O_INTERRUPT_PENDING_B) {
2201 m = readl(pHba->reply_port);
2202 if(m == EMPTY_QUEUE){
2203 // Try twice then give up
2204 rmb();
2205 m = readl(pHba->reply_port);
2206 if(m == EMPTY_QUEUE){
2207 // This really should not happen
2208 printk(KERN_ERR"dpti: Could not get reply frame\n");
2209 goto out;
2210 }
2211 }
2212 if (pHba->reply_pool_pa <= m &&
2213 m < pHba->reply_pool_pa +
2214 (pHba->reply_fifo_size * REPLY_FRAME_SIZE * 4)) {
2215 reply = (u8 *)pHba->reply_pool +
2216 (m - pHba->reply_pool_pa);
2217 } else {
2218 /* Ick, we should *never* be here */
2219 printk(KERN_ERR "dpti: reply frame not from pool\n");
2220 reply = (u8 *)bus_to_virt(m);
2221 }
2222
2223 if (readl(reply) & MSG_FAIL) {
2224 u32 old_m = readl(reply+28);
2225 void __iomem *msg;
2226 u32 old_context;
2227 PDEBUG("%s: Failed message\n",pHba->name);
2228 if(old_m >= 0x100000){
2229 printk(KERN_ERR"%s: Bad preserved MFA (%x)- dropping frame\n",pHba->name,old_m);
2230 writel(m,pHba->reply_port);
2231 continue;
2232 }
2233 // Transaction context is 0 in failed reply frame
2234 msg = pHba->msg_addr_virt + old_m;
2235 old_context = readl(msg+12);
2236 writel(old_context, reply+12);
2237 adpt_send_nop(pHba, old_m);
2238 }
2239 context = readl(reply+8);
2240 if(context & 0x40000000){ // IOCTL
2241 void *p = adpt_ioctl_from_context(pHba, readl(reply+12));
2242 if( p != NULL) {
2243 memcpy_fromio(p, reply, REPLY_FRAME_SIZE * 4);
2244 }
2245 // All IOCTLs will also be post wait
2246 }
2247 if(context & 0x80000000){ // Post wait message
2248 status = readl(reply+16);
2249 if(status >> 24){
2250 status &= 0xffff; /* Get detail status */
2251 } else {
2252 status = I2O_POST_WAIT_OK;
2253 }
2254 if(!(context & 0x40000000)) {
2255 cmd = adpt_cmd_from_context(pHba,
2256 readl(reply+12));
2257 if(cmd != NULL) {
2258 printk(KERN_WARNING"%s: Apparent SCSI cmd in Post Wait Context - cmd=%p context=%x\n", pHba->name, cmd, context);
2259 }
2260 }
2261 adpt_i2o_post_wait_complete(context, status);
2262 } else { // SCSI message
2263 cmd = adpt_cmd_from_context (pHba, readl(reply+12));
2264 if(cmd != NULL){
2265 scsi_dma_unmap(cmd);
2266 if(cmd->serial_number != 0) { // If not timedout
2267 adpt_i2o_to_scsi(reply, cmd);
2268 }
2269 }
2270 }
2271 writel(m, pHba->reply_port);
2272 wmb();
2273 rmb();
2274 }
2275 handled = 1;
2276 out: if(pHba->host)
2277 spin_unlock_irqrestore(pHba->host->host_lock, flags);
2278 return IRQ_RETVAL(handled);
2279 }
2280
2281 static s32 adpt_scsi_to_i2o(adpt_hba* pHba, struct scsi_cmnd* cmd, struct adpt_device* d)
2282 {
2283 int i;
2284 u32 msg[MAX_MESSAGE_SIZE];
2285 u32* mptr;
2286 u32* lptr;
2287 u32 *lenptr;
2288 int direction;
2289 int scsidir;
2290 int nseg;
2291 u32 len;
2292 u32 reqlen;
2293 s32 rcode;
2294 dma_addr_t addr;
2295
2296 memset(msg, 0 , sizeof(msg));
2297 len = scsi_bufflen(cmd);
2298 direction = 0x00000000;
2299
2300 scsidir = 0x00000000; // DATA NO XFER
2301 if(len) {
2302 /*
2303 * Set SCBFlags to indicate if data is being transferred
2304 * in or out, or no data transfer
2305 * Note: Do not have to verify index is less than 0 since
2306 * cmd->cmnd[0] is an unsigned char
2307 */
2308 switch(cmd->sc_data_direction){
2309 case DMA_FROM_DEVICE:
2310 scsidir =0x40000000; // DATA IN (iop<--dev)
2311 break;
2312 case DMA_TO_DEVICE:
2313 direction=0x04000000; // SGL OUT
2314 scsidir =0x80000000; // DATA OUT (iop-->dev)
2315 break;
2316 case DMA_NONE:
2317 break;
2318 case DMA_BIDIRECTIONAL:
2319 scsidir =0x40000000; // DATA IN (iop<--dev)
2320 // Assume In - and continue;
2321 break;
2322 default:
2323 printk(KERN_WARNING"%s: scsi opcode 0x%x not supported.\n",
2324 pHba->name, cmd->cmnd[0]);
2325 cmd->result = (DID_OK <<16) | (INITIATOR_ERROR << 8);
2326 cmd->scsi_done(cmd);
2327 return 0;
2328 }
2329 }
2330 // msg[0] is set later
2331 // I2O_CMD_SCSI_EXEC
2332 msg[1] = ((0xff<<24)|(HOST_TID<<12)|d->tid);
2333 msg[2] = 0;
2334 msg[3] = adpt_cmd_to_context(cmd); /* Want SCSI control block back */
2335 // Our cards use the transaction context as the tag for queueing
2336 // Adaptec/DPT Private stuff
2337 msg[4] = I2O_CMD_SCSI_EXEC|(DPT_ORGANIZATION_ID<<16);
2338 msg[5] = d->tid;
2339 /* Direction, disconnect ok | sense data | simple queue , CDBLen */
2340 // I2O_SCB_FLAG_ENABLE_DISCONNECT |
2341 // I2O_SCB_FLAG_SIMPLE_QUEUE_TAG |
2342 // I2O_SCB_FLAG_SENSE_DATA_IN_MESSAGE;
2343 msg[6] = scsidir|0x20a00000|cmd->cmd_len;
2344
2345 mptr=msg+7;
2346
2347 // Write SCSI command into the message - always 16 byte block
2348 memset(mptr, 0, 16);
2349 memcpy(mptr, cmd->cmnd, cmd->cmd_len);
2350 mptr+=4;
2351 lenptr=mptr++; /* Remember me - fill in when we know */
2352 if (dpt_dma64(pHba)) {
2353 reqlen = 16; // SINGLE SGE
2354 *mptr++ = (0x7C<<24)+(2<<16)+0x02; /* Enable 64 bit */
2355 *mptr++ = 1 << PAGE_SHIFT;
2356 } else {
2357 reqlen = 14; // SINGLE SGE
2358 }
2359 /* Now fill in the SGList and command */
2360
2361 nseg = scsi_dma_map(cmd);
2362 BUG_ON(nseg < 0);
2363 if (nseg) {
2364 struct scatterlist *sg;
2365
2366 len = 0;
2367 scsi_for_each_sg(cmd, sg, nseg, i) {
2368 lptr = mptr;
2369 *mptr++ = direction|0x10000000|sg_dma_len(sg);
2370 len+=sg_dma_len(sg);
2371 addr = sg_dma_address(sg);
2372 *mptr++ = dma_low(addr);
2373 if (dpt_dma64(pHba))
2374 *mptr++ = dma_high(addr);
2375 /* Make this an end of list */
2376 if (i == nseg - 1)
2377 *lptr = direction|0xD0000000|sg_dma_len(sg);
2378 }
2379 reqlen = mptr - msg;
2380 *lenptr = len;
2381
2382 if(cmd->underflow && len != cmd->underflow){
2383 printk(KERN_WARNING"Cmd len %08X Cmd underflow %08X\n",
2384 len, cmd->underflow);
2385 }
2386 } else {
2387 *lenptr = len = 0;
2388 reqlen = 12;
2389 }
2390
2391 /* Stick the headers on */
2392 msg[0] = reqlen<<16 | ((reqlen > 12) ? SGL_OFFSET_12 : SGL_OFFSET_0);
2393
2394 // Send it on it's way
2395 rcode = adpt_i2o_post_this(pHba, msg, reqlen<<2);
2396 if (rcode == 0) {
2397 return 0;
2398 }
2399 return rcode;
2400 }
2401
2402
2403 static s32 adpt_scsi_host_alloc(adpt_hba* pHba, struct scsi_host_template *sht)
2404 {
2405 struct Scsi_Host *host;
2406
2407 host = scsi_host_alloc(sht, sizeof(adpt_hba*));
2408 if (host == NULL) {
2409 printk("%s: scsi_host_alloc returned NULL\n", pHba->name);
2410 return -1;
2411 }
2412 host->hostdata[0] = (unsigned long)pHba;
2413 pHba->host = host;
2414
2415 host->irq = pHba->pDev->irq;
2416 /* no IO ports, so don't have to set host->io_port and
2417 * host->n_io_port
2418 */
2419 host->io_port = 0;
2420 host->n_io_port = 0;
2421 /* see comments in scsi_host.h */
2422 host->max_id = 16;
2423 host->max_lun = 256;
2424 host->max_channel = pHba->top_scsi_channel + 1;
2425 host->cmd_per_lun = 1;
2426 host->unique_id = (u32)sys_tbl_pa + pHba->unit;
2427 host->sg_tablesize = pHba->sg_tablesize;
2428 host->can_queue = pHba->post_fifo_size;
2429
2430 return 0;
2431 }
2432
2433
2434 static s32 adpt_i2o_to_scsi(void __iomem *reply, struct scsi_cmnd* cmd)
2435 {
2436 adpt_hba* pHba;
2437 u32 hba_status;
2438 u32 dev_status;
2439 u32 reply_flags = readl(reply) & 0xff00; // Leave it shifted up 8 bits
2440 // I know this would look cleaner if I just read bytes
2441 // but the model I have been using for all the rest of the
2442 // io is in 4 byte words - so I keep that model
2443 u16 detailed_status = readl(reply+16) &0xffff;
2444 dev_status = (detailed_status & 0xff);
2445 hba_status = detailed_status >> 8;
2446
2447 // calculate resid for sg
2448 scsi_set_resid(cmd, scsi_bufflen(cmd) - readl(reply+20));
2449
2450 pHba = (adpt_hba*) cmd->device->host->hostdata[0];
2451
2452 cmd->sense_buffer[0] = '\0'; // initialize sense valid flag to false
2453
2454 if(!(reply_flags & MSG_FAIL)) {
2455 switch(detailed_status & I2O_SCSI_DSC_MASK) {
2456 case I2O_SCSI_DSC_SUCCESS:
2457 cmd->result = (DID_OK << 16);
2458 // handle underflow
2459 if (readl(reply+20) < cmd->underflow) {
2460 cmd->result = (DID_ERROR <<16);
2461 printk(KERN_WARNING"%s: SCSI CMD underflow\n",pHba->name);
2462 }
2463 break;
2464 case I2O_SCSI_DSC_REQUEST_ABORTED:
2465 cmd->result = (DID_ABORT << 16);
2466 break;
2467 case I2O_SCSI_DSC_PATH_INVALID:
2468 case I2O_SCSI_DSC_DEVICE_NOT_PRESENT:
2469 case I2O_SCSI_DSC_SELECTION_TIMEOUT:
2470 case I2O_SCSI_DSC_COMMAND_TIMEOUT:
2471 case I2O_SCSI_DSC_NO_ADAPTER:
2472 case I2O_SCSI_DSC_RESOURCE_UNAVAILABLE:
2473 printk(KERN_WARNING"%s: SCSI Timeout-Device (%d,%d,%d) hba status=0x%x, dev status=0x%x, cmd=0x%x\n",
2474 pHba->name, (u32)cmd->device->channel, (u32)cmd->device->id, (u32)cmd->device->lun, hba_status, dev_status, cmd->cmnd[0]);
2475 cmd->result = (DID_TIME_OUT << 16);
2476 break;
2477 case I2O_SCSI_DSC_ADAPTER_BUSY:
2478 case I2O_SCSI_DSC_BUS_BUSY:
2479 cmd->result = (DID_BUS_BUSY << 16);
2480 break;
2481 case I2O_SCSI_DSC_SCSI_BUS_RESET:
2482 case I2O_SCSI_DSC_BDR_MESSAGE_SENT:
2483 cmd->result = (DID_RESET << 16);
2484 break;
2485 case I2O_SCSI_DSC_PARITY_ERROR_FAILURE:
2486 printk(KERN_WARNING"%s: SCSI CMD parity error\n",pHba->name);
2487 cmd->result = (DID_PARITY << 16);
2488 break;
2489 case I2O_SCSI_DSC_UNABLE_TO_ABORT:
2490 case I2O_SCSI_DSC_COMPLETE_WITH_ERROR:
2491 case I2O_SCSI_DSC_UNABLE_TO_TERMINATE:
2492 case I2O_SCSI_DSC_MR_MESSAGE_RECEIVED:
2493 case I2O_SCSI_DSC_AUTOSENSE_FAILED:
2494 case I2O_SCSI_DSC_DATA_OVERRUN:
2495 case I2O_SCSI_DSC_UNEXPECTED_BUS_FREE:
2496 case I2O_SCSI_DSC_SEQUENCE_FAILURE:
2497 case I2O_SCSI_DSC_REQUEST_LENGTH_ERROR:
2498 case I2O_SCSI_DSC_PROVIDE_FAILURE:
2499 case I2O_SCSI_DSC_REQUEST_TERMINATED:
2500 case I2O_SCSI_DSC_IDE_MESSAGE_SENT:
2501 case I2O_SCSI_DSC_UNACKNOWLEDGED_EVENT:
2502 case I2O_SCSI_DSC_MESSAGE_RECEIVED:
2503 case I2O_SCSI_DSC_INVALID_CDB:
2504 case I2O_SCSI_DSC_LUN_INVALID:
2505 case I2O_SCSI_DSC_SCSI_TID_INVALID:
2506 case I2O_SCSI_DSC_FUNCTION_UNAVAILABLE:
2507 case I2O_SCSI_DSC_NO_NEXUS:
2508 case I2O_SCSI_DSC_CDB_RECEIVED:
2509 case I2O_SCSI_DSC_LUN_ALREADY_ENABLED:
2510 case I2O_SCSI_DSC_QUEUE_FROZEN:
2511 case I2O_SCSI_DSC_REQUEST_INVALID:
2512 default:
2513 printk(KERN_WARNING"%s: SCSI error %0x-Device(%d,%d,%d) hba_status=0x%x, dev_status=0x%x, cmd=0x%x\n",
2514 pHba->name, detailed_status & I2O_SCSI_DSC_MASK, (u32)cmd->device->channel, (u32)cmd->device->id, (u32)cmd->device->lun,
2515 hba_status, dev_status, cmd->cmnd[0]);
2516 cmd->result = (DID_ERROR << 16);
2517 break;
2518 }
2519
2520 // copy over the request sense data if it was a check
2521 // condition status
2522 if (dev_status == SAM_STAT_CHECK_CONDITION) {
2523 u32 len = min(SCSI_SENSE_BUFFERSIZE, 40);
2524 // Copy over the sense data
2525 memcpy_fromio(cmd->sense_buffer, (reply+28) , len);
2526 if(cmd->sense_buffer[0] == 0x70 /* class 7 */ &&
2527 cmd->sense_buffer[2] == DATA_PROTECT ){
2528 /* This is to handle an array failed */
2529 cmd->result = (DID_TIME_OUT << 16);
2530 printk(KERN_WARNING"%s: SCSI Data Protect-Device (%d,%d,%d) hba_status=0x%x, dev_status=0x%x, cmd=0x%x\n",
2531 pHba->name, (u32)cmd->device->channel, (u32)cmd->device->id, (u32)cmd->device->lun,
2532 hba_status, dev_status, cmd->cmnd[0]);
2533
2534 }
2535 }
2536 } else {
2537 /* In this condtion we could not talk to the tid
2538 * the card rejected it. We should signal a retry
2539 * for a limitted number of retries.
2540 */
2541 cmd->result = (DID_TIME_OUT << 16);
2542 printk(KERN_WARNING"%s: I2O MSG_FAIL - Device (%d,%d,%d) tid=%d, cmd=0x%x\n",
2543 pHba->name, (u32)cmd->device->channel, (u32)cmd->device->id, (u32)cmd->device->lun,
2544 ((struct adpt_device*)(cmd->device->hostdata))->tid, cmd->cmnd[0]);
2545 }
2546
2547 cmd->result |= (dev_status);
2548
2549 if(cmd->scsi_done != NULL){
2550 cmd->scsi_done(cmd);
2551 }
2552 return cmd->result;
2553 }
2554
2555
2556 static s32 adpt_rescan(adpt_hba* pHba)
2557 {
2558 s32 rcode;
2559 ulong flags = 0;
2560
2561 if(pHba->host)
2562 spin_lock_irqsave(pHba->host->host_lock, flags);
2563 if ((rcode=adpt_i2o_lct_get(pHba)) < 0)
2564 goto out;
2565 if ((rcode=adpt_i2o_reparse_lct(pHba)) < 0)
2566 goto out;
2567 rcode = 0;
2568 out: if(pHba->host)
2569 spin_unlock_irqrestore(pHba->host->host_lock, flags);
2570 return rcode;
2571 }
2572
2573
2574 static s32 adpt_i2o_reparse_lct(adpt_hba* pHba)
2575 {
2576 int i;
2577 int max;
2578 int tid;
2579 struct i2o_device *d;
2580 i2o_lct *lct = pHba->lct;
2581 u8 bus_no = 0;
2582 s16 scsi_id;
2583 s16 scsi_lun;
2584 u32 buf[10]; // at least 8 u32's
2585 struct adpt_device* pDev = NULL;
2586 struct i2o_device* pI2o_dev = NULL;
2587
2588 if (lct == NULL) {
2589 printk(KERN_ERR "%s: LCT is empty???\n",pHba->name);
2590 return -1;
2591 }
2592
2593 max = lct->table_size;
2594 max -= 3;
2595 max /= 9;
2596
2597 // Mark each drive as unscanned
2598 for (d = pHba->devices; d; d = d->next) {
2599 pDev =(struct adpt_device*) d->owner;
2600 if(!pDev){
2601 continue;
2602 }
2603 pDev->state |= DPTI_DEV_UNSCANNED;
2604 }
2605
2606 printk(KERN_INFO "%s: LCT has %d entries.\n", pHba->name,max);
2607
2608 for(i=0;i<max;i++) {
2609 if( lct->lct_entry[i].user_tid != 0xfff){
2610 continue;
2611 }
2612
2613 if( lct->lct_entry[i].class_id == I2O_CLASS_RANDOM_BLOCK_STORAGE ||
2614 lct->lct_entry[i].class_id == I2O_CLASS_SCSI_PERIPHERAL ||
2615 lct->lct_entry[i].class_id == I2O_CLASS_FIBRE_CHANNEL_PERIPHERAL ){
2616 tid = lct->lct_entry[i].tid;
2617 if(adpt_i2o_query_scalar(pHba, tid, 0x8000, -1, buf, 32)<0) {
2618 printk(KERN_ERR"%s: Could not query device\n",pHba->name);
2619 continue;
2620 }
2621 bus_no = buf[0]>>16;
2622 scsi_id = buf[1];
2623 scsi_lun = (buf[2]>>8 )&0xff;
2624 pDev = pHba->channel[bus_no].device[scsi_id];
2625 /* da lun */
2626 while(pDev) {
2627 if(pDev->scsi_lun == scsi_lun) {
2628 break;
2629 }
2630 pDev = pDev->next_lun;
2631 }
2632 if(!pDev ) { // Something new add it
2633 d = kmalloc(sizeof(struct i2o_device), GFP_KERNEL);
2634 if(d==NULL)
2635 {
2636 printk(KERN_CRIT "Out of memory for I2O device data.\n");
2637 return -ENOMEM;
2638 }
2639
2640 d->controller = pHba;
2641 d->next = NULL;
2642
2643 memcpy(&d->lct_data, &lct->lct_entry[i], sizeof(i2o_lct_entry));
2644
2645 d->flags = 0;
2646 adpt_i2o_report_hba_unit(pHba, d);
2647 adpt_i2o_install_device(pHba, d);
2648
2649 if(bus_no >= MAX_CHANNEL) { // Something wrong skip it
2650 printk(KERN_WARNING"%s: Channel number %d out of range \n", pHba->name, bus_no);
2651 continue;
2652 }
2653 pDev = pHba->channel[bus_no].device[scsi_id];
2654 if( pDev == NULL){
2655 pDev = kzalloc(sizeof(struct adpt_device),GFP_KERNEL);
2656 if(pDev == NULL) {
2657 return -ENOMEM;
2658 }
2659 pHba->channel[bus_no].device[scsi_id] = pDev;
2660 } else {
2661 while (pDev->next_lun) {
2662 pDev = pDev->next_lun;
2663 }
2664 pDev = pDev->next_lun = kzalloc(sizeof(struct adpt_device),GFP_KERNEL);
2665 if(pDev == NULL) {
2666 return -ENOMEM;
2667 }
2668 }
2669 pDev->tid = d->lct_data.tid;
2670 pDev->scsi_channel = bus_no;
2671 pDev->scsi_id = scsi_id;
2672 pDev->scsi_lun = scsi_lun;
2673 pDev->pI2o_dev = d;
2674 d->owner = pDev;
2675 pDev->type = (buf[0])&0xff;
2676 pDev->flags = (buf[0]>>8)&0xff;
2677 // Too late, SCSI system has made up it's mind, but what the hey ...
2678 if(scsi_id > pHba->top_scsi_id){
2679 pHba->top_scsi_id = scsi_id;
2680 }
2681 if(scsi_lun > pHba->top_scsi_lun){
2682 pHba->top_scsi_lun = scsi_lun;
2683 }
2684 continue;
2685 } // end of new i2o device
2686
2687 // We found an old device - check it
2688 while(pDev) {
2689 if(pDev->scsi_lun == scsi_lun) {
2690 if(!scsi_device_online(pDev->pScsi_dev)) {
2691 printk(KERN_WARNING"%s: Setting device (%d,%d,%d) back online\n",
2692 pHba->name,bus_no,scsi_id,scsi_lun);
2693 if (pDev->pScsi_dev) {
2694 scsi_device_set_state(pDev->pScsi_dev, SDEV_RUNNING);
2695 }
2696 }
2697 d = pDev->pI2o_dev;
2698 if(d->lct_data.tid != tid) { // something changed
2699 pDev->tid = tid;
2700 memcpy(&d->lct_data, &lct->lct_entry[i], sizeof(i2o_lct_entry));
2701 if (pDev->pScsi_dev) {
2702 pDev->pScsi_dev->changed = TRUE;
2703 pDev->pScsi_dev->removable = TRUE;
2704 }
2705 }
2706 // Found it - mark it scanned
2707 pDev->state = DPTI_DEV_ONLINE;
2708 break;
2709 }
2710 pDev = pDev->next_lun;
2711 }
2712 }
2713 }
2714 for (pI2o_dev = pHba->devices; pI2o_dev; pI2o_dev = pI2o_dev->next) {
2715 pDev =(struct adpt_device*) pI2o_dev->owner;
2716 if(!pDev){
2717 continue;
2718 }
2719 // Drive offline drives that previously existed but could not be found
2720 // in the LCT table
2721 if (pDev->state & DPTI_DEV_UNSCANNED){
2722 pDev->state = DPTI_DEV_OFFLINE;
2723 printk(KERN_WARNING"%s: Device (%d,%d,%d) offline\n",pHba->name,pDev->scsi_channel,pDev->scsi_id,pDev->scsi_lun);
2724 if (pDev->pScsi_dev) {
2725 scsi_device_set_state(pDev->pScsi_dev, SDEV_OFFLINE);
2726 }
2727 }
2728 }
2729 return 0;
2730 }
2731
2732 static void adpt_fail_posted_scbs(adpt_hba* pHba)
2733 {
2734 struct scsi_cmnd* cmd = NULL;
2735 struct scsi_device* d = NULL;
2736
2737 shost_for_each_device(d, pHba->host) {
2738 unsigned long flags;
2739 spin_lock_irqsave(&d->list_lock, flags);
2740 list_for_each_entry(cmd, &d->cmd_list, list) {
2741 if(cmd->serial_number == 0){
2742 continue;
2743 }
2744 cmd->result = (DID_OK << 16) | (QUEUE_FULL <<1);
2745 cmd->scsi_done(cmd);
2746 }
2747 spin_unlock_irqrestore(&d->list_lock, flags);
2748 }
2749 }
2750
2751
2752 /*============================================================================
2753 * Routines from i2o subsystem
2754 *============================================================================
2755 */
2756
2757
2758
2759 /*
2760 * Bring an I2O controller into HOLD state. See the spec.
2761 */
2762 static int adpt_i2o_activate_hba(adpt_hba* pHba)
2763 {
2764 int rcode;
2765
2766 if(pHba->initialized ) {
2767 if (adpt_i2o_status_get(pHba) < 0) {
2768 if((rcode = adpt_i2o_reset_hba(pHba)) != 0){
2769 printk(KERN_WARNING"%s: Could NOT reset.\n", pHba->name);
2770 return rcode;
2771 }
2772 if (adpt_i2o_status_get(pHba) < 0) {
2773 printk(KERN_INFO "HBA not responding.\n");
2774 return -1;
2775 }
2776 }
2777
2778 if(pHba->status_block->iop_state == ADAPTER_STATE_FAULTED) {
2779 printk(KERN_CRIT "%s: hardware fault\n", pHba->name);
2780 return -1;
2781 }
2782
2783 if (pHba->status_block->iop_state == ADAPTER_STATE_READY ||
2784 pHba->status_block->iop_state == ADAPTER_STATE_OPERATIONAL ||
2785 pHba->status_block->iop_state == ADAPTER_STATE_HOLD ||
2786 pHba->status_block->iop_state == ADAPTER_STATE_FAILED) {
2787 adpt_i2o_reset_hba(pHba);
2788 if (adpt_i2o_status_get(pHba) < 0 || pHba->status_block->iop_state != ADAPTER_STATE_RESET) {
2789 printk(KERN_ERR "%s: Failed to initialize.\n", pHba->name);
2790 return -1;
2791 }
2792 }
2793 } else {
2794 if((rcode = adpt_i2o_reset_hba(pHba)) != 0){
2795 printk(KERN_WARNING"%s: Could NOT reset.\n", pHba->name);
2796 return rcode;
2797 }
2798
2799 }
2800
2801 if (adpt_i2o_init_outbound_q(pHba) < 0) {
2802 return -1;
2803 }
2804
2805 /* In HOLD state */
2806
2807 if (adpt_i2o_hrt_get(pHba) < 0) {
2808 return -1;
2809 }
2810
2811 return 0;
2812 }
2813
2814 /*
2815 * Bring a controller online into OPERATIONAL state.
2816 */
2817
2818 static int adpt_i2o_online_hba(adpt_hba* pHba)
2819 {
2820 if (adpt_i2o_systab_send(pHba) < 0) {
2821 adpt_i2o_delete_hba(pHba);
2822 return -1;
2823 }
2824 /* In READY state */
2825
2826 if (adpt_i2o_enable_hba(pHba) < 0) {
2827 adpt_i2o_delete_hba(pHba);
2828 return -1;
2829 }
2830
2831 /* In OPERATIONAL state */
2832 return 0;
2833 }
2834
2835 static s32 adpt_send_nop(adpt_hba*pHba,u32 m)
2836 {
2837 u32 __iomem *msg;
2838 ulong timeout = jiffies + 5*HZ;
2839
2840 while(m == EMPTY_QUEUE){
2841 rmb();
2842 m = readl(pHba->post_port);
2843 if(m != EMPTY_QUEUE){
2844 break;
2845 }
2846 if(time_after(jiffies,timeout)){
2847 printk(KERN_ERR "%s: Timeout waiting for message frame!\n",pHba->name);
2848 return 2;
2849 }
2850 schedule_timeout_uninterruptible(1);
2851 }
2852 msg = (u32 __iomem *)(pHba->msg_addr_virt + m);
2853 writel( THREE_WORD_MSG_SIZE | SGL_OFFSET_0,&msg[0]);
2854 writel( I2O_CMD_UTIL_NOP << 24 | HOST_TID << 12 | 0,&msg[1]);
2855 writel( 0,&msg[2]);
2856 wmb();
2857
2858 writel(m, pHba->post_port);
2859 wmb();
2860 return 0;
2861 }
2862
2863 static s32 adpt_i2o_init_outbound_q(adpt_hba* pHba)
2864 {
2865 u8 *status;
2866 dma_addr_t addr;
2867 u32 __iomem *msg = NULL;
2868 int i;
2869 ulong timeout = jiffies + TMOUT_INITOUTBOUND*HZ;
2870 u32 m;
2871
2872 do {
2873 rmb();
2874 m = readl(pHba->post_port);
2875 if (m != EMPTY_QUEUE) {
2876 break;
2877 }
2878
2879 if(time_after(jiffies,timeout)){
2880 printk(KERN_WARNING"%s: Timeout waiting for message frame\n",pHba->name);
2881 return -ETIMEDOUT;
2882 }
2883 schedule_timeout_uninterruptible(1);
2884 } while(m == EMPTY_QUEUE);
2885
2886 msg=(u32 __iomem *)(pHba->msg_addr_virt+m);
2887
2888 status = dma_alloc_coherent(&pHba->pDev->dev, 4, &addr, GFP_KERNEL);
2889 if (!status) {
2890 adpt_send_nop(pHba, m);
2891 printk(KERN_WARNING"%s: IOP reset failed - no free memory.\n",
2892 pHba->name);
2893 return -ENOMEM;
2894 }
2895 memset(status, 0, 4);
2896
2897 writel(EIGHT_WORD_MSG_SIZE| SGL_OFFSET_6, &msg[0]);
2898 writel(I2O_CMD_OUTBOUND_INIT<<24 | HOST_TID<<12 | ADAPTER_TID, &msg[1]);
2899 writel(0, &msg[2]);
2900 writel(0x0106, &msg[3]); /* Transaction context */
2901 writel(4096, &msg[4]); /* Host page frame size */
2902 writel((REPLY_FRAME_SIZE)<<16|0x80, &msg[5]); /* Outbound msg frame size and Initcode */
2903 writel(0xD0000004, &msg[6]); /* Simple SG LE, EOB */
2904 writel((u32)addr, &msg[7]);
2905
2906 writel(m, pHba->post_port);
2907 wmb();
2908
2909 // Wait for the reply status to come back
2910 do {
2911 if (*status) {
2912 if (*status != 0x01 /*I2O_EXEC_OUTBOUND_INIT_IN_PROGRESS*/) {
2913 break;
2914 }
2915 }
2916 rmb();
2917 if(time_after(jiffies,timeout)){
2918 printk(KERN_WARNING"%s: Timeout Initializing\n",pHba->name);
2919 /* We lose 4 bytes of "status" here, but we
2920 cannot free these because controller may
2921 awake and corrupt those bytes at any time */
2922 /* dma_free_coherent(&pHba->pDev->dev, 4, status, addr); */
2923 return -ETIMEDOUT;
2924 }
2925 schedule_timeout_uninterruptible(1);
2926 } while (1);
2927
2928 // If the command was successful, fill the fifo with our reply
2929 // message packets
2930 if(*status != 0x04 /*I2O_EXEC_OUTBOUND_INIT_COMPLETE*/) {
2931 dma_free_coherent(&pHba->pDev->dev, 4, status, addr);
2932 return -2;
2933 }
2934 dma_free_coherent(&pHba->pDev->dev, 4, status, addr);
2935
2936 if(pHba->reply_pool != NULL) {
2937 dma_free_coherent(&pHba->pDev->dev,
2938 pHba->reply_fifo_size * REPLY_FRAME_SIZE * 4,
2939 pHba->reply_pool, pHba->reply_pool_pa);
2940 }
2941
2942 pHba->reply_pool = dma_alloc_coherent(&pHba->pDev->dev,
2943 pHba->reply_fifo_size * REPLY_FRAME_SIZE * 4,
2944 &pHba->reply_pool_pa, GFP_KERNEL);
2945 if (!pHba->reply_pool) {
2946 printk(KERN_ERR "%s: Could not allocate reply pool\n", pHba->name);
2947 return -ENOMEM;
2948 }
2949 memset(pHba->reply_pool, 0 , pHba->reply_fifo_size * REPLY_FRAME_SIZE * 4);
2950
2951 for(i = 0; i < pHba->reply_fifo_size; i++) {
2952 writel(pHba->reply_pool_pa + (i * REPLY_FRAME_SIZE * 4),
2953 pHba->reply_port);
2954 wmb();
2955 }
2956 adpt_i2o_status_get(pHba);
2957 return 0;
2958 }
2959
2960
2961 /*
2962 * I2O System Table. Contains information about
2963 * all the IOPs in the system. Used to inform IOPs
2964 * about each other's existence.
2965 *
2966 * sys_tbl_ver is the CurrentChangeIndicator that is
2967 * used by IOPs to track changes.
2968 */
2969
2970
2971
2972 static s32 adpt_i2o_status_get(adpt_hba* pHba)
2973 {
2974 ulong timeout;
2975 u32 m;
2976 u32 __iomem *msg;
2977 u8 *status_block=NULL;
2978
2979 if(pHba->status_block == NULL) {
2980 pHba->status_block = dma_alloc_coherent(&pHba->pDev->dev,
2981 sizeof(i2o_status_block),
2982 &pHba->status_block_pa, GFP_KERNEL);
2983 if(pHba->status_block == NULL) {
2984 printk(KERN_ERR
2985 "dpti%d: Get Status Block failed; Out of memory. \n",
2986 pHba->unit);
2987 return -ENOMEM;
2988 }
2989 }
2990 memset(pHba->status_block, 0, sizeof(i2o_status_block));
2991 status_block = (u8*)(pHba->status_block);
2992 timeout = jiffies+TMOUT_GETSTATUS*HZ;
2993 do {
2994 rmb();
2995 m = readl(pHba->post_port);
2996 if (m != EMPTY_QUEUE) {
2997 break;
2998 }
2999 if(time_after(jiffies,timeout)){
3000 printk(KERN_ERR "%s: Timeout waiting for message !\n",
3001 pHba->name);
3002 return -ETIMEDOUT;
3003 }
3004 schedule_timeout_uninterruptible(1);
3005 } while(m==EMPTY_QUEUE);
3006
3007
3008 msg=(u32 __iomem *)(pHba->msg_addr_virt+m);
3009
3010 writel(NINE_WORD_MSG_SIZE|SGL_OFFSET_0, &msg[0]);
3011 writel(I2O_CMD_STATUS_GET<<24|HOST_TID<<12|ADAPTER_TID, &msg[1]);
3012 writel(1, &msg[2]);
3013 writel(0, &msg[3]);
3014 writel(0, &msg[4]);
3015 writel(0, &msg[5]);
3016 writel( dma_low(pHba->status_block_pa), &msg[6]);
3017 writel( dma_high(pHba->status_block_pa), &msg[7]);
3018 writel(sizeof(i2o_status_block), &msg[8]); // 88 bytes
3019
3020 //post message
3021 writel(m, pHba->post_port);
3022 wmb();
3023
3024 while(status_block[87]!=0xff){
3025 if(time_after(jiffies,timeout)){
3026 printk(KERN_ERR"dpti%d: Get status timeout.\n",
3027 pHba->unit);
3028 return -ETIMEDOUT;
3029 }
3030 rmb();
3031 schedule_timeout_uninterruptible(1);
3032 }
3033
3034 // Set up our number of outbound and inbound messages
3035 pHba->post_fifo_size = pHba->status_block->max_inbound_frames;
3036 if (pHba->post_fifo_size > MAX_TO_IOP_MESSAGES) {
3037 pHba->post_fifo_size = MAX_TO_IOP_MESSAGES;
3038 }
3039
3040 pHba->reply_fifo_size = pHba->status_block->max_outbound_frames;
3041 if (pHba->reply_fifo_size > MAX_FROM_IOP_MESSAGES) {
3042 pHba->reply_fifo_size = MAX_FROM_IOP_MESSAGES;
3043 }
3044
3045 // Calculate the Scatter Gather list size
3046 if (dpt_dma64(pHba)) {
3047 pHba->sg_tablesize
3048 = ((pHba->status_block->inbound_frame_size * 4
3049 - 14 * sizeof(u32))
3050 / (sizeof(struct sg_simple_element) + sizeof(u32)));
3051 } else {
3052 pHba->sg_tablesize
3053 = ((pHba->status_block->inbound_frame_size * 4
3054 - 12 * sizeof(u32))
3055 / sizeof(struct sg_simple_element));
3056 }
3057 if (pHba->sg_tablesize > SG_LIST_ELEMENTS) {
3058 pHba->sg_tablesize = SG_LIST_ELEMENTS;
3059 }
3060
3061
3062 #ifdef DEBUG
3063 printk("dpti%d: State = ",pHba->unit);
3064 switch(pHba->status_block->iop_state) {
3065 case 0x01:
3066 printk("INIT\n");
3067 break;
3068 case 0x02:
3069 printk("RESET\n");
3070 break;
3071 case 0x04:
3072 printk("HOLD\n");
3073 break;
3074 case 0x05:
3075 printk("READY\n");
3076 break;
3077 case 0x08:
3078 printk("OPERATIONAL\n");
3079 break;
3080 case 0x10:
3081 printk("FAILED\n");
3082 break;
3083 case 0x11:
3084 printk("FAULTED\n");
3085 break;
3086 default:
3087 printk("%x (unknown!!)\n",pHba->status_block->iop_state);
3088 }
3089 #endif
3090 return 0;
3091 }
3092
3093 /*
3094 * Get the IOP's Logical Configuration Table
3095 */
3096 static int adpt_i2o_lct_get(adpt_hba* pHba)
3097 {
3098 u32 msg[8];
3099 int ret;
3100 u32 buf[16];
3101
3102 if ((pHba->lct_size == 0) || (pHba->lct == NULL)){
3103 pHba->lct_size = pHba->status_block->expected_lct_size;
3104 }
3105 do {
3106 if (pHba->lct == NULL) {
3107 pHba->lct = dma_alloc_coherent(&pHba->pDev->dev,
3108 pHba->lct_size, &pHba->lct_pa,
3109 GFP_KERNEL);
3110 if(pHba->lct == NULL) {
3111 printk(KERN_CRIT "%s: Lct Get failed. Out of memory.\n",
3112 pHba->name);
3113 return -ENOMEM;
3114 }
3115 }
3116 memset(pHba->lct, 0, pHba->lct_size);
3117
3118 msg[0] = EIGHT_WORD_MSG_SIZE|SGL_OFFSET_6;
3119 msg[1] = I2O_CMD_LCT_NOTIFY<<24 | HOST_TID<<12 | ADAPTER_TID;
3120 msg[2] = 0;
3121 msg[3] = 0;
3122 msg[4] = 0xFFFFFFFF; /* All devices */
3123 msg[5] = 0x00000000; /* Report now */
3124 msg[6] = 0xD0000000|pHba->lct_size;
3125 msg[7] = (u32)pHba->lct_pa;
3126
3127 if ((ret=adpt_i2o_post_wait(pHba, msg, sizeof(msg), 360))) {
3128 printk(KERN_ERR "%s: LCT Get failed (status=%#10x.\n",
3129 pHba->name, ret);
3130 printk(KERN_ERR"Adaptec: Error Reading Hardware.\n");
3131 return ret;
3132 }
3133
3134 if ((pHba->lct->table_size << 2) > pHba->lct_size) {
3135 pHba->lct_size = pHba->lct->table_size << 2;
3136 dma_free_coherent(&pHba->pDev->dev, pHba->lct_size,
3137 pHba->lct, pHba->lct_pa);
3138 pHba->lct = NULL;
3139 }
3140 } while (pHba->lct == NULL);
3141
3142 PDEBUG("%s: Hardware resource table read.\n", pHba->name);
3143
3144
3145 // I2O_DPT_EXEC_IOP_BUFFERS_GROUP_NO;
3146 if(adpt_i2o_query_scalar(pHba, 0 , 0x8000, -1, buf, sizeof(buf))>=0) {
3147 pHba->FwDebugBufferSize = buf[1];
3148 pHba->FwDebugBuffer_P = ioremap(pHba->base_addr_phys + buf[0],
3149 pHba->FwDebugBufferSize);
3150 if (pHba->FwDebugBuffer_P) {
3151 pHba->FwDebugFlags_P = pHba->FwDebugBuffer_P +
3152 FW_DEBUG_FLAGS_OFFSET;
3153 pHba->FwDebugBLEDvalue_P = pHba->FwDebugBuffer_P +
3154 FW_DEBUG_BLED_OFFSET;
3155 pHba->FwDebugBLEDflag_P = pHba->FwDebugBLEDvalue_P + 1;
3156 pHba->FwDebugStrLength_P = pHba->FwDebugBuffer_P +
3157 FW_DEBUG_STR_LENGTH_OFFSET;
3158 pHba->FwDebugBuffer_P += buf[2];
3159 pHba->FwDebugFlags = 0;
3160 }
3161 }
3162
3163 return 0;
3164 }
3165
3166 static int adpt_i2o_build_sys_table(void)
3167 {
3168 adpt_hba* pHba = hba_chain;
3169 int count = 0;
3170
3171 if (sys_tbl)
3172 dma_free_coherent(&pHba->pDev->dev, sys_tbl_len,
3173 sys_tbl, sys_tbl_pa);
3174
3175 sys_tbl_len = sizeof(struct i2o_sys_tbl) + // Header + IOPs
3176 (hba_count) * sizeof(struct i2o_sys_tbl_entry);
3177
3178 sys_tbl = dma_alloc_coherent(&pHba->pDev->dev,
3179 sys_tbl_len, &sys_tbl_pa, GFP_KERNEL);
3180 if (!sys_tbl) {
3181 printk(KERN_WARNING "SysTab Set failed. Out of memory.\n");
3182 return -ENOMEM;
3183 }
3184 memset(sys_tbl, 0, sys_tbl_len);
3185
3186 sys_tbl->num_entries = hba_count;
3187 sys_tbl->version = I2OVERSION;
3188 sys_tbl->change_ind = sys_tbl_ind++;
3189
3190 for(pHba = hba_chain; pHba; pHba = pHba->next) {
3191 u64 addr;
3192 // Get updated Status Block so we have the latest information
3193 if (adpt_i2o_status_get(pHba)) {
3194 sys_tbl->num_entries--;
3195 continue; // try next one
3196 }
3197
3198 sys_tbl->iops[count].org_id = pHba->status_block->org_id;
3199 sys_tbl->iops[count].iop_id = pHba->unit + 2;
3200 sys_tbl->iops[count].seg_num = 0;
3201 sys_tbl->iops[count].i2o_version = pHba->status_block->i2o_version;
3202 sys_tbl->iops[count].iop_state = pHba->status_block->iop_state;
3203 sys_tbl->iops[count].msg_type = pHba->status_block->msg_type;
3204 sys_tbl->iops[count].frame_size = pHba->status_block->inbound_frame_size;
3205 sys_tbl->iops[count].last_changed = sys_tbl_ind - 1; // ??
3206 sys_tbl->iops[count].iop_capabilities = pHba->status_block->iop_capabilities;
3207 addr = pHba->base_addr_phys + 0x40;
3208 sys_tbl->iops[count].inbound_low = dma_low(addr);
3209 sys_tbl->iops[count].inbound_high = dma_high(addr);
3210
3211 count++;
3212 }
3213
3214 #ifdef DEBUG
3215 {
3216 u32 *table = (u32*)sys_tbl;
3217 printk(KERN_DEBUG"sys_tbl_len=%d in 32bit words\n",(sys_tbl_len >>2));
3218 for(count = 0; count < (sys_tbl_len >>2); count++) {
3219 printk(KERN_INFO "sys_tbl[%d] = %0#10x\n",
3220 count, table[count]);
3221 }
3222 }
3223 #endif
3224
3225 return 0;
3226 }
3227
3228
3229 /*
3230 * Dump the information block associated with a given unit (TID)
3231 */
3232
3233 static void adpt_i2o_report_hba_unit(adpt_hba* pHba, struct i2o_device *d)
3234 {
3235 char buf[64];
3236 int unit = d->lct_data.tid;
3237
3238 printk(KERN_INFO "TID %3.3d ", unit);
3239
3240 if(adpt_i2o_query_scalar(pHba, unit, 0xF100, 3, buf, 16)>=0)
3241 {
3242 buf[16]=0;
3243 printk(" Vendor: %-12.12s", buf);
3244 }
3245 if(adpt_i2o_query_scalar(pHba, unit, 0xF100, 4, buf, 16)>=0)
3246 {
3247 buf[16]=0;
3248 printk(" Device: %-12.12s", buf);
3249 }
3250 if(adpt_i2o_query_scalar(pHba, unit, 0xF100, 6, buf, 8)>=0)
3251 {
3252 buf[8]=0;
3253 printk(" Rev: %-12.12s\n", buf);
3254 }
3255 #ifdef DEBUG
3256 printk(KERN_INFO "\tClass: %.21s\n", adpt_i2o_get_class_name(d->lct_data.class_id));
3257 printk(KERN_INFO "\tSubclass: 0x%04X\n", d->lct_data.sub_class);
3258 printk(KERN_INFO "\tFlags: ");
3259
3260 if(d->lct_data.device_flags&(1<<0))
3261 printk("C"); // ConfigDialog requested
3262 if(d->lct_data.device_flags&(1<<1))
3263 printk("U"); // Multi-user capable
3264 if(!(d->lct_data.device_flags&(1<<4)))
3265 printk("P"); // Peer service enabled!
3266 if(!(d->lct_data.device_flags&(1<<5)))
3267 printk("M"); // Mgmt service enabled!
3268 printk("\n");
3269 #endif
3270 }
3271
3272 #ifdef DEBUG
3273 /*
3274 * Do i2o class name lookup
3275 */
3276 static const char *adpt_i2o_get_class_name(int class)
3277 {
3278 int idx = 16;
3279 static char *i2o_class_name[] = {
3280 "Executive",
3281 "Device Driver Module",
3282 "Block Device",
3283 "Tape Device",
3284 "LAN Interface",
3285 "WAN Interface",
3286 "Fibre Channel Port",
3287 "Fibre Channel Device",
3288 "SCSI Device",
3289 "ATE Port",
3290 "ATE Device",
3291 "Floppy Controller",
3292 "Floppy Device",
3293 "Secondary Bus Port",
3294 "Peer Transport Agent",
3295 "Peer Transport",
3296 "Unknown"
3297 };
3298
3299 switch(class&0xFFF) {
3300 case I2O_CLASS_EXECUTIVE:
3301 idx = 0; break;
3302 case I2O_CLASS_DDM:
3303 idx = 1; break;
3304 case I2O_CLASS_RANDOM_BLOCK_STORAGE:
3305 idx = 2; break;
3306 case I2O_CLASS_SEQUENTIAL_STORAGE:
3307 idx = 3; break;
3308 case I2O_CLASS_LAN:
3309 idx = 4; break;
3310 case I2O_CLASS_WAN:
3311 idx = 5; break;
3312 case I2O_CLASS_FIBRE_CHANNEL_PORT:
3313 idx = 6; break;
3314 case I2O_CLASS_FIBRE_CHANNEL_PERIPHERAL:
3315 idx = 7; break;
3316 case I2O_CLASS_SCSI_PERIPHERAL:
3317 idx = 8; break;
3318 case I2O_CLASS_ATE_PORT:
3319 idx = 9; break;
3320 case I2O_CLASS_ATE_PERIPHERAL:
3321 idx = 10; break;
3322 case I2O_CLASS_FLOPPY_CONTROLLER:
3323 idx = 11; break;
3324 case I2O_CLASS_FLOPPY_DEVICE:
3325 idx = 12; break;
3326 case I2O_CLASS_BUS_ADAPTER_PORT:
3327 idx = 13; break;
3328 case I2O_CLASS_PEER_TRANSPORT_AGENT:
3329 idx = 14; break;
3330 case I2O_CLASS_PEER_TRANSPORT:
3331 idx = 15; break;
3332 }
3333 return i2o_class_name[idx];
3334 }
3335 #endif
3336
3337
3338 static s32 adpt_i2o_hrt_get(adpt_hba* pHba)
3339 {
3340 u32 msg[6];
3341 int ret, size = sizeof(i2o_hrt);
3342
3343 do {
3344 if (pHba->hrt == NULL) {
3345 pHba->hrt = dma_alloc_coherent(&pHba->pDev->dev,
3346 size, &pHba->hrt_pa, GFP_KERNEL);
3347 if (pHba->hrt == NULL) {
3348 printk(KERN_CRIT "%s: Hrt Get failed; Out of memory.\n", pHba->name);
3349 return -ENOMEM;
3350 }
3351 }
3352
3353 msg[0]= SIX_WORD_MSG_SIZE| SGL_OFFSET_4;
3354 msg[1]= I2O_CMD_HRT_GET<<24 | HOST_TID<<12 | ADAPTER_TID;
3355 msg[2]= 0;
3356 msg[3]= 0;
3357 msg[4]= (0xD0000000 | size); /* Simple transaction */
3358 msg[5]= (u32)pHba->hrt_pa; /* Dump it here */
3359
3360 if ((ret = adpt_i2o_post_wait(pHba, msg, sizeof(msg),20))) {
3361 printk(KERN_ERR "%s: Unable to get HRT (status=%#10x)\n", pHba->name, ret);
3362 return ret;
3363 }
3364
3365 if (pHba->hrt->num_entries * pHba->hrt->entry_len << 2 > size) {
3366 int newsize = pHba->hrt->num_entries * pHba->hrt->entry_len << 2;
3367 dma_free_coherent(&pHba->pDev->dev, size,
3368 pHba->hrt, pHba->hrt_pa);
3369 size = newsize;
3370 pHba->hrt = NULL;
3371 }
3372 } while(pHba->hrt == NULL);
3373 return 0;
3374 }
3375
3376 /*
3377 * Query one scalar group value or a whole scalar group.
3378 */
3379 static int adpt_i2o_query_scalar(adpt_hba* pHba, int tid,
3380 int group, int field, void *buf, int buflen)
3381 {
3382 u16 opblk[] = { 1, 0, I2O_PARAMS_FIELD_GET, group, 1, field };
3383 u8 *opblk_va;
3384 dma_addr_t opblk_pa;
3385 u8 *resblk_va;
3386 dma_addr_t resblk_pa;
3387
3388 int size;
3389
3390 /* 8 bytes for header */
3391 resblk_va = dma_alloc_coherent(&pHba->pDev->dev,
3392 sizeof(u8) * (8 + buflen), &resblk_pa, GFP_KERNEL);
3393 if (resblk_va == NULL) {
3394 printk(KERN_CRIT "%s: query scalar failed; Out of memory.\n", pHba->name);
3395 return -ENOMEM;
3396 }
3397
3398 opblk_va = dma_alloc_coherent(&pHba->pDev->dev,
3399 sizeof(opblk), &opblk_pa, GFP_KERNEL);
3400 if (opblk_va == NULL) {
3401 dma_free_coherent(&pHba->pDev->dev, sizeof(u8) * (8+buflen),
3402 resblk_va, resblk_pa);
3403 printk(KERN_CRIT "%s: query operatio failed; Out of memory.\n",
3404 pHba->name);
3405 return -ENOMEM;
3406 }
3407 if (field == -1) /* whole group */
3408 opblk[4] = -1;
3409
3410 memcpy(opblk_va, opblk, sizeof(opblk));
3411 size = adpt_i2o_issue_params(I2O_CMD_UTIL_PARAMS_GET, pHba, tid,
3412 opblk_va, opblk_pa, sizeof(opblk),
3413 resblk_va, resblk_pa, sizeof(u8)*(8+buflen));
3414 dma_free_coherent(&pHba->pDev->dev, sizeof(opblk), opblk_va, opblk_pa);
3415 if (size == -ETIME) {
3416 dma_free_coherent(&pHba->pDev->dev, sizeof(u8) * (8+buflen),
3417 resblk_va, resblk_pa);
3418 printk(KERN_WARNING "%s: issue params failed; Timed out.\n", pHba->name);
3419 return -ETIME;
3420 } else if (size == -EINTR) {
3421 dma_free_coherent(&pHba->pDev->dev, sizeof(u8) * (8+buflen),
3422 resblk_va, resblk_pa);
3423 printk(KERN_WARNING "%s: issue params failed; Interrupted.\n", pHba->name);
3424 return -EINTR;
3425 }
3426
3427 memcpy(buf, resblk_va+8, buflen); /* cut off header */
3428
3429 dma_free_coherent(&pHba->pDev->dev, sizeof(u8) * (8+buflen),
3430 resblk_va, resblk_pa);
3431 if (size < 0)
3432 return size;
3433
3434 return buflen;
3435 }
3436
3437
3438 /* Issue UTIL_PARAMS_GET or UTIL_PARAMS_SET
3439 *
3440 * This function can be used for all UtilParamsGet/Set operations.
3441 * The OperationBlock is given in opblk-buffer,
3442 * and results are returned in resblk-buffer.
3443 * Note that the minimum sized resblk is 8 bytes and contains
3444 * ResultCount, ErrorInfoSize, BlockStatus and BlockSize.
3445 */
3446 static int adpt_i2o_issue_params(int cmd, adpt_hba* pHba, int tid,
3447 void *opblk_va, dma_addr_t opblk_pa, int oplen,
3448 void *resblk_va, dma_addr_t resblk_pa, int reslen)
3449 {
3450 u32 msg[9];
3451 u32 *res = (u32 *)resblk_va;
3452 int wait_status;
3453
3454 msg[0] = NINE_WORD_MSG_SIZE | SGL_OFFSET_5;
3455 msg[1] = cmd << 24 | HOST_TID << 12 | tid;
3456 msg[2] = 0;
3457 msg[3] = 0;
3458 msg[4] = 0;
3459 msg[5] = 0x54000000 | oplen; /* OperationBlock */
3460 msg[6] = (u32)opblk_pa;
3461 msg[7] = 0xD0000000 | reslen; /* ResultBlock */
3462 msg[8] = (u32)resblk_pa;
3463
3464 if ((wait_status = adpt_i2o_post_wait(pHba, msg, sizeof(msg), 20))) {
3465 printk("adpt_i2o_issue_params: post_wait failed (%p)\n", resblk_va);
3466 return wait_status; /* -DetailedStatus */
3467 }
3468
3469 if (res[1]&0x00FF0000) { /* BlockStatus != SUCCESS */
3470 printk(KERN_WARNING "%s: %s - Error:\n ErrorInfoSize = 0x%02x, "
3471 "BlockStatus = 0x%02x, BlockSize = 0x%04x\n",
3472 pHba->name,
3473 (cmd == I2O_CMD_UTIL_PARAMS_SET) ? "PARAMS_SET"
3474 : "PARAMS_GET",
3475 res[1]>>24, (res[1]>>16)&0xFF, res[1]&0xFFFF);
3476 return -((res[1] >> 16) & 0xFF); /* -BlockStatus */
3477 }
3478
3479 return 4 + ((res[1] & 0x0000FFFF) << 2); /* bytes used in resblk */
3480 }
3481
3482
3483 static s32 adpt_i2o_quiesce_hba(adpt_hba* pHba)
3484 {
3485 u32 msg[4];
3486 int ret;
3487
3488 adpt_i2o_status_get(pHba);
3489
3490 /* SysQuiesce discarded if IOP not in READY or OPERATIONAL state */
3491
3492 if((pHba->status_block->iop_state != ADAPTER_STATE_READY) &&
3493 (pHba->status_block->iop_state != ADAPTER_STATE_OPERATIONAL)){
3494 return 0;
3495 }
3496
3497 msg[0] = FOUR_WORD_MSG_SIZE|SGL_OFFSET_0;
3498 msg[1] = I2O_CMD_SYS_QUIESCE<<24|HOST_TID<<12|ADAPTER_TID;
3499 msg[2] = 0;
3500 msg[3] = 0;
3501
3502 if((ret = adpt_i2o_post_wait(pHba, msg, sizeof(msg), 240))) {
3503 printk(KERN_INFO"dpti%d: Unable to quiesce (status=%#x).\n",
3504 pHba->unit, -ret);
3505 } else {
3506 printk(KERN_INFO"dpti%d: Quiesced.\n",pHba->unit);
3507 }
3508
3509 adpt_i2o_status_get(pHba);
3510 return ret;
3511 }
3512
3513
3514 /*
3515 * Enable IOP. Allows the IOP to resume external operations.
3516 */
3517 static int adpt_i2o_enable_hba(adpt_hba* pHba)
3518 {
3519 u32 msg[4];
3520 int ret;
3521
3522 adpt_i2o_status_get(pHba);
3523 if(!pHba->status_block){
3524 return -ENOMEM;
3525 }
3526 /* Enable only allowed on READY state */
3527 if(pHba->status_block->iop_state == ADAPTER_STATE_OPERATIONAL)
3528 return 0;
3529
3530 if(pHba->status_block->iop_state != ADAPTER_STATE_READY)
3531 return -EINVAL;
3532
3533 msg[0]=FOUR_WORD_MSG_SIZE|SGL_OFFSET_0;
3534 msg[1]=I2O_CMD_SYS_ENABLE<<24|HOST_TID<<12|ADAPTER_TID;
3535 msg[2]= 0;
3536 msg[3]= 0;
3537
3538 if ((ret = adpt_i2o_post_wait(pHba, msg, sizeof(msg), 240))) {
3539 printk(KERN_WARNING"%s: Could not enable (status=%#10x).\n",
3540 pHba->name, ret);
3541 } else {
3542 PDEBUG("%s: Enabled.\n", pHba->name);
3543 }
3544
3545 adpt_i2o_status_get(pHba);
3546 return ret;
3547 }
3548
3549
3550 static int adpt_i2o_systab_send(adpt_hba* pHba)
3551 {
3552 u32 msg[12];
3553 int ret;
3554
3555 msg[0] = I2O_MESSAGE_SIZE(12) | SGL_OFFSET_6;
3556 msg[1] = I2O_CMD_SYS_TAB_SET<<24 | HOST_TID<<12 | ADAPTER_TID;
3557 msg[2] = 0;
3558 msg[3] = 0;
3559 msg[4] = (0<<16) | ((pHba->unit+2) << 12); /* Host 0 IOP ID (unit + 2) */
3560 msg[5] = 0; /* Segment 0 */
3561
3562 /*
3563 * Provide three SGL-elements:
3564 * System table (SysTab), Private memory space declaration and
3565 * Private i/o space declaration
3566 */
3567 msg[6] = 0x54000000 | sys_tbl_len;
3568 msg[7] = (u32)sys_tbl_pa;
3569 msg[8] = 0x54000000 | 0;
3570 msg[9] = 0;
3571 msg[10] = 0xD4000000 | 0;
3572 msg[11] = 0;
3573
3574 if ((ret=adpt_i2o_post_wait(pHba, msg, sizeof(msg), 120))) {
3575 printk(KERN_INFO "%s: Unable to set SysTab (status=%#10x).\n",
3576 pHba->name, ret);
3577 }
3578 #ifdef DEBUG
3579 else {
3580 PINFO("%s: SysTab set.\n", pHba->name);
3581 }
3582 #endif
3583
3584 return ret;
3585 }
3586
3587
3588 /*============================================================================
3589 *
3590 *============================================================================
3591 */
3592
3593
3594 #ifdef UARTDELAY
3595
3596 static static void adpt_delay(int millisec)
3597 {
3598 int i;
3599 for (i = 0; i < millisec; i++) {
3600 udelay(1000); /* delay for one millisecond */
3601 }
3602 }
3603
3604 #endif
3605
3606 static struct scsi_host_template driver_template = {
3607 .module = THIS_MODULE,
3608 .name = "dpt_i2o",
3609 .proc_name = "dpt_i2o",
3610 .proc_info = adpt_proc_info,
3611 .info = adpt_info,
3612 .queuecommand = adpt_queue,
3613 .eh_abort_handler = adpt_abort,
3614 .eh_device_reset_handler = adpt_device_reset,
3615 .eh_bus_reset_handler = adpt_bus_reset,
3616 .eh_host_reset_handler = adpt_reset,
3617 .bios_param = adpt_bios_param,
3618 .slave_configure = adpt_slave_configure,
3619 .can_queue = MAX_TO_IOP_MESSAGES,
3620 .this_id = 7,
3621 .cmd_per_lun = 1,
3622 .use_clustering = ENABLE_CLUSTERING,
3623 };
3624
3625 static int __init adpt_init(void)
3626 {
3627 int error;
3628 adpt_hba *pHba, *next;
3629
3630 printk("Loading Adaptec I2O RAID: Version " DPT_I2O_VERSION "\n");
3631
3632 error = adpt_detect(&driver_template);
3633 if (error < 0)
3634 return error;
3635 if (hba_chain == NULL)
3636 return -ENODEV;
3637
3638 for (pHba = hba_chain; pHba; pHba = pHba->next) {
3639 error = scsi_add_host(pHba->host, &pHba->pDev->dev);
3640 if (error)
3641 goto fail;
3642 scsi_scan_host(pHba->host);
3643 }
3644 return 0;
3645 fail:
3646 for (pHba = hba_chain; pHba; pHba = next) {
3647 next = pHba->next;
3648 scsi_remove_host(pHba->host);
3649 }
3650 return error;
3651 }
3652
3653 static void __exit adpt_exit(void)
3654 {
3655 adpt_hba *pHba, *next;
3656
3657 for (pHba = hba_chain; pHba; pHba = pHba->next)
3658 scsi_remove_host(pHba->host);
3659 for (pHba = hba_chain; pHba; pHba = next) {
3660 next = pHba->next;
3661 adpt_release(pHba->host);
3662 }
3663 }
3664
3665 module_init(adpt_init);
3666 module_exit(adpt_exit);
3667
3668 MODULE_LICENSE("GPL");
Linux for Ginger Game Console