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 DEFINE_RWLOCK(ioc3_submodules_lock);
  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_tail(&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);