/*====================================================================== A PCMCIA token-ring driver for IBM-based cards This driver supports the IBM PCMCIA Token-Ring Card. Written by Steve Kipisz, kipisz@vnet.ibm.com or bungy@ibm.net Written 1995,1996. This code is based on pcnet_cs.c from David Hinds. V2.2.0 February 1999 - Mike Phillips phillim@amtrak.com Linux V2.2.x presented significant changes to the underlying ibmtr.c code. Mainly the code became a lot more organized and modular. This caused the old PCMCIA Token Ring driver to give up and go home early. Instead of just patching the old code to make it work, the PCMCIA code has been streamlined, updated and possibly improved. This code now only contains code required for the Card Services. All we do here is set the card up enough so that the real ibmtr.c driver can find it and work with it properly. i.e. We set up the io port, irq, mmio memory and shared ram memory. This enables ibmtr_probe in ibmtr.c to find the card and configure it as though it was a normal ISA and/or PnP card. There is some confusion with the difference between available shared ram and the amount actually reserved from memory. ibmtr.c sets up several offsets depending upon the actual on-board memory, not the reserved memory. We need to get around this to allow the cards to work with other cards in restricted memory space. Therefore the pcmcia_reality_check function. CHANGES v2.2.5 April 1999 Mike Phillips (phillim@amtrak.com) Obscure bug fix, required changed to ibmtr.c not ibmtr_cs.c v2.2.7 May 1999 Mike Phillips (phillim@amtrak.com) Updated to version 2.2.7 to match the first version of the kernel that the modification to ibmtr.c were incorporated into. v2.2.17 July 2000 Burt Silverman (burts@us.ibm.com) Address translation feature of PCMCIA controller is usable so memory windows can be placed in High memory (meaning above 0xFFFFF.) ======================================================================*/ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #ifdef PCMCIA_DEBUG static int pc_debug = PCMCIA_DEBUG; MODULE_PARM(pc_debug, "i"); #define DEBUG(n, args...) if (pc_debug>(n)) printk(KERN_DEBUG args) static char *version = "ibmtr_cs.c 1.10 1996/01/06 05:19:00 (Steve Kipisz)\n" " 2.2.7 1999/05/03 12:00:00 (Mike Phillips)\n" " 2.2.18 2000/10/15 Midnight (Burt Silverman)\n"; #else #define DEBUG(n, args...) #endif /* Dumb test for new ibmtr driver */ #ifdef BLOCKSZ #define TR_OLD 0 #else #define TR_OLD 1 #endif /*====================================================================*/ /* Parameters that can be set with 'insmod' */ /* Bit map of interrupts to choose from */ static u_int irq_mask = 0xdeb8; static int irq_list[4] = { -1 }; /* MMIO base address */ static u_long mmiobase = (TR_OLD ? 0 : 0xce000); /* SRAM base address */ static u_long srambase = (TR_OLD ? 0 : 0xd0000); /* SRAM size 8,16,32,64 */ static u_long sramsize = (TR_OLD ? 16 : 64); /* Ringspeed 4,16 */ static int ringspeed = 16; MODULE_PARM(irq_mask, "i"); MODULE_PARM(irq_list, "1-4i"); MODULE_PARM(mmiobase, "i"); MODULE_PARM(srambase, "i"); MODULE_PARM(sramsize, "i"); MODULE_PARM(ringspeed, "i"); /*====================================================================*/ static void ibmtr_config(dev_link_t *link); static void ibmtr_hw_setup(struct net_device *dev, u_int mmiobase); static void ibmtr_release(u_long arg); static int ibmtr_event(event_t event, int priority, event_callback_args_t *args); static dev_info_t dev_info = "ibmtr_cs"; static dev_link_t *ibmtr_attach(void); static void ibmtr_detach(dev_link_t *); static dev_link_t *dev_list = NULL; extern int ibmtr_probe(struct net_device *dev); extern int trdev_init(struct net_device *dev); extern void tok_interrupt(int irq, struct pt_regs *regs); extern int tok_init_card(struct net_device *dev); extern unsigned char get_sram_size(struct tok_info *ti); /*====================================================================*/ typedef struct ibmtr_dev_t { dev_link_t link; struct net_device *dev; dev_node_t node; window_handle_t sram_win_handle; struct tok_info ti; } ibmtr_dev_t; /*====================================================================== This bit of code is used to avoid unregistering network devices at inappropriate times. 2.2 and later kernels are fairly picky about when this can happen. ======================================================================*/ static void flush_stale_links(void) { dev_link_t *link, *next; for (link = dev_list; link; link = next) { next = link->next; if (link->state & DEV_STALE_LINK) ibmtr_detach(link); } } /*====================================================================*/ static void cs_error(client_handle_t handle, int func, int ret) { error_info_t err = { func, ret }; CardServices(ReportError, handle, &err); } /*====================================================================== ibmtr_attach() creates an "instance" of the driver, allocating local data structures for one device. The device is registered with Card Services. ======================================================================*/ static dev_link_t *ibmtr_attach(void) { ibmtr_dev_t *info; dev_link_t *link; struct net_device *dev; client_reg_t client_reg; int i, ret; DEBUG(0, "ibmtr_attach()\n"); flush_stale_links(); /* Create new token-ring device */ info = kmalloc(sizeof(*info), GFP_KERNEL); if (!info) return NULL; memset(info, 0, sizeof(*info)); link = &info->link; link->priv = info; link->release.function = &ibmtr_release; link->release.data = (u_long)link; link->io.Attributes1 = IO_DATA_PATH_WIDTH_8; link->io.NumPorts1 = 4; link->io.IOAddrLines = 16; link->irq.Attributes = IRQ_TYPE_EXCLUSIVE | IRQ_HANDLE_PRESENT; link->irq.IRQInfo1 = IRQ_INFO2_VALID|IRQ_LEVEL_ID; if (irq_list[0] == -1) link->irq.IRQInfo2 = irq_mask; else for (i = 0; i < 4; i++) link->irq.IRQInfo2 |= 1 << irq_list[i]; link->irq.Handler = &tok_interrupt; link->conf.Attributes = CONF_ENABLE_IRQ; link->conf.Vcc = 50; link->conf.IntType = INT_MEMORY_AND_IO; link->conf.Present = PRESENT_OPTION; dev = init_trdev(NULL,0); if (dev == NULL) { ibmtr_detach(link); return NULL; } dev->priv = &info->ti; link->irq.Instance = info->dev = dev; #if (LINUX_VERSION_CODE >= VERSION(2,2,0)) dev->init = &ibmtr_probe; #else trdev_init(dev); dev->name = info->node.dev_name; #endif /* Register with Card Services */ link->next = dev_list; dev_list = link; client_reg.dev_info = &dev_info; client_reg.Attributes = INFO_IO_CLIENT | INFO_CARD_SHARE; client_reg.EventMask = CS_EVENT_CARD_INSERTION | CS_EVENT_CARD_REMOVAL | CS_EVENT_RESET_PHYSICAL | CS_EVENT_CARD_RESET | CS_EVENT_PM_SUSPEND | CS_EVENT_PM_RESUME; client_reg.event_handler = &ibmtr_event; client_reg.Version = 0x0210; client_reg.event_callback_args.client_data = link; ret = CardServices(RegisterClient, &link->handle, &client_reg); if (ret != 0) { cs_error(link->handle, RegisterClient, ret); ibmtr_detach(link); return NULL; } return link; } /* ibmtr_attach */ /*====================================================================== This deletes a driver "instance". The device is de-registered with Card Services. If it has been released, all local data structures are freed. Otherwise, the structures will be freed when the device is released. ======================================================================*/ static void ibmtr_detach(dev_link_t *link) { struct ibmtr_dev_t *info = link->priv; dev_link_t **linkp; struct net_device *dev; DEBUG(0, "ibmtr_detach(0x%p)\n", link); /* Locate device structure */ for (linkp = &dev_list; *linkp; linkp = &(*linkp)->next) if (*linkp == link) break; if (*linkp == NULL) return; dev = info->dev; #if (LINUX_VERSION_CODE < VERSION(2,1,100)) del_timer(&tr_timer); #else { struct tok_info *ti = (struct tok_info *)dev->priv; del_timer(&(ti->tr_timer)); } #endif del_timer(&link->release); if (link->state & DEV_CONFIG) { ibmtr_release((u_long)link); if (link->state & DEV_STALE_CONFIG) { link->state |= DEV_STALE_LINK; return; } } if (link->handle) CardServices(DeregisterClient, link->handle); /* Unlink device structure, free bits */ *linkp = link->next; if (info->dev) { unregister_trdev(info->dev); kfree(info->dev); } kfree(info); } /* ibmtr_detach */ /*====================================================================== ibmtr_config() is scheduled to run after a CARD_INSERTION event is received, to configure the PCMCIA socket, and to make the token-ring device available to the system. ======================================================================*/ #define CS_CHECK(fn, args...) \ while ((last_ret=CardServices(last_fn=(fn), args))!=0) goto cs_failed static void ibmtr_config(dev_link_t *link) { client_handle_t handle = link->handle; ibmtr_dev_t *info = link->priv; struct net_device *dev = info->dev; struct tok_info *ti = dev->priv; tuple_t tuple; cisparse_t parse; win_req_t req; memreq_t mem; int i, last_ret, last_fn; u_char buf[64]; DEBUG(0, "ibmtr_config(0x%p)\n", link); tuple.Attributes = 0; tuple.TupleData = buf; tuple.TupleDataMax = 64; tuple.TupleOffset = 0; tuple.DesiredTuple = CISTPL_CONFIG; CS_CHECK(GetFirstTuple, handle, &tuple); CS_CHECK(GetTupleData, handle, &tuple); CS_CHECK(ParseTuple, handle, &tuple, &parse); link->conf.ConfigBase = parse.config.base; /* Configure card */ link->state |= DEV_CONFIG; link->conf.ConfigIndex = 0x61; /* Determine if this is PRIMARY or ALTERNATE. */ /* Try PRIMARY card at 0xA20-0xA23 */ link->io.BasePort1 = 0xA20; i = CardServices(RequestIO, link->handle, &link->io); if (i == CS_SUCCESS) { memcpy(info->node.dev_name, "tr0\0", 4); } else { /* Couldn't get 0xA20-0xA23. Try ALTERNATE at 0xA24-0xA27. */ link->io.BasePort1 = 0xA24; CS_CHECK(RequestIO, link->handle, &link->io); memcpy(info->node.dev_name, "tr1\0", 4); } dev->base_addr = link->io.BasePort1; CS_CHECK(RequestIRQ, link->handle, &link->irq); dev->irq = link->irq.AssignedIRQ; ti->irq = link->irq.AssignedIRQ; ti->global_int_enable=GLOBAL_INT_ENABLE+((dev->irq==9) ? 2 : dev->irq); /* Allocate the MMIO memory window */ req.Attributes = WIN_DATA_WIDTH_16|WIN_MEMORY_TYPE_CM|WIN_ENABLE; req.Attributes |= WIN_USE_WAIT|(TR_OLD ? WIN_STRICT_ALIGN : 0); req.Base = (TR_OLD ? mmiobase : 0); req.Size = 0x2000; req.AccessSpeed = 250; link->win = (window_handle_t)link->handle; CS_CHECK(RequestWindow, &link->win, &req); mem.CardOffset = (TR_OLD ? req.Base : mmiobase); mem.Page = 0; CS_CHECK(MapMemPage, link->win, &mem); ti->mmio = (u_long)ioremap(req.Base, req.Size); /* Allocate the SRAM memory window */ req.Attributes = WIN_DATA_WIDTH_16|WIN_MEMORY_TYPE_CM|WIN_ENABLE; req.Attributes |= WIN_USE_WAIT|(TR_OLD ? WIN_MAP_BELOW_1MB : 0); req.Base = (TR_OLD ? srambase : 0); req.Size = sramsize * 1024; req.AccessSpeed = 250; info->sram_win_handle = (window_handle_t)link->handle; CS_CHECK(RequestWindow, &info->sram_win_handle, &req); mem.CardOffset = (TR_OLD ? req.Base : srambase); mem.Page = 0; CS_CHECK(MapMemPage, info->sram_win_handle, &mem); ti->sram_base = mem.CardOffset >> 12; #if TR_OLD ti->sram = 0; #else ti->sram_virt = (u_long)ioremap(req.Base, req.Size); #endif CS_CHECK(RequestConfiguration, link->handle, &link->conf); /* Set up the Token-Ring Controller Configuration Register and turn on the card. Check the "Local Area Network Credit Card Adapters Technical Reference" SC30-3585 for this info. */ ibmtr_hw_setup(dev, (TR_OLD ? (u_int)ti->mmio : mmiobase)); i = register_trdev(dev); if (i != 0) { printk(KERN_NOTICE "ibmtr_cs: register_trdev() failed\n"); goto failed; } link->dev = &info->node; link->state &= ~DEV_CONFIG_PENDING; printk(KERN_INFO "%s: port %#3lx, irq %d,", dev->name, dev->base_addr, dev->irq); printk (" mmio %#5lx,", (u_long)ti->mmio); printk (" sram %#5lx,", (u_long)ti->sram_base << 12); printk ("\n" KERN_INFO " hwaddr="); for (i = 0; i < TR_ALEN; i++) printk("%02X", dev->dev_addr[i]); printk("\n"); return; cs_failed: cs_error(link->handle, last_fn, last_ret); failed: ibmtr_release((u_long)link); } /* ibmtr_config */ /*====================================================================== After a card is removed, ibmtr_release() will unregister the net device, and release the PCMCIA configuration. If the device is still open, this will be postponed until it is closed. ======================================================================*/ static void ibmtr_release(u_long arg) { dev_link_t *link = (dev_link_t *)arg; ibmtr_dev_t *info = link->priv; struct net_device *dev = info->dev; DEBUG(0, "ibmtr_release(0x%p)\n", link); if (link->open) { DEBUG(1, "ibmtr_cs: release postponed, '%s' " "still open\n", info->node.dev_name); link->state |= DEV_STALE_CONFIG; return; } CardServices(ReleaseConfiguration, link->handle); CardServices(ReleaseIO, link->handle, &link->io); CardServices(ReleaseIRQ, link->handle, &link->irq); if (link->win) { struct tok_info *ti = dev->priv; iounmap((void *)ti->mmio); CardServices(ReleaseWindow, link->win); CardServices(ReleaseWindow, info->sram_win_handle); } link->state &= ~DEV_CONFIG; } /* ibmtr_release */ /*====================================================================== The card status event handler. Mostly, this schedules other stuff to run after an event is received. A CARD_REMOVAL event also sets some flags to discourage the net drivers from trying to talk to the card any more. ======================================================================*/ static int ibmtr_event(event_t event, int priority, event_callback_args_t *args) { dev_link_t *link = args->client_data; ibmtr_dev_t *info = link->priv; struct net_device *dev = info->dev; DEBUG(1, "ibmtr_event(0x%06x)\n", event); switch (event) { case CS_EVENT_CARD_REMOVAL: link->state &= ~DEV_PRESENT; if (link->state & DEV_CONFIG) { #if !(TR_OLD) /* set flag to bypass normal interrupt code */ ((struct tok_info *)dev->priv)->sram_virt |= 1; #endif netif_device_detach(dev); mod_timer(&link->release, jiffies + HZ/20); } break; case CS_EVENT_CARD_INSERTION: link->state |= DEV_PRESENT; ibmtr_config(link); break; case CS_EVENT_PM_SUSPEND: link->state |= DEV_SUSPEND; /* Fall through... */ case CS_EVENT_RESET_PHYSICAL: if (link->state & DEV_CONFIG) { if (link->open) netif_device_detach(dev); CardServices(ReleaseConfiguration, link->handle); } break; case CS_EVENT_PM_RESUME: link->state &= ~DEV_SUSPEND; /* Fall through... */ case CS_EVENT_CARD_RESET: if (link->state & DEV_CONFIG) { CardServices(RequestConfiguration, link->handle, &link->conf); if (link->open) { (dev->init)(dev); netif_device_attach(dev); } } break; } return 0; } /* ibmtr_event */ /*====================================================================*/ static void ibmtr_hw_setup(struct net_device *dev, u_int mmiobase) { #if (LINUX_VERSION_CODE < VERSION(2,2,0)) struct tok_info *ti = dev->priv; #endif int i; /* Bizarre IBM behavior, there are 16 bits of information we need to set, but the card only allows us to send 4 bits at a time. For each byte sent to base_addr, bits 7-4 tell the card which part of the 16 bits we are setting, bits 3-0 contain the actual information */ /* First nibble provides 4 bits of mmio */ i = (mmiobase >> 16) & 0x0F; outb(i, dev->base_addr); /* Second nibble provides 3 bits of mmio */ i = 0x10 | ((mmiobase >> 12) & 0x0E); outb(i, dev->base_addr); /* Third nibble, hard-coded values */ i = 0x26; outb(i, dev->base_addr); /* Fourth nibble sets shared ram page size */ /* 8 = 00, 16 = 01, 32 = 10, 64 = 11 */ i = (sramsize >> 4) & 0x07; i = ((i == 4) ? 3 : i) << 2; i |= 0x30; if (ringspeed == 16) i |= 2; if (dev->base_addr == 0xA24) i |= 1; outb(i, dev->base_addr); /* 0x40 will release the card for use */ outb(0x40, dev->base_addr); #if (LINUX_VERSION_CODE < VERSION(2,2,0)) /* Get hw address of token ring card */ for (i = 0; i < 12; i++) { /* Tech ref states must do this */ ti->hw_address[i] = readb(ti->mmio + AIP + i*2) & 0x0f; if (i & 1) dev->dev_addr[i>>1] |= ti->hw_address[i]; else dev->dev_addr[i>>1] = ti->hw_address[i]<<4; } /* get Adapter type: 'F' = Adapter/A, 'E' = 16/4 Adapter II,...*/ ti->adapter_type = readb(ti->mmio + AIPADAPTYPE); /* get Data Rate: F=4Mb, E=16Mb, D=4Mb & 16Mb ?? */ ti->data_rate = readb(ti->mmio + AIPDATARATE); /* Get Early Token Release support?: F=no, E=4Mb, D=16Mb, C=4&16Mb */ ti->token_release = readb(ti->mmio + AIPEARLYTOKEN); /* How much shared RAM is on adapter ? */ ti->avail_shared_ram = 64; /* for now */ /* We need to set or do a bunch of work here based on previous results.. */ /* Support paging? What sizes?: F=no, E=16k, D=32k, C=16 & 32k */ ti->shared_ram_paging = readb(ti->mmio + AIPSHRAMPAGE); /* Available DHB 4Mb size: F=2048, E=4096, D=4464 */ ti->dhb_size4mb = readb(ti->mmio + AIP4MBDHB); /* Available DHB 16Mb size: F=2048, E=4096, D=8192, C=16384, B=17960 */ ti->dhb_size16mb = readb(ti->mmio + AIP16MBDHB); /* For now, no shared ram paging */ /* determine how much of total RAM is mapped into PC space */ ti->mapped_ram_size = 1<<(((readb(ti->mmio+ ACA_OFFSET + ACA_RW + RRR_ODD))>>2)+4); ti->page_mask=0; #endif } /*====================================================================== A sweet little function that circumvents the problem with ibmtr.c trying to use more memory than we can allocate for the PCMCIA card. ibmtr.c just assumes that if a card has 64K of shared ram, the entire 64K must be mapped into memory, whereas resources are sometimes a little tight in card services so we fool ibmtr.c into thinking the card has less memory on it than it has. ======================================================================*/ unsigned char pcmcia_reality_check(unsigned char gss) { return (gss < sramsize) ? sramsize : gss; } /*====================================================================*/ static int __init init_ibmtr_cs(void) { servinfo_t serv; DEBUG(0, "%s", version); CardServices(GetCardServicesInfo, &serv); if (serv.Revision != CS_RELEASE_CODE) { printk(KERN_NOTICE "ibmtr_cs: Card Services release " "does not match!\n"); return -1; } register_pccard_driver(&dev_info, &ibmtr_attach, &ibmtr_detach); return 0; } static void __exit exit_ibmtr_cs(void) { DEBUG(0, "ibmtr_cs: unloading\n"); unregister_pccard_driver(&dev_info); while (dev_list != NULL) ibmtr_detach(dev_list); } module_init(init_ibmtr_cs); module_exit(exit_ibmtr_cs);