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