1 /*
2 * Disk Array driver for Compaq SMART2 Controllers
3 * Copyright 1998 Compaq Computer Corporation
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
13 * NON INFRINGEMENT. See the GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18 *
19 * Questions/Comments/Bugfixes to iss_storagedev@hp.com
20 *
21 */
22 #include <linux/module.h>
23 #include <linux/types.h>
24 #include <linux/pci.h>
25 #include <linux/bio.h>
26 #include <linux/interrupt.h>
27 #include <linux/kernel.h>
28 #include <linux/slab.h>
29 #include <linux/delay.h>
30 #include <linux/major.h>
31 #include <linux/fs.h>
32 #include <linux/blkpg.h>
33 #include <linux/timer.h>
34 #include <linux/proc_fs.h>
35 #include <linux/init.h>
36 #include <linux/hdreg.h>
37 #include <linux/spinlock.h>
38 #include <linux/blkdev.h>
39 #include <linux/genhd.h>
40 #include <linux/scatterlist.h>
41 #include <asm/uaccess.h>
42 #include <asm/io.h>
43
44
45 #define SMART2_DRIVER_VERSION(maj,min,submin) ((maj<<16)|(min<<8)|(submin))
46
47 #define DRIVER_NAME "Compaq SMART2 Driver (v 2.6.0)"
48 #define DRIVER_VERSION SMART2_DRIVER_VERSION(2,6,0)
49
50 /* Embedded module documentation macros - see modules.h */
51 /* Original author Chris Frantz - Compaq Computer Corporation */
52 MODULE_AUTHOR("Compaq Computer Corporation");
53 MODULE_DESCRIPTION("Driver for Compaq Smart2 Array Controllers version 2.6.0");
54 MODULE_LICENSE("GPL");
55
56 #include "cpqarray.h"
57 #include "ida_cmd.h"
58 #include "smart1,2.h"
59 #include "ida_ioctl.h"
60
61 #define READ_AHEAD 128
62 #define NR_CMDS 128 /* This could probably go as high as ~400 */
63
64 #define MAX_CTLR 8
65 #define CTLR_SHIFT 8
66
67 #define CPQARRAY_DMA_MASK 0xFFFFFFFF /* 32 bit DMA */
68
69 static int nr_ctlr;
70 static ctlr_info_t *hba[MAX_CTLR];
71
72 static int eisa[8];
73
74 #define NR_PRODUCTS ARRAY_SIZE(products)
75
76 /* board_id = Subsystem Device ID & Vendor ID
77 * product = Marketing Name for the board
78 * access = Address of the struct of function pointers
79 */
80 static struct board_type products[] = {
81 { 0x0040110E, "IDA", &smart1_access },
82 { 0x0140110E, "IDA-2", &smart1_access },
83 { 0x1040110E, "IAES", &smart1_access },
84 { 0x2040110E, "SMART", &smart1_access },
85 { 0x3040110E, "SMART-2/E", &smart2e_access },
86 { 0x40300E11, "SMART-2/P", &smart2_access },
87 { 0x40310E11, "SMART-2SL", &smart2_access },
88 { 0x40320E11, "Smart Array 3200", &smart2_access },
89 { 0x40330E11, "Smart Array 3100ES", &smart2_access },
90 { 0x40340E11, "Smart Array 221", &smart2_access },
91 { 0x40400E11, "Integrated Array", &smart4_access },
92 { 0x40480E11, "Compaq Raid LC2", &smart4_access },
93 { 0x40500E11, "Smart Array 4200", &smart4_access },
94 { 0x40510E11, "Smart Array 4250ES", &smart4_access },
95 { 0x40580E11, "Smart Array 431", &smart4_access },
96 };
97
98 /* define the PCI info for the PCI cards this driver can control */
99 static const struct pci_device_id cpqarray_pci_device_id[] =
100 {
101 { PCI_VENDOR_ID_DEC, PCI_DEVICE_ID_COMPAQ_42XX,
102 0x0E11, 0x4058, 0, 0, 0}, /* SA431 */
103 { PCI_VENDOR_ID_DEC, PCI_DEVICE_ID_COMPAQ_42XX,
104 0x0E11, 0x4051, 0, 0, 0}, /* SA4250ES */
105 { PCI_VENDOR_ID_DEC, PCI_DEVICE_ID_COMPAQ_42XX,
106 0x0E11, 0x4050, 0, 0, 0}, /* SA4200 */
107 { PCI_VENDOR_ID_NCR, PCI_DEVICE_ID_NCR_53C1510,
108 0x0E11, 0x4048, 0, 0, 0}, /* LC2 */
109 { PCI_VENDOR_ID_NCR, PCI_DEVICE_ID_NCR_53C1510,
110 0x0E11, 0x4040, 0, 0, 0}, /* Integrated Array */
111 { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_SMART2P,
112 0x0E11, 0x4034, 0, 0, 0}, /* SA 221 */
113 { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_SMART2P,
114 0x0E11, 0x4033, 0, 0, 0}, /* SA 3100ES*/
115 { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_SMART2P,
116 0x0E11, 0x4032, 0, 0, 0}, /* SA 3200*/
117 { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_SMART2P,
118 0x0E11, 0x4031, 0, 0, 0}, /* SA 2SL*/
119 { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_SMART2P,
120 0x0E11, 0x4030, 0, 0, 0}, /* SA 2P */
121 { 0 }
122 };
123
124 MODULE_DEVICE_TABLE(pci, cpqarray_pci_device_id);
125
126 static struct gendisk *ida_gendisk[MAX_CTLR][NWD];
127
128 /* Debug... */
129 #define DBG(s) do { s } while(0)
130 /* Debug (general info)... */
131 #define DBGINFO(s) do { } while(0)
132 /* Debug Paranoid... */
133 #define DBGP(s) do { } while(0)
134 /* Debug Extra Paranoid... */
135 #define DBGPX(s) do { } while(0)
136
137 static int cpqarray_pci_init(ctlr_info_t *c, struct pci_dev *pdev);
138 static void __iomem *remap_pci_mem(ulong base, ulong size);
139 static int cpqarray_eisa_detect(void);
140 static int pollcomplete(int ctlr);
141 static void getgeometry(int ctlr);
142 static void start_fwbk(int ctlr);
143
144 static cmdlist_t * cmd_alloc(ctlr_info_t *h, int get_from_pool);
145 static void cmd_free(ctlr_info_t *h, cmdlist_t *c, int got_from_pool);
146
147 static void free_hba(int i);
148 static int alloc_cpqarray_hba(void);
149
150 static int sendcmd(
151 __u8 cmd,
152 int ctlr,
153 void *buff,
154 size_t size,
155 unsigned int blk,
156 unsigned int blkcnt,
157 unsigned int log_unit );
158
159 static int ida_open(struct block_device *bdev, fmode_t mode);
160 static int ida_release(struct gendisk *disk, fmode_t mode);
161 static int ida_ioctl(struct block_device *bdev, fmode_t mode, unsigned int cmd, unsigned long arg);
162 static int ida_getgeo(struct block_device *bdev, struct hd_geometry *geo);
163 static int ida_ctlr_ioctl(ctlr_info_t *h, int dsk, ida_ioctl_t *io);
164
165 static void do_ida_request(struct request_queue *q);
166 static void start_io(ctlr_info_t *h);
167
168 static inline void addQ(cmdlist_t **Qptr, cmdlist_t *c);
169 static inline cmdlist_t *removeQ(cmdlist_t **Qptr, cmdlist_t *c);
170 static inline void complete_command(cmdlist_t *cmd, int timeout);
171
172 static irqreturn_t do_ida_intr(int irq, void *dev_id);
173 static void ida_timer(unsigned long tdata);
174 static int ida_revalidate(struct gendisk *disk);
175 static int revalidate_allvol(ctlr_info_t *host);
176 static int cpqarray_register_ctlr(int ctlr, struct pci_dev *pdev);
177
178 #ifdef CONFIG_PROC_FS
179 static void ida_procinit(int i);
180 static int ida_proc_get_info(char *buffer, char **start, off_t offset, int length, int *eof, void *data);
181 #else
ida_procinit(int i)182 static void ida_procinit(int i) {}
183 #endif
184
get_drv(struct gendisk * disk)185 static inline drv_info_t *get_drv(struct gendisk *disk)
186 {
187 return disk->private_data;
188 }
189
get_host(struct gendisk * disk)190 static inline ctlr_info_t *get_host(struct gendisk *disk)
191 {
192 return disk->queue->queuedata;
193 }
194
195
196 static struct block_device_operations ida_fops = {
197 .owner = THIS_MODULE,
198 .open = ida_open,
199 .release = ida_release,
200 .locked_ioctl = ida_ioctl,
201 .getgeo = ida_getgeo,
202 .revalidate_disk= ida_revalidate,
203 };
204
205
206 #ifdef CONFIG_PROC_FS
207
208 static struct proc_dir_entry *proc_array;
209
210 /*
211 * Get us a file in /proc/array that says something about each controller.
212 * Create /proc/array if it doesn't exist yet.
213 */
ida_procinit(int i)214 static void __init ida_procinit(int i)
215 {
216 if (proc_array == NULL) {
217 proc_array = proc_mkdir("driver/cpqarray", NULL);
218 if (!proc_array) return;
219 }
220
221 create_proc_read_entry(hba[i]->devname, 0, proc_array,
222 ida_proc_get_info, hba[i]);
223 }
224
225 /*
226 * Report information about this controller.
227 */
ida_proc_get_info(char * buffer,char ** start,off_t offset,int length,int * eof,void * data)228 static int ida_proc_get_info(char *buffer, char **start, off_t offset, int length, int *eof, void *data)
229 {
230 off_t pos = 0;
231 off_t len = 0;
232 int size, i, ctlr;
233 ctlr_info_t *h = (ctlr_info_t*)data;
234 drv_info_t *drv;
235 #ifdef CPQ_PROC_PRINT_QUEUES
236 cmdlist_t *c;
237 unsigned long flags;
238 #endif
239
240 ctlr = h->ctlr;
241 size = sprintf(buffer, "%s: Compaq %s Controller\n"
242 " Board ID: 0x%08lx\n"
243 " Firmware Revision: %c%c%c%c\n"
244 " Controller Sig: 0x%08lx\n"
245 " Memory Address: 0x%08lx\n"
246 " I/O Port: 0x%04x\n"
247 " IRQ: %d\n"
248 " Logical drives: %d\n"
249 " Physical drives: %d\n\n"
250 " Current Q depth: %d\n"
251 " Max Q depth since init: %d\n\n",
252 h->devname,
253 h->product_name,
254 (unsigned long)h->board_id,
255 h->firm_rev[0], h->firm_rev[1], h->firm_rev[2], h->firm_rev[3],
256 (unsigned long)h->ctlr_sig, (unsigned long)h->vaddr,
257 (unsigned int) h->io_mem_addr, (unsigned int)h->intr,
258 h->log_drives, h->phys_drives,
259 h->Qdepth, h->maxQsinceinit);
260
261 pos += size; len += size;
262
263 size = sprintf(buffer+len, "Logical Drive Info:\n");
264 pos += size; len += size;
265
266 for(i=0; i<h->log_drives; i++) {
267 drv = &h->drv[i];
268 size = sprintf(buffer+len, "ida/c%dd%d: blksz=%d nr_blks=%d\n",
269 ctlr, i, drv->blk_size, drv->nr_blks);
270 pos += size; len += size;
271 }
272
273 #ifdef CPQ_PROC_PRINT_QUEUES
274 spin_lock_irqsave(IDA_LOCK(h->ctlr), flags);
275 size = sprintf(buffer+len, "\nCurrent Queues:\n");
276 pos += size; len += size;
277
278 c = h->reqQ;
279 size = sprintf(buffer+len, "reqQ = %p", c); pos += size; len += size;
280 if (c) c=c->next;
281 while(c && c != h->reqQ) {
282 size = sprintf(buffer+len, "->%p", c);
283 pos += size; len += size;
284 c=c->next;
285 }
286
287 c = h->cmpQ;
288 size = sprintf(buffer+len, "\ncmpQ = %p", c); pos += size; len += size;
289 if (c) c=c->next;
290 while(c && c != h->cmpQ) {
291 size = sprintf(buffer+len, "->%p", c);
292 pos += size; len += size;
293 c=c->next;
294 }
295
296 size = sprintf(buffer+len, "\n"); pos += size; len += size;
297 spin_unlock_irqrestore(IDA_LOCK(h->ctlr), flags);
298 #endif
299 size = sprintf(buffer+len, "nr_allocs = %d\nnr_frees = %d\n",
300 h->nr_allocs, h->nr_frees);
301 pos += size; len += size;
302
303 *eof = 1;
304 *start = buffer+offset;
305 len -= offset;
306 if (len>length)
307 len = length;
308 return len;
309 }
310 #endif /* CONFIG_PROC_FS */
311
312 module_param_array(eisa, int, NULL, 0);
313
release_io_mem(ctlr_info_t * c)314 static void release_io_mem(ctlr_info_t *c)
315 {
316 /* if IO mem was not protected do nothing */
317 if( c->io_mem_addr == 0)
318 return;
319 release_region(c->io_mem_addr, c->io_mem_length);
320 c->io_mem_addr = 0;
321 c->io_mem_length = 0;
322 }
323
cpqarray_remove_one(int i)324 static void __devexit cpqarray_remove_one(int i)
325 {
326 int j;
327 char buff[4];
328
329 /* sendcmd will turn off interrupt, and send the flush...
330 * To write all data in the battery backed cache to disks
331 * no data returned, but don't want to send NULL to sendcmd */
332 if( sendcmd(FLUSH_CACHE, i, buff, 4, 0, 0, 0))
333 {
334 printk(KERN_WARNING "Unable to flush cache on controller %d\n",
335 i);
336 }
337 free_irq(hba[i]->intr, hba[i]);
338 iounmap(hba[i]->vaddr);
339 unregister_blkdev(COMPAQ_SMART2_MAJOR+i, hba[i]->devname);
340 del_timer(&hba[i]->timer);
341 remove_proc_entry(hba[i]->devname, proc_array);
342 pci_free_consistent(hba[i]->pci_dev,
343 NR_CMDS * sizeof(cmdlist_t), (hba[i]->cmd_pool),
344 hba[i]->cmd_pool_dhandle);
345 kfree(hba[i]->cmd_pool_bits);
346 for(j = 0; j < NWD; j++) {
347 if (ida_gendisk[i][j]->flags & GENHD_FL_UP)
348 del_gendisk(ida_gendisk[i][j]);
349 put_disk(ida_gendisk[i][j]);
350 }
351 blk_cleanup_queue(hba[i]->queue);
352 release_io_mem(hba[i]);
353 free_hba(i);
354 }
355
cpqarray_remove_one_pci(struct pci_dev * pdev)356 static void __devexit cpqarray_remove_one_pci (struct pci_dev *pdev)
357 {
358 int i;
359 ctlr_info_t *tmp_ptr;
360
361 if (pci_get_drvdata(pdev) == NULL) {
362 printk( KERN_ERR "cpqarray: Unable to remove device \n");
363 return;
364 }
365
366 tmp_ptr = pci_get_drvdata(pdev);
367 i = tmp_ptr->ctlr;
368 if (hba[i] == NULL) {
369 printk(KERN_ERR "cpqarray: controller %d appears to have"
370 "already been removed \n", i);
371 return;
372 }
373 pci_set_drvdata(pdev, NULL);
374
375 cpqarray_remove_one(i);
376 }
377
378 /* removing an instance that was not removed automatically..
379 * must be an eisa card.
380 */
cpqarray_remove_one_eisa(int i)381 static void __devexit cpqarray_remove_one_eisa (int i)
382 {
383 if (hba[i] == NULL) {
384 printk(KERN_ERR "cpqarray: controller %d appears to have"
385 "already been removed \n", i);
386 return;
387 }
388 cpqarray_remove_one(i);
389 }
390
391 /* pdev is NULL for eisa */
cpqarray_register_ctlr(int i,struct pci_dev * pdev)392 static int __init cpqarray_register_ctlr( int i, struct pci_dev *pdev)
393 {
394 struct request_queue *q;
395 int j;
396
397 /*
398 * register block devices
399 * Find disks and fill in structs
400 * Get an interrupt, set the Q depth and get into /proc
401 */
402
403 /* If this successful it should insure that we are the only */
404 /* instance of the driver */
405 if (register_blkdev(COMPAQ_SMART2_MAJOR+i, hba[i]->devname)) {
406 goto Enomem4;
407 }
408 hba[i]->access.set_intr_mask(hba[i], 0);
409 if (request_irq(hba[i]->intr, do_ida_intr,
410 IRQF_DISABLED|IRQF_SHARED, hba[i]->devname, hba[i]))
411 {
412 printk(KERN_ERR "cpqarray: Unable to get irq %d for %s\n",
413 hba[i]->intr, hba[i]->devname);
414 goto Enomem3;
415 }
416
417 for (j=0; j<NWD; j++) {
418 ida_gendisk[i][j] = alloc_disk(1 << NWD_SHIFT);
419 if (!ida_gendisk[i][j])
420 goto Enomem2;
421 }
422
423 hba[i]->cmd_pool = pci_alloc_consistent(
424 hba[i]->pci_dev, NR_CMDS * sizeof(cmdlist_t),
425 &(hba[i]->cmd_pool_dhandle));
426 hba[i]->cmd_pool_bits = kcalloc(
427 DIV_ROUND_UP(NR_CMDS, BITS_PER_LONG), sizeof(unsigned long),
428 GFP_KERNEL);
429
430 if (!hba[i]->cmd_pool_bits || !hba[i]->cmd_pool)
431 goto Enomem1;
432
433 memset(hba[i]->cmd_pool, 0, NR_CMDS * sizeof(cmdlist_t));
434 printk(KERN_INFO "cpqarray: Finding drives on %s",
435 hba[i]->devname);
436
437 spin_lock_init(&hba[i]->lock);
438 q = blk_init_queue(do_ida_request, &hba[i]->lock);
439 if (!q)
440 goto Enomem1;
441
442 hba[i]->queue = q;
443 q->queuedata = hba[i];
444
445 getgeometry(i);
446 start_fwbk(i);
447
448 ida_procinit(i);
449
450 if (pdev)
451 blk_queue_bounce_limit(q, hba[i]->pci_dev->dma_mask);
452
453 /* This is a hardware imposed limit. */
454 blk_queue_max_hw_segments(q, SG_MAX);
455
456 /* This is a driver limit and could be eliminated. */
457 blk_queue_max_phys_segments(q, SG_MAX);
458
459 init_timer(&hba[i]->timer);
460 hba[i]->timer.expires = jiffies + IDA_TIMER;
461 hba[i]->timer.data = (unsigned long)hba[i];
462 hba[i]->timer.function = ida_timer;
463 add_timer(&hba[i]->timer);
464
465 /* Enable IRQ now that spinlock and rate limit timer are set up */
466 hba[i]->access.set_intr_mask(hba[i], FIFO_NOT_EMPTY);
467
468 for(j=0; j<NWD; j++) {
469 struct gendisk *disk = ida_gendisk[i][j];
470 drv_info_t *drv = &hba[i]->drv[j];
471 sprintf(disk->disk_name, "ida/c%dd%d", i, j);
472 disk->major = COMPAQ_SMART2_MAJOR + i;
473 disk->first_minor = j<<NWD_SHIFT;
474 disk->fops = &ida_fops;
475 if (j && !drv->nr_blks)
476 continue;
477 blk_queue_hardsect_size(hba[i]->queue, drv->blk_size);
478 set_capacity(disk, drv->nr_blks);
479 disk->queue = hba[i]->queue;
480 disk->private_data = drv;
481 add_disk(disk);
482 }
483
484 /* done ! */
485 return(i);
486
487 Enomem1:
488 nr_ctlr = i;
489 kfree(hba[i]->cmd_pool_bits);
490 if (hba[i]->cmd_pool)
491 pci_free_consistent(hba[i]->pci_dev, NR_CMDS*sizeof(cmdlist_t),
492 hba[i]->cmd_pool, hba[i]->cmd_pool_dhandle);
493 Enomem2:
494 while (j--) {
495 put_disk(ida_gendisk[i][j]);
496 ida_gendisk[i][j] = NULL;
497 }
498 free_irq(hba[i]->intr, hba[i]);
499 Enomem3:
500 unregister_blkdev(COMPAQ_SMART2_MAJOR+i, hba[i]->devname);
501 Enomem4:
502 if (pdev)
503 pci_set_drvdata(pdev, NULL);
504 release_io_mem(hba[i]);
505 free_hba(i);
506
507 printk( KERN_ERR "cpqarray: out of memory");
508
509 return -1;
510 }
511
cpqarray_init_one(struct pci_dev * pdev,const struct pci_device_id * ent)512 static int __init cpqarray_init_one( struct pci_dev *pdev,
513 const struct pci_device_id *ent)
514 {
515 int i;
516
517 printk(KERN_DEBUG "cpqarray: Device 0x%x has been found at"
518 " bus %d dev %d func %d\n",
519 pdev->device, pdev->bus->number, PCI_SLOT(pdev->devfn),
520 PCI_FUNC(pdev->devfn));
521 i = alloc_cpqarray_hba();
522 if( i < 0 )
523 return (-1);
524 memset(hba[i], 0, sizeof(ctlr_info_t));
525 sprintf(hba[i]->devname, "ida%d", i);
526 hba[i]->ctlr = i;
527 /* Initialize the pdev driver private data */
528 pci_set_drvdata(pdev, hba[i]);
529
530 if (cpqarray_pci_init(hba[i], pdev) != 0) {
531 pci_set_drvdata(pdev, NULL);
532 release_io_mem(hba[i]);
533 free_hba(i);
534 return -1;
535 }
536
537 return (cpqarray_register_ctlr(i, pdev));
538 }
539
540 static struct pci_driver cpqarray_pci_driver = {
541 .name = "cpqarray",
542 .probe = cpqarray_init_one,
543 .remove = __devexit_p(cpqarray_remove_one_pci),
544 .id_table = cpqarray_pci_device_id,
545 };
546
547 /*
548 * This is it. Find all the controllers and register them.
549 * returns the number of block devices registered.
550 */
cpqarray_init(void)551 static int __init cpqarray_init(void)
552 {
553 int num_cntlrs_reg = 0;
554 int i;
555 int rc = 0;
556
557 /* detect controllers */
558 printk(DRIVER_NAME "\n");
559
560 rc = pci_register_driver(&cpqarray_pci_driver);
561 if (rc)
562 return rc;
563 cpqarray_eisa_detect();
564
565 for (i=0; i < MAX_CTLR; i++) {
566 if (hba[i] != NULL)
567 num_cntlrs_reg++;
568 }
569
570 if (num_cntlrs_reg)
571 return 0;
572 else {
573 pci_unregister_driver(&cpqarray_pci_driver);
574 return -ENODEV;
575 }
576 }
577
578 /* Function to find the first free pointer into our hba[] array */
579 /* Returns -1 if no free entries are left. */
alloc_cpqarray_hba(void)580 static int alloc_cpqarray_hba(void)
581 {
582 int i;
583
584 for(i=0; i< MAX_CTLR; i++) {
585 if (hba[i] == NULL) {
586 hba[i] = kmalloc(sizeof(ctlr_info_t), GFP_KERNEL);
587 if(hba[i]==NULL) {
588 printk(KERN_ERR "cpqarray: out of memory.\n");
589 return (-1);
590 }
591 return (i);
592 }
593 }
594 printk(KERN_WARNING "cpqarray: This driver supports a maximum"
595 " of 8 controllers.\n");
596 return(-1);
597 }
598
free_hba(int i)599 static void free_hba(int i)
600 {
601 kfree(hba[i]);
602 hba[i]=NULL;
603 }
604
605 /*
606 * Find the IO address of the controller, its IRQ and so forth. Fill
607 * in some basic stuff into the ctlr_info_t structure.
608 */
cpqarray_pci_init(ctlr_info_t * c,struct pci_dev * pdev)609 static int cpqarray_pci_init(ctlr_info_t *c, struct pci_dev *pdev)
610 {
611 ushort vendor_id, device_id, command;
612 unchar cache_line_size, latency_timer;
613 unchar irq, revision;
614 unsigned long addr[6];
615 __u32 board_id;
616
617 int i;
618
619 c->pci_dev = pdev;
620 if (pci_enable_device(pdev)) {
621 printk(KERN_ERR "cpqarray: Unable to Enable PCI device\n");
622 return -1;
623 }
624 vendor_id = pdev->vendor;
625 device_id = pdev->device;
626 irq = pdev->irq;
627
628 for(i=0; i<6; i++)
629 addr[i] = pci_resource_start(pdev, i);
630
631 if (pci_set_dma_mask(pdev, CPQARRAY_DMA_MASK) != 0)
632 {
633 printk(KERN_ERR "cpqarray: Unable to set DMA mask\n");
634 return -1;
635 }
636
637 pci_read_config_word(pdev, PCI_COMMAND, &command);
638 pci_read_config_byte(pdev, PCI_CLASS_REVISION, &revision);
639 pci_read_config_byte(pdev, PCI_CACHE_LINE_SIZE, &cache_line_size);
640 pci_read_config_byte(pdev, PCI_LATENCY_TIMER, &latency_timer);
641
642 pci_read_config_dword(pdev, 0x2c, &board_id);
643
644 /* check to see if controller has been disabled */
645 if(!(command & 0x02)) {
646 printk(KERN_WARNING
647 "cpqarray: controller appears to be disabled\n");
648 return(-1);
649 }
650
651 DBGINFO(
652 printk("vendor_id = %x\n", vendor_id);
653 printk("device_id = %x\n", device_id);
654 printk("command = %x\n", command);
655 for(i=0; i<6; i++)
656 printk("addr[%d] = %lx\n", i, addr[i]);
657 printk("revision = %x\n", revision);
658 printk("irq = %x\n", irq);
659 printk("cache_line_size = %x\n", cache_line_size);
660 printk("latency_timer = %x\n", latency_timer);
661 printk("board_id = %x\n", board_id);
662 );
663
664 c->intr = irq;
665
666 for(i=0; i<6; i++) {
667 if (pci_resource_flags(pdev, i) & PCI_BASE_ADDRESS_SPACE_IO)
668 { /* IO space */
669 c->io_mem_addr = addr[i];
670 c->io_mem_length = pci_resource_end(pdev, i)
671 - pci_resource_start(pdev, i) + 1;
672 if(!request_region( c->io_mem_addr, c->io_mem_length,
673 "cpqarray"))
674 {
675 printk( KERN_WARNING "cpqarray I/O memory range already in use addr %lx length = %ld\n", c->io_mem_addr, c->io_mem_length);
676 c->io_mem_addr = 0;
677 c->io_mem_length = 0;
678 }
679 break;
680 }
681 }
682
683 c->paddr = 0;
684 for(i=0; i<6; i++)
685 if (!(pci_resource_flags(pdev, i) &
686 PCI_BASE_ADDRESS_SPACE_IO)) {
687 c->paddr = pci_resource_start (pdev, i);
688 break;
689 }
690 if (!c->paddr)
691 return -1;
692 c->vaddr = remap_pci_mem(c->paddr, 128);
693 if (!c->vaddr)
694 return -1;
695 c->board_id = board_id;
696
697 for(i=0; i<NR_PRODUCTS; i++) {
698 if (board_id == products[i].board_id) {
699 c->product_name = products[i].product_name;
700 c->access = *(products[i].access);
701 break;
702 }
703 }
704 if (i == NR_PRODUCTS) {
705 printk(KERN_WARNING "cpqarray: Sorry, I don't know how"
706 " to access the SMART Array controller %08lx\n",
707 (unsigned long)board_id);
708 return -1;
709 }
710
711 return 0;
712 }
713
714 /*
715 * Map (physical) PCI mem into (virtual) kernel space
716 */
remap_pci_mem(ulong base,ulong size)717 static void __iomem *remap_pci_mem(ulong base, ulong size)
718 {
719 ulong page_base = ((ulong) base) & PAGE_MASK;
720 ulong page_offs = ((ulong) base) - page_base;
721 void __iomem *page_remapped = ioremap(page_base, page_offs+size);
722
723 return (page_remapped ? (page_remapped + page_offs) : NULL);
724 }
725
726 #ifndef MODULE
727 /*
728 * Config string is a comma separated set of i/o addresses of EISA cards.
729 */
cpqarray_setup(char * str)730 static int cpqarray_setup(char *str)
731 {
732 int i, ints[9];
733
734 (void)get_options(str, ARRAY_SIZE(ints), ints);
735
736 for(i=0; i<ints[0] && i<8; i++)
737 eisa[i] = ints[i+1];
738 return 1;
739 }
740
741 __setup("smart2=", cpqarray_setup);
742
743 #endif
744
745 /*
746 * Find an EISA controller's signature. Set up an hba if we find it.
747 */
cpqarray_eisa_detect(void)748 static int __init cpqarray_eisa_detect(void)
749 {
750 int i=0, j;
751 __u32 board_id;
752 int intr;
753 int ctlr;
754 int num_ctlr = 0;
755
756 while(i<8 && eisa[i]) {
757 ctlr = alloc_cpqarray_hba();
758 if(ctlr == -1)
759 break;
760 board_id = inl(eisa[i]+0xC80);
761 for(j=0; j < NR_PRODUCTS; j++)
762 if (board_id == products[j].board_id)
763 break;
764
765 if (j == NR_PRODUCTS) {
766 printk(KERN_WARNING "cpqarray: Sorry, I don't know how"
767 " to access the SMART Array controller %08lx\n", (unsigned long)board_id);
768 continue;
769 }
770
771 memset(hba[ctlr], 0, sizeof(ctlr_info_t));
772 hba[ctlr]->io_mem_addr = eisa[i];
773 hba[ctlr]->io_mem_length = 0x7FF;
774 if(!request_region(hba[ctlr]->io_mem_addr,
775 hba[ctlr]->io_mem_length,
776 "cpqarray"))
777 {
778 printk(KERN_WARNING "cpqarray: I/O range already in "
779 "use addr = %lx length = %ld\n",
780 hba[ctlr]->io_mem_addr,
781 hba[ctlr]->io_mem_length);
782 free_hba(ctlr);
783 continue;
784 }
785
786 /*
787 * Read the config register to find our interrupt
788 */
789 intr = inb(eisa[i]+0xCC0) >> 4;
790 if (intr & 1) intr = 11;
791 else if (intr & 2) intr = 10;
792 else if (intr & 4) intr = 14;
793 else if (intr & 8) intr = 15;
794
795 hba[ctlr]->intr = intr;
796 sprintf(hba[ctlr]->devname, "ida%d", nr_ctlr);
797 hba[ctlr]->product_name = products[j].product_name;
798 hba[ctlr]->access = *(products[j].access);
799 hba[ctlr]->ctlr = ctlr;
800 hba[ctlr]->board_id = board_id;
801 hba[ctlr]->pci_dev = NULL; /* not PCI */
802
803 DBGINFO(
804 printk("i = %d, j = %d\n", i, j);
805 printk("irq = %x\n", intr);
806 printk("product name = %s\n", products[j].product_name);
807 printk("board_id = %x\n", board_id);
808 );
809
810 num_ctlr++;
811 i++;
812
813 if (cpqarray_register_ctlr(ctlr, NULL) == -1)
814 printk(KERN_WARNING
815 "cpqarray: Can't register EISA controller %d\n",
816 ctlr);
817
818 }
819
820 return num_ctlr;
821 }
822
823 /*
824 * Open. Make sure the device is really there.
825 */
ida_open(struct block_device * bdev,fmode_t mode)826 static int ida_open(struct block_device *bdev, fmode_t mode)
827 {
828 drv_info_t *drv = get_drv(bdev->bd_disk);
829 ctlr_info_t *host = get_host(bdev->bd_disk);
830
831 DBGINFO(printk("ida_open %s\n", bdev->bd_disk->disk_name));
832 /*
833 * Root is allowed to open raw volume zero even if it's not configured
834 * so array config can still work. I don't think I really like this,
835 * but I'm already using way to many device nodes to claim another one
836 * for "raw controller".
837 */
838 if (!drv->nr_blks) {
839 if (!capable(CAP_SYS_RAWIO))
840 return -ENXIO;
841 if (!capable(CAP_SYS_ADMIN) && drv != host->drv)
842 return -ENXIO;
843 }
844 host->usage_count++;
845 return 0;
846 }
847
848 /*
849 * Close. Sync first.
850 */
ida_release(struct gendisk * disk,fmode_t mode)851 static int ida_release(struct gendisk *disk, fmode_t mode)
852 {
853 ctlr_info_t *host = get_host(disk);
854 host->usage_count--;
855 return 0;
856 }
857
858 /*
859 * Enqueuing and dequeuing functions for cmdlists.
860 */
addQ(cmdlist_t ** Qptr,cmdlist_t * c)861 static inline void addQ(cmdlist_t **Qptr, cmdlist_t *c)
862 {
863 if (*Qptr == NULL) {
864 *Qptr = c;
865 c->next = c->prev = c;
866 } else {
867 c->prev = (*Qptr)->prev;
868 c->next = (*Qptr);
869 (*Qptr)->prev->next = c;
870 (*Qptr)->prev = c;
871 }
872 }
873
removeQ(cmdlist_t ** Qptr,cmdlist_t * c)874 static inline cmdlist_t *removeQ(cmdlist_t **Qptr, cmdlist_t *c)
875 {
876 if (c && c->next != c) {
877 if (*Qptr == c) *Qptr = c->next;
878 c->prev->next = c->next;
879 c->next->prev = c->prev;
880 } else {
881 *Qptr = NULL;
882 }
883 return c;
884 }
885
886 /*
887 * Get a request and submit it to the controller.
888 * This routine needs to grab all the requests it possibly can from the
889 * req Q and submit them. Interrupts are off (and need to be off) when you
890 * are in here (either via the dummy do_ida_request functions or by being
891 * called from the interrupt handler
892 */
do_ida_request(struct request_queue * q)893 static void do_ida_request(struct request_queue *q)
894 {
895 ctlr_info_t *h = q->queuedata;
896 cmdlist_t *c;
897 struct request *creq;
898 struct scatterlist tmp_sg[SG_MAX];
899 int i, dir, seg;
900
901 if (blk_queue_plugged(q))
902 goto startio;
903
904 queue_next:
905 creq = elv_next_request(q);
906 if (!creq)
907 goto startio;
908
909 BUG_ON(creq->nr_phys_segments > SG_MAX);
910
911 if ((c = cmd_alloc(h,1)) == NULL)
912 goto startio;
913
914 blkdev_dequeue_request(creq);
915
916 c->ctlr = h->ctlr;
917 c->hdr.unit = (drv_info_t *)(creq->rq_disk->private_data) - h->drv;
918 c->hdr.size = sizeof(rblk_t) >> 2;
919 c->size += sizeof(rblk_t);
920
921 c->req.hdr.blk = creq->sector;
922 c->rq = creq;
923 DBGPX(
924 printk("sector=%d, nr_sectors=%d\n", creq->sector, creq->nr_sectors);
925 );
926 sg_init_table(tmp_sg, SG_MAX);
927 seg = blk_rq_map_sg(q, creq, tmp_sg);
928
929 /* Now do all the DMA Mappings */
930 if (rq_data_dir(creq) == READ)
931 dir = PCI_DMA_FROMDEVICE;
932 else
933 dir = PCI_DMA_TODEVICE;
934 for( i=0; i < seg; i++)
935 {
936 c->req.sg[i].size = tmp_sg[i].length;
937 c->req.sg[i].addr = (__u32) pci_map_page(h->pci_dev,
938 sg_page(&tmp_sg[i]),
939 tmp_sg[i].offset,
940 tmp_sg[i].length, dir);
941 }
942 DBGPX( printk("Submitting %d sectors in %d segments\n", creq->nr_sectors, seg); );
943 c->req.hdr.sg_cnt = seg;
944 c->req.hdr.blk_cnt = creq->nr_sectors;
945 c->req.hdr.cmd = (rq_data_dir(creq) == READ) ? IDA_READ : IDA_WRITE;
946 c->type = CMD_RWREQ;
947
948 /* Put the request on the tail of the request queue */
949 addQ(&h->reqQ, c);
950 h->Qdepth++;
951 if (h->Qdepth > h->maxQsinceinit)
952 h->maxQsinceinit = h->Qdepth;
953
954 goto queue_next;
955
956 startio:
957 start_io(h);
958 }
959
960 /*
961 * start_io submits everything on a controller's request queue
962 * and moves it to the completion queue.
963 *
964 * Interrupts had better be off if you're in here
965 */
start_io(ctlr_info_t * h)966 static void start_io(ctlr_info_t *h)
967 {
968 cmdlist_t *c;
969
970 while((c = h->reqQ) != NULL) {
971 /* Can't do anything if we're busy */
972 if (h->access.fifo_full(h) == 0)
973 return;
974
975 /* Get the first entry from the request Q */
976 removeQ(&h->reqQ, c);
977 h->Qdepth--;
978
979 /* Tell the controller to do our bidding */
980 h->access.submit_command(h, c);
981
982 /* Get onto the completion Q */
983 addQ(&h->cmpQ, c);
984 }
985 }
986
987 /*
988 * Mark all buffers that cmd was responsible for
989 */
complete_command(cmdlist_t * cmd,int timeout)990 static inline void complete_command(cmdlist_t *cmd, int timeout)
991 {
992 struct request *rq = cmd->rq;
993 int error = 0;
994 int i, ddir;
995
996 if (cmd->req.hdr.rcode & RCODE_NONFATAL &&
997 (hba[cmd->ctlr]->misc_tflags & MISC_NONFATAL_WARN) == 0) {
998 printk(KERN_NOTICE "Non Fatal error on ida/c%dd%d\n",
999 cmd->ctlr, cmd->hdr.unit);
1000 hba[cmd->ctlr]->misc_tflags |= MISC_NONFATAL_WARN;
1001 }
1002 if (cmd->req.hdr.rcode & RCODE_FATAL) {
1003 printk(KERN_WARNING "Fatal error on ida/c%dd%d\n",
1004 cmd->ctlr, cmd->hdr.unit);
1005 error = -EIO;
1006 }
1007 if (cmd->req.hdr.rcode & RCODE_INVREQ) {
1008 printk(KERN_WARNING "Invalid request on ida/c%dd%d = (cmd=%x sect=%d cnt=%d sg=%d ret=%x)\n",
1009 cmd->ctlr, cmd->hdr.unit, cmd->req.hdr.cmd,
1010 cmd->req.hdr.blk, cmd->req.hdr.blk_cnt,
1011 cmd->req.hdr.sg_cnt, cmd->req.hdr.rcode);
1012 error = -EIO;
1013 }
1014 if (timeout)
1015 error = -EIO;
1016 /* unmap the DMA mapping for all the scatter gather elements */
1017 if (cmd->req.hdr.cmd == IDA_READ)
1018 ddir = PCI_DMA_FROMDEVICE;
1019 else
1020 ddir = PCI_DMA_TODEVICE;
1021 for(i=0; i<cmd->req.hdr.sg_cnt; i++)
1022 pci_unmap_page(hba[cmd->ctlr]->pci_dev, cmd->req.sg[i].addr,
1023 cmd->req.sg[i].size, ddir);
1024
1025 DBGPX(printk("Done with %p\n", rq););
1026 if (__blk_end_request(rq, error, blk_rq_bytes(rq)))
1027 BUG();
1028 }
1029
1030 /*
1031 * The controller will interrupt us upon completion of commands.
1032 * Find the command on the completion queue, remove it, tell the OS and
1033 * try to queue up more IO
1034 */
do_ida_intr(int irq,void * dev_id)1035 static irqreturn_t do_ida_intr(int irq, void *dev_id)
1036 {
1037 ctlr_info_t *h = dev_id;
1038 cmdlist_t *c;
1039 unsigned long istat;
1040 unsigned long flags;
1041 __u32 a,a1;
1042
1043 istat = h->access.intr_pending(h);
1044 /* Is this interrupt for us? */
1045 if (istat == 0)
1046 return IRQ_NONE;
1047
1048 /*
1049 * If there are completed commands in the completion queue,
1050 * we had better do something about it.
1051 */
1052 spin_lock_irqsave(IDA_LOCK(h->ctlr), flags);
1053 if (istat & FIFO_NOT_EMPTY) {
1054 while((a = h->access.command_completed(h))) {
1055 a1 = a; a &= ~3;
1056 if ((c = h->cmpQ) == NULL)
1057 {
1058 printk(KERN_WARNING "cpqarray: Completion of %08lx ignored\n", (unsigned long)a1);
1059 continue;
1060 }
1061 while(c->busaddr != a) {
1062 c = c->next;
1063 if (c == h->cmpQ)
1064 break;
1065 }
1066 /*
1067 * If we've found the command, take it off the
1068 * completion Q and free it
1069 */
1070 if (c->busaddr == a) {
1071 removeQ(&h->cmpQ, c);
1072 /* Check for invalid command.
1073 * Controller returns command error,
1074 * But rcode = 0.
1075 */
1076
1077 if((a1 & 0x03) && (c->req.hdr.rcode == 0))
1078 {
1079 c->req.hdr.rcode = RCODE_INVREQ;
1080 }
1081 if (c->type == CMD_RWREQ) {
1082 complete_command(c, 0);
1083 cmd_free(h, c, 1);
1084 } else if (c->type == CMD_IOCTL_PEND) {
1085 c->type = CMD_IOCTL_DONE;
1086 }
1087 continue;
1088 }
1089 }
1090 }
1091
1092 /*
1093 * See if we can queue up some more IO
1094 */
1095 do_ida_request(h->queue);
1096 spin_unlock_irqrestore(IDA_LOCK(h->ctlr), flags);
1097 return IRQ_HANDLED;
1098 }
1099
1100 /*
1101 * This timer was for timing out requests that haven't happened after
1102 * IDA_TIMEOUT. That wasn't such a good idea. This timer is used to
1103 * reset a flags structure so we don't flood the user with
1104 * "Non-Fatal error" messages.
1105 */
ida_timer(unsigned long tdata)1106 static void ida_timer(unsigned long tdata)
1107 {
1108 ctlr_info_t *h = (ctlr_info_t*)tdata;
1109
1110 h->timer.expires = jiffies + IDA_TIMER;
1111 add_timer(&h->timer);
1112 h->misc_tflags = 0;
1113 }
1114
ida_getgeo(struct block_device * bdev,struct hd_geometry * geo)1115 static int ida_getgeo(struct block_device *bdev, struct hd_geometry *geo)
1116 {
1117 drv_info_t *drv = get_drv(bdev->bd_disk);
1118
1119 if (drv->cylinders) {
1120 geo->heads = drv->heads;
1121 geo->sectors = drv->sectors;
1122 geo->cylinders = drv->cylinders;
1123 } else {
1124 geo->heads = 0xff;
1125 geo->sectors = 0x3f;
1126 geo->cylinders = drv->nr_blks / (0xff*0x3f);
1127 }
1128
1129 return 0;
1130 }
1131
1132 /*
1133 * ida_ioctl does some miscellaneous stuff like reporting drive geometry,
1134 * setting readahead and submitting commands from userspace to the controller.
1135 */
ida_ioctl(struct block_device * bdev,fmode_t mode,unsigned int cmd,unsigned long arg)1136 static int ida_ioctl(struct block_device *bdev, fmode_t mode, unsigned int cmd, unsigned long arg)
1137 {
1138 drv_info_t *drv = get_drv(bdev->bd_disk);
1139 ctlr_info_t *host = get_host(bdev->bd_disk);
1140 int error;
1141 ida_ioctl_t __user *io = (ida_ioctl_t __user *)arg;
1142 ida_ioctl_t *my_io;
1143
1144 switch(cmd) {
1145 case IDAGETDRVINFO:
1146 if (copy_to_user(&io->c.drv, drv, sizeof(drv_info_t)))
1147 return -EFAULT;
1148 return 0;
1149 case IDAPASSTHRU:
1150 if (!capable(CAP_SYS_RAWIO))
1151 return -EPERM;
1152 my_io = kmalloc(sizeof(ida_ioctl_t), GFP_KERNEL);
1153 if (!my_io)
1154 return -ENOMEM;
1155 error = -EFAULT;
1156 if (copy_from_user(my_io, io, sizeof(*my_io)))
1157 goto out_passthru;
1158 error = ida_ctlr_ioctl(host, drv - host->drv, my_io);
1159 if (error)
1160 goto out_passthru;
1161 error = -EFAULT;
1162 if (copy_to_user(io, my_io, sizeof(*my_io)))
1163 goto out_passthru;
1164 error = 0;
1165 out_passthru:
1166 kfree(my_io);
1167 return error;
1168 case IDAGETCTLRSIG:
1169 if (!arg) return -EINVAL;
1170 put_user(host->ctlr_sig, (int __user *)arg);
1171 return 0;
1172 case IDAREVALIDATEVOLS:
1173 if (MINOR(bdev->bd_dev) != 0)
1174 return -ENXIO;
1175 return revalidate_allvol(host);
1176 case IDADRIVERVERSION:
1177 if (!arg) return -EINVAL;
1178 put_user(DRIVER_VERSION, (unsigned long __user *)arg);
1179 return 0;
1180 case IDAGETPCIINFO:
1181 {
1182
1183 ida_pci_info_struct pciinfo;
1184
1185 if (!arg) return -EINVAL;
1186 pciinfo.bus = host->pci_dev->bus->number;
1187 pciinfo.dev_fn = host->pci_dev->devfn;
1188 pciinfo.board_id = host->board_id;
1189 if(copy_to_user((void __user *) arg, &pciinfo,
1190 sizeof( ida_pci_info_struct)))
1191 return -EFAULT;
1192 return(0);
1193 }
1194
1195 default:
1196 return -EINVAL;
1197 }
1198
1199 }
1200 /*
1201 * ida_ctlr_ioctl is for passing commands to the controller from userspace.
1202 * The command block (io) has already been copied to kernel space for us,
1203 * however, any elements in the sglist need to be copied to kernel space
1204 * or copied back to userspace.
1205 *
1206 * Only root may perform a controller passthru command, however I'm not doing
1207 * any serious sanity checking on the arguments. Doing an IDA_WRITE_MEDIA and
1208 * putting a 64M buffer in the sglist is probably a *bad* idea.
1209 */
ida_ctlr_ioctl(ctlr_info_t * h,int dsk,ida_ioctl_t * io)1210 static int ida_ctlr_ioctl(ctlr_info_t *h, int dsk, ida_ioctl_t *io)
1211 {
1212 int ctlr = h->ctlr;
1213 cmdlist_t *c;
1214 void *p = NULL;
1215 unsigned long flags;
1216 int error;
1217
1218 if ((c = cmd_alloc(h, 0)) == NULL)
1219 return -ENOMEM;
1220 c->ctlr = ctlr;
1221 c->hdr.unit = (io->unit & UNITVALID) ? (io->unit & ~UNITVALID) : dsk;
1222 c->hdr.size = sizeof(rblk_t) >> 2;
1223 c->size += sizeof(rblk_t);
1224
1225 c->req.hdr.cmd = io->cmd;
1226 c->req.hdr.blk = io->blk;
1227 c->req.hdr.blk_cnt = io->blk_cnt;
1228 c->type = CMD_IOCTL_PEND;
1229
1230 /* Pre submit processing */
1231 switch(io->cmd) {
1232 case PASSTHRU_A:
1233 p = kmalloc(io->sg[0].size, GFP_KERNEL);
1234 if (!p)
1235 {
1236 error = -ENOMEM;
1237 cmd_free(h, c, 0);
1238 return(error);
1239 }
1240 if (copy_from_user(p, io->sg[0].addr, io->sg[0].size)) {
1241 kfree(p);
1242 cmd_free(h, c, 0);
1243 return -EFAULT;
1244 }
1245 c->req.hdr.blk = pci_map_single(h->pci_dev, &(io->c),
1246 sizeof(ida_ioctl_t),
1247 PCI_DMA_BIDIRECTIONAL);
1248 c->req.sg[0].size = io->sg[0].size;
1249 c->req.sg[0].addr = pci_map_single(h->pci_dev, p,
1250 c->req.sg[0].size, PCI_DMA_BIDIRECTIONAL);
1251 c->req.hdr.sg_cnt = 1;
1252 break;
1253 case IDA_READ:
1254 case READ_FLASH_ROM:
1255 case SENSE_CONTROLLER_PERFORMANCE:
1256 p = kmalloc(io->sg[0].size, GFP_KERNEL);
1257 if (!p)
1258 {
1259 error = -ENOMEM;
1260 cmd_free(h, c, 0);
1261 return(error);
1262 }
1263
1264 c->req.sg[0].size = io->sg[0].size;
1265 c->req.sg[0].addr = pci_map_single(h->pci_dev, p,
1266 c->req.sg[0].size, PCI_DMA_BIDIRECTIONAL);
1267 c->req.hdr.sg_cnt = 1;
1268 break;
1269 case IDA_WRITE:
1270 case IDA_WRITE_MEDIA:
1271 case DIAG_PASS_THRU:
1272 case COLLECT_BUFFER:
1273 case WRITE_FLASH_ROM:
1274 p = kmalloc(io->sg[0].size, GFP_KERNEL);
1275 if (!p)
1276 {
1277 error = -ENOMEM;
1278 cmd_free(h, c, 0);
1279 return(error);
1280 }
1281 if (copy_from_user(p, io->sg[0].addr, io->sg[0].size)) {
1282 kfree(p);
1283 cmd_free(h, c, 0);
1284 return -EFAULT;
1285 }
1286 c->req.sg[0].size = io->sg[0].size;
1287 c->req.sg[0].addr = pci_map_single(h->pci_dev, p,
1288 c->req.sg[0].size, PCI_DMA_BIDIRECTIONAL);
1289 c->req.hdr.sg_cnt = 1;
1290 break;
1291 default:
1292 c->req.sg[0].size = sizeof(io->c);
1293 c->req.sg[0].addr = pci_map_single(h->pci_dev,&io->c,
1294 c->req.sg[0].size, PCI_DMA_BIDIRECTIONAL);
1295 c->req.hdr.sg_cnt = 1;
1296 }
1297
1298 /* Put the request on the tail of the request queue */
1299 spin_lock_irqsave(IDA_LOCK(ctlr), flags);
1300 addQ(&h->reqQ, c);
1301 h->Qdepth++;
1302 start_io(h);
1303 spin_unlock_irqrestore(IDA_LOCK(ctlr), flags);
1304
1305 /* Wait for completion */
1306 while(c->type != CMD_IOCTL_DONE)
1307 schedule();
1308
1309 /* Unmap the DMA */
1310 pci_unmap_single(h->pci_dev, c->req.sg[0].addr, c->req.sg[0].size,
1311 PCI_DMA_BIDIRECTIONAL);
1312 /* Post submit processing */
1313 switch(io->cmd) {
1314 case PASSTHRU_A:
1315 pci_unmap_single(h->pci_dev, c->req.hdr.blk,
1316 sizeof(ida_ioctl_t),
1317 PCI_DMA_BIDIRECTIONAL);
1318 case IDA_READ:
1319 case DIAG_PASS_THRU:
1320 case SENSE_CONTROLLER_PERFORMANCE:
1321 case READ_FLASH_ROM:
1322 if (copy_to_user(io->sg[0].addr, p, io->sg[0].size)) {
1323 kfree(p);
1324 return -EFAULT;
1325 }
1326 /* fall through and free p */
1327 case IDA_WRITE:
1328 case IDA_WRITE_MEDIA:
1329 case COLLECT_BUFFER:
1330 case WRITE_FLASH_ROM:
1331 kfree(p);
1332 break;
1333 default:;
1334 /* Nothing to do */
1335 }
1336
1337 io->rcode = c->req.hdr.rcode;
1338 cmd_free(h, c, 0);
1339 return(0);
1340 }
1341
1342 /*
1343 * Commands are pre-allocated in a large block. Here we use a simple bitmap
1344 * scheme to suballocte them to the driver. Operations that are not time
1345 * critical (and can wait for kmalloc and possibly sleep) can pass in NULL
1346 * as the first argument to get a new command.
1347 */
cmd_alloc(ctlr_info_t * h,int get_from_pool)1348 static cmdlist_t * cmd_alloc(ctlr_info_t *h, int get_from_pool)
1349 {
1350 cmdlist_t * c;
1351 int i;
1352 dma_addr_t cmd_dhandle;
1353
1354 if (!get_from_pool) {
1355 c = (cmdlist_t*)pci_alloc_consistent(h->pci_dev,
1356 sizeof(cmdlist_t), &cmd_dhandle);
1357 if(c==NULL)
1358 return NULL;
1359 } else {
1360 do {
1361 i = find_first_zero_bit(h->cmd_pool_bits, NR_CMDS);
1362 if (i == NR_CMDS)
1363 return NULL;
1364 } while(test_and_set_bit(i&(BITS_PER_LONG-1), h->cmd_pool_bits+(i/BITS_PER_LONG)) != 0);
1365 c = h->cmd_pool + i;
1366 cmd_dhandle = h->cmd_pool_dhandle + i*sizeof(cmdlist_t);
1367 h->nr_allocs++;
1368 }
1369
1370 memset(c, 0, sizeof(cmdlist_t));
1371 c->busaddr = cmd_dhandle;
1372 return c;
1373 }
1374
cmd_free(ctlr_info_t * h,cmdlist_t * c,int got_from_pool)1375 static void cmd_free(ctlr_info_t *h, cmdlist_t *c, int got_from_pool)
1376 {
1377 int i;
1378
1379 if (!got_from_pool) {
1380 pci_free_consistent(h->pci_dev, sizeof(cmdlist_t), c,
1381 c->busaddr);
1382 } else {
1383 i = c - h->cmd_pool;
1384 clear_bit(i&(BITS_PER_LONG-1), h->cmd_pool_bits+(i/BITS_PER_LONG));
1385 h->nr_frees++;
1386 }
1387 }
1388
1389 /***********************************************************************
1390 name: sendcmd
1391 Send a command to an IDA using the memory mapped FIFO interface
1392 and wait for it to complete.
1393 This routine should only be called at init time.
1394 ***********************************************************************/
sendcmd(__u8 cmd,int ctlr,void * buff,size_t size,unsigned int blk,unsigned int blkcnt,unsigned int log_unit)1395 static int sendcmd(
1396 __u8 cmd,
1397 int ctlr,
1398 void *buff,
1399 size_t size,
1400 unsigned int blk,
1401 unsigned int blkcnt,
1402 unsigned int log_unit )
1403 {
1404 cmdlist_t *c;
1405 int complete;
1406 unsigned long temp;
1407 unsigned long i;
1408 ctlr_info_t *info_p = hba[ctlr];
1409
1410 c = cmd_alloc(info_p, 1);
1411 if(!c)
1412 return IO_ERROR;
1413 c->ctlr = ctlr;
1414 c->hdr.unit = log_unit;
1415 c->hdr.prio = 0;
1416 c->hdr.size = sizeof(rblk_t) >> 2;
1417 c->size += sizeof(rblk_t);
1418
1419 /* The request information. */
1420 c->req.hdr.next = 0;
1421 c->req.hdr.rcode = 0;
1422 c->req.bp = 0;
1423 c->req.hdr.sg_cnt = 1;
1424 c->req.hdr.reserved = 0;
1425
1426 if (size == 0)
1427 c->req.sg[0].size = 512;
1428 else
1429 c->req.sg[0].size = size;
1430
1431 c->req.hdr.blk = blk;
1432 c->req.hdr.blk_cnt = blkcnt;
1433 c->req.hdr.cmd = (unsigned char) cmd;
1434 c->req.sg[0].addr = (__u32) pci_map_single(info_p->pci_dev,
1435 buff, c->req.sg[0].size, PCI_DMA_BIDIRECTIONAL);
1436 /*
1437 * Disable interrupt
1438 */
1439 info_p->access.set_intr_mask(info_p, 0);
1440 /* Make sure there is room in the command FIFO */
1441 /* Actually it should be completely empty at this time. */
1442 for (i = 200000; i > 0; i--) {
1443 temp = info_p->access.fifo_full(info_p);
1444 if (temp != 0) {
1445 break;
1446 }
1447 udelay(10);
1448 DBG(
1449 printk(KERN_WARNING "cpqarray ida%d: idaSendPciCmd FIFO full,"
1450 " waiting!\n", ctlr);
1451 );
1452 }
1453 /*
1454 * Send the cmd
1455 */
1456 info_p->access.submit_command(info_p, c);
1457 complete = pollcomplete(ctlr);
1458
1459 pci_unmap_single(info_p->pci_dev, (dma_addr_t) c->req.sg[0].addr,
1460 c->req.sg[0].size, PCI_DMA_BIDIRECTIONAL);
1461 if (complete != 1) {
1462 if (complete != c->busaddr) {
1463 printk( KERN_WARNING
1464 "cpqarray ida%d: idaSendPciCmd "
1465 "Invalid command list address returned! (%08lx)\n",
1466 ctlr, (unsigned long)complete);
1467 cmd_free(info_p, c, 1);
1468 return (IO_ERROR);
1469 }
1470 } else {
1471 printk( KERN_WARNING
1472 "cpqarray ida%d: idaSendPciCmd Timeout out, "
1473 "No command list address returned!\n",
1474 ctlr);
1475 cmd_free(info_p, c, 1);
1476 return (IO_ERROR);
1477 }
1478
1479 if (c->req.hdr.rcode & 0x00FE) {
1480 if (!(c->req.hdr.rcode & BIG_PROBLEM)) {
1481 printk( KERN_WARNING
1482 "cpqarray ida%d: idaSendPciCmd, error: "
1483 "Controller failed at init time "
1484 "cmd: 0x%x, return code = 0x%x\n",
1485 ctlr, c->req.hdr.cmd, c->req.hdr.rcode);
1486
1487 cmd_free(info_p, c, 1);
1488 return (IO_ERROR);
1489 }
1490 }
1491 cmd_free(info_p, c, 1);
1492 return (IO_OK);
1493 }
1494
1495 /*
1496 * revalidate_allvol is for online array config utilities. After a
1497 * utility reconfigures the drives in the array, it can use this function
1498 * (through an ioctl) to make the driver zap any previous disk structs for
1499 * that controller and get new ones.
1500 *
1501 * Right now I'm using the getgeometry() function to do this, but this
1502 * function should probably be finer grained and allow you to revalidate one
1503 * particualar logical volume (instead of all of them on a particular
1504 * controller).
1505 */
revalidate_allvol(ctlr_info_t * host)1506 static int revalidate_allvol(ctlr_info_t *host)
1507 {
1508 int ctlr = host->ctlr;
1509 int i;
1510 unsigned long flags;
1511
1512 spin_lock_irqsave(IDA_LOCK(ctlr), flags);
1513 if (host->usage_count > 1) {
1514 spin_unlock_irqrestore(IDA_LOCK(ctlr), flags);
1515 printk(KERN_WARNING "cpqarray: Device busy for volume"
1516 " revalidation (usage=%d)\n", host->usage_count);
1517 return -EBUSY;
1518 }
1519 host->usage_count++;
1520 spin_unlock_irqrestore(IDA_LOCK(ctlr), flags);
1521
1522 /*
1523 * Set the partition and block size structures for all volumes
1524 * on this controller to zero. We will reread all of this data
1525 */
1526 set_capacity(ida_gendisk[ctlr][0], 0);
1527 for (i = 1; i < NWD; i++) {
1528 struct gendisk *disk = ida_gendisk[ctlr][i];
1529 if (disk->flags & GENHD_FL_UP)
1530 del_gendisk(disk);
1531 }
1532 memset(host->drv, 0, sizeof(drv_info_t)*NWD);
1533
1534 /*
1535 * Tell the array controller not to give us any interrupts while
1536 * we check the new geometry. Then turn interrupts back on when
1537 * we're done.
1538 */
1539 host->access.set_intr_mask(host, 0);
1540 getgeometry(ctlr);
1541 host->access.set_intr_mask(host, FIFO_NOT_EMPTY);
1542
1543 for(i=0; i<NWD; i++) {
1544 struct gendisk *disk = ida_gendisk[ctlr][i];
1545 drv_info_t *drv = &host->drv[i];
1546 if (i && !drv->nr_blks)
1547 continue;
1548 blk_queue_hardsect_size(host->queue, drv->blk_size);
1549 set_capacity(disk, drv->nr_blks);
1550 disk->queue = host->queue;
1551 disk->private_data = drv;
1552 if (i)
1553 add_disk(disk);
1554 }
1555
1556 host->usage_count--;
1557 return 0;
1558 }
1559
ida_revalidate(struct gendisk * disk)1560 static int ida_revalidate(struct gendisk *disk)
1561 {
1562 drv_info_t *drv = disk->private_data;
1563 set_capacity(disk, drv->nr_blks);
1564 return 0;
1565 }
1566
1567 /********************************************************************
1568 name: pollcomplete
1569 Wait polling for a command to complete.
1570 The memory mapped FIFO is polled for the completion.
1571 Used only at init time, interrupts disabled.
1572 ********************************************************************/
pollcomplete(int ctlr)1573 static int pollcomplete(int ctlr)
1574 {
1575 int done;
1576 int i;
1577
1578 /* Wait (up to 2 seconds) for a command to complete */
1579
1580 for (i = 200000; i > 0; i--) {
1581 done = hba[ctlr]->access.command_completed(hba[ctlr]);
1582 if (done == 0) {
1583 udelay(10); /* a short fixed delay */
1584 } else
1585 return (done);
1586 }
1587 /* Invalid address to tell caller we ran out of time */
1588 return 1;
1589 }
1590 /*****************************************************************
1591 start_fwbk
1592 Starts controller firmwares background processing.
1593 Currently only the Integrated Raid controller needs this done.
1594 If the PCI mem address registers are written to after this,
1595 data corruption may occur
1596 *****************************************************************/
start_fwbk(int ctlr)1597 static void start_fwbk(int ctlr)
1598 {
1599 id_ctlr_t *id_ctlr_buf;
1600 int ret_code;
1601
1602 if( (hba[ctlr]->board_id != 0x40400E11)
1603 && (hba[ctlr]->board_id != 0x40480E11) )
1604
1605 /* Not a Integrated Raid, so there is nothing for us to do */
1606 return;
1607 printk(KERN_DEBUG "cpqarray: Starting firmware's background"
1608 " processing\n");
1609 /* Command does not return anything, but idasend command needs a
1610 buffer */
1611 id_ctlr_buf = kmalloc(sizeof(id_ctlr_t), GFP_KERNEL);
1612 if(id_ctlr_buf==NULL)
1613 {
1614 printk(KERN_WARNING "cpqarray: Out of memory. "
1615 "Unable to start background processing.\n");
1616 return;
1617 }
1618 ret_code = sendcmd(RESUME_BACKGROUND_ACTIVITY, ctlr,
1619 id_ctlr_buf, 0, 0, 0, 0);
1620 if(ret_code != IO_OK)
1621 printk(KERN_WARNING "cpqarray: Unable to start"
1622 " background processing\n");
1623
1624 kfree(id_ctlr_buf);
1625 }
1626 /*****************************************************************
1627 getgeometry
1628 Get ida logical volume geometry from the controller
1629 This is a large bit of code which once existed in two flavors,
1630 It is used only at init time.
1631 *****************************************************************/
getgeometry(int ctlr)1632 static void getgeometry(int ctlr)
1633 {
1634 id_log_drv_t *id_ldrive;
1635 id_ctlr_t *id_ctlr_buf;
1636 sense_log_drv_stat_t *id_lstatus_buf;
1637 config_t *sense_config_buf;
1638 unsigned int log_unit, log_index;
1639 int ret_code, size;
1640 drv_info_t *drv;
1641 ctlr_info_t *info_p = hba[ctlr];
1642 int i;
1643
1644 info_p->log_drv_map = 0;
1645
1646 id_ldrive = kzalloc(sizeof(id_log_drv_t), GFP_KERNEL);
1647 if (!id_ldrive) {
1648 printk( KERN_ERR "cpqarray: out of memory.\n");
1649 goto err_0;
1650 }
1651
1652 id_ctlr_buf = kzalloc(sizeof(id_ctlr_t), GFP_KERNEL);
1653 if (!id_ctlr_buf) {
1654 printk( KERN_ERR "cpqarray: out of memory.\n");
1655 goto err_1;
1656 }
1657
1658 id_lstatus_buf = kzalloc(sizeof(sense_log_drv_stat_t), GFP_KERNEL);
1659 if (!id_lstatus_buf) {
1660 printk( KERN_ERR "cpqarray: out of memory.\n");
1661 goto err_2;
1662 }
1663
1664 sense_config_buf = kzalloc(sizeof(config_t), GFP_KERNEL);
1665 if (!sense_config_buf) {
1666 printk( KERN_ERR "cpqarray: out of memory.\n");
1667 goto err_3;
1668 }
1669
1670 info_p->phys_drives = 0;
1671 info_p->log_drv_map = 0;
1672 info_p->drv_assign_map = 0;
1673 info_p->drv_spare_map = 0;
1674 info_p->mp_failed_drv_map = 0; /* only initialized here */
1675 /* Get controllers info for this logical drive */
1676 ret_code = sendcmd(ID_CTLR, ctlr, id_ctlr_buf, 0, 0, 0, 0);
1677 if (ret_code == IO_ERROR) {
1678 /*
1679 * If can't get controller info, set the logical drive map to 0,
1680 * so the idastubopen will fail on all logical drives
1681 * on the controller.
1682 */
1683 printk(KERN_ERR "cpqarray: error sending ID controller\n");
1684 goto err_4;
1685 }
1686
1687 info_p->log_drives = id_ctlr_buf->nr_drvs;
1688 for(i=0;i<4;i++)
1689 info_p->firm_rev[i] = id_ctlr_buf->firm_rev[i];
1690 info_p->ctlr_sig = id_ctlr_buf->cfg_sig;
1691
1692 printk(" (%s)\n", info_p->product_name);
1693 /*
1694 * Initialize logical drive map to zero
1695 */
1696 log_index = 0;
1697 /*
1698 * Get drive geometry for all logical drives
1699 */
1700 if (id_ctlr_buf->nr_drvs > 16)
1701 printk(KERN_WARNING "cpqarray ida%d: This driver supports "
1702 "16 logical drives per controller.\n. "
1703 " Additional drives will not be "
1704 "detected\n", ctlr);
1705
1706 for (log_unit = 0;
1707 (log_index < id_ctlr_buf->nr_drvs)
1708 && (log_unit < NWD);
1709 log_unit++) {
1710 size = sizeof(sense_log_drv_stat_t);
1711
1712 /*
1713 Send "Identify logical drive status" cmd
1714 */
1715 ret_code = sendcmd(SENSE_LOG_DRV_STAT,
1716 ctlr, id_lstatus_buf, size, 0, 0, log_unit);
1717 if (ret_code == IO_ERROR) {
1718 /*
1719 If can't get logical drive status, set
1720 the logical drive map to 0, so the
1721 idastubopen will fail for all logical drives
1722 on the controller.
1723 */
1724 info_p->log_drv_map = 0;
1725 printk( KERN_WARNING
1726 "cpqarray ida%d: idaGetGeometry - Controller"
1727 " failed to report status of logical drive %d\n"
1728 "Access to this controller has been disabled\n",
1729 ctlr, log_unit);
1730 goto err_4;
1731 }
1732 /*
1733 Make sure the logical drive is configured
1734 */
1735 if (id_lstatus_buf->status != LOG_NOT_CONF) {
1736 ret_code = sendcmd(ID_LOG_DRV, ctlr, id_ldrive,
1737 sizeof(id_log_drv_t), 0, 0, log_unit);
1738 /*
1739 If error, the bit for this
1740 logical drive won't be set and
1741 idastubopen will return error.
1742 */
1743 if (ret_code != IO_ERROR) {
1744 drv = &info_p->drv[log_unit];
1745 drv->blk_size = id_ldrive->blk_size;
1746 drv->nr_blks = id_ldrive->nr_blks;
1747 drv->cylinders = id_ldrive->drv.cyl;
1748 drv->heads = id_ldrive->drv.heads;
1749 drv->sectors = id_ldrive->drv.sect_per_track;
1750 info_p->log_drv_map |= (1 << log_unit);
1751
1752 printk(KERN_INFO "cpqarray ida/c%dd%d: blksz=%d nr_blks=%d\n",
1753 ctlr, log_unit, drv->blk_size, drv->nr_blks);
1754 ret_code = sendcmd(SENSE_CONFIG,
1755 ctlr, sense_config_buf,
1756 sizeof(config_t), 0, 0, log_unit);
1757 if (ret_code == IO_ERROR) {
1758 info_p->log_drv_map = 0;
1759 printk(KERN_ERR "cpqarray: error sending sense config\n");
1760 goto err_4;
1761 }
1762
1763 info_p->phys_drives =
1764 sense_config_buf->ctlr_phys_drv;
1765 info_p->drv_assign_map
1766 |= sense_config_buf->drv_asgn_map;
1767 info_p->drv_assign_map
1768 |= sense_config_buf->spare_asgn_map;
1769 info_p->drv_spare_map
1770 |= sense_config_buf->spare_asgn_map;
1771 } /* end of if no error on id_ldrive */
1772 log_index = log_index + 1;
1773 } /* end of if logical drive configured */
1774 } /* end of for log_unit */
1775
1776 /* Free all the buffers and return */
1777 err_4:
1778 kfree(sense_config_buf);
1779 err_3:
1780 kfree(id_lstatus_buf);
1781 err_2:
1782 kfree(id_ctlr_buf);
1783 err_1:
1784 kfree(id_ldrive);
1785 err_0:
1786 return;
1787 }
1788
cpqarray_exit(void)1789 static void __exit cpqarray_exit(void)
1790 {
1791 int i;
1792
1793 pci_unregister_driver(&cpqarray_pci_driver);
1794
1795 /* Double check that all controller entries have been removed */
1796 for(i=0; i<MAX_CTLR; i++) {
1797 if (hba[i] != NULL) {
1798 printk(KERN_WARNING "cpqarray: Removing EISA "
1799 "controller %d\n", i);
1800 cpqarray_remove_one_eisa(i);
1801 }
1802 }
1803
1804 remove_proc_entry("driver/cpqarray", NULL);
1805 }
1806
1807 module_init(cpqarray_init)
1808 module_exit(cpqarray_exit)
1809