开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Linux/Unix编程 > 查看源码
myri_sbus.c
资源名称：linux-2.4.20.tar.gz　[点击查看]
上传用户：jlfgdled
上传日期：2013-04-10
资源大小：33168k
文件大小：31k
源码类别：

Linux/Unix编程

开发平台：

Unix_Linux

myri_sbus.c：源码内容
  1. /* myri_sbus.h: MyriCOM MyriNET SBUS card driver.
  2.  *
  3.  * Copyright (C) 1996, 1999 David S. Miller (davem@redhat.com)
  4.  */
  6. static char version[] =
  7.         "myri_sbus.c:v1.9 12/Sep/99 David S. Miller (davem@redhat.com)n";
  9. #include <linux/module.h>
  11. #include <linux/config.h>
  12. #include <linux/kernel.h>
  13. #include <linux/sched.h>
  14. #include <linux/types.h>
  15. #include <linux/fcntl.h>
  16. #include <linux/interrupt.h>
  17. #include <linux/ptrace.h>
  18. #include <linux/ioport.h>
  19. #include <linux/in.h>
  20. #include <linux/slab.h>
  21. #include <linux/string.h>
  22. #include <linux/delay.h>
  23. #include <linux/init.h>
  25. #include <asm/system.h>
  26. #include <asm/bitops.h>
  27. #include <asm/io.h>
  28. #include <asm/dma.h>
  29. #include <linux/errno.h>
  30. #include <asm/byteorder.h>
  32. #include <asm/idprom.h>
  33. #include <asm/sbus.h>
  34. #include <asm/openprom.h>
  35. #include <asm/oplib.h>
  36. #include <asm/auxio.h>
  37. #include <asm/pgtable.h>
  38. #include <asm/irq.h>
  40. #include <linux/netdevice.h>
  41. #include <linux/etherdevice.h>
  42. #include <linux/skbuff.h>
  44. #include <net/dst.h>
  45. #include <net/arp.h>
  46. #include <net/sock.h>
  47. #include <net/ipv6.h>
  49. #include <asm/checksum.h>
  51. #include "myri_sbus.h"
  53. #include "myri_code.h"
  55. /* #define DEBUG_DETECT */
  56. /* #define DEBUG_IRQ */
  57. /* #define DEBUG_TRANSMIT */
  58. /* #define DEBUG_RECEIVE */
  59. /* #define DEBUG_HEADER */
  61. #ifdef DEBUG_DETECT
  62. #define DET(x)   printk x
  63. #else
  64. #define DET(x)
  65. #endif
  67. #ifdef DEBUG_IRQ
  68. #define DIRQ(x)  printk x
  69. #else
  70. #define DIRQ(x)
  71. #endif
  73. #ifdef DEBUG_TRANSMIT
  74. #define DTX(x)  printk x
  75. #else
  76. #define DTX(x)
  77. #endif
  79. #ifdef DEBUG_RECEIVE
  80. #define DRX(x)  printk x
  81. #else
  82. #define DRX(x)
  83. #endif
  85. #ifdef DEBUG_HEADER
  86. #define DHDR(x) printk x
  87. #else
  88. #define DHDR(x)
  89. #endif
  91. #ifdef MODULE
  92. static struct myri_eth *root_myri_dev;
  93. #endif
  95. static void myri_reset_off(unsigned long lp, unsigned long cregs)
  96. {
  97. /* Clear IRQ mask. */
  98. sbus_writel(0, lp + LANAI_EIMASK);
  100. /* Turn RESET function off. */
  101. sbus_writel(CONTROL_ROFF, cregs + MYRICTRL_CTRL);
  102. }
  104. static void myri_reset_on(unsigned long cregs)
  105. {
  106. /* Enable RESET function. */
  107. sbus_writel(CONTROL_RON, cregs + MYRICTRL_CTRL);
  109. /* Disable IRQ's. */
  110. sbus_writel(CONTROL_DIRQ, cregs + MYRICTRL_CTRL);
  111. }
  113. static void myri_disable_irq(unsigned long lp, unsigned long cregs)
  114. {
  115. sbus_writel(CONTROL_DIRQ, cregs + MYRICTRL_CTRL);
  116. sbus_writel(0, lp + LANAI_EIMASK);
  117. sbus_writel(ISTAT_HOST, lp + LANAI_ISTAT);
  118. }
  120. static void myri_enable_irq(unsigned long lp, unsigned long cregs)
  121. {
  122. sbus_writel(CONTROL_EIRQ, cregs + MYRICTRL_CTRL);
  123. sbus_writel(ISTAT_HOST, lp + LANAI_EIMASK);
  124. }
  126. static inline void bang_the_chip(struct myri_eth *mp)
  127. {
  128. struct myri_shmem *shmem = mp->shmem;
  129. unsigned long cregs = mp->cregs;
  131. sbus_writel(1, &shmem->send);
  132. sbus_writel(CONTROL_WON, cregs + MYRICTRL_CTRL);
  133. }
  135. static int myri_do_handshake(struct myri_eth *mp)
  136. {
  137. struct myri_shmem *shmem = mp->shmem;
  138. unsigned long cregs = mp->cregs;
  139. struct myri_channel *chan = &shmem->channel;
  140. int tick  = 0;
  142. DET(("myri_do_handshake: "));
  143. if (sbus_readl(&chan->state) == STATE_READY) {
  144. DET(("Already STATE_READY, failed.n"));
  145. return -1; /* We're hosed... */
  146. }
  148. myri_disable_irq(mp->lregs, cregs);
  150. while (tick++ <= 25) {
  151. u32 softstate;
  153. /* Wake it up. */
  154. DET(("shakedown, CONTROL_WON, "));
  155. sbus_writel(1, &shmem->shakedown);
  156. sbus_writel(CONTROL_WON, cregs + MYRICTRL_CTRL);
  158. softstate = sbus_readl(&chan->state);
  159. DET(("chanstate[%08x] ", softstate));
  160. if (softstate == STATE_READY) {
  161. DET(("wakeup successful, "));
  162. break;
  163. }
  165. if (softstate != STATE_WFN) {
  166. DET(("not WFN setting that, "));
  167. sbus_writel(STATE_WFN, &chan->state);
  168. }
  170. udelay(20);
  171. }
  173. myri_enable_irq(mp->lregs, cregs);
  175. if (tick > 25) {
  176. DET(("25 ticks we lose, failure.n"));
  177. return -1;
  178. }
  179. DET(("successn"));
  180. return 0;
  181. }
  183. static int myri_load_lanai(struct myri_eth *mp)
  184. {
  185. struct net_device *dev = mp->dev;
  186. struct myri_shmem *shmem = mp->shmem;
  187. unsigned char *rptr;
  188. int  i;
  190. myri_disable_irq(mp->lregs, mp->cregs);
  191. myri_reset_on(mp->cregs);
  193. rptr = (unsigned char *) mp->lanai;
  194. for (i = 0; i < mp->eeprom.ramsz; i++)
  195. sbus_writeb(0, &rptr[i]);
  197. if (mp->eeprom.cpuvers >= CPUVERS_3_0)
  198. sbus_writel(mp->eeprom.cval, mp->lregs + LANAI_CVAL);
  200. /* Load executable code. */
  201. for (i = 0; i < sizeof(lanai4_code); i++)
  202. sbus_writeb(lanai4_code[i], &rptr[(lanai4_code_off * 2) + i]);
  204. /* Load data segment. */
  205. for (i = 0; i < sizeof(lanai4_data); i++)
  206. sbus_writeb(lanai4_data[i], &rptr[(lanai4_data_off * 2) + i]);
  208. /* Set device address. */
  209. sbus_writeb(0, &shmem->addr[0]);
  210. sbus_writeb(0, &shmem->addr[1]);
  211. for (i = 0; i < 6; i++)
  212. sbus_writeb(dev->dev_addr[i],
  213.     &shmem->addr[i + 2]);
  215. /* Set SBUS bursts and interrupt mask. */
  216. sbus_writel(((mp->myri_bursts & 0xf8) >> 3), &shmem->burst);
  217. sbus_writel(SHMEM_IMASK_RX, &shmem->imask);
  219. /* Release the LANAI. */
  220. myri_disable_irq(mp->lregs, mp->cregs);
  221. myri_reset_off(mp->lregs, mp->cregs);
  222. myri_disable_irq(mp->lregs, mp->cregs);
  224. /* Wait for the reset to complete. */
  225. for (i = 0; i < 5000; i++) {
  226. if (sbus_readl(&shmem->channel.state) != STATE_READY)
  227. break;
  228. else
  229. udelay(10);
  230. }
  232. if (i == 5000)
  233. printk(KERN_ERR "myricom: Chip would not reset after firmware load.n");
  235. i = myri_do_handshake(mp);
  236. if (i)
  237. printk(KERN_ERR "myricom: Handshake with LANAI failed.n");
  239. if (mp->eeprom.cpuvers == CPUVERS_4_0)
  240. sbus_writel(0, mp->lregs + LANAI_VERS);
  242. return i;
  243. }
  245. static void myri_clean_rings(struct myri_eth *mp)
  246. {
  247. struct sendq *sq = mp->sq;
  248. struct recvq *rq = mp->rq;
  249. int i;
  251. sbus_writel(0, &rq->tail);
  252. sbus_writel(0, &rq->head);
  253. for (i = 0; i < (RX_RING_SIZE+1); i++) {
  254. if (mp->rx_skbs[i] != NULL) {
  255. struct myri_rxd *rxd = &rq->myri_rxd[i];
  256. u32 dma_addr;
  258. dma_addr = sbus_readl(&rxd->myri_scatters[0].addr);
  259. sbus_unmap_single(mp->myri_sdev, dma_addr, RX_ALLOC_SIZE, SBUS_DMA_FROMDEVICE);
  260. dev_kfree_skb(mp->rx_skbs[i]);
  261. mp->rx_skbs[i] = NULL;
  262. }
  263. }
  265. mp->tx_old = 0;
  266. sbus_writel(0, &sq->tail);
  267. sbus_writel(0, &sq->head);
  268. for (i = 0; i < TX_RING_SIZE; i++) {
  269. if (mp->tx_skbs[i] != NULL) {
  270. struct sk_buff *skb = mp->tx_skbs[i];
  271. struct myri_txd *txd = &sq->myri_txd[i];
  272. u32 dma_addr;
  274. dma_addr = sbus_readl(&txd->myri_gathers[0].addr);
  275. sbus_unmap_single(mp->myri_sdev, dma_addr, (skb->len + 3) & ~3, SBUS_DMA_TODEVICE);
  276. dev_kfree_skb(mp->tx_skbs[i]);
  277. mp->tx_skbs[i] = NULL;
  278. }
  279. }
  280. }
  282. static void myri_init_rings(struct myri_eth *mp, int from_irq)
  283. {
  284. struct recvq *rq = mp->rq;
  285. struct myri_rxd *rxd = &rq->myri_rxd[0];
  286. struct net_device *dev = mp->dev;
  287. int gfp_flags = GFP_KERNEL;
  288. int i;
  290. if (from_irq || in_interrupt())
  291. gfp_flags = GFP_ATOMIC;
  293. myri_clean_rings(mp);
  294. for (i = 0; i < RX_RING_SIZE; i++) {
  295. struct sk_buff *skb = myri_alloc_skb(RX_ALLOC_SIZE, gfp_flags);
  296. u32 dma_addr;
  298. if (!skb)
  299. continue;
  300. mp->rx_skbs[i] = skb;
  301. skb->dev = dev;
  302. skb_put(skb, RX_ALLOC_SIZE);
  304. dma_addr = sbus_map_single(mp->myri_sdev, skb->data, RX_ALLOC_SIZE, SBUS_DMA_FROMDEVICE);
  305. sbus_writel(dma_addr, &rxd[i].myri_scatters[0].addr);
  306. sbus_writel(RX_ALLOC_SIZE, &rxd[i].myri_scatters[0].len);
  307. sbus_writel(i, &rxd[i].ctx);
  308. sbus_writel(1, &rxd[i].num_sg);
  309. }
  310. sbus_writel(0, &rq->head);
  311. sbus_writel(RX_RING_SIZE, &rq->tail);
  312. }
  314. static int myri_init(struct myri_eth *mp, int from_irq)
  315. {
  316. myri_init_rings(mp, from_irq);
  317. return 0;
  318. }
  320. static void myri_is_not_so_happy(struct myri_eth *mp)
  321. {
  322. }
  324. #ifdef DEBUG_HEADER
  325. static void dump_ehdr(struct ethhdr *ehdr)
  326. {
  327. printk("ehdr[h_dst(%02x:%02x:%02x:%02x:%02x:%02x)"
  328.        "h_source(%02x:%02x:%02x:%02x:%02x:%02x)h_proto(%04x)]n",
  329.        ehdr->h_dest[0], ehdr->h_dest[1], ehdr->h_dest[2],
  330.        ehdr->h_dest[3], ehdr->h_dest[4], ehdr->h_dest[4],
  331.        ehdr->h_source[0], ehdr->h_source[1], ehdr->h_source[2],
  332.        ehdr->h_source[3], ehdr->h_source[4], ehdr->h_source[4],
  333.        ehdr->h_proto);
  334. }
  336. static void dump_ehdr_and_myripad(unsigned char *stuff)
  337. {
  338. struct ethhdr *ehdr = (struct ethhdr *) (stuff + 2);
  340. printk("pad[%02x:%02x]", stuff[0], stuff[1]);
  341. printk("ehdr[h_dst(%02x:%02x:%02x:%02x:%02x:%02x)"
  342.        "h_source(%02x:%02x:%02x:%02x:%02x:%02x)h_proto(%04x)]n",
  343.        ehdr->h_dest[0], ehdr->h_dest[1], ehdr->h_dest[2],
  344.        ehdr->h_dest[3], ehdr->h_dest[4], ehdr->h_dest[4],
  345.        ehdr->h_source[0], ehdr->h_source[1], ehdr->h_source[2],
  346.        ehdr->h_source[3], ehdr->h_source[4], ehdr->h_source[4],
  347.        ehdr->h_proto);
  348. }
  349. #endif
  351. static void myri_tx(struct myri_eth *mp, struct net_device *dev)
  352. {
  353. struct sendq *sq = mp->sq;
  354. int entry = mp->tx_old;
  355. int limit = sbus_readl(&sq->head);
  357. DTX(("entry[%d] limit[%d] ", entry, limit));
  358. if (entry == limit)
  359. return;
  360. while (entry != limit) {
  361. struct sk_buff *skb = mp->tx_skbs[entry];
  362. u32 dma_addr;
  364. DTX(("SKB[%d] ", entry));
  365. dma_addr = sbus_readl(&sq->myri_txd[entry].myri_gathers[0].addr);
  366. sbus_unmap_single(mp->myri_sdev, dma_addr, skb->len, SBUS_DMA_TODEVICE);
  367. dev_kfree_skb(skb);
  368. mp->tx_skbs[entry] = NULL;
  369. mp->enet_stats.tx_packets++;
  370. entry = NEXT_TX(entry);
  371. }
  372. mp->tx_old = entry;
  373. }
  375. /* Determine the packet's protocol ID. The rule here is that we 
  376.  * assume 802.3 if the type field is short enough to be a length.
  377.  * This is normal practice and works for any 'now in use' protocol.
  378.  */
  379. static unsigned short myri_type_trans(struct sk_buff *skb, struct net_device *dev)
  380. {
  381. struct ethhdr *eth;
  382. unsigned char *rawp;
  384. skb->mac.raw = (((unsigned char *)skb->data) + MYRI_PAD_LEN);
  385. skb_pull(skb, dev->hard_header_len);
  386. eth = skb->mac.ethernet;
  388. #ifdef DEBUG_HEADER
  389. DHDR(("myri_type_trans: "));
  390. dump_ehdr(eth);
  391. #endif
  392. if (*eth->h_dest & 1) {
  393. if (memcmp(eth->h_dest, dev->broadcast, ETH_ALEN)==0)
  394. skb->pkt_type = PACKET_BROADCAST;
  395. else
  396. skb->pkt_type = PACKET_MULTICAST;
  397. } else if (dev->flags & (IFF_PROMISC|IFF_ALLMULTI)) {
  398. if (memcmp(eth->h_dest, dev->dev_addr, ETH_ALEN))
  399. skb->pkt_type = PACKET_OTHERHOST;
  400. }
  402. if (ntohs(eth->h_proto) >= 1536)
  403. return eth->h_proto;
  405. rawp = skb->data;
  407. /* This is a magic hack to spot IPX packets. Older Novell breaks
  408.  * the protocol design and runs IPX over 802.3 without an 802.2 LLC
  409.  * layer. We look for FFFF which isn't a used 802.2 SSAP/DSAP. This
  410.  * won't work for fault tolerant netware but does for the rest.
  411.  */
  412. if (*(unsigned short *)rawp == 0xFFFF)
  413. return htons(ETH_P_802_3);
  415. /* Real 802.2 LLC */
  416. return htons(ETH_P_802_2);
  417. }
  419. static void myri_rx(struct myri_eth *mp, struct net_device *dev)
  420. {
  421. struct recvq *rq = mp->rq;
  422. struct recvq *rqa = mp->rqack;
  423. int entry = sbus_readl(&rqa->head);
  424. int limit = sbus_readl(&rqa->tail);
  425. int drops;
  427. DRX(("entry[%d] limit[%d] ", entry, limit));
  428. if (entry == limit)
  429. return;
  430. drops = 0;
  431. DRX(("n"));
  432. while (entry != limit) {
  433. struct myri_rxd *rxdack = &rqa->myri_rxd[entry];
  434. u32 csum = sbus_readl(&rxdack->csum);
  435. int len = sbus_readl(&rxdack->myri_scatters[0].len);
  436. int index = sbus_readl(&rxdack->ctx);
  437. struct myri_rxd *rxd = &rq->myri_rxd[rq->tail];
  438. struct sk_buff *skb = mp->rx_skbs[index];
  440. /* Ack it. */
  441. sbus_writel(NEXT_RX(entry), &rqa->head);
  443. /* Check for errors. */
  444. DRX(("rxd[%d]: %p len[%d] csum[%08x] ", entry, rxd, len, csum));
  445. sbus_dma_sync_single(mp->myri_sdev,
  446.      sbus_readl(&rxd->myri_scatters[0].addr),
  447.      RX_ALLOC_SIZE, SBUS_DMA_FROMDEVICE);
  448. if (len < (ETH_HLEN + MYRI_PAD_LEN) || (skb->data[0] != MYRI_PAD_LEN)) {
  449. DRX(("ERROR["));
  450. mp->enet_stats.rx_errors++;
  451. if (len < (ETH_HLEN + MYRI_PAD_LEN)) {
  452. DRX(("BAD_LENGTH] "));
  453. mp->enet_stats.rx_length_errors++;
  454. } else {
  455. DRX(("NO_PADDING] "));
  456. mp->enet_stats.rx_frame_errors++;
  457. }
  459. /* Return it to the LANAI. */
  460. drop_it:
  461. drops++;
  462. DRX(("DROP "));
  463. mp->enet_stats.rx_dropped++;
  464. sbus_writel(RX_ALLOC_SIZE, &rxd->myri_scatters[0].len);
  465. sbus_writel(index, &rxd->ctx);
  466. sbus_writel(1, &rxd->num_sg);
  467. sbus_writel(NEXT_RX(sbus_readl(&rq->tail)), &rq->tail);
  468. goto next;
  469. }
  471. DRX(("len[%d] ", len));
  472. if (len > RX_COPY_THRESHOLD) {
  473. struct sk_buff *new_skb;
  474. u32 dma_addr;
  476. DRX(("BIGBUFF "));
  477. new_skb = myri_alloc_skb(RX_ALLOC_SIZE, GFP_ATOMIC);
  478. if (new_skb == NULL) {
  479. DRX(("skb_alloc(FAILED) "));
  480. goto drop_it;
  481. }
  482. sbus_unmap_single(mp->myri_sdev,
  483.   sbus_readl(&rxd->myri_scatters[0].addr),
  484.   RX_ALLOC_SIZE,
  485.   SBUS_DMA_FROMDEVICE);
  486. mp->rx_skbs[index] = new_skb;
  487. new_skb->dev = dev;
  488. skb_put(new_skb, RX_ALLOC_SIZE);
  489. dma_addr = sbus_map_single(mp->myri_sdev,
  490.    new_skb->data,
  491.    RX_ALLOC_SIZE,
  492.    SBUS_DMA_FROMDEVICE);
  493. sbus_writel(dma_addr, &rxd->myri_scatters[0].addr);
  494. sbus_writel(RX_ALLOC_SIZE, &rxd->myri_scatters[0].len);
  495. sbus_writel(index, &rxd->ctx);
  496. sbus_writel(1, &rxd->num_sg);
  497. sbus_writel(NEXT_RX(sbus_readl(&rq->tail)), &rq->tail);
  499. /* Trim the original skb for the netif. */
  500. DRX(("trim(%d) ", len));
  501. skb_trim(skb, len);
  502. } else {
  503. struct sk_buff *copy_skb = dev_alloc_skb(len);
  505. DRX(("SMALLBUFF "));
  506. if (copy_skb == NULL) {
  507. DRX(("dev_alloc_skb(FAILED) "));
  508. goto drop_it;
  509. }
  510. /* DMA sync already done above. */
  511. copy_skb->dev = dev;
  512. DRX(("resv_and_put "));
  513. skb_put(copy_skb, len);
  514. memcpy(copy_skb->data, skb->data, len);
  516. /* Reuse original ring buffer. */
  517. DRX(("reuse "));
  518. sbus_writel(RX_ALLOC_SIZE, &rxd->myri_scatters[0].len);
  519. sbus_writel(index, &rxd->ctx);
  520. sbus_writel(1, &rxd->num_sg);
  521. sbus_writel(NEXT_RX(sbus_readl(&rq->tail)), &rq->tail);
  523. skb = copy_skb;
  524. }
  526. /* Just like the happy meal we get checksums from this card. */
  527. skb->csum = csum;
  528. skb->ip_summed = CHECKSUM_UNNECESSARY; /* XXX */
  530. skb->protocol = myri_type_trans(skb, dev);
  531. DRX(("prot[%04x] netif_rx ", skb->protocol));
  532. netif_rx(skb);
  534. dev->last_rx = jiffies;
  535. mp->enet_stats.rx_packets++;
  536. mp->enet_stats.rx_bytes += len;
  537. next:
  538. DRX(("NEXTn"));
  539. entry = NEXT_RX(entry);
  540. }
  541. }
  543. static void myri_interrupt(int irq, void *dev_id, struct pt_regs *regs)
  544. {
  545. struct net_device *dev = (struct net_device *) dev_id;
  546. struct myri_eth *mp = (struct myri_eth *) dev->priv;
  547. unsigned long lregs = mp->lregs;
  548. struct myri_channel *chan = &mp->shmem->channel;
  549. u32 status;
  551. status = sbus_readl(lregs + LANAI_ISTAT);
  552. DIRQ(("myri_interrupt: status[%08x] ", status));
  553. if (status & ISTAT_HOST) {
  554. u32 softstate;
  556. DIRQ(("IRQ_DISAB "));
  557. myri_disable_irq(lregs, mp->cregs);
  558. softstate = sbus_readl(&chan->state);
  559. DIRQ(("state[%08x] ", softstate));
  560. if (softstate != STATE_READY) {
  561. DIRQ(("myri_not_so_happy "));
  562. myri_is_not_so_happy(mp);
  563. }
  564. DIRQ(("nmyri_rx: "));
  565. myri_rx(mp, dev);
  566. DIRQ(("nistat=ISTAT_HOST "));
  567. sbus_writel(ISTAT_HOST, lregs + LANAI_ISTAT);
  568. DIRQ(("IRQ_ENAB "));
  569. myri_enable_irq(lregs, mp->cregs);
  570. }
  571. DIRQ(("n"));
  572. }
  574. static int myri_open(struct net_device *dev)
  575. {
  576. struct myri_eth *mp = (struct myri_eth *) dev->priv;
  578. return myri_init(mp, in_interrupt());
  579. }
  581. static int myri_close(struct net_device *dev)
  582. {
  583. struct myri_eth *mp = (struct myri_eth *) dev->priv;
  585. myri_clean_rings(mp);
  586. return 0;
  587. }
  589. static void myri_tx_timeout(struct net_device *dev)
  590. {
  591. struct myri_eth *mp = (struct myri_eth *) dev->priv;
  593. printk(KERN_ERR "%s: transmit timed out, resettingn", dev->name);
  595. mp->enet_stats.tx_errors++;
  596. myri_init(mp, 0);
  597. netif_wake_queue(dev);
  598. }
  600. static int myri_start_xmit(struct sk_buff *skb, struct net_device *dev)
  601. {
  602. struct myri_eth *mp = (struct myri_eth *) dev->priv;
  603. struct sendq *sq = mp->sq;
  604. struct myri_txd *txd;
  605. unsigned long flags;
  606. unsigned int head, tail;
  607. int len, entry;
  608. u32 dma_addr;
  610. DTX(("myri_start_xmit: "));
  612. myri_tx(mp, dev);
  614. netif_stop_queue(dev);
  616. /* This is just to prevent multiple PIO reads for TX_BUFFS_AVAIL. */
  617. head = sbus_readl(&sq->head);
  618. tail = sbus_readl(&sq->tail);
  620. if (!TX_BUFFS_AVAIL(head, tail)) {
  621. DTX(("no buffs available, returning 1n"));
  622. return 1;
  623. }
  625. save_and_cli(flags);
  627. DHDR(("xmit[skbdata(%p)]n", skb->data));
  628. #ifdef DEBUG_HEADER
  629. dump_ehdr_and_myripad(((unsigned char *) skb->data));
  630. #endif
  632. /* XXX Maybe this can go as well. */
  633. len = skb->len;
  634. if (len & 3) {
  635. DTX(("len&3 "));
  636. len = (len + 4) & (~3);
  637. }
  639. entry = sbus_readl(&sq->tail);
  641. txd = &sq->myri_txd[entry];
  642. mp->tx_skbs[entry] = skb;
  644. /* Must do this before we sbus map it. */
  645. if (skb->data[MYRI_PAD_LEN] & 0x1) {
  646. sbus_writew(0xffff, &txd->addr[0]);
  647. sbus_writew(0xffff, &txd->addr[1]);
  648. sbus_writew(0xffff, &txd->addr[2]);
  649. sbus_writew(0xffff, &txd->addr[3]);
  650. } else {
  651. sbus_writew(0xffff, &txd->addr[0]);
  652. sbus_writew((skb->data[0] << 8) | skb->data[1], &txd->addr[1]);
  653. sbus_writew((skb->data[2] << 8) | skb->data[3], &txd->addr[2]);
  654. sbus_writew((skb->data[4] << 8) | skb->data[5], &txd->addr[3]);
  655. }
  657. dma_addr = sbus_map_single(mp->myri_sdev, skb->data, len, SBUS_DMA_TODEVICE);
  658. sbus_writel(dma_addr, &txd->myri_gathers[0].addr);
  659. sbus_writel(len, &txd->myri_gathers[0].len);
  660. sbus_writel(1, &txd->num_sg);
  661. sbus_writel(KERNEL_CHANNEL, &txd->chan);
  662. sbus_writel(len, &txd->len);
  663. sbus_writel((u32)-1, &txd->csum_off);
  664. sbus_writel(0, &txd->csum_field);
  666. sbus_writel(NEXT_TX(entry), &sq->tail);
  667. DTX(("BangTheChip "));
  668. bang_the_chip(mp);
  670. DTX(("tbusy=0, returning 0n"));
  671. netif_start_queue(dev);
  672. restore_flags(flags);
  673. return 0;
  674. }
  676. /* Create the MyriNet MAC header for an arbitrary protocol layer 
  677.  *
  678.  * saddr=NULL means use device source address
  679.  * daddr=NULL means leave destination address (eg unresolved arp)
  680.  */
  681. static int myri_header(struct sk_buff *skb, struct net_device *dev, unsigned short type,
  682.        void *daddr, void *saddr, unsigned len)
  683. {
  684. struct ethhdr *eth = (struct ethhdr *) skb_push(skb, ETH_HLEN);
  685. unsigned char *pad = (unsigned char *) skb_push(skb, MYRI_PAD_LEN);
  687. #ifdef DEBUG_HEADER
  688. DHDR(("myri_header: pad[%02x,%02x] ", pad[0], pad[1]));
  689. dump_ehdr(eth);
  690. #endif
  692. /* Set the MyriNET padding identifier. */
  693. pad[0] = MYRI_PAD_LEN;
  694. pad[1] = 0xab;
  696. /* Set the protocol type. For a packet of type ETH_P_802_3 we put the length
  697.  * in here instead. It is up to the 802.2 layer to carry protocol information.
  698.  */
  699. if (type != ETH_P_802_3) 
  700. eth->h_proto = htons(type);
  701. else
  702. eth->h_proto = htons(len);
  704. /* Set the source hardware address. */
  705. if (saddr)
  706. memcpy(eth->h_source, saddr, dev->addr_len);
  707. else
  708. memcpy(eth->h_source, dev->dev_addr, dev->addr_len);
  710. /* Anyway, the loopback-device should never use this function... */
  711. if (dev->flags & IFF_LOOPBACK) {
  712. int i;
  713. for (i = 0; i < dev->addr_len; i++)
  714. eth->h_dest[i] = 0;
  715. return(dev->hard_header_len);
  716. }
  718. if (daddr) {
  719. memcpy(eth->h_dest, daddr, dev->addr_len);
  720. return dev->hard_header_len;
  721. }
  722. return -dev->hard_header_len;
  723. }
  725. /* Rebuild the MyriNet MAC header. This is called after an ARP
  726.  * (or in future other address resolution) has completed on this
  727.  * sk_buff. We now let ARP fill in the other fields.
  728.  */
  729. static int myri_rebuild_header(struct sk_buff *skb)
  730. {
  731. unsigned char *pad = (unsigned char *) skb->data;
  732. struct ethhdr *eth = (struct ethhdr *) (pad + MYRI_PAD_LEN);
  733. struct net_device *dev = skb->dev;
  735. #ifdef DEBUG_HEADER
  736. DHDR(("myri_rebuild_header: pad[%02x,%02x] ", pad[0], pad[1]));
  737. dump_ehdr(eth);
  738. #endif
  740. /* Refill MyriNet padding identifiers, this is just being anal. */
  741. pad[0] = MYRI_PAD_LEN;
  742. pad[1] = 0xab;
  744. switch (eth->h_proto)
  745. {
  746. #ifdef CONFIG_INET
  747. case __constant_htons(ETH_P_IP):
  748.   return arp_find(eth->h_dest, skb);
  749. #endif
  751. default:
  752. printk(KERN_DEBUG 
  753.        "%s: unable to resolve type %X addresses.n", 
  754.        dev->name, (int)eth->h_proto);
  756. memcpy(eth->h_source, dev->dev_addr, dev->addr_len);
  757. return 0;
  758. break;
  759. }
  761. return 0;
  762. }
  764. int myri_header_cache(struct neighbour *neigh, struct hh_cache *hh)
  765. {
  766. unsigned short type = hh->hh_type;
  767. unsigned char *pad = (unsigned char *) hh->hh_data;
  768. struct ethhdr *eth = (struct ethhdr *) (pad + MYRI_PAD_LEN);
  769. struct net_device *dev = neigh->dev;
  771. if (type == __constant_htons(ETH_P_802_3))
  772. return -1;
  774. /* Refill MyriNet padding identifiers, this is just being anal. */
  775. pad[0] = MYRI_PAD_LEN;
  776. pad[1] = 0xab;
  778. eth->h_proto = type;
  779. memcpy(eth->h_source, dev->dev_addr, dev->addr_len);
  780. memcpy(eth->h_dest, neigh->ha, dev->addr_len);
  781. hh->hh_len = 16;
  782. return 0;
  783. }
  786. /* Called by Address Resolution module to notify changes in address. */
  787. void myri_header_cache_update(struct hh_cache *hh, struct net_device *dev, unsigned char * haddr)
  788. {
  789. memcpy(((u8*)hh->hh_data) + 2, haddr, dev->addr_len);
  790. }
  792. static int myri_change_mtu(struct net_device *dev, int new_mtu)
  793. {
  794. if ((new_mtu < (ETH_HLEN + MYRI_PAD_LEN)) || (new_mtu > MYRINET_MTU))
  795. return -EINVAL;
  796. dev->mtu = new_mtu;
  797. return 0;
  798. }
  800. static struct net_device_stats *myri_get_stats(struct net_device *dev)
  801. { return &(((struct myri_eth *)dev->priv)->enet_stats); }
  803. static void myri_set_multicast(struct net_device *dev)
  804. {
  805. /* Do nothing, all MyriCOM nodes transmit multicast frames
  806.  * as broadcast packets...
  807.  */
  808. }
  810. static inline void set_boardid_from_idprom(struct myri_eth *mp, int num)
  811. {
  812. mp->eeprom.id[0] = 0;
  813. mp->eeprom.id[1] = idprom->id_machtype;
  814. mp->eeprom.id[2] = (idprom->id_sernum >> 16) & 0xff;
  815. mp->eeprom.id[3] = (idprom->id_sernum >> 8) & 0xff;
  816. mp->eeprom.id[4] = (idprom->id_sernum >> 0) & 0xff;
  817. mp->eeprom.id[5] = num;
  818. }
  820. static inline void determine_reg_space_size(struct myri_eth *mp)
  821. {
  822. switch(mp->eeprom.cpuvers) {
  823. case CPUVERS_2_3:
  824. case CPUVERS_3_0:
  825. case CPUVERS_3_1:
  826. case CPUVERS_3_2:
  827. mp->reg_size = (3 * 128 * 1024) + 4096;
  828. break;
  830. case CPUVERS_4_0:
  831. case CPUVERS_4_1:
  832. mp->reg_size = ((4096<<1) + mp->eeprom.ramsz);
  833. break;
  835. case CPUVERS_4_2:
  836. case CPUVERS_5_0:
  837. default:
  838. printk("myricom: AIEEE weird cpu version %04x assuming pre4.0n",
  839.        mp->eeprom.cpuvers);
  840. mp->reg_size = (3 * 128 * 1024) + 4096;
  841. };
  842. }
  844. #ifdef DEBUG_DETECT
  845. static void dump_eeprom(struct myri_eth *mp)
  846. {
  847. printk("EEPROM: clockval[%08x] cpuvers[%04x] "
  848.        "id[%02x,%02x,%02x,%02x,%02x,%02x]n",
  849.        mp->eeprom.cval, mp->eeprom.cpuvers,
  850.        mp->eeprom.id[0], mp->eeprom.id[1], mp->eeprom.id[2],
  851.        mp->eeprom.id[3], mp->eeprom.id[4], mp->eeprom.id[5]);
  852. printk("EEPROM: ramsz[%08x]n", mp->eeprom.ramsz);
  853. printk("EEPROM: fvers[%02x,%02x,%02x,%02x,%02x,%02x,%02x,%02xn",
  854.        mp->eeprom.fvers[0], mp->eeprom.fvers[1], mp->eeprom.fvers[2],
  855.        mp->eeprom.fvers[3], mp->eeprom.fvers[4], mp->eeprom.fvers[5],
  856.        mp->eeprom.fvers[6], mp->eeprom.fvers[7]);
  857. printk("EEPROM:       %02x,%02x,%02x,%02x,%02x,%02x,%02x,%02xn",
  858.        mp->eeprom.fvers[8], mp->eeprom.fvers[9], mp->eeprom.fvers[10],
  859.        mp->eeprom.fvers[11], mp->eeprom.fvers[12], mp->eeprom.fvers[13],
  860.        mp->eeprom.fvers[14], mp->eeprom.fvers[15]);
  861. printk("EEPROM:       %02x,%02x,%02x,%02x,%02x,%02x,%02x,%02xn",
  862.        mp->eeprom.fvers[16], mp->eeprom.fvers[17], mp->eeprom.fvers[18],
  863.        mp->eeprom.fvers[19], mp->eeprom.fvers[20], mp->eeprom.fvers[21],
  864.        mp->eeprom.fvers[22], mp->eeprom.fvers[23]);
  865. printk("EEPROM:       %02x,%02x,%02x,%02x,%02x,%02x,%02x,%02x]n",
  866.        mp->eeprom.fvers[24], mp->eeprom.fvers[25], mp->eeprom.fvers[26],
  867.        mp->eeprom.fvers[27], mp->eeprom.fvers[28], mp->eeprom.fvers[29],
  868.        mp->eeprom.fvers[30], mp->eeprom.fvers[31]);
  869. printk("EEPROM: mvers[%02x,%02x,%02x,%02x,%02x,%02x,%02x,%02xn",
  870.        mp->eeprom.mvers[0], mp->eeprom.mvers[1], mp->eeprom.mvers[2],
  871.        mp->eeprom.mvers[3], mp->eeprom.mvers[4], mp->eeprom.mvers[5],
  872.        mp->eeprom.mvers[6], mp->eeprom.mvers[7]);
  873. printk("EEPROM:       %02x,%02x,%02x,%02x,%02x,%02x,%02x,%02x]n",
  874.        mp->eeprom.mvers[8], mp->eeprom.mvers[9], mp->eeprom.mvers[10],
  875.        mp->eeprom.mvers[11], mp->eeprom.mvers[12], mp->eeprom.mvers[13],
  876.        mp->eeprom.mvers[14], mp->eeprom.mvers[15]);
  877. printk("EEPROM: dlval[%04x] brd_type[%04x] bus_type[%04x] prod_code[%04x]n",
  878.        mp->eeprom.dlval, mp->eeprom.brd_type, mp->eeprom.bus_type,
  879.        mp->eeprom.prod_code);
  880. printk("EEPROM: serial_num[%08x]n", mp->eeprom.serial_num);
  881. }
  882. #endif
  884. static int __init myri_ether_init(struct net_device *dev, struct sbus_dev *sdev, int num)
  885. {
  886. static unsigned version_printed;
  887. struct myri_eth *mp;
  888. unsigned char prop_buf[32];
  889. int i;
  891. DET(("myri_ether_init(%p,%p,%d):n", dev, sdev, num));
  892. dev = init_etherdev(0, sizeof(struct myri_eth));
  894. if (!dev)
  895. return -ENOMEM;
  897. if (version_printed++ == 0)
  898. printk(version);
  900. printk("%s: MyriCOM MyriNET Ethernet ", dev->name);
  902. mp = (struct myri_eth *) dev->priv;
  903. mp->myri_sdev = sdev;
  905. /* Clean out skb arrays. */
  906. for (i = 0; i < (RX_RING_SIZE + 1); i++)
  907. mp->rx_skbs[i] = NULL;
  909. for (i = 0; i < TX_RING_SIZE; i++)
  910. mp->tx_skbs[i] = NULL;
  912. /* First check for EEPROM information. */
  913. i = prom_getproperty(sdev->prom_node, "myrinet-eeprom-info",
  914.      (char *)&mp->eeprom, sizeof(struct myri_eeprom));
  915. DET(("prom_getprop(myrinet-eeprom-info) returns %dn", i));
  916. if (i == 0 || i == -1) {
  917. /* No eeprom property, must cook up the values ourselves. */
  918. DET(("No EEPROM: "));
  919. mp->eeprom.bus_type = BUS_TYPE_SBUS;
  920. mp->eeprom.cpuvers = prom_getintdefault(sdev->prom_node,"cpu_version",0);
  921. mp->eeprom.cval = prom_getintdefault(sdev->prom_node,"clock_value",0);
  922. mp->eeprom.ramsz = prom_getintdefault(sdev->prom_node,"sram_size",0);
  923. DET(("cpuvers[%d] cval[%d] ramsz[%d]n", mp->eeprom.cpuvers,
  924.      mp->eeprom.cval, mp->eeprom.ramsz));
  925. if (mp->eeprom.cpuvers == 0) {
  926. DET(("EEPROM: cpuvers was zero, setting to %04xn",CPUVERS_2_3));
  927. mp->eeprom.cpuvers = CPUVERS_2_3;
  928. }
  929. if (mp->eeprom.cpuvers < CPUVERS_3_0) {
  930. DET(("EEPROM: cpuvers < CPUVERS_3_0, clockval set to zero.n"));
  931. mp->eeprom.cval = 0;
  932. }
  933. if (mp->eeprom.ramsz == 0) {
  934. DET(("EEPROM: ramsz == 0, setting to 128kn"));
  935. mp->eeprom.ramsz = (128 * 1024);
  936. }
  937. i = prom_getproperty(sdev->prom_node, "myrinet-board-id",
  938.      &prop_buf[0], 10);
  939. DET(("EEPROM: prom_getprop(myrinet-board-id) returns %dn", i));
  940. if ((i != 0) && (i != -1))
  941. memcpy(&mp->eeprom.id[0], &prop_buf[0], 6);
  942. else
  943. set_boardid_from_idprom(mp, num);
  944. i = prom_getproperty(sdev->prom_node, "fpga_version",
  945.      &mp->eeprom.fvers[0], 32);
  946. DET(("EEPROM: prom_getprop(fpga_version) returns %dn", i));
  947. if (i == 0 || i == -1)
  948. memset(&mp->eeprom.fvers[0], 0, 32);
  950. if (mp->eeprom.cpuvers == CPUVERS_4_1) {
  951. DET(("EEPROM: cpuvers CPUVERS_4_1, "));
  952. if (mp->eeprom.ramsz == (128 * 1024)) {
  953. DET(("ramsize 128k, setting to 256k, "));
  954. mp->eeprom.ramsz = (256 * 1024);
  955. }
  956. if ((mp->eeprom.cval==0x40414041)||(mp->eeprom.cval==0x90449044)){
  957. DET(("changing cval from %08x to %08x ",
  958.      mp->eeprom.cval, 0x50e450e4));
  959. mp->eeprom.cval = 0x50e450e4;
  960. }
  961. DET(("n"));
  962. }
  963. }
  964. #ifdef DEBUG_DETECT
  965. dump_eeprom(mp);
  966. #endif
  968. for (i = 0; i < 6; i++)
  969. printk("%2.2x%c",
  970.        dev->dev_addr[i] = mp->eeprom.id[i],
  971.        i == 5 ? ' ' : ':');
  972. printk("n");
  974. determine_reg_space_size(mp);
  976. /* Map in the MyriCOM register/localram set. */
  977. if (mp->eeprom.cpuvers < CPUVERS_4_0) {
  978. /* XXX Makes no sense, if control reg is non-existant this
  979.  * XXX driver cannot function at all... maybe pre-4.0 is
  980.  * XXX only a valid version for PCI cards?  Ask feldy...
  981.  */
  982. DET(("Mapping regs for cpuvers < CPUVERS_4_0n"));
  983. mp->regs = sbus_ioremap(&sdev->resource[0], 0,
  984. mp->reg_size, "MyriCOM Regs");
  985. if (!mp->regs) {
  986. printk("MyriCOM: Cannot map MyriCOM registers.n");
  987. goto err;
  988. }
  989. mp->lanai = (unsigned short *) (mp->regs + (256 * 1024));
  990. mp->lanai3 = (unsigned int *) mp->lanai;
  991. mp->lregs = (unsigned long) &mp->lanai[0x10000];
  992. } else {
  993. DET(("Mapping regs for cpuvers >= CPUVERS_4_0n"));
  994. mp->cregs = sbus_ioremap(&sdev->resource[0], 0,
  995.  PAGE_SIZE, "MyriCOM Control Regs");
  996. mp->lregs = sbus_ioremap(&sdev->resource[0], (256 * 1024),
  997.  PAGE_SIZE, "MyriCOM LANAI Regs");
  998. mp->lanai = (unsigned short *)
  999. sbus_ioremap(&sdev->resource[0], (512 * 1024),
  1000.      mp->eeprom.ramsz, "MyriCOM SRAM");
  1001. mp->lanai3 = (unsigned int *) mp->lanai;
  1002. }
  1003. DET(("Registers mapped: cregs[%lx] lregs[%lx] lanai[%p] lanai3[%p]n",
  1004.      mp->cregs, mp->lregs, mp->lanai, mp->lanai3));
  1006. if (mp->eeprom.cpuvers >= CPUVERS_4_0)
  1007. mp->shmem_base = 0xf000;
  1008. else
  1009. mp->shmem_base = 0x8000;
  1011. DET(("Shared memory base is %04x, ", mp->shmem_base));
  1013. mp->shmem = (struct myri_shmem *) &mp->lanai[mp->shmem_base];
  1014. DET(("shmem mapped at %pn", mp->shmem));
  1016. mp->rqack = &mp->shmem->channel.recvqa;
  1017. mp->rq = &mp->shmem->channel.recvq;
  1018. mp->sq = &mp->shmem->channel.sendq;
  1020. /* Reset the board. */
  1021. DET(("Resetting LANAIn"));
  1022. myri_reset_off(mp->lregs, mp->cregs);
  1023. myri_reset_on(mp->cregs);
  1025. /* Turn IRQ's off. */
  1026. myri_disable_irq(mp->lregs, mp->cregs);
  1028. /* Reset once more. */
  1029. myri_reset_on(mp->cregs);
  1031. /* Get the supported DVMA burst sizes from our SBUS. */
  1032. mp->myri_bursts = prom_getintdefault(mp->myri_sdev->bus->prom_node,
  1033.      "burst-sizes", 0x00);
  1035. if (!sbus_can_burst64(sdev))
  1036. mp->myri_bursts &= ~(DMA_BURST64);
  1038. DET(("MYRI bursts %02xn", mp->myri_bursts));
  1040. /* Encode SBUS interrupt level in second control register. */
  1041. i = prom_getint(sdev->prom_node, "interrupts");
  1042. if (i == 0)
  1043. i = 4;
  1044. DET(("prom_getint(interrupts)==%d, irqlvl set to %04xn",
  1045.      i, (1 << i)));
  1047. sbus_writel((1 << i), mp->cregs + MYRICTRL_IRQLVL);
  1049. mp->dev = dev;
  1050. dev->open = &myri_open;
  1051. dev->stop = &myri_close;
  1052. dev->hard_start_xmit = &myri_start_xmit;
  1053. dev->tx_timeout = &myri_tx_timeout;
  1054. dev->watchdog_timeo = 5*HZ;
  1055. dev->get_stats = &myri_get_stats;
  1056. dev->set_multicast_list = &myri_set_multicast;
  1057. dev->irq = sdev->irqs[0];
  1059. /* Register interrupt handler now. */
  1060. DET(("Requesting MYRIcom IRQ line.n"));
  1061. if (request_irq(dev->irq, &myri_interrupt,
  1062. SA_SHIRQ, "MyriCOM Ethernet", (void *) dev)) {
  1063. printk("MyriCOM: Cannot register interrupt handler.n");
  1064. goto err;
  1065. }
  1067. DET(("ether_setup()n"));
  1068. ether_setup(dev);
  1070. dev->mtu = MYRINET_MTU;
  1071. dev->change_mtu = myri_change_mtu;
  1072. dev->hard_header = myri_header;
  1073. dev->rebuild_header = myri_rebuild_header;
  1074. dev->hard_header_len = (ETH_HLEN + MYRI_PAD_LEN);
  1075. dev->hard_header_cache  = myri_header_cache;
  1076. dev->header_cache_update= myri_header_cache_update;
  1078. /* Load code onto the LANai. */
  1079. DET(("Loading LANAI firmwaren"));
  1080. myri_load_lanai(mp);
  1082. #ifdef MODULE
  1083. dev->ifindex = dev_new_index();
  1084. mp->next_module = root_myri_dev;
  1085. root_myri_dev = mp;
  1086. #endif
  1087. return 0;
  1088. err: unregister_netdev(dev);
  1089. kfree(dev);
  1090. return -ENODEV;
  1091. }
  1093. static int __init myri_sbus_match(struct sbus_dev *sdev)
  1094. {
  1095. char *name = sdev->prom_name;
  1097. if (!strcmp(name, "MYRICOM,mlanai") ||
  1098.     !strcmp(name, "myri"))
  1099. return 1;
  1101. return 0;
  1102. }
  1104. static int __init myri_sbus_probe(void)
  1105. {
  1106. struct net_device *dev = NULL;
  1107. struct sbus_bus *bus;
  1108. struct sbus_dev *sdev = 0;
  1109. static int called;
  1110. int cards = 0, v;
  1112. #ifdef MODULE
  1113. root_myri_dev = NULL;
  1114. #endif
  1116. if (called)
  1117. return -ENODEV;
  1118. called++;
  1120. for_each_sbus(bus) {
  1121. for_each_sbusdev(sdev, bus) {
  1122. if (cards)
  1123. dev = NULL;
  1124. if (myri_sbus_match(sdev)) {
  1125. cards++;
  1126. DET(("Found myricom myrinet as %sn", sdev->prom_name));
  1127. if ((v = myri_ether_init(dev, sdev, (cards - 1))))
  1128. return v;
  1129. }
  1130. }
  1131. }
  1132. if (!cards)
  1133. return -ENODEV;
  1134. return 0;
  1135. }
  1137. static void __exit myri_sbus_cleanup(void)
  1138. {
  1139. #ifdef MODULE
  1140. /* No need to check MOD_IN_USE, as sys_delete_module() checks. */
  1141. while (root_myri_dev) {
  1142. struct myri_eth *next = root_myri_dev->next_module;
  1144. unregister_netdev(root_myri_dev->dev);
  1145. kfree(root_myri_dev->dev);
  1146. root_myri_dev = next;
  1147. }
  1148. #endif /* MODULE */
  1149. }
  1151. module_init(myri_sbus_probe);
  1152. module_exit(myri_sbus_cleanup);
  1153. MODULE_LICENSE("GPL");