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