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