Merge branch 'for-linus' of master.kernel.org:/pub/scm/linux/kernel/git/roland/infiniband
[pandora-kernel.git] / drivers / sn / ioc3.c
1 /*
2  * SGI IOC3 master driver and IRQ demuxer
3  *
4  * Copyright (c) 2005 Stanislaw Skowronek <skylark@linux-mips.org>
5  * Heavily based on similar work by:
6  *   Brent Casavant <bcasavan@sgi.com> - IOC4 master driver
7  *   Pat Gefre <pfg@sgi.com> - IOC3 serial port IRQ demuxer
8  */
9
10 #include <linux/config.h>
11 #include <linux/errno.h>
12 #include <linux/module.h>
13 #include <linux/pci.h>
14 #include <linux/dma-mapping.h>
15 #include <linux/interrupt.h>
16 #include <linux/spinlock.h>
17 #include <linux/delay.h>
18 #include <linux/ioc3.h>
19 #include <linux/rwsem.h>
20
21 #define IOC3_PCI_SIZE 0x100000
22
23 static LIST_HEAD(ioc3_devices);
24 static int ioc3_counter;
25 static DECLARE_RWSEM(ioc3_devices_rwsem);
26
27 static struct ioc3_submodule *ioc3_submodules[IOC3_MAX_SUBMODULES];
28 static struct ioc3_submodule *ioc3_ethernet;
29 static rwlock_t ioc3_submodules_lock = RW_LOCK_UNLOCKED;
30
31 /* NIC probing code */
32
33 #define GPCR_MLAN_EN    0x00200000      /* enable MCR to pin 8 */
34
35 static inline unsigned mcr_pack(unsigned pulse, unsigned sample)
36 {
37         return (pulse << 10) | (sample << 2);
38 }
39
40 static int nic_wait(struct ioc3_driver_data *idd)
41 {
42         unsigned mcr;
43
44         do {
45                 mcr = readl(&idd->vma->mcr);
46         } while (!(mcr & 2));
47
48         return mcr & 1;
49 }
50
51 static int nic_reset(struct ioc3_driver_data *idd)
52 {
53         int presence;
54         unsigned long flags;
55
56         local_irq_save(flags);
57         writel(mcr_pack(500, 65), &idd->vma->mcr);
58         presence = nic_wait(idd);
59         local_irq_restore(flags);
60
61         udelay(500);
62
63         return presence;
64 }
65
66 static int nic_read_bit(struct ioc3_driver_data *idd)
67 {
68         int result;
69         unsigned long flags;
70
71         local_irq_save(flags);
72         writel(mcr_pack(6, 13), &idd->vma->mcr);
73         result = nic_wait(idd);
74         local_irq_restore(flags);
75
76         udelay(500);
77
78         return result;
79 }
80
81 static void nic_write_bit(struct ioc3_driver_data *idd, int bit)
82 {
83         if (bit)
84                 writel(mcr_pack(6, 110), &idd->vma->mcr);
85         else
86                 writel(mcr_pack(80, 30), &idd->vma->mcr);
87
88         nic_wait(idd);
89 }
90
91 static unsigned nic_read_byte(struct ioc3_driver_data *idd)
92 {
93         unsigned result = 0;
94         int i;
95
96         for (i = 0; i < 8; i++)
97                 result = (result >> 1) | (nic_read_bit(idd) << 7);
98
99         return result;
100 }
101
102 static void nic_write_byte(struct ioc3_driver_data *idd, int byte)
103 {
104         int i, bit;
105
106         for (i = 8; i; i--) {
107                 bit = byte & 1;
108                 byte >>= 1;
109
110                 nic_write_bit(idd, bit);
111         }
112 }
113
114 static unsigned long
115 nic_find(struct ioc3_driver_data *idd, int *last, unsigned long addr)
116 {
117         int a, b, index, disc;
118
119         nic_reset(idd);
120
121         /* Search ROM.  */
122         nic_write_byte(idd, 0xF0);
123
124         /* Algorithm from ``Book of iButton Standards''.  */
125         for (index = 0, disc = 0; index < 64; index++) {
126                 a = nic_read_bit(idd);
127                 b = nic_read_bit(idd);
128
129                 if (a && b) {
130                         printk(KERN_WARNING "IOC3 NIC search failed.\n");
131                         *last = 0;
132                         return 0;
133                 }
134
135                 if (!a && !b) {
136                         if (index == *last) {
137                                 addr |= 1UL << index;
138                         } else if (index > *last) {
139                                 addr &= ~(1UL << index);
140                                 disc = index;
141                         } else if ((addr & (1UL << index)) == 0)
142                                 disc = index;
143                         nic_write_bit(idd, (addr>>index)&1);
144                         continue;
145                 } else {
146                         if (a)
147                                 addr |= 1UL << index;
148                         else
149                                 addr &= ~(1UL << index);
150                         nic_write_bit(idd, a);
151                         continue;
152                 }
153         }
154         *last = disc;
155         return addr;
156 }
157
158 static void nic_addr(struct ioc3_driver_data *idd, unsigned long addr)
159 {
160         int index;
161
162         nic_reset(idd);
163         nic_write_byte(idd, 0xF0);
164         for (index = 0; index < 64; index++) {
165                 nic_read_bit(idd);
166                 nic_read_bit(idd);
167                 nic_write_bit(idd, (addr>>index)&1);
168         }
169 }
170
171 static void crc16_byte(unsigned int *crc, unsigned char db)
172 {
173         int i;
174
175         for(i=0;i<8;i++) {
176                 *crc <<= 1;
177                 if((db^(*crc>>16)) & 1)
178                         *crc ^= 0x8005;
179                 db >>= 1;
180         }
181         *crc &= 0xFFFF;
182 }
183
184 static unsigned int crc16_area(unsigned char *dbs, int size, unsigned int crc)
185 {
186         while(size--)
187                 crc16_byte(&crc, *(dbs++));
188         return crc;
189 }
190
191 static void crc8_byte(unsigned int *crc, unsigned char db)
192 {
193         int i,f;
194
195         for(i=0;i<8;i++) {
196                 f = (*crc ^ db) & 1;
197                 *crc >>= 1;
198                 db >>= 1;
199                 if(f)
200                         *crc ^= 0x8c;
201         }
202         *crc &= 0xff;
203 }
204
205 static unsigned int crc8_addr(unsigned long addr)
206 {
207         int i;
208         unsigned int crc = 0x00;
209
210         for(i=0;i<8;i++)
211                 crc8_byte(&crc, addr>>(i<<3));
212         return crc;
213 }
214
215 static void
216 read_redir_page(struct ioc3_driver_data *idd, unsigned long addr, int page,
217                         unsigned char *redir, unsigned char *data)
218 {
219         int loops = 16, i;
220
221         while(redir[page] != 0xFF) {
222                 page = redir[page]^0xFF;
223                 loops--;
224                 if(loops<0) {
225                         printk(KERN_ERR "IOC3: NIC circular redirection\n");
226                         return;
227                 }
228         }
229         loops = 3;
230         while(loops>0) {
231                 nic_addr(idd, addr);
232                 nic_write_byte(idd, 0xF0);
233                 nic_write_byte(idd, (page << 5) & 0xE0);
234                 nic_write_byte(idd, (page >> 3) & 0x1F);
235                 for(i=0;i<0x20;i++)
236                         data[i] = nic_read_byte(idd);
237                 if(crc16_area(data, 0x20, 0x0000) == 0x800d)
238                         return;
239                 loops--;
240         }
241         printk(KERN_ERR "IOC3: CRC error in data page\n");
242         for(i=0;i<0x20;i++)
243                 data[i] = 0x00;
244 }
245
246 static void
247 read_redir_map(struct ioc3_driver_data *idd, unsigned long addr,
248                                          unsigned char *redir)
249 {
250         int i,j,loops = 3,crc_ok;
251         unsigned int crc;
252
253         while(loops>0) {
254                 crc_ok = 1;
255                 nic_addr(idd, addr);
256                 nic_write_byte(idd, 0xAA);
257                 nic_write_byte(idd, 0x00);
258                 nic_write_byte(idd, 0x01);
259                 for(i=0;i<64;i+=8) {
260                         for(j=0;j<8;j++)
261                                 redir[i+j] = nic_read_byte(idd);
262                         crc = crc16_area(redir+i, 8, (i==0)?0x8707:0x0000);
263                         crc16_byte(&crc, nic_read_byte(idd));
264                         crc16_byte(&crc, nic_read_byte(idd));
265                         if(crc != 0x800d)
266                                 crc_ok = 0;
267                 }
268                 if(crc_ok)
269                         return;
270                 loops--;
271         }
272         printk(KERN_ERR "IOC3: CRC error in redirection page\n");
273         for(i=0;i<64;i++)
274                 redir[i] = 0xFF;
275 }
276
277 static void read_nic(struct ioc3_driver_data *idd, unsigned long addr)
278 {
279         unsigned char redir[64];
280         unsigned char data[64],part[32];
281         int i,j;
282
283         /* read redirections */
284         read_redir_map(idd, addr, redir);
285         /* read data pages */
286         read_redir_page(idd, addr, 0, redir, data);
287         read_redir_page(idd, addr, 1, redir, data+32);
288         /* assemble the part # */
289         j=0;
290         for(i=0;i<19;i++)
291                 if(data[i+11] != ' ')
292                         part[j++] = data[i+11];
293         for(i=0;i<6;i++)
294                 if(data[i+32] != ' ')
295                         part[j++] = data[i+32];
296         part[j] = 0;
297         /* skip Octane power supplies */
298         if(!strncmp(part, "060-0035-", 9))
299                 return;
300         if(!strncmp(part, "060-0038-", 9))
301                 return;
302         strcpy(idd->nic_part, part);
303         /* assemble the serial # */
304         j=0;
305         for(i=0;i<10;i++)
306                 if(data[i+1] != ' ')
307                         idd->nic_serial[j++] = data[i+1];
308         idd->nic_serial[j] = 0;
309 }
310
311 static void read_mac(struct ioc3_driver_data *idd, unsigned long addr)
312 {
313         int i, loops = 3;
314         unsigned char data[13];
315
316         while(loops>0) {
317                 nic_addr(idd, addr);
318                 nic_write_byte(idd, 0xF0);
319                 nic_write_byte(idd, 0x00);
320                 nic_write_byte(idd, 0x00);
321                 nic_read_byte(idd);
322                 for(i=0;i<13;i++)
323                         data[i] = nic_read_byte(idd);
324                 if(crc16_area(data, 13, 0x0000) == 0x800d) {
325                         for(i=10;i>4;i--)
326                                 idd->nic_mac[10-i] = data[i];
327                         return;
328                 }
329                 loops--;
330         }
331         printk(KERN_ERR "IOC3: CRC error in MAC address\n");
332         for(i=0;i<6;i++)
333                 idd->nic_mac[i] = 0x00;
334 }
335
336 static void probe_nic(struct ioc3_driver_data *idd)
337 {
338         int save = 0, loops = 3;
339         unsigned long first, addr;
340
341         writel(GPCR_MLAN_EN, &idd->vma->gpcr_s);
342
343         while(loops>0) {
344                 idd->nic_part[0] = 0;
345                 idd->nic_serial[0] = 0;
346                 addr = first = nic_find(idd, &save, 0);
347                 if(!first)
348                         return;
349                 while(1) {
350                         if(crc8_addr(addr))
351                                 break;
352                         else {
353                                 switch(addr & 0xFF) {
354                                 case 0x0B:
355                                         read_nic(idd, addr);
356                                         break;
357                                 case 0x09:
358                                 case 0x89:
359                                 case 0x91:
360                                         read_mac(idd, addr);
361                                         break;
362                                 }
363                         }
364                         addr = nic_find(idd, &save, addr);
365                         if(addr == first)
366                                 return;
367                 }
368                 loops--;
369         }
370         printk(KERN_ERR "IOC3: CRC error in NIC address\n");
371 }
372
373 /* Interrupts */
374
375 static void write_ireg(struct ioc3_driver_data *idd, uint32_t val, int which)
376 {
377         unsigned long flags;
378
379         spin_lock_irqsave(&idd->ir_lock, flags);
380         switch (which) {
381         case IOC3_W_IES:
382                 writel(val, &idd->vma->sio_ies);
383                 break;
384         case IOC3_W_IEC:
385                 writel(val, &idd->vma->sio_iec);
386                 break;
387         }
388         spin_unlock_irqrestore(&idd->ir_lock, flags);
389 }
390 static inline uint32_t get_pending_intrs(struct ioc3_driver_data *idd)
391 {
392         unsigned long flag;
393         uint32_t intrs = 0;
394
395         spin_lock_irqsave(&idd->ir_lock, flag);
396         intrs = readl(&idd->vma->sio_ir);
397         intrs &= readl(&idd->vma->sio_ies);
398         spin_unlock_irqrestore(&idd->ir_lock, flag);
399         return intrs;
400 }
401
402 static irqreturn_t ioc3_intr_io(int irq, void *arg, struct pt_regs *regs)
403 {
404         unsigned long flags;
405         struct ioc3_driver_data *idd = (struct ioc3_driver_data *)arg;
406         int handled = 1, id;
407         unsigned int pending;
408
409         read_lock_irqsave(&ioc3_submodules_lock, flags);
410
411         if(idd->dual_irq && readb(&idd->vma->eisr)) {
412                 /* send Ethernet IRQ to the driver */
413                 if(ioc3_ethernet && idd->active[ioc3_ethernet->id] &&
414                                                 ioc3_ethernet->intr) {
415                         handled = handled && !ioc3_ethernet->intr(ioc3_ethernet,
416                                                         idd, 0, regs);
417                 }
418         }
419         pending = get_pending_intrs(idd);       /* look at the IO IRQs */
420
421         for(id=0;id<IOC3_MAX_SUBMODULES;id++) {
422                 if(idd->active[id] && ioc3_submodules[id]
423                                 && (pending & ioc3_submodules[id]->irq_mask)
424                                 && ioc3_submodules[id]->intr) {
425                         write_ireg(idd, ioc3_submodules[id]->irq_mask,
426                                                         IOC3_W_IEC);
427                         if(!ioc3_submodules[id]->intr(ioc3_submodules[id],
428                                    idd, pending & ioc3_submodules[id]->irq_mask,
429                                         regs))
430                                 pending &= ~ioc3_submodules[id]->irq_mask;
431                         if (ioc3_submodules[id]->reset_mask)
432                                 write_ireg(idd, ioc3_submodules[id]->irq_mask,
433                                                         IOC3_W_IES);
434                 }
435         }
436         read_unlock_irqrestore(&ioc3_submodules_lock, flags);
437         if(pending) {
438                 printk(KERN_WARNING
439                   "IOC3: Pending IRQs 0x%08x discarded and disabled\n",pending);
440                 write_ireg(idd, pending, IOC3_W_IEC);
441                 handled = 1;
442         }
443         return handled?IRQ_HANDLED:IRQ_NONE;
444 }
445
446 static irqreturn_t ioc3_intr_eth(int irq, void *arg, struct pt_regs *regs)
447 {
448         unsigned long flags;
449         struct ioc3_driver_data *idd = (struct ioc3_driver_data *)arg;
450         int handled = 1;
451
452         if(!idd->dual_irq)
453                 return IRQ_NONE;
454         read_lock_irqsave(&ioc3_submodules_lock, flags);
455         if(ioc3_ethernet && idd->active[ioc3_ethernet->id]
456                                 && ioc3_ethernet->intr)
457                 handled = handled && !ioc3_ethernet->intr(ioc3_ethernet, idd, 0,
458                                                                 regs);
459         read_unlock_irqrestore(&ioc3_submodules_lock, flags);
460         return handled?IRQ_HANDLED:IRQ_NONE;
461 }
462
463 void ioc3_enable(struct ioc3_submodule *is,
464                                 struct ioc3_driver_data *idd, unsigned int irqs)
465 {
466         write_ireg(idd, irqs & is->irq_mask, IOC3_W_IES);
467 }
468
469 void ioc3_ack(struct ioc3_submodule *is, struct ioc3_driver_data *idd,
470                                 unsigned int irqs)
471 {
472         writel(irqs & is->irq_mask, &idd->vma->sio_ir);
473 }
474
475 void ioc3_disable(struct ioc3_submodule *is,
476                                 struct ioc3_driver_data *idd, unsigned int irqs)
477 {
478         write_ireg(idd, irqs & is->irq_mask, IOC3_W_IEC);
479 }
480
481 void ioc3_gpcr_set(struct ioc3_driver_data *idd, unsigned int val)
482 {
483         unsigned long flags;
484         spin_lock_irqsave(&idd->gpio_lock, flags);
485         writel(val, &idd->vma->gpcr_s);
486         spin_unlock_irqrestore(&idd->gpio_lock, flags);
487 }
488
489 /* Keep it simple, stupid! */
490 static int find_slot(void **tab, int max)
491 {
492         int i;
493         for(i=0;i<max;i++)
494                 if(!(tab[i]))
495                         return i;
496         return -1;
497 }
498
499 /* Register an IOC3 submodule */
500 int ioc3_register_submodule(struct ioc3_submodule *is)
501 {
502         struct ioc3_driver_data *idd;
503         int alloc_id;
504         unsigned long flags;
505
506         write_lock_irqsave(&ioc3_submodules_lock, flags);
507         alloc_id = find_slot((void **)ioc3_submodules, IOC3_MAX_SUBMODULES);
508         if(alloc_id != -1) {
509                 ioc3_submodules[alloc_id] = is;
510                 if(is->ethernet) {
511                         if(ioc3_ethernet==NULL)
512                                 ioc3_ethernet=is;
513                         else
514                                 printk(KERN_WARNING
515                                   "IOC3 Ethernet module already registered!\n");
516                 }
517         }
518         write_unlock_irqrestore(&ioc3_submodules_lock, flags);
519
520         if(alloc_id == -1) {
521                 printk(KERN_WARNING "Increase IOC3_MAX_SUBMODULES!\n");
522                 return -ENOMEM;
523         }
524
525         is->id=alloc_id;
526
527         /* Initialize submodule for each IOC3 */
528         if (!is->probe)
529                 return 0;
530
531         down_read(&ioc3_devices_rwsem);
532         list_for_each_entry(idd, &ioc3_devices, list) {
533                 /* set to 1 for IRQs in probe */
534                 idd->active[alloc_id] = 1;
535                 idd->active[alloc_id] = !is->probe(is, idd);
536         }
537         up_read(&ioc3_devices_rwsem);
538
539         return 0;
540 }
541
542 /* Unregister an IOC3 submodule */
543 void ioc3_unregister_submodule(struct ioc3_submodule *is)
544 {
545         struct ioc3_driver_data *idd;
546         unsigned long flags;
547
548         write_lock_irqsave(&ioc3_submodules_lock, flags);
549         if(ioc3_submodules[is->id]==is)
550                 ioc3_submodules[is->id]=NULL;
551         else
552                 printk(KERN_WARNING
553                         "IOC3 submodule %s has wrong ID.\n",is->name);
554         if(ioc3_ethernet==is)
555                 ioc3_ethernet = NULL;
556         write_unlock_irqrestore(&ioc3_submodules_lock, flags);
557
558         /* Remove submodule for each IOC3 */
559         down_read(&ioc3_devices_rwsem);
560         list_for_each_entry(idd, &ioc3_devices, list)
561                 if(idd->active[is->id]) {
562                         if(is->remove)
563                                 if(is->remove(is, idd))
564                                         printk(KERN_WARNING
565                                                "%s: IOC3 submodule %s remove failed "
566                                                "for pci_dev %s.\n",
567                                                __FUNCTION__, module_name(is->owner),
568                                                pci_name(idd->pdev));
569                         idd->active[is->id] = 0;
570                         if(is->irq_mask)
571                                 write_ireg(idd, is->irq_mask, IOC3_W_IEC);
572                 }
573         up_read(&ioc3_devices_rwsem);
574 }
575
576 /*********************
577  * Device management *
578  *********************/
579
580 static char *
581 ioc3_class_names[]={"unknown", "IP27 BaseIO", "IP30 system", "MENET 1/2/3",
582                         "MENET 4", "CADduo", "Altix Serial"};
583
584 static int ioc3_class(struct ioc3_driver_data *idd)
585 {
586         int res = IOC3_CLASS_NONE;
587         /* NIC-based logic */
588         if(!strncmp(idd->nic_part, "030-0891-", 9))
589                 res = IOC3_CLASS_BASE_IP30;
590         if(!strncmp(idd->nic_part, "030-1155-", 9))
591                 res = IOC3_CLASS_CADDUO;
592         if(!strncmp(idd->nic_part, "030-1657-", 9))
593                 res = IOC3_CLASS_SERIAL;
594         if(!strncmp(idd->nic_part, "030-1664-", 9))
595                 res = IOC3_CLASS_SERIAL;
596         /* total random heuristics */
597 #ifdef CONFIG_SGI_IP27
598         if(!idd->nic_part[0])
599                 res = IOC3_CLASS_BASE_IP27;
600 #endif
601         /* print educational message */
602         printk(KERN_INFO "IOC3 part: [%s], serial: [%s] => class %s\n",
603                         idd->nic_part, idd->nic_serial, ioc3_class_names[res]);
604         return res;
605 }
606 /* Adds a new instance of an IOC3 card */
607 static int ioc3_probe(struct pci_dev *pdev, const struct pci_device_id *pci_id)
608 {
609         struct ioc3_driver_data *idd;
610         uint32_t pcmd;
611         int ret, id;
612
613         /* Enable IOC3 and take ownership of it */
614         if ((ret = pci_enable_device(pdev))) {
615                 printk(KERN_WARNING
616                        "%s: Failed to enable IOC3 device for pci_dev %s.\n",
617                        __FUNCTION__, pci_name(pdev));
618                 goto out;
619         }
620         pci_set_master(pdev);
621
622 #ifdef USE_64BIT_DMA
623         ret = pci_set_dma_mask(pdev, DMA_64BIT_MASK);
624         if (!ret) {
625                 ret = pci_set_consistent_dma_mask(pdev, DMA_64BIT_MASK);
626                 if (ret < 0) {
627                         printk(KERN_WARNING "%s: Unable to obtain 64 bit DMA "
628                                "for consistent allocations\n",
629                                 __FUNCTION__);
630                 }
631         }
632 #endif
633
634         /* Set up per-IOC3 data */
635         idd = kmalloc(sizeof(struct ioc3_driver_data), GFP_KERNEL);
636         if (!idd) {
637                 printk(KERN_WARNING
638                        "%s: Failed to allocate IOC3 data for pci_dev %s.\n",
639                        __FUNCTION__, pci_name(pdev));
640                 ret = -ENODEV;
641                 goto out_idd;
642         }
643         memset(idd, 0, sizeof(struct ioc3_driver_data));
644         spin_lock_init(&idd->ir_lock);
645         spin_lock_init(&idd->gpio_lock);
646         idd->pdev = pdev;
647
648         /* Map all IOC3 registers.  These are shared between subdevices
649          * so the main IOC3 module manages them.
650          */
651         idd->pma = pci_resource_start(pdev, 0);
652         if (!idd->pma) {
653                 printk(KERN_WARNING
654                        "%s: Unable to find IOC3 resource "
655                        "for pci_dev %s.\n",
656                        __FUNCTION__, pci_name(pdev));
657                 ret = -ENODEV;
658                 goto out_pci;
659         }
660         if (!request_region(idd->pma, IOC3_PCI_SIZE, "ioc3")) {
661                 printk(KERN_WARNING
662                        "%s: Unable to request IOC3 region "
663                        "for pci_dev %s.\n",
664                        __FUNCTION__, pci_name(pdev));
665                 ret = -ENODEV;
666                 goto out_pci;
667         }
668         idd->vma = ioremap(idd->pma, IOC3_PCI_SIZE);
669         if (!idd->vma) {
670                 printk(KERN_WARNING
671                        "%s: Unable to remap IOC3 region "
672                        "for pci_dev %s.\n",
673                        __FUNCTION__, pci_name(pdev));
674                 ret = -ENODEV;
675                 goto out_misc_region;
676         }
677
678         /* Track PCI-device specific data */
679         pci_set_drvdata(pdev, idd);
680         down_write(&ioc3_devices_rwsem);
681         list_add(&idd->list, &ioc3_devices);
682         idd->id = ioc3_counter++;
683         up_write(&ioc3_devices_rwsem);
684
685         idd->gpdr_shadow = readl(&idd->vma->gpdr);
686
687         /* Read IOC3 NIC contents */
688         probe_nic(idd);
689
690         /* Detect IOC3 class */
691         idd->class = ioc3_class(idd);
692
693         /* Initialize IOC3 */
694        pci_read_config_dword(pdev, PCI_COMMAND, &pcmd);
695        pci_write_config_dword(pdev, PCI_COMMAND,
696                                pcmd | PCI_COMMAND_MEMORY |
697                                PCI_COMMAND_PARITY | PCI_COMMAND_SERR |
698                                PCI_SCR_DROP_MODE_EN);
699
700         write_ireg(idd, ~0, IOC3_W_IEC);
701         writel(~0, &idd->vma->sio_ir);
702
703         /* Set up IRQs */
704         if(idd->class == IOC3_CLASS_BASE_IP30
705                                 || idd->class == IOC3_CLASS_BASE_IP27) {
706                 writel(0, &idd->vma->eier);
707                 writel(~0, &idd->vma->eisr);
708
709                 idd->dual_irq = 1;
710                 if (!request_irq(pdev->irq, ioc3_intr_eth, SA_SHIRQ,
711                                  "ioc3-eth", (void *)idd)) {
712                         idd->irq_eth = pdev->irq;
713                 } else {
714                         printk(KERN_WARNING
715                                "%s : request_irq fails for IRQ 0x%x\n ",
716                                __FUNCTION__, pdev->irq);
717                 }
718                 if (!request_irq(pdev->irq+2, ioc3_intr_io, SA_SHIRQ,
719                                  "ioc3-io", (void *)idd)) {
720                         idd->irq_io = pdev->irq+2;
721                 } else {
722                         printk(KERN_WARNING
723                                "%s : request_irq fails for IRQ 0x%x\n ",
724                                __FUNCTION__, pdev->irq+2);
725                 }
726         } else {
727                 if (!request_irq(pdev->irq, ioc3_intr_io, SA_SHIRQ,
728                                  "ioc3", (void *)idd)) {
729                         idd->irq_io = pdev->irq;
730                 } else {
731                         printk(KERN_WARNING
732                                "%s : request_irq fails for IRQ 0x%x\n ",
733                                __FUNCTION__, pdev->irq);
734                 }
735         }
736
737         /* Add this IOC3 to all submodules */
738         for(id=0;id<IOC3_MAX_SUBMODULES;id++)
739                 if(ioc3_submodules[id] && ioc3_submodules[id]->probe) {
740                         idd->active[id] = 1;
741                         idd->active[id] = !ioc3_submodules[id]->probe
742                                                 (ioc3_submodules[id], idd);
743                 }
744
745         printk(KERN_INFO "IOC3 Master Driver loaded for %s\n", pci_name(pdev));
746
747         return 0;
748
749 out_misc_region:
750         release_region(idd->pma, IOC3_PCI_SIZE);
751 out_pci:
752         kfree(idd);
753 out_idd:
754         pci_disable_device(pdev);
755 out:
756         return ret;
757 }
758
759 /* Removes a particular instance of an IOC3 card. */
760 static void ioc3_remove(struct pci_dev *pdev)
761 {
762         int id;
763         struct ioc3_driver_data *idd;
764
765         idd = pci_get_drvdata(pdev);
766
767         /* Remove this IOC3 from all submodules */
768         for(id=0;id<IOC3_MAX_SUBMODULES;id++)
769                 if(idd->active[id]) {
770                         if(ioc3_submodules[id] && ioc3_submodules[id]->remove)
771                                 if(ioc3_submodules[id]->remove(ioc3_submodules[id],
772                                                                 idd))
773                                         printk(KERN_WARNING
774                                                "%s: IOC3 submodule 0x%s remove failed "
775                                                "for pci_dev %s.\n",
776                                                 __FUNCTION__,
777                                                 module_name(ioc3_submodules[id]->owner),
778                                                 pci_name(pdev));
779                         idd->active[id] = 0;
780                 }
781
782         /* Clear and disable all IRQs */
783         write_ireg(idd, ~0, IOC3_W_IEC);
784         writel(~0, &idd->vma->sio_ir);
785
786         /* Release resources */
787         free_irq(idd->irq_io, (void *)idd);
788         if(idd->dual_irq)
789                 free_irq(idd->irq_eth, (void *)idd);
790         iounmap(idd->vma);
791         release_region(idd->pma, IOC3_PCI_SIZE);
792
793         /* Disable IOC3 and relinquish */
794         pci_disable_device(pdev);
795
796         /* Remove and free driver data */
797         down_write(&ioc3_devices_rwsem);
798         list_del(&idd->list);
799         up_write(&ioc3_devices_rwsem);
800         kfree(idd);
801 }
802
803 static struct pci_device_id ioc3_id_table[] = {
804         {PCI_VENDOR_ID_SGI, PCI_DEVICE_ID_SGI_IOC3, PCI_ANY_ID, PCI_ANY_ID},
805         {0}
806 };
807
808 static struct pci_driver ioc3_driver = {
809         .name = "IOC3",
810         .id_table = ioc3_id_table,
811         .probe = ioc3_probe,
812         .remove = ioc3_remove,
813 };
814
815 MODULE_DEVICE_TABLE(pci, ioc3_id_table);
816
817 /*********************
818  * Module management *
819  *********************/
820
821 /* Module load */
822 static int __devinit ioc3_init(void)
823 {
824         if (ia64_platform_is("sn2"))
825                 return pci_register_driver(&ioc3_driver);
826         return 0;
827 }
828
829 /* Module unload */
830 static void __devexit ioc3_exit(void)
831 {
832         pci_unregister_driver(&ioc3_driver);
833 }
834
835 module_init(ioc3_init);
836 module_exit(ioc3_exit);
837
838 MODULE_AUTHOR("Stanislaw Skowronek <skylark@linux-mips.org>");
839 MODULE_DESCRIPTION("PCI driver for SGI IOC3");
840 MODULE_LICENSE("GPL");
841
842 EXPORT_SYMBOL_GPL(ioc3_register_submodule);
843 EXPORT_SYMBOL_GPL(ioc3_unregister_submodule);
844 EXPORT_SYMBOL_GPL(ioc3_ack);
845 EXPORT_SYMBOL_GPL(ioc3_gpcr_set);
846 EXPORT_SYMBOL_GPL(ioc3_disable);
847 EXPORT_SYMBOL_GPL(ioc3_enable);