Merge git://git.kernel.org/pub/scm/linux/kernel/git/davem/net-2.6
[linux-2.6] / drivers / net / fec_mpc52xx.c
1 /*
2  * Driver for the MPC5200 Fast Ethernet Controller
3  *
4  * Originally written by Dale Farnsworth <dfarnsworth@mvista.com> and
5  * now maintained by Sylvain Munaut <tnt@246tNt.com>
6  *
7  * Copyright (C) 2007  Domen Puncer, Telargo, Inc.
8  * Copyright (C) 2007  Sylvain Munaut <tnt@246tNt.com>
9  * Copyright (C) 2003-2004  MontaVista, Software, Inc.
10  *
11  * This file is licensed under the terms of the GNU General Public License
12  * version 2. This program is licensed "as is" without any warranty of any
13  * kind, whether express or implied.
14  *
15  */
16
17 #include <linux/module.h>
18
19 #include <linux/kernel.h>
20 #include <linux/types.h>
21 #include <linux/spinlock.h>
22 #include <linux/errno.h>
23 #include <linux/init.h>
24 #include <linux/crc32.h>
25 #include <linux/hardirq.h>
26 #include <linux/delay.h>
27 #include <linux/of_device.h>
28 #include <linux/of_platform.h>
29
30 #include <linux/netdevice.h>
31 #include <linux/etherdevice.h>
32 #include <linux/ethtool.h>
33 #include <linux/skbuff.h>
34
35 #include <asm/io.h>
36 #include <asm/delay.h>
37 #include <asm/mpc52xx.h>
38
39 #include <sysdev/bestcomm/bestcomm.h>
40 #include <sysdev/bestcomm/fec.h>
41
42 #include "fec_mpc52xx.h"
43
44 #define DRIVER_NAME "mpc52xx-fec"
45
46 static irqreturn_t mpc52xx_fec_interrupt(int, void *);
47 static irqreturn_t mpc52xx_fec_rx_interrupt(int, void *);
48 static irqreturn_t mpc52xx_fec_tx_interrupt(int, void *);
49 static void mpc52xx_fec_stop(struct net_device *dev);
50 static void mpc52xx_fec_start(struct net_device *dev);
51 static void mpc52xx_fec_reset(struct net_device *dev);
52
53 static u8 mpc52xx_fec_mac_addr[6];
54 module_param_array_named(mac, mpc52xx_fec_mac_addr, byte, NULL, 0);
55 MODULE_PARM_DESC(mac, "six hex digits, ie. 0x1,0x2,0xc0,0x01,0xba,0xbe");
56
57 #define MPC52xx_MESSAGES_DEFAULT ( NETIF_MSG_DRV | NETIF_MSG_PROBE | \
58                 NETIF_MSG_LINK | NETIF_MSG_IFDOWN | NETIF_MSG_IFDOWN )
59 static int debug = -1;  /* the above default */
60 module_param(debug, int, 0);
61 MODULE_PARM_DESC(debug, "debugging messages level");
62
63 static void mpc52xx_fec_tx_timeout(struct net_device *dev)
64 {
65         dev_warn(&dev->dev, "transmit timed out\n");
66
67         mpc52xx_fec_reset(dev);
68
69         dev->stats.tx_errors++;
70
71         netif_wake_queue(dev);
72 }
73
74 static void mpc52xx_fec_set_paddr(struct net_device *dev, u8 *mac)
75 {
76         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
77         struct mpc52xx_fec __iomem *fec = priv->fec;
78
79         out_be32(&fec->paddr1, *(u32 *)(&mac[0]));
80         out_be32(&fec->paddr2, (*(u16 *)(&mac[4]) << 16) | FEC_PADDR2_TYPE);
81 }
82
83 static void mpc52xx_fec_get_paddr(struct net_device *dev, u8 *mac)
84 {
85         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
86         struct mpc52xx_fec __iomem *fec = priv->fec;
87
88         *(u32 *)(&mac[0]) = in_be32(&fec->paddr1);
89         *(u16 *)(&mac[4]) = in_be32(&fec->paddr2) >> 16;
90 }
91
92 static int mpc52xx_fec_set_mac_address(struct net_device *dev, void *addr)
93 {
94         struct sockaddr *sock = addr;
95
96         memcpy(dev->dev_addr, sock->sa_data, dev->addr_len);
97
98         mpc52xx_fec_set_paddr(dev, sock->sa_data);
99         return 0;
100 }
101
102 static void mpc52xx_fec_free_rx_buffers(struct net_device *dev, struct bcom_task *s)
103 {
104         while (!bcom_queue_empty(s)) {
105                 struct bcom_fec_bd *bd;
106                 struct sk_buff *skb;
107
108                 skb = bcom_retrieve_buffer(s, NULL, (struct bcom_bd **)&bd);
109                 dma_unmap_single(&dev->dev, bd->skb_pa, skb->len, DMA_FROM_DEVICE);
110                 kfree_skb(skb);
111         }
112 }
113
114 static int mpc52xx_fec_alloc_rx_buffers(struct net_device *dev, struct bcom_task *rxtsk)
115 {
116         while (!bcom_queue_full(rxtsk)) {
117                 struct sk_buff *skb;
118                 struct bcom_fec_bd *bd;
119
120                 skb = dev_alloc_skb(FEC_RX_BUFFER_SIZE);
121                 if (skb == NULL)
122                         return -EAGAIN;
123
124                 /* zero out the initial receive buffers to aid debugging */
125                 memset(skb->data, 0, FEC_RX_BUFFER_SIZE);
126
127                 bd = (struct bcom_fec_bd *)bcom_prepare_next_buffer(rxtsk);
128
129                 bd->status = FEC_RX_BUFFER_SIZE;
130                 bd->skb_pa = dma_map_single(&dev->dev, skb->data,
131                                 FEC_RX_BUFFER_SIZE, DMA_FROM_DEVICE);
132
133                 bcom_submit_next_buffer(rxtsk, skb);
134         }
135
136         return 0;
137 }
138
139 /* based on generic_adjust_link from fs_enet-main.c */
140 static void mpc52xx_fec_adjust_link(struct net_device *dev)
141 {
142         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
143         struct phy_device *phydev = priv->phydev;
144         int new_state = 0;
145
146         if (phydev->link != PHY_DOWN) {
147                 if (phydev->duplex != priv->duplex) {
148                         struct mpc52xx_fec __iomem *fec = priv->fec;
149                         u32 rcntrl;
150                         u32 tcntrl;
151
152                         new_state = 1;
153                         priv->duplex = phydev->duplex;
154
155                         rcntrl = in_be32(&fec->r_cntrl);
156                         tcntrl = in_be32(&fec->x_cntrl);
157
158                         rcntrl &= ~FEC_RCNTRL_DRT;
159                         tcntrl &= ~FEC_TCNTRL_FDEN;
160                         if (phydev->duplex == DUPLEX_FULL)
161                                 tcntrl |= FEC_TCNTRL_FDEN;      /* FD enable */
162                         else
163                                 rcntrl |= FEC_RCNTRL_DRT;       /* disable Rx on Tx (HD) */
164
165                         out_be32(&fec->r_cntrl, rcntrl);
166                         out_be32(&fec->x_cntrl, tcntrl);
167                 }
168
169                 if (phydev->speed != priv->speed) {
170                         new_state = 1;
171                         priv->speed = phydev->speed;
172                 }
173
174                 if (priv->link == PHY_DOWN) {
175                         new_state = 1;
176                         priv->link = phydev->link;
177                         netif_schedule(dev);
178                         netif_carrier_on(dev);
179                         netif_start_queue(dev);
180                 }
181
182         } else if (priv->link) {
183                 new_state = 1;
184                 priv->link = PHY_DOWN;
185                 priv->speed = 0;
186                 priv->duplex = -1;
187                 netif_stop_queue(dev);
188                 netif_carrier_off(dev);
189         }
190
191         if (new_state && netif_msg_link(priv))
192                 phy_print_status(phydev);
193 }
194
195 static int mpc52xx_fec_init_phy(struct net_device *dev)
196 {
197         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
198         struct phy_device *phydev;
199         char phy_id[BUS_ID_SIZE];
200
201         snprintf(phy_id, BUS_ID_SIZE, "%x:%02x",
202                         (unsigned int)dev->base_addr, priv->phy_addr);
203
204         priv->link = PHY_DOWN;
205         priv->speed = 0;
206         priv->duplex = -1;
207
208         phydev = phy_connect(dev, phy_id, &mpc52xx_fec_adjust_link, 0, PHY_INTERFACE_MODE_MII);
209         if (IS_ERR(phydev)) {
210                 dev_err(&dev->dev, "phy_connect failed\n");
211                 return PTR_ERR(phydev);
212         }
213         dev_info(&dev->dev, "attached phy %i to driver %s\n",
214                         phydev->addr, phydev->drv->name);
215
216         priv->phydev = phydev;
217
218         return 0;
219 }
220
221 static int mpc52xx_fec_phy_start(struct net_device *dev)
222 {
223         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
224         int err;
225
226         if (!priv->has_phy)
227                 return 0;
228
229         err = mpc52xx_fec_init_phy(dev);
230         if (err) {
231                 dev_err(&dev->dev, "mpc52xx_fec_init_phy failed\n");
232                 return err;
233         }
234
235         /* reset phy - this also wakes it from PDOWN */
236         phy_write(priv->phydev, MII_BMCR, BMCR_RESET);
237         phy_start(priv->phydev);
238
239         return 0;
240 }
241
242 static void mpc52xx_fec_phy_stop(struct net_device *dev)
243 {
244         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
245
246         if (!priv->has_phy)
247                 return;
248
249         phy_disconnect(priv->phydev);
250         /* power down phy */
251         phy_stop(priv->phydev);
252         phy_write(priv->phydev, MII_BMCR, BMCR_PDOWN);
253 }
254
255 static int mpc52xx_fec_phy_mii_ioctl(struct mpc52xx_fec_priv *priv,
256                 struct mii_ioctl_data *mii_data, int cmd)
257 {
258         if (!priv->has_phy)
259                 return -ENOTSUPP;
260
261         return phy_mii_ioctl(priv->phydev, mii_data, cmd);
262 }
263
264 static void mpc52xx_fec_phy_hw_init(struct mpc52xx_fec_priv *priv)
265 {
266         struct mpc52xx_fec __iomem *fec = priv->fec;
267
268         if (!priv->has_phy)
269                 return;
270
271         out_be32(&fec->mii_speed, priv->phy_speed);
272 }
273
274 static int mpc52xx_fec_open(struct net_device *dev)
275 {
276         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
277         int err = -EBUSY;
278
279         if (request_irq(dev->irq, &mpc52xx_fec_interrupt, IRQF_SHARED,
280                         DRIVER_NAME "_ctrl", dev)) {
281                 dev_err(&dev->dev, "ctrl interrupt request failed\n");
282                 goto out;
283         }
284         if (request_irq(priv->r_irq, &mpc52xx_fec_rx_interrupt, 0,
285                         DRIVER_NAME "_rx", dev)) {
286                 dev_err(&dev->dev, "rx interrupt request failed\n");
287                 goto free_ctrl_irq;
288         }
289         if (request_irq(priv->t_irq, &mpc52xx_fec_tx_interrupt, 0,
290                         DRIVER_NAME "_tx", dev)) {
291                 dev_err(&dev->dev, "tx interrupt request failed\n");
292                 goto free_2irqs;
293         }
294
295         bcom_fec_rx_reset(priv->rx_dmatsk);
296         bcom_fec_tx_reset(priv->tx_dmatsk);
297
298         err = mpc52xx_fec_alloc_rx_buffers(dev, priv->rx_dmatsk);
299         if (err) {
300                 dev_err(&dev->dev, "mpc52xx_fec_alloc_rx_buffers failed\n");
301                 goto free_irqs;
302         }
303
304         err = mpc52xx_fec_phy_start(dev);
305         if (err)
306                 goto free_skbs;
307
308         bcom_enable(priv->rx_dmatsk);
309         bcom_enable(priv->tx_dmatsk);
310
311         mpc52xx_fec_start(dev);
312
313         netif_start_queue(dev);
314
315         return 0;
316
317  free_skbs:
318         mpc52xx_fec_free_rx_buffers(dev, priv->rx_dmatsk);
319
320  free_irqs:
321         free_irq(priv->t_irq, dev);
322  free_2irqs:
323         free_irq(priv->r_irq, dev);
324  free_ctrl_irq:
325         free_irq(dev->irq, dev);
326  out:
327
328         return err;
329 }
330
331 static int mpc52xx_fec_close(struct net_device *dev)
332 {
333         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
334
335         netif_stop_queue(dev);
336
337         mpc52xx_fec_stop(dev);
338
339         mpc52xx_fec_free_rx_buffers(dev, priv->rx_dmatsk);
340
341         free_irq(dev->irq, dev);
342         free_irq(priv->r_irq, dev);
343         free_irq(priv->t_irq, dev);
344
345         mpc52xx_fec_phy_stop(dev);
346
347         return 0;
348 }
349
350 /* This will only be invoked if your driver is _not_ in XOFF state.
351  * What this means is that you need not check it, and that this
352  * invariant will hold if you make sure that the netif_*_queue()
353  * calls are done at the proper times.
354  */
355 static int mpc52xx_fec_hard_start_xmit(struct sk_buff *skb, struct net_device *dev)
356 {
357         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
358         struct bcom_fec_bd *bd;
359
360         if (bcom_queue_full(priv->tx_dmatsk)) {
361                 if (net_ratelimit())
362                         dev_err(&dev->dev, "transmit queue overrun\n");
363                 return 1;
364         }
365
366         spin_lock_irq(&priv->lock);
367         dev->trans_start = jiffies;
368
369         bd = (struct bcom_fec_bd *)
370                 bcom_prepare_next_buffer(priv->tx_dmatsk);
371
372         bd->status = skb->len | BCOM_FEC_TX_BD_TFD | BCOM_FEC_TX_BD_TC;
373         bd->skb_pa = dma_map_single(&dev->dev, skb->data, skb->len, DMA_TO_DEVICE);
374
375         bcom_submit_next_buffer(priv->tx_dmatsk, skb);
376
377         if (bcom_queue_full(priv->tx_dmatsk)) {
378                 netif_stop_queue(dev);
379         }
380
381         spin_unlock_irq(&priv->lock);
382
383         return 0;
384 }
385
386 /* This handles BestComm transmit task interrupts
387  */
388 static irqreturn_t mpc52xx_fec_tx_interrupt(int irq, void *dev_id)
389 {
390         struct net_device *dev = dev_id;
391         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
392
393         spin_lock(&priv->lock);
394
395         while (bcom_buffer_done(priv->tx_dmatsk)) {
396                 struct sk_buff *skb;
397                 struct bcom_fec_bd *bd;
398                 skb = bcom_retrieve_buffer(priv->tx_dmatsk, NULL,
399                                 (struct bcom_bd **)&bd);
400                 dma_unmap_single(&dev->dev, bd->skb_pa, skb->len, DMA_TO_DEVICE);
401
402                 dev_kfree_skb_irq(skb);
403         }
404
405         netif_wake_queue(dev);
406
407         spin_unlock(&priv->lock);
408
409         return IRQ_HANDLED;
410 }
411
412 static irqreturn_t mpc52xx_fec_rx_interrupt(int irq, void *dev_id)
413 {
414         struct net_device *dev = dev_id;
415         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
416
417         while (bcom_buffer_done(priv->rx_dmatsk)) {
418                 struct sk_buff *skb;
419                 struct sk_buff *rskb;
420                 struct bcom_fec_bd *bd;
421                 u32 status;
422
423                 rskb = bcom_retrieve_buffer(priv->rx_dmatsk, &status,
424                                 (struct bcom_bd **)&bd);
425                 dma_unmap_single(&dev->dev, bd->skb_pa, rskb->len, DMA_FROM_DEVICE);
426
427                 /* Test for errors in received frame */
428                 if (status & BCOM_FEC_RX_BD_ERRORS) {
429                         /* Drop packet and reuse the buffer */
430                         bd = (struct bcom_fec_bd *)
431                                 bcom_prepare_next_buffer(priv->rx_dmatsk);
432
433                         bd->status = FEC_RX_BUFFER_SIZE;
434                         bd->skb_pa = dma_map_single(&dev->dev, rskb->data,
435                                         FEC_RX_BUFFER_SIZE, DMA_FROM_DEVICE);
436
437                         bcom_submit_next_buffer(priv->rx_dmatsk, rskb);
438
439                         dev->stats.rx_dropped++;
440
441                         continue;
442                 }
443
444                 /* skbs are allocated on open, so now we allocate a new one,
445                  * and remove the old (with the packet) */
446                 skb = dev_alloc_skb(FEC_RX_BUFFER_SIZE);
447                 if (skb) {
448                         /* Process the received skb */
449                         int length = status & BCOM_FEC_RX_BD_LEN_MASK;
450
451                         skb_put(rskb, length - 4);      /* length without CRC32 */
452
453                         rskb->dev = dev;
454                         rskb->protocol = eth_type_trans(rskb, dev);
455
456                         netif_rx(rskb);
457                         dev->last_rx = jiffies;
458                 } else {
459                         /* Can't get a new one : reuse the same & drop pkt */
460                         dev_notice(&dev->dev, "Memory squeeze, dropping packet.\n");
461                         dev->stats.rx_dropped++;
462
463                         skb = rskb;
464                 }
465
466                 bd = (struct bcom_fec_bd *)
467                         bcom_prepare_next_buffer(priv->rx_dmatsk);
468
469                 bd->status = FEC_RX_BUFFER_SIZE;
470                 bd->skb_pa = dma_map_single(&dev->dev, skb->data,
471                                 FEC_RX_BUFFER_SIZE, DMA_FROM_DEVICE);
472
473                 bcom_submit_next_buffer(priv->rx_dmatsk, skb);
474         }
475
476         return IRQ_HANDLED;
477 }
478
479 static irqreturn_t mpc52xx_fec_interrupt(int irq, void *dev_id)
480 {
481         struct net_device *dev = dev_id;
482         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
483         struct mpc52xx_fec __iomem *fec = priv->fec;
484         u32 ievent;
485
486         ievent = in_be32(&fec->ievent);
487
488         ievent &= ~FEC_IEVENT_MII;      /* mii is handled separately */
489         if (!ievent)
490                 return IRQ_NONE;
491
492         out_be32(&fec->ievent, ievent);         /* clear pending events */
493
494         /* on fifo error, soft-reset fec */
495         if (ievent & (FEC_IEVENT_RFIFO_ERROR | FEC_IEVENT_XFIFO_ERROR)) {
496
497                 if (net_ratelimit() && (ievent & FEC_IEVENT_RFIFO_ERROR))
498                         dev_warn(&dev->dev, "FEC_IEVENT_RFIFO_ERROR\n");
499                 if (net_ratelimit() && (ievent & FEC_IEVENT_XFIFO_ERROR))
500                         dev_warn(&dev->dev, "FEC_IEVENT_XFIFO_ERROR\n");
501
502                 mpc52xx_fec_reset(dev);
503
504                 netif_wake_queue(dev);
505                 return IRQ_HANDLED;
506         }
507
508         if (ievent & ~FEC_IEVENT_TFINT)
509                 dev_dbg(&dev->dev, "ievent: %08x\n", ievent);
510
511         return IRQ_HANDLED;
512 }
513
514 /*
515  * Get the current statistics.
516  * This may be called with the card open or closed.
517  */
518 static struct net_device_stats *mpc52xx_fec_get_stats(struct net_device *dev)
519 {
520         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
521         struct net_device_stats *stats = &dev->stats;
522         struct mpc52xx_fec __iomem *fec = priv->fec;
523
524         stats->rx_bytes = in_be32(&fec->rmon_r_octets);
525         stats->rx_packets = in_be32(&fec->rmon_r_packets);
526         stats->rx_errors = in_be32(&fec->rmon_r_crc_align) +
527                 in_be32(&fec->rmon_r_undersize) +
528                 in_be32(&fec->rmon_r_oversize) +
529                 in_be32(&fec->rmon_r_frag) +
530                 in_be32(&fec->rmon_r_jab);
531
532         stats->tx_bytes = in_be32(&fec->rmon_t_octets);
533         stats->tx_packets = in_be32(&fec->rmon_t_packets);
534         stats->tx_errors = in_be32(&fec->rmon_t_crc_align) +
535                 in_be32(&fec->rmon_t_undersize) +
536                 in_be32(&fec->rmon_t_oversize) +
537                 in_be32(&fec->rmon_t_frag) +
538                 in_be32(&fec->rmon_t_jab);
539
540         stats->multicast = in_be32(&fec->rmon_r_mc_pkt);
541         stats->collisions = in_be32(&fec->rmon_t_col);
542
543         /* detailed rx_errors: */
544         stats->rx_length_errors = in_be32(&fec->rmon_r_undersize)
545                                         + in_be32(&fec->rmon_r_oversize)
546                                         + in_be32(&fec->rmon_r_frag)
547                                         + in_be32(&fec->rmon_r_jab);
548         stats->rx_over_errors = in_be32(&fec->r_macerr);
549         stats->rx_crc_errors = in_be32(&fec->ieee_r_crc);
550         stats->rx_frame_errors = in_be32(&fec->ieee_r_align);
551         stats->rx_fifo_errors = in_be32(&fec->rmon_r_drop);
552         stats->rx_missed_errors = in_be32(&fec->rmon_r_drop);
553
554         /* detailed tx_errors: */
555         stats->tx_aborted_errors = 0;
556         stats->tx_carrier_errors = in_be32(&fec->ieee_t_cserr);
557         stats->tx_fifo_errors = in_be32(&fec->rmon_t_drop);
558         stats->tx_heartbeat_errors = in_be32(&fec->ieee_t_sqe);
559         stats->tx_window_errors = in_be32(&fec->ieee_t_lcol);
560
561         return stats;
562 }
563
564 /*
565  * Read MIB counters in order to reset them,
566  * then zero all the stats fields in memory
567  */
568 static void mpc52xx_fec_reset_stats(struct net_device *dev)
569 {
570         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
571         struct mpc52xx_fec __iomem *fec = priv->fec;
572
573         out_be32(&fec->mib_control, FEC_MIB_DISABLE);
574         memset_io(&fec->rmon_t_drop, 0,
575                    offsetof(struct mpc52xx_fec, reserved10) -
576                    offsetof(struct mpc52xx_fec, rmon_t_drop));
577         out_be32(&fec->mib_control, 0);
578
579         memset(&dev->stats, 0, sizeof(dev->stats));
580 }
581
582 /*
583  * Set or clear the multicast filter for this adaptor.
584  */
585 static void mpc52xx_fec_set_multicast_list(struct net_device *dev)
586 {
587         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
588         struct mpc52xx_fec __iomem *fec = priv->fec;
589         u32 rx_control;
590
591         rx_control = in_be32(&fec->r_cntrl);
592
593         if (dev->flags & IFF_PROMISC) {
594                 rx_control |= FEC_RCNTRL_PROM;
595                 out_be32(&fec->r_cntrl, rx_control);
596         } else {
597                 rx_control &= ~FEC_RCNTRL_PROM;
598                 out_be32(&fec->r_cntrl, rx_control);
599
600                 if (dev->flags & IFF_ALLMULTI) {
601                         out_be32(&fec->gaddr1, 0xffffffff);
602                         out_be32(&fec->gaddr2, 0xffffffff);
603                 } else {
604                         u32 crc;
605                         int i;
606                         struct dev_mc_list *dmi;
607                         u32 gaddr1 = 0x00000000;
608                         u32 gaddr2 = 0x00000000;
609
610                         dmi = dev->mc_list;
611                         for (i=0; i<dev->mc_count; i++) {
612                                 crc = ether_crc_le(6, dmi->dmi_addr) >> 26;
613                                 if (crc >= 32)
614                                         gaddr1 |= 1 << (crc-32);
615                                 else
616                                         gaddr2 |= 1 << crc;
617                                 dmi = dmi->next;
618                         }
619                         out_be32(&fec->gaddr1, gaddr1);
620                         out_be32(&fec->gaddr2, gaddr2);
621                 }
622         }
623 }
624
625 /**
626  * mpc52xx_fec_hw_init
627  * @dev: network device
628  *
629  * Setup various hardware setting, only needed once on start
630  */
631 static void mpc52xx_fec_hw_init(struct net_device *dev)
632 {
633         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
634         struct mpc52xx_fec __iomem *fec = priv->fec;
635         int i;
636
637         /* Whack a reset.  We should wait for this. */
638         out_be32(&fec->ecntrl, FEC_ECNTRL_RESET);
639         for (i = 0; i < FEC_RESET_DELAY; ++i) {
640                 if ((in_be32(&fec->ecntrl) & FEC_ECNTRL_RESET) == 0)
641                         break;
642                 udelay(1);
643         }
644         if (i == FEC_RESET_DELAY)
645                 dev_err(&dev->dev, "FEC Reset timeout!\n");
646
647         /* set pause to 0x20 frames */
648         out_be32(&fec->op_pause, FEC_OP_PAUSE_OPCODE | 0x20);
649
650         /* high service request will be deasserted when there's < 7 bytes in fifo
651          * low service request will be deasserted when there's < 4*7 bytes in fifo
652          */
653         out_be32(&fec->rfifo_cntrl, FEC_FIFO_CNTRL_FRAME | FEC_FIFO_CNTRL_LTG_7);
654         out_be32(&fec->tfifo_cntrl, FEC_FIFO_CNTRL_FRAME | FEC_FIFO_CNTRL_LTG_7);
655
656         /* alarm when <= x bytes in FIFO */
657         out_be32(&fec->rfifo_alarm, 0x0000030c);
658         out_be32(&fec->tfifo_alarm, 0x00000100);
659
660         /* begin transmittion when 256 bytes are in FIFO (or EOF or FIFO full) */
661         out_be32(&fec->x_wmrk, FEC_FIFO_WMRK_256B);
662
663         /* enable crc generation */
664         out_be32(&fec->xmit_fsm, FEC_XMIT_FSM_APPEND_CRC | FEC_XMIT_FSM_ENABLE_CRC);
665         out_be32(&fec->iaddr1, 0x00000000);     /* No individual filter */
666         out_be32(&fec->iaddr2, 0x00000000);     /* No individual filter */
667
668         /* set phy speed.
669          * this can't be done in phy driver, since it needs to be called
670          * before fec stuff (even on resume) */
671         mpc52xx_fec_phy_hw_init(priv);
672 }
673
674 /**
675  * mpc52xx_fec_start
676  * @dev: network device
677  *
678  * This function is called to start or restart the FEC during a link
679  * change.  This happens on fifo errors or when switching between half
680  * and full duplex.
681  */
682 static void mpc52xx_fec_start(struct net_device *dev)
683 {
684         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
685         struct mpc52xx_fec __iomem *fec = priv->fec;
686         u32 rcntrl;
687         u32 tcntrl;
688         u32 tmp;
689
690         /* clear sticky error bits */
691         tmp = FEC_FIFO_STATUS_ERR | FEC_FIFO_STATUS_UF | FEC_FIFO_STATUS_OF;
692         out_be32(&fec->rfifo_status, in_be32(&fec->rfifo_status) & tmp);
693         out_be32(&fec->tfifo_status, in_be32(&fec->tfifo_status) & tmp);
694
695         /* FIFOs will reset on mpc52xx_fec_enable */
696         out_be32(&fec->reset_cntrl, FEC_RESET_CNTRL_ENABLE_IS_RESET);
697
698         /* Set station address. */
699         mpc52xx_fec_set_paddr(dev, dev->dev_addr);
700
701         mpc52xx_fec_set_multicast_list(dev);
702
703         /* set max frame len, enable flow control, select mii mode */
704         rcntrl = FEC_RX_BUFFER_SIZE << 16;      /* max frame length */
705         rcntrl |= FEC_RCNTRL_FCE;
706
707         if (priv->has_phy)
708                 rcntrl |= FEC_RCNTRL_MII_MODE;
709
710         if (priv->duplex == DUPLEX_FULL)
711                 tcntrl = FEC_TCNTRL_FDEN;       /* FD enable */
712         else {
713                 rcntrl |= FEC_RCNTRL_DRT;       /* disable Rx on Tx (HD) */
714                 tcntrl = 0;
715         }
716         out_be32(&fec->r_cntrl, rcntrl);
717         out_be32(&fec->x_cntrl, tcntrl);
718
719         /* Clear any outstanding interrupt. */
720         out_be32(&fec->ievent, 0xffffffff);
721
722         /* Enable interrupts we wish to service. */
723         out_be32(&fec->imask, FEC_IMASK_ENABLE);
724
725         /* And last, enable the transmit and receive processing. */
726         out_be32(&fec->ecntrl, FEC_ECNTRL_ETHER_EN);
727         out_be32(&fec->r_des_active, 0x01000000);
728 }
729
730 /**
731  * mpc52xx_fec_stop
732  * @dev: network device
733  *
734  * stop all activity on fec and empty dma buffers
735  */
736 static void mpc52xx_fec_stop(struct net_device *dev)
737 {
738         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
739         struct mpc52xx_fec __iomem *fec = priv->fec;
740         unsigned long timeout;
741
742         /* disable all interrupts */
743         out_be32(&fec->imask, 0);
744
745         /* Disable the rx task. */
746         bcom_disable(priv->rx_dmatsk);
747
748         /* Wait for tx queue to drain, but only if we're in process context */
749         if (!in_interrupt()) {
750                 timeout = jiffies + msecs_to_jiffies(2000);
751                 while (time_before(jiffies, timeout) &&
752                                 !bcom_queue_empty(priv->tx_dmatsk))
753                         msleep(100);
754
755                 if (time_after_eq(jiffies, timeout))
756                         dev_err(&dev->dev, "queues didn't drain\n");
757 #if 1
758                 if (time_after_eq(jiffies, timeout)) {
759                         dev_err(&dev->dev, "  tx: index: %i, outdex: %i\n",
760                                         priv->tx_dmatsk->index,
761                                         priv->tx_dmatsk->outdex);
762                         dev_err(&dev->dev, "  rx: index: %i, outdex: %i\n",
763                                         priv->rx_dmatsk->index,
764                                         priv->rx_dmatsk->outdex);
765                 }
766 #endif
767         }
768
769         bcom_disable(priv->tx_dmatsk);
770
771         /* Stop FEC */
772         out_be32(&fec->ecntrl, in_be32(&fec->ecntrl) & ~FEC_ECNTRL_ETHER_EN);
773
774         return;
775 }
776
777 /* reset fec and bestcomm tasks */
778 static void mpc52xx_fec_reset(struct net_device *dev)
779 {
780         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
781         struct mpc52xx_fec __iomem *fec = priv->fec;
782
783         mpc52xx_fec_stop(dev);
784
785         out_be32(&fec->rfifo_status, in_be32(&fec->rfifo_status));
786         out_be32(&fec->reset_cntrl, FEC_RESET_CNTRL_RESET_FIFO);
787
788         mpc52xx_fec_free_rx_buffers(dev, priv->rx_dmatsk);
789
790         mpc52xx_fec_hw_init(dev);
791
792         phy_stop(priv->phydev);
793         phy_write(priv->phydev, MII_BMCR, BMCR_RESET);
794         phy_start(priv->phydev);
795
796         bcom_fec_rx_reset(priv->rx_dmatsk);
797         bcom_fec_tx_reset(priv->tx_dmatsk);
798
799         mpc52xx_fec_alloc_rx_buffers(dev, priv->rx_dmatsk);
800
801         bcom_enable(priv->rx_dmatsk);
802         bcom_enable(priv->tx_dmatsk);
803
804         mpc52xx_fec_start(dev);
805 }
806
807
808 /* ethtool interface */
809 static void mpc52xx_fec_get_drvinfo(struct net_device *dev,
810                 struct ethtool_drvinfo *info)
811 {
812         strcpy(info->driver, DRIVER_NAME);
813 }
814
815 static int mpc52xx_fec_get_settings(struct net_device *dev, struct ethtool_cmd *cmd)
816 {
817         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
818         return phy_ethtool_gset(priv->phydev, cmd);
819 }
820
821 static int mpc52xx_fec_set_settings(struct net_device *dev, struct ethtool_cmd *cmd)
822 {
823         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
824         return phy_ethtool_sset(priv->phydev, cmd);
825 }
826
827 static u32 mpc52xx_fec_get_msglevel(struct net_device *dev)
828 {
829         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
830         return priv->msg_enable;
831 }
832
833 static void mpc52xx_fec_set_msglevel(struct net_device *dev, u32 level)
834 {
835         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
836         priv->msg_enable = level;
837 }
838
839 static const struct ethtool_ops mpc52xx_fec_ethtool_ops = {
840         .get_drvinfo = mpc52xx_fec_get_drvinfo,
841         .get_settings = mpc52xx_fec_get_settings,
842         .set_settings = mpc52xx_fec_set_settings,
843         .get_link = ethtool_op_get_link,
844         .get_msglevel = mpc52xx_fec_get_msglevel,
845         .set_msglevel = mpc52xx_fec_set_msglevel,
846 };
847
848
849 static int mpc52xx_fec_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
850 {
851         struct mpc52xx_fec_priv *priv = netdev_priv(dev);
852
853         return mpc52xx_fec_phy_mii_ioctl(priv, if_mii(rq), cmd);
854 }
855
856 /* ======================================================================== */
857 /* OF Driver                                                                */
858 /* ======================================================================== */
859
860 static int __devinit
861 mpc52xx_fec_probe(struct of_device *op, const struct of_device_id *match)
862 {
863         int rv;
864         struct net_device *ndev;
865         struct mpc52xx_fec_priv *priv = NULL;
866         struct resource mem;
867         const phandle *ph;
868
869         phys_addr_t rx_fifo;
870         phys_addr_t tx_fifo;
871
872         /* Get the ether ndev & it's private zone */
873         ndev = alloc_etherdev(sizeof(struct mpc52xx_fec_priv));
874         if (!ndev)
875                 return -ENOMEM;
876
877         priv = netdev_priv(ndev);
878
879         /* Reserve FEC control zone */
880         rv = of_address_to_resource(op->node, 0, &mem);
881         if (rv) {
882                 printk(KERN_ERR DRIVER_NAME ": "
883                                 "Error while parsing device node resource\n" );
884                 return rv;
885         }
886         if ((mem.end - mem.start + 1) < sizeof(struct mpc52xx_fec)) {
887                 printk(KERN_ERR DRIVER_NAME
888                         " - invalid resource size (%lx < %x), check mpc52xx_devices.c\n",
889                         (unsigned long)(mem.end - mem.start + 1), sizeof(struct mpc52xx_fec));
890                 return -EINVAL;
891         }
892
893         if (!request_mem_region(mem.start, sizeof(struct mpc52xx_fec), DRIVER_NAME))
894                 return -EBUSY;
895
896         /* Init ether ndev with what we have */
897         ndev->open              = mpc52xx_fec_open;
898         ndev->stop              = mpc52xx_fec_close;
899         ndev->hard_start_xmit   = mpc52xx_fec_hard_start_xmit;
900         ndev->do_ioctl          = mpc52xx_fec_ioctl;
901         ndev->ethtool_ops       = &mpc52xx_fec_ethtool_ops;
902         ndev->get_stats         = mpc52xx_fec_get_stats;
903         ndev->set_mac_address   = mpc52xx_fec_set_mac_address;
904         ndev->set_multicast_list = mpc52xx_fec_set_multicast_list;
905         ndev->tx_timeout        = mpc52xx_fec_tx_timeout;
906         ndev->watchdog_timeo    = FEC_WATCHDOG_TIMEOUT;
907         ndev->base_addr         = mem.start;
908
909         priv->t_irq = priv->r_irq = ndev->irq = NO_IRQ; /* IRQ are free for now */
910
911         spin_lock_init(&priv->lock);
912
913         /* ioremap the zones */
914         priv->fec = ioremap(mem.start, sizeof(struct mpc52xx_fec));
915
916         if (!priv->fec) {
917                 rv = -ENOMEM;
918                 goto probe_error;
919         }
920
921         /* Bestcomm init */
922         rx_fifo = ndev->base_addr + offsetof(struct mpc52xx_fec, rfifo_data);
923         tx_fifo = ndev->base_addr + offsetof(struct mpc52xx_fec, tfifo_data);
924
925         priv->rx_dmatsk = bcom_fec_rx_init(FEC_RX_NUM_BD, rx_fifo, FEC_RX_BUFFER_SIZE);
926         priv->tx_dmatsk = bcom_fec_tx_init(FEC_TX_NUM_BD, tx_fifo);
927
928         if (!priv->rx_dmatsk || !priv->tx_dmatsk) {
929                 printk(KERN_ERR DRIVER_NAME ": Can not init SDMA tasks\n" );
930                 rv = -ENOMEM;
931                 goto probe_error;
932         }
933
934         /* Get the IRQ we need one by one */
935                 /* Control */
936         ndev->irq = irq_of_parse_and_map(op->node, 0);
937
938                 /* RX */
939         priv->r_irq = bcom_get_task_irq(priv->rx_dmatsk);
940
941                 /* TX */
942         priv->t_irq = bcom_get_task_irq(priv->tx_dmatsk);
943
944         /* MAC address init */
945         if (!is_zero_ether_addr(mpc52xx_fec_mac_addr))
946                 memcpy(ndev->dev_addr, mpc52xx_fec_mac_addr, 6);
947         else
948                 mpc52xx_fec_get_paddr(ndev, ndev->dev_addr);
949
950         priv->msg_enable = netif_msg_init(debug, MPC52xx_MESSAGES_DEFAULT);
951         priv->duplex = DUPLEX_FULL;
952
953         /* is the phy present in device tree? */
954         ph = of_get_property(op->node, "phy-handle", NULL);
955         if (ph) {
956                 const unsigned int *prop;
957                 struct device_node *phy_dn;
958                 priv->has_phy = 1;
959
960                 phy_dn = of_find_node_by_phandle(*ph);
961                 prop = of_get_property(phy_dn, "reg", NULL);
962                 priv->phy_addr = *prop;
963
964                 of_node_put(phy_dn);
965
966                 /* Phy speed */
967                 priv->phy_speed = ((mpc52xx_find_ipb_freq(op->node) >> 20) / 5) << 1;
968         } else {
969                 dev_info(&ndev->dev, "can't find \"phy-handle\" in device"
970                                 " tree, using 7-wire mode\n");
971         }
972
973         /* Hardware init */
974         mpc52xx_fec_hw_init(ndev);
975
976         mpc52xx_fec_reset_stats(ndev);
977
978         SET_NETDEV_DEV(ndev, &op->dev);
979
980         /* Register the new network device */
981         rv = register_netdev(ndev);
982         if (rv < 0)
983                 goto probe_error;
984
985         /* We're done ! */
986         dev_set_drvdata(&op->dev, ndev);
987
988         return 0;
989
990
991         /* Error handling - free everything that might be allocated */
992 probe_error:
993
994         irq_dispose_mapping(ndev->irq);
995
996         if (priv->rx_dmatsk)
997                 bcom_fec_rx_release(priv->rx_dmatsk);
998         if (priv->tx_dmatsk)
999                 bcom_fec_tx_release(priv->tx_dmatsk);
1000
1001         if (priv->fec)
1002                 iounmap(priv->fec);
1003
1004         release_mem_region(mem.start, sizeof(struct mpc52xx_fec));
1005
1006         free_netdev(ndev);
1007
1008         return rv;
1009 }
1010
1011 static int
1012 mpc52xx_fec_remove(struct of_device *op)
1013 {
1014         struct net_device *ndev;
1015         struct mpc52xx_fec_priv *priv;
1016
1017         ndev = dev_get_drvdata(&op->dev);
1018         priv = netdev_priv(ndev);
1019
1020         unregister_netdev(ndev);
1021
1022         irq_dispose_mapping(ndev->irq);
1023
1024         bcom_fec_rx_release(priv->rx_dmatsk);
1025         bcom_fec_tx_release(priv->tx_dmatsk);
1026
1027         iounmap(priv->fec);
1028
1029         release_mem_region(ndev->base_addr, sizeof(struct mpc52xx_fec));
1030
1031         free_netdev(ndev);
1032
1033         dev_set_drvdata(&op->dev, NULL);
1034         return 0;
1035 }
1036
1037 #ifdef CONFIG_PM
1038 static int mpc52xx_fec_of_suspend(struct of_device *op, pm_message_t state)
1039 {
1040         struct net_device *dev = dev_get_drvdata(&op->dev);
1041
1042         if (netif_running(dev))
1043                 mpc52xx_fec_close(dev);
1044
1045         return 0;
1046 }
1047
1048 static int mpc52xx_fec_of_resume(struct of_device *op)
1049 {
1050         struct net_device *dev = dev_get_drvdata(&op->dev);
1051
1052         mpc52xx_fec_hw_init(dev);
1053         mpc52xx_fec_reset_stats(dev);
1054
1055         if (netif_running(dev))
1056                 mpc52xx_fec_open(dev);
1057
1058         return 0;
1059 }
1060 #endif
1061
1062 static struct of_device_id mpc52xx_fec_match[] = {
1063         { .type = "network", .compatible = "fsl,mpc5200b-fec", },
1064         { .type = "network", .compatible = "fsl,mpc5200-fec", },
1065         { .type = "network", .compatible = "mpc5200-fec", },
1066         { }
1067 };
1068
1069 MODULE_DEVICE_TABLE(of, mpc52xx_fec_match);
1070
1071 static struct of_platform_driver mpc52xx_fec_driver = {
1072         .owner          = THIS_MODULE,
1073         .name           = DRIVER_NAME,
1074         .match_table    = mpc52xx_fec_match,
1075         .probe          = mpc52xx_fec_probe,
1076         .remove         = mpc52xx_fec_remove,
1077 #ifdef CONFIG_PM
1078         .suspend        = mpc52xx_fec_of_suspend,
1079         .resume         = mpc52xx_fec_of_resume,
1080 #endif
1081 };
1082
1083
1084 /* ======================================================================== */
1085 /* Module                                                                   */
1086 /* ======================================================================== */
1087
1088 static int __init
1089 mpc52xx_fec_init(void)
1090 {
1091 #ifdef CONFIG_FEC_MPC52xx_MDIO
1092         int ret;
1093         ret = of_register_platform_driver(&mpc52xx_fec_mdio_driver);
1094         if (ret) {
1095                 printk(KERN_ERR DRIVER_NAME ": failed to register mdio driver\n");
1096                 return ret;
1097         }
1098 #endif
1099         return of_register_platform_driver(&mpc52xx_fec_driver);
1100 }
1101
1102 static void __exit
1103 mpc52xx_fec_exit(void)
1104 {
1105         of_unregister_platform_driver(&mpc52xx_fec_driver);
1106 #ifdef CONFIG_FEC_MPC52xx_MDIO
1107         of_unregister_platform_driver(&mpc52xx_fec_mdio_driver);
1108 #endif
1109 }
1110
1111
1112 module_init(mpc52xx_fec_init);
1113 module_exit(mpc52xx_fec_exit);
1114
1115 MODULE_LICENSE("GPL");
1116 MODULE_AUTHOR("Dale Farnsworth");
1117 MODULE_DESCRIPTION("Ethernet driver for the Freescale MPC52xx FEC");