2 * SGI IOC3 master driver and IRQ demuxer
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
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 #include <linux/slab.h>
21 #define IOC3_PCI_SIZE 0x100000
23 static LIST_HEAD(ioc3_devices);
24 static int ioc3_counter;
25 static DECLARE_RWSEM(ioc3_devices_rwsem);
27 static struct ioc3_submodule *ioc3_submodules[IOC3_MAX_SUBMODULES];
28 static struct ioc3_submodule *ioc3_ethernet;
29 static DEFINE_RWLOCK(ioc3_submodules_lock);
31 /* NIC probing code */
33 #define GPCR_MLAN_EN 0x00200000 /* enable MCR to pin 8 */
35 static inline unsigned mcr_pack(unsigned pulse, unsigned sample)
37 return (pulse << 10) | (sample << 2);
40 static int nic_wait(struct ioc3_driver_data *idd)
45 mcr = readl(&idd->vma->mcr);
51 static int nic_reset(struct ioc3_driver_data *idd)
56 local_irq_save(flags);
57 writel(mcr_pack(500, 65), &idd->vma->mcr);
58 presence = nic_wait(idd);
59 local_irq_restore(flags);
66 static int nic_read_bit(struct ioc3_driver_data *idd)
71 local_irq_save(flags);
72 writel(mcr_pack(6, 13), &idd->vma->mcr);
73 result = nic_wait(idd);
74 local_irq_restore(flags);
81 static void nic_write_bit(struct ioc3_driver_data *idd, int bit)
84 writel(mcr_pack(6, 110), &idd->vma->mcr);
86 writel(mcr_pack(80, 30), &idd->vma->mcr);
91 static unsigned nic_read_byte(struct ioc3_driver_data *idd)
96 for (i = 0; i < 8; i++)
97 result = (result >> 1) | (nic_read_bit(idd) << 7);
102 static void nic_write_byte(struct ioc3_driver_data *idd, int byte)
106 for (i = 8; i; i--) {
110 nic_write_bit(idd, bit);
115 nic_find(struct ioc3_driver_data *idd, int *last, unsigned long addr)
117 int a, b, index, disc;
122 nic_write_byte(idd, 0xF0);
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);
130 printk(KERN_WARNING "IOC3 NIC search failed.\n");
136 if (index == *last) {
137 addr |= 1UL << index;
138 } else if (index > *last) {
139 addr &= ~(1UL << index);
141 } else if ((addr & (1UL << index)) == 0)
143 nic_write_bit(idd, (addr>>index)&1);
147 addr |= 1UL << index;
149 addr &= ~(1UL << index);
150 nic_write_bit(idd, a);
158 static void nic_addr(struct ioc3_driver_data *idd, unsigned long addr)
163 nic_write_byte(idd, 0xF0);
164 for (index = 0; index < 64; index++) {
167 nic_write_bit(idd, (addr>>index)&1);
171 static void crc16_byte(unsigned int *crc, unsigned char db)
177 if((db^(*crc>>16)) & 1)
184 static unsigned int crc16_area(unsigned char *dbs, int size, unsigned int crc)
187 crc16_byte(&crc, *(dbs++));
191 static void crc8_byte(unsigned int *crc, unsigned char db)
205 static unsigned int crc8_addr(unsigned long addr)
208 unsigned int crc = 0x00;
211 crc8_byte(&crc, addr>>(i<<3));
216 read_redir_page(struct ioc3_driver_data *idd, unsigned long addr, int page,
217 unsigned char *redir, unsigned char *data)
221 while(redir[page] != 0xFF) {
222 page = redir[page]^0xFF;
225 printk(KERN_ERR "IOC3: NIC circular redirection\n");
232 nic_write_byte(idd, 0xF0);
233 nic_write_byte(idd, (page << 5) & 0xE0);
234 nic_write_byte(idd, (page >> 3) & 0x1F);
236 data[i] = nic_read_byte(idd);
237 if(crc16_area(data, 0x20, 0x0000) == 0x800d)
241 printk(KERN_ERR "IOC3: CRC error in data page\n");
247 read_redir_map(struct ioc3_driver_data *idd, unsigned long addr,
248 unsigned char *redir)
250 int i,j,loops = 3,crc_ok;
256 nic_write_byte(idd, 0xAA);
257 nic_write_byte(idd, 0x00);
258 nic_write_byte(idd, 0x01);
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));
272 printk(KERN_ERR "IOC3: CRC error in redirection page\n");
277 static void read_nic(struct ioc3_driver_data *idd, unsigned long addr)
279 unsigned char redir[64];
280 unsigned char data[64],part[32];
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 # */
291 if(data[i+11] != ' ')
292 part[j++] = data[i+11];
294 if(data[i+32] != ' ')
295 part[j++] = data[i+32];
297 /* skip Octane power supplies */
298 if(!strncmp(part, "060-0035-", 9))
300 if(!strncmp(part, "060-0038-", 9))
302 strcpy(idd->nic_part, part);
303 /* assemble the serial # */
307 idd->nic_serial[j++] = data[i+1];
308 idd->nic_serial[j] = 0;
311 static void read_mac(struct ioc3_driver_data *idd, unsigned long addr)
314 unsigned char data[13];
318 nic_write_byte(idd, 0xF0);
319 nic_write_byte(idd, 0x00);
320 nic_write_byte(idd, 0x00);
323 data[i] = nic_read_byte(idd);
324 if(crc16_area(data, 13, 0x0000) == 0x800d) {
326 idd->nic_mac[10-i] = data[i];
331 printk(KERN_ERR "IOC3: CRC error in MAC address\n");
333 idd->nic_mac[i] = 0x00;
336 static void probe_nic(struct ioc3_driver_data *idd)
338 int save = 0, loops = 3;
339 unsigned long first, addr;
341 writel(GPCR_MLAN_EN, &idd->vma->gpcr_s);
344 idd->nic_part[0] = 0;
345 idd->nic_serial[0] = 0;
346 addr = first = nic_find(idd, &save, 0);
353 switch(addr & 0xFF) {
364 addr = nic_find(idd, &save, addr);
370 printk(KERN_ERR "IOC3: CRC error in NIC address\n");
375 static void write_ireg(struct ioc3_driver_data *idd, uint32_t val, int which)
379 spin_lock_irqsave(&idd->ir_lock, flags);
382 writel(val, &idd->vma->sio_ies);
385 writel(val, &idd->vma->sio_iec);
388 spin_unlock_irqrestore(&idd->ir_lock, flags);
390 static inline uint32_t get_pending_intrs(struct ioc3_driver_data *idd)
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);
402 static irqreturn_t ioc3_intr_io(int irq, void *arg)
405 struct ioc3_driver_data *idd = arg;
407 unsigned int pending;
409 read_lock_irqsave(&ioc3_submodules_lock, flags);
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,
419 pending = get_pending_intrs(idd); /* look at the IO IRQs */
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,
427 if(!ioc3_submodules[id]->intr(ioc3_submodules[id],
428 idd, pending & ioc3_submodules[id]->irq_mask))
429 pending &= ~ioc3_submodules[id]->irq_mask;
430 if (ioc3_submodules[id]->reset_mask)
431 write_ireg(idd, ioc3_submodules[id]->irq_mask,
435 read_unlock_irqrestore(&ioc3_submodules_lock, flags);
438 "IOC3: Pending IRQs 0x%08x discarded and disabled\n",pending);
439 write_ireg(idd, pending, IOC3_W_IEC);
442 return handled?IRQ_HANDLED:IRQ_NONE;
445 static irqreturn_t ioc3_intr_eth(int irq, void *arg)
448 struct ioc3_driver_data *idd = (struct ioc3_driver_data *)arg;
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 read_unlock_irqrestore(&ioc3_submodules_lock, flags);
458 return handled?IRQ_HANDLED:IRQ_NONE;
461 void ioc3_enable(struct ioc3_submodule *is,
462 struct ioc3_driver_data *idd, unsigned int irqs)
464 write_ireg(idd, irqs & is->irq_mask, IOC3_W_IES);
467 void ioc3_ack(struct ioc3_submodule *is, struct ioc3_driver_data *idd,
470 writel(irqs & is->irq_mask, &idd->vma->sio_ir);
473 void ioc3_disable(struct ioc3_submodule *is,
474 struct ioc3_driver_data *idd, unsigned int irqs)
476 write_ireg(idd, irqs & is->irq_mask, IOC3_W_IEC);
479 void ioc3_gpcr_set(struct ioc3_driver_data *idd, unsigned int val)
482 spin_lock_irqsave(&idd->gpio_lock, flags);
483 writel(val, &idd->vma->gpcr_s);
484 spin_unlock_irqrestore(&idd->gpio_lock, flags);
487 /* Keep it simple, stupid! */
488 static int find_slot(void **tab, int max)
497 /* Register an IOC3 submodule */
498 int ioc3_register_submodule(struct ioc3_submodule *is)
500 struct ioc3_driver_data *idd;
504 write_lock_irqsave(&ioc3_submodules_lock, flags);
505 alloc_id = find_slot((void **)ioc3_submodules, IOC3_MAX_SUBMODULES);
507 ioc3_submodules[alloc_id] = is;
509 if(ioc3_ethernet==NULL)
513 "IOC3 Ethernet module already registered!\n");
516 write_unlock_irqrestore(&ioc3_submodules_lock, flags);
519 printk(KERN_WARNING "Increase IOC3_MAX_SUBMODULES!\n");
525 /* Initialize submodule for each IOC3 */
529 down_read(&ioc3_devices_rwsem);
530 list_for_each_entry(idd, &ioc3_devices, list) {
531 /* set to 1 for IRQs in probe */
532 idd->active[alloc_id] = 1;
533 idd->active[alloc_id] = !is->probe(is, idd);
535 up_read(&ioc3_devices_rwsem);
540 /* Unregister an IOC3 submodule */
541 void ioc3_unregister_submodule(struct ioc3_submodule *is)
543 struct ioc3_driver_data *idd;
546 write_lock_irqsave(&ioc3_submodules_lock, flags);
547 if(ioc3_submodules[is->id]==is)
548 ioc3_submodules[is->id]=NULL;
551 "IOC3 submodule %s has wrong ID.\n",is->name);
552 if(ioc3_ethernet==is)
553 ioc3_ethernet = NULL;
554 write_unlock_irqrestore(&ioc3_submodules_lock, flags);
556 /* Remove submodule for each IOC3 */
557 down_read(&ioc3_devices_rwsem);
558 list_for_each_entry(idd, &ioc3_devices, list)
559 if(idd->active[is->id]) {
561 if(is->remove(is, idd))
563 "%s: IOC3 submodule %s remove failed "
565 __func__, module_name(is->owner),
566 pci_name(idd->pdev));
567 idd->active[is->id] = 0;
569 write_ireg(idd, is->irq_mask, IOC3_W_IEC);
571 up_read(&ioc3_devices_rwsem);
574 /*********************
575 * Device management *
576 *********************/
578 static char *ioc3_class_names[] = { "unknown", "IP27 BaseIO", "IP30 system",
579 "MENET 1/2/3", "MENET 4", "CADduo", "Altix Serial" };
581 static int ioc3_class(struct ioc3_driver_data *idd)
583 int res = IOC3_CLASS_NONE;
584 /* NIC-based logic */
585 if(!strncmp(idd->nic_part, "030-0891-", 9))
586 res = IOC3_CLASS_BASE_IP30;
587 if(!strncmp(idd->nic_part, "030-1155-", 9))
588 res = IOC3_CLASS_CADDUO;
589 if(!strncmp(idd->nic_part, "030-1657-", 9))
590 res = IOC3_CLASS_SERIAL;
591 if(!strncmp(idd->nic_part, "030-1664-", 9))
592 res = IOC3_CLASS_SERIAL;
593 /* total random heuristics */
594 #ifdef CONFIG_SGI_IP27
595 if(!idd->nic_part[0])
596 res = IOC3_CLASS_BASE_IP27;
598 /* print educational message */
599 printk(KERN_INFO "IOC3 part: [%s], serial: [%s] => class %s\n",
600 idd->nic_part, idd->nic_serial, ioc3_class_names[res]);
603 /* Adds a new instance of an IOC3 card */
604 static int ioc3_probe(struct pci_dev *pdev, const struct pci_device_id *pci_id)
606 struct ioc3_driver_data *idd;
610 /* Enable IOC3 and take ownership of it */
611 if ((ret = pci_enable_device(pdev))) {
613 "%s: Failed to enable IOC3 device for pci_dev %s.\n",
614 __func__, pci_name(pdev));
617 pci_set_master(pdev);
620 ret = pci_set_dma_mask(pdev, DMA_BIT_MASK(64));
622 ret = pci_set_consistent_dma_mask(pdev, DMA_BIT_MASK(64));
624 printk(KERN_WARNING "%s: Unable to obtain 64 bit DMA "
625 "for consistent allocations\n",
631 /* Set up per-IOC3 data */
632 idd = kzalloc(sizeof(struct ioc3_driver_data), GFP_KERNEL);
635 "%s: Failed to allocate IOC3 data for pci_dev %s.\n",
636 __func__, pci_name(pdev));
640 spin_lock_init(&idd->ir_lock);
641 spin_lock_init(&idd->gpio_lock);
644 /* Map all IOC3 registers. These are shared between subdevices
645 * so the main IOC3 module manages them.
647 idd->pma = pci_resource_start(pdev, 0);
650 "%s: Unable to find IOC3 resource "
652 __func__, pci_name(pdev));
656 if (!request_mem_region(idd->pma, IOC3_PCI_SIZE, "ioc3")) {
658 "%s: Unable to request IOC3 region "
660 __func__, pci_name(pdev));
664 idd->vma = ioremap(idd->pma, IOC3_PCI_SIZE);
667 "%s: Unable to remap IOC3 region "
669 __func__, pci_name(pdev));
671 goto out_misc_region;
674 /* Track PCI-device specific data */
675 pci_set_drvdata(pdev, idd);
676 down_write(&ioc3_devices_rwsem);
677 list_add_tail(&idd->list, &ioc3_devices);
678 idd->id = ioc3_counter++;
679 up_write(&ioc3_devices_rwsem);
681 idd->gpdr_shadow = readl(&idd->vma->gpdr);
683 /* Read IOC3 NIC contents */
686 /* Detect IOC3 class */
687 idd->class = ioc3_class(idd);
689 /* Initialize IOC3 */
690 pci_read_config_dword(pdev, PCI_COMMAND, &pcmd);
691 pci_write_config_dword(pdev, PCI_COMMAND,
692 pcmd | PCI_COMMAND_MEMORY |
693 PCI_COMMAND_PARITY | PCI_COMMAND_SERR |
694 PCI_SCR_DROP_MODE_EN);
696 write_ireg(idd, ~0, IOC3_W_IEC);
697 writel(~0, &idd->vma->sio_ir);
700 if(idd->class == IOC3_CLASS_BASE_IP30
701 || idd->class == IOC3_CLASS_BASE_IP27) {
702 writel(0, &idd->vma->eier);
703 writel(~0, &idd->vma->eisr);
706 if (!request_irq(pdev->irq, ioc3_intr_eth, IRQF_SHARED,
707 "ioc3-eth", (void *)idd)) {
708 idd->irq_eth = pdev->irq;
711 "%s : request_irq fails for IRQ 0x%x\n ",
712 __func__, pdev->irq);
714 if (!request_irq(pdev->irq+2, ioc3_intr_io, IRQF_SHARED,
715 "ioc3-io", (void *)idd)) {
716 idd->irq_io = pdev->irq+2;
719 "%s : request_irq fails for IRQ 0x%x\n ",
720 __func__, pdev->irq+2);
723 if (!request_irq(pdev->irq, ioc3_intr_io, IRQF_SHARED,
724 "ioc3", (void *)idd)) {
725 idd->irq_io = pdev->irq;
728 "%s : request_irq fails for IRQ 0x%x\n ",
729 __func__, pdev->irq);
733 /* Add this IOC3 to all submodules */
734 for(id=0;id<IOC3_MAX_SUBMODULES;id++)
735 if(ioc3_submodules[id] && ioc3_submodules[id]->probe) {
737 idd->active[id] = !ioc3_submodules[id]->probe
738 (ioc3_submodules[id], idd);
741 printk(KERN_INFO "IOC3 Master Driver loaded for %s\n", pci_name(pdev));
746 release_mem_region(idd->pma, IOC3_PCI_SIZE);
750 pci_disable_device(pdev);
755 /* Removes a particular instance of an IOC3 card. */
756 static void ioc3_remove(struct pci_dev *pdev)
759 struct ioc3_driver_data *idd;
761 idd = pci_get_drvdata(pdev);
763 /* Remove this IOC3 from all submodules */
764 for(id=0;id<IOC3_MAX_SUBMODULES;id++)
765 if(idd->active[id]) {
766 if(ioc3_submodules[id] && ioc3_submodules[id]->remove)
767 if(ioc3_submodules[id]->remove(ioc3_submodules[id],
770 "%s: IOC3 submodule 0x%s remove failed "
773 module_name(ioc3_submodules[id]->owner),
778 /* Clear and disable all IRQs */
779 write_ireg(idd, ~0, IOC3_W_IEC);
780 writel(~0, &idd->vma->sio_ir);
782 /* Release resources */
783 free_irq(idd->irq_io, (void *)idd);
785 free_irq(idd->irq_eth, (void *)idd);
787 release_mem_region(idd->pma, IOC3_PCI_SIZE);
789 /* Disable IOC3 and relinquish */
790 pci_disable_device(pdev);
792 /* Remove and free driver data */
793 down_write(&ioc3_devices_rwsem);
794 list_del(&idd->list);
795 up_write(&ioc3_devices_rwsem);
799 static struct pci_device_id ioc3_id_table[] = {
800 {PCI_VENDOR_ID_SGI, PCI_DEVICE_ID_SGI_IOC3, PCI_ANY_ID, PCI_ANY_ID},
804 static struct pci_driver ioc3_driver = {
806 .id_table = ioc3_id_table,
808 .remove = ioc3_remove,
811 MODULE_DEVICE_TABLE(pci, ioc3_id_table);
813 /*********************
814 * Module management *
815 *********************/
818 static int __init ioc3_init(void)
820 if (ia64_platform_is("sn2"))
821 return pci_register_driver(&ioc3_driver);
826 static void __exit ioc3_exit(void)
828 pci_unregister_driver(&ioc3_driver);
831 module_init(ioc3_init);
832 module_exit(ioc3_exit);
834 MODULE_AUTHOR("Stanislaw Skowronek <skylark@linux-mips.org>");
835 MODULE_DESCRIPTION("PCI driver for SGI IOC3");
836 MODULE_LICENSE("GPL");
838 EXPORT_SYMBOL_GPL(ioc3_register_submodule);
839 EXPORT_SYMBOL_GPL(ioc3_unregister_submodule);
840 EXPORT_SYMBOL_GPL(ioc3_ack);
841 EXPORT_SYMBOL_GPL(ioc3_gpcr_set);
842 EXPORT_SYMBOL_GPL(ioc3_disable);
843 EXPORT_SYMBOL_GPL(ioc3_enable);