Merge branch 'next-spi' of git://git.secretlab.ca/git/linux-2.6
[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / net / ethoc.c
1 /*
2 * linux/drivers/net/ethoc.c
3 *
4 * Copyright (C) 2007-2008 Avionic Design Development GmbH
5 * Copyright (C) 2008-2009 Avionic Design GmbH
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License version 2 as
9 * published by the Free Software Foundation.
10 *
11 * Written by Thierry Reding <thierry.reding@avionic-design.de>
12 */
13
14 #include <linux/etherdevice.h>
15 #include <linux/crc32.h>
16 #include <linux/io.h>
17 #include <linux/mii.h>
18 #include <linux/phy.h>
19 #include <linux/platform_device.h>
20 #include <linux/sched.h>
21 #include <linux/slab.h>
22 #include <net/ethoc.h>
23
24 static int buffer_size = 0x8000; /* 32 KBytes */
25 module_param(buffer_size, int, 0);
26 MODULE_PARM_DESC(buffer_size, "DMA buffer allocation size");
27
28 /* register offsets */
29 #define MODER 0x00
30 #define INT_SOURCE 0x04
31 #define INT_MASK 0x08
32 #define IPGT 0x0c
33 #define IPGR1 0x10
34 #define IPGR2 0x14
35 #define PACKETLEN 0x18
36 #define COLLCONF 0x1c
37 #define TX_BD_NUM 0x20
38 #define CTRLMODER 0x24
39 #define MIIMODER 0x28
40 #define MIICOMMAND 0x2c
41 #define MIIADDRESS 0x30
42 #define MIITX_DATA 0x34
43 #define MIIRX_DATA 0x38
44 #define MIISTATUS 0x3c
45 #define MAC_ADDR0 0x40
46 #define MAC_ADDR1 0x44
47 #define ETH_HASH0 0x48
48 #define ETH_HASH1 0x4c
49 #define ETH_TXCTRL 0x50
50
51 /* mode register */
52 #define MODER_RXEN (1 << 0) /* receive enable */
53 #define MODER_TXEN (1 << 1) /* transmit enable */
54 #define MODER_NOPRE (1 << 2) /* no preamble */
55 #define MODER_BRO (1 << 3) /* broadcast address */
56 #define MODER_IAM (1 << 4) /* individual address mode */
57 #define MODER_PRO (1 << 5) /* promiscuous mode */
58 #define MODER_IFG (1 << 6) /* interframe gap for incoming frames */
59 #define MODER_LOOP (1 << 7) /* loopback */
60 #define MODER_NBO (1 << 8) /* no back-off */
61 #define MODER_EDE (1 << 9) /* excess defer enable */
62 #define MODER_FULLD (1 << 10) /* full duplex */
63 #define MODER_RESET (1 << 11) /* FIXME: reset (undocumented) */
64 #define MODER_DCRC (1 << 12) /* delayed CRC enable */
65 #define MODER_CRC (1 << 13) /* CRC enable */
66 #define MODER_HUGE (1 << 14) /* huge packets enable */
67 #define MODER_PAD (1 << 15) /* padding enabled */
68 #define MODER_RSM (1 << 16) /* receive small packets */
69
70 /* interrupt source and mask registers */
71 #define INT_MASK_TXF (1 << 0) /* transmit frame */
72 #define INT_MASK_TXE (1 << 1) /* transmit error */
73 #define INT_MASK_RXF (1 << 2) /* receive frame */
74 #define INT_MASK_RXE (1 << 3) /* receive error */
75 #define INT_MASK_BUSY (1 << 4)
76 #define INT_MASK_TXC (1 << 5) /* transmit control frame */
77 #define INT_MASK_RXC (1 << 6) /* receive control frame */
78
79 #define INT_MASK_TX (INT_MASK_TXF | INT_MASK_TXE)
80 #define INT_MASK_RX (INT_MASK_RXF | INT_MASK_RXE)
81
82 #define INT_MASK_ALL ( \
83 INT_MASK_TXF | INT_MASK_TXE | \
84 INT_MASK_RXF | INT_MASK_RXE | \
85 INT_MASK_TXC | INT_MASK_RXC | \
86 INT_MASK_BUSY \
87 )
88
89 /* packet length register */
90 #define PACKETLEN_MIN(min) (((min) & 0xffff) << 16)
91 #define PACKETLEN_MAX(max) (((max) & 0xffff) << 0)
92 #define PACKETLEN_MIN_MAX(min, max) (PACKETLEN_MIN(min) | \
93 PACKETLEN_MAX(max))
94
95 /* transmit buffer number register */
96 #define TX_BD_NUM_VAL(x) (((x) <= 0x80) ? (x) : 0x80)
97
98 /* control module mode register */
99 #define CTRLMODER_PASSALL (1 << 0) /* pass all receive frames */
100 #define CTRLMODER_RXFLOW (1 << 1) /* receive control flow */
101 #define CTRLMODER_TXFLOW (1 << 2) /* transmit control flow */
102
103 /* MII mode register */
104 #define MIIMODER_CLKDIV(x) ((x) & 0xfe) /* needs to be an even number */
105 #define MIIMODER_NOPRE (1 << 8) /* no preamble */
106
107 /* MII command register */
108 #define MIICOMMAND_SCAN (1 << 0) /* scan status */
109 #define MIICOMMAND_READ (1 << 1) /* read status */
110 #define MIICOMMAND_WRITE (1 << 2) /* write control data */
111
112 /* MII address register */
113 #define MIIADDRESS_FIAD(x) (((x) & 0x1f) << 0)
114 #define MIIADDRESS_RGAD(x) (((x) & 0x1f) << 8)
115 #define MIIADDRESS_ADDR(phy, reg) (MIIADDRESS_FIAD(phy) | \
116 MIIADDRESS_RGAD(reg))
117
118 /* MII transmit data register */
119 #define MIITX_DATA_VAL(x) ((x) & 0xffff)
120
121 /* MII receive data register */
122 #define MIIRX_DATA_VAL(x) ((x) & 0xffff)
123
124 /* MII status register */
125 #define MIISTATUS_LINKFAIL (1 << 0)
126 #define MIISTATUS_BUSY (1 << 1)
127 #define MIISTATUS_INVALID (1 << 2)
128
129 /* TX buffer descriptor */
130 #define TX_BD_CS (1 << 0) /* carrier sense lost */
131 #define TX_BD_DF (1 << 1) /* defer indication */
132 #define TX_BD_LC (1 << 2) /* late collision */
133 #define TX_BD_RL (1 << 3) /* retransmission limit */
134 #define TX_BD_RETRY_MASK (0x00f0)
135 #define TX_BD_RETRY(x) (((x) & 0x00f0) >> 4)
136 #define TX_BD_UR (1 << 8) /* transmitter underrun */
137 #define TX_BD_CRC (1 << 11) /* TX CRC enable */
138 #define TX_BD_PAD (1 << 12) /* pad enable for short packets */
139 #define TX_BD_WRAP (1 << 13)
140 #define TX_BD_IRQ (1 << 14) /* interrupt request enable */
141 #define TX_BD_READY (1 << 15) /* TX buffer ready */
142 #define TX_BD_LEN(x) (((x) & 0xffff) << 16)
143 #define TX_BD_LEN_MASK (0xffff << 16)
144
145 #define TX_BD_STATS (TX_BD_CS | TX_BD_DF | TX_BD_LC | \
146 TX_BD_RL | TX_BD_RETRY_MASK | TX_BD_UR)
147
148 /* RX buffer descriptor */
149 #define RX_BD_LC (1 << 0) /* late collision */
150 #define RX_BD_CRC (1 << 1) /* RX CRC error */
151 #define RX_BD_SF (1 << 2) /* short frame */
152 #define RX_BD_TL (1 << 3) /* too long */
153 #define RX_BD_DN (1 << 4) /* dribble nibble */
154 #define RX_BD_IS (1 << 5) /* invalid symbol */
155 #define RX_BD_OR (1 << 6) /* receiver overrun */
156 #define RX_BD_MISS (1 << 7)
157 #define RX_BD_CF (1 << 8) /* control frame */
158 #define RX_BD_WRAP (1 << 13)
159 #define RX_BD_IRQ (1 << 14) /* interrupt request enable */
160 #define RX_BD_EMPTY (1 << 15)
161 #define RX_BD_LEN(x) (((x) & 0xffff) << 16)
162
163 #define RX_BD_STATS (RX_BD_LC | RX_BD_CRC | RX_BD_SF | RX_BD_TL | \
164 RX_BD_DN | RX_BD_IS | RX_BD_OR | RX_BD_MISS)
165
166 #define ETHOC_BUFSIZ 1536
167 #define ETHOC_ZLEN 64
168 #define ETHOC_BD_BASE 0x400
169 #define ETHOC_TIMEOUT (HZ / 2)
170 #define ETHOC_MII_TIMEOUT (1 + (HZ / 5))
171
172 /**
173 * struct ethoc - driver-private device structure
174 * @iobase: pointer to I/O memory region
175 * @membase: pointer to buffer memory region
176 * @dma_alloc: dma allocated buffer size
177 * @num_tx: number of send buffers
178 * @cur_tx: last send buffer written
179 * @dty_tx: last buffer actually sent
180 * @num_rx: number of receive buffers
181 * @cur_rx: current receive buffer
182 * @netdev: pointer to network device structure
183 * @napi: NAPI structure
184 * @stats: network device statistics
185 * @msg_enable: device state flags
186 * @rx_lock: receive lock
187 * @lock: device lock
188 * @phy: attached PHY
189 * @mdio: MDIO bus for PHY access
190 * @phy_id: address of attached PHY
191 */
192 struct ethoc {
193 void __iomem *iobase;
194 void __iomem *membase;
195 int dma_alloc;
196
197 unsigned int num_tx;
198 unsigned int cur_tx;
199 unsigned int dty_tx;
200
201 unsigned int num_rx;
202 unsigned int cur_rx;
203
204 struct net_device *netdev;
205 struct napi_struct napi;
206 struct net_device_stats stats;
207 u32 msg_enable;
208
209 spinlock_t rx_lock;
210 spinlock_t lock;
211
212 struct phy_device *phy;
213 struct mii_bus *mdio;
214 s8 phy_id;
215 };
216
217 /**
218 * struct ethoc_bd - buffer descriptor
219 * @stat: buffer statistics
220 * @addr: physical memory address
221 */
222 struct ethoc_bd {
223 u32 stat;
224 u32 addr;
225 };
226
227 static inline u32 ethoc_read(struct ethoc *dev, loff_t offset)
228 {
229 return ioread32(dev->iobase + offset);
230 }
231
232 static inline void ethoc_write(struct ethoc *dev, loff_t offset, u32 data)
233 {
234 iowrite32(data, dev->iobase + offset);
235 }
236
237 static inline void ethoc_read_bd(struct ethoc *dev, int index,
238 struct ethoc_bd *bd)
239 {
240 loff_t offset = ETHOC_BD_BASE + (index * sizeof(struct ethoc_bd));
241 bd->stat = ethoc_read(dev, offset + 0);
242 bd->addr = ethoc_read(dev, offset + 4);
243 }
244
245 static inline void ethoc_write_bd(struct ethoc *dev, int index,
246 const struct ethoc_bd *bd)
247 {
248 loff_t offset = ETHOC_BD_BASE + (index * sizeof(struct ethoc_bd));
249 ethoc_write(dev, offset + 0, bd->stat);
250 ethoc_write(dev, offset + 4, bd->addr);
251 }
252
253 static inline void ethoc_enable_irq(struct ethoc *dev, u32 mask)
254 {
255 u32 imask = ethoc_read(dev, INT_MASK);
256 imask |= mask;
257 ethoc_write(dev, INT_MASK, imask);
258 }
259
260 static inline void ethoc_disable_irq(struct ethoc *dev, u32 mask)
261 {
262 u32 imask = ethoc_read(dev, INT_MASK);
263 imask &= ~mask;
264 ethoc_write(dev, INT_MASK, imask);
265 }
266
267 static inline void ethoc_ack_irq(struct ethoc *dev, u32 mask)
268 {
269 ethoc_write(dev, INT_SOURCE, mask);
270 }
271
272 static inline void ethoc_enable_rx_and_tx(struct ethoc *dev)
273 {
274 u32 mode = ethoc_read(dev, MODER);
275 mode |= MODER_RXEN | MODER_TXEN;
276 ethoc_write(dev, MODER, mode);
277 }
278
279 static inline void ethoc_disable_rx_and_tx(struct ethoc *dev)
280 {
281 u32 mode = ethoc_read(dev, MODER);
282 mode &= ~(MODER_RXEN | MODER_TXEN);
283 ethoc_write(dev, MODER, mode);
284 }
285
286 static int ethoc_init_ring(struct ethoc *dev)
287 {
288 struct ethoc_bd bd;
289 int i;
290
291 dev->cur_tx = 0;
292 dev->dty_tx = 0;
293 dev->cur_rx = 0;
294
295 /* setup transmission buffers */
296 bd.addr = virt_to_phys(dev->membase);
297 bd.stat = TX_BD_IRQ | TX_BD_CRC;
298
299 for (i = 0; i < dev->num_tx; i++) {
300 if (i == dev->num_tx - 1)
301 bd.stat |= TX_BD_WRAP;
302
303 ethoc_write_bd(dev, i, &bd);
304 bd.addr += ETHOC_BUFSIZ;
305 }
306
307 bd.stat = RX_BD_EMPTY | RX_BD_IRQ;
308
309 for (i = 0; i < dev->num_rx; i++) {
310 if (i == dev->num_rx - 1)
311 bd.stat |= RX_BD_WRAP;
312
313 ethoc_write_bd(dev, dev->num_tx + i, &bd);
314 bd.addr += ETHOC_BUFSIZ;
315 }
316
317 return 0;
318 }
319
320 static int ethoc_reset(struct ethoc *dev)
321 {
322 u32 mode;
323
324 /* TODO: reset controller? */
325
326 ethoc_disable_rx_and_tx(dev);
327
328 /* TODO: setup registers */
329
330 /* enable FCS generation and automatic padding */
331 mode = ethoc_read(dev, MODER);
332 mode |= MODER_CRC | MODER_PAD;
333 ethoc_write(dev, MODER, mode);
334
335 /* set full-duplex mode */
336 mode = ethoc_read(dev, MODER);
337 mode |= MODER_FULLD;
338 ethoc_write(dev, MODER, mode);
339 ethoc_write(dev, IPGT, 0x15);
340
341 ethoc_ack_irq(dev, INT_MASK_ALL);
342 ethoc_enable_irq(dev, INT_MASK_ALL);
343 ethoc_enable_rx_and_tx(dev);
344 return 0;
345 }
346
347 static unsigned int ethoc_update_rx_stats(struct ethoc *dev,
348 struct ethoc_bd *bd)
349 {
350 struct net_device *netdev = dev->netdev;
351 unsigned int ret = 0;
352
353 if (bd->stat & RX_BD_TL) {
354 dev_err(&netdev->dev, "RX: frame too long\n");
355 dev->stats.rx_length_errors++;
356 ret++;
357 }
358
359 if (bd->stat & RX_BD_SF) {
360 dev_err(&netdev->dev, "RX: frame too short\n");
361 dev->stats.rx_length_errors++;
362 ret++;
363 }
364
365 if (bd->stat & RX_BD_DN) {
366 dev_err(&netdev->dev, "RX: dribble nibble\n");
367 dev->stats.rx_frame_errors++;
368 }
369
370 if (bd->stat & RX_BD_CRC) {
371 dev_err(&netdev->dev, "RX: wrong CRC\n");
372 dev->stats.rx_crc_errors++;
373 ret++;
374 }
375
376 if (bd->stat & RX_BD_OR) {
377 dev_err(&netdev->dev, "RX: overrun\n");
378 dev->stats.rx_over_errors++;
379 ret++;
380 }
381
382 if (bd->stat & RX_BD_MISS)
383 dev->stats.rx_missed_errors++;
384
385 if (bd->stat & RX_BD_LC) {
386 dev_err(&netdev->dev, "RX: late collision\n");
387 dev->stats.collisions++;
388 ret++;
389 }
390
391 return ret;
392 }
393
394 static int ethoc_rx(struct net_device *dev, int limit)
395 {
396 struct ethoc *priv = netdev_priv(dev);
397 int count;
398
399 for (count = 0; count < limit; ++count) {
400 unsigned int entry;
401 struct ethoc_bd bd;
402
403 entry = priv->num_tx + (priv->cur_rx % priv->num_rx);
404 ethoc_read_bd(priv, entry, &bd);
405 if (bd.stat & RX_BD_EMPTY)
406 break;
407
408 if (ethoc_update_rx_stats(priv, &bd) == 0) {
409 int size = bd.stat >> 16;
410 struct sk_buff *skb;
411
412 size -= 4; /* strip the CRC */
413 skb = netdev_alloc_skb_ip_align(dev, size);
414
415 if (likely(skb)) {
416 void *src = phys_to_virt(bd.addr);
417 memcpy_fromio(skb_put(skb, size), src, size);
418 skb->protocol = eth_type_trans(skb, dev);
419 priv->stats.rx_packets++;
420 priv->stats.rx_bytes += size;
421 netif_receive_skb(skb);
422 } else {
423 if (net_ratelimit())
424 dev_warn(&dev->dev, "low on memory - "
425 "packet dropped\n");
426
427 priv->stats.rx_dropped++;
428 break;
429 }
430 }
431
432 /* clear the buffer descriptor so it can be reused */
433 bd.stat &= ~RX_BD_STATS;
434 bd.stat |= RX_BD_EMPTY;
435 ethoc_write_bd(priv, entry, &bd);
436 priv->cur_rx++;
437 }
438
439 return count;
440 }
441
442 static int ethoc_update_tx_stats(struct ethoc *dev, struct ethoc_bd *bd)
443 {
444 struct net_device *netdev = dev->netdev;
445
446 if (bd->stat & TX_BD_LC) {
447 dev_err(&netdev->dev, "TX: late collision\n");
448 dev->stats.tx_window_errors++;
449 }
450
451 if (bd->stat & TX_BD_RL) {
452 dev_err(&netdev->dev, "TX: retransmit limit\n");
453 dev->stats.tx_aborted_errors++;
454 }
455
456 if (bd->stat & TX_BD_UR) {
457 dev_err(&netdev->dev, "TX: underrun\n");
458 dev->stats.tx_fifo_errors++;
459 }
460
461 if (bd->stat & TX_BD_CS) {
462 dev_err(&netdev->dev, "TX: carrier sense lost\n");
463 dev->stats.tx_carrier_errors++;
464 }
465
466 if (bd->stat & TX_BD_STATS)
467 dev->stats.tx_errors++;
468
469 dev->stats.collisions += (bd->stat >> 4) & 0xf;
470 dev->stats.tx_bytes += bd->stat >> 16;
471 dev->stats.tx_packets++;
472 return 0;
473 }
474
475 static void ethoc_tx(struct net_device *dev)
476 {
477 struct ethoc *priv = netdev_priv(dev);
478
479 spin_lock(&priv->lock);
480
481 while (priv->dty_tx != priv->cur_tx) {
482 unsigned int entry = priv->dty_tx % priv->num_tx;
483 struct ethoc_bd bd;
484
485 ethoc_read_bd(priv, entry, &bd);
486 if (bd.stat & TX_BD_READY)
487 break;
488
489 entry = (++priv->dty_tx) % priv->num_tx;
490 (void)ethoc_update_tx_stats(priv, &bd);
491 }
492
493 if ((priv->cur_tx - priv->dty_tx) <= (priv->num_tx / 2))
494 netif_wake_queue(dev);
495
496 ethoc_ack_irq(priv, INT_MASK_TX);
497 spin_unlock(&priv->lock);
498 }
499
500 static irqreturn_t ethoc_interrupt(int irq, void *dev_id)
501 {
502 struct net_device *dev = (struct net_device *)dev_id;
503 struct ethoc *priv = netdev_priv(dev);
504 u32 pending;
505
506 ethoc_disable_irq(priv, INT_MASK_ALL);
507 pending = ethoc_read(priv, INT_SOURCE);
508 if (unlikely(pending == 0)) {
509 ethoc_enable_irq(priv, INT_MASK_ALL);
510 return IRQ_NONE;
511 }
512
513 ethoc_ack_irq(priv, pending);
514
515 if (pending & INT_MASK_BUSY) {
516 dev_err(&dev->dev, "packet dropped\n");
517 priv->stats.rx_dropped++;
518 }
519
520 if (pending & INT_MASK_RX) {
521 if (napi_schedule_prep(&priv->napi))
522 __napi_schedule(&priv->napi);
523 } else {
524 ethoc_enable_irq(priv, INT_MASK_RX);
525 }
526
527 if (pending & INT_MASK_TX)
528 ethoc_tx(dev);
529
530 ethoc_enable_irq(priv, INT_MASK_ALL & ~INT_MASK_RX);
531 return IRQ_HANDLED;
532 }
533
534 static int ethoc_get_mac_address(struct net_device *dev, void *addr)
535 {
536 struct ethoc *priv = netdev_priv(dev);
537 u8 *mac = (u8 *)addr;
538 u32 reg;
539
540 reg = ethoc_read(priv, MAC_ADDR0);
541 mac[2] = (reg >> 24) & 0xff;
542 mac[3] = (reg >> 16) & 0xff;
543 mac[4] = (reg >> 8) & 0xff;
544 mac[5] = (reg >> 0) & 0xff;
545
546 reg = ethoc_read(priv, MAC_ADDR1);
547 mac[0] = (reg >> 8) & 0xff;
548 mac[1] = (reg >> 0) & 0xff;
549
550 return 0;
551 }
552
553 static int ethoc_poll(struct napi_struct *napi, int budget)
554 {
555 struct ethoc *priv = container_of(napi, struct ethoc, napi);
556 int work_done = 0;
557
558 work_done = ethoc_rx(priv->netdev, budget);
559 if (work_done < budget) {
560 ethoc_enable_irq(priv, INT_MASK_RX);
561 napi_complete(napi);
562 }
563
564 return work_done;
565 }
566
567 static int ethoc_mdio_read(struct mii_bus *bus, int phy, int reg)
568 {
569 unsigned long timeout = jiffies + ETHOC_MII_TIMEOUT;
570 struct ethoc *priv = bus->priv;
571
572 ethoc_write(priv, MIIADDRESS, MIIADDRESS_ADDR(phy, reg));
573 ethoc_write(priv, MIICOMMAND, MIICOMMAND_READ);
574
575 while (time_before(jiffies, timeout)) {
576 u32 status = ethoc_read(priv, MIISTATUS);
577 if (!(status & MIISTATUS_BUSY)) {
578 u32 data = ethoc_read(priv, MIIRX_DATA);
579 /* reset MII command register */
580 ethoc_write(priv, MIICOMMAND, 0);
581 return data;
582 }
583
584 schedule();
585 }
586
587 return -EBUSY;
588 }
589
590 static int ethoc_mdio_write(struct mii_bus *bus, int phy, int reg, u16 val)
591 {
592 unsigned long timeout = jiffies + ETHOC_MII_TIMEOUT;
593 struct ethoc *priv = bus->priv;
594
595 ethoc_write(priv, MIIADDRESS, MIIADDRESS_ADDR(phy, reg));
596 ethoc_write(priv, MIITX_DATA, val);
597 ethoc_write(priv, MIICOMMAND, MIICOMMAND_WRITE);
598
599 while (time_before(jiffies, timeout)) {
600 u32 stat = ethoc_read(priv, MIISTATUS);
601 if (!(stat & MIISTATUS_BUSY))
602 return 0;
603
604 schedule();
605 }
606
607 return -EBUSY;
608 }
609
610 static int ethoc_mdio_reset(struct mii_bus *bus)
611 {
612 return 0;
613 }
614
615 static void ethoc_mdio_poll(struct net_device *dev)
616 {
617 }
618
619 static int ethoc_mdio_probe(struct net_device *dev)
620 {
621 struct ethoc *priv = netdev_priv(dev);
622 struct phy_device *phy;
623 int i;
624
625 for (i = 0; i < PHY_MAX_ADDR; i++) {
626 phy = priv->mdio->phy_map[i];
627 if (phy) {
628 if (priv->phy_id != -1) {
629 /* attach to specified PHY */
630 if (priv->phy_id == phy->addr)
631 break;
632 } else {
633 /* autoselect PHY if none was specified */
634 if (phy->addr != 0)
635 break;
636 }
637 }
638 }
639
640 if (!phy) {
641 dev_err(&dev->dev, "no PHY found\n");
642 return -ENXIO;
643 }
644
645 phy = phy_connect(dev, dev_name(&phy->dev), ethoc_mdio_poll, 0,
646 PHY_INTERFACE_MODE_GMII);
647 if (IS_ERR(phy)) {
648 dev_err(&dev->dev, "could not attach to PHY\n");
649 return PTR_ERR(phy);
650 }
651
652 priv->phy = phy;
653 return 0;
654 }
655
656 static int ethoc_open(struct net_device *dev)
657 {
658 struct ethoc *priv = netdev_priv(dev);
659 unsigned int min_tx = 2;
660 unsigned int num_bd;
661 int ret;
662
663 ret = request_irq(dev->irq, ethoc_interrupt, IRQF_SHARED,
664 dev->name, dev);
665 if (ret)
666 return ret;
667
668 /* calculate the number of TX/RX buffers, maximum 128 supported */
669 num_bd = min_t(unsigned int,
670 128, (dev->mem_end - dev->mem_start + 1) / ETHOC_BUFSIZ);
671 priv->num_tx = max(min_tx, num_bd / 4);
672 priv->num_rx = num_bd - priv->num_tx;
673 ethoc_write(priv, TX_BD_NUM, priv->num_tx);
674
675 ethoc_init_ring(priv);
676 ethoc_reset(priv);
677
678 if (netif_queue_stopped(dev)) {
679 dev_dbg(&dev->dev, " resuming queue\n");
680 netif_wake_queue(dev);
681 } else {
682 dev_dbg(&dev->dev, " starting queue\n");
683 netif_start_queue(dev);
684 }
685
686 phy_start(priv->phy);
687 napi_enable(&priv->napi);
688
689 if (netif_msg_ifup(priv)) {
690 dev_info(&dev->dev, "I/O: %08lx Memory: %08lx-%08lx\n",
691 dev->base_addr, dev->mem_start, dev->mem_end);
692 }
693
694 return 0;
695 }
696
697 static int ethoc_stop(struct net_device *dev)
698 {
699 struct ethoc *priv = netdev_priv(dev);
700
701 napi_disable(&priv->napi);
702
703 if (priv->phy)
704 phy_stop(priv->phy);
705
706 ethoc_disable_rx_and_tx(priv);
707 free_irq(dev->irq, dev);
708
709 if (!netif_queue_stopped(dev))
710 netif_stop_queue(dev);
711
712 return 0;
713 }
714
715 static int ethoc_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
716 {
717 struct ethoc *priv = netdev_priv(dev);
718 struct mii_ioctl_data *mdio = if_mii(ifr);
719 struct phy_device *phy = NULL;
720
721 if (!netif_running(dev))
722 return -EINVAL;
723
724 if (cmd != SIOCGMIIPHY) {
725 if (mdio->phy_id >= PHY_MAX_ADDR)
726 return -ERANGE;
727
728 phy = priv->mdio->phy_map[mdio->phy_id];
729 if (!phy)
730 return -ENODEV;
731 } else {
732 phy = priv->phy;
733 }
734
735 return phy_mii_ioctl(phy, mdio, cmd);
736 }
737
738 static int ethoc_config(struct net_device *dev, struct ifmap *map)
739 {
740 return -ENOSYS;
741 }
742
743 static int ethoc_set_mac_address(struct net_device *dev, void *addr)
744 {
745 struct ethoc *priv = netdev_priv(dev);
746 u8 *mac = (u8 *)addr;
747
748 ethoc_write(priv, MAC_ADDR0, (mac[2] << 24) | (mac[3] << 16) |
749 (mac[4] << 8) | (mac[5] << 0));
750 ethoc_write(priv, MAC_ADDR1, (mac[0] << 8) | (mac[1] << 0));
751
752 return 0;
753 }
754
755 static void ethoc_set_multicast_list(struct net_device *dev)
756 {
757 struct ethoc *priv = netdev_priv(dev);
758 u32 mode = ethoc_read(priv, MODER);
759 struct netdev_hw_addr *ha;
760 u32 hash[2] = { 0, 0 };
761
762 /* set loopback mode if requested */
763 if (dev->flags & IFF_LOOPBACK)
764 mode |= MODER_LOOP;
765 else
766 mode &= ~MODER_LOOP;
767
768 /* receive broadcast frames if requested */
769 if (dev->flags & IFF_BROADCAST)
770 mode &= ~MODER_BRO;
771 else
772 mode |= MODER_BRO;
773
774 /* enable promiscuous mode if requested */
775 if (dev->flags & IFF_PROMISC)
776 mode |= MODER_PRO;
777 else
778 mode &= ~MODER_PRO;
779
780 ethoc_write(priv, MODER, mode);
781
782 /* receive multicast frames */
783 if (dev->flags & IFF_ALLMULTI) {
784 hash[0] = 0xffffffff;
785 hash[1] = 0xffffffff;
786 } else {
787 netdev_for_each_mc_addr(ha, dev) {
788 u32 crc = ether_crc(ETH_ALEN, ha->addr);
789 int bit = (crc >> 26) & 0x3f;
790 hash[bit >> 5] |= 1 << (bit & 0x1f);
791 }
792 }
793
794 ethoc_write(priv, ETH_HASH0, hash[0]);
795 ethoc_write(priv, ETH_HASH1, hash[1]);
796 }
797
798 static int ethoc_change_mtu(struct net_device *dev, int new_mtu)
799 {
800 return -ENOSYS;
801 }
802
803 static void ethoc_tx_timeout(struct net_device *dev)
804 {
805 struct ethoc *priv = netdev_priv(dev);
806 u32 pending = ethoc_read(priv, INT_SOURCE);
807 if (likely(pending))
808 ethoc_interrupt(dev->irq, dev);
809 }
810
811 static struct net_device_stats *ethoc_stats(struct net_device *dev)
812 {
813 struct ethoc *priv = netdev_priv(dev);
814 return &priv->stats;
815 }
816
817 static netdev_tx_t ethoc_start_xmit(struct sk_buff *skb, struct net_device *dev)
818 {
819 struct ethoc *priv = netdev_priv(dev);
820 struct ethoc_bd bd;
821 unsigned int entry;
822 void *dest;
823
824 if (unlikely(skb->len > ETHOC_BUFSIZ)) {
825 priv->stats.tx_errors++;
826 goto out;
827 }
828
829 entry = priv->cur_tx % priv->num_tx;
830 spin_lock_irq(&priv->lock);
831 priv->cur_tx++;
832
833 ethoc_read_bd(priv, entry, &bd);
834 if (unlikely(skb->len < ETHOC_ZLEN))
835 bd.stat |= TX_BD_PAD;
836 else
837 bd.stat &= ~TX_BD_PAD;
838
839 dest = phys_to_virt(bd.addr);
840 memcpy_toio(dest, skb->data, skb->len);
841
842 bd.stat &= ~(TX_BD_STATS | TX_BD_LEN_MASK);
843 bd.stat |= TX_BD_LEN(skb->len);
844 ethoc_write_bd(priv, entry, &bd);
845
846 bd.stat |= TX_BD_READY;
847 ethoc_write_bd(priv, entry, &bd);
848
849 if (priv->cur_tx == (priv->dty_tx + priv->num_tx)) {
850 dev_dbg(&dev->dev, "stopping queue\n");
851 netif_stop_queue(dev);
852 }
853
854 spin_unlock_irq(&priv->lock);
855 out:
856 dev_kfree_skb(skb);
857 return NETDEV_TX_OK;
858 }
859
860 static const struct net_device_ops ethoc_netdev_ops = {
861 .ndo_open = ethoc_open,
862 .ndo_stop = ethoc_stop,
863 .ndo_do_ioctl = ethoc_ioctl,
864 .ndo_set_config = ethoc_config,
865 .ndo_set_mac_address = ethoc_set_mac_address,
866 .ndo_set_multicast_list = ethoc_set_multicast_list,
867 .ndo_change_mtu = ethoc_change_mtu,
868 .ndo_tx_timeout = ethoc_tx_timeout,
869 .ndo_get_stats = ethoc_stats,
870 .ndo_start_xmit = ethoc_start_xmit,
871 };
872
873 /**
874 * ethoc_probe() - initialize OpenCores ethernet MAC
875 * pdev: platform device
876 */
877 static int ethoc_probe(struct platform_device *pdev)
878 {
879 struct net_device *netdev = NULL;
880 struct resource *res = NULL;
881 struct resource *mmio = NULL;
882 struct resource *mem = NULL;
883 struct ethoc *priv = NULL;
884 unsigned int phy;
885 int ret = 0;
886
887 /* allocate networking device */
888 netdev = alloc_etherdev(sizeof(struct ethoc));
889 if (!netdev) {
890 dev_err(&pdev->dev, "cannot allocate network device\n");
891 ret = -ENOMEM;
892 goto out;
893 }
894
895 SET_NETDEV_DEV(netdev, &pdev->dev);
896 platform_set_drvdata(pdev, netdev);
897
898 /* obtain I/O memory space */
899 res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
900 if (!res) {
901 dev_err(&pdev->dev, "cannot obtain I/O memory space\n");
902 ret = -ENXIO;
903 goto free;
904 }
905
906 mmio = devm_request_mem_region(&pdev->dev, res->start,
907 resource_size(res), res->name);
908 if (!mmio) {
909 dev_err(&pdev->dev, "cannot request I/O memory space\n");
910 ret = -ENXIO;
911 goto free;
912 }
913
914 netdev->base_addr = mmio->start;
915
916 /* obtain buffer memory space */
917 res = platform_get_resource(pdev, IORESOURCE_MEM, 1);
918 if (res) {
919 mem = devm_request_mem_region(&pdev->dev, res->start,
920 resource_size(res), res->name);
921 if (!mem) {
922 dev_err(&pdev->dev, "cannot request memory space\n");
923 ret = -ENXIO;
924 goto free;
925 }
926
927 netdev->mem_start = mem->start;
928 netdev->mem_end = mem->end;
929 }
930
931
932 /* obtain device IRQ number */
933 res = platform_get_resource(pdev, IORESOURCE_IRQ, 0);
934 if (!res) {
935 dev_err(&pdev->dev, "cannot obtain IRQ\n");
936 ret = -ENXIO;
937 goto free;
938 }
939
940 netdev->irq = res->start;
941
942 /* setup driver-private data */
943 priv = netdev_priv(netdev);
944 priv->netdev = netdev;
945 priv->dma_alloc = 0;
946
947 priv->iobase = devm_ioremap_nocache(&pdev->dev, netdev->base_addr,
948 resource_size(mmio));
949 if (!priv->iobase) {
950 dev_err(&pdev->dev, "cannot remap I/O memory space\n");
951 ret = -ENXIO;
952 goto error;
953 }
954
955 if (netdev->mem_end) {
956 priv->membase = devm_ioremap_nocache(&pdev->dev,
957 netdev->mem_start, resource_size(mem));
958 if (!priv->membase) {
959 dev_err(&pdev->dev, "cannot remap memory space\n");
960 ret = -ENXIO;
961 goto error;
962 }
963 } else {
964 /* Allocate buffer memory */
965 priv->membase = dma_alloc_coherent(NULL,
966 buffer_size, (void *)&netdev->mem_start,
967 GFP_KERNEL);
968 if (!priv->membase) {
969 dev_err(&pdev->dev, "cannot allocate %dB buffer\n",
970 buffer_size);
971 ret = -ENOMEM;
972 goto error;
973 }
974 netdev->mem_end = netdev->mem_start + buffer_size;
975 priv->dma_alloc = buffer_size;
976 }
977
978 /* Allow the platform setup code to pass in a MAC address. */
979 if (pdev->dev.platform_data) {
980 struct ethoc_platform_data *pdata =
981 (struct ethoc_platform_data *)pdev->dev.platform_data;
982 memcpy(netdev->dev_addr, pdata->hwaddr, IFHWADDRLEN);
983 priv->phy_id = pdata->phy_id;
984 }
985
986 /* Check that the given MAC address is valid. If it isn't, read the
987 * current MAC from the controller. */
988 if (!is_valid_ether_addr(netdev->dev_addr))
989 ethoc_get_mac_address(netdev, netdev->dev_addr);
990
991 /* Check the MAC again for validity, if it still isn't choose and
992 * program a random one. */
993 if (!is_valid_ether_addr(netdev->dev_addr))
994 random_ether_addr(netdev->dev_addr);
995
996 ethoc_set_mac_address(netdev, netdev->dev_addr);
997
998 /* register MII bus */
999 priv->mdio = mdiobus_alloc();
1000 if (!priv->mdio) {
1001 ret = -ENOMEM;
1002 goto free;
1003 }
1004
1005 priv->mdio->name = "ethoc-mdio";
1006 snprintf(priv->mdio->id, MII_BUS_ID_SIZE, "%s-%d",
1007 priv->mdio->name, pdev->id);
1008 priv->mdio->read = ethoc_mdio_read;
1009 priv->mdio->write = ethoc_mdio_write;
1010 priv->mdio->reset = ethoc_mdio_reset;
1011 priv->mdio->priv = priv;
1012
1013 priv->mdio->irq = kmalloc(sizeof(int) * PHY_MAX_ADDR, GFP_KERNEL);
1014 if (!priv->mdio->irq) {
1015 ret = -ENOMEM;
1016 goto free_mdio;
1017 }
1018
1019 for (phy = 0; phy < PHY_MAX_ADDR; phy++)
1020 priv->mdio->irq[phy] = PHY_POLL;
1021
1022 ret = mdiobus_register(priv->mdio);
1023 if (ret) {
1024 dev_err(&netdev->dev, "failed to register MDIO bus\n");
1025 goto free_mdio;
1026 }
1027
1028 ret = ethoc_mdio_probe(netdev);
1029 if (ret) {
1030 dev_err(&netdev->dev, "failed to probe MDIO bus\n");
1031 goto error;
1032 }
1033
1034 ether_setup(netdev);
1035
1036 /* setup the net_device structure */
1037 netdev->netdev_ops = &ethoc_netdev_ops;
1038 netdev->watchdog_timeo = ETHOC_TIMEOUT;
1039 netdev->features |= 0;
1040
1041 /* setup NAPI */
1042 netif_napi_add(netdev, &priv->napi, ethoc_poll, 64);
1043
1044 spin_lock_init(&priv->rx_lock);
1045 spin_lock_init(&priv->lock);
1046
1047 ret = register_netdev(netdev);
1048 if (ret < 0) {
1049 dev_err(&netdev->dev, "failed to register interface\n");
1050 goto error;
1051 }
1052
1053 goto out;
1054
1055 error:
1056 mdiobus_unregister(priv->mdio);
1057 free_mdio:
1058 kfree(priv->mdio->irq);
1059 mdiobus_free(priv->mdio);
1060 free:
1061 if (priv->dma_alloc)
1062 dma_free_coherent(NULL, priv->dma_alloc, priv->membase,
1063 netdev->mem_start);
1064 free_netdev(netdev);
1065 out:
1066 return ret;
1067 }
1068
1069 /**
1070 * ethoc_remove() - shutdown OpenCores ethernet MAC
1071 * @pdev: platform device
1072 */
1073 static int ethoc_remove(struct platform_device *pdev)
1074 {
1075 struct net_device *netdev = platform_get_drvdata(pdev);
1076 struct ethoc *priv = netdev_priv(netdev);
1077
1078 platform_set_drvdata(pdev, NULL);
1079
1080 if (netdev) {
1081 phy_disconnect(priv->phy);
1082 priv->phy = NULL;
1083
1084 if (priv->mdio) {
1085 mdiobus_unregister(priv->mdio);
1086 kfree(priv->mdio->irq);
1087 mdiobus_free(priv->mdio);
1088 }
1089 if (priv->dma_alloc)
1090 dma_free_coherent(NULL, priv->dma_alloc, priv->membase,
1091 netdev->mem_start);
1092 unregister_netdev(netdev);
1093 free_netdev(netdev);
1094 }
1095
1096 return 0;
1097 }
1098
1099 #ifdef CONFIG_PM
1100 static int ethoc_suspend(struct platform_device *pdev, pm_message_t state)
1101 {
1102 return -ENOSYS;
1103 }
1104
1105 static int ethoc_resume(struct platform_device *pdev)
1106 {
1107 return -ENOSYS;
1108 }
1109 #else
1110 # define ethoc_suspend NULL
1111 # define ethoc_resume NULL
1112 #endif
1113
1114 static struct platform_driver ethoc_driver = {
1115 .probe = ethoc_probe,
1116 .remove = ethoc_remove,
1117 .suspend = ethoc_suspend,
1118 .resume = ethoc_resume,
1119 .driver = {
1120 .name = "ethoc",
1121 },
1122 };
1123
1124 static int __init ethoc_init(void)
1125 {
1126 return platform_driver_register(&ethoc_driver);
1127 }
1128
1129 static void __exit ethoc_exit(void)
1130 {
1131 platform_driver_unregister(&ethoc_driver);
1132 }
1133
1134 module_init(ethoc_init);
1135 module_exit(ethoc_exit);
1136
1137 MODULE_AUTHOR("Thierry Reding <thierry.reding@avionic-design.de>");
1138 MODULE_DESCRIPTION("OpenCores Ethernet MAC driver");
1139 MODULE_LICENSE("GPL v2");
1140