rrunner.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:42k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

  1. /*
  2.  * rrunner.c: Linux driver for the Essential RoadRunner HIPPI board.
  3.  *
  4.  * Copyright (C) 1998-2000 by Jes Sorensen, <Jes.Sorensen@cern.ch>.
  5.  *
  6.  * Thanks to Essential Communication for providing us with hardware
  7.  * and very comprehensive documentation without which I would not have
  8.  * been able to write this driver. A special thank you to John Gibbon
  9.  * for sorting out the legal issues, with the NDA, allowing the code to
  10.  * be released under the GPL.
  11.  *
  12.  * This program is free software; you can redistribute it and/or modify
  13.  * it under the terms of the GNU General Public License as published by
  14.  * the Free Software Foundation; either version 2 of the License, or
  15.  * (at your option) any later version.
  16.  *
  17.  * Thanks to Jayaram Bhat from ODS/Essential for fixing some of the
  18.  * stupid bugs in my code.
  19.  *
  20.  * Softnet support and various other patches from Val Henson of
  21.  * ODS/Essential.
  22.  */
  23. #define DEBUG 1
  24. #define RX_DMA_SKBUFF 1
  25. #define PKT_COPY_THRESHOLD 512
  26. #include <linux/config.h>
  27. #include <linux/module.h>
  28. #include <linux/version.h>
  29. #include <linux/types.h>
  30. #include <linux/errno.h>
  31. #include <linux/ioport.h>
  32. #include <linux/pci.h>
  33. #include <linux/kernel.h>
  34. #include <linux/netdevice.h>
  35. #include <linux/hippidevice.h>
  36. #include <linux/skbuff.h>
  37. #include <linux/init.h>
  38. #include <linux/delay.h>
  39. #include <linux/mm.h>
  40. #include <net/sock.h>
  41. #include <asm/system.h>
  42. #include <asm/cache.h>
  43. #include <asm/byteorder.h>
  44. #include <asm/io.h>
  45. #include <asm/irq.h>
  46. #include <asm/uaccess.h>
  47. #if (LINUX_VERSION_CODE < 0x02030e)
  48. #define net_device device
  49. #endif
  50. #if (LINUX_VERSION_CODE >= 0x02031b)
  51. #define NEW_NETINIT
  52. #endif
  53. #if (LINUX_VERSION_CODE < 0x02032b)
  54. /*
  55.  * SoftNet changes
  56.  */
  57. #define dev_kfree_skb_irq(a) dev_kfree_skb(a)
  58. #define netif_wake_queue(dev) clear_bit(0, &dev->tbusy)
  59. #define netif_stop_queue(dev) set_bit(0, &dev->tbusy)
  60. static inline void netif_start_queue(struct net_device *dev)
  61. {
  62. dev->tbusy = 0;
  63. dev->start = 1;
  64. }
  65. #define rr_mark_net_bh(foo) mark_bh(foo)
  66. #define rr_if_busy(dev)     dev->tbusy
  67. #define rr_if_running(dev)  dev->start /* Currently unused. */
  68. #define rr_if_down(dev)     {do{dev->start = 0;}while (0);}
  69. #else
  70. #define NET_BH              0
  71. #define rr_mark_net_bh(foo) {do{} while(0);}
  72. #define rr_if_busy(dev)     netif_queue_stopped(dev)
  73. #define rr_if_running(dev)  netif_running(dev)
  74. #define rr_if_down(dev)     {do{} while(0);}
  75. #endif
  76. #include "rrunner.h"
  77. #define RUN_AT(x) (jiffies + (x))
  78. /*
  79.  * Implementation notes:
  80.  *
  81.  * The DMA engine only allows for DMA within physical 64KB chunks of
  82.  * memory. The current approach of the driver (and stack) is to use
  83.  * linear blocks of memory for the skbuffs. However, as the data block
  84.  * is always the first part of the skb and skbs are 2^n aligned so we
  85.  * are guarantted to get the whole block within one 64KB align 64KB
  86.  * chunk.
  87.  *
  88.  * On the long term, relying on being able to allocate 64KB linear
  89.  * chunks of memory is not feasible and the skb handling code and the
  90.  * stack will need to know about I/O vectors or something similar.
  91.  */
  92. static char version[] __initdata = "rrunner.c: v0.22 03/01/2000  Jes Sorensen (Jes.Sorensen@cern.ch)n";
  93. static struct net_device *root_dev;
  94. /*
  95.  * These are checked at init time to see if they are at least 256KB
  96.  * and increased to 256KB if they are not. This is done to avoid ending
  97.  * up with socket buffers smaller than the MTU size,
  98.  */
  99. extern __u32 sysctl_wmem_max;
  100. extern __u32 sysctl_rmem_max;
  101. static int probed __initdata = 0;
  102. #if LINUX_VERSION_CODE >= 0x20400
  103. static struct pci_device_id rrunner_pci_tbl[] __initdata = {
  104. { PCI_VENDOR_ID_ESSENTIAL, PCI_DEVICE_ID_ESSENTIAL_ROADRUNNER, PCI_ANY_ID, PCI_ANY_ID, },
  105. { } /* Terminating entry */
  106. };
  107. MODULE_DEVICE_TABLE(pci, rrunner_pci_tbl);
  108. #endif /* LINUX_VERSION_CODE >= 0x20400 */
  109. #ifdef NEW_NETINIT
  110. int __init rr_hippi_probe (void)
  111. #else
  112. int __init rr_hippi_probe (struct net_device *dev)
  113. #endif
  114. {
  115. #ifdef NEW_NETINIT
  116. struct net_device *dev;
  117. #endif
  118. int boards_found = 0;
  119. int version_disp; /* was version info already displayed? */
  120. struct pci_dev *pdev = NULL;
  121. struct pci_dev *opdev = NULL;
  122. u8 pci_latency;
  123. struct rr_private *rrpriv;
  124. if (probed)
  125. return -ENODEV;
  126. probed++;
  127. version_disp = 0;
  128. while((pdev = pci_find_device(PCI_VENDOR_ID_ESSENTIAL,
  129.       PCI_DEVICE_ID_ESSENTIAL_ROADRUNNER,
  130.       pdev)))
  131. {
  132. if (pci_enable_device(pdev))
  133. continue;
  134. if (pdev == opdev)
  135. return 0;
  136. /*
  137.  * So we found our HIPPI ... time to tell the system.
  138.  */
  139. dev = init_hippi_dev(NULL, sizeof(struct rr_private));
  140. if (!dev)
  141. break;
  142. if (!dev->priv)
  143. dev->priv = kmalloc(sizeof(*rrpriv), GFP_KERNEL);
  144. if (!dev->priv)
  145. return -ENOMEM;
  146. rrpriv = (struct rr_private *)dev->priv;
  147. memset(rrpriv, 0, sizeof(*rrpriv));
  148. #ifdef CONFIG_SMP
  149. spin_lock_init(&rrpriv->lock);
  150. #endif
  151. sprintf(rrpriv->name, "RoadRunner serial HIPPI");
  152. dev->irq = pdev->irq;
  153. SET_MODULE_OWNER(dev);
  154. dev->open = &rr_open;
  155. dev->hard_start_xmit = &rr_start_xmit;
  156. dev->stop = &rr_close;
  157. dev->get_stats = &rr_get_stats;
  158. dev->do_ioctl = &rr_ioctl;
  159. #if (LINUX_VERSION_CODE < 0x02030d)
  160. dev->base_addr = pdev->base_address[0];
  161. #else
  162. dev->base_addr = pdev->resource[0].start;
  163. #endif
  164. /* display version info if adapter is found */
  165. if (!version_disp)
  166. {
  167. /* set display flag to TRUE so that */
  168. /* we only display this string ONCE */
  169. version_disp = 1;
  170. printk(version);
  171. }
  172. pci_read_config_byte(pdev, PCI_LATENCY_TIMER, &pci_latency);
  173. if (pci_latency <= 0x58){
  174. pci_latency = 0x58;
  175. pci_write_config_byte(pdev, PCI_LATENCY_TIMER,
  176.       pci_latency);
  177. }
  178. pci_set_master(pdev);
  179. printk(KERN_INFO "%s: Essential RoadRunner serial HIPPI "
  180.        "at 0x%08lx, irq %i, PCI latency %in", dev->name,
  181.        dev->base_addr, dev->irq, pci_latency);
  182. /*
  183.  * Remap the regs into kernel space.
  184.  */
  185. rrpriv->regs = (struct rr_regs *)
  186. ioremap(dev->base_addr, 0x1000);
  187. if (!rrpriv->regs){
  188. printk(KERN_ERR "%s:  Unable to map I/O register, "
  189.        "RoadRunner %i will be disabled.n",
  190.        dev->name, boards_found);
  191. break;
  192. }
  193. /*
  194.  * Don't access any registes before this point!
  195.  */
  196. #ifdef __BIG_ENDIAN
  197. writel(readl(&regs->HostCtrl) | NO_SWAP, &regs->HostCtrl);
  198. #endif
  199. /*
  200.  * Need to add a case for little-endian 64-bit hosts here.
  201.  */
  202. rr_init(dev);
  203. boards_found++;
  204. dev->base_addr = 0;
  205. dev = NULL;
  206. opdev = pdev;
  207. }
  208. /*
  209.  * If we're at this point we're going through rr_hippi_probe()
  210.  * for the first time.  Return success (0) if we've initialized
  211.  * 1 or more boards. Otherwise, return failure (-ENODEV).
  212.  */
  213. #ifdef MODULE
  214. return boards_found;
  215. #else
  216. if (boards_found > 0)
  217. return 0;
  218. else
  219. return -ENODEV;
  220. #endif
  221. }
  222. #ifdef MODULE
  223. #if LINUX_VERSION_CODE > 0x20118
  224. MODULE_AUTHOR("Jes Sorensen <Jes.Sorensen@cern.ch>");
  225. MODULE_DESCRIPTION("Essential RoadRunner HIPPI driver");
  226. #endif
  227. int init_module(void)
  228. {
  229. int cards;
  230. root_dev = NULL;
  231. #ifdef NEW_NETINIT
  232. cards = rr_hippi_probe();
  233. #else
  234. cards = rr_hippi_probe(NULL);
  235. #endif
  236. return cards ? 0 : -ENODEV;
  237. }
  238. void cleanup_module(void)
  239. {
  240. struct rr_private *rr;
  241. struct net_device *next;
  242. while (root_dev) {
  243. next = ((struct rr_private *)root_dev->priv)->next;
  244. rr = (struct rr_private *)root_dev->priv;
  245. if (!(readl(&rr->regs->HostCtrl) & NIC_HALTED)){
  246. printk(KERN_ERR "%s: trying to unload running NICn",
  247.        root_dev->name);
  248. writel(HALT_NIC, &rr->regs->HostCtrl);
  249. }
  250. iounmap(rr->regs);
  251. unregister_hipdev(root_dev);
  252. kfree(root_dev);
  253. root_dev = next;
  254. }
  255. }
  256. #endif
  257. /*
  258.  * Commands are considered to be slow, thus there is no reason to
  259.  * inline this.
  260.  */
  261. static void rr_issue_cmd(struct rr_private *rrpriv, struct cmd *cmd)
  262. {
  263. struct rr_regs *regs;
  264. u32 idx;
  265. regs = rrpriv->regs;
  266. /*
  267.  * This is temporary - it will go away in the final version.
  268.  * We probably also want to make this function inline.
  269.  */
  270. if (readl(&regs->HostCtrl) & NIC_HALTED){
  271. printk("issuing command for halted NIC, code 0x%x, "
  272.        "HostCtrl %08xn", cmd->code, readl(&regs->HostCtrl));
  273. if (readl(&regs->Mode) & FATAL_ERR)
  274. printk("error codes Fail1 %02x, Fail2 %02xn",
  275.        readl(&regs->Fail1), readl(&regs->Fail2));
  276. }
  277. idx = rrpriv->info->cmd_ctrl.pi;
  278. writel(*(u32*)(cmd), &regs->CmdRing[idx]);
  279. wmb();
  280. idx = (idx - 1) % CMD_RING_ENTRIES;
  281. rrpriv->info->cmd_ctrl.pi = idx;
  282. wmb();
  283. if (readl(&regs->Mode) & FATAL_ERR)
  284. printk("error code %02xn", readl(&regs->Fail1));
  285. }
  286. /*
  287.  * Reset the board in a sensible manner. The NIC is already halted
  288.  * when we get here and a spin-lock is held.
  289.  */
  290. static int rr_reset(struct net_device *dev)
  291. {
  292. struct rr_private *rrpriv;
  293. struct rr_regs *regs;
  294. struct eeprom *hw = NULL;
  295. u32 start_pc;
  296. int i;
  297. rrpriv = (struct rr_private *)dev->priv;
  298. regs = rrpriv->regs;
  299. rr_load_firmware(dev);
  300. writel(0x01000000, &regs->TX_state);
  301. writel(0xff800000, &regs->RX_state);
  302. writel(0, &regs->AssistState);
  303. writel(CLEAR_INTA, &regs->LocalCtrl);
  304. writel(0x01, &regs->BrkPt);
  305. writel(0, &regs->Timer);
  306. writel(0, &regs->TimerRef);
  307. writel(RESET_DMA, &regs->DmaReadState);
  308. writel(RESET_DMA, &regs->DmaWriteState);
  309. writel(0, &regs->DmaWriteHostHi);
  310. writel(0, &regs->DmaWriteHostLo);
  311. writel(0, &regs->DmaReadHostHi);
  312. writel(0, &regs->DmaReadHostLo);
  313. writel(0, &regs->DmaReadLen);
  314. writel(0, &regs->DmaWriteLen);
  315. writel(0, &regs->DmaWriteLcl);
  316. writel(0, &regs->DmaWriteIPchecksum);
  317. writel(0, &regs->DmaReadLcl);
  318. writel(0, &regs->DmaReadIPchecksum);
  319. writel(0, &regs->PciState);
  320. #if (BITS_PER_LONG == 64) && defined __LITTLE_ENDIAN
  321. writel(SWAP_DATA | PTR64BIT | PTR_WD_SWAP, &regs->Mode);
  322. #elif (BITS_PER_LONG == 64)
  323. writel(SWAP_DATA | PTR64BIT | PTR_WD_NOSWAP, &regs->Mode);
  324. #else
  325. writel(SWAP_DATA | PTR32BIT | PTR_WD_NOSWAP, &regs->Mode);
  326. #endif
  327. #if 0
  328. /*
  329.  * Don't worry, this is just black magic.
  330.  */
  331. writel(0xdf000, &regs->RxBase);
  332. writel(0xdf000, &regs->RxPrd);
  333. writel(0xdf000, &regs->RxCon);
  334. writel(0xce000, &regs->TxBase);
  335. writel(0xce000, &regs->TxPrd);
  336. writel(0xce000, &regs->TxCon);
  337. writel(0, &regs->RxIndPro);
  338. writel(0, &regs->RxIndCon);
  339. writel(0, &regs->RxIndRef);
  340. writel(0, &regs->TxIndPro);
  341. writel(0, &regs->TxIndCon);
  342. writel(0, &regs->TxIndRef);
  343. writel(0xcc000, &regs->pad10[0]);
  344. writel(0, &regs->DrCmndPro);
  345. writel(0, &regs->DrCmndCon);
  346. writel(0, &regs->DwCmndPro);
  347. writel(0, &regs->DwCmndCon);
  348. writel(0, &regs->DwCmndRef);
  349. writel(0, &regs->DrDataPro);
  350. writel(0, &regs->DrDataCon);
  351. writel(0, &regs->DrDataRef);
  352. writel(0, &regs->DwDataPro);
  353. writel(0, &regs->DwDataCon);
  354. writel(0, &regs->DwDataRef);
  355. #endif
  356. writel(0xffffffff, &regs->MbEvent);
  357. writel(0, &regs->Event);
  358. writel(0, &regs->TxPi);
  359. writel(0, &regs->IpRxPi);
  360. writel(0, &regs->EvtCon);
  361. writel(0, &regs->EvtPrd);
  362. rrpriv->info->evt_ctrl.pi = 0;
  363. for (i = 0; i < CMD_RING_ENTRIES; i++)
  364. writel(0, &regs->CmdRing[i]);
  365. /*
  366.  * Why 32 ? is this not cache line size dependant?
  367.  */
  368. writel(RBURST_64|WBURST_64, &regs->PciState);
  369. wmb();
  370. start_pc = rr_read_eeprom_word(rrpriv, &hw->rncd_info.FwStart);
  371. #if (DEBUG > 1)
  372. printk("%s: Executing firmware at address 0x%06xn",
  373.        dev->name, start_pc);
  374. #endif
  375. writel(start_pc + 0x800, &regs->Pc);
  376. wmb();
  377. udelay(5);
  378. writel(start_pc, &regs->Pc);
  379. wmb();
  380. return 0;
  381. }
  382. /*
  383.  * Read a string from the EEPROM.
  384.  */
  385. static unsigned int rr_read_eeprom(struct rr_private *rrpriv,
  386. unsigned long offset,
  387. unsigned char *buf,
  388. unsigned long length)
  389. {
  390. struct rr_regs *regs = rrpriv->regs;
  391. u32 misc, io, host, i;
  392. io = readl(&regs->ExtIo);
  393. writel(0, &regs->ExtIo);
  394. misc = readl(&regs->LocalCtrl);
  395. writel(0, &regs->LocalCtrl);
  396. host = readl(&regs->HostCtrl);
  397. writel(host | HALT_NIC, &regs->HostCtrl);
  398. mb();
  399. for (i = 0; i < length; i++){
  400. writel((EEPROM_BASE + ((offset+i) << 3)), &regs->WinBase);
  401. mb();
  402. buf[i] = (readl(&regs->WinData) >> 24) & 0xff;
  403. mb();
  404. }
  405. writel(host, &regs->HostCtrl);
  406. writel(misc, &regs->LocalCtrl);
  407. writel(io, &regs->ExtIo);
  408. mb();
  409. return i;
  410. }
  411. /*
  412.  * Shortcut to read one word (4 bytes) out of the EEPROM and convert
  413.  * it to our CPU byte-order.
  414.  */
  415. static u32 rr_read_eeprom_word(struct rr_private *rrpriv,
  416.     void * offset)
  417. {
  418. u32 word;
  419. if ((rr_read_eeprom(rrpriv, (unsigned long)offset,
  420.     (char *)&word, 4) == 4))
  421. return be32_to_cpu(word);
  422. return 0;
  423. }
  424. /*
  425.  * Write a string to the EEPROM.
  426.  *
  427.  * This is only called when the firmware is not running.
  428.  */
  429. static unsigned int write_eeprom(struct rr_private *rrpriv,
  430.  unsigned long offset,
  431.  unsigned char *buf,
  432.  unsigned long length)
  433. {
  434. struct rr_regs *regs = rrpriv->regs;
  435. u32 misc, io, data, i, j, ready, error = 0;
  436. io = readl(&regs->ExtIo);
  437. writel(0, &regs->ExtIo);
  438. misc = readl(&regs->LocalCtrl);
  439. writel(ENABLE_EEPROM_WRITE, &regs->LocalCtrl);
  440. mb();
  441. for (i = 0; i < length; i++){
  442. writel((EEPROM_BASE + ((offset+i) << 3)), &regs->WinBase);
  443. mb();
  444. data = buf[i] << 24;
  445. /*
  446.  * Only try to write the data if it is not the same
  447.  * value already.
  448.  */
  449. if ((readl(&regs->WinData) & 0xff000000) != data){
  450. writel(data, &regs->WinData);
  451. ready = 0;
  452. j = 0;
  453. mb();
  454. while(!ready){
  455. udelay(20);
  456. if ((readl(&regs->WinData) & 0xff000000) ==
  457.     data)
  458. ready = 1;
  459. mb();
  460. if (j++ > 5000){
  461. printk("data mismatch: %08x, "
  462.        "WinData %08xn", data,
  463.        readl(&regs->WinData));
  464. ready = 1;
  465. error = 1;
  466. }
  467. }
  468. }
  469. }
  470. writel(misc, &regs->LocalCtrl);
  471. writel(io, &regs->ExtIo);
  472. mb();
  473. return error;
  474. }
  475. static int __init rr_init(struct net_device *dev)
  476. {
  477. struct rr_private *rrpriv;
  478. struct rr_regs *regs;
  479. struct eeprom *hw = NULL;
  480. u32 sram_size, rev;
  481. int i;
  482. rrpriv = (struct rr_private *)dev->priv;
  483. regs = rrpriv->regs;
  484. rev = readl(&regs->FwRev);
  485. rrpriv->fw_rev = rev;
  486. if (rev > 0x00020024)
  487. printk("  Firmware revision: %i.%i.%in", (rev >> 16),
  488.        ((rev >> 8) & 0xff), (rev & 0xff));
  489. else if (rev >= 0x00020000) {
  490. printk("  Firmware revision: %i.%i.%i (2.0.37 or "
  491.        "later is recommended)n", (rev >> 16),
  492.        ((rev >> 8) & 0xff), (rev & 0xff));
  493. }else{
  494. printk("  Firmware revision too old: %i.%i.%i, please "
  495.        "upgrade to 2.0.37 or later.n",
  496.        (rev >> 16), ((rev >> 8) & 0xff), (rev & 0xff));
  497. }
  498. #if (DEBUG > 2)
  499. printk("  Maximum receive rings %in", readl(&regs->MaxRxRng));
  500. #endif
  501. /*
  502.  * Read the hardware address from the eeprom.  The HW address
  503.  * is not really necessary for HIPPI but awfully convenient.
  504.  * The pointer arithmetic to put it in dev_addr is ugly, but
  505.  * Donald Becker does it this way for the GigE version of this
  506.  * card and it's shorter and more portable than any
  507.  * other method I've seen.  -VAL
  508.  */
  509. *(u16 *)(dev->dev_addr) =
  510.   htons(rr_read_eeprom_word(rrpriv, &hw->manf.BoardULA));
  511. *(u32 *)(dev->dev_addr+2) =
  512.   htonl(rr_read_eeprom_word(rrpriv, &hw->manf.BoardULA[4]));
  513. printk("  MAC: ");
  514. for (i = 0; i < 5; i++)
  515. printk("%2.2x:", dev->dev_addr[i]);
  516. printk("%2.2xn", dev->dev_addr[i]);
  517. sram_size = rr_read_eeprom_word(rrpriv, (void *)8);
  518. printk("  SRAM size 0x%06xn", sram_size);
  519. if (sysctl_rmem_max < 262144){
  520. printk("  Receive socket buffer limit too low (%i), "
  521.        "setting to 262144n", sysctl_rmem_max);
  522. sysctl_rmem_max = 262144;
  523. }
  524. if (sysctl_wmem_max < 262144){
  525. printk("  Transmit socket buffer limit too low (%i), "
  526.        "setting to 262144n", sysctl_wmem_max);
  527. sysctl_wmem_max = 262144;
  528. }
  529. rrpriv->next = root_dev;
  530. root_dev = dev;
  531. return 0;
  532. }
  533. static int rr_init1(struct net_device *dev)
  534. {
  535. struct rr_private *rrpriv;
  536. struct rr_regs *regs;
  537. unsigned long myjif, flags;
  538. struct cmd cmd;
  539. u32 hostctrl;
  540. int ecode = 0;
  541. short i;
  542. rrpriv = (struct rr_private *)dev->priv;
  543. regs = rrpriv->regs;
  544. spin_lock_irqsave(&rrpriv->lock, flags);
  545. hostctrl = readl(&regs->HostCtrl);
  546. writel(hostctrl | HALT_NIC | RR_CLEAR_INT, &regs->HostCtrl);
  547. wmb();
  548. if (hostctrl & PARITY_ERR){
  549. printk("%s: Parity error halting NIC - this is serious!n",
  550.        dev->name);
  551. spin_unlock_irqrestore(&rrpriv->lock, flags);
  552. ecode = -EFAULT;
  553. goto error;
  554. }
  555. set_rxaddr(regs, rrpriv->rx_ctrl);
  556. set_infoaddr(regs, rrpriv->info);
  557. rrpriv->info->evt_ctrl.entry_size = sizeof(struct event);
  558. rrpriv->info->evt_ctrl.entries = EVT_RING_ENTRIES;
  559. rrpriv->info->evt_ctrl.mode = 0;
  560. rrpriv->info->evt_ctrl.pi = 0;
  561. set_rraddr(&rrpriv->info->evt_ctrl.rngptr, rrpriv->evt_ring);
  562. rrpriv->info->cmd_ctrl.entry_size = sizeof(struct cmd);
  563. rrpriv->info->cmd_ctrl.entries = CMD_RING_ENTRIES;
  564. rrpriv->info->cmd_ctrl.mode = 0;
  565. rrpriv->info->cmd_ctrl.pi = 15;
  566. for (i = 0; i < CMD_RING_ENTRIES; i++) {
  567. writel(0, &regs->CmdRing[i]);
  568. }
  569. for (i = 0; i < TX_RING_ENTRIES; i++) {
  570. rrpriv->tx_ring[i].size = 0;
  571. set_rraddr(&rrpriv->tx_ring[i].addr, 0);
  572. rrpriv->tx_skbuff[i] = 0;
  573. }
  574. rrpriv->info->tx_ctrl.entry_size = sizeof(struct tx_desc);
  575. rrpriv->info->tx_ctrl.entries = TX_RING_ENTRIES;
  576. rrpriv->info->tx_ctrl.mode = 0;
  577. rrpriv->info->tx_ctrl.pi = 0;
  578. set_rraddr(&rrpriv->info->tx_ctrl.rngptr, rrpriv->tx_ring);
  579. /*
  580.  * Set dirty_tx before we start receiving interrupts, otherwise
  581.  * the interrupt handler might think it is supposed to process
  582.  * tx ints before we are up and running, which may cause a null
  583.  * pointer access in the int handler.
  584.  */
  585. rrpriv->tx_full = 0;
  586. rrpriv->cur_rx = 0;
  587. rrpriv->dirty_rx = rrpriv->dirty_tx = 0;
  588. rr_reset(dev);
  589. /* Tuning values */
  590. writel(0x5000, &regs->ConRetry);
  591. writel(0x100, &regs->ConRetryTmr);
  592. writel(0x500000, &regs->ConTmout);
  593.   writel(0x60, &regs->IntrTmr);
  594. writel(0x500000, &regs->TxDataMvTimeout);
  595. writel(0x200000, &regs->RxDataMvTimeout);
  596.   writel(0x80, &regs->WriteDmaThresh);
  597.   writel(0x80, &regs->ReadDmaThresh);
  598. rrpriv->fw_running = 0;
  599. wmb();
  600. hostctrl &= ~(HALT_NIC | INVALID_INST_B | PARITY_ERR);
  601. writel(hostctrl, &regs->HostCtrl);
  602. wmb();
  603. spin_unlock_irqrestore(&rrpriv->lock, flags);
  604. for (i = 0; i < RX_RING_ENTRIES; i++) {
  605. struct sk_buff *skb;
  606. rrpriv->rx_ring[i].mode = 0;
  607. skb = alloc_skb(dev->mtu + HIPPI_HLEN, GFP_ATOMIC);
  608. if (!skb) {
  609. printk(KERN_WARNING "%s: Unable to allocate memory "
  610.        "for receive ring - halting NICn", dev->name);
  611. ecode = -ENOMEM;
  612. goto error;
  613. }
  614. rrpriv->rx_skbuff[i] = skb;
  615. /*
  616.  * Sanity test to see if we conflict with the DMA
  617.  * limitations of the Roadrunner.
  618.  */
  619. if ((((unsigned long)skb->data) & 0xfff) > ~65320)
  620. printk("skb alloc errorn");
  621. set_rraddr(&rrpriv->rx_ring[i].addr, skb->data);
  622. rrpriv->rx_ring[i].size = dev->mtu + HIPPI_HLEN;
  623. }
  624. rrpriv->rx_ctrl[4].entry_size = sizeof(struct rx_desc);
  625. rrpriv->rx_ctrl[4].entries = RX_RING_ENTRIES;
  626. rrpriv->rx_ctrl[4].mode = 8;
  627. rrpriv->rx_ctrl[4].pi = 0;
  628. wmb();
  629. set_rraddr(&rrpriv->rx_ctrl[4].rngptr, rrpriv->rx_ring);
  630. udelay(1000);
  631. /*
  632.  * Now start the FirmWare.
  633.  */
  634. cmd.code = C_START_FW;
  635. cmd.ring = 0;
  636. cmd.index = 0;
  637. rr_issue_cmd(rrpriv, &cmd);
  638. /*
  639.  * Give the FirmWare time to chew on the `get running' command.
  640.  */
  641. myjif = jiffies + 5 * HZ;
  642. while ((jiffies < myjif) && !rrpriv->fw_running);
  643. netif_start_queue(dev);
  644. return ecode;
  645.  error:
  646. /*
  647.  * We might have gotten here because we are out of memory,
  648.  * make sure we release everything we allocated before failing
  649.  */
  650. for (i = 0; i < RX_RING_ENTRIES; i++) {
  651. if (rrpriv->rx_skbuff[i]) {
  652. rrpriv->rx_ring[i].size = 0;
  653. set_rraddr(&rrpriv->rx_ring[i].addr, 0);
  654. dev_kfree_skb(rrpriv->rx_skbuff[i]);
  655. }
  656. }
  657. return ecode;
  658. }
  659. /*
  660.  * All events are considered to be slow (RX/TX ints do not generate
  661.  * events) and are handled here, outside the main interrupt handler,
  662.  * to reduce the size of the handler.
  663.  */
  664. static u32 rr_handle_event(struct net_device *dev, u32 prodidx, u32 eidx)
  665. {
  666. struct rr_private *rrpriv;
  667. struct rr_regs *regs;
  668. u32 tmp;
  669. rrpriv = (struct rr_private *)dev->priv;
  670. regs = rrpriv->regs;
  671. while (prodidx != eidx){
  672. switch (rrpriv->evt_ring[eidx].code){
  673. case E_NIC_UP:
  674. tmp = readl(&regs->FwRev);
  675. printk(KERN_INFO "%s: Firmware revision %i.%i.%i "
  676.        "up and runningn", dev->name,
  677.        (tmp >> 16), ((tmp >> 8) & 0xff), (tmp & 0xff));
  678. rrpriv->fw_running = 1;
  679. writel(RX_RING_ENTRIES - 1, &regs->IpRxPi);
  680. wmb();
  681. break;
  682. case E_LINK_ON:
  683. printk(KERN_INFO "%s: Optical link ONn", dev->name);
  684. break;
  685. case E_LINK_OFF:
  686. printk(KERN_INFO "%s: Optical link OFFn", dev->name);
  687. break;
  688. case E_RX_IDLE:
  689. printk(KERN_WARNING "%s: RX data not movingn",
  690.        dev->name);
  691. goto drop;
  692. case E_WATCHDOG:
  693. printk(KERN_INFO "%s: The watchdog is here to see "
  694.        "usn", dev->name);
  695. break;
  696. case E_INTERN_ERR:
  697. printk(KERN_ERR "%s: HIPPI Internal NIC errorn",
  698.        dev->name);
  699. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  700.        &regs->HostCtrl);
  701. wmb();
  702. break;
  703. case E_HOST_ERR:
  704. printk(KERN_ERR "%s: Host software errorn",
  705.        dev->name);
  706. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  707.        &regs->HostCtrl);
  708. wmb();
  709. break;
  710. /*
  711.  * TX events.
  712.  */
  713. case E_CON_REJ:
  714. printk(KERN_WARNING "%s: Connection rejectedn",
  715.        dev->name);
  716. rrpriv->stats.tx_aborted_errors++;
  717. break;
  718. case E_CON_TMOUT:
  719. printk(KERN_WARNING "%s: Connection timeoutn",
  720.        dev->name);
  721. break;
  722. case E_DISC_ERR:
  723. printk(KERN_WARNING "%s: HIPPI disconnect errorn",
  724.        dev->name);
  725. rrpriv->stats.tx_aborted_errors++;
  726. break;
  727. case E_INT_PRTY:
  728. printk(KERN_ERR "%s: HIPPI Internal Parity errorn",
  729.        dev->name);
  730. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  731.        &regs->HostCtrl);
  732. wmb();
  733. break;
  734. case E_TX_IDLE:
  735. printk(KERN_WARNING "%s: Transmitter idlen",
  736.        dev->name);
  737. break;
  738. case E_TX_LINK_DROP:
  739. printk(KERN_WARNING "%s: Link lost during transmitn",
  740.        dev->name);
  741. rrpriv->stats.tx_aborted_errors++;
  742. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  743.        &regs->HostCtrl);
  744. wmb();
  745. break;
  746. case E_TX_INV_RNG:
  747. printk(KERN_ERR "%s: Invalid send ring blockn",
  748.        dev->name);
  749. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  750.        &regs->HostCtrl);
  751. wmb();
  752. break;
  753. case E_TX_INV_BUF:
  754. printk(KERN_ERR "%s: Invalid send buffer addressn",
  755.        dev->name);
  756. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  757.        &regs->HostCtrl);
  758. wmb();
  759. break;
  760. case E_TX_INV_DSC:
  761. printk(KERN_ERR "%s: Invalid descriptor addressn",
  762.        dev->name);
  763. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  764.        &regs->HostCtrl);
  765. wmb();
  766. break;
  767. /*
  768.  * RX events.
  769.  */
  770. case E_RX_RNG_OUT:
  771. printk(KERN_INFO "%s: Receive ring fulln", dev->name);
  772. break;
  773. case E_RX_PAR_ERR:
  774. printk(KERN_WARNING "%s: Receive parity errorn",
  775.        dev->name);
  776. goto drop;
  777. case E_RX_LLRC_ERR:
  778. printk(KERN_WARNING "%s: Receive LLRC errorn",
  779.        dev->name);
  780. goto drop;
  781. case E_PKT_LN_ERR:
  782. printk(KERN_WARNING "%s: Receive packet length "
  783.        "errorn", dev->name);
  784. goto drop;
  785. case E_DTA_CKSM_ERR:
  786. printk(KERN_WARNING "%s: Data checksum errorn",
  787.        dev->name);
  788. goto drop;
  789. case E_SHT_BST:
  790. printk(KERN_WARNING "%s: Unexpected short burst "
  791.        "errorn", dev->name);
  792. goto drop;
  793. case E_STATE_ERR:
  794. printk(KERN_WARNING "%s: Recv. state transition"
  795.        " errorn", dev->name);
  796. goto drop;
  797. case E_UNEXP_DATA:
  798. printk(KERN_WARNING "%s: Unexpected data errorn",
  799.        dev->name);
  800. goto drop;
  801. case E_LST_LNK_ERR:
  802. printk(KERN_WARNING "%s: Link lost errorn",
  803.        dev->name);
  804. goto drop;
  805. case E_FRM_ERR:
  806. printk(KERN_WARNING "%s: Framming Errorn",
  807.        dev->name);
  808. goto drop;
  809. case E_FLG_SYN_ERR:
  810. printk(KERN_WARNING "%s: Flag sync. lost during"
  811.        "packetn", dev->name);
  812. goto drop;
  813. case E_RX_INV_BUF:
  814. printk(KERN_ERR "%s: Invalid receive buffer "
  815.        "addressn", dev->name);
  816. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  817.        &regs->HostCtrl);
  818. wmb();
  819. break;
  820. case E_RX_INV_DSC:
  821. printk(KERN_ERR "%s: Invalid receive descriptor "
  822.        "addressn", dev->name);
  823. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  824.        &regs->HostCtrl);
  825. wmb();
  826. break;
  827. case E_RNG_BLK:
  828. printk(KERN_ERR "%s: Invalid ring blockn",
  829.        dev->name);
  830. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  831.        &regs->HostCtrl);
  832. wmb();
  833. break;
  834. drop:
  835. /* Label packet to be dropped.
  836.  * Actual dropping occurs in rx
  837.  * handling.
  838.  *
  839.  * The index of packet we get to drop is
  840.  * the index of the packet following
  841.  * the bad packet. -kbf
  842.  */
  843. {
  844. u16 index = rrpriv->evt_ring[eidx].index;
  845. index = (index + (RX_RING_ENTRIES - 1)) %
  846. RX_RING_ENTRIES;
  847. rrpriv->rx_ring[index].mode |=
  848. (PACKET_BAD | PACKET_END);
  849. }
  850. break;
  851. default:
  852. printk(KERN_WARNING "%s: Unhandled event 0x%02xn",
  853.        dev->name, rrpriv->evt_ring[eidx].code);
  854. }
  855. eidx = (eidx + 1) % EVT_RING_ENTRIES;
  856. }
  857. rrpriv->info->evt_ctrl.pi = eidx;
  858. wmb();
  859. return eidx;
  860. }
  861. static void rx_int(struct net_device *dev, u32 rxlimit, u32 index)
  862. {
  863. struct rr_private *rrpriv = (struct rr_private *)dev->priv;
  864. struct rr_regs *regs = rrpriv->regs;
  865. do {
  866. u32 pkt_len;
  867. pkt_len = rrpriv->rx_ring[index].size;
  868. #if (DEBUG > 2)
  869. printk("index %i, rxlimit %in", index, rxlimit);
  870. printk("len %x, mode %xn", pkt_len,
  871.        rrpriv->rx_ring[index].mode);
  872. #endif
  873. if ( (rrpriv->rx_ring[index].mode & PACKET_BAD) == PACKET_BAD){
  874. rrpriv->stats.rx_dropped++;
  875. goto defer;
  876. }
  877. if (pkt_len > 0){
  878. struct sk_buff *skb;
  879. if (pkt_len < PKT_COPY_THRESHOLD) {
  880. skb = alloc_skb(pkt_len, GFP_ATOMIC);
  881. if (skb == NULL){
  882. printk(KERN_WARNING "%s: Unable to allocate skb (%i bytes), deferring packetn", dev->name, pkt_len);
  883. rrpriv->stats.rx_dropped++;
  884. goto defer;
  885. }else
  886. memcpy(skb_put(skb, pkt_len),
  887.        rrpriv->rx_skbuff[index]->data,
  888.        pkt_len);
  889. }else{
  890. struct sk_buff *newskb;
  891. newskb = alloc_skb(dev->mtu + HIPPI_HLEN,
  892.    GFP_ATOMIC);
  893. if (newskb){
  894. skb = rrpriv->rx_skbuff[index];
  895. skb_put(skb, pkt_len);
  896. rrpriv->rx_skbuff[index] = newskb;
  897. set_rraddr(&rrpriv->rx_ring[index].addr, newskb->data);
  898. }else{
  899. printk("%s: Out of memory, deferring "
  900.        "packetn", dev->name);
  901. rrpriv->stats.rx_dropped++;
  902. goto defer;
  903. }
  904. }
  905. skb->dev = dev;
  906. skb->protocol = hippi_type_trans(skb, dev);
  907. netif_rx(skb); /* send it up */
  908. dev->last_rx = jiffies;
  909. rrpriv->stats.rx_packets++;
  910. rrpriv->stats.rx_bytes += pkt_len;
  911. }
  912. defer:
  913. rrpriv->rx_ring[index].mode = 0;
  914. rrpriv->rx_ring[index].size = dev->mtu + HIPPI_HLEN;
  915. if ((index & 7) == 7)
  916. writel(index, &regs->IpRxPi);
  917. index = (index + 1) % RX_RING_ENTRIES;
  918. } while(index != rxlimit);
  919. rrpriv->cur_rx = index;
  920. wmb();
  921. }
  922. static void rr_interrupt(int irq, void *dev_id, struct pt_regs *ptregs)
  923. {
  924. struct rr_private *rrpriv;
  925. struct rr_regs *regs;
  926. struct net_device *dev = (struct net_device *)dev_id;
  927. u32 prodidx, rxindex, eidx, txcsmr, rxlimit, txcon;
  928. rrpriv = (struct rr_private *)dev->priv;
  929. regs = rrpriv->regs;
  930. if (!(readl(&regs->HostCtrl) & RR_INT))
  931. return;
  932. spin_lock(&rrpriv->lock);
  933. prodidx = readl(&regs->EvtPrd);
  934. txcsmr = (prodidx >> 8) & 0xff;
  935. rxlimit = (prodidx >> 16) & 0xff;
  936. prodidx &= 0xff;
  937. #if (DEBUG > 2)
  938. printk("%s: interrupt, prodidx = %i, eidx = %in", dev->name,
  939.        prodidx, rrpriv->info->evt_ctrl.pi);
  940. #endif
  941. /*
  942.  * Order here is important.  We must handle events
  943.  * before doing anything else in order to catch
  944.  * such things as LLRC errors, etc -kbf
  945.  */
  946. eidx = rrpriv->info->evt_ctrl.pi;
  947. if (prodidx != eidx)
  948. eidx = rr_handle_event(dev, prodidx, eidx);
  949. rxindex = rrpriv->cur_rx;
  950. if (rxindex != rxlimit)
  951. rx_int(dev, rxlimit, rxindex);
  952. txcon = rrpriv->dirty_tx;
  953. if (txcsmr != txcon) {
  954. do {
  955. /* Due to occational firmware TX producer/consumer out
  956.  * of sync. error need to check entry in ring -kbf
  957.  */
  958. if(rrpriv->tx_skbuff[txcon]){
  959. rrpriv->stats.tx_packets++;
  960. rrpriv->stats.tx_bytes +=rrpriv->tx_skbuff[txcon]->len;
  961. dev_kfree_skb_irq(rrpriv->tx_skbuff[txcon]);
  962. rrpriv->tx_skbuff[txcon] = NULL;
  963. rrpriv->tx_ring[txcon].size = 0;
  964. set_rraddr(&rrpriv->tx_ring[txcon].addr, 0);
  965. rrpriv->tx_ring[txcon].mode = 0;
  966. }
  967. txcon = (txcon + 1) % TX_RING_ENTRIES;
  968. } while (txcsmr != txcon);
  969. wmb();
  970. rrpriv->dirty_tx = txcon;
  971. if (rrpriv->tx_full && rr_if_busy(dev) &&
  972.     (((rrpriv->info->tx_ctrl.pi + 1) % TX_RING_ENTRIES)
  973.      != rrpriv->dirty_tx)){
  974. rrpriv->tx_full = 0;
  975. netif_wake_queue(dev);
  976. rr_mark_net_bh(NET_BH);
  977. }
  978. }
  979. eidx |= ((txcsmr << 8) | (rxlimit << 16));
  980. writel(eidx, &regs->EvtCon);
  981. wmb();
  982. spin_unlock(&rrpriv->lock);
  983. }
  984. static void rr_timer(unsigned long data)
  985. {
  986. struct net_device *dev = (struct net_device *)data;
  987. struct rr_private *rrpriv = (struct rr_private *)dev->priv;
  988. struct rr_regs *regs = rrpriv->regs;
  989. unsigned long flags;
  990. int i;
  991. if (readl(&regs->HostCtrl) & NIC_HALTED){
  992. printk("%s: Restarting nicn", dev->name);
  993. memset(rrpriv->rx_ctrl, 0, 256 * sizeof(struct ring_ctrl));
  994. memset(rrpriv->info, 0, sizeof(struct rr_info));
  995. wmb();
  996. for (i = 0; i < TX_RING_ENTRIES; i++) {
  997. if (rrpriv->tx_skbuff[i]) {
  998. rrpriv->tx_ring[i].size = 0;
  999. set_rraddr(&rrpriv->tx_ring[i].addr, 0);
  1000. dev_kfree_skb(rrpriv->tx_skbuff[i]);
  1001. rrpriv->tx_skbuff[i] = NULL;
  1002. }
  1003. }
  1004. for (i = 0; i < RX_RING_ENTRIES; i++) {
  1005. if (rrpriv->rx_skbuff[i]) {
  1006. rrpriv->rx_ring[i].size = 0;
  1007. set_rraddr(&rrpriv->rx_ring[i].addr, 0);
  1008. dev_kfree_skb(rrpriv->rx_skbuff[i]);
  1009. rrpriv->rx_skbuff[i] = NULL;
  1010. }
  1011. }
  1012. if (rr_init1(dev)) {
  1013. spin_lock_irqsave(&rrpriv->lock, flags);
  1014. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, 
  1015.        &regs->HostCtrl);
  1016. spin_unlock_irqrestore(&rrpriv->lock, flags);
  1017. }
  1018. }
  1019. rrpriv->timer.expires = RUN_AT(5*HZ);
  1020. add_timer(&rrpriv->timer);
  1021. }
  1022. static int rr_open(struct net_device *dev)
  1023. {
  1024. struct rr_private *rrpriv;
  1025. struct rr_regs *regs;
  1026. int ecode = 0;
  1027. unsigned long flags;
  1028. rrpriv = (struct rr_private *)dev->priv;
  1029. regs = rrpriv->regs;
  1030. if (rrpriv->fw_rev < 0x00020000) {
  1031. printk(KERN_WARNING "%s: trying to configure device with "
  1032.        "obsolete firmwaren", dev->name);
  1033. ecode = -EBUSY;
  1034. goto error;
  1035. }
  1036. rrpriv->rx_ctrl = kmalloc(256*sizeof(struct ring_ctrl), GFP_KERNEL);
  1037. if (!rrpriv->rx_ctrl) {
  1038. ecode = -ENOMEM;
  1039. goto error;
  1040. }
  1041. rrpriv->info = kmalloc(sizeof(struct rr_info), GFP_KERNEL);
  1042. if (!rrpriv->info){
  1043. rrpriv->rx_ctrl = NULL;
  1044. ecode = -ENOMEM;
  1045. goto error;
  1046. }
  1047. memset(rrpriv->rx_ctrl, 0, 256 * sizeof(struct ring_ctrl));
  1048. memset(rrpriv->info, 0, sizeof(struct rr_info));
  1049. wmb();
  1050. spin_lock_irqsave(&rrpriv->lock, flags);
  1051. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, &regs->HostCtrl);
  1052. spin_unlock_irqrestore(&rrpriv->lock, flags);
  1053. if (request_irq(dev->irq, rr_interrupt, SA_SHIRQ, rrpriv->name, dev))
  1054. {
  1055. printk(KERN_WARNING "%s: Requested IRQ %d is busyn",
  1056.        dev->name, dev->irq);
  1057. ecode = -EAGAIN;
  1058. goto error;
  1059. }
  1060. if ((ecode = rr_init1(dev)))
  1061. goto error;
  1062. /* Set the timer to switch to check for link beat and perhaps switch
  1063.    to an alternate media type. */
  1064. init_timer(&rrpriv->timer);
  1065. rrpriv->timer.expires = RUN_AT(5*HZ);           /* 5 sec. watchdog */
  1066. rrpriv->timer.data = (unsigned long)dev;
  1067. rrpriv->timer.function = &rr_timer;               /* timer handler */
  1068. add_timer(&rrpriv->timer);
  1069. netif_start_queue(dev);
  1070. return ecode;
  1071.  error:
  1072. spin_lock_irqsave(&rrpriv->lock, flags);
  1073. writel(readl(&regs->HostCtrl)|HALT_NIC|RR_CLEAR_INT, &regs->HostCtrl);
  1074. spin_unlock_irqrestore(&rrpriv->lock, flags);
  1075. if (rrpriv->info) {
  1076. kfree(rrpriv->info);
  1077. rrpriv->info = NULL;
  1078. }
  1079. if (rrpriv->rx_ctrl) {
  1080. kfree(rrpriv->rx_ctrl);
  1081. rrpriv->rx_ctrl = NULL;
  1082. }
  1083. netif_stop_queue(dev);
  1084. rr_if_down(dev);
  1085. return ecode;
  1086. }
  1087. static void rr_dump(struct net_device *dev)
  1088. {
  1089. struct rr_private *rrpriv;
  1090. struct rr_regs *regs;
  1091. u32 index, cons;
  1092. short i;
  1093. int len;
  1094. rrpriv = (struct rr_private *)dev->priv;
  1095. regs = rrpriv->regs;
  1096. printk("%s: dumping NIC TX ringsn", dev->name);
  1097. printk("RxPrd %08x, TxPrd %02x, EvtPrd %08x, TxPi %02x, TxCtrlPi %02xn",
  1098.        readl(&regs->RxPrd), readl(&regs->TxPrd),
  1099.        readl(&regs->EvtPrd), readl(&regs->TxPi),
  1100.        rrpriv->info->tx_ctrl.pi);
  1101. printk("Error code 0x%xn", readl(&regs->Fail1));
  1102. index = (((readl(&regs->EvtPrd) >> 8) & 0xff ) - 1) % EVT_RING_ENTRIES;
  1103. cons = rrpriv->dirty_tx;
  1104. printk("TX ring index %i, TX consumer %in",
  1105.        index, cons);
  1106. if (rrpriv->tx_skbuff[index]){
  1107. len = min_t(int, 0x80, rrpriv->tx_skbuff[index]->len);
  1108. printk("skbuff for index %i is valid - dumping data (0x%x bytes - DMA len 0x%x)n", index, len, rrpriv->tx_ring[index].size);
  1109. for (i = 0; i < len; i++){
  1110. if (!(i & 7))
  1111. printk("n");
  1112. printk("%02x ", (unsigned char) rrpriv->tx_skbuff[index]->data[i]);
  1113. }
  1114. printk("n");
  1115. }
  1116. if (rrpriv->tx_skbuff[cons]){
  1117. len = min_t(int, 0x80, rrpriv->tx_skbuff[cons]->len);
  1118. printk("skbuff for cons %i is valid - dumping data (0x%x bytes - skbuff len 0x%x)n", cons, len, rrpriv->tx_skbuff[cons]->len);
  1119. printk("mode 0x%x, size 0x%x,n phys %08x (virt %08lx), skbuff-addr %08lx, truesize 0x%xn",
  1120.        rrpriv->tx_ring[cons].mode,
  1121.        rrpriv->tx_ring[cons].size,
  1122.        rrpriv->tx_ring[cons].addr.addrlo,
  1123.        (unsigned long)bus_to_virt(rrpriv->tx_ring[cons].addr.addrlo),
  1124.        (unsigned long)rrpriv->tx_skbuff[cons]->data,
  1125.        (unsigned int)rrpriv->tx_skbuff[cons]->truesize);
  1126. for (i = 0; i < len; i++){
  1127. if (!(i & 7))
  1128. printk("n");
  1129. printk("%02x ", (unsigned char)rrpriv->tx_ring[cons].size);
  1130. }
  1131. printk("n");
  1132. }
  1133. printk("dumping TX ring info:n");
  1134. for (i = 0; i < TX_RING_ENTRIES; i++)
  1135. printk("mode 0x%x, size 0x%x, phys-addr %08xn",
  1136.        rrpriv->tx_ring[i].mode,
  1137.        rrpriv->tx_ring[i].size,
  1138.        rrpriv->tx_ring[i].addr.addrlo);
  1139. }
  1140. static int rr_close(struct net_device *dev)
  1141. {
  1142. struct rr_private *rrpriv;
  1143. struct rr_regs *regs;
  1144. u32 tmp;
  1145. short i;
  1146. netif_stop_queue(dev);
  1147. rr_if_down(dev);
  1148. rrpriv = (struct rr_private *)dev->priv;
  1149. regs = rrpriv->regs;
  1150. /*
  1151.  * Lock to make sure we are not cleaning up while another CPU
  1152.  * handling interrupts.
  1153.  */
  1154. spin_lock(&rrpriv->lock);
  1155. tmp = readl(&regs->HostCtrl);
  1156. if (tmp & NIC_HALTED){
  1157. printk("%s: NIC already haltedn", dev->name);
  1158. rr_dump(dev);
  1159. }else{
  1160. tmp |= HALT_NIC | RR_CLEAR_INT;
  1161. writel(tmp, &regs->HostCtrl);
  1162. wmb();
  1163. }
  1164. rrpriv->fw_running = 0;
  1165. del_timer(&rrpriv->timer);
  1166. writel(0, &regs->TxPi);
  1167. writel(0, &regs->IpRxPi);
  1168. writel(0, &regs->EvtCon);
  1169. writel(0, &regs->EvtPrd);
  1170. for (i = 0; i < CMD_RING_ENTRIES; i++)
  1171. writel(0, &regs->CmdRing[i]);
  1172. rrpriv->info->tx_ctrl.entries = 0;
  1173. rrpriv->info->cmd_ctrl.pi = 0;
  1174. rrpriv->info->evt_ctrl.pi = 0;
  1175. rrpriv->rx_ctrl[4].entries = 0;
  1176. for (i = 0; i < TX_RING_ENTRIES; i++) {
  1177. if (rrpriv->tx_skbuff[i]) {
  1178. rrpriv->tx_ring[i].size = 0;
  1179. set_rraddr(&rrpriv->tx_ring[i].addr, 0);
  1180. dev_kfree_skb(rrpriv->tx_skbuff[i]);
  1181. rrpriv->tx_skbuff[i] = NULL;
  1182. }
  1183. }
  1184. for (i = 0; i < RX_RING_ENTRIES; i++) {
  1185. if (rrpriv->rx_skbuff[i]) {
  1186. rrpriv->rx_ring[i].size = 0;
  1187. set_rraddr(&rrpriv->rx_ring[i].addr, 0);
  1188. dev_kfree_skb(rrpriv->rx_skbuff[i]);
  1189. rrpriv->rx_skbuff[i] = NULL;
  1190. }
  1191. }
  1192. if (rrpriv->rx_ctrl) {
  1193. kfree(rrpriv->rx_ctrl);
  1194. rrpriv->rx_ctrl = NULL;
  1195. }
  1196. if (rrpriv->info) {
  1197. kfree(rrpriv->info);
  1198. rrpriv->info = NULL;
  1199. }
  1200. free_irq(dev->irq, dev);
  1201. spin_unlock(&rrpriv->lock);
  1202. return 0;
  1203. }
  1204. static int rr_start_xmit(struct sk_buff *skb, struct net_device *dev)
  1205. {
  1206. struct rr_private *rrpriv = (struct rr_private *)dev->priv;
  1207. struct rr_regs *regs = rrpriv->regs;
  1208. struct ring_ctrl *txctrl;
  1209. unsigned long flags;
  1210. u32 index, len = skb->len;
  1211. u32 *ifield;
  1212. struct sk_buff *new_skb;
  1213. if (readl(&regs->Mode) & FATAL_ERR)
  1214. printk("error codes Fail1 %02x, Fail2 %02xn",
  1215.        readl(&regs->Fail1), readl(&regs->Fail2));
  1216. /*
  1217.  * We probably need to deal with tbusy here to prevent overruns.
  1218.  */
  1219. if (skb_headroom(skb) < 8){
  1220. printk("incoming skb too small - reallocatingn");
  1221. if (!(new_skb = dev_alloc_skb(len + 8))) {
  1222. dev_kfree_skb(skb);
  1223. netif_wake_queue(dev);
  1224. return -EBUSY;
  1225. }
  1226. skb_reserve(new_skb, 8);
  1227. skb_put(new_skb, len);
  1228. memcpy(new_skb->data, skb->data, len);
  1229. dev_kfree_skb(skb);
  1230. skb = new_skb;
  1231. }
  1232. ifield = (u32 *)skb_push(skb, 8);
  1233. ifield[0] = 0;
  1234. ifield[1] = skb->private.ifield;
  1235. /*
  1236.  * We don't need the lock before we are actually going to start
  1237.  * fiddling with the control blocks.
  1238.  */
  1239. spin_lock_irqsave(&rrpriv->lock, flags);
  1240. txctrl = &rrpriv->info->tx_ctrl;
  1241. index = txctrl->pi;
  1242. rrpriv->tx_skbuff[index] = skb;
  1243. set_rraddr(&rrpriv->tx_ring[index].addr, skb->data);
  1244. rrpriv->tx_ring[index].size = len + 8; /* include IFIELD */
  1245. rrpriv->tx_ring[index].mode = PACKET_START | PACKET_END;
  1246. txctrl->pi = (index + 1) % TX_RING_ENTRIES;
  1247. wmb();
  1248. writel(txctrl->pi, &regs->TxPi);
  1249. if (txctrl->pi == rrpriv->dirty_tx){
  1250. rrpriv->tx_full = 1;
  1251. netif_stop_queue(dev);
  1252. }
  1253. spin_unlock_irqrestore(&rrpriv->lock, flags);
  1254. dev->trans_start = jiffies;
  1255. return 0;
  1256. }
  1257. static struct net_device_stats *rr_get_stats(struct net_device *dev)
  1258. {
  1259. struct rr_private *rrpriv;
  1260. rrpriv = (struct rr_private *)dev->priv;
  1261. return(&rrpriv->stats);
  1262. }
  1263. /*
  1264.  * Read the firmware out of the EEPROM and put it into the SRAM
  1265.  * (or from user space - later)
  1266.  *
  1267.  * This operation requires the NIC to be halted and is performed with
  1268.  * interrupts disabled and with the spinlock hold.
  1269.  */
  1270. static int rr_load_firmware(struct net_device *dev)
  1271. {
  1272. struct rr_private *rrpriv;
  1273. struct rr_regs *regs;
  1274. unsigned long eptr, segptr;
  1275. int i, j;
  1276. u32 localctrl, sptr, len, tmp;
  1277. u32 p2len, p2size, nr_seg, revision, io, sram_size;
  1278. struct eeprom *hw = NULL;
  1279. rrpriv = (struct rr_private *)dev->priv;
  1280. regs = rrpriv->regs;
  1281. if (dev->flags & IFF_UP)
  1282. return -EBUSY;
  1283. if (!(readl(&regs->HostCtrl) & NIC_HALTED)){
  1284. printk("%s: Trying to load firmware to a running NIC.n", 
  1285.        dev->name);
  1286. return -EBUSY;
  1287. }
  1288. localctrl = readl(&regs->LocalCtrl);
  1289. writel(0, &regs->LocalCtrl);
  1290. writel(0, &regs->EvtPrd);
  1291. writel(0, &regs->RxPrd);
  1292. writel(0, &regs->TxPrd);
  1293. /*
  1294.  * First wipe the entire SRAM, otherwise we might run into all
  1295.  * kinds of trouble ... sigh, this took almost all afternoon
  1296.  * to track down ;-(
  1297.  */
  1298. io = readl(&regs->ExtIo);
  1299. writel(0, &regs->ExtIo);
  1300. sram_size = rr_read_eeprom_word(rrpriv, (void *)8);
  1301. for (i = 200; i < sram_size / 4; i++){
  1302. writel(i * 4, &regs->WinBase);
  1303. mb();
  1304. writel(0, &regs->WinData);
  1305. mb();
  1306. }
  1307. writel(io, &regs->ExtIo);
  1308. mb();
  1309. eptr = (unsigned long)rr_read_eeprom_word(rrpriv,
  1310.        &hw->rncd_info.AddrRunCodeSegs);
  1311. eptr = ((eptr & 0x1fffff) >> 3);
  1312. p2len = rr_read_eeprom_word(rrpriv, (void *)(0x83*4));
  1313. p2len = (p2len << 2);
  1314. p2size = rr_read_eeprom_word(rrpriv, (void *)(0x84*4));
  1315. p2size = ((p2size & 0x1fffff) >> 3);
  1316. if ((eptr < p2size) || (eptr > (p2size + p2len))){
  1317. printk("%s: eptr is invalidn", dev->name);
  1318. goto out;
  1319. }
  1320. revision = rr_read_eeprom_word(rrpriv, &hw->manf.HeaderFmt);
  1321. if (revision != 1){
  1322. printk("%s: invalid firmware format (%i)n",
  1323.        dev->name, revision);
  1324. goto out;
  1325. }
  1326. nr_seg = rr_read_eeprom_word(rrpriv, (void *)eptr);
  1327. eptr +=4;
  1328. #if (DEBUG > 1)
  1329. printk("%s: nr_seg %in", dev->name, nr_seg);
  1330. #endif
  1331. for (i = 0; i < nr_seg; i++){
  1332. sptr = rr_read_eeprom_word(rrpriv, (void *)eptr);
  1333. eptr += 4;
  1334. len = rr_read_eeprom_word(rrpriv, (void *)eptr);
  1335. eptr += 4;
  1336. segptr = (unsigned long)rr_read_eeprom_word(rrpriv, (void *)eptr);
  1337. segptr = ((segptr & 0x1fffff) >> 3);
  1338. eptr += 4;
  1339. #if (DEBUG > 1)
  1340. printk("%s: segment %i, sram address %06x, length %04x, segptr %06xn",
  1341.        dev->name, i, sptr, len, segptr);
  1342. #endif
  1343. for (j = 0; j < len; j++){
  1344. tmp = rr_read_eeprom_word(rrpriv, (void *)segptr);
  1345. writel(sptr, &regs->WinBase);
  1346. mb();
  1347. writel(tmp, &regs->WinData);
  1348. mb();
  1349. segptr += 4;
  1350. sptr += 4;
  1351. }
  1352. }
  1353. out:
  1354. writel(localctrl, &regs->LocalCtrl);
  1355. mb();
  1356. return 0;
  1357. }
  1358. static int rr_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
  1359. {
  1360. struct rr_private *rrpriv;
  1361. unsigned char *image, *oldimage;
  1362. unsigned int i;
  1363. int error = -EOPNOTSUPP;
  1364. rrpriv = dev->priv;
  1365. switch(cmd){
  1366. case SIOCRRGFW:
  1367. if (!capable(CAP_SYS_RAWIO)){
  1368. return -EPERM;
  1369. }
  1370. image = kmalloc(EEPROM_WORDS * sizeof(u32), GFP_KERNEL);
  1371. if (!image){
  1372. printk(KERN_ERR "%s: Unable to allocate memory "
  1373.        "for EEPROM imagen", dev->name);
  1374. return -ENOMEM;
  1375. }
  1376. spin_lock(&rrpriv->lock);
  1377. if (rrpriv->fw_running){
  1378. printk("%s: Firmware already runningn", dev->name);
  1379. error = -EPERM;
  1380. goto out_spin;
  1381. }
  1382. i = rr_read_eeprom(rrpriv, 0, image, EEPROM_BYTES);
  1383. if (i != EEPROM_BYTES){
  1384. printk(KERN_ERR "%s: Error reading EEPROMn", dev->name);
  1385. error = -EFAULT;
  1386. goto out_spin;
  1387. }
  1388. spin_unlock(&rrpriv->lock);
  1389. error = copy_to_user(rq->ifr_data, image, EEPROM_BYTES);
  1390. if (error)
  1391. error = -EFAULT;
  1392. kfree(image);
  1393. return error;
  1394. case SIOCRRPFW:
  1395. if (!capable(CAP_SYS_RAWIO)){
  1396. return -EPERM;
  1397. }
  1398. image = kmalloc(EEPROM_WORDS * sizeof(u32), GFP_KERNEL);
  1399. if (!image){
  1400. printk(KERN_ERR "%s: Unable to allocate memory "
  1401.        "for EEPROM imagen", dev->name);
  1402. return -ENOMEM;
  1403. }
  1404. oldimage = kmalloc(EEPROM_WORDS * sizeof(u32), GFP_KERNEL);
  1405. if (!oldimage){
  1406. kfree(image);
  1407. printk(KERN_ERR "%s: Unable to allocate memory "
  1408.        "for old EEPROM imagen", dev->name);
  1409. return -ENOMEM;
  1410. }
  1411. error = copy_from_user(image, rq->ifr_data, EEPROM_BYTES);
  1412. if (error) {
  1413. kfree(image);
  1414. kfree(oldimage);
  1415. return -EFAULT;
  1416. }
  1417. spin_lock(&rrpriv->lock);
  1418. if (rrpriv->fw_running){
  1419. kfree(oldimage);
  1420. printk("%s: Firmware already runningn", dev->name);
  1421. error = -EPERM;
  1422. goto out_spin;
  1423. }
  1424. printk("%s: Updating EEPROM firmwaren", dev->name);
  1425. error = write_eeprom(rrpriv, 0, image, EEPROM_BYTES);
  1426. if (error)
  1427. printk(KERN_ERR "%s: Error writing EEPROMn",
  1428.        dev->name);
  1429. i = rr_read_eeprom(rrpriv, 0, oldimage, EEPROM_BYTES);
  1430. if (i != EEPROM_BYTES)
  1431. printk(KERN_ERR "%s: Error reading back EEPROM "
  1432.        "imagen", dev->name);
  1433. spin_unlock(&rrpriv->lock);
  1434. error = memcmp(image, oldimage, EEPROM_BYTES);
  1435. if (error){
  1436. printk(KERN_ERR "%s: Error verifying EEPROM imagen",
  1437.        dev->name);
  1438. error = -EFAULT;
  1439. }
  1440. kfree(image);
  1441. kfree(oldimage);
  1442. return error;
  1443. case SIOCRRID:
  1444. return put_user(0x52523032, (int *)(&rq->ifr_data[0]));
  1445. default:
  1446. return error;
  1447. }
  1448.  out_spin:
  1449. kfree(image);
  1450. spin_unlock(&rrpriv->lock);
  1451. return error;
  1452. }
  1453. /*
  1454.  * Local variables:
  1455.  * compile-command: "gcc -D__KERNEL__ -I../../include -Wall -Wstrict-prototypes -O2 -pipe -fomit-frame-pointer -fno-strength-reduce -m486 -malign-loops=2 -malign-jumps=2 -malign-functions=2 -DMODULE -DMODVERSIONS -include ../../include/linux/modversions.h -c rrunner.c"
  1456.  * End:
  1457.  */