ewrk3.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:58k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /*  ewrk3.c: A DIGITAL EtherWORKS 3 ethernet driver for Linux.
  2.    Written 1994 by David C. Davies.
  3.    Copyright 1994 Digital Equipment Corporation.
  4.    This software may be used and distributed according to the terms of
  5.    the GNU General Public License, incorporated herein by reference.
  6.    This driver is written for the Digital Equipment Corporation series
  7.    of EtherWORKS ethernet cards:
  8.    DE203 Turbo (BNC)
  9.    DE204 Turbo (TP)
  10.    DE205 Turbo (TP BNC)
  11.    The driver has been tested on a relatively busy  network using the DE205
  12.    card and benchmarked with 'ttcp': it transferred 16M  of data at 975kB/s
  13.    (7.8Mb/s) to a DECstation 5000/200.
  14.    The author may be reached at davies@maniac.ultranet.com.
  15.    =========================================================================
  16.    This driver has been written  substantially  from scratch, although  its
  17.    inheritance of style and stack interface from 'depca.c' and in turn from
  18.    Donald Becker's 'lance.c' should be obvious.
  19.    The  DE203/4/5 boards  all  use a new proprietary   chip in place of the
  20.    LANCE chip used in prior cards  (DEPCA, DE100, DE200/1/2, DE210, DE422).
  21.    Use the depca.c driver in the standard distribution  for the LANCE based
  22.    cards from DIGITAL; this driver will not work with them.
  23.    The DE203/4/5 cards have 2  main modes: shared memory  and I/O only. I/O
  24.    only makes  all the card accesses through  I/O transactions and  no high
  25.    (shared)  memory is used. This  mode provides a >48% performance penalty
  26.    and  is deprecated in this  driver,  although allowed to provide initial
  27.    setup when hardstrapped.
  28.    The shared memory mode comes in 3 flavours: 2kB, 32kB and 64kB. There is
  29.    no point in using any mode other than the 2kB  mode - their performances
  30.    are virtually identical, although the driver has  been tested in the 2kB
  31.    and 32kB modes. I would suggest you uncomment the line:
  32.    FORCE_2K_MODE;
  33.    to allow the driver to configure the card as a  2kB card at your current
  34.    base  address, thus leaving more  room to clutter  your  system box with
  35.    other memory hungry boards.
  36.    As many ISA  and EISA cards  can be supported  under this driver  as you
  37.    wish, limited primarily  by the available IRQ lines,  rather than by the
  38.    available I/O addresses  (24 ISA,  16 EISA).   I have  checked different
  39.    configurations of  multiple  depca cards and  ewrk3 cards  and have  not
  40.    found a problem yet (provided you have at least depca.c v0.38) ...
  41.    The board IRQ setting   must be at  an unused  IRQ which is  auto-probed
  42.    using  Donald  Becker's autoprobe  routines.   All  these cards   are at
  43.    {5,10,11,15}.
  44.    No 16MB memory  limitation should exist with this  driver as DMA is  not
  45.    used and the common memory area is in low memory on the network card (my
  46.    current system has 20MB and I've not had problems yet).
  47.    The ability to load  this driver as a  loadable module has been included
  48.    and used  extensively during the  driver development (to save those long
  49.    reboot sequences). To utilise this ability, you have to do 8 things:
  50.    0) have a copy of the loadable modules code installed on your system.
  51.    1) copy ewrk3.c from the  /linux/drivers/net directory to your favourite
  52.    temporary directory.
  53.    2) edit the  source code near  line 1898 to reflect  the I/O address and
  54.    IRQ you're using.
  55.    3) compile  ewrk3.c, but include -DMODULE in  the command line to ensure
  56.    that the correct bits are compiled (see end of source code).
  57.    4) if you are wanting to add a new  card, goto 5. Otherwise, recompile a
  58.    kernel with the ewrk3 configuration turned off and reboot.
  59.    5) insmod ewrk3.o
  60.    [Alan Cox: Changed this so you can insmod ewrk3.o irq=x io=y]
  61.    [Adam Kropelin: now accepts irq=x1,x2 io=y1,y2 for multiple cards]
  62.    6) run the net startup bits for your new eth?? interface manually
  63.    (usually /etc/rc.inet[12] at boot time).
  64.    7) enjoy!
  65.    Note that autoprobing is not allowed in loadable modules - the system is
  66.    already up and running and you're messing with interrupts.
  67.    To unload a module, turn off the associated interface
  68.    'ifconfig eth?? down' then 'rmmod ewrk3'.
  69.    Promiscuous   mode has been  turned  off  in this driver,   but  all the
  70.    multicast  address bits  have been   turned on. This  improved the  send
  71.    performance on a busy network by about 13%.
  72.    Ioctl's have now been provided (primarily because  I wanted to grab some
  73.    packet size statistics). They  are patterned after 'plipconfig.c' from a
  74.    suggestion by Alan Cox.  Using these  ioctls, you can enable promiscuous
  75.    mode, add/delete multicast  addresses, change the hardware address,  get
  76.    packet size distribution statistics and muck around with the control and
  77.    status register. I'll add others if and when the need arises.
  78.    TO DO:
  79.    ------
  80.    Revision History
  81.    ----------------
  82.    Version   Date        Description
  83.    0.1     26-aug-94   Initial writing. ALPHA code release.
  84.    0.11    31-aug-94   Fixed: 2k mode memory base calc.,
  85.    LeMAC version calc.,
  86.    IRQ vector assignments during autoprobe.
  87.    0.12    31-aug-94   Tested working on LeMAC2 (DE20[345]-AC) card.
  88.    Fixed up MCA hash table algorithm.
  89.    0.20     4-sep-94   Added IOCTL functionality.
  90.    0.21    14-sep-94   Added I/O mode.
  91.    0.21axp 15-sep-94   Special version for ALPHA AXP Linux V1.0.
  92.    0.22    16-sep-94   Added more IOCTLs & tidied up.
  93.    0.23    21-sep-94   Added transmit cut through.
  94.    0.24    31-oct-94   Added uid checks in some ioctls.
  95.    0.30     1-nov-94   BETA code release.
  96.    0.31     5-dec-94   Added check/allocate region code.
  97.    0.32    16-jan-95   Broadcast packet fix.
  98.    0.33    10-Feb-95   Fix recognition bug reported by <bkm@star.rl.ac.uk>.
  99.    0.40    27-Dec-95   Rationalise MODULE and autoprobe code.
  100.    Rewrite for portability & updated.
  101.    ALPHA support from <jestabro@amt.tay1.dec.com>
  102.    Added verify_area() calls in ewrk3_ioctl() from
  103.    suggestion by <heiko@colossus.escape.de>.
  104.    Add new multicasting code.
  105.    0.41    20-Jan-96   Fix IRQ set up problem reported by
  106.    <kenneth@bbs.sas.ntu.ac.sg>.
  107.    0.42    22-Apr-96   Fix alloc_device() bug <jari@markkus2.fimr.fi>
  108.    0.43    16-Aug-96   Update alloc_device() to conform to de4x5.c
  109.    0.44    08-Nov-01   use library crc32 functions <Matt_Domsch@dell.com>
  110.    0.45    19-Jul-02   fix unaligned access on alpha <martin@bruli.net>
  111.    0.46    10-Oct-02   Multiple NIC support when module <akropel1@rochester.rr.com>
  112.    0.47    18-Oct-02   ethtool support <akropel1@rochester.rr.com>
  113.    0.48    18-Oct-02   cli/sti removal for 2.5 <vda@port.imtp.ilyichevsk.odessa.ua>
  114.    ioctl locking, signature search cleanup <akropel1@rochester.rr.com>
  115.    =========================================================================
  116.  */
  117. #include <linux/module.h>
  118. #include <linux/kernel.h>
  119. #include <linux/sched.h>
  120. #include <linux/string.h>
  121. #include <linux/errno.h>
  122. #include <linux/ioport.h>
  123. #include <linux/slab.h>
  124. #include <linux/interrupt.h>
  125. #include <linux/delay.h>
  126. #include <linux/init.h>
  127. #include <linux/crc32.h>
  128. #include <asm/bitops.h>
  129. #include <asm/io.h>
  130. #include <asm/dma.h>
  131. #include <asm/uaccess.h>
  132. #include <linux/netdevice.h>
  133. #include <linux/etherdevice.h>
  134. #include <linux/skbuff.h>
  135. #include <linux/ethtool.h>
  136. #include <linux/time.h>
  137. #include <linux/types.h>
  138. #include <linux/unistd.h>
  139. #include <linux/ctype.h>
  140. #include "ewrk3.h"
  141. #define DRV_NAME "ewrk3"
  142. #define DRV_VERSION "0.48"
  143. static char version[] __initdata =
  144. DRV_NAME ":v" DRV_VERSION " 2002/10/18 davies@maniac.ultranet.comn";
  145. #ifdef EWRK3_DEBUG
  146. static int ewrk3_debug = EWRK3_DEBUG;
  147. #else
  148. static int ewrk3_debug = 1;
  149. #endif
  150. #define EWRK3_NDA 0xffe0 /* No Device Address */
  151. #define PROBE_LENGTH    32
  152. #define ETH_PROM_SIG    0xAA5500FFUL
  153. #ifndef EWRK3_SIGNATURE
  154. #define EWRK3_SIGNATURE {"DE203","DE204","DE205",""}
  155. #define EWRK3_STRLEN 8
  156. #endif
  157. #ifndef EWRK3_RAM_BASE_ADDRESSES
  158. #define EWRK3_RAM_BASE_ADDRESSES {0xc0000,0xd0000,0x00000}
  159. #endif
  160. /*
  161.    ** Sets up the I/O area for the autoprobe.
  162.  */
  163. #define EWRK3_IO_BASE 0x100 /* Start address for probe search */
  164. #define EWRK3_IOP_INC 0x20 /* I/O address increment */
  165. #define EWRK3_TOTAL_SIZE 0x20 /* required I/O address length */
  166. /* If you change this, remember to also change MODULE_PARM array limits */
  167. #ifndef MAX_NUM_EWRK3S
  168. #define MAX_NUM_EWRK3S 21
  169. #endif
  170. #ifndef EWRK3_EISA_IO_PORTS
  171. #define EWRK3_EISA_IO_PORTS 0x0c00 /* I/O port base address, slot 0 */
  172. #endif
  173. #ifndef MAX_EISA_SLOTS
  174. #define MAX_EISA_SLOTS 16
  175. #define EISA_SLOT_INC 0x1000
  176. #endif
  177. #define QUEUE_PKT_TIMEOUT (1*HZ) /* Jiffies */
  178. /*
  179.    ** EtherWORKS 3 shared memory window sizes
  180.  */
  181. #define IO_ONLY         0x00
  182. #define SHMEM_2K        0x800
  183. #define SHMEM_32K       0x8000
  184. #define SHMEM_64K       0x10000
  185. /*
  186.    ** EtherWORKS 3 IRQ ENABLE/DISABLE
  187.  */
  188. #define ENABLE_IRQs { 
  189.   icr |= lp->irq_mask;
  190.   outb(icr, EWRK3_ICR);                     /* Enable the IRQs */
  191. }
  192. #define DISABLE_IRQs { 
  193.   icr = inb(EWRK3_ICR);
  194.   icr &= ~lp->irq_mask;
  195.   outb(icr, EWRK3_ICR);                     /* Disable the IRQs */
  196. }
  197. /*
  198.    ** EtherWORKS 3 START/STOP
  199.  */
  200. #define START_EWRK3 { 
  201.   csr = inb(EWRK3_CSR);
  202.   csr &= ~(CSR_TXD|CSR_RXD);
  203.   outb(csr, EWRK3_CSR);                     /* Enable the TX and/or RX */
  204. }
  205. #define STOP_EWRK3 { 
  206.   csr = (CSR_TXD|CSR_RXD);
  207.   outb(csr, EWRK3_CSR);                     /* Disable the TX and/or RX */
  208. }
  209. /*
  210.    ** The EtherWORKS 3 private structure
  211.  */
  212. #define EWRK3_PKT_STAT_SZ 16
  213. #define EWRK3_PKT_BIN_SZ  128 /* Should be >=100 unless you
  214.    increase EWRK3_PKT_STAT_SZ */
  215. struct ewrk3_stats {
  216. u32 bins[EWRK3_PKT_STAT_SZ];
  217. u32 unicast;
  218. u32 multicast;
  219. u32 broadcast;
  220. u32 excessive_collisions;
  221. u32 tx_underruns;
  222. u32 excessive_underruns;
  223. };
  224. struct ewrk3_private {
  225. char adapter_name[80]; /* Name exported to /proc/ioports */
  226. u_long shmem_base; /* Shared memory start address */
  227. u_long shmem_length; /* Shared memory window length */
  228. struct net_device_stats stats; /* Public stats */
  229. struct ewrk3_stats pktStats; /* Private stats counters */
  230. u_char irq_mask; /* Adapter IRQ mask bits */
  231. u_char mPage; /* Maximum 2kB Page number */
  232. u_char lemac; /* Chip rev. level */
  233. u_char hard_strapped; /* Don't allow a full open */
  234. u_char txc; /* Transmit cut through */
  235. u_char *mctbl; /* Pointer to the multicast table */
  236. u_char led_mask; /* Used to reserve LED access for ethtool */
  237. spinlock_t hw_lock;
  238. };
  239. /*
  240.    ** Force the EtherWORKS 3 card to be in 2kB MODE
  241.  */
  242. #define FORCE_2K_MODE { 
  243.   shmem_length = SHMEM_2K;
  244.   outb(((mem_start - 0x80000) >> 11), EWRK3_MBR);
  245. }
  246. /*
  247.    ** Public Functions
  248.  */
  249. static int ewrk3_open(struct net_device *dev);
  250. static int ewrk3_queue_pkt(struct sk_buff *skb, struct net_device *dev);
  251. static void ewrk3_interrupt(int irq, void *dev_id, struct pt_regs *regs);
  252. static int ewrk3_close(struct net_device *dev);
  253. static struct net_device_stats *ewrk3_get_stats(struct net_device *dev);
  254. static void set_multicast_list(struct net_device *dev);
  255. static int ewrk3_ioctl(struct net_device *dev, struct ifreq *rq, int cmd);
  256. /*
  257.    ** Private functions
  258.  */
  259. static int ewrk3_hw_init(struct net_device *dev, u_long iobase);
  260. static void ewrk3_init(struct net_device *dev);
  261. static int ewrk3_rx(struct net_device *dev);
  262. static int ewrk3_tx(struct net_device *dev);
  263. static void ewrk3_timeout(struct net_device *dev);
  264. static void EthwrkSignature(char *name, char *eeprom_image);
  265. static int DevicePresent(u_long iobase);
  266. static void SetMulticastFilter(struct net_device *dev);
  267. static int EISA_signature(char *name, s32 eisa_id);
  268. static int Read_EEPROM(u_long iobase, u_char eaddr);
  269. static int Write_EEPROM(short data, u_long iobase, u_char eaddr);
  270. static u_char get_hw_addr(struct net_device *dev, u_char * eeprom_image, char chipType);
  271. static void isa_probe(struct net_device *dev, u_long iobase);
  272. static void eisa_probe(struct net_device *dev, u_long iobase);
  273. static struct net_device *alloc_device(struct net_device *dev, u_long iobase);
  274. static int ewrk3_dev_index(char *s);
  275. static struct net_device *insert_device(struct net_device *dev, u_long iobase, int (*init) (struct net_device *));
  276. #ifdef MODULE
  277. int init_module(void);
  278. void cleanup_module(void);
  279. static int autoprobed = 1, loading_module = 1;
  280. #else
  281. static u_char irq[] =
  282. {5, 0, 10, 3, 11, 9, 15, 12};
  283. static int autoprobed, loading_module;
  284. #endif /* MODULE */
  285. static char name[EWRK3_STRLEN + 1];
  286. static int num_ewrk3s, num_eth;
  287. /*
  288.    ** Miscellaneous defines...
  289.  */
  290. #define INIT_EWRK3 {
  291.     outb(EEPROM_INIT, EWRK3_IOPR);
  292.     mdelay(1);
  293. }
  294. int __init ewrk3_probe(struct net_device *dev)
  295. {
  296. int tmp = num_ewrk3s, status = -ENODEV;
  297. u_long iobase = dev->base_addr;
  298. SET_MODULE_OWNER(dev);
  299. if ((iobase == 0) && loading_module) {
  300. printk("Autoprobing is not supported when loading a module based driver.n");
  301. status = -EIO;
  302. } else { /* First probe for the Ethernet */
  303. /* Address PROM pattern */
  304. isa_probe(dev, iobase);
  305. eisa_probe(dev, iobase);
  306. if ((tmp == num_ewrk3s) && (iobase != 0) && loading_module) {
  307. printk("%s: ewrk3_probe() cannot find device at 0x%04lx.n", dev->name,
  308.        iobase);
  309. }
  310. /*
  311.    ** Walk the device list to check that at least one device
  312.    ** initialised OK
  313.  */
  314. for (; (dev->priv == NULL) && (dev->next != NULL); dev = dev->next);
  315. if (dev->priv)
  316. status = 0;
  317. if (iobase == 0)
  318. autoprobed = 1;
  319. }
  320. return status;
  321. }
  322. static int __init 
  323. ewrk3_hw_init(struct net_device *dev, u_long iobase)
  324. {
  325. struct ewrk3_private *lp;
  326. int i, status = 0;
  327. u_long mem_start, shmem_length;
  328. u_char cr, cmr, icr, nicsr, lemac, hard_strapped = 0;
  329. u_char eeprom_image[EEPROM_MAX], chksum, eisa_cr = 0;
  330. /*
  331.    ** Stop the EWRK3. Enable the DBR ROM. Disable interrupts and remote boot.
  332.    ** This also disables the EISA_ENABLE bit in the EISA Control Register.
  333.  */
  334. if (iobase > 0x400)
  335. eisa_cr = inb(EISA_CR);
  336. INIT_EWRK3;
  337. nicsr = inb(EWRK3_CSR);
  338. icr = inb(EWRK3_ICR);
  339. icr &= 0x70;
  340. outb(icr, EWRK3_ICR); /* Disable all the IRQs */
  341. if (nicsr == (CSR_TXD | CSR_RXD)) {
  342. /* Check that the EEPROM is alive and well and not living on Pluto... */
  343. for (chksum = 0, i = 0; i < EEPROM_MAX; i += 2) {
  344. union {
  345. short val;
  346. char c[2];
  347. } tmp;
  348. tmp.val = (short) Read_EEPROM(iobase, (i >> 1));
  349. eeprom_image[i] = tmp.c[0];
  350. eeprom_image[i + 1] = tmp.c[1];
  351. chksum += eeprom_image[i] + eeprom_image[i + 1];
  352. }
  353. if (chksum != 0) { /* Bad EEPROM Data! */
  354. printk("%s: Device has a bad on-board EEPROM.n", dev->name);
  355. status = -ENXIO;
  356. } else {
  357. EthwrkSignature(name, eeprom_image);
  358. if (*name != '') { /* found a EWRK3 device */
  359. dev->base_addr = iobase;
  360. if (iobase > 0x400) {
  361. outb(eisa_cr, EISA_CR); /* Rewrite the EISA CR */
  362. }
  363. lemac = eeprom_image[EEPROM_CHIPVER];
  364. cmr = inb(EWRK3_CMR);
  365. if (((lemac == LeMAC) && ((cmr & CMR_NO_EEPROM) != CMR_NO_EEPROM)) ||
  366. ((lemac == LeMAC2) && !(cmr & CMR_HS))) {
  367. printk("%s: %s at %#4lx", dev->name, name, iobase);
  368. hard_strapped = 1;
  369. } else if ((iobase & 0x0fff) == EWRK3_EISA_IO_PORTS) {
  370. /* EISA slot address */
  371. printk("%s: %s at %#4lx (EISA slot %ld)",
  372.        dev->name, name, iobase, ((iobase >> 12) & 0x0f));
  373. } else { /* ISA port address */
  374. printk("%s: %s at %#4lx", dev->name, name, iobase);
  375. }
  376. if (!status) {
  377. printk(", h/w address ");
  378. if (lemac != LeMAC2)
  379. DevicePresent(iobase); /* need after EWRK3_INIT */
  380. status = get_hw_addr(dev, eeprom_image, lemac);
  381. for (i = 0; i < ETH_ALEN - 1; i++) { /* get the ethernet addr. */
  382. printk("%2.2x:", dev->dev_addr[i]);
  383. }
  384. printk("%2.2x,n", dev->dev_addr[i]);
  385. if (status) {
  386. printk("      which has an EEPROM CRC error.n");
  387. status = -ENXIO;
  388. } else {
  389. if (lemac == LeMAC2) { /* Special LeMAC2 CMR things */
  390. cmr &= ~(CMR_RA | CMR_WB | CMR_LINK | CMR_POLARITY | CMR_0WS);
  391. if (eeprom_image[EEPROM_MISC0] & READ_AHEAD)
  392. cmr |= CMR_RA;
  393. if (eeprom_image[EEPROM_MISC0] & WRITE_BEHIND)
  394. cmr |= CMR_WB;
  395. if (eeprom_image[EEPROM_NETMAN0] & NETMAN_POL)
  396. cmr |= CMR_POLARITY;
  397. if (eeprom_image[EEPROM_NETMAN0] & NETMAN_LINK)
  398. cmr |= CMR_LINK;
  399. if (eeprom_image[EEPROM_MISC0] & _0WS_ENA)
  400. cmr |= CMR_0WS;
  401. }
  402. if (eeprom_image[EEPROM_SETUP] & SETUP_DRAM)
  403. cmr |= CMR_DRAM;
  404. outb(cmr, EWRK3_CMR);
  405. cr = inb(EWRK3_CR); /* Set up the Control Register */
  406. cr |= eeprom_image[EEPROM_SETUP] & SETUP_APD;
  407. if (cr & SETUP_APD)
  408. cr |= eeprom_image[EEPROM_SETUP] & SETUP_PS;
  409. cr |= eeprom_image[EEPROM_MISC0] & FAST_BUS;
  410. cr |= eeprom_image[EEPROM_MISC0] & ENA_16;
  411. outb(cr, EWRK3_CR);
  412. /*
  413.    ** Determine the base address and window length for the EWRK3
  414.    ** RAM from the memory base register.
  415.  */
  416. mem_start = inb(EWRK3_MBR);
  417. shmem_length = 0;
  418. if (mem_start != 0) {
  419. if ((mem_start >= 0x0a) && (mem_start <= 0x0f)) {
  420. mem_start *= SHMEM_64K;
  421. shmem_length = SHMEM_64K;
  422. } else if ((mem_start >= 0x14) && (mem_start <= 0x1f)) {
  423. mem_start *= SHMEM_32K;
  424. shmem_length = SHMEM_32K;
  425. } else if ((mem_start >= 0x40) && (mem_start <= 0xff)) {
  426. mem_start = mem_start * SHMEM_2K + 0x80000;
  427. shmem_length = SHMEM_2K;
  428. } else {
  429. status = -ENXIO;
  430. }
  431. }
  432. /*
  433.    ** See the top of this source code for comments about
  434.    ** uncommenting this line.
  435.  */
  436. /*          FORCE_2K_MODE; */
  437. if (!status) {
  438. if (hard_strapped) {
  439. printk("      is hard strapped.n");
  440. } else if (mem_start) {
  441. printk("      has a %dk RAM window", (int) (shmem_length >> 10));
  442. printk(" at 0x%.5lx", mem_start);
  443. } else {
  444. printk("      is in I/O only mode");
  445. }
  446. /* private area & initialise */
  447. dev->priv = (void *) kmalloc(sizeof(struct ewrk3_private),
  448.      GFP_KERNEL);
  449. if (dev->priv == NULL) {
  450. return -ENOMEM;
  451. }
  452. lp = (struct ewrk3_private *) dev->priv;
  453. memset(dev->priv, 0, sizeof(struct ewrk3_private));
  454. lp->shmem_base = mem_start;
  455. lp->shmem_length = shmem_length;
  456. lp->lemac = lemac;
  457. lp->hard_strapped = hard_strapped;
  458. lp->led_mask = CR_LED;
  459. spin_lock_init(&lp->hw_lock);
  460. lp->mPage = 64;
  461. if (cmr & CMR_DRAM)
  462. lp->mPage <<= 1; /* 2 DRAMS on module */
  463. sprintf(lp->adapter_name, "%s (%s)", name, dev->name);
  464. request_region(iobase, EWRK3_TOTAL_SIZE, lp->adapter_name);
  465. lp->irq_mask = ICR_TNEM | ICR_TXDM | ICR_RNEM | ICR_RXDM;
  466. if (!hard_strapped) {
  467. /*
  468.    ** Enable EWRK3 board interrupts for autoprobing
  469.  */
  470. icr |= ICR_IE; /* Enable interrupts */
  471. outb(icr, EWRK3_ICR);
  472. /* The DMA channel may be passed in on this parameter. */
  473. dev->dma = 0;
  474. /* To auto-IRQ we enable the initialization-done and DMA err,
  475.    interrupts. For now we will always get a DMA error. */
  476. if (dev->irq < 2) {
  477. #ifndef MODULE
  478. u_char irqnum;
  479. unsigned long irq_mask, delay;
  480. irq_mask = probe_irq_on();
  481. /*
  482.    ** Trigger a TNE interrupt.
  483.  */
  484. icr |= ICR_TNEM;
  485. outb(1, EWRK3_TDQ); /* Write to the TX done queue */
  486. outb(icr, EWRK3_ICR); /* Unmask the TXD interrupt */
  487. irqnum = irq[((icr & IRQ_SEL) >> 4)];
  488. delay = jiffies + HZ/50;
  489. while (time_before(jiffies, delay)) ;
  490. dev->irq = probe_irq_off(irq_mask);
  491. if ((dev->irq) && (irqnum == dev->irq)) {
  492. printk(" and uses IRQ%d.n", dev->irq);
  493. } else {
  494. if (!dev->irq) {
  495. printk(" and failed to detect IRQ line.n");
  496. } else if ((irqnum == 1) && (lemac == LeMAC2)) {
  497. printk(" and an illegal IRQ line detected.n");
  498. } else {
  499. printk(", but incorrect IRQ line detected.n");
  500. }
  501. status = -ENXIO;
  502. }
  503. DISABLE_IRQs; /* Mask all interrupts */
  504. #endif /* MODULE */
  505. } else {
  506. printk(" and requires IRQ%d.n", dev->irq);
  507. }
  508. }
  509. if (status)
  510. release_region(iobase, EWRK3_TOTAL_SIZE);
  511. } else {
  512. status = -ENXIO;
  513. }
  514. }
  515. }
  516. } else {
  517. status = -ENXIO;
  518. }
  519. }
  520. if (!status) {
  521. if (ewrk3_debug > 1) {
  522. printk(version);
  523. }
  524. /* The EWRK3-specific entries in the device structure. */
  525. dev->open = ewrk3_open;
  526. dev->hard_start_xmit = ewrk3_queue_pkt;
  527. dev->stop = ewrk3_close;
  528. dev->get_stats = ewrk3_get_stats;
  529. dev->set_multicast_list = set_multicast_list;
  530. dev->do_ioctl = ewrk3_ioctl;
  531. dev->tx_timeout = ewrk3_timeout;
  532. dev->watchdog_timeo = QUEUE_PKT_TIMEOUT;
  533. dev->mem_start = 0;
  534. /* Fill in the generic field of the device structure. */
  535. ether_setup(dev);
  536. }
  537. } else {
  538. status = -ENXIO;
  539. }
  540. return status;
  541. }
  542. static int ewrk3_open(struct net_device *dev)
  543. {
  544. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  545. u_long iobase = dev->base_addr;
  546. int i, status = 0;
  547. u_char icr, csr;
  548. /*
  549.    ** Stop the TX and RX...
  550.  */
  551. STOP_EWRK3;
  552. if (!lp->hard_strapped) {
  553. if (request_irq(dev->irq, (void *) ewrk3_interrupt, 0, "ewrk3", dev)) {
  554. printk("ewrk3_open(): Requested IRQ%d is busyn", dev->irq);
  555. status = -EAGAIN;
  556. } else {
  557. /*
  558.    ** Re-initialize the EWRK3...
  559.  */
  560. ewrk3_init(dev);
  561. if (ewrk3_debug > 1) {
  562. printk("%s: ewrk3 open with irq %dn", dev->name, dev->irq);
  563. printk("  physical address: ");
  564. for (i = 0; i < 5; i++) {
  565. printk("%2.2x:", (u_char) dev->dev_addr[i]);
  566. }
  567. printk("%2.2xn", (u_char) dev->dev_addr[i]);
  568. if (lp->shmem_length == 0) {
  569. printk("  no shared memory, I/O only moden");
  570. } else {
  571. printk("  start of shared memory: 0x%08lxn", lp->shmem_base);
  572. printk("  window length: 0x%04lxn", lp->shmem_length);
  573. }
  574. printk("  # of DRAMS: %dn", ((inb(EWRK3_CMR) & 0x02) ? 2 : 1));
  575. printk("  csr:  0x%02xn", inb(EWRK3_CSR));
  576. printk("  cr:   0x%02xn", inb(EWRK3_CR));
  577. printk("  icr:  0x%02xn", inb(EWRK3_ICR));
  578. printk("  cmr:  0x%02xn", inb(EWRK3_CMR));
  579. printk("  fmqc: 0x%02xn", inb(EWRK3_FMQC));
  580. }
  581. netif_start_queue(dev);
  582. /*
  583.    ** Unmask EWRK3 board interrupts
  584.  */
  585. icr = inb(EWRK3_ICR);
  586. ENABLE_IRQs;
  587. }
  588. } else {
  589. printk(KERN_ERR "%s: ewrk3 available for hard strapped set up only.n", dev->name);
  590. printk(KERN_ERR "      Run the 'ewrk3setup' utility or remove the hard straps.n");
  591. return -EINVAL;
  592. }
  593. return status;
  594. }
  595. /*
  596.    ** Initialize the EtherWORKS 3 operating conditions
  597.  */
  598. static void ewrk3_init(struct net_device *dev)
  599. {
  600. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  601. u_char csr, page;
  602. u_long iobase = dev->base_addr;
  603. /*
  604.    ** Enable any multicasts
  605.  */
  606. set_multicast_list(dev);
  607. /*
  608.    ** Clean out any remaining entries in all the queues here
  609.  */
  610. while (inb(EWRK3_TQ));
  611. while (inb(EWRK3_TDQ));
  612. while (inb(EWRK3_RQ));
  613. while (inb(EWRK3_FMQ));
  614. /*
  615.    ** Write a clean free memory queue
  616.  */
  617. for (page = 1; page < lp->mPage; page++) { /* Write the free page numbers */
  618. outb(page, EWRK3_FMQ); /* to the Free Memory Queue */
  619. }
  620. START_EWRK3; /* Enable the TX and/or RX */
  621. }
  622. /*
  623.  *  Transmit timeout
  624.  */
  625.  
  626. static void ewrk3_timeout(struct net_device *dev)
  627. {
  628. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  629. u_char icr, csr;
  630. u_long iobase = dev->base_addr;
  631. if (!lp->hard_strapped) 
  632. {
  633. printk(KERN_WARNING"%s: transmit timed/locked out, status %04x, resetting.n",
  634.        dev->name, inb(EWRK3_CSR));
  635. /*
  636.    ** Mask all board interrupts
  637.  */
  638. DISABLE_IRQs;
  639. /*
  640.    ** Stop the TX and RX...
  641.  */
  642. STOP_EWRK3;
  643. ewrk3_init(dev);
  644. /*
  645.    ** Unmask EWRK3 board interrupts
  646.  */
  647. ENABLE_IRQs;
  648. dev->trans_start = jiffies;
  649. netif_wake_queue(dev);
  650. }
  651. }
  652. /*
  653.    ** Writes a socket buffer to the free page queue
  654.  */
  655. static int ewrk3_queue_pkt (struct sk_buff *skb, struct net_device *dev)
  656. {
  657. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  658. u_long iobase = dev->base_addr;
  659. u_long buf = 0;
  660. u_char icr;
  661. u_char page;
  662. spin_lock_irq (&lp->hw_lock);
  663. DISABLE_IRQs;
  664. /* if no resources available, exit, request packet be queued */
  665. if (inb (EWRK3_FMQC) == 0) {
  666. printk (KERN_WARNING "%s: ewrk3_queue_pkt(): No free resources...n",
  667. dev->name);
  668. printk (KERN_WARNING "%s: ewrk3_queue_pkt(): CSR: %02x ICR: %02x FMQC: %02xn",
  669. dev->name, inb (EWRK3_CSR), inb (EWRK3_ICR),
  670. inb (EWRK3_FMQC));
  671. goto err_out;
  672. }
  673. /*
  674.  ** Get a free page from the FMQ
  675.  */
  676. if ((page = inb (EWRK3_FMQ)) >= lp->mPage) {
  677. printk ("ewrk3_queue_pkt(): Invalid free memory page (%d).n",
  678.      (u_char) page);
  679. goto err_out;
  680. }
  681. /*
  682.  ** Set up shared memory window and pointer into the window
  683.  */
  684. if (lp->shmem_length == IO_ONLY) {
  685. outb (page, EWRK3_IOPR);
  686. } else if (lp->shmem_length == SHMEM_2K) {
  687. buf = lp->shmem_base;
  688. outb (page, EWRK3_MPR);
  689. } else if (lp->shmem_length == SHMEM_32K) {
  690. buf = ((((short) page << 11) & 0x7800) + lp->shmem_base);
  691. outb ((page >> 4), EWRK3_MPR);
  692. } else if (lp->shmem_length == SHMEM_64K) {
  693. buf = ((((short) page << 11) & 0xf800) + lp->shmem_base);
  694. outb ((page >> 5), EWRK3_MPR);
  695. } else {
  696. printk (KERN_ERR "%s: Oops - your private data area is hosed!n",
  697. dev->name);
  698. BUG ();
  699. }
  700. /*
  701.  ** Set up the buffer control structures and copy the data from
  702.  ** the socket buffer to the shared memory .
  703.  */
  704. if (lp->shmem_length == IO_ONLY) {
  705. int i;
  706. u_char *p = skb->data;
  707. outb ((char) (TCR_QMODE | TCR_PAD | TCR_IFC), EWRK3_DATA);
  708. outb ((char) (skb->len & 0xff), EWRK3_DATA);
  709. outb ((char) ((skb->len >> 8) & 0xff), EWRK3_DATA);
  710. outb ((char) 0x04, EWRK3_DATA);
  711. for (i = 0; i < skb->len; i++) {
  712. outb (*p++, EWRK3_DATA);
  713. }
  714. outb (page, EWRK3_TQ); /* Start sending pkt */
  715. } else {
  716. isa_writeb ((char) (TCR_QMODE | TCR_PAD | TCR_IFC), buf); /* ctrl byte */
  717. buf += 1;
  718. isa_writeb ((char) (skb->len & 0xff), buf); /* length (16 bit xfer) */
  719. buf += 1;
  720. if (lp->txc) {
  721. isa_writeb ((char)
  722.     (((skb->len >> 8) & 0xff) | XCT), buf);
  723. buf += 1;
  724. isa_writeb (0x04, buf); /* index byte */
  725. buf += 1;
  726. isa_writeb (0x00, (buf + skb->len)); /* Write the XCT flag */
  727. isa_memcpy_toio (buf, skb->data, PRELOAD); /* Write PRELOAD bytes */
  728. outb (page, EWRK3_TQ); /* Start sending pkt */
  729. isa_memcpy_toio (buf + PRELOAD,
  730.  skb->data + PRELOAD,
  731.  skb->len - PRELOAD);
  732. isa_writeb (0xff, (buf + skb->len)); /* Write the XCT flag */
  733. } else {
  734. isa_writeb ((char)
  735.     ((skb->len >> 8) & 0xff), buf);
  736. buf += 1;
  737. isa_writeb (0x04, buf); /* index byte */
  738. buf += 1;
  739. isa_memcpy_toio (buf, skb->data, skb->len); /* Write data bytes */
  740. outb (page, EWRK3_TQ); /* Start sending pkt */
  741. }
  742. }
  743. ENABLE_IRQs;
  744. spin_unlock_irq (&lp->hw_lock);
  745. lp->stats.tx_bytes += skb->len;
  746. dev->trans_start = jiffies;
  747. dev_kfree_skb (skb);
  748. /* Check for free resources: stop Tx queue if there are none */
  749. if (inb (EWRK3_FMQC) == 0)
  750. netif_stop_queue (dev);
  751. return 0;
  752. err_out:
  753. ENABLE_IRQs;
  754. spin_unlock_irq (&lp->hw_lock);
  755. return 1;
  756. }
  757. /*
  758.    ** The EWRK3 interrupt handler.
  759.  */
  760. static void ewrk3_interrupt(int irq, void *dev_id, struct pt_regs *regs)
  761. {
  762. struct net_device *dev = dev_id;
  763. struct ewrk3_private *lp;
  764. u_long iobase;
  765. u_char icr, cr, csr;
  766. lp = (struct ewrk3_private *) dev->priv;
  767. iobase = dev->base_addr;
  768. /* get the interrupt information */
  769. csr = inb(EWRK3_CSR);
  770. /*
  771.  ** Mask the EWRK3 board interrupts and turn on the LED
  772.  */
  773. spin_lock(&lp->hw_lock);
  774. DISABLE_IRQs;
  775. cr = inb(EWRK3_CR);
  776. cr |= lp->led_mask;
  777. outb(cr, EWRK3_CR);
  778. if (csr & CSR_RNE) /* Rx interrupt (packet[s] arrived) */
  779. ewrk3_rx(dev);
  780. if (csr & CSR_TNE) /* Tx interrupt (packet sent) */
  781. ewrk3_tx(dev);
  782. /*
  783.  ** Now deal with the TX/RX disable flags. These are set when there
  784.  ** are no more resources. If resources free up then enable these
  785.  ** interrupts, otherwise mask them - failure to do this will result
  786.  ** in the system hanging in an interrupt loop.
  787.  */
  788. if (inb(EWRK3_FMQC)) { /* any resources available? */
  789. lp->irq_mask |= ICR_TXDM | ICR_RXDM; /* enable the interrupt source */
  790. csr &= ~(CSR_TXD | CSR_RXD); /* ensure restart of a stalled TX or RX */
  791. outb(csr, EWRK3_CSR);
  792. netif_wake_queue(dev);
  793. } else {
  794. lp->irq_mask &= ~(ICR_TXDM | ICR_RXDM); /* disable the interrupt source */
  795. }
  796. /* Unmask the EWRK3 board interrupts and turn off the LED */
  797. cr &= ~(lp->led_mask);
  798. outb(cr, EWRK3_CR);
  799. ENABLE_IRQs;
  800. spin_unlock(&lp->hw_lock);
  801. }
  802. /* Called with lp->hw_lock held */
  803. static int ewrk3_rx(struct net_device *dev)
  804. {
  805. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  806. u_long iobase = dev->base_addr;
  807. int i, status = 0;
  808. u_char page;
  809. u_long buf = 0;
  810. while (inb(EWRK3_RQC) && !status) { /* Whilst there's incoming data */
  811. if ((page = inb(EWRK3_RQ)) < lp->mPage) { /* Get next entry's buffer page */
  812. /*
  813.    ** Set up shared memory window and pointer into the window
  814.  */
  815. if (lp->shmem_length == IO_ONLY) {
  816. outb(page, EWRK3_IOPR);
  817. } else if (lp->shmem_length == SHMEM_2K) {
  818. buf = lp->shmem_base;
  819. outb(page, EWRK3_MPR);
  820. } else if (lp->shmem_length == SHMEM_32K) {
  821. buf = ((((short) page << 11) & 0x7800) + lp->shmem_base);
  822. outb((page >> 4), EWRK3_MPR);
  823. } else if (lp->shmem_length == SHMEM_64K) {
  824. buf = ((((short) page << 11) & 0xf800) + lp->shmem_base);
  825. outb((page >> 5), EWRK3_MPR);
  826. } else {
  827. status = -1;
  828. printk("%s: Oops - your private data area is hosed!n", dev->name);
  829. }
  830. if (!status) {
  831. char rx_status;
  832. int pkt_len;
  833. if (lp->shmem_length == IO_ONLY) {
  834. rx_status = inb(EWRK3_DATA);
  835. pkt_len = inb(EWRK3_DATA);
  836. pkt_len |= ((u_short) inb(EWRK3_DATA) << 8);
  837. } else {
  838. rx_status = isa_readb(buf);
  839. buf += 1;
  840. pkt_len = isa_readw(buf);
  841. buf += 3;
  842. }
  843. if (!(rx_status & R_ROK)) { /* There was an error. */
  844. lp->stats.rx_errors++; /* Update the error stats. */
  845. if (rx_status & R_DBE)
  846. lp->stats.rx_frame_errors++;
  847. if (rx_status & R_CRC)
  848. lp->stats.rx_crc_errors++;
  849. if (rx_status & R_PLL)
  850. lp->stats.rx_fifo_errors++;
  851. } else {
  852. struct sk_buff *skb;
  853. if ((skb = dev_alloc_skb(pkt_len + 2)) != NULL) {
  854. unsigned char *p;
  855. skb->dev = dev;
  856. skb_reserve(skb, 2); /* Align to 16 bytes */
  857. p = skb_put(skb, pkt_len);
  858. if (lp->shmem_length == IO_ONLY) {
  859. *p = inb(EWRK3_DATA); /* dummy read */
  860. for (i = 0; i < pkt_len; i++) {
  861. *p++ = inb(EWRK3_DATA);
  862. }
  863. } else {
  864. isa_memcpy_fromio(p, buf, pkt_len);
  865. }
  866. for (i = 1; i < EWRK3_PKT_STAT_SZ - 1; i++) {
  867. if (pkt_len < i * EWRK3_PKT_BIN_SZ) {
  868. lp->pktStats.bins[i]++;
  869. i = EWRK3_PKT_STAT_SZ;
  870. }
  871. }
  872. p = skb->data; /* Look at the dest addr */
  873. if (p[0] & 0x01) { /* Multicast/Broadcast */
  874. if ((*(s16 *) & p[0] == -1) && (*(s16 *) & p[2] == -1) && (*(s16 *) & p[4] == -1)) {
  875. lp->pktStats.broadcast++;
  876. } else {
  877. lp->pktStats.multicast++;
  878. }
  879. } else if ((*(s16 *) & p[0] == *(s16 *) & dev->dev_addr[0]) &&
  880.    (*(s16 *) & p[2] == *(s16 *) & dev->dev_addr[2]) &&
  881.    (*(s16 *) & p[4] == *(s16 *) & dev->dev_addr[4])) {
  882. lp->pktStats.unicast++;
  883. }
  884. lp->pktStats.bins[0]++; /* Duplicates stats.rx_packets */
  885. if (lp->pktStats.bins[0] == 0) { /* Reset counters */
  886. memset(&lp->pktStats, 0, sizeof(lp->pktStats));
  887. }
  888. /*
  889.    ** Notify the upper protocol layers that there is another
  890.    ** packet to handle
  891.  */
  892. skb->protocol = eth_type_trans(skb, dev);
  893. netif_rx(skb);
  894. /*
  895.    ** Update stats
  896.  */
  897. dev->last_rx = jiffies;
  898. lp->stats.rx_packets++;
  899. lp->stats.rx_bytes += pkt_len;
  900. } else {
  901. printk("%s: Insufficient memory; nuking packet.n", dev->name);
  902. lp->stats.rx_dropped++; /* Really, deferred. */
  903. break;
  904. }
  905. }
  906. }
  907. /*
  908.    ** Return the received buffer to the free memory queue
  909.  */
  910. outb(page, EWRK3_FMQ);
  911. } else {
  912. printk("ewrk3_rx(): Illegal page number, page %dn", page);
  913. printk("ewrk3_rx(): CSR: %02x ICR: %02x FMQC: %02xn", inb(EWRK3_CSR), inb(EWRK3_ICR), inb(EWRK3_FMQC));
  914. }
  915. }
  916. return status;
  917. }
  918. /*
  919. ** Buffer sent - check for TX buffer errors.
  920. ** Called with lp->hw_lock held
  921. */
  922. static int ewrk3_tx(struct net_device *dev)
  923. {
  924. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  925. u_long iobase = dev->base_addr;
  926. u_char tx_status;
  927. while ((tx_status = inb(EWRK3_TDQ)) > 0) { /* Whilst there's old buffers */
  928. if (tx_status & T_VSTS) { /* The status is valid */
  929. if (tx_status & T_TXE) {
  930. lp->stats.tx_errors++;
  931. if (tx_status & T_NCL)
  932. lp->stats.tx_carrier_errors++;
  933. if (tx_status & T_LCL)
  934. lp->stats.tx_window_errors++;
  935. if (tx_status & T_CTU) {
  936. if ((tx_status & T_COLL) ^ T_XUR) {
  937. lp->pktStats.tx_underruns++;
  938. } else {
  939. lp->pktStats.excessive_underruns++;
  940. }
  941. } else if (tx_status & T_COLL) {
  942. if ((tx_status & T_COLL) ^ T_XCOLL) {
  943. lp->stats.collisions++;
  944. } else {
  945. lp->pktStats.excessive_collisions++;
  946. }
  947. }
  948. } else {
  949. lp->stats.tx_packets++;
  950. }
  951. }
  952. }
  953. return 0;
  954. }
  955. static int ewrk3_close(struct net_device *dev)
  956. {
  957. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  958. u_long iobase = dev->base_addr;
  959. u_char icr, csr;
  960. netif_stop_queue(dev);
  961. if (ewrk3_debug > 1) {
  962. printk("%s: Shutting down ethercard, status was %2.2x.n",
  963.        dev->name, inb(EWRK3_CSR));
  964. }
  965. /*
  966.    ** We stop the EWRK3 here... mask interrupts and stop TX & RX
  967.  */
  968. DISABLE_IRQs;
  969. STOP_EWRK3;
  970. /*
  971.    ** Clean out the TX and RX queues here (note that one entry
  972.    ** may get added to either the TXD or RX queues if the TX or RX
  973.    ** just starts processing a packet before the STOP_EWRK3 command
  974.    ** is received. This will be flushed in the ewrk3_open() call).
  975.  */
  976. while (inb(EWRK3_TQ));
  977. while (inb(EWRK3_TDQ));
  978. while (inb(EWRK3_RQ));
  979. if (!lp->hard_strapped) {
  980. free_irq(dev->irq, dev);
  981. }
  982. return 0;
  983. }
  984. static struct net_device_stats *ewrk3_get_stats(struct net_device *dev)
  985. {
  986. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  987. /* Null body since there is no framing error counter */
  988. return &lp->stats;
  989. }
  990. /*
  991.    ** Set or clear the multicast filter for this adapter.
  992.  */
  993. static void set_multicast_list(struct net_device *dev)
  994. {
  995. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  996. u_long iobase = dev->base_addr;
  997. u_char csr;
  998. csr = inb(EWRK3_CSR);
  999. if (lp->shmem_length == IO_ONLY) {
  1000. lp->mctbl = (char *) PAGE0_HTE;
  1001. } else {
  1002. lp->mctbl = (char *) (lp->shmem_base + PAGE0_HTE);
  1003. }
  1004. csr &= ~(CSR_PME | CSR_MCE);
  1005. if (dev->flags & IFF_PROMISC) { /* set promiscuous mode */
  1006. csr |= CSR_PME;
  1007. outb(csr, EWRK3_CSR);
  1008. } else {
  1009. SetMulticastFilter(dev);
  1010. csr |= CSR_MCE;
  1011. outb(csr, EWRK3_CSR);
  1012. }
  1013. }
  1014. /*
  1015.    ** Calculate the hash code and update the logical address filter
  1016.    ** from a list of ethernet multicast addresses.
  1017.    ** Little endian crc one liner from Matt Thomas, DEC.
  1018.    **
  1019.    ** Note that when clearing the table, the broadcast bit must remain asserted
  1020.    ** to receive broadcast messages.
  1021.  */
  1022. static void SetMulticastFilter(struct net_device *dev)
  1023. {
  1024. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  1025. struct dev_mc_list *dmi = dev->mc_list;
  1026. u_long iobase = dev->base_addr;
  1027. int i;
  1028. char *addrs, bit, byte;
  1029. short *p = (short *) lp->mctbl;
  1030. u16 hashcode;
  1031. u32 crc;
  1032. spin_lock_irq(&lp->hw_lock);
  1033. if (lp->shmem_length == IO_ONLY) {
  1034. outb(0, EWRK3_IOPR);
  1035. outw(EEPROM_OFFSET(lp->mctbl), EWRK3_PIR1);
  1036. } else {
  1037. outb(0, EWRK3_MPR);
  1038. }
  1039. if (dev->flags & IFF_ALLMULTI) {
  1040. for (i = 0; i < (HASH_TABLE_LEN >> 3); i++) {
  1041. if (lp->shmem_length == IO_ONLY) {
  1042. outb(0xff, EWRK3_DATA);
  1043. } else { /* memset didn't work here */
  1044. isa_writew(0xffff, (int) p);
  1045. p++;
  1046. i++;
  1047. }
  1048. }
  1049. } else {
  1050. /* Clear table except for broadcast bit */
  1051. if (lp->shmem_length == IO_ONLY) {
  1052. for (i = 0; i < (HASH_TABLE_LEN >> 4) - 1; i++) {
  1053. outb(0x00, EWRK3_DATA);
  1054. }
  1055. outb(0x80, EWRK3_DATA);
  1056. i++; /* insert the broadcast bit */
  1057. for (; i < (HASH_TABLE_LEN >> 3); i++) {
  1058. outb(0x00, EWRK3_DATA);
  1059. }
  1060. } else {
  1061. isa_memset_io((int) lp->mctbl, 0, (HASH_TABLE_LEN >> 3));
  1062. isa_writeb(0x80, (int) (lp->mctbl + (HASH_TABLE_LEN >> 4) - 1));
  1063. }
  1064. /* Update table */
  1065. for (i = 0; i < dev->mc_count; i++) { /* for each address in the list */
  1066. addrs = dmi->dmi_addr;
  1067. dmi = dmi->next;
  1068. if ((*addrs & 0x01) == 1) { /* multicast address? */
  1069. crc = ether_crc_le(ETH_ALEN, addrs);
  1070. hashcode = crc & ((1 << 9) - 1); /* hashcode is 9 LSb of CRC */
  1071. byte = hashcode >> 3; /* bit[3-8] -> byte in filter */
  1072. bit = 1 << (hashcode & 0x07); /* bit[0-2] -> bit in byte */
  1073. if (lp->shmem_length == IO_ONLY) {
  1074. u_char tmp;
  1075. outw((short) ((long) lp->mctbl) + byte, EWRK3_PIR1);
  1076. tmp = inb(EWRK3_DATA);
  1077. tmp |= bit;
  1078. outw((short) ((long) lp->mctbl) + byte, EWRK3_PIR1);
  1079. outb(tmp, EWRK3_DATA);
  1080. } else {
  1081. isa_writeb(isa_readb((int)(lp->mctbl + byte)) | bit, (int)(lp->mctbl + byte));
  1082. }
  1083. }
  1084. }
  1085. }
  1086. spin_unlock_irq(&lp->hw_lock);
  1087. }
  1088. /*
  1089.    ** ISA bus I/O device probe
  1090.  */
  1091. static void __init isa_probe(struct net_device *dev, u_long ioaddr)
  1092. {
  1093. int i = num_ewrk3s, maxSlots;
  1094. u_long iobase;
  1095. if (!ioaddr && autoprobed)
  1096. return; /* Been here before ! */
  1097. if (ioaddr >= 0x400)
  1098. return; /* Not ISA */
  1099. if (ioaddr == 0) { /* Autoprobing */
  1100. iobase = EWRK3_IO_BASE; /* Get the first slot address */
  1101. maxSlots = 24;
  1102. } else { /* Probe a specific location */
  1103. iobase = ioaddr;
  1104. maxSlots = i + 1;
  1105. }
  1106. for (; (i < maxSlots) && (dev != NULL); iobase += EWRK3_IOP_INC, i++) {
  1107. if (!check_region(iobase, EWRK3_TOTAL_SIZE)) {
  1108. if (DevicePresent(iobase) == 0) {
  1109. if ((dev = alloc_device(dev, iobase)) != NULL) {
  1110. if (ewrk3_hw_init(dev, iobase) == 0) {
  1111. num_ewrk3s++;
  1112. }
  1113. num_eth++;
  1114. }
  1115. }
  1116. } else if (autoprobed) {
  1117. printk("%s: region already allocated at 0x%04lx.n", dev->name, iobase);
  1118. }
  1119. }
  1120. return;
  1121. }
  1122. /*
  1123.    ** EISA bus I/O device probe. Probe from slot 1 since slot 0 is usually
  1124.    ** the motherboard.
  1125.  */
  1126. static void __init eisa_probe(struct net_device *dev, u_long ioaddr)
  1127. {
  1128. int i, maxSlots;
  1129. u_long iobase;
  1130. char name[EWRK3_STRLEN];
  1131. if (!ioaddr && autoprobed)
  1132. return; /* Been here before ! */
  1133. if (ioaddr < 0x1000)
  1134. return; /* Not EISA */
  1135. if (ioaddr == 0) { /* Autoprobing */
  1136. iobase = EISA_SLOT_INC; /* Get the first slot address */
  1137. i = 1;
  1138. maxSlots = MAX_EISA_SLOTS;
  1139. } else { /* Probe a specific location */
  1140. iobase = ioaddr;
  1141. i = (ioaddr >> 12);
  1142. maxSlots = i + 1;
  1143. }
  1144. for (i = 1; (i < maxSlots) && (dev != NULL); i++, iobase += EISA_SLOT_INC) {
  1145. if (EISA_signature(name, EISA_ID) == 0) {
  1146. if (!check_region(iobase, EWRK3_TOTAL_SIZE)) {
  1147. if (DevicePresent(iobase) == 0) {
  1148. if ((dev = alloc_device(dev, iobase)) != NULL) {
  1149. if (ewrk3_hw_init(dev, iobase) == 0) {
  1150. num_ewrk3s++;
  1151. }
  1152. num_eth++;
  1153. }
  1154. }
  1155. } else if (autoprobed) {
  1156. printk("%s: region already allocated at 0x%04lx.n", dev->name, iobase);
  1157. }
  1158. }
  1159. }
  1160. return;
  1161. }
  1162. /*
  1163.    ** Search the entire 'eth' device list for a fixed probe. If a match isn't
  1164.    ** found then check for an autoprobe or unused device location. If they
  1165.    ** are not available then insert a new device structure at the end of
  1166.    ** the current list.
  1167.  */
  1168. static struct net_device * __init  alloc_device(struct net_device *dev, u_long iobase)
  1169. {
  1170. struct net_device *adev = NULL;
  1171. int fixed = 0, new_dev = 0;
  1172. num_eth = ewrk3_dev_index(dev->name);
  1173. if (loading_module)
  1174. return dev;
  1175. while (1) {
  1176. if (((dev->base_addr == EWRK3_NDA) || (dev->base_addr == 0)) && !adev) {
  1177. adev = dev;
  1178. } else if ((dev->priv == NULL) && (dev->base_addr == iobase)) {
  1179. fixed = 1;
  1180. } else {
  1181. if (dev->next == NULL) {
  1182. new_dev = 1;
  1183. } else if (strncmp(dev->next->name, "eth", 3) != 0) {
  1184. new_dev = 1;
  1185. }
  1186. }
  1187. if ((dev->next == NULL) || new_dev || fixed)
  1188. break;
  1189. dev = dev->next;
  1190. num_eth++;
  1191. }
  1192. if (adev && !fixed) {
  1193. dev = adev;
  1194. num_eth = ewrk3_dev_index(dev->name);
  1195. new_dev = 0;
  1196. }
  1197. if (((dev->next == NULL) &&
  1198.      ((dev->base_addr != EWRK3_NDA) && (dev->base_addr != 0)) && !fixed) ||
  1199.     new_dev) {
  1200. num_eth++; /* New device */
  1201. dev = insert_device(dev, iobase, ewrk3_probe);
  1202. }
  1203. return dev;
  1204. }
  1205. /*
  1206.    ** If at end of eth device list and can't use current entry, malloc
  1207.    ** one up. If memory could not be allocated, print an error message.
  1208.  */
  1209. static struct net_device * __init
  1210. insert_device(struct net_device *dev, u_long iobase, int (*init) (struct net_device *))
  1211. {
  1212. struct net_device *new;
  1213. new = (struct net_device *) kmalloc(sizeof(struct net_device) + 8, GFP_KERNEL);
  1214. if (new == NULL) {
  1215. printk("eth%d: Device not initialised, insufficient memoryn", num_eth);
  1216. return NULL;
  1217. } else {
  1218. new->next = dev->next;
  1219. dev->next = new;
  1220. dev = dev->next; /* point to the new device */
  1221. if (num_eth > 9999) {
  1222. sprintf(dev->name, "eth????"); /* New device name */
  1223. } else {
  1224. sprintf(dev->name, "eth%d", num_eth); /* New device name */
  1225. }
  1226. dev->base_addr = iobase; /* assign the io address */
  1227. dev->init = init; /* initialisation routine */
  1228. }
  1229. return dev;
  1230. }
  1231. static int __init 
  1232. ewrk3_dev_index(char *s)
  1233. {
  1234. int i = 0, j = 0;
  1235. for (; *s; s++) {
  1236. if (isdigit(*s)) {
  1237. j = 1;
  1238. i = (i * 10) + (*s - '0');
  1239. } else if (j)
  1240. break;
  1241. }
  1242. return i;
  1243. }
  1244. /*
  1245.    ** Read the EWRK3 EEPROM using this routine
  1246.  */
  1247. static int Read_EEPROM(u_long iobase, u_char eaddr)
  1248. {
  1249. int i;
  1250. outb((eaddr & 0x3f), EWRK3_PIR1); /* set up 6 bits of address info */
  1251. outb(EEPROM_RD, EWRK3_IOPR); /* issue read command */
  1252. for (i = 0; i < 5000; i++)
  1253. inb(EWRK3_CSR); /* wait 1msec */
  1254. return inw(EWRK3_EPROM1); /* 16 bits data return */
  1255. }
  1256. /*
  1257.    ** Write the EWRK3 EEPROM using this routine
  1258.  */
  1259. static int Write_EEPROM(short data, u_long iobase, u_char eaddr)
  1260. {
  1261. int i;
  1262. outb(EEPROM_WR_EN, EWRK3_IOPR); /* issue write enable command */
  1263. for (i = 0; i < 5000; i++)
  1264. inb(EWRK3_CSR); /* wait 1msec */
  1265. outw(data, EWRK3_EPROM1); /* write data to register */
  1266. outb((eaddr & 0x3f), EWRK3_PIR1); /* set up 6 bits of address info */
  1267. outb(EEPROM_WR, EWRK3_IOPR); /* issue write command */
  1268. for (i = 0; i < 75000; i++)
  1269. inb(EWRK3_CSR); /* wait 15msec */
  1270. outb(EEPROM_WR_DIS, EWRK3_IOPR); /* issue write disable command */
  1271. for (i = 0; i < 5000; i++)
  1272. inb(EWRK3_CSR); /* wait 1msec */
  1273. return 0;
  1274. }
  1275. /*
  1276.    ** Look for a particular board name in the on-board EEPROM.
  1277.  */
  1278. static void __init EthwrkSignature(char *name, char *eeprom_image)
  1279. {
  1280. int i;
  1281. char *signatures[] = EWRK3_SIGNATURE;
  1282. for (i=0; *signatures[i] != ''; i++)
  1283. if( !strncmp(eeprom_image+EEPROM_PNAME7, signatures[i], strlen(signatures[i])) )
  1284. break;
  1285. if (*signatures[i] != '') {
  1286. memcpy(name, eeprom_image+EEPROM_PNAME7, EWRK3_STRLEN);
  1287. name[EWRK3_STRLEN] = '';
  1288. } else
  1289. name[0] = '';
  1290. return;
  1291. }
  1292. /*
  1293.    ** Look for a special sequence in the Ethernet station address PROM that
  1294.    ** is common across all EWRK3 products.
  1295.    **
  1296.    ** Search the Ethernet address ROM for the signature. Since the ROM address
  1297.    ** counter can start at an arbitrary point, the search must include the entire
  1298.    ** probe sequence length plus the (length_of_the_signature - 1).
  1299.    ** Stop the search IMMEDIATELY after the signature is found so that the
  1300.    ** PROM address counter is correctly positioned at the start of the
  1301.    ** ethernet address for later read out.
  1302.  */
  1303. static int __init DevicePresent(u_long iobase)
  1304. {
  1305. union {
  1306. struct {
  1307. u32 a;
  1308. u32 b;
  1309. } llsig;
  1310. char Sig[sizeof(u32) << 1];
  1311. }
  1312. dev;
  1313. short sigLength;
  1314. char data;
  1315. int i, j, status = 0;
  1316. dev.llsig.a = ETH_PROM_SIG;
  1317. dev.llsig.b = ETH_PROM_SIG;
  1318. sigLength = sizeof(u32) << 1;
  1319. for (i = 0, j = 0; j < sigLength && i < PROBE_LENGTH + sigLength - 1; i++) {
  1320. data = inb(EWRK3_APROM);
  1321. if (dev.Sig[j] == data) { /* track signature */
  1322. j++;
  1323. } else { /* lost signature; begin search again */
  1324. if (data == dev.Sig[0]) {
  1325. j = 1;
  1326. } else {
  1327. j = 0;
  1328. }
  1329. }
  1330. }
  1331. if (j != sigLength) {
  1332. status = -ENODEV; /* search failed */
  1333. }
  1334. return status;
  1335. }
  1336. static u_char __init get_hw_addr(struct net_device *dev, u_char * eeprom_image, char chipType)
  1337. {
  1338. int i, j, k;
  1339. u_short chksum;
  1340. u_char crc, lfsr, sd, status = 0;
  1341. u_long iobase = dev->base_addr;
  1342. u16 tmp;
  1343. if (chipType == LeMAC2) {
  1344. for (crc = 0x6a, j = 0; j < ETH_ALEN; j++) {
  1345. sd = dev->dev_addr[j] = eeprom_image[EEPROM_PADDR0 + j];
  1346. outb(dev->dev_addr[j], EWRK3_PAR0 + j);
  1347. for (k = 0; k < 8; k++, sd >>= 1) {
  1348. lfsr = ((((crc & 0x02) >> 1) ^ (crc & 0x01)) ^ (sd & 0x01)) << 7;
  1349. crc = (crc >> 1) + lfsr;
  1350. }
  1351. }
  1352. if (crc != eeprom_image[EEPROM_PA_CRC])
  1353. status = -1;
  1354. } else {
  1355. for (i = 0, k = 0; i < ETH_ALEN;) {
  1356. k <<= 1;
  1357. if (k > 0xffff)
  1358. k -= 0xffff;
  1359. k += (u_char) (tmp = inb(EWRK3_APROM));
  1360. dev->dev_addr[i] = (u_char) tmp;
  1361. outb(dev->dev_addr[i], EWRK3_PAR0 + i);
  1362. i++;
  1363. k += (u_short) ((tmp = inb(EWRK3_APROM)) << 8);
  1364. dev->dev_addr[i] = (u_char) tmp;
  1365. outb(dev->dev_addr[i], EWRK3_PAR0 + i);
  1366. i++;
  1367. if (k > 0xffff)
  1368. k -= 0xffff;
  1369. }
  1370. if (k == 0xffff)
  1371. k = 0;
  1372. chksum = inb(EWRK3_APROM);
  1373. chksum |= (inb(EWRK3_APROM) << 8);
  1374. if (k != chksum)
  1375. status = -1;
  1376. }
  1377. return status;
  1378. }
  1379. /*
  1380.    ** Look for a particular board name in the EISA configuration space
  1381.  */
  1382. static int __init EISA_signature(char *name, s32 eisa_id)
  1383. {
  1384. u_long i;
  1385. char *signatures[] = EWRK3_SIGNATURE;
  1386. char ManCode[EWRK3_STRLEN];
  1387. union {
  1388. s32 ID;
  1389. char Id[4];
  1390. } Eisa;
  1391. int status = 0;
  1392. *name = '';
  1393. for (i = 0; i < 4; i++) {
  1394. Eisa.Id[i] = inb(eisa_id + i);
  1395. }
  1396. ManCode[0] = (((Eisa.Id[0] >> 2) & 0x1f) + 0x40);
  1397. ManCode[1] = (((Eisa.Id[1] & 0xe0) >> 5) + ((Eisa.Id[0] & 0x03) << 3) + 0x40);
  1398. ManCode[2] = (((Eisa.Id[2] >> 4) & 0x0f) + 0x30);
  1399. ManCode[3] = ((Eisa.Id[2] & 0x0f) + 0x30);
  1400. ManCode[4] = (((Eisa.Id[3] >> 4) & 0x0f) + 0x30);
  1401. ManCode[5] = '';
  1402. for (i = 0; (*signatures[i] != '') && (*name == ''); i++) {
  1403. if (strstr(ManCode, signatures[i]) != NULL) {
  1404. strcpy(name, ManCode);
  1405. status = 1;
  1406. }
  1407. }
  1408. return status; /* return the device name string */
  1409. }
  1410. static int ewrk3_ethtool_ioctl(struct net_device *dev, void *useraddr)
  1411. {
  1412. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  1413. u_long iobase = dev->base_addr;
  1414. u32 ethcmd;
  1415. if (get_user(ethcmd, (u32 *)useraddr))
  1416. return -EFAULT;
  1417. switch (ethcmd) {
  1418. /* Get driver info */
  1419. case ETHTOOL_GDRVINFO: {
  1420. struct ethtool_drvinfo info = { ETHTOOL_GDRVINFO };
  1421. int fwrev = Read_EEPROM(dev->base_addr, EEPROM_REVLVL);
  1422. strcpy(info.driver, DRV_NAME);
  1423. strcpy(info.version, DRV_VERSION);
  1424. sprintf(info.fw_version, "%d", fwrev);
  1425. strcpy(info.bus_info, "N/A");
  1426. info.eedump_len = EEPROM_MAX;
  1427. if (copy_to_user(useraddr, &info, sizeof(info)))
  1428. return -EFAULT;
  1429. return 0;
  1430. }
  1431. /* Get settings */
  1432. case ETHTOOL_GSET: {
  1433. struct ethtool_cmd ecmd = { ETHTOOL_GSET };
  1434. u_char cr = inb(EWRK3_CR);
  1435. switch (lp->adapter_name[4]) {
  1436. case '3': /* DE203 */
  1437. ecmd.supported = SUPPORTED_BNC;
  1438. ecmd.port = PORT_BNC;
  1439. break;
  1440. case '4': /* DE204 */
  1441. ecmd.supported = SUPPORTED_TP;
  1442. ecmd.port = PORT_TP;
  1443. break;
  1444. case '5': /* DE205 */
  1445. ecmd.supported = SUPPORTED_TP | SUPPORTED_BNC | SUPPORTED_AUI;
  1446. ecmd.autoneg = !(cr & CR_APD);
  1447. /*
  1448. ** Port is only valid if autoneg is disabled
  1449. ** and even then we don't know if AUI is jumpered.
  1450. */
  1451. if (!ecmd.autoneg)
  1452. ecmd.port = (cr & CR_PSEL) ? PORT_BNC : PORT_TP;
  1453. break;
  1454. }
  1455. ecmd.supported |= SUPPORTED_10baseT_Half;
  1456. ecmd.speed = SPEED_10;
  1457. ecmd.duplex = DUPLEX_HALF;
  1458. if (copy_to_user(useraddr, &ecmd, sizeof(ecmd)))
  1459. return -EFAULT;
  1460. return 0;
  1461. }
  1462. /* Set settings */
  1463. case ETHTOOL_SSET: {
  1464. struct ethtool_cmd ecmd;
  1465. u_char cr;
  1466. u_long flags;
  1467. /* DE205 is the only card with anything to set */
  1468. if (lp->adapter_name[4] != '5')
  1469. return -EOPNOTSUPP;
  1470. if (copy_from_user(&ecmd, useraddr, sizeof(ecmd)))
  1471. return -EFAULT;
  1472. /* Sanity-check parameters */
  1473. if (ecmd.speed != SPEED_10)
  1474. return -EINVAL;
  1475. if (ecmd.port != PORT_TP && ecmd.port != PORT_BNC)
  1476. return -EINVAL; /* AUI is not software-selectable */
  1477. if (ecmd.transceiver != XCVR_INTERNAL)
  1478. return -EINVAL;
  1479. if (ecmd.duplex != DUPLEX_HALF)
  1480. return -EINVAL;
  1481. if (ecmd.phy_address != 0)
  1482. return -EINVAL;
  1483. spin_lock_irqsave(&lp->hw_lock, flags);
  1484. cr = inb(EWRK3_CR);
  1485. /* If Autoneg is set, change to Auto Port mode */
  1486. /* Otherwise, disable Auto Port and set port explicitly */
  1487. if (ecmd.autoneg) {
  1488. cr &= ~CR_APD;
  1489. } else {
  1490. cr |= CR_APD;
  1491. if (ecmd.port == PORT_TP)
  1492. cr &= ~CR_PSEL; /* Force TP */
  1493. else
  1494. cr |= CR_PSEL; /* Force BNC */
  1495. }
  1496. /* Commit the changes */
  1497. outb(cr, EWRK3_CR);
  1498. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1499. if (copy_to_user(useraddr, &ecmd, sizeof(ecmd)))
  1500. return -EFAULT;
  1501. return 0;
  1502. }
  1503. /* Get link status */
  1504. case ETHTOOL_GLINK: {
  1505. struct ethtool_value edata = { ETHTOOL_GLINK };
  1506. u_char cmr = inb(EWRK3_CMR);
  1507. /* DE203 has BNC only and link status does not apply */
  1508. if (lp->adapter_name[4] == '3')
  1509. return -EOPNOTSUPP;
  1510. /* On DE204 this is always valid since TP is the only port. */
  1511. /* On DE205 this reflects TP status even if BNC or AUI is selected. */
  1512. edata.data = !(cmr & CMR_LINK);
  1513. if (copy_to_user(useraddr, &edata, sizeof(edata)))
  1514. return -EFAULT;
  1515. return 0;
  1516. }
  1517. #ifdef BROKEN
  1518. /* Blink LED for identification */
  1519. case ETHTOOL_PHYS_ID: {
  1520. struct ethtool_value edata;
  1521. u_long flags;
  1522. long delay, ret;
  1523. u_char cr;
  1524. int count;
  1525. wait_queue_head_t wait;
  1526. init_waitqueue_head(&wait);
  1527. if (copy_from_user(&edata, useraddr, sizeof(edata)))
  1528. return -EFAULT;
  1529. /* Toggle LED 4x per second */
  1530. delay = HZ >> 2;
  1531. count = edata.data << 2;
  1532. spin_lock_irqsave(&lp->hw_lock, flags);
  1533. /* Bail if a PHYS_ID is already in progress */
  1534. if (lp->led_mask == 0) {
  1535. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1536. return -EBUSY;
  1537. }
  1538. /* Prevent ISR from twiddling the LED */
  1539. lp->led_mask = 0;
  1540. while (count--) {
  1541. /* Toggle the LED */
  1542. cr = inb(EWRK3_CR);
  1543. outb(cr ^ CR_LED, EWRK3_CR);
  1544. /* Wait a little while */
  1545. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1546. ret = delay;
  1547. __wait_event_interruptible_timeout(wait, 0, ret);
  1548. spin_lock_irqsave(&lp->hw_lock, flags);
  1549. /* Exit if we got a signal */
  1550. if (ret == -ERESTARTSYS)
  1551. goto out;
  1552. }
  1553. ret = 0;
  1554. out:
  1555. lp->led_mask = CR_LED;
  1556. cr = inb(EWRK3_CR);
  1557. outb(cr & ~CR_LED, EWRK3_CR);
  1558. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1559. return ret;
  1560. }
  1561. #endif /* BROKEN */
  1562. }
  1563. return -EOPNOTSUPP;
  1564. }
  1565. /*
  1566.    ** Perform IOCTL call functions here. Some are privileged operations and the
  1567.    ** effective uid is checked in those cases.
  1568.  */
  1569. static int ewrk3_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
  1570. {
  1571. struct ewrk3_private *lp = (struct ewrk3_private *) dev->priv;
  1572. struct ewrk3_ioctl *ioc = (struct ewrk3_ioctl *) &rq->ifr_data;
  1573. u_long iobase = dev->base_addr;
  1574. int i, j, status = 0;
  1575. u_char csr;
  1576. unsigned long flags;
  1577. union ewrk3_addr {
  1578. u_char addr[HASH_TABLE_LEN * ETH_ALEN];
  1579. u_short val[(HASH_TABLE_LEN * ETH_ALEN) >> 1];
  1580. };
  1581. union ewrk3_addr *tmp;
  1582. /* ethtool IOCTLs are handled elsewhere */
  1583. if (cmd == SIOCETHTOOL)
  1584. return ewrk3_ethtool_ioctl(dev, (void *)rq->ifr_data);
  1585. /* Other than ethtool, all we handle are private IOCTLs */
  1586. if (cmd != EWRK3IOCTL)
  1587. return -EOPNOTSUPP;
  1588. tmp = kmalloc(sizeof(union ewrk3_addr), GFP_KERNEL);
  1589. if(tmp==NULL)
  1590. return -ENOMEM;
  1591. switch (ioc->cmd) {
  1592. case EWRK3_GET_HWADDR: /* Get the hardware address */
  1593. for (i = 0; i < ETH_ALEN; i++) {
  1594. tmp->addr[i] = dev->dev_addr[i];
  1595. }
  1596. ioc->len = ETH_ALEN;
  1597. if (copy_to_user(ioc->data, tmp->addr, ioc->len))
  1598. status = -EFAULT;
  1599. break;
  1600. case EWRK3_SET_HWADDR: /* Set the hardware address */
  1601. if (capable(CAP_NET_ADMIN)) {
  1602. spin_lock_irqsave(&lp->hw_lock, flags);
  1603. csr = inb(EWRK3_CSR);
  1604. csr |= (CSR_TXD | CSR_RXD);
  1605. outb(csr, EWRK3_CSR); /* Disable the TX and RX */
  1606. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1607. if (copy_from_user(tmp->addr, ioc->data, ETH_ALEN)) {
  1608. status = -EFAULT;
  1609. break;
  1610. }
  1611. spin_lock_irqsave(&lp->hw_lock, flags);
  1612. for (i = 0; i < ETH_ALEN; i++) {
  1613. dev->dev_addr[i] = tmp->addr[i];
  1614. outb(tmp->addr[i], EWRK3_PAR0 + i);
  1615. }
  1616. csr = inb(EWRK3_CSR);
  1617. csr &= ~(CSR_TXD | CSR_RXD); /* Enable the TX and RX */
  1618. outb(csr, EWRK3_CSR);
  1619. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1620. } else {
  1621. status = -EPERM;
  1622. }
  1623. break;
  1624. case EWRK3_SET_PROM: /* Set Promiscuous Mode */
  1625. if (capable(CAP_NET_ADMIN)) {
  1626. spin_lock_irqsave(&lp->hw_lock, flags);
  1627. csr = inb(EWRK3_CSR);
  1628. csr |= CSR_PME;
  1629. csr &= ~CSR_MCE;
  1630. outb(csr, EWRK3_CSR);
  1631. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1632. } else {
  1633. status = -EPERM;
  1634. }
  1635. break;
  1636. case EWRK3_CLR_PROM: /* Clear Promiscuous Mode */
  1637. if (capable(CAP_NET_ADMIN)) {
  1638. spin_lock_irqsave(&lp->hw_lock, flags);
  1639. csr = inb(EWRK3_CSR);
  1640. csr &= ~CSR_PME;
  1641. outb(csr, EWRK3_CSR);
  1642. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1643. } else {
  1644. status = -EPERM;
  1645. }
  1646. break;
  1647. case EWRK3_GET_MCA: /* Get the multicast address table */
  1648. spin_lock_irqsave(&lp->hw_lock, flags);
  1649. if (lp->shmem_length == IO_ONLY) {
  1650. outb(0, EWRK3_IOPR);
  1651. outw(PAGE0_HTE, EWRK3_PIR1);
  1652. for (i = 0; i < (HASH_TABLE_LEN >> 3); i++) {
  1653. tmp->addr[i] = inb(EWRK3_DATA);
  1654. }
  1655. } else {
  1656. outb(0, EWRK3_MPR);
  1657. isa_memcpy_fromio(tmp->addr, lp->shmem_base + PAGE0_HTE, (HASH_TABLE_LEN >> 3));
  1658. }
  1659. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1660. ioc->len = (HASH_TABLE_LEN >> 3);
  1661. if (copy_to_user(ioc->data, tmp->addr, ioc->len))
  1662. status = -EFAULT;
  1663. break;
  1664. case EWRK3_SET_MCA: /* Set a multicast address */
  1665. if (capable(CAP_NET_ADMIN)) {
  1666. if (ioc->len > 1024)
  1667. {
  1668. status = -EINVAL;
  1669. break;
  1670. }
  1671. if (copy_from_user(tmp->addr, ioc->data, ETH_ALEN * ioc->len)) {
  1672. status = -EFAULT;
  1673. break;
  1674. }
  1675. set_multicast_list(dev);
  1676. } else {
  1677. status = -EPERM;
  1678. }
  1679. break;
  1680. case EWRK3_CLR_MCA: /* Clear all multicast addresses */
  1681. if (capable(CAP_NET_ADMIN)) {
  1682. set_multicast_list(dev);
  1683. } else {
  1684. status = -EPERM;
  1685. }
  1686. break;
  1687. case EWRK3_MCA_EN: /* Enable multicast addressing */
  1688. if (capable(CAP_NET_ADMIN)) {
  1689. spin_lock_irqsave(&lp->hw_lock, flags);
  1690. csr = inb(EWRK3_CSR);
  1691. csr |= CSR_MCE;
  1692. csr &= ~CSR_PME;
  1693. outb(csr, EWRK3_CSR);
  1694. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1695. } else {
  1696. status = -EPERM;
  1697. }
  1698. break;
  1699. case EWRK3_GET_STATS: { /* Get the driver statistics */
  1700. struct ewrk3_stats *tmp_stats =
  1701.          kmalloc(sizeof(lp->pktStats), GFP_KERNEL);
  1702. if (!tmp_stats) return -ENOMEM;
  1703. spin_lock_irqsave(&lp->hw_lock, flags);
  1704. memcpy(tmp_stats, &lp->pktStats, sizeof(lp->pktStats));
  1705. spin_unlock_irqrestore(&lp->hw_lock, flags);
  1706. ioc->len = sizeof(lp->pktStats);
  1707. if (copy_to_user(ioc->data, tmp_stats, sizeof(lp->pktStats)))
  1708.      status = -EFAULT;
  1709. kfree(tmp_stats);
  1710. break;
  1711. }
  1712. case EWRK3_CLR_STATS: /* Zero out the driver statistics */
  1713. if (capable(CAP_NET_ADMIN)) {
  1714. spin_lock_irqsave(&lp->hw_lock, flags);
  1715. memset(&lp->pktStats, 0, sizeof(lp->pktStats));
  1716. spin_unlock_irqrestore(&lp->hw_lock,flags);
  1717. } else {
  1718. status = -EPERM;
  1719. }
  1720. break;
  1721. case EWRK3_GET_CSR: /* Get the CSR Register contents */
  1722. tmp->addr[0] = inb(EWRK3_CSR);
  1723. ioc->len = 1;
  1724. if (copy_to_user(ioc->data, tmp->addr, ioc->len))
  1725. status = -EFAULT;
  1726. break;
  1727. case EWRK3_SET_CSR: /* Set the CSR Register contents */
  1728. if (capable(CAP_NET_ADMIN)) {
  1729. if (copy_from_user(tmp->addr, ioc->data, 1)) {
  1730. status = -EFAULT;
  1731. break;
  1732. }
  1733. outb(tmp->addr[0], EWRK3_CSR);
  1734. } else {
  1735. status = -EPERM;
  1736. }
  1737. break;
  1738. case EWRK3_GET_EEPROM: /* Get the EEPROM contents */
  1739. if (capable(CAP_NET_ADMIN)) {
  1740. for (i = 0; i < (EEPROM_MAX >> 1); i++) {
  1741. tmp->val[i] = (short) Read_EEPROM(iobase, i);
  1742. }
  1743. i = EEPROM_MAX;
  1744. tmp->addr[i++] = inb(EWRK3_CMR); /* Config/Management Reg. */
  1745. for (j = 0; j < ETH_ALEN; j++) {
  1746. tmp->addr[i++] = inb(EWRK3_PAR0 + j);
  1747. }
  1748. ioc->len = EEPROM_MAX + 1 + ETH_ALEN;
  1749. if (copy_to_user(ioc->data, tmp->addr, ioc->len))
  1750. status = -EFAULT;
  1751. } else {
  1752. status = -EPERM;
  1753. }
  1754. break;
  1755. case EWRK3_SET_EEPROM: /* Set the EEPROM contents */
  1756. if (capable(CAP_NET_ADMIN)) {
  1757. if (copy_from_user(tmp->addr, ioc->data, EEPROM_MAX)) {
  1758. status = -EFAULT;
  1759. break;
  1760. }
  1761. for (i = 0; i < (EEPROM_MAX >> 1); i++) {
  1762. Write_EEPROM(tmp->val[i], iobase, i);
  1763. }
  1764. } else {
  1765. status = -EPERM;
  1766. }
  1767. break;
  1768. case EWRK3_GET_CMR: /* Get the CMR Register contents */
  1769. tmp->addr[0] = inb(EWRK3_CMR);
  1770. ioc->len = 1;
  1771. if (copy_to_user(ioc->data, tmp->addr, ioc->len))
  1772. status = -EFAULT;
  1773. break;
  1774. case EWRK3_SET_TX_CUT_THRU: /* Set TX cut through mode */
  1775. if (capable(CAP_NET_ADMIN)) {
  1776. lp->txc = 1;
  1777. } else {
  1778. status = -EPERM;
  1779. }
  1780. break;
  1781. case EWRK3_CLR_TX_CUT_THRU: /* Clear TX cut through mode */
  1782. if (capable(CAP_NET_ADMIN)) {
  1783. lp->txc = 0;
  1784. } else {
  1785. status = -EPERM;
  1786. }
  1787. break;
  1788. default:
  1789. status = -EOPNOTSUPP;
  1790. }
  1791. kfree(tmp);
  1792. return status;
  1793. }
  1794. #ifdef MODULE
  1795. static struct net_device *ewrk3_devs[MAX_NUM_EWRK3S];
  1796. static int ndevs;
  1797. static int io[MAX_NUM_EWRK3S+1] = { 0x300, 0, }; /* <--- EDIT THESE LINES FOR YOUR CONFIGURATION */
  1798. static int irq[MAX_NUM_EWRK3S+1] = { 5, 0, }; /* or use the insmod io= irq= options           */
  1799. /* '21' below should really be 'MAX_NUM_EWRK3S' */
  1800. MODULE_PARM(io, "0-21i");
  1801. MODULE_PARM(irq, "0-21i");
  1802. MODULE_PARM_DESC(io, "EtherWORKS 3 I/O base address(es)");
  1803. MODULE_PARM_DESC(irq, "EtherWORKS 3 IRQ number(s)");
  1804. int init_module(void)
  1805. {
  1806. int i=0;
  1807. while( io[i] && irq[i] ) {
  1808. ewrk3_devs[ndevs] = kmalloc(sizeof(struct net_device), GFP_KERNEL);
  1809. if (!ewrk3_devs[ndevs])
  1810. goto error; 
  1811. memset(ewrk3_devs[ndevs], 0, sizeof(struct net_device));
  1812. ewrk3_devs[ndevs]->base_addr = io[i];
  1813. ewrk3_devs[ndevs]->irq = irq[i];
  1814. ewrk3_devs[ndevs]->init = ewrk3_probe;
  1815. if (register_netdev(ewrk3_devs[ndevs]) == 0)
  1816. ndevs++;
  1817. else
  1818. kfree(ewrk3_devs[ndevs]);
  1819. i++;
  1820. }
  1821. return ndevs ? 0 : -EIO;
  1822. error:
  1823. cleanup_module();
  1824. return -ENOMEM;
  1825. }
  1826. void cleanup_module(void)
  1827. {
  1828. int i;
  1829. for( i=0; i<ndevs; i++ ) {
  1830. unregister_netdev(ewrk3_devs[i]);
  1831. if (ewrk3_devs[i]->priv) {
  1832. kfree(ewrk3_devs[i]->priv);
  1833. ewrk3_devs[i]->priv = NULL;
  1834. }
  1835. ewrk3_devs[i]->irq = 0;
  1836. release_region(ewrk3_devs[i]->base_addr, EWRK3_TOTAL_SIZE);
  1837. kfree(ewrk3_devs[i]);
  1838. ewrk3_devs[i] = NULL;
  1839. }
  1840. }
  1841. #endif /* MODULE */
  1842. MODULE_LICENSE("GPL");
  1843. /*
  1844.  * Local variables:
  1845.  *  compile-command: "gcc -D__KERNEL__ -I/linux/include -Wall -Wstrict-prototypes -fomit-frame-pointer -fno-strength-reduce -malign-loops=2 -malign-jumps=2 -malign-functions=2 -O2 -m486 -c ewrk3.c"
  1846.  *
  1847.  *  compile-command: "gcc -D__KERNEL__ -DMODULE -I/linux/include -Wall -Wstrict-prototypes -fomit-frame-pointer -fno-strength-reduce -malign-loops=2 -malign-jumps=2 -malign-functions=2 -O2 -m486 -c ewrk3.c"
  1848.  * End:
  1849.  */