URL
https://opencores.org/ocsvn/or1k/or1k/trunk
Subversion Repositories or1k
[/] [or1k/] [trunk/] [rc203soc/] [sw/] [uClinux/] [drivers/] [net/] [sk_g16.c] - Rev 1772
Go to most recent revision | Compare with Previous | Blame | View Log
/*- * Copyright (C) 1994 by PJD Weichmann & SWS Bern, Switzerland * * This software may be used and distributed according to the terms * of the GNU Public License, incorporated herein by reference. * * Module : sk_g16.c * * Version : $Revision: 1.1 $ * * Author : Patrick J.D. Weichmann * * Date Created : 94/05/26 * Last Updated : $Date: 2005-12-20 10:17:14 $ * * Description : Schneider & Koch G16 Ethernet Device Driver for * Linux Kernel >= 1.1.22 * Update History : * -*/ static const char *rcsid = "$Id: sk_g16.c,v 1.1 2005-12-20 10:17:14 jcastillo Exp $"; /* * The Schneider & Koch (SK) G16 Network device driver is based * on the 'ni6510' driver from Michael Hipp which can be found at * ftp://sunsite.unc.edu/pub/Linux/system/Network/drivers/nidrivers.tar.gz * * Sources: 1) ni6510.c by M. Hipp * 2) depca.c by D.C. Davies * 3) skeleton.c by D. Becker * 4) Am7990 Local Area Network Controller for Ethernet (LANCE), * AMD, Pub. #05698, June 1989 * * Many Thanks for helping me to get things working to: * * A. Cox (A.Cox@swansea.ac.uk) * M. Hipp (mhipp@student.uni-tuebingen.de) * R. Bolz (Schneider & Koch, Germany) * * See README.sk_g16 for details about limitations and bugs for the * current version. * * To Do: * - Support of SK_G8 and other SK Network Cards. * - Autoset memory mapped RAM. Check for free memory and then * configure RAM correctly. * - SK_close should really set card in to initial state. * - Test if IRQ 3 is not switched off. Use autoirq() functionality. * (as in /drivers/net/skeleton.c) * - Implement Multicast addressing. At minimum something like * in depca.c. * - Redo the statistics part. * - Try to find out if the board is in 8 Bit or 16 Bit slot. * If in 8 Bit mode don't use IRQ 11. * - (Try to make it slightly faster.) */ #include <linux/kernel.h> #include <linux/sched.h> #include <linux/ptrace.h> #include <linux/fcntl.h> #include <linux/ioport.h> #include <linux/interrupt.h> #include <linux/malloc.h> #include <linux/string.h> #include <asm/system.h> #include <asm/io.h> #include <asm/bitops.h> #include <linux/errno.h> #include <linux/netdevice.h> #include <linux/etherdevice.h> #include <linux/skbuff.h> #include "sk_g16.h" /* * Schneider & Koch Card Definitions * ================================= */ #define SK_NAME "SK_G16" /* * SK_G16 Configuration * -------------------- */ /* * Abbreviations * ------------- * * RAM - used for the 16KB shared memory * Boot_ROM, ROM - are used for referencing the BootEPROM * * SK_BOOT_ROM and SK_ADDR are symbolic constants used to configure * the behaviour of the driver and the SK_G16. * * ! See sk_g16.install on how to install and configure the driver ! * * SK_BOOT_ROM defines if the Boot_ROM should be switched off or not. * * SK_ADDR defines the address where the RAM will be mapped into the real * host memory. * valid addresses are from 0xa0000 to 0xfc000 in 16Kbyte steps. */ #define SK_BOOT_ROM 1 /* 1=BootROM on 0=off */ #define SK_ADDR 0xcc000 /* * In POS3 are bits A14-A19 of the address bus. These bits can be set * to choose the RAM address. That's why we only can choose the RAM address * in 16KB steps. */ #define POS_ADDR (rom_addr>>14) /* Do not change this line */ /* * SK_G16 I/O PORT's + IRQ's + Boot_ROM locations * ---------------------------------------------- */ /* * As nearly every card has also SK_G16 a specified I/O Port region and * only a few possible IRQ's. * In the Installation Guide from Schneider & Koch is listed a possible * Interrupt IRQ2. IRQ2 is always IRQ9 in boards with two cascaded interrupt * controllers. So we use in SK_IRQS IRQ9. */ /* Don't touch any of the following #defines. */ #define SK_IO_PORTS { 0x100, 0x180, 0x208, 0x220, 0x288, 0x320, 0x328, 0x390, 0 } #define SK_IRQS { 3, 5, 9, 11, 0 } #define SK_BOOT_ROM_LOCATIONS { 0xc0000, 0xc4000, 0xc8000, 0xcc000, 0xd0000, 0xd4000, 0xd8000, 0xdc000, 0 } #define SK_BOOT_ROM_ID { 0x55, 0xaa, 0x10, 0x50, 0x06, 0x33 } /* * SK_G16 POS REGISTERS * -------------------- */ /* * SK_G16 has a Programmable Option Select (POS) Register. * The POS is composed of 8 separate registers (POS0-7) which * are I/O mapped on an address set by the W1 switch. * */ #define SK_POS_SIZE 8 /* 8 I/O Ports are used by SK_G16 */ #define SK_POS0 ioaddr /* Card-ID Low (R) */ #define SK_POS1 ioaddr+1 /* Card-ID High (R) */ #define SK_POS2 ioaddr+2 /* Card-Enable, Boot-ROM Disable (RW) */ #define SK_POS3 ioaddr+3 /* Base address of RAM */ #define SK_POS4 ioaddr+4 /* IRQ */ /* POS5 - POS7 are unused */ /* * SK_G16 MAC PREFIX * ----------------- */ /* * Scheider & Koch manufacturer code (00:00:a5). * This must be checked, that we are sure it is a SK card. */ #define SK_MAC0 0x00 #define SK_MAC1 0x00 #define SK_MAC2 0x5a /* * SK_G16 ID * --------- */ /* * If POS0,POS1 contain the following ID, then we know * at which I/O Port Address we are. */ #define SK_IDLOW 0xfd #define SK_IDHIGH 0x6a /* * LANCE POS Bit definitions * ------------------------- */ #define SK_ROM_RAM_ON (POS2_CARD) #define SK_ROM_RAM_OFF (POS2_EPROM) #define SK_ROM_ON (inb(SK_POS2) & POS2_CARD) #define SK_ROM_OFF (inb(SK_POS2) | POS2_EPROM) #define SK_RAM_ON (inb(SK_POS2) | POS2_CARD) #define SK_RAM_OFF (inb(SK_POS2) & POS2_EPROM) #define POS2_CARD 0x0001 /* 1 = SK_G16 on 0 = off */ #define POS2_EPROM 0x0002 /* 1 = Boot EPROM off 0 = on */ /* * SK_G16 Memory mapped Registers * ------------------------------ * */ #define SK_IOREG (board->ioreg) /* LANCE data registers. */ #define SK_PORT (board->port) /* Control, Status register */ #define SK_IOCOM (board->iocom) /* I/O Command */ /* * SK_G16 Status/Control Register bits * ----------------------------------- * * (C) Controlreg (S) Statusreg */ /* * Register transfer: 0 = no transfer * 1 = transferring data between LANCE and I/O reg */ #define SK_IORUN 0x20 /* * LANCE interrupt: 0 = LANCE interrupt occurred * 1 = no LANCE interrupt occurred */ #define SK_IRQ 0x10 #define SK_RESET 0x08 /* Reset SK_CARD: 0 = RESET 1 = normal */ #define SK_RW 0x02 /* 0 = write to 1 = read from */ #define SK_ADR 0x01 /* 0 = REG DataPort 1 = RAP Reg addr port */ #define SK_RREG SK_RW /* Transferdirection to read from lance */ #define SK_WREG 0 /* Transferdirection to write to lance */ #define SK_RAP SK_ADR /* Destination Register RAP */ #define SK_RDATA 0 /* Destination Register REG DataPort */ /* * SK_G16 I/O Command * ------------------ */ /* * Any bitcombination sets the internal I/O bit (transfer will start) * when written to I/O Command */ #define SK_DOIO 0x80 /* Do Transfer */ /* * LANCE RAP (Register Address Port). * --------------------------------- */ /* * The LANCE internal registers are selected through the RAP. * The Registers are: * * CSR0 - Status and Control flags * CSR1 - Low order bits of initialize block (bits 15:00) * CSR2 - High order bits of initialize block (bits 07:00, 15:08 are reserved) * CSR3 - Allows redefinition of the Bus Master Interface. * This register must be set to 0x0002, which means BSWAP = 0, * ACON = 1, BCON = 0; * */ #define CSR0 0x00 #define CSR1 0x01 #define CSR2 0x02 #define CSR3 0x03 /* * General Definitions * =================== */ /* * Set the number of Tx and Rx buffers, using Log_2(# buffers). * We have 16KB RAM which can be accessed by the LANCE. In the * memory are not only the buffers but also the ring descriptors and * the initialize block. * Don't change anything unless you really know what you do. */ #define LC_LOG_TX_BUFFERS 1 /* (2 == 2^^1) 2 Transmit buffers */ #define LC_LOG_RX_BUFFERS 3 /* (8 == 2^^3) 8 Receive buffers */ /* Descriptor ring sizes */ #define TMDNUM (1 << (LC_LOG_TX_BUFFERS)) /* 2 Transmit descriptor rings */ #define RMDNUM (1 << (LC_LOG_RX_BUFFERS)) /* 8 Receive Buffers */ /* Define Mask for setting RMD, TMD length in the LANCE init_block */ #define TMDNUMMASK (LC_LOG_TX_BUFFERS << 29) #define RMDNUMMASK (LC_LOG_RX_BUFFERS << 29) /* * Data Buffer size is set to maximum packet length. */ #define PKT_BUF_SZ 1518 /* * The number of low I/O ports used by the ethercard. */ #define ETHERCARD_TOTAL_SIZE SK_POS_SIZE /* * Portreserve is there to mark the Card I/O Port region as used. * Check_region is to check if the region at ioaddr with the size "size" * is free or not. * Snarf_region allocates the I/O Port region. */ #ifndef HAVE_PORTRESERVE #define check_region(ioaddr, size) 0 #define request_region(ioaddr, size,name) do ; while (0) #endif /* * SK_DEBUG * * Here you can choose what level of debugging wanted. * * If SK_DEBUG and SK_DEBUG2 are undefined, then only the * necessary messages will be printed. * * If SK_DEBUG is defined, there will be many debugging prints * which can help to find some mistakes in configuration or even * in the driver code. * * If SK_DEBUG2 is defined, many many messages will be printed * which normally you don't need. I used this to check the interrupt * routine. * * (If you define only SK_DEBUG2 then only the messages for * checking interrupts will be printed!) * * Normal way of live is: * * For the whole thing get going let both symbolic constants * undefined. If you face any problems and you know what's going * on (you know something about the card and you can interpret some * hex LANCE register output) then define SK_DEBUG * */ #undef SK_DEBUG /* debugging */ #undef SK_DEBUG2 /* debugging with more verbose report */ #ifdef SK_DEBUG #define PRINTK(x) printk x #else #define PRINTK(x) /**/ #endif #ifdef SK_DEBUG2 #define PRINTK2(x) printk x #else #define PRINTK2(x) /**/ #endif /* * SK_G16 RAM * * The components are memory mapped and can be set in a region from * 0x00000 through 0xfc000 in 16KB steps. * * The Network components are: dual ported RAM, Prom, I/O Reg, Status-, * Controlregister and I/O Command. * * dual ported RAM: This is the only memory region which the LANCE chip * has access to. From the Lance it is addressed from 0x0000 to * 0x3fbf. The host accesses it normally. * * PROM: The PROM obtains the ETHERNET-MAC-Address. It is realised as a * 8-Bit PROM, this means only the 16 even addresses are used of the * 32 Byte Address region. Access to a odd address results in invalid * data. * * LANCE I/O Reg: The I/O Reg is build of 4 single Registers, Low-Byte Write, * Hi-Byte Write, Low-Byte Read, Hi-Byte Read. * Transfer from or to the LANCE is always in 16Bit so Low and High * registers are always relevant. * * The Data from the Readregister is not the data in the Writeregister!! * * Port: Status- and Controlregister. * Two different registers which share the same address, Status is * read-only, Control is write-only. * * I/O Command: * Any bitcombination written in here starts the transmission between * Host and LANCE. */ typedef struct { unsigned char ram[0x3fc0]; /* 16KB dual ported ram */ unsigned char rom[0x0020]; /* 32Byte PROM containing 6Byte MAC */ unsigned char res1[0x0010]; /* reserved */ unsigned volatile short ioreg;/* LANCE I/O Register */ unsigned volatile char port; /* Statusregister and Controlregister */ unsigned char iocom; /* I/O Command Register */ } SK_RAM; /* struct */ /* * This is the structure for the dual ported ram. We * have exactly 16 320 Bytes. In here there must be: * * - Initialize Block (starting at a word boundary) * - Receive and Transmit Descriptor Rings (quadword boundary) * - Data Buffers (arbitrary boundary) * * This is because LANCE has on SK_G16 only access to the dual ported * RAM and nowhere else. */ struct SK_ram { struct init_block ib; struct tmd tmde[TMDNUM]; struct rmd rmde[RMDNUM]; char tmdbuf[TMDNUM][PKT_BUF_SZ]; char rmdbuf[RMDNUM][PKT_BUF_SZ]; }; /* * Structure where all necessary information is for ring buffer * management and statistics. */ struct priv { struct SK_ram *ram; /* dual ported ram structure */ struct rmd *rmdhead; /* start of receive ring descriptors */ struct tmd *tmdhead; /* start of transmit ring descriptors */ int rmdnum; /* actual used ring descriptor */ int tmdnum; /* actual transmit descriptor for transmitting data */ int tmdlast; /* last sent descriptor used for error handling, etc */ void *rmdbufs[RMDNUM]; /* pointer to the receive buffers */ void *tmdbufs[TMDNUM]; /* pointer to the transmit buffers */ struct enet_statistics stats; /* Device driver statistics */ }; /* global variable declaration */ /* IRQ map used to reserve a IRQ (see SK_open()) */ /* extern void *irq2dev_map[16]; */ /* Declared in <linux/ioport.h> */ /* static variables */ static SK_RAM *board; /* pointer to our memory mapped board components */ /* Macros */ /* Function Prototypes */ /* * Device Driver functions * ----------------------- * See for short explanation of each function its definitions header. */ int SK_init(struct device *dev); static int SK_probe(struct device *dev, short ioaddr); static int SK_open(struct device *dev); static int SK_send_packet(struct sk_buff *skb, struct device *dev); static void SK_interrupt(int irq, void *dev_id, struct pt_regs * regs); static void SK_rxintr(struct device *dev); static void SK_txintr(struct device *dev); static int SK_close(struct device *dev); static struct enet_statistics *SK_get_stats(struct device *dev); unsigned int SK_rom_addr(void); static void set_multicast_list(struct device *dev); /* * LANCE Functions * --------------- */ static int SK_lance_init(struct device *dev, unsigned short mode); void SK_reset_board(void); void SK_set_RAP(int reg_number); int SK_read_reg(int reg_number); int SK_rread_reg(void); void SK_write_reg(int reg_number, int value); /* * Debugging functions * ------------------- */ void SK_print_pos(struct device *dev, char *text); void SK_print_dev(struct device *dev, char *text); void SK_print_ram(struct device *dev); /*- * Function : SK_init * Author : Patrick J.D. Weichmann * Date Created : 94/05/26 * * Description : Check for a SK_G16 network adaptor and initialize it. * This function gets called by dev_init which initializes * all Network devices. * * Parameters : I : struct device *dev - structure preconfigured * from Space.c * Return Value : 0 = Driver Found and initialized * Errors : ENODEV - no device found * ENXIO - not probed * Globals : None * Update History : * YY/MM/DD uid Description -*/ /* * Check for a network adaptor of this type, and return '0' if one exists. * If dev->base_addr == 0, probe all likely locations. * If dev->base_addr == 1, always return failure. * If dev->base_addr == 2, allocate space for the device and return success * (detachable devices only). */ int SK_init(struct device *dev) { int ioaddr = 0; /* I/O port address used for POS regs */ int *port, ports[] = SK_IO_PORTS; /* SK_G16 supported ports */ /* get preconfigured base_addr from dev which is done in Space.c */ int base_addr = dev->base_addr; PRINTK(("%s: %s", SK_NAME, rcsid)); rcsid = NULL; /* We do not want to use this further */ if (base_addr > 0x0ff) /* Check a single specified address */ { /* Check if on specified address is a SK_G16 */ if ( (inb(SK_POS0) == SK_IDLOW) || (inb(SK_POS1) == SK_IDHIGH) ) { return SK_probe(dev, base_addr); } return ENODEV; /* Sorry, but on specified address NO SK_G16 */ } else if (base_addr > 0) /* Don't probe at all */ { return ENXIO; } /* Autoprobe base_addr */ for (port = &ports[0]; *port; port++) { ioaddr = *port; /* we need ioaddr for accessing POS regs */ /* Check if I/O Port region is used by another board */ if (check_region(ioaddr, ETHERCARD_TOTAL_SIZE)) { continue; /* Try next Port address */ } /* Check if at ioaddr is a SK_G16 */ if ( !(inb(SK_POS0) == SK_IDLOW) || !(inb(SK_POS1) == SK_IDHIGH) ) { continue; /* Try next Port address */ } dev->base_addr = ioaddr; /* Set I/O Port Address */ if (SK_probe(dev, ioaddr) == 0) { return 0; /* Card found and initialized */ } } dev->base_addr = base_addr; /* Write back original base_addr */ return ENODEV; /* Failed to find or init driver */ } /* End of SK_init */ /*- * Function : SK_probe * Author : Patrick J.D. Weichmann * Date Created : 94/05/26 * * Description : This function is called by SK_init and * does the main part of initialization. * * Parameters : I : struct device *dev - SK_G16 device structure * I : short ioaddr - I/O Port address where POS is. * Return Value : 0 = Initialization done * Errors : ENODEV - No SK_G16 found * -1 - Configuration problem * Globals : irq2dev_map - Which device uses which IRQ * : board - pointer to SK_RAM * Update History : * YY/MM/DD uid Description * 94/06/30 pwe SK_ADDR now checked and at the correct place -*/ int SK_probe(struct device *dev, short ioaddr) { int i,j; /* Counters */ int sk_addr_flag = 0; /* SK ADDR correct? 1 - no, 0 - yes */ unsigned int rom_addr; /* used to store RAM address used for POS_ADDR */ struct priv *p; /* SK_G16 private structure */ if (SK_ADDR & 0x3fff || SK_ADDR < 0xa0000) { sk_addr_flag = 1; /* * Now here we could use a routine which searches for a free * place in the ram and set SK_ADDR if found. TODO. */ } if (SK_BOOT_ROM) /* Shall we keep Boot_ROM on ? */ { PRINTK(("## %s: SK_BOOT_ROM is set.\n", SK_NAME)); rom_addr = SK_rom_addr(); if (rom_addr == 0) /* No Boot_ROM found */ { if (sk_addr_flag) /* No or Invalid SK_ADDR is defined */ { printk("%s: SK_ADDR %#08x is not valid. Check configuration.\n", dev->name, SK_ADDR); return -1; } rom_addr = SK_ADDR; /* assign predefined address */ PRINTK(("## %s: NO Bootrom found \n", SK_NAME)); outb(SK_ROM_RAM_OFF, SK_POS2); /* Boot_ROM + RAM off */ outb(POS_ADDR, SK_POS3); /* Set RAM address */ outb(SK_RAM_ON, SK_POS2); /* enable RAM */ } else if (rom_addr == SK_ADDR) { printk("%s: RAM + ROM are set to the same address %#08x\n" " Check configuration. Now switching off Boot_ROM\n", SK_NAME, rom_addr); outb(SK_ROM_RAM_OFF, SK_POS2); /* Boot_ROM + RAM off*/ outb(POS_ADDR, SK_POS3); /* Set RAM address */ outb(SK_RAM_ON, SK_POS2); /* enable RAM */ } else { PRINTK(("## %s: Found ROM at %#08x\n", SK_NAME, rom_addr)); PRINTK(("## %s: Keeping Boot_ROM on\n", SK_NAME)); if (sk_addr_flag) /* No or Invalid SK_ADDR is defined */ { printk("%s: SK_ADDR %#08x is not valid. Check configuration.\n", dev->name, SK_ADDR); return -1; } rom_addr = SK_ADDR; outb(SK_ROM_RAM_OFF, SK_POS2); /* Boot_ROM + RAM off */ outb(POS_ADDR, SK_POS3); /* Set RAM address */ outb(SK_ROM_RAM_ON, SK_POS2); /* RAM on, BOOT_ROM on */ } } else /* Don't keep Boot_ROM */ { PRINTK(("## %s: SK_BOOT_ROM is not set.\n", SK_NAME)); if (sk_addr_flag) /* No or Invalid SK_ADDR is defined */ { printk("%s: SK_ADDR %#08x is not valid. Check configuration.\n", dev->name, SK_ADDR); return -1; } rom_addr = SK_rom_addr(); /* Try to find a Boot_ROM */ /* IF we find a Boot_ROM disable it */ outb(SK_ROM_RAM_OFF, SK_POS2); /* Boot_ROM + RAM off */ /* We found a Boot_ROM and it's gone. Set RAM address on * Boot_ROM address. */ if (rom_addr) { printk("%s: We found Boot_ROM at %#08x. Now setting RAM on" "that address\n", SK_NAME, rom_addr); outb(POS_ADDR, SK_POS3); /* Set RAM on Boot_ROM address */ } else /* We did not find a Boot_ROM, use predefined SK_ADDR for ram */ { if (sk_addr_flag) /* No or Invalid SK_ADDR is defined */ { printk("%s: SK_ADDR %#08x is not valid. Check configuration.\n", dev->name, SK_ADDR); return -1; } rom_addr = SK_ADDR; outb(POS_ADDR, SK_POS3); /* Set RAM address */ } outb(SK_RAM_ON, SK_POS2); /* enable RAM */ } #ifdef SK_DEBUG SK_print_pos(dev, "POS registers after ROM, RAM config"); #endif board = (SK_RAM *) rom_addr; /* Read in station address */ for (i = 0, j = 0; i < ETH_ALEN; i++, j+=2) { dev->dev_addr[i] = board->rom[j]; } /* Check for manufacturer code */ if (!(dev->dev_addr[0] == SK_MAC0 && dev->dev_addr[1] == SK_MAC1 && dev->dev_addr[2] == SK_MAC2) ) { PRINTK(("## %s: We did not find SK_G16 at RAM location.\n", SK_NAME)); return ENODEV; /* NO SK_G16 found */ } printk("%s: %s found at %#3x, HW addr: %#04x:%02x:%02x:%02x:%02x:%02x\n", dev->name, "Schneider & Koch Netcard", (unsigned int) dev->base_addr, dev->dev_addr[0], dev->dev_addr[1], dev->dev_addr[2], dev->dev_addr[3], dev->dev_addr[4], dev->dev_addr[5]); /* Allocate memory for private structure */ p = dev->priv = (void *) kmalloc(sizeof(struct priv), GFP_KERNEL); if (p == NULL) { printk("%s: ERROR - no memory for driver data!\n", dev->name); return -ENOMEM; } memset((char *) dev->priv, 0, sizeof(struct priv)); /* clear memory */ /* Grab the I/O Port region */ request_region(ioaddr, ETHERCARD_TOTAL_SIZE,"sk_g16"); /* Assign our Device Driver functions */ dev->open = &SK_open; dev->stop = &SK_close; dev->hard_start_xmit = &SK_send_packet; dev->get_stats = &SK_get_stats; dev->set_multicast_list = &set_multicast_list; /* Set the generic fields of the device structure */ ether_setup(dev); dev->flags &= ~IFF_MULTICAST; /* Initialize private structure */ p->ram = (struct SK_ram *) rom_addr; /* Set dual ported RAM addr */ p->tmdhead = &(p->ram)->tmde[0]; /* Set TMD head */ p->rmdhead = &(p->ram)->rmde[0]; /* Set RMD head */ /* Initialize buffer pointers */ for (i = 0; i < TMDNUM; i++) { p->tmdbufs[i] = &(p->ram)->tmdbuf[i]; } for (i = 0; i < RMDNUM; i++) { p->rmdbufs[i] = &(p->ram)->rmdbuf[i]; } #ifdef SK_DEBUG SK_print_pos(dev, "End of SK_probe"); SK_print_ram(dev); #endif return 0; /* Initialization done */ } /* End of SK_probe() */ /*- * Function : SK_open * Author : Patrick J.D. Weichmann * Date Created : 94/05/26 * * Description : This function is called sometimes after booting * when ifconfig program is run. * * This function requests an IRQ, sets the correct * IRQ in the card. Then calls SK_lance_init() to * init and start the LANCE chip. Then if everything is * ok returns with 0 (OK), which means SK_G16 is now * opened and operational. * * (Called by dev_open() /net/inet/dev.c) * * Parameters : I : struct device *dev - SK_G16 device structure * Return Value : 0 - Device opened * Errors : -EAGAIN - Open failed * Globals : irq2dev_map - which device uses which irq * Side Effects : None * Update History : * YY/MM/DD uid Description -*/ static int SK_open(struct device *dev) { int i = 0; int irqval = 0; int ioaddr = dev->base_addr; int irqtab[] = SK_IRQS; struct priv *p = (struct priv *)dev->priv; PRINTK(("## %s: At beginning of SK_open(). CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0))); if (dev->irq == 0) /* Autoirq */ { i = 0; /* * Check if one IRQ out of SK_IRQS is free and install * interrupt handler. * Most done by request_irq(). * irqval: 0 - interrupt handler installed for IRQ irqtab[i] * -EBUSY - interrupt busy * -EINVAL - irq > 15 or handler = NULL */ do { irqval = request_irq(irqtab[i], &SK_interrupt, 0, "sk_g16", NULL); i++; } while (irqval && irqtab[i]); if (irqval) /* We tried every possible IRQ but no success */ { printk("%s: unable to get an IRQ\n", dev->name); return -EAGAIN; } dev->irq = irqtab[--i]; outb(i<<2, SK_POS4); /* Set Card on probed IRQ */ } else if (dev->irq == 2) /* IRQ2 is always IRQ9 */ { if (request_irq(9, &SK_interrupt, 0, "sk_g16", NULL)) { printk("%s: unable to get IRQ 9\n", dev->name); return -EAGAIN; } dev->irq = 9; /* * Now we set card on IRQ2. * This can be confusing, but remember that IRQ2 on the network * card is in reality IRQ9 */ outb(0x08, SK_POS4); /* set card to IRQ2 */ } else /* Check IRQ as defined in Space.c */ { int i = 0; /* check if IRQ free and valid. Then install Interrupt handler */ if (request_irq(dev->irq, &SK_interrupt, 0, "sk_g16", NULL)) { printk("%s: unable to get selected IRQ\n", dev->name); return -EAGAIN; } switch(dev->irq) { case 3: i = 0; break; case 5: i = 1; break; case 2: i = 2; break; case 11:i = 3; break; default: printk("%s: Preselected IRQ %d is invalid for %s boards", dev->name, dev->irq, SK_NAME); return -EAGAIN; } outb(i<<2, SK_POS4); /* Set IRQ on card */ } irq2dev_map[dev->irq] = dev; /* Set IRQ as used by us */ printk("%s: Schneider & Koch G16 at %#3x, IRQ %d, shared mem at %#08x\n", dev->name, (unsigned int)dev->base_addr, (int) dev->irq, (unsigned int) p->ram); if (!(i = SK_lance_init(dev, 0))) /* LANCE init OK? */ { dev->tbusy = 0; dev->interrupt = 0; dev->start = 1; #ifdef SK_DEBUG /* * This debug block tries to stop LANCE, * reinit LANCE with transmitter and receiver disabled, * then stop again and reinit with NORMAL_MODE */ printk("## %s: After lance init. CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0)); SK_write_reg(CSR0, CSR0_STOP); printk("## %s: LANCE stopped. CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0)); SK_lance_init(dev, MODE_DTX | MODE_DRX); printk("## %s: Reinit with DTX + DRX off. CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0)); SK_write_reg(CSR0, CSR0_STOP); printk("## %s: LANCE stopped. CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0)); SK_lance_init(dev, MODE_NORMAL); printk("## %s: LANCE back to normal mode. CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0)); SK_print_pos(dev, "POS regs before returning OK"); #endif /* SK_DEBUG */ return 0; /* SK_open() is successful */ } else /* LANCE init failed */ { PRINTK(("## %s: LANCE init failed: CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0))); dev->start = 0; /* Device not ready */ return -EAGAIN; } } /* End of SK_open() */ /*- * Function : SK_lance_init * Author : Patrick J.D. Weichmann * Date Created : 94/05/26 * * Description : Reset LANCE chip, fill RMD, TMD structures with * start values and Start LANCE. * * Parameters : I : struct device *dev - SK_G16 device structure * I : int mode - put LANCE into "mode" see data-sheet for * more info. * Return Value : 0 - Init done * Errors : -1 - Init failed * Update History : * YY/MM/DD uid Description -*/ static int SK_lance_init(struct device *dev, unsigned short mode) { int i; struct priv *p = (struct priv *) dev->priv; struct tmd *tmdp; struct rmd *rmdp; PRINTK(("## %s: At beginning of LANCE init. CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0))); /* Reset LANCE */ SK_reset_board(); /* Initialize TMD's with start values */ p->tmdnum = 0; /* First descriptor for transmitting */ p->tmdlast = 0; /* First descriptor for reading stats */ for (i = 0; i < TMDNUM; i++) /* Init all TMD's */ { tmdp = p->tmdhead + i; tmdp->u.buffer = (unsigned long) p->tmdbufs[i]; /* assign buffer */ /* Mark TMD as start and end of packet */ tmdp->u.s.status = TX_STP | TX_ENP; } /* Initialize RMD's with start values */ p->rmdnum = 0; /* First RMD which will be used */ for (i = 0; i < RMDNUM; i++) /* Init all RMD's */ { rmdp = p->rmdhead + i; rmdp->u.buffer = (unsigned long) p->rmdbufs[i]; /* assign buffer */ /* * LANCE must be owner at beginning so that he can fill in * receiving packets, set status and release RMD */ rmdp->u.s.status = RX_OWN; rmdp->blen = -PKT_BUF_SZ; /* Buffer Size in a two's complement */ rmdp->mlen = 0; /* init message length */ } /* Fill LANCE Initialize Block */ (p->ram)->ib.mode = mode; /* Set operation mode */ for (i = 0; i < ETH_ALEN; i++) /* Set physical address */ { (p->ram)->ib.paddr[i] = dev->dev_addr[i]; } for (i = 0; i < 8; i++) /* Set multicast, logical address */ { (p->ram)->ib.laddr[i] = 0; /* We do not use logical addressing */ } /* Set ring descriptor pointers and set number of descriptors */ (p->ram)->ib.rdrp = (int) p->rmdhead | RMDNUMMASK; (p->ram)->ib.tdrp = (int) p->tmdhead | TMDNUMMASK; /* Prepare LANCE Control and Status Registers */ cli(); SK_write_reg(CSR3, CSR3_ACON); /* Ale Control !!!THIS MUST BE SET!!!! */ /* * LANCE addresses the RAM from 0x0000 to 0x3fbf and has no access to * PC Memory locations. * * In structure SK_ram is defined that the first thing in ram * is the initialization block. So his address is for LANCE always * 0x0000 * * CSR1 contains low order bits 15:0 of initialization block address * CSR2 is built of: * 7:0 High order bits 23:16 of initialization block address * 15:8 reserved, must be 0 */ /* Set initialization block address (must be on word boundary) */ SK_write_reg(CSR1, 0); /* Set low order bits 15:0 */ SK_write_reg(CSR2, 0); /* Set high order bits 23:16 */ PRINTK(("## %s: After setting CSR1-3. CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0))); /* Initialize LANCE */ /* * INIT = Initialize, when set, causes the LANCE to begin the * initialization procedure and access the Init Block. */ SK_write_reg(CSR0, CSR0_INIT); sti(); /* Wait until LANCE finished initialization */ SK_set_RAP(CSR0); /* Register Address Pointer to CSR0 */ for (i = 0; (i < 100) && !(SK_rread_reg() & CSR0_IDON); i++) ; /* Wait until init done or go ahead if problems (i>=100) */ if (i >= 100) /* Something is wrong ! */ { printk("%s: can't init am7990, status: %04x " "init_block: %#08x\n", dev->name, (int) SK_read_reg(CSR0), (unsigned int) &(p->ram)->ib); #ifdef SK_DEBUG SK_print_pos(dev, "LANCE INIT failed"); SK_print_dev(dev,"Device Structure:"); #endif return -1; /* LANCE init failed */ } PRINTK(("## %s: init done after %d ticks\n", SK_NAME, i)); /* Clear Initialize done, enable Interrupts, start LANCE */ SK_write_reg(CSR0, CSR0_IDON | CSR0_INEA | CSR0_STRT); PRINTK(("## %s: LANCE started. CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0))); return 0; /* LANCE is up and running */ } /* End of SK_lance_init() */ /*- * Function : SK_send_packet * Author : Patrick J.D. Weichmann * Date Created : 94/05/27 * * Description : Writes an socket buffer into a transmit descriptor * and starts transmission. * * Parameters : I : struct sk_buff *skb - packet to transfer * I : struct device *dev - SK_G16 device structure * Return Value : 0 - OK * 1 - Could not transmit (dev_queue_xmit will queue it) * and try to sent it later * Globals : None * Side Effects : None * Update History : * YY/MM/DD uid Description -*/ static int SK_send_packet(struct sk_buff *skb, struct device *dev) { struct priv *p = (struct priv *) dev->priv; struct tmd *tmdp; if (dev->tbusy) { /* if Transmitter more than 150ms busy -> time_out */ int tickssofar = jiffies - dev->trans_start; if (tickssofar < 15) { return 1; /* We have to try transmit later */ } printk("%s: xmitter timed out, try to restart!\n", dev->name); SK_lance_init(dev, MODE_NORMAL); /* Reinit LANCE */ dev->tbusy = 0; /* Clear Transmitter flag */ dev->trans_start = jiffies; /* Mark Start of transmission */ } /* * If some upper Layer thinks we missed a transmit done interrupt * we are passed NULL. * (dev_queue_xmit net/inet/dev.c */ if (skb == NULL) { /* * Dequeue packets from transmit queue and send them. */ dev_tint(dev); return 0; } PRINTK2(("## %s: SK_send_packet() called, CSR0 %#04x.\n", SK_NAME, SK_read_reg(CSR0))); /* * Block a timer-based transmit from overlapping. * This means check if we are already in. */ if (set_bit(0, (void *) &dev->tbusy) != 0) /* dev->tbusy already set ? */ { printk("%s: Transmitter access conflict.\n", dev->name); } else { /* Evaluate Packet length */ short len = ETH_ZLEN < skb->len ? skb->len : ETH_ZLEN; tmdp = p->tmdhead + p->tmdnum; /* Which descriptor for transmitting */ /* Fill in Transmit Message Descriptor */ /* Copy data into dual ported ram */ memcpy((char *) (tmdp->u.buffer & 0x00ffffff), (char *)skb->data, skb->len); tmdp->blen = -len; /* set length to transmit */ /* * Packet start and end is always set because we use the maximum * packet length as buffer length. * Relinquish ownership to LANCE */ tmdp->u.s.status = TX_OWN | TX_STP | TX_ENP; /* Start Demand Transmission */ SK_write_reg(CSR0, CSR0_TDMD | CSR0_INEA); dev->trans_start = jiffies; /* Mark start of transmission */ /* Set pointer to next transmit buffer */ p->tmdnum++; p->tmdnum &= TMDNUM-1; /* Do we own the next transmit buffer ? */ if (! ((p->tmdhead + p->tmdnum)->u.s.status & TX_OWN) ) { /* * We own next buffer and are ready to transmit, so * clear busy flag */ dev->tbusy = 0; } } dev_kfree_skb(skb, FREE_WRITE); return 0; } /* End of SK_send_packet */ /*- * Function : SK_interrupt * Author : Patrick J.D. Weichmann * Date Created : 94/05/27 * * Description : SK_G16 interrupt handler which checks for LANCE * Errors, handles transmit and receive interrupts * * Parameters : I : int irq, void *dev_id, struct pt_regs * regs - * Return Value : None * Errors : None * Globals : None * Side Effects : None * Update History : * YY/MM/DD uid Description -*/ static void SK_interrupt(int irq, void *dev_id, struct pt_regs * regs) { int csr0; struct device *dev = (struct device *) irq2dev_map[irq]; struct priv *p = (struct priv *) dev->priv; PRINTK2(("## %s: SK_interrupt(). status: %#06x\n", SK_NAME, SK_read_reg(CSR0))); if (dev == NULL) { printk("SK_interrupt(): IRQ %d for unknown device.\n", irq); } if (dev->interrupt) { printk("%s: Re-entering the interrupt handler.\n", dev->name); } csr0 = SK_read_reg(CSR0); /* store register for checking */ dev->interrupt = 1; /* We are handling an interrupt */ /* * Acknowledge all of the current interrupt sources, disable * Interrupts (INEA = 0) */ SK_write_reg(CSR0, csr0 & CSR0_CLRALL); if (csr0 & CSR0_ERR) /* LANCE Error */ { printk("%s: error: %04x\n", dev->name, csr0); if (csr0 & CSR0_MISS) /* No place to store packet ? */ { p->stats.rx_dropped++; } } if (csr0 & CSR0_RINT) /* Receive Interrupt (packet arrived) */ { SK_rxintr(dev); } if (csr0 & CSR0_TINT) /* Transmit interrupt (packet sent) */ { SK_txintr(dev); } SK_write_reg(CSR0, CSR0_INEA); /* Enable Interrupts */ dev->interrupt = 0; /* We are out */ } /* End of SK_interrupt() */ /*- * Function : SK_txintr * Author : Patrick J.D. Weichmann * Date Created : 94/05/27 * * Description : After sending a packet we check status, update * statistics and relinquish ownership of transmit * descriptor ring. * * Parameters : I : struct device *dev - SK_G16 device structure * Return Value : None * Errors : None * Globals : None * Update History : * YY/MM/DD uid Description -*/ static void SK_txintr(struct device *dev) { int tmdstat; struct tmd *tmdp; struct priv *p = (struct priv *) dev->priv; PRINTK2(("## %s: SK_txintr() status: %#06x\n", SK_NAME, SK_read_reg(CSR0))); tmdp = p->tmdhead + p->tmdlast; /* Which buffer we sent at last ? */ /* Set next buffer */ p->tmdlast++; p->tmdlast &= TMDNUM-1; tmdstat = tmdp->u.s.status & 0xff00; /* filter out status bits 15:08 */ /* * We check status of transmitted packet. * see LANCE data-sheet for error explanation */ if (tmdstat & TX_ERR) /* Error occurred */ { printk("%s: TX error: %04x %04x\n", dev->name, (int) tmdstat, (int) tmdp->status2); if (tmdp->status2 & TX_TDR) /* TDR problems? */ { printk("%s: tdr-problems \n", dev->name); } if (tmdp->status2 & TX_RTRY) /* Failed in 16 attempts to transmit ? */ p->stats.tx_aborted_errors++; if (tmdp->status2 & TX_LCOL) /* Late collision ? */ p->stats.tx_window_errors++; if (tmdp->status2 & TX_LCAR) /* Loss of Carrier ? */ p->stats.tx_carrier_errors++; if (tmdp->status2 & TX_UFLO) /* Underflow error ? */ { p->stats.tx_fifo_errors++; /* * If UFLO error occurs it will turn transmitter of. * So we must reinit LANCE */ SK_lance_init(dev, MODE_NORMAL); } p->stats.tx_errors++; tmdp->status2 = 0; /* Clear error flags */ } else if (tmdstat & TX_MORE) /* Collisions occurred ? */ { /* * Here I have a problem. * I only know that there must be one or up to 15 collisions. * That's why TX_MORE is set, because after 16 attempts TX_RTRY * will be set which means couldn't send packet aborted transfer. * * First I did not have this in but then I thought at minimum * we see that something was not ok. * If anyone knows something better than this to handle this * please report it. (see Email addresses in the README file) */ p->stats.collisions++; } else /* Packet sent without any problems */ { p->stats.tx_packets++; } /* * We mark transmitter not busy anymore, because now we have a free * transmit descriptor which can be filled by SK_send_packet and * afterwards sent by the LANCE */ dev->tbusy = 0; /* * mark_bh(NET_BH); * This will cause net_bh() to run after this interrupt handler. * * The function which do handle slow IRQ parts is do_bottom_half() * which runs at normal kernel priority, that means all interrupt are * enabled. (see kernel/irq.c) * * net_bh does something like this: * - check if already in net_bh * - try to transmit something from the send queue * - if something is in the receive queue send it up to higher * levels if it is a known protocol * - try to transmit something from the send queue */ mark_bh(NET_BH); } /* End of SK_txintr() */ /*- * Function : SK_rxintr * Author : Patrick J.D. Weichmann * Date Created : 94/05/27 * * Description : Buffer sent, check for errors, relinquish ownership * of the receive message descriptor. * * Parameters : I : SK_G16 device structure * Return Value : None * Globals : None * Update History : * YY/MM/DD uid Description -*/ static void SK_rxintr(struct device *dev) { struct rmd *rmdp; int rmdstat; struct priv *p = (struct priv *) dev->priv; PRINTK2(("## %s: SK_rxintr(). CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0))); rmdp = p->rmdhead + p->rmdnum; /* As long as we own the next entry, check status and send * it up to higher layer */ while (!( (rmdstat = rmdp->u.s.status) & RX_OWN)) { /* * Start and end of packet must be set, because we use * the ethernet maximum packet length (1518) as buffer size. * * Because our buffers are at maximum OFLO and BUFF errors are * not to be concerned (see Data sheet) */ if ((rmdstat & (RX_STP | RX_ENP)) != (RX_STP | RX_ENP)) { /* Start of a frame > 1518 Bytes ? */ if (rmdstat & RX_STP) { p->stats.rx_errors++; /* bad packet received */ p->stats.rx_length_errors++; /* packet too long */ printk("%s: packet too long\n", dev->name); } /* * All other packets will be ignored until a new frame with * start (RX_STP) set follows. * * What we do is just give descriptor free for new incoming * packets. */ rmdp->u.s.status = RX_OWN; /* Relinquish ownership to LANCE */ } else if (rmdstat & RX_ERR) /* Receive Error ? */ { printk("%s: RX error: %04x\n", dev->name, (int) rmdstat); p->stats.rx_errors++; if (rmdstat & RX_FRAM) p->stats.rx_frame_errors++; if (rmdstat & RX_CRC) p->stats.rx_crc_errors++; rmdp->u.s.status = RX_OWN; /* Relinquish ownership to LANCE */ } else /* We have a packet which can be queued for the upper layers */ { int len = (rmdp->mlen & 0x0fff); /* extract message length from receive buffer */ struct sk_buff *skb; skb = dev_alloc_skb(len+2); /* allocate socket buffer */ if (skb == NULL) /* Could not get mem ? */ { /* * Couldn't allocate sk_buffer so we give descriptor back * to Lance, update statistics and go ahead. */ rmdp->u.s.status = RX_OWN; /* Relinquish ownership to LANCE */ printk("%s: Couldn't allocate sk_buff, deferring packet.\n", dev->name); p->stats.rx_dropped++; break; /* Jump out */ } /* Prepare sk_buff to queue for upper layers */ skb->dev = dev; skb_reserve(skb,2); /* Align IP header on 16 byte boundary */ /* * Copy data out of our receive descriptor into sk_buff. * * (rmdp->u.buffer & 0x00ffffff) -> get address of buffer and * ignore status fields) */ memcpy(skb_put(skb,len), (unsigned char *) (rmdp->u.buffer & 0x00ffffff), len); /* * Notify the upper protocol layers that there is another packet * to handle * * netif_rx() always succeeds. see /net/inet/dev.c for more. */ skb->protocol=eth_type_trans(skb,dev); netif_rx(skb); /* queue packet and mark it for processing */ /* * Packet is queued and marked for processing so we * free our descriptor and update statistics */ rmdp->u.s.status = RX_OWN; p->stats.rx_packets++; p->rmdnum++; p->rmdnum %= RMDNUM; rmdp = p->rmdhead + p->rmdnum; } } } /* End of SK_rxintr() */ /*- * Function : SK_close * Author : Patrick J.D. Weichmann * Date Created : 94/05/26 * * Description : close gets called from dev_close() and should * deinstall the card (free_irq, mem etc). * * Parameters : I : struct device *dev - our device structure * Return Value : 0 - closed device driver * Errors : None * Globals : None * Update History : * YY/MM/DD uid Description -*/ /* I have tried to set BOOT_ROM on and RAM off but then, after a 'ifconfig * down' the system stops. So I don't shut set card to init state. */ static int SK_close(struct device *dev) { PRINTK(("## %s: SK_close(). CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0))); dev->tbusy = 1; /* Transmitter busy */ dev->start = 0; /* Card down */ printk("%s: Shutting %s down CSR0 %#06x\n", dev->name, SK_NAME, (int) SK_read_reg(CSR0)); SK_write_reg(CSR0, CSR0_STOP); /* STOP the LANCE */ free_irq(dev->irq, NULL); /* Free IRQ */ irq2dev_map[dev->irq] = 0; /* Mark IRQ as unused */ return 0; /* always succeed */ } /* End of SK_close() */ /*- * Function : SK_get_stats * Author : Patrick J.D. Weichmann * Date Created : 94/05/26 * * Description : Return current status structure to upper layers. * It is called by sprintf_stats (dev.c). * * Parameters : I : struct device *dev - our device structure * Return Value : struct enet_statistics * - our current statistics * Errors : None * Side Effects : None * Update History : * YY/MM/DD uid Description -*/ static struct enet_statistics *SK_get_stats(struct device *dev) { struct priv *p = (struct priv *) dev->priv; PRINTK(("## %s: SK_get_stats(). CSR0: %#06x\n", SK_NAME, SK_read_reg(CSR0))); return &p->stats; /* Return Device status */ } /* End of SK_get_stats() */ /*- * Function : set_multicast_list * Author : Patrick J.D. Weichmann * Date Created : 94/05/26 * * Description : This function gets called when a program performs * a SIOCSIFFLAGS call. Ifconfig does this if you call * 'ifconfig [-]allmulti' which enables or disables the * Promiscuous mode. * Promiscuous mode is when the Network card accepts all * packets, not only the packets which match our MAC * Address. It is useful for writing a network monitor, * but it is also a security problem. You have to remember * that all information on the net is not encrypted. * * Parameters : I : struct device *dev - SK_G16 device Structure * Return Value : None * Errors : None * Globals : None * Update History : * YY/MM/DD uid Description * 95/10/18 ACox New multicast calling scheme -*/ /* Set or clear the multicast filter for SK_G16. */ static void set_multicast_list(struct device *dev) { if (dev->flags&IFF_PROMISC) { /* Reinitialize LANCE with MODE_PROM set */ SK_lance_init(dev, MODE_PROM); } else if (dev->mc_count==0 && !(dev->flags&IFF_ALLMULTI)) { /* Reinitialize LANCE without MODE_PROM */ SK_lance_init(dev, MODE_NORMAL); } else { /* Multicast with logical address filter on */ /* Reinitialize LANCE without MODE_PROM */ SK_lance_init(dev, MODE_NORMAL); /* Not implemented yet. */ } } /* End of set_multicast_list() */ /*- * Function : SK_rom_addr * Author : Patrick J.D. Weichmann * Date Created : 94/06/01 * * Description : Try to find a Boot_ROM at all possible locations * * Parameters : None * Return Value : Address where Boot_ROM is * Errors : 0 - Did not find Boot_ROM * Globals : None * Update History : * YY/MM/DD uid Description -*/ unsigned int SK_rom_addr(void) { int i,j; int rom_found = 0; unsigned int rom_location[] = SK_BOOT_ROM_LOCATIONS; unsigned char rom_id[] = SK_BOOT_ROM_ID; unsigned char *test_byte; /* Autodetect Boot_ROM */ PRINTK(("## %s: Autodetection of Boot_ROM\n", SK_NAME)); for (i = 0; (rom_location[i] != 0) && (rom_found == 0); i++) { PRINTK(("## Trying ROM location %#08x", rom_location[i])); rom_found = 1; for (j = 0; j < 6; j++) { test_byte = (unsigned char *) (rom_location[i]+j); PRINTK((" %02x ", *test_byte)); if(!(*test_byte == rom_id[j])) { rom_found = 0; } } PRINTK(("\n")); } if (rom_found == 1) { PRINTK(("## %s: Boot_ROM found at %#08x\n", SK_NAME, rom_location[(i-1)])); return (rom_location[--i]); } else { PRINTK(("%s: No Boot_ROM found\n", SK_NAME)); return 0; } } /* End of SK_rom_addr() */ /* LANCE access functions * * ! CSR1-3 can only be accessed when in CSR0 the STOP bit is set ! */ /*- * Function : SK_reset_board * * Author : Patrick J.D. Weichmann * * Date Created : 94/05/25 * * Description : This function resets SK_G16 and all components, but * POS registers are not changed * * Parameters : None * Return Value : None * Errors : None * Globals : SK_RAM *board - SK_RAM structure pointer * * Update History : * YY/MM/DD uid Description -*/ void SK_reset_board(void) { int i; SK_PORT = 0x00; /* Reset active */ for (i = 0; i < 10 ; i++) /* Delay min 5ms */ ; SK_PORT = SK_RESET; /* Set back to normal operation */ } /* End of SK_reset_board() */ /*- * Function : SK_set_RAP * Author : Patrick J.D. Weichmann * Date Created : 94/05/25 * * Description : Set LANCE Register Address Port to register * for later data transfer. * * Parameters : I : reg_number - which CSR to read/write from/to * Return Value : None * Errors : None * Globals : SK_RAM *board - SK_RAM structure pointer * Update History : * YY/MM/DD uid Description -*/ void SK_set_RAP(int reg_number) { SK_IOREG = reg_number; SK_PORT = SK_RESET | SK_RAP | SK_WREG; SK_IOCOM = SK_DOIO; while (SK_PORT & SK_IORUN) ; } /* End of SK_set_RAP() */ /*- * Function : SK_read_reg * Author : Patrick J.D. Weichmann * Date Created : 94/05/25 * * Description : Set RAP and read data from a LANCE CSR register * * Parameters : I : reg_number - which CSR to read from * Return Value : Register contents * Errors : None * Globals : SK_RAM *board - SK_RAM structure pointer * Update History : * YY/MM/DD uid Description -*/ int SK_read_reg(int reg_number) { SK_set_RAP(reg_number); SK_PORT = SK_RESET | SK_RDATA | SK_RREG; SK_IOCOM = SK_DOIO; while (SK_PORT & SK_IORUN) ; return (SK_IOREG); } /* End of SK_read_reg() */ /*- * Function : SK_rread_reg * Author : Patrick J.D. Weichmann * Date Created : 94/05/28 * * Description : Read data from preseted register. * This function requires that you know which * Register is actually set. Be aware that CSR1-3 * can only be accessed when in CSR0 STOP is set. * * Return Value : Register contents * Errors : None * Globals : SK_RAM *board - SK_RAM structure pointer * Update History : * YY/MM/DD uid Description -*/ int SK_rread_reg(void) { SK_PORT = SK_RESET | SK_RDATA | SK_RREG; SK_IOCOM = SK_DOIO; while (SK_PORT & SK_IORUN) ; return (SK_IOREG); } /* End of SK_rread_reg() */ /*- * Function : SK_write_reg * Author : Patrick J.D. Weichmann * Date Created : 94/05/25 * * Description : This function sets the RAP then fills in the * LANCE I/O Reg and starts Transfer to LANCE. * It waits until transfer has ended which is max. 7 ms * and then it returns. * * Parameters : I : reg_number - which CSR to write to * I : value - what value to fill into register * Return Value : None * Errors : None * Globals : SK_RAM *board - SK_RAM structure pointer * Update History : * YY/MM/DD uid Description -*/ void SK_write_reg(int reg_number, int value) { SK_set_RAP(reg_number); SK_IOREG = value; SK_PORT = SK_RESET | SK_RDATA | SK_WREG; SK_IOCOM = SK_DOIO; while (SK_PORT & SK_IORUN) ; } /* End of SK_write_reg */ /* * Debugging functions * ------------------- */ /*- * Function : SK_print_pos * Author : Patrick J.D. Weichmann * Date Created : 94/05/25 * * Description : This function prints out the 4 POS (Programmable * Option Select) Registers. Used mainly to debug operation. * * Parameters : I : struct device *dev - SK_G16 device structure * I : char * - Text which will be printed as title * Return Value : None * Errors : None * Update History : * YY/MM/DD uid Description -*/ void SK_print_pos(struct device *dev, char *text) { int ioaddr = dev->base_addr; unsigned char pos0 = inb(SK_POS0), pos1 = inb(SK_POS1), pos2 = inb(SK_POS2), pos3 = inb(SK_POS3), pos4 = inb(SK_POS4); printk("## %s: %s.\n" "## pos0=%#4x pos1=%#4x pos2=%#04x pos3=%#08x pos4=%#04x\n", SK_NAME, text, pos0, pos1, pos2, (pos3<<14), pos4); } /* End of SK_print_pos() */ /*- * Function : SK_print_dev * Author : Patrick J.D. Weichmann * Date Created : 94/05/25 * * Description : This function simply prints out the important fields * of the device structure. * * Parameters : I : struct device *dev - SK_G16 device structure * I : char *text - Title for printing * Return Value : None * Errors : None * Update History : * YY/MM/DD uid Description -*/ void SK_print_dev(struct device *dev, char *text) { if (dev == NULL) { printk("## %s: Device Structure. %s\n", SK_NAME, text); printk("## DEVICE == NULL\n"); } else { printk("## %s: Device Structure. %s\n", SK_NAME, text); printk("## Device Name: %s Base Address: %#06lx IRQ: %d\n", dev->name, dev->base_addr, dev->irq); printk("## FLAGS: start: %d tbusy: %ld int: %d\n", dev->start, dev->tbusy, dev->interrupt); printk("## next device: %#08x init function: %#08x\n", (int) dev->next, (int) dev->init); } } /* End of SK_print_dev() */ /*- * Function : SK_print_ram * Author : Patrick J.D. Weichmann * Date Created : 94/06/02 * * Description : This function is used to check how are things set up * in the 16KB RAM. Also the pointers to the receive and * transmit descriptor rings and rx and tx buffers locations. * It contains a minor bug in printing, but has no effect to the values * only newlines are not correct. * * Parameters : I : struct device *dev - SK_G16 device structure * Return Value : None * Errors : None * Globals : None * Update History : * YY/MM/DD uid Description -*/ void SK_print_ram(struct device *dev) { int i; struct priv *p = (struct priv *) dev->priv; printk("## %s: RAM Details.\n" "## RAM at %#08x tmdhead: %#08x rmdhead: %#08x initblock: %#08x\n", SK_NAME, (unsigned int) p->ram, (unsigned int) p->tmdhead, (unsigned int) p->rmdhead, (unsigned int) &(p->ram)->ib); printk("## "); for(i = 0; i < TMDNUM; i++) { if (!(i % 3)) /* Every third line do a newline */ { printk("\n## "); } printk("tmdbufs%d: %#08x ", (i+1), (int) p->tmdbufs[i]); } printk("## "); for(i = 0; i < RMDNUM; i++) { if (!(i % 3)) /* Every third line do a newline */ { printk("\n## "); } printk("rmdbufs%d: %#08x ", (i+1), (int) p->rmdbufs[i]); } printk("\n"); } /* End of SK_print_ram() */
Go to most recent revision | Compare with Previous | Blame | View Log