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