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

Linux/Unix编程

开发平台:

Unix_Linux

  1. /*
  2.  * meth.c -- O2 Builtin 10/100 Ethernet driver
  3.  *
  4.  * Copyright (C) 2001 Ilya Volynets
  5.  *
  6.  * This program is free software; you can redistribute it and/or
  7.  * modify it under the terms of the GNU General Public License
  8.  * as published by the Free Software Foundation; either version
  9.  * 2 of the License, or (at your option) any later version.
  10.  */
  11. #include <linux/module.h>
  12. #include <linux/init.h>
  13. #include <linux/sched.h>
  14. #include <linux/kernel.h> /* printk() */
  15. #include <linux/delay.h>
  16. #include <linux/slab.h>
  17. #include <linux/errno.h>  /* error codes */
  18. #include <linux/types.h>  /* size_t */
  19. #include <linux/interrupt.h> /* mark_bh */
  20. #include <linux/pci.h>
  21. #include <linux/in.h>
  22. #include <linux/netdevice.h>   /* struct device, and other headers */
  23. #include <linux/etherdevice.h> /* eth_type_trans */
  24. #include <linux/ip.h>          /* struct iphdr */
  25. #include <linux/tcp.h>         /* struct tcphdr */
  26. #include <linux/skbuff.h>
  27. #include <linux/mii.h> /*MII definitions */
  28. #include <asm/ip32/crime.h>
  29. #include <asm/ip32/mace.h>
  30. #include <asm/ip32/ip32_ints.h>
  31. #include "meth.h"
  32. #include <linux/in6.h>
  33. #include <asm/checksum.h>
  34. #ifndef MFE_DEBUG
  35. #define MFE_DEBUG 0
  36. #endif
  37. #if MFE_DEBUG>=1
  38. #define DPRINTK(str,args...) printk (KERN_DEBUG "meth(%ld): %s: " str, jiffies, __FUNCTION__ , ## args)
  39. #define MFE_RX_DEBUG 2
  40. #else
  41. #define DPRINTK(str,args...)
  42. #define MFE_RX_DEBUG 0
  43. #endif
  44. static const char *version="meth.c: Ilya Volynets (ilya@theIlya.com)";
  45. static const char *meth_str="SGI O2 Fast Ethernet";
  46. MODULE_AUTHOR("Ilya Volynets");
  47. MODULE_DESCRIPTION("SGI O2 Builtin Fast Ethernet driver");
  48. /* This is a load-time options */
  49. /*static int eth = 0;
  50. MODULE_PARM(eth, "i");*/
  51. #define HAVE_TX_TIMEOUT
  52. /* The maximum time waited (in jiffies) before assuming a Tx failed. (400ms) */
  53. #define TX_TIMEOUT (400*HZ/1000)
  54. #ifdef HAVE_TX_TIMEOUT
  55. static int timeout = TX_TIMEOUT;
  56. MODULE_PARM(timeout, "i");
  57. #endif
  58. int meth_eth;
  59. /*
  60.  * This structure is private to each device. It is used to pass
  61.  * packets in and out, so there is place for a packet
  62.  */
  63. typedef struct meth_private {
  64.     struct net_device_stats stats;
  65. volatile struct meth_regs *regs;
  66. u64 mode; /* in-memory copy of MAC control register */
  67. int  phy_addr; /* address of phy, used by mdio_* functions, initialized in mdio_probe*/
  68. tx_packet *tx_ring;
  69. dma_addr_t tx_ring_dma;
  70. int free_space;
  71. struct sk_buff *tx_skbs[TX_RING_ENTRIES];
  72. dma_addr_t      tx_skb_dmas[TX_RING_ENTRIES];
  73. int tx_read,tx_write;
  74. int tx_count;
  75. rx_packet *rx_ring[RX_RING_ENTRIES];
  76. dma_addr_t rx_ring_dmas[RX_RING_ENTRIES];
  77. int rx_write;
  78.     spinlock_t meth_lock;
  79. } meth_private;
  80. extern struct net_device meth_devs[];
  81. void meth_tx_timeout (struct net_device *dev);
  82. void meth_interrupt(int irq, void *dev_id, struct pt_regs *pregs);
  83.         
  84. /* global, initialized in ip32-setup.c */
  85. char o2meth_eaddr[8]={0,0,0,0,0,0,0,0};
  86. static inline void load_eaddr(struct net_device *dev,
  87.       volatile struct meth_regs *regs)
  88. {
  89. int i;
  90. DPRINTK("Loading MAC Address: %02x:%02x:%02x:%02x:%02x:%02xn",
  91. (int)o2meth_eaddr[0]&0xFF,(int)o2meth_eaddr[1]&0xFF,(int)o2meth_eaddr[2]&0xFF,
  92. (int)o2meth_eaddr[3]&0xFF,(int)o2meth_eaddr[4]&0xFF,(int)o2meth_eaddr[5]&0xFF);
  93. //memcpy(dev->dev_addr,o2meth_eaddr+2,6);
  94. for (i=0; i<6; i++)
  95. dev->dev_addr[i]=o2meth_eaddr[i];
  96. regs->mac_addr= //dev->dev_addr[0]|(dev->dev_addr[1]<<8)|
  97. //dev->dev_addr[2]<<16|(dev->dev_addr[3]<<24)|
  98. //dev->dev_addr[4]<<32|(dev->dev_addr[5]<<40);
  99. (*(u64*)o2meth_eaddr)>>16;
  100. DPRINTK("MAC, finally is %0lxn",regs->mac_addr);
  101. }
  102. /*
  103.  *Waits for BUSY status of mdio bus to clear
  104.  */
  105. #define WAIT_FOR_PHY(___regs, ___rval)
  106. while((___rval=___regs->phy_data)&MDIO_BUSY){
  107. udelay(25);
  108. }
  109. /*read phy register, return value read */
  110. static int mdio_read(meth_private *priv,int phyreg)
  111. {
  112. volatile meth_regs* regs=priv->regs;
  113. volatile u32 rval;
  114. WAIT_FOR_PHY(regs,rval)
  115. regs->phy_registers=(priv->phy_addr<<5)|(phyreg&0x1f);
  116. udelay(25);
  117. regs->phy_trans_go=1;
  118. udelay(25);
  119. WAIT_FOR_PHY(regs,rval)
  120. return rval&MDIO_DATA_MASK;
  121. }
  122. /*write phy register */
  123. static void mdio_write(meth_private* priv,int pfyreg,int val)
  124. {
  125. volatile meth_regs* regs=priv->regs;
  126. int rval;
  127. /// DPRINTK("Trying to write value %i to reguster %in",val, pfyreg);
  128. spin_lock_irq(&priv->meth_lock);
  129. WAIT_FOR_PHY(regs,rval)
  130. regs->phy_registers=(priv->phy_addr<<5)|(pfyreg&0x1f);
  131. regs->phy_data=val;
  132. udelay(25);
  133. WAIT_FOR_PHY(regs,rval)
  134. spin_unlock_irq(&priv->meth_lock);
  135. }
  136. /* Modify phy register using given mask and value */
  137. static void mdio_update(meth_private* priv,int phyreg, int val, int mask)
  138. {
  139. int rval;
  140. DPRINTK("RMW value %i to PHY register %i with mask %in",val,phyreg,mask);
  141. rval=mdio_read(priv,phyreg);
  142. rval=(rval&~mask)|(val&mask);
  143. mdio_write(priv,phyreg,rval);
  144. }
  145. /* handle errata data on MDIO bus */
  146. //static void mdio_errata(meth_private *priv)
  147. //{
  148. /* Hmmm... what the hell is phyerrata? does it come from sys init parameters in IRIX */
  149. //}
  150. static int mdio_probe(meth_private *priv)
  151. {
  152. int i, p2, p3;
  153. DPRINTK("Detecting PHY kindn");
  154. /* check if phy is detected already */
  155. if(priv->phy_addr>=0&&priv->phy_addr<32)
  156. return 0;
  157. spin_lock_irq(&priv->meth_lock);
  158. for (i=0;i<32;++i){
  159. priv->phy_addr=(char)i;
  160. p2=mdio_read(priv,2);
  161. #ifdef MFE_DEBUG
  162. p3=mdio_read(priv,3);
  163. switch ((p2<<12)|(p3>>4)){
  164. case PHY_QS6612X:
  165. DPRINTK("PHY is QS6612Xn");
  166. break;
  167. case PHY_ICS1889:
  168. DPRINTK("PHY is ICS1889n");
  169. break;
  170. case PHY_ICS1890:
  171. DPRINTK("PHY is ICS1890n");
  172. break;
  173. case PHY_DP83840:
  174. DPRINTK("PHY is DP83840n");
  175. break;
  176. }
  177. #endif
  178. if(p2!=0xffff&&p2!=0x0000){
  179. DPRINTK("PHY code: %xn",(p2<<12)|(p3>>4));
  180. break;
  181. }
  182. }
  183. spin_unlock_irq(&priv->meth_lock);
  184. if(priv->phy_addr<32) {
  185. return 0;
  186. }
  187. DPRINTK("Oopsie! PHY is not known!n");
  188. priv->phy_addr=-1;
  189. return -ENODEV;
  190. }
  191. static void meth_check_link(struct net_device *dev)
  192. {
  193. struct meth_private *priv = (struct meth_private *) dev->priv;
  194. int mii_partner = mdio_read(priv, 5);
  195. int mii_advertising = mdio_read(priv, 4);
  196. int negotiated = mii_advertising & mii_partner;
  197. int duplex, speed;
  198. if (mii_partner == 0xffff)
  199. return;
  200. duplex = ((negotiated & 0x0100) || (negotiated & 0x01C0) == 0x0040)?METH_PHY_FDX:0;
  201. speed = (negotiated & 0x0380)?METH_100MBIT:0;
  202. if ((priv->mode & METH_PHY_FDX) ^ duplex)
  203. {
  204. DPRINTK("Setting %s-duplexn", duplex ? "full" : "half");
  205. if (duplex)
  206. priv->mode |= METH_PHY_FDX;
  207. else
  208. priv->mode &= ~METH_PHY_FDX;
  209. priv->regs->mac_ctrl = priv->mode;
  210. }
  211. if ((priv->mode & METH_100MBIT) ^ speed)
  212. {
  213. DPRINTK("Setting %dMbs moden", speed ? 100 : 10);
  214. if (duplex)
  215. priv->mode |= METH_100MBIT;
  216. else
  217. priv->mode &= ~METH_100MBIT;
  218. priv->regs->mac_ctrl = priv->mode;
  219. }
  220. }
  221. static int meth_init_tx_ring(meth_private *priv)
  222. {
  223. /* Init TX ring */
  224. DPRINTK("Initializing TX ringn");
  225. priv->tx_ring = (tx_packet *) pci_alloc_consistent(NULL,TX_RING_BUFFER_SIZE,&(priv->tx_ring_dma));
  226. if(!priv->tx_ring)
  227. return -ENOMEM;
  228. memset(priv->tx_ring, 0, TX_RING_BUFFER_SIZE);
  229. priv->tx_count = priv->tx_read = priv->tx_write = 0;
  230. priv->regs->tx_ring_base = priv->tx_ring_dma;
  231. priv->free_space = TX_RING_ENTRIES;
  232. /* Now init skb save area */
  233. memset(priv->tx_skbs,0,sizeof(priv->tx_skbs));
  234. memset(priv->tx_skb_dmas,0,sizeof(priv->tx_skb_dmas));
  235. DPRINTK("Done with TX ring initn");
  236. return 0;
  237. }
  238. static int meth_init_rx_ring(meth_private *priv)
  239. {
  240. int i;
  241. DPRINTK("Initializing RX ringn");
  242. for(i=0;i<RX_RING_ENTRIES;i++){
  243. DPRINTK("t1:t%it",i);
  244. /*if(!(priv->rx_ring[i]=get_free_page(GFP_KERNEL)))
  245. return -ENOMEM;
  246. DPRINTK("t2:t%in",i);*/
  247. priv->rx_ring[i]=(rx_packet*)pci_alloc_consistent(NULL,METH_RX_BUFF_SIZE,&(priv->rx_ring_dmas[i]));
  248. /* I'll need to re-sync it after each RX */
  249. DPRINTK("t%pn",priv->rx_ring[i]);
  250. priv->regs->rx_fifo=priv->rx_ring_dmas[i];
  251. }
  252. priv->rx_write = 0;
  253. DPRINTK("Done with RX ringn");
  254. return 0;
  255. }
  256. static void meth_free_tx_ring(meth_private *priv)
  257. {
  258. int i;
  259. /* Remove any pending skb */
  260. for (i = 0; i < TX_RING_ENTRIES; i++) {
  261.   if (priv->tx_skbs[i])
  262. dev_kfree_skb(priv->tx_skbs[i]);
  263. priv->tx_skbs[i] = NULL;
  264. }
  265. pci_free_consistent(NULL,
  266.     TX_RING_BUFFER_SIZE,
  267.     priv->tx_ring,
  268.     priv->tx_ring_dma);
  269. }
  270. static void meth_free_rx_ring(meth_private *priv)
  271. {
  272. int i;
  273. for(i=0;i<RX_RING_ENTRIES;i++)
  274. pci_free_consistent(NULL,
  275.     METH_RX_BUFF_SIZE,
  276.     priv->rx_ring[i],
  277.     priv->rx_ring_dmas[i]);
  278. }
  279. int meth_reset(struct net_device *dev)
  280. {
  281. struct meth_private *priv = (struct meth_private *) dev->priv;
  282. /* Reset card */
  283. priv->regs->mac_ctrl = SGI_MAC_RESET;
  284. priv->regs->mac_ctrl = 0;
  285. udelay(25);
  286. DPRINTK("MAC control after reset: %016lxn", priv->regs->mac_ctrl);
  287. /* Load ethernet address */
  288. load_eaddr(dev, priv->regs);
  289. /* Should load some "errata", but later */
  290. /* Check for device */
  291. if(mdio_probe(priv) < 0) {
  292. DPRINTK("Unable to find PHYn");
  293. return -ENODEV;
  294. }
  295. /* Initial mode -- 10|Half-duplex|Accept normal packets */
  296. priv->mode=METH_ACCEPT_MCAST|METH_DEFAULT_IPG;
  297. if(dev->flags | IFF_PROMISC)
  298. priv->mode |= METH_PROMISC;
  299. priv->regs->mac_ctrl = priv->mode;
  300. /* Autonegociate speed and duplex mode */
  301. meth_check_link(dev);
  302. /* Now set dma control, but don't enable DMA, yet */
  303. priv->regs->dma_ctrl= (4 << METH_RX_OFFSET_SHIFT) |
  304.               (RX_RING_ENTRIES << METH_RX_DEPTH_SHIFT);
  305. return(0);
  306. }
  307. /*============End Helper Routines=====================*/
  308. /*
  309.  * Open and close
  310.  */
  311. int meth_open(struct net_device *dev)
  312. {
  313. meth_private *priv=dev->priv;
  314. volatile meth_regs *regs=priv->regs;
  315. MOD_INC_USE_COUNT;
  316. /* Start DMA */
  317. regs->dma_ctrl|=
  318.         METH_DMA_TX_EN|/*METH_DMA_TX_INT_EN|*/
  319. METH_DMA_RX_EN|METH_DMA_RX_INT_EN;
  320. if(request_irq(dev->irq,meth_interrupt,SA_SHIRQ,meth_str,dev)){
  321. printk(KERN_ERR "%s: Can't get irq %dn", dev->name, dev->irq);
  322. return -EAGAIN;
  323. }
  324. netif_start_queue(dev);
  325. DPRINTK("Opened... DMA control=0x%08lxn", regs->dma_ctrl);
  326. return 0;
  327. }
  328. int meth_release(struct net_device *dev)
  329. {
  330.     netif_stop_queue(dev); /* can't transmit any more */
  331. /* shut down dma */
  332. ((meth_private*)(dev->priv))->regs->dma_ctrl&=
  333. ~(METH_DMA_TX_EN|METH_DMA_TX_INT_EN|
  334. METH_DMA_RX_EN|METH_DMA_RX_INT_EN);
  335. free_irq(dev->irq, dev);
  336.     MOD_DEC_USE_COUNT;
  337.     return 0;
  338. }
  339. /*
  340.  * Configuration changes (passed on by ifconfig)
  341.  */
  342. int meth_config(struct net_device *dev, struct ifmap *map)
  343. {
  344.     if (dev->flags & IFF_UP) /* can't act on a running interface */
  345.         return -EBUSY;
  346.     /* Don't allow changing the I/O address */
  347.     if (map->base_addr != dev->base_addr) {
  348.         printk(KERN_WARNING "meth: Can't change I/O addressn");
  349.         return -EOPNOTSUPP;
  350.     }
  351.     /* Allow changing the IRQ */
  352.     if (map->irq != dev->irq) {
  353.         printk(KERN_WARNING "meth: Can't change IRQn");
  354.         return -EOPNOTSUPP;
  355.     }
  356. DPRINTK("Configuredn");
  357.     /* ignore other fields */
  358.     return 0;
  359. }
  360. /*
  361.  * Receive a packet: retrieve, encapsulate and pass over to upper levels
  362.  */
  363. void meth_rx(struct net_device* dev)
  364. {
  365.     struct sk_buff *skb;
  366.     struct meth_private *priv = (struct meth_private *) dev->priv;
  367. rx_packet *rxb;
  368. DPRINTK("RX...n");
  369. // TEMP while((rxb=priv->rx_ring[priv->rx_write])->status.raw&0x8000000000000000){
  370. while((rxb=priv->rx_ring[priv->rx_write])->status.raw&0x8000000000000000){
  371.         int len=rxb->status.parsed.rx_len - 4; /* omit CRC */
  372. DPRINTK("(%i)n",priv->rx_write);
  373. /* length sanity check */
  374. if(len < 60 || len > 1518) {
  375.   printk(KERN_DEBUG "%s: bogus packet size: %d, status=%#2x.n",
  376.  dev->name, priv->rx_write, rxb->status.raw);
  377.   priv->stats.rx_errors++;
  378.   priv->stats.rx_length_errors++;
  379. }
  380. if(!(rxb->status.raw&METH_RX_STATUS_ERRORS)){
  381. skb=alloc_skb(len+2,GFP_ATOMIC);/* Should be atomic -- we are in interrupt */
  382. if(!skb){
  383. /* Ouch! No memory! Drop packet on the floor */
  384. DPRINTK("!!!>>>Ouch! Not enough Memory for RX buffer!n");
  385. priv->stats.rx_dropped++;
  386. } else {
  387. skb_reserve(skb, 2); /* align IP on 16B boundary */  
  388.      memcpy(skb_put(skb, len), rxb->buf, len);
  389.     /* Write metadata, and then pass to the receive level */
  390.     skb->dev = dev;
  391.     skb->protocol = eth_type_trans(skb, dev);
  392. //skb->ip_summed = CHECKSUM_UNNECESSARY; /* don't check it */
  393.    
  394. DPRINTK("passing packetn");
  395. DPRINTK("len = %d rxb->status = %xn",
  396. len, rxb->status.raw);
  397. netif_rx(skb);
  398. dev->last_rx = jiffies;
  399. priv->stats.rx_packets++;
  400. priv->stats.rx_bytes+=len;
  401. DPRINTK("There we go... Whew...n");
  402. }
  403. }
  404. priv->regs->rx_fifo=priv->rx_ring_dmas[priv->rx_write];
  405. rxb->status.raw=0;
  406. priv->rx_write=(priv->rx_write+1)&(RX_RING_ENTRIES-1);
  407. }
  408. }
  409. static int meth_tx_full(struct net_device *dev)
  410. {
  411. struct meth_private *priv = (struct meth_private *) dev->priv;
  412. return(priv->tx_count >= TX_RING_ENTRIES-1);
  413. }
  414. void meth_tx_cleanup(struct net_device* dev, int rptr)
  415. {
  416. meth_private *priv=dev->priv;
  417. tx_packet* status;
  418. struct sk_buff *skb;
  419. spin_lock(&priv->meth_lock);
  420. /* Stop DMA */
  421. priv->regs->dma_ctrl &= ~(METH_DMA_TX_INT_EN);
  422. while(priv->tx_read != rptr){
  423. skb = priv->tx_skbs[priv->tx_read];
  424. status = &priv->tx_ring[priv->tx_read];
  425. if(!status->header.res.sent)
  426. break;
  427. if(status->header.raw & METH_TX_STATUS_DONE) {
  428. priv->stats.tx_packets++;
  429. priv->stats.tx_bytes += skb->len;
  430. }
  431. dev_kfree_skb_irq(skb);
  432. priv->tx_skbs[priv->tx_read] = NULL;
  433. status->header.raw = 0;
  434. priv->tx_read = (priv->tx_read+1)&(TX_RING_ENTRIES-1);
  435. priv->tx_count --;
  436. }
  437. /* wake up queue if it was stopped */
  438. if (netif_queue_stopped(dev) && ! meth_tx_full(dev)) {
  439. netif_wake_queue(dev);
  440. }
  441. spin_unlock(priv->meth_lock);
  442. }
  443. /*
  444.  * The typical interrupt entry point
  445.  */
  446. void meth_interrupt(int irq, void *dev_id, struct pt_regs *pregs)
  447. {
  448. struct meth_private *priv;
  449. union {
  450. u32 reg; /*Whole status register */
  451. struct {
  452. u32 : 2,
  453. rx_seq : 5,
  454. tx_read : 9,
  455. rx_read : 8,
  456. int_mask: 8;
  457. } parsed;
  458. } status;
  459. /*
  460.  * As usual, check the "device" pointer for shared handlers.
  461.  * Then assign "struct device *dev"
  462.  */
  463. struct net_device *dev = (struct net_device *)dev_id;
  464. /* ... and check with hw if it's really ours */
  465. if (!dev /*paranoid*/ ) return;
  466. /* Lock the device */
  467. priv = (struct meth_private *) dev->priv;
  468. status.reg = priv->regs->int_flags;
  469.     
  470. DPRINTK("Interrupt, status %08x...n",status.reg);
  471. if (status.parsed.int_mask & METH_INT_RX_THRESHOLD) {
  472. /* send it to meth_rx for handling */
  473. meth_rx(dev);
  474. }
  475. if (status.parsed.int_mask & (METH_INT_TX_EMPTY|METH_INT_TX_PKT)) {
  476. /* a transmission is over: free the skb */
  477. meth_tx_cleanup(dev, status.parsed.tx_read);
  478. }
  479. /* check for errors too... */
  480. if (status.parsed.int_mask & (METH_INT_TX_LINK_FAIL))
  481. printk(KERN_WARNING "meth: link failuren");
  482. if (status.parsed.int_mask & (METH_INT_MEM_ERROR))
  483. printk(KERN_WARNING "meth: memory errorn");
  484. if (status.parsed.int_mask & (METH_INT_TX_ABORT))
  485. printk(KERN_WARNING "meth: abortedn");
  486. DPRINTK("Interrupt handling done...n");
  487. priv->regs->int_flags=status.reg&0xff; /* clear interrupts */
  488. }
  489. /*
  490.  * Transmits packets that fit into TX descriptor (are <=120B)
  491.  */
  492. static void meth_tx_short_prepare(meth_private* priv, struct sk_buff* skb)
  493. {
  494. tx_packet *desc=&priv->tx_ring[priv->tx_write];
  495. int len = (skb->len<ETH_ZLEN)?ETH_ZLEN:skb->len;
  496. DPRINTK("preparing short packetn");
  497. /* maybe I should set whole thing to 0 first... */
  498. memcpy(desc->data.dt+(120-len),skb->data,skb->len);
  499. if(skb->len < len)
  500. memset(desc->data.dt+120-len+skb->len,0,len-skb->len);
  501. desc->header.raw=METH_TX_CMD_INT_EN|(len-1)|((128-len)<<16);
  502. DPRINTK("desc=%016lxn",desc->header.raw);
  503. }
  504. #define TX_CATBUF1 BIT(25)
  505. static void meth_tx_1page_prepare(meth_private* priv, struct sk_buff* skb)
  506. {
  507. tx_packet *desc=&priv->tx_ring[priv->tx_write];
  508. void *buffer_data = (void *)(((u64)skb->data + 7ULL) & (~7ULL));
  509. int unaligned_len = (int)((u64)buffer_data - (u64)skb->data);
  510. int buffer_len = skb->len - unaligned_len;
  511. dma_addr_t catbuf;
  512. DPRINTK("preparing 1 page...n");
  513. DPRINTK("length=%d data=%pn", skb->len, skb->data);
  514. DPRINTK("unaligned_len=%dn", unaligned_len);
  515. DPRINTK("buffer_data=%p buffer_len=%dn",
  516.        buffer_data,
  517.        buffer_len);
  518. desc->header.raw=METH_TX_CMD_INT_EN|TX_CATBUF1|(skb->len-1);
  519. /* unaligned part */
  520. if(unaligned_len){
  521. memcpy(desc->data.dt+(120-unaligned_len),
  522.        skb->data, unaligned_len);
  523. desc->header.raw |= (128-unaligned_len) << 16;
  524. }
  525. /* first page */
  526. catbuf = pci_map_single(NULL,
  527. buffer_data,
  528. buffer_len,
  529. PCI_DMA_TODEVICE);
  530. DPRINTK("catbuf=%xn", catbuf);
  531. desc->data.cat_buf[0].form.start_addr = catbuf >> 3;
  532. desc->data.cat_buf[0].form.len = buffer_len-1;
  533. DPRINTK("desc=%016lxn",desc->header.raw);
  534. DPRINTK("cat_buf[0].raw=%016lxn",desc->data.cat_buf[0].raw);
  535. }
  536. #define TX_CATBUF2 BIT(26)
  537. static void meth_tx_2page_prepare(meth_private* priv, struct sk_buff* skb)
  538. {
  539. tx_packet *desc=&priv->tx_ring[priv->tx_write];
  540. void *buffer1_data = (void *)(((u64)skb->data + 7ULL) & (~7ULL));
  541. void *buffer2_data = (void *)PAGE_ALIGN((u64)skb->data);
  542. int unaligned_len = (int)((u64)buffer1_data - (u64)skb->data);
  543. int buffer1_len = (int)((u64)buffer2_data - (u64)buffer1_data);
  544. int buffer2_len = skb->len - buffer1_len - unaligned_len;
  545. dma_addr_t catbuf1, catbuf2;
  546. DPRINTK("preparing 2 pages... n");
  547. DPRINTK("length=%d data=%pn", skb->len, skb->data);
  548. DPRINTK("unaligned_len=%dn", unaligned_len);
  549. DPRINTK("buffer1_data=%p buffer1_len=%dn",
  550.        buffer1_data,
  551.        buffer1_len);
  552. DPRINTK("buffer2_data=%p buffer2_len=%dn",
  553.        buffer2_data,
  554.        buffer2_len);
  555. desc->header.raw=METH_TX_CMD_INT_EN|TX_CATBUF1|TX_CATBUF2|(skb->len-1);
  556. /* unaligned part */
  557. if(unaligned_len){
  558. memcpy(desc->data.dt+(120-unaligned_len),
  559.        skb->data, unaligned_len);
  560. desc->header.raw |= (128-unaligned_len) << 16;
  561. }
  562. /* first page */
  563. catbuf1 = pci_map_single(NULL,
  564.  buffer1_data,
  565.  buffer1_len,
  566.  PCI_DMA_TODEVICE);
  567. DPRINTK("catbuf1=%xn", catbuf1);
  568. desc->data.cat_buf[0].form.start_addr = catbuf1 >> 3;
  569. desc->data.cat_buf[0].form.len = buffer1_len-1;
  570. /* second page */
  571. catbuf2 = pci_map_single(NULL,
  572.  buffer2_data,
  573.  buffer2_len,
  574.  PCI_DMA_TODEVICE);
  575. DPRINTK("catbuf2=%xn", catbuf2);
  576. desc->data.cat_buf[1].form.start_addr = catbuf2 >> 3;
  577. desc->data.cat_buf[1].form.len = buffer2_len-1;
  578. DPRINTK("desc=%016lxn",desc->header.raw);
  579. DPRINTK("cat_buf[0].raw=%016lxn",desc->data.cat_buf[0].raw);
  580. DPRINTK("cat_buf[1].raw=%016lxn",desc->data.cat_buf[1].raw);
  581. }
  582. void meth_add_to_tx_ring(meth_private *priv, struct sk_buff* skb)
  583. {
  584. DPRINTK("Transmitting data...n");
  585. if(skb->len <= 120) {
  586. /* Whole packet fits into descriptor */
  587. meth_tx_short_prepare(priv,skb);
  588. } else if(PAGE_ALIGN((u64)skb->data) !=
  589.   PAGE_ALIGN((u64)skb->data+skb->len-1)) {
  590. /* Packet crosses page boundary */
  591. meth_tx_2page_prepare(priv,skb);
  592. } else {
  593. /* Packet is in one page */
  594. meth_tx_1page_prepare(priv,skb);
  595. }
  596. /* Remember the skb, so we can free it at interrupt time */
  597. priv->tx_skbs[priv->tx_write] = skb;
  598. priv->tx_write = (priv->tx_write+1) & (TX_RING_ENTRIES-1);
  599. priv->regs->tx_info.wptr = priv->tx_write;
  600. priv->tx_count ++;
  601. /* Enable DMA transfer */
  602. priv->regs->dma_ctrl |= METH_DMA_TX_INT_EN;
  603. }
  604. /*
  605.  * Transmit a packet (called by the kernel)
  606.  */
  607. int meth_tx(struct sk_buff *skb, struct net_device *dev)
  608. {
  609. struct meth_private *priv = (struct meth_private *) dev->priv;
  610. spin_lock_irq(&priv->meth_lock);
  611. meth_add_to_tx_ring(priv, skb);
  612. dev->trans_start = jiffies; /* save the timestamp */
  613. /* If TX ring is full, tell the upper layer to stop sending packets */
  614. if (meth_tx_full(dev)) {
  615.         DPRINTK("TX full: stoppingn");
  616. netif_stop_queue(dev);
  617. }
  618. spin_unlock_irq(&priv->meth_lock);
  619. return 0;
  620. }
  621. /*
  622.  * Deal with a transmit timeout.
  623.  */
  624. void meth_tx_timeout (struct net_device *dev)
  625. {
  626. struct meth_private *priv = (struct meth_private *) dev->priv;
  627. printk(KERN_WARNING "%s: transmit timed outn", dev->name);
  628. /* Protect against concurrent rx interrupts */
  629. spin_lock_irq(&priv->meth_lock);
  630. /* Try to reset the adaptor. */
  631. meth_reset(dev);
  632. priv->stats.tx_errors++;
  633. /* Clear all rings */
  634. meth_free_tx_ring(priv);
  635. meth_free_rx_ring(priv);
  636. meth_init_tx_ring(priv);
  637. meth_init_rx_ring(priv);
  638. /* Restart dma */
  639. priv->regs->dma_ctrl|=METH_DMA_TX_EN|METH_DMA_RX_EN|METH_DMA_RX_INT_EN;
  640. /* Enable interrupt */
  641. spin_unlock_irq(&priv->meth_lock);
  642. dev->trans_start = jiffies;
  643. netif_wake_queue(dev);
  644. return;
  645. }
  646. /*
  647.  * Ioctl commands 
  648.  */
  649. int meth_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
  650. {
  651.  
  652.     DPRINTK("ioctln");
  653.     return 0;
  654. }
  655. /*
  656.  * Return statistics to the caller
  657.  */
  658. struct net_device_stats *meth_stats(struct net_device *dev)
  659. {
  660.     struct meth_private *priv = (struct meth_private *) dev->priv;
  661.     return &priv->stats;
  662. }
  663. /*
  664.  * The init function (sometimes called probe).
  665.  * It is invoked by register_netdev()
  666.  */
  667. int meth_init(struct net_device *dev)
  668. {
  669. meth_private *priv;
  670. int ret;
  671. /* 
  672.  * Then, assign other fields in dev, using ether_setup() and some
  673.  * hand assignments
  674.  */
  675. ether_setup(dev); /* assign some of the fields */
  676. dev->open            = meth_open;
  677. dev->stop            = meth_release;
  678. dev->set_config      = meth_config;
  679. dev->hard_start_xmit = meth_tx;
  680. dev->do_ioctl        = meth_ioctl;
  681. dev->get_stats       = meth_stats;
  682. #ifdef HAVE_TX_TIMEOUT
  683. dev->tx_timeout      = meth_tx_timeout;
  684. dev->watchdog_timeo  = timeout;
  685. #endif
  686. dev->irq  = MACE_ETHERNET_IRQ;
  687. SET_MODULE_OWNER(dev);
  688. /*
  689.  * Then, allocate the priv field. This encloses the statistics
  690.  * and a few private fields.
  691.  */
  692. priv = kmalloc(sizeof(struct meth_private), GFP_KERNEL);
  693. if (priv == NULL)
  694. return -ENOMEM;
  695. dev->priv=priv;
  696. memset(priv, 0, sizeof(struct meth_private));
  697. spin_lock_init(&((struct meth_private *) dev->priv)->meth_lock);
  698. /*
  699.  * Make the usual checks: check_region(), probe irq, ...  -ENODEV
  700.  * should be returned if no device found.  No resource should be
  701.  * grabbed: this is done on open(). 
  702.  */
  703. priv->regs=(meth_regs*)SGI_MFE;
  704. dev->base_addr=SGI_MFE;
  705. priv->phy_addr = -1; /* No phy is known yet... */
  706. /* Initialize the hardware */
  707. if((ret=meth_reset(dev)) < 0)
  708.         return ret;
  709. /* Allocate the ring buffers */
  710. if((ret=meth_init_tx_ring(priv))<0||(ret=meth_init_rx_ring(priv))<0){
  711. meth_free_tx_ring(priv);
  712. meth_free_rx_ring(priv);
  713. return ret;
  714. }
  715. printk("SGI O2 Fast Ethernet rev. %ldn", priv->regs->mac_ctrl >> 29);
  716.     return 0;
  717. }
  718. /*
  719.  * The devices
  720.  */
  721. struct net_device meth_devs[1] = {
  722.     { init: meth_init, }  /* init, nothing more */
  723. };
  724. /*
  725.  * Finally, the module stuff
  726.  */
  727. int meth_init_module(void)
  728. {
  729. int result, device_present = 0;
  730. strcpy(meth_devs[0].name, "eth%d");
  731. if ( (result = register_netdev(meth_devs)) )
  732. printk("meth: error %i registering device "%s"n",
  733.        result, meth_devs->name);
  734. else device_present++;
  735. #ifndef METH_DEBUG
  736. EXPORT_NO_SYMBOLS;
  737. #endif
  738. return device_present ? 0 : -ENODEV;
  739. }
  740. void meth_cleanup(void)
  741. {
  742.     kfree(meth_devs->priv);
  743.     unregister_netdev(meth_devs);
  744.     return;
  745. }
  746. module_init(meth_init_module);
  747. module_exit(meth_cleanup);