|  | /* | 
|  | * SGI IOC3 master driver and IRQ demuxer | 
|  | * | 
|  | * Copyright (c) 2005 Stanislaw Skowronek <skylark@linux-mips.org> | 
|  | * Heavily based on similar work by: | 
|  | *   Brent Casavant <bcasavan@sgi.com> - IOC4 master driver | 
|  | *   Pat Gefre <pfg@sgi.com> - IOC3 serial port IRQ demuxer | 
|  | */ | 
|  |  | 
|  | #include <linux/errno.h> | 
|  | #include <linux/module.h> | 
|  | #include <linux/pci.h> | 
|  | #include <linux/dma-mapping.h> | 
|  | #include <linux/interrupt.h> | 
|  | #include <linux/spinlock.h> | 
|  | #include <linux/delay.h> | 
|  | #include <linux/ioc3.h> | 
|  | #include <linux/rwsem.h> | 
|  | #include <linux/slab.h> | 
|  |  | 
|  | #define IOC3_PCI_SIZE 0x100000 | 
|  |  | 
|  | static LIST_HEAD(ioc3_devices); | 
|  | static int ioc3_counter; | 
|  | static DECLARE_RWSEM(ioc3_devices_rwsem); | 
|  |  | 
|  | static struct ioc3_submodule *ioc3_submodules[IOC3_MAX_SUBMODULES]; | 
|  | static struct ioc3_submodule *ioc3_ethernet; | 
|  | static DEFINE_RWLOCK(ioc3_submodules_lock); | 
|  |  | 
|  | /* NIC probing code */ | 
|  |  | 
|  | #define GPCR_MLAN_EN    0x00200000      /* enable MCR to pin 8 */ | 
|  |  | 
|  | static inline unsigned mcr_pack(unsigned pulse, unsigned sample) | 
|  | { | 
|  | return (pulse << 10) | (sample << 2); | 
|  | } | 
|  |  | 
|  | static int nic_wait(struct ioc3_driver_data *idd) | 
|  | { | 
|  | unsigned mcr; | 
|  |  | 
|  | do { | 
|  | mcr = readl(&idd->vma->mcr); | 
|  | } while (!(mcr & 2)); | 
|  |  | 
|  | return mcr & 1; | 
|  | } | 
|  |  | 
|  | static int nic_reset(struct ioc3_driver_data *idd) | 
|  | { | 
|  | int presence; | 
|  | unsigned long flags; | 
|  |  | 
|  | local_irq_save(flags); | 
|  | writel(mcr_pack(500, 65), &idd->vma->mcr); | 
|  | presence = nic_wait(idd); | 
|  | local_irq_restore(flags); | 
|  |  | 
|  | udelay(500); | 
|  |  | 
|  | return presence; | 
|  | } | 
|  |  | 
|  | static int nic_read_bit(struct ioc3_driver_data *idd) | 
|  | { | 
|  | int result; | 
|  | unsigned long flags; | 
|  |  | 
|  | local_irq_save(flags); | 
|  | writel(mcr_pack(6, 13), &idd->vma->mcr); | 
|  | result = nic_wait(idd); | 
|  | local_irq_restore(flags); | 
|  |  | 
|  | udelay(500); | 
|  |  | 
|  | return result; | 
|  | } | 
|  |  | 
|  | static void nic_write_bit(struct ioc3_driver_data *idd, int bit) | 
|  | { | 
|  | if (bit) | 
|  | writel(mcr_pack(6, 110), &idd->vma->mcr); | 
|  | else | 
|  | writel(mcr_pack(80, 30), &idd->vma->mcr); | 
|  |  | 
|  | nic_wait(idd); | 
|  | } | 
|  |  | 
|  | static unsigned nic_read_byte(struct ioc3_driver_data *idd) | 
|  | { | 
|  | unsigned result = 0; | 
|  | int i; | 
|  |  | 
|  | for (i = 0; i < 8; i++) | 
|  | result = (result >> 1) | (nic_read_bit(idd) << 7); | 
|  |  | 
|  | return result; | 
|  | } | 
|  |  | 
|  | static void nic_write_byte(struct ioc3_driver_data *idd, int byte) | 
|  | { | 
|  | int i, bit; | 
|  |  | 
|  | for (i = 8; i; i--) { | 
|  | bit = byte & 1; | 
|  | byte >>= 1; | 
|  |  | 
|  | nic_write_bit(idd, bit); | 
|  | } | 
|  | } | 
|  |  | 
|  | static unsigned long | 
|  | nic_find(struct ioc3_driver_data *idd, int *last, unsigned long addr) | 
|  | { | 
|  | int a, b, index, disc; | 
|  |  | 
|  | nic_reset(idd); | 
|  |  | 
|  | /* Search ROM.  */ | 
|  | nic_write_byte(idd, 0xF0); | 
|  |  | 
|  | /* Algorithm from ``Book of iButton Standards''.  */ | 
|  | for (index = 0, disc = 0; index < 64; index++) { | 
|  | a = nic_read_bit(idd); | 
|  | b = nic_read_bit(idd); | 
|  |  | 
|  | if (a && b) { | 
|  | printk(KERN_WARNING "IOC3 NIC search failed.\n"); | 
|  | *last = 0; | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | if (!a && !b) { | 
|  | if (index == *last) { | 
|  | addr |= 1UL << index; | 
|  | } else if (index > *last) { | 
|  | addr &= ~(1UL << index); | 
|  | disc = index; | 
|  | } else if ((addr & (1UL << index)) == 0) | 
|  | disc = index; | 
|  | nic_write_bit(idd, (addr>>index)&1); | 
|  | continue; | 
|  | } else { | 
|  | if (a) | 
|  | addr |= 1UL << index; | 
|  | else | 
|  | addr &= ~(1UL << index); | 
|  | nic_write_bit(idd, a); | 
|  | continue; | 
|  | } | 
|  | } | 
|  | *last = disc; | 
|  | return addr; | 
|  | } | 
|  |  | 
|  | static void nic_addr(struct ioc3_driver_data *idd, unsigned long addr) | 
|  | { | 
|  | int index; | 
|  |  | 
|  | nic_reset(idd); | 
|  | nic_write_byte(idd, 0xF0); | 
|  | for (index = 0; index < 64; index++) { | 
|  | nic_read_bit(idd); | 
|  | nic_read_bit(idd); | 
|  | nic_write_bit(idd, (addr>>index)&1); | 
|  | } | 
|  | } | 
|  |  | 
|  | static void crc16_byte(unsigned int *crc, unsigned char db) | 
|  | { | 
|  | int i; | 
|  |  | 
|  | for(i=0;i<8;i++) { | 
|  | *crc <<= 1; | 
|  | if((db^(*crc>>16)) & 1) | 
|  | *crc ^= 0x8005; | 
|  | db >>= 1; | 
|  | } | 
|  | *crc &= 0xFFFF; | 
|  | } | 
|  |  | 
|  | static unsigned int crc16_area(unsigned char *dbs, int size, unsigned int crc) | 
|  | { | 
|  | while(size--) | 
|  | crc16_byte(&crc, *(dbs++)); | 
|  | return crc; | 
|  | } | 
|  |  | 
|  | static void crc8_byte(unsigned int *crc, unsigned char db) | 
|  | { | 
|  | int i,f; | 
|  |  | 
|  | for(i=0;i<8;i++) { | 
|  | f = (*crc ^ db) & 1; | 
|  | *crc >>= 1; | 
|  | db >>= 1; | 
|  | if(f) | 
|  | *crc ^= 0x8c; | 
|  | } | 
|  | *crc &= 0xff; | 
|  | } | 
|  |  | 
|  | static unsigned int crc8_addr(unsigned long addr) | 
|  | { | 
|  | int i; | 
|  | unsigned int crc = 0x00; | 
|  |  | 
|  | for(i=0;i<8;i++) | 
|  | crc8_byte(&crc, addr>>(i<<3)); | 
|  | return crc; | 
|  | } | 
|  |  | 
|  | static void | 
|  | read_redir_page(struct ioc3_driver_data *idd, unsigned long addr, int page, | 
|  | unsigned char *redir, unsigned char *data) | 
|  | { | 
|  | int loops = 16, i; | 
|  |  | 
|  | while(redir[page] != 0xFF) { | 
|  | page = redir[page]^0xFF; | 
|  | loops--; | 
|  | if(loops<0) { | 
|  | printk(KERN_ERR "IOC3: NIC circular redirection\n"); | 
|  | return; | 
|  | } | 
|  | } | 
|  | loops = 3; | 
|  | while(loops>0) { | 
|  | nic_addr(idd, addr); | 
|  | nic_write_byte(idd, 0xF0); | 
|  | nic_write_byte(idd, (page << 5) & 0xE0); | 
|  | nic_write_byte(idd, (page >> 3) & 0x1F); | 
|  | for(i=0;i<0x20;i++) | 
|  | data[i] = nic_read_byte(idd); | 
|  | if(crc16_area(data, 0x20, 0x0000) == 0x800d) | 
|  | return; | 
|  | loops--; | 
|  | } | 
|  | printk(KERN_ERR "IOC3: CRC error in data page\n"); | 
|  | for(i=0;i<0x20;i++) | 
|  | data[i] = 0x00; | 
|  | } | 
|  |  | 
|  | static void | 
|  | read_redir_map(struct ioc3_driver_data *idd, unsigned long addr, | 
|  | unsigned char *redir) | 
|  | { | 
|  | int i,j,loops = 3,crc_ok; | 
|  | unsigned int crc; | 
|  |  | 
|  | while(loops>0) { | 
|  | crc_ok = 1; | 
|  | nic_addr(idd, addr); | 
|  | nic_write_byte(idd, 0xAA); | 
|  | nic_write_byte(idd, 0x00); | 
|  | nic_write_byte(idd, 0x01); | 
|  | for(i=0;i<64;i+=8) { | 
|  | for(j=0;j<8;j++) | 
|  | redir[i+j] = nic_read_byte(idd); | 
|  | crc = crc16_area(redir+i, 8, (i==0)?0x8707:0x0000); | 
|  | crc16_byte(&crc, nic_read_byte(idd)); | 
|  | crc16_byte(&crc, nic_read_byte(idd)); | 
|  | if(crc != 0x800d) | 
|  | crc_ok = 0; | 
|  | } | 
|  | if(crc_ok) | 
|  | return; | 
|  | loops--; | 
|  | } | 
|  | printk(KERN_ERR "IOC3: CRC error in redirection page\n"); | 
|  | for(i=0;i<64;i++) | 
|  | redir[i] = 0xFF; | 
|  | } | 
|  |  | 
|  | static void read_nic(struct ioc3_driver_data *idd, unsigned long addr) | 
|  | { | 
|  | unsigned char redir[64]; | 
|  | unsigned char data[64],part[32]; | 
|  | int i,j; | 
|  |  | 
|  | /* read redirections */ | 
|  | read_redir_map(idd, addr, redir); | 
|  | /* read data pages */ | 
|  | read_redir_page(idd, addr, 0, redir, data); | 
|  | read_redir_page(idd, addr, 1, redir, data+32); | 
|  | /* assemble the part # */ | 
|  | j=0; | 
|  | for(i=0;i<19;i++) | 
|  | if(data[i+11] != ' ') | 
|  | part[j++] = data[i+11]; | 
|  | for(i=0;i<6;i++) | 
|  | if(data[i+32] != ' ') | 
|  | part[j++] = data[i+32]; | 
|  | part[j] = 0; | 
|  | /* skip Octane power supplies */ | 
|  | if(!strncmp(part, "060-0035-", 9)) | 
|  | return; | 
|  | if(!strncmp(part, "060-0038-", 9)) | 
|  | return; | 
|  | strcpy(idd->nic_part, part); | 
|  | /* assemble the serial # */ | 
|  | j=0; | 
|  | for(i=0;i<10;i++) | 
|  | if(data[i+1] != ' ') | 
|  | idd->nic_serial[j++] = data[i+1]; | 
|  | idd->nic_serial[j] = 0; | 
|  | } | 
|  |  | 
|  | static void read_mac(struct ioc3_driver_data *idd, unsigned long addr) | 
|  | { | 
|  | int i, loops = 3; | 
|  | unsigned char data[13]; | 
|  |  | 
|  | while(loops>0) { | 
|  | nic_addr(idd, addr); | 
|  | nic_write_byte(idd, 0xF0); | 
|  | nic_write_byte(idd, 0x00); | 
|  | nic_write_byte(idd, 0x00); | 
|  | nic_read_byte(idd); | 
|  | for(i=0;i<13;i++) | 
|  | data[i] = nic_read_byte(idd); | 
|  | if(crc16_area(data, 13, 0x0000) == 0x800d) { | 
|  | for(i=10;i>4;i--) | 
|  | idd->nic_mac[10-i] = data[i]; | 
|  | return; | 
|  | } | 
|  | loops--; | 
|  | } | 
|  | printk(KERN_ERR "IOC3: CRC error in MAC address\n"); | 
|  | for(i=0;i<6;i++) | 
|  | idd->nic_mac[i] = 0x00; | 
|  | } | 
|  |  | 
|  | static void probe_nic(struct ioc3_driver_data *idd) | 
|  | { | 
|  | int save = 0, loops = 3; | 
|  | unsigned long first, addr; | 
|  |  | 
|  | writel(GPCR_MLAN_EN, &idd->vma->gpcr_s); | 
|  |  | 
|  | while(loops>0) { | 
|  | idd->nic_part[0] = 0; | 
|  | idd->nic_serial[0] = 0; | 
|  | addr = first = nic_find(idd, &save, 0); | 
|  | if(!first) | 
|  | return; | 
|  | while(1) { | 
|  | if(crc8_addr(addr)) | 
|  | break; | 
|  | else { | 
|  | switch(addr & 0xFF) { | 
|  | case 0x0B: | 
|  | read_nic(idd, addr); | 
|  | break; | 
|  | case 0x09: | 
|  | case 0x89: | 
|  | case 0x91: | 
|  | read_mac(idd, addr); | 
|  | break; | 
|  | } | 
|  | } | 
|  | addr = nic_find(idd, &save, addr); | 
|  | if(addr == first) | 
|  | return; | 
|  | } | 
|  | loops--; | 
|  | } | 
|  | printk(KERN_ERR "IOC3: CRC error in NIC address\n"); | 
|  | } | 
|  |  | 
|  | /* Interrupts */ | 
|  |  | 
|  | static void write_ireg(struct ioc3_driver_data *idd, uint32_t val, int which) | 
|  | { | 
|  | unsigned long flags; | 
|  |  | 
|  | spin_lock_irqsave(&idd->ir_lock, flags); | 
|  | switch (which) { | 
|  | case IOC3_W_IES: | 
|  | writel(val, &idd->vma->sio_ies); | 
|  | break; | 
|  | case IOC3_W_IEC: | 
|  | writel(val, &idd->vma->sio_iec); | 
|  | break; | 
|  | } | 
|  | spin_unlock_irqrestore(&idd->ir_lock, flags); | 
|  | } | 
|  | static inline uint32_t get_pending_intrs(struct ioc3_driver_data *idd) | 
|  | { | 
|  | unsigned long flag; | 
|  | uint32_t intrs = 0; | 
|  |  | 
|  | spin_lock_irqsave(&idd->ir_lock, flag); | 
|  | intrs = readl(&idd->vma->sio_ir); | 
|  | intrs &= readl(&idd->vma->sio_ies); | 
|  | spin_unlock_irqrestore(&idd->ir_lock, flag); | 
|  | return intrs; | 
|  | } | 
|  |  | 
|  | static irqreturn_t ioc3_intr_io(int irq, void *arg) | 
|  | { | 
|  | unsigned long flags; | 
|  | struct ioc3_driver_data *idd = arg; | 
|  | int handled = 1, id; | 
|  | unsigned int pending; | 
|  |  | 
|  | read_lock_irqsave(&ioc3_submodules_lock, flags); | 
|  |  | 
|  | if(idd->dual_irq && readb(&idd->vma->eisr)) { | 
|  | /* send Ethernet IRQ to the driver */ | 
|  | if(ioc3_ethernet && idd->active[ioc3_ethernet->id] && | 
|  | ioc3_ethernet->intr) { | 
|  | handled = handled && !ioc3_ethernet->intr(ioc3_ethernet, | 
|  | idd, 0); | 
|  | } | 
|  | } | 
|  | pending = get_pending_intrs(idd);	/* look at the IO IRQs */ | 
|  |  | 
|  | for(id=0;id<IOC3_MAX_SUBMODULES;id++) { | 
|  | if(idd->active[id] && ioc3_submodules[id] | 
|  | && (pending & ioc3_submodules[id]->irq_mask) | 
|  | && ioc3_submodules[id]->intr) { | 
|  | write_ireg(idd, ioc3_submodules[id]->irq_mask, | 
|  | IOC3_W_IEC); | 
|  | if(!ioc3_submodules[id]->intr(ioc3_submodules[id], | 
|  | idd, pending & ioc3_submodules[id]->irq_mask)) | 
|  | pending &= ~ioc3_submodules[id]->irq_mask; | 
|  | if (ioc3_submodules[id]->reset_mask) | 
|  | write_ireg(idd, ioc3_submodules[id]->irq_mask, | 
|  | IOC3_W_IES); | 
|  | } | 
|  | } | 
|  | read_unlock_irqrestore(&ioc3_submodules_lock, flags); | 
|  | if(pending) { | 
|  | printk(KERN_WARNING | 
|  | "IOC3: Pending IRQs 0x%08x discarded and disabled\n",pending); | 
|  | write_ireg(idd, pending, IOC3_W_IEC); | 
|  | handled = 1; | 
|  | } | 
|  | return handled?IRQ_HANDLED:IRQ_NONE; | 
|  | } | 
|  |  | 
|  | static irqreturn_t ioc3_intr_eth(int irq, void *arg) | 
|  | { | 
|  | unsigned long flags; | 
|  | struct ioc3_driver_data *idd = (struct ioc3_driver_data *)arg; | 
|  | int handled = 1; | 
|  |  | 
|  | if(!idd->dual_irq) | 
|  | return IRQ_NONE; | 
|  | read_lock_irqsave(&ioc3_submodules_lock, flags); | 
|  | if(ioc3_ethernet && idd->active[ioc3_ethernet->id] | 
|  | && ioc3_ethernet->intr) | 
|  | handled = handled && !ioc3_ethernet->intr(ioc3_ethernet, idd, 0); | 
|  | read_unlock_irqrestore(&ioc3_submodules_lock, flags); | 
|  | return handled?IRQ_HANDLED:IRQ_NONE; | 
|  | } | 
|  |  | 
|  | void ioc3_enable(struct ioc3_submodule *is, | 
|  | struct ioc3_driver_data *idd, unsigned int irqs) | 
|  | { | 
|  | write_ireg(idd, irqs & is->irq_mask, IOC3_W_IES); | 
|  | } | 
|  |  | 
|  | void ioc3_ack(struct ioc3_submodule *is, struct ioc3_driver_data *idd, | 
|  | unsigned int irqs) | 
|  | { | 
|  | writel(irqs & is->irq_mask, &idd->vma->sio_ir); | 
|  | } | 
|  |  | 
|  | void ioc3_disable(struct ioc3_submodule *is, | 
|  | struct ioc3_driver_data *idd, unsigned int irqs) | 
|  | { | 
|  | write_ireg(idd, irqs & is->irq_mask, IOC3_W_IEC); | 
|  | } | 
|  |  | 
|  | void ioc3_gpcr_set(struct ioc3_driver_data *idd, unsigned int val) | 
|  | { | 
|  | unsigned long flags; | 
|  | spin_lock_irqsave(&idd->gpio_lock, flags); | 
|  | writel(val, &idd->vma->gpcr_s); | 
|  | spin_unlock_irqrestore(&idd->gpio_lock, flags); | 
|  | } | 
|  |  | 
|  | /* Keep it simple, stupid! */ | 
|  | static int find_slot(void **tab, int max) | 
|  | { | 
|  | int i; | 
|  | for(i=0;i<max;i++) | 
|  | if(!(tab[i])) | 
|  | return i; | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | /* Register an IOC3 submodule */ | 
|  | int ioc3_register_submodule(struct ioc3_submodule *is) | 
|  | { | 
|  | struct ioc3_driver_data *idd; | 
|  | int alloc_id; | 
|  | unsigned long flags; | 
|  |  | 
|  | write_lock_irqsave(&ioc3_submodules_lock, flags); | 
|  | alloc_id = find_slot((void **)ioc3_submodules, IOC3_MAX_SUBMODULES); | 
|  | if(alloc_id != -1) { | 
|  | ioc3_submodules[alloc_id] = is; | 
|  | if(is->ethernet) { | 
|  | if(ioc3_ethernet==NULL) | 
|  | ioc3_ethernet=is; | 
|  | else | 
|  | printk(KERN_WARNING | 
|  | "IOC3 Ethernet module already registered!\n"); | 
|  | } | 
|  | } | 
|  | write_unlock_irqrestore(&ioc3_submodules_lock, flags); | 
|  |  | 
|  | if(alloc_id == -1) { | 
|  | printk(KERN_WARNING "Increase IOC3_MAX_SUBMODULES!\n"); | 
|  | return -ENOMEM; | 
|  | } | 
|  |  | 
|  | is->id=alloc_id; | 
|  |  | 
|  | /* Initialize submodule for each IOC3 */ | 
|  | if (!is->probe) | 
|  | return 0; | 
|  |  | 
|  | down_read(&ioc3_devices_rwsem); | 
|  | list_for_each_entry(idd, &ioc3_devices, list) { | 
|  | /* set to 1 for IRQs in probe */ | 
|  | idd->active[alloc_id] = 1; | 
|  | idd->active[alloc_id] = !is->probe(is, idd); | 
|  | } | 
|  | up_read(&ioc3_devices_rwsem); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | /* Unregister an IOC3 submodule */ | 
|  | void ioc3_unregister_submodule(struct ioc3_submodule *is) | 
|  | { | 
|  | struct ioc3_driver_data *idd; | 
|  | unsigned long flags; | 
|  |  | 
|  | write_lock_irqsave(&ioc3_submodules_lock, flags); | 
|  | if(ioc3_submodules[is->id]==is) | 
|  | ioc3_submodules[is->id]=NULL; | 
|  | else | 
|  | printk(KERN_WARNING | 
|  | "IOC3 submodule %s has wrong ID.\n",is->name); | 
|  | if(ioc3_ethernet==is) | 
|  | ioc3_ethernet = NULL; | 
|  | write_unlock_irqrestore(&ioc3_submodules_lock, flags); | 
|  |  | 
|  | /* Remove submodule for each IOC3 */ | 
|  | down_read(&ioc3_devices_rwsem); | 
|  | list_for_each_entry(idd, &ioc3_devices, list) | 
|  | if(idd->active[is->id]) { | 
|  | if(is->remove) | 
|  | if(is->remove(is, idd)) | 
|  | printk(KERN_WARNING | 
|  | "%s: IOC3 submodule %s remove failed " | 
|  | "for pci_dev %s.\n", | 
|  | __func__, module_name(is->owner), | 
|  | pci_name(idd->pdev)); | 
|  | idd->active[is->id] = 0; | 
|  | if(is->irq_mask) | 
|  | write_ireg(idd, is->irq_mask, IOC3_W_IEC); | 
|  | } | 
|  | up_read(&ioc3_devices_rwsem); | 
|  | } | 
|  |  | 
|  | /********************* | 
|  | * Device management * | 
|  | *********************/ | 
|  |  | 
|  | static char * __devinitdata | 
|  | ioc3_class_names[]={"unknown", "IP27 BaseIO", "IP30 system", "MENET 1/2/3", | 
|  | "MENET 4", "CADduo", "Altix Serial"}; | 
|  |  | 
|  | static int __devinit ioc3_class(struct ioc3_driver_data *idd) | 
|  | { | 
|  | int res = IOC3_CLASS_NONE; | 
|  | /* NIC-based logic */ | 
|  | if(!strncmp(idd->nic_part, "030-0891-", 9)) | 
|  | res = IOC3_CLASS_BASE_IP30; | 
|  | if(!strncmp(idd->nic_part, "030-1155-", 9)) | 
|  | res = IOC3_CLASS_CADDUO; | 
|  | if(!strncmp(idd->nic_part, "030-1657-", 9)) | 
|  | res = IOC3_CLASS_SERIAL; | 
|  | if(!strncmp(idd->nic_part, "030-1664-", 9)) | 
|  | res = IOC3_CLASS_SERIAL; | 
|  | /* total random heuristics */ | 
|  | #ifdef CONFIG_SGI_IP27 | 
|  | if(!idd->nic_part[0]) | 
|  | res = IOC3_CLASS_BASE_IP27; | 
|  | #endif | 
|  | /* print educational message */ | 
|  | printk(KERN_INFO "IOC3 part: [%s], serial: [%s] => class %s\n", | 
|  | idd->nic_part, idd->nic_serial, ioc3_class_names[res]); | 
|  | return res; | 
|  | } | 
|  | /* Adds a new instance of an IOC3 card */ | 
|  | static int __devinit | 
|  | ioc3_probe(struct pci_dev *pdev, const struct pci_device_id *pci_id) | 
|  | { | 
|  | struct ioc3_driver_data *idd; | 
|  | uint32_t pcmd; | 
|  | int ret, id; | 
|  |  | 
|  | /* Enable IOC3 and take ownership of it */ | 
|  | if ((ret = pci_enable_device(pdev))) { | 
|  | printk(KERN_WARNING | 
|  | "%s: Failed to enable IOC3 device for pci_dev %s.\n", | 
|  | __func__, pci_name(pdev)); | 
|  | goto out; | 
|  | } | 
|  | pci_set_master(pdev); | 
|  |  | 
|  | #ifdef USE_64BIT_DMA | 
|  | ret = pci_set_dma_mask(pdev, DMA_BIT_MASK(64)); | 
|  | if (!ret) { | 
|  | ret = pci_set_consistent_dma_mask(pdev, DMA_BIT_MASK(64)); | 
|  | if (ret < 0) { | 
|  | printk(KERN_WARNING "%s: Unable to obtain 64 bit DMA " | 
|  | "for consistent allocations\n", | 
|  | __func__); | 
|  | } | 
|  | } | 
|  | #endif | 
|  |  | 
|  | /* Set up per-IOC3 data */ | 
|  | idd = kzalloc(sizeof(struct ioc3_driver_data), GFP_KERNEL); | 
|  | if (!idd) { | 
|  | printk(KERN_WARNING | 
|  | "%s: Failed to allocate IOC3 data for pci_dev %s.\n", | 
|  | __func__, pci_name(pdev)); | 
|  | ret = -ENODEV; | 
|  | goto out_idd; | 
|  | } | 
|  | spin_lock_init(&idd->ir_lock); | 
|  | spin_lock_init(&idd->gpio_lock); | 
|  | idd->pdev = pdev; | 
|  |  | 
|  | /* Map all IOC3 registers.  These are shared between subdevices | 
|  | * so the main IOC3 module manages them. | 
|  | */ | 
|  | idd->pma = pci_resource_start(pdev, 0); | 
|  | if (!idd->pma) { | 
|  | printk(KERN_WARNING | 
|  | "%s: Unable to find IOC3 resource " | 
|  | "for pci_dev %s.\n", | 
|  | __func__, pci_name(pdev)); | 
|  | ret = -ENODEV; | 
|  | goto out_pci; | 
|  | } | 
|  | if (!request_mem_region(idd->pma, IOC3_PCI_SIZE, "ioc3")) { | 
|  | printk(KERN_WARNING | 
|  | "%s: Unable to request IOC3 region " | 
|  | "for pci_dev %s.\n", | 
|  | __func__, pci_name(pdev)); | 
|  | ret = -ENODEV; | 
|  | goto out_pci; | 
|  | } | 
|  | idd->vma = ioremap(idd->pma, IOC3_PCI_SIZE); | 
|  | if (!idd->vma) { | 
|  | printk(KERN_WARNING | 
|  | "%s: Unable to remap IOC3 region " | 
|  | "for pci_dev %s.\n", | 
|  | __func__, pci_name(pdev)); | 
|  | ret = -ENODEV; | 
|  | goto out_misc_region; | 
|  | } | 
|  |  | 
|  | /* Track PCI-device specific data */ | 
|  | pci_set_drvdata(pdev, idd); | 
|  | down_write(&ioc3_devices_rwsem); | 
|  | list_add_tail(&idd->list, &ioc3_devices); | 
|  | idd->id = ioc3_counter++; | 
|  | up_write(&ioc3_devices_rwsem); | 
|  |  | 
|  | idd->gpdr_shadow = readl(&idd->vma->gpdr); | 
|  |  | 
|  | /* Read IOC3 NIC contents */ | 
|  | probe_nic(idd); | 
|  |  | 
|  | /* Detect IOC3 class */ | 
|  | idd->class = ioc3_class(idd); | 
|  |  | 
|  | /* Initialize IOC3 */ | 
|  | pci_read_config_dword(pdev, PCI_COMMAND, &pcmd); | 
|  | pci_write_config_dword(pdev, PCI_COMMAND, | 
|  | pcmd | PCI_COMMAND_MEMORY | | 
|  | PCI_COMMAND_PARITY | PCI_COMMAND_SERR | | 
|  | PCI_SCR_DROP_MODE_EN); | 
|  |  | 
|  | write_ireg(idd, ~0, IOC3_W_IEC); | 
|  | writel(~0, &idd->vma->sio_ir); | 
|  |  | 
|  | /* Set up IRQs */ | 
|  | if(idd->class == IOC3_CLASS_BASE_IP30 | 
|  | || idd->class == IOC3_CLASS_BASE_IP27) { | 
|  | writel(0, &idd->vma->eier); | 
|  | writel(~0, &idd->vma->eisr); | 
|  |  | 
|  | idd->dual_irq = 1; | 
|  | if (!request_irq(pdev->irq, ioc3_intr_eth, IRQF_SHARED, | 
|  | "ioc3-eth", (void *)idd)) { | 
|  | idd->irq_eth = pdev->irq; | 
|  | } else { | 
|  | printk(KERN_WARNING | 
|  | "%s : request_irq fails for IRQ 0x%x\n ", | 
|  | __func__, pdev->irq); | 
|  | } | 
|  | if (!request_irq(pdev->irq+2, ioc3_intr_io, IRQF_SHARED, | 
|  | "ioc3-io", (void *)idd)) { | 
|  | idd->irq_io = pdev->irq+2; | 
|  | } else { | 
|  | printk(KERN_WARNING | 
|  | "%s : request_irq fails for IRQ 0x%x\n ", | 
|  | __func__, pdev->irq+2); | 
|  | } | 
|  | } else { | 
|  | if (!request_irq(pdev->irq, ioc3_intr_io, IRQF_SHARED, | 
|  | "ioc3", (void *)idd)) { | 
|  | idd->irq_io = pdev->irq; | 
|  | } else { | 
|  | printk(KERN_WARNING | 
|  | "%s : request_irq fails for IRQ 0x%x\n ", | 
|  | __func__, pdev->irq); | 
|  | } | 
|  | } | 
|  |  | 
|  | /* Add this IOC3 to all submodules */ | 
|  | for(id=0;id<IOC3_MAX_SUBMODULES;id++) | 
|  | if(ioc3_submodules[id] && ioc3_submodules[id]->probe) { | 
|  | idd->active[id] = 1; | 
|  | idd->active[id] = !ioc3_submodules[id]->probe | 
|  | (ioc3_submodules[id], idd); | 
|  | } | 
|  |  | 
|  | printk(KERN_INFO "IOC3 Master Driver loaded for %s\n", pci_name(pdev)); | 
|  |  | 
|  | return 0; | 
|  |  | 
|  | out_misc_region: | 
|  | release_mem_region(idd->pma, IOC3_PCI_SIZE); | 
|  | out_pci: | 
|  | kfree(idd); | 
|  | out_idd: | 
|  | pci_disable_device(pdev); | 
|  | out: | 
|  | return ret; | 
|  | } | 
|  |  | 
|  | /* Removes a particular instance of an IOC3 card. */ | 
|  | static void __devexit ioc3_remove(struct pci_dev *pdev) | 
|  | { | 
|  | int id; | 
|  | struct ioc3_driver_data *idd; | 
|  |  | 
|  | idd = pci_get_drvdata(pdev); | 
|  |  | 
|  | /* Remove this IOC3 from all submodules */ | 
|  | for(id=0;id<IOC3_MAX_SUBMODULES;id++) | 
|  | if(idd->active[id]) { | 
|  | if(ioc3_submodules[id] && ioc3_submodules[id]->remove) | 
|  | if(ioc3_submodules[id]->remove(ioc3_submodules[id], | 
|  | idd)) | 
|  | printk(KERN_WARNING | 
|  | "%s: IOC3 submodule 0x%s remove failed " | 
|  | "for pci_dev %s.\n", | 
|  | __func__, | 
|  | module_name(ioc3_submodules[id]->owner), | 
|  | pci_name(pdev)); | 
|  | idd->active[id] = 0; | 
|  | } | 
|  |  | 
|  | /* Clear and disable all IRQs */ | 
|  | write_ireg(idd, ~0, IOC3_W_IEC); | 
|  | writel(~0, &idd->vma->sio_ir); | 
|  |  | 
|  | /* Release resources */ | 
|  | free_irq(idd->irq_io, (void *)idd); | 
|  | if(idd->dual_irq) | 
|  | free_irq(idd->irq_eth, (void *)idd); | 
|  | iounmap(idd->vma); | 
|  | release_mem_region(idd->pma, IOC3_PCI_SIZE); | 
|  |  | 
|  | /* Disable IOC3 and relinquish */ | 
|  | pci_disable_device(pdev); | 
|  |  | 
|  | /* Remove and free driver data */ | 
|  | down_write(&ioc3_devices_rwsem); | 
|  | list_del(&idd->list); | 
|  | up_write(&ioc3_devices_rwsem); | 
|  | kfree(idd); | 
|  | } | 
|  |  | 
|  | static struct pci_device_id ioc3_id_table[] = { | 
|  | {PCI_VENDOR_ID_SGI, PCI_DEVICE_ID_SGI_IOC3, PCI_ANY_ID, PCI_ANY_ID}, | 
|  | {0} | 
|  | }; | 
|  |  | 
|  | static struct pci_driver ioc3_driver = { | 
|  | .name = "IOC3", | 
|  | .id_table = ioc3_id_table, | 
|  | .probe = ioc3_probe, | 
|  | .remove = __devexit_p(ioc3_remove), | 
|  | }; | 
|  |  | 
|  | MODULE_DEVICE_TABLE(pci, ioc3_id_table); | 
|  |  | 
|  | /********************* | 
|  | * Module management * | 
|  | *********************/ | 
|  |  | 
|  | /* Module load */ | 
|  | static int __init ioc3_init(void) | 
|  | { | 
|  | if (ia64_platform_is("sn2")) | 
|  | return pci_register_driver(&ioc3_driver); | 
|  | return -ENODEV; | 
|  | } | 
|  |  | 
|  | /* Module unload */ | 
|  | static void __exit ioc3_exit(void) | 
|  | { | 
|  | pci_unregister_driver(&ioc3_driver); | 
|  | } | 
|  |  | 
|  | module_init(ioc3_init); | 
|  | module_exit(ioc3_exit); | 
|  |  | 
|  | MODULE_AUTHOR("Stanislaw Skowronek <skylark@linux-mips.org>"); | 
|  | MODULE_DESCRIPTION("PCI driver for SGI IOC3"); | 
|  | MODULE_LICENSE("GPL"); | 
|  |  | 
|  | EXPORT_SYMBOL_GPL(ioc3_register_submodule); | 
|  | EXPORT_SYMBOL_GPL(ioc3_unregister_submodule); | 
|  | EXPORT_SYMBOL_GPL(ioc3_ack); | 
|  | EXPORT_SYMBOL_GPL(ioc3_gpcr_set); | 
|  | EXPORT_SYMBOL_GPL(ioc3_disable); | 
|  | EXPORT_SYMBOL_GPL(ioc3_enable); |