release/src-rt-6.x/linux/linux-2.6/drivers/net/stnic.c

   1 /* stnic.c : A SH7750 specific part of driver for NS DP83902A ST-NIC.
   2  *
   3  * This file is subject to the terms and conditions of the GNU General Public
   4  * License.  See the file "COPYING" in the main directory of this archive
   5  * for more details.
   6  *
   7  * Copyright (C) 1999 kaz Kojima
   8  */
   9
  10 #include <linux/module.h>
  11 #include <linux/kernel.h>
  12 #include <linux/errno.h>
  13 #include <linux/interrupt.h>
  14 #include <linux/ioport.h>
  15 #include <linux/netdevice.h>
  16 #include <linux/etherdevice.h>
  17 #include <linux/init.h>
  18 #include <linux/delay.h>
  19
  20 #include <asm/system.h>
  21 #include <asm/io.h>
  22 #include <asm/se.h>
  23 #include <asm/machvec.h>
  24 #ifdef CONFIG_SH_STANDARD_BIOS
  25 #include <asm/sh_bios.h>
  26 #endif
  27
  28 #include "8390.h"
  29
  30 #define DRV_NAME "stnic"
  31
  32 #define byte    unsigned char
  33 #define half    unsigned short
  34 #define word    unsigned int
  35 #define vbyte   volatile unsigned char
  36 #define vhalf   volatile unsigned short
  37 #define vword   volatile unsigned int
  38
  39 #define STNIC_RUN       0x01    /* 1 == Run, 0 == reset. */
  40
  41 #define START_PG        0       /* First page of TX buffer */
  42 #define STOP_PG         128     /* Last page +1 of RX ring */
  43
  44 /* Alias */
  45 #define STNIC_CR        E8390_CMD
  46 #define PG0_RSAR0       EN0_RSARLO
  47 #define PG0_RSAR1       EN0_RSARHI
  48 #define PG0_RBCR0       EN0_RCNTLO
  49 #define PG0_RBCR1       EN0_RCNTHI
  50
  51 #define CR_RRD          E8390_RREAD
  52 #define CR_RWR          E8390_RWRITE
  53 #define CR_PG0          E8390_PAGE0
  54 #define CR_STA          E8390_START
  55 #define CR_RDMA         E8390_NODMA
  56
  57 /* FIXME! YOU MUST SET YOUR OWN ETHER ADDRESS.  */
  58 static byte stnic_eadr[6] =
  59 {0x00, 0xc0, 0x6e, 0x00, 0x00, 0x07};
  60
  61 static struct net_device *stnic_dev;
  62
  63 static int stnic_open (struct net_device *dev);
  64 static int stnic_close (struct net_device *dev);
  65 static void stnic_reset (struct net_device *dev);
  66 static void stnic_get_hdr (struct net_device *dev, struct e8390_pkt_hdr *hdr,
  67                            int ring_page);
  68 static void stnic_block_input (struct net_device *dev, int count,
  69                                struct sk_buff *skb , int ring_offset);
  70 static void stnic_block_output (struct net_device *dev, int count,
  71                                 const unsigned char *buf, int start_page);
  72
  73 static void stnic_init (struct net_device *dev);
  74
  75 /* SH7750 specific read/write io. */
  76 static inline void
  77 STNIC_DELAY (void)
  78 {
  79   vword trash;
  80   trash = *(vword *) 0xa0000000;
  81   trash = *(vword *) 0xa0000000;
  82   trash = *(vword *) 0xa0000000;
  83 }
  84
  85 static inline byte
  86 STNIC_READ (int reg)
  87 {
  88   byte val;
  89
  90   val = (*(vhalf *) (PA_83902 + ((reg) << 1)) >> 8) & 0xff;
  91   STNIC_DELAY ();
  92   return val;
  93 }
  94
  95 static inline void
  96 STNIC_WRITE (int reg, byte val)
  97 {
  98   *(vhalf *) (PA_83902 + ((reg) << 1)) = ((half) (val) << 8);
  99   STNIC_DELAY ();
 100 }
 101
 102 static int __init stnic_probe(void)
 103 {
 104   struct net_device *dev;
 105   int i, err;
 106
 107   /* If we are not running on a SolutionEngine, give up now */
 108   if (! MACH_SE)
 109     return -ENODEV;
 110
 111   /* New style probing API */
 112   dev = alloc_ei_netdev();
 113   if (!dev)
 114         return -ENOMEM;
 115   SET_MODULE_OWNER(dev);
 116
 117 #ifdef CONFIG_SH_STANDARD_BIOS
 118   sh_bios_get_node_addr (stnic_eadr);
 119 #endif
 120   for (i = 0; i < ETHER_ADDR_LEN; i++)
 121     dev->dev_addr[i] = stnic_eadr[i];
 122
 123   /* Set the base address to point to the NIC, not the "real" base! */
 124   dev->base_addr = 0x1000;
 125   dev->irq = IRQ_STNIC;
 126   dev->open = &stnic_open;
 127   dev->stop = &stnic_close;
 128 #ifdef CONFIG_NET_POLL_CONTROLLER
 129   dev->poll_controller = ei_poll;
 130 #endif
 131
 132   /* Snarf the interrupt now.  There's no point in waiting since we cannot
 133      share and the board will usually be enabled. */
 134   err = request_irq (dev->irq, ei_interrupt, 0, DRV_NAME, dev);
 135   if (err)  {
 136       printk (KERN_EMERG " unable to get IRQ %d.\n", dev->irq);
 137       free_netdev(dev);
 138       return err;
 139     }
 140
 141   ei_status.name = dev->name;
 142   ei_status.word16 = 1;
 143 #ifdef __LITTLE_ENDIAN__
 144   ei_status.bigendian = 0;
 145 #else
 146   ei_status.bigendian = 1;
 147 #endif
 148   ei_status.tx_start_page = START_PG;
 149   ei_status.rx_start_page = START_PG + TX_PAGES;
 150   ei_status.stop_page = STOP_PG;
 151
 152   ei_status.reset_8390 = &stnic_reset;
 153   ei_status.get_8390_hdr = &stnic_get_hdr;
 154   ei_status.block_input = &stnic_block_input;
 155   ei_status.block_output = &stnic_block_output;
 156
 157   stnic_init (dev);
 158
 159   err = register_netdev(dev);
 160   if (err) {
 161     free_irq(dev->irq, dev);
 162     free_netdev(dev);
 163     return err;
 164   }
 165   stnic_dev = dev;
 166
 167   printk (KERN_INFO "NS ST-NIC 83902A\n");
 168
 169   return 0;
 170 }
 171
 172 static int
 173 stnic_open (struct net_device *dev)
 174 {
 175 #if 0
 176   printk (KERN_DEBUG "stnic open\n");
 177 #endif
 178   ei_open (dev);
 179   return 0;
 180 }
 181
 182 static int
 183 stnic_close (struct net_device *dev)
 184 {
 185   ei_close (dev);
 186   return 0;
 187 }
 188
 189 static void
 190 stnic_reset (struct net_device *dev)
 191 {
 192   *(vhalf *) PA_83902_RST = 0;
 193   udelay (5);
 194   if (ei_debug > 1)
 195     printk (KERN_WARNING "8390 reset done (%ld).\n", jiffies);
 196   *(vhalf *) PA_83902_RST = ~0;
 197   udelay (5);
 198 }
 199
 200 static void
 201 stnic_get_hdr (struct net_device *dev, struct e8390_pkt_hdr *hdr,
 202                int ring_page)
 203 {
 204   half buf[2];
 205
 206   STNIC_WRITE (PG0_RSAR0, 0);
 207   STNIC_WRITE (PG0_RSAR1, ring_page);
 208   STNIC_WRITE (PG0_RBCR0, 4);
 209   STNIC_WRITE (PG0_RBCR1, 0);
 210   STNIC_WRITE (STNIC_CR, CR_RRD | CR_PG0 | CR_STA);
 211
 212   buf[0] = *(vhalf *) PA_83902_IF;
 213   STNIC_DELAY ();
 214   buf[1] = *(vhalf *) PA_83902_IF;
 215   STNIC_DELAY ();
 216   hdr->next = buf[0] >> 8;
 217   hdr->status = buf[0] & 0xff;
 218 #ifdef __LITTLE_ENDIAN__
 219   hdr->count = buf[1];
 220 #else
 221   hdr->count = ((buf[1] >> 8) & 0xff) | (buf[1] << 8);
 222 #endif
 223
 224   if (ei_debug > 1)
 225     printk (KERN_DEBUG "ring %x status %02x next %02x count %04x.\n",
 226             ring_page, hdr->status, hdr->next, hdr->count);
 227
 228   STNIC_WRITE (STNIC_CR, CR_RDMA | CR_PG0 | CR_STA);
 229 }
 230
 231 /* Block input and output, similar to the Crynwr packet driver. If you are
 232    porting to a new ethercard look at the packet driver source for hints.
 233    The HP LAN doesn't use shared memory -- we put the packet
 234    out through the "remote DMA" dataport. */
 235
 236 static void
 237 stnic_block_input (struct net_device *dev, int length, struct sk_buff *skb,
 238                    int offset)
 239 {
 240   char *buf = skb->data;
 241   half val;
 242
 243   STNIC_WRITE (PG0_RSAR0, offset & 0xff);
 244   STNIC_WRITE (PG0_RSAR1, offset >> 8);
 245   STNIC_WRITE (PG0_RBCR0, length & 0xff);
 246   STNIC_WRITE (PG0_RBCR1, length >> 8);
 247   STNIC_WRITE (STNIC_CR, CR_RRD | CR_PG0 | CR_STA);
 248
 249   if (length & 1)
 250     length++;
 251
 252   while (length > 0)
 253     {
 254       val = *(vhalf *) PA_83902_IF;
 255 #ifdef __LITTLE_ENDIAN__
 256       *buf++ = val & 0xff;
 257       *buf++ = val >> 8;
 258 #else
 259       *buf++ = val >> 8;
 260       *buf++ = val & 0xff;
 261 #endif
 262       STNIC_DELAY ();
 263       length -= sizeof (half);
 264     }
 265
 266   STNIC_WRITE (STNIC_CR, CR_RDMA | CR_PG0 | CR_STA);
 267 }
 268
 269 static void
 270 stnic_block_output (struct net_device *dev, int length,
 271                     const unsigned char *buf, int output_page)
 272 {
 273   STNIC_WRITE (PG0_RBCR0, 1);   /* Write non-zero value */
 274   STNIC_WRITE (STNIC_CR, CR_RRD | CR_PG0 | CR_STA);
 275   STNIC_DELAY ();
 276
 277   STNIC_WRITE (PG0_RBCR0, length & 0xff);
 278   STNIC_WRITE (PG0_RBCR1, length >> 8);
 279   STNIC_WRITE (PG0_RSAR0, 0);
 280   STNIC_WRITE (PG0_RSAR1, output_page);
 281   STNIC_WRITE (STNIC_CR, CR_RWR | CR_PG0 | CR_STA);
 282
 283   if (length & 1)
 284     length++;
 285
 286   while (length > 0)
 287     {
 288 #ifdef __LITTLE_ENDIAN__
 289       *(vhalf *) PA_83902_IF = ((half) buf[1] << 8) | buf[0];
 290 #else
 291       *(vhalf *) PA_83902_IF = ((half) buf[0] << 8) | buf[1];
 292 #endif
 293       STNIC_DELAY ();
 294       buf += sizeof (half);
 295       length -= sizeof (half);
 296     }
 297
 298   STNIC_WRITE (STNIC_CR, CR_RDMA | CR_PG0 | CR_STA);
 299 }
 300
 301 /* This function resets the STNIC if something screws up.  */
 302 static void
 303 stnic_init (struct net_device *dev)
 304 {
 305   stnic_reset (dev);
 306   NS8390_init (dev, 0);
 307   return;
 308 }
 309
 310 static void __exit stnic_cleanup(void)
 311 {
 312         unregister_netdev(stnic_dev);
 313         free_irq(stnic_dev->irq, stnic_dev);
 314         free_netdev(stnic_dev);
 315 }
 316
 317 module_init(stnic_probe);
 318 module_exit(stnic_cleanup);
 319 MODULE_LICENSE("GPL");