[ETH]: Make eth_type_trans set skb->dev like the other *_type_trans
[platform/adaptation/renesas_rcar/renesas_kernel.git] / drivers / net / fs_enet / fs_enet-main.c
1 /*
2  * Combined Ethernet driver for Motorola MPC8xx and MPC82xx.
3  *
4  * Copyright (c) 2003 Intracom S.A. 
5  *  by Pantelis Antoniou <panto@intracom.gr>
6  * 
7  * 2005 (c) MontaVista Software, Inc. 
8  * Vitaly Bordug <vbordug@ru.mvista.com>
9  *
10  * Heavily based on original FEC driver by Dan Malek <dan@embeddededge.com>
11  * and modifications by Joakim Tjernlund <joakim.tjernlund@lumentis.se>
12  *
13  * This file is licensed under the terms of the GNU General Public License 
14  * version 2. This program is licensed "as is" without any warranty of any 
15  * kind, whether express or implied.
16  */
17
18 #include <linux/module.h>
19 #include <linux/kernel.h>
20 #include <linux/types.h>
21 #include <linux/string.h>
22 #include <linux/ptrace.h>
23 #include <linux/errno.h>
24 #include <linux/ioport.h>
25 #include <linux/slab.h>
26 #include <linux/interrupt.h>
27 #include <linux/pci.h>
28 #include <linux/init.h>
29 #include <linux/delay.h>
30 #include <linux/netdevice.h>
31 #include <linux/etherdevice.h>
32 #include <linux/skbuff.h>
33 #include <linux/spinlock.h>
34 #include <linux/mii.h>
35 #include <linux/ethtool.h>
36 #include <linux/bitops.h>
37 #include <linux/fs.h>
38 #include <linux/platform_device.h>
39 #include <linux/phy.h>
40
41 #include <linux/vmalloc.h>
42 #include <asm/pgtable.h>
43
44 #include <asm/pgtable.h>
45 #include <asm/irq.h>
46 #include <asm/uaccess.h>
47
48 #include "fs_enet.h"
49
50 /*************************************************/
51
52 static char version[] __devinitdata =
53     DRV_MODULE_NAME ".c:v" DRV_MODULE_VERSION " (" DRV_MODULE_RELDATE ")" "\n";
54
55 MODULE_AUTHOR("Pantelis Antoniou <panto@intracom.gr>");
56 MODULE_DESCRIPTION("Freescale Ethernet Driver");
57 MODULE_LICENSE("GPL");
58 MODULE_VERSION(DRV_MODULE_VERSION);
59
60 int fs_enet_debug = -1;         /* -1 == use FS_ENET_DEF_MSG_ENABLE as value */
61 module_param(fs_enet_debug, int, 0);
62 MODULE_PARM_DESC(fs_enet_debug,
63                  "Freescale bitmapped debugging message enable value");
64
65
66 static void fs_set_multicast_list(struct net_device *dev)
67 {
68         struct fs_enet_private *fep = netdev_priv(dev);
69
70         (*fep->ops->set_multicast_list)(dev);
71 }
72
73 /* NAPI receive function */
74 static int fs_enet_rx_napi(struct net_device *dev, int *budget)
75 {
76         struct fs_enet_private *fep = netdev_priv(dev);
77         const struct fs_platform_info *fpi = fep->fpi;
78         cbd_t *bdp;
79         struct sk_buff *skb, *skbn, *skbt;
80         int received = 0;
81         u16 pkt_len, sc;
82         int curidx;
83         int rx_work_limit = 0;  /* pacify gcc */
84
85         rx_work_limit = min(dev->quota, *budget);
86
87         if (!netif_running(dev))
88                 return 0;
89
90         /*
91          * First, grab all of the stats for the incoming packet.
92          * These get messed up if we get called due to a busy condition.
93          */
94         bdp = fep->cur_rx;
95
96         /* clear RX status bits for napi*/
97         (*fep->ops->napi_clear_rx_event)(dev);
98
99         while (((sc = CBDR_SC(bdp)) & BD_ENET_RX_EMPTY) == 0) {
100
101                 curidx = bdp - fep->rx_bd_base;
102
103                 /*
104                  * Since we have allocated space to hold a complete frame,
105                  * the last indicator should be set.
106                  */
107                 if ((sc & BD_ENET_RX_LAST) == 0)
108                         printk(KERN_WARNING DRV_MODULE_NAME
109                                ": %s rcv is not +last\n",
110                                dev->name);
111
112                 /*
113                  * Check for errors. 
114                  */
115                 if (sc & (BD_ENET_RX_LG | BD_ENET_RX_SH | BD_ENET_RX_CL |
116                           BD_ENET_RX_NO | BD_ENET_RX_CR | BD_ENET_RX_OV)) {
117                         fep->stats.rx_errors++;
118                         /* Frame too long or too short. */
119                         if (sc & (BD_ENET_RX_LG | BD_ENET_RX_SH))
120                                 fep->stats.rx_length_errors++;
121                         /* Frame alignment */
122                         if (sc & (BD_ENET_RX_NO | BD_ENET_RX_CL))
123                                 fep->stats.rx_frame_errors++;
124                         /* CRC Error */
125                         if (sc & BD_ENET_RX_CR)
126                                 fep->stats.rx_crc_errors++;
127                         /* FIFO overrun */
128                         if (sc & BD_ENET_RX_OV)
129                                 fep->stats.rx_crc_errors++;
130
131                         skb = fep->rx_skbuff[curidx];
132
133                         dma_unmap_single(fep->dev, CBDR_BUFADDR(bdp),
134                                 L1_CACHE_ALIGN(PKT_MAXBUF_SIZE),
135                                 DMA_FROM_DEVICE);
136
137                         skbn = skb;
138
139                 } else {
140
141                         /* napi, got packet but no quota */
142                         if (--rx_work_limit < 0)
143                                 break;
144
145                         skb = fep->rx_skbuff[curidx];
146
147                         dma_unmap_single(fep->dev, CBDR_BUFADDR(bdp),
148                                 L1_CACHE_ALIGN(PKT_MAXBUF_SIZE),
149                                 DMA_FROM_DEVICE);
150
151                         /*
152                          * Process the incoming frame.
153                          */
154                         fep->stats.rx_packets++;
155                         pkt_len = CBDR_DATLEN(bdp) - 4; /* remove CRC */
156                         fep->stats.rx_bytes += pkt_len + 4;
157
158                         if (pkt_len <= fpi->rx_copybreak) {
159                                 /* +2 to make IP header L1 cache aligned */
160                                 skbn = dev_alloc_skb(pkt_len + 2);
161                                 if (skbn != NULL) {
162                                         skb_reserve(skbn, 2);   /* align IP header */
163                                         memcpy(skbn->data, skb->data, pkt_len);
164                                         /* swap */
165                                         skbt = skb;
166                                         skb = skbn;
167                                         skbn = skbt;
168                                 }
169                         } else
170                                 skbn = dev_alloc_skb(ENET_RX_FRSIZE);
171
172                         if (skbn != NULL) {
173                                 skb_put(skb, pkt_len);  /* Make room */
174                                 skb->protocol = eth_type_trans(skb, dev);
175                                 received++;
176                                 netif_receive_skb(skb);
177                         } else {
178                                 printk(KERN_WARNING DRV_MODULE_NAME
179                                        ": %s Memory squeeze, dropping packet.\n",
180                                        dev->name);
181                                 fep->stats.rx_dropped++;
182                                 skbn = skb;
183                         }
184                 }
185
186                 fep->rx_skbuff[curidx] = skbn;
187                 CBDW_BUFADDR(bdp, dma_map_single(fep->dev, skbn->data,
188                              L1_CACHE_ALIGN(PKT_MAXBUF_SIZE),
189                              DMA_FROM_DEVICE));
190                 CBDW_DATLEN(bdp, 0);
191                 CBDW_SC(bdp, (sc & ~BD_ENET_RX_STATS) | BD_ENET_RX_EMPTY);
192
193                 /*
194                  * Update BD pointer to next entry. 
195                  */
196                 if ((sc & BD_ENET_RX_WRAP) == 0)
197                         bdp++;
198                 else
199                         bdp = fep->rx_bd_base;
200
201                 (*fep->ops->rx_bd_done)(dev);
202         }
203
204         fep->cur_rx = bdp;
205
206         dev->quota -= received;
207         *budget -= received;
208
209         if (rx_work_limit < 0)
210                 return 1;       /* not done */
211
212         /* done */
213         netif_rx_complete(dev);
214
215         (*fep->ops->napi_enable_rx)(dev);
216
217         return 0;
218 }
219
220 /* non NAPI receive function */
221 static int fs_enet_rx_non_napi(struct net_device *dev)
222 {
223         struct fs_enet_private *fep = netdev_priv(dev);
224         const struct fs_platform_info *fpi = fep->fpi;
225         cbd_t *bdp;
226         struct sk_buff *skb, *skbn, *skbt;
227         int received = 0;
228         u16 pkt_len, sc;
229         int curidx;
230         /*
231          * First, grab all of the stats for the incoming packet.
232          * These get messed up if we get called due to a busy condition.
233          */
234         bdp = fep->cur_rx;
235
236         while (((sc = CBDR_SC(bdp)) & BD_ENET_RX_EMPTY) == 0) {
237
238                 curidx = bdp - fep->rx_bd_base;
239
240                 /*
241                  * Since we have allocated space to hold a complete frame,
242                  * the last indicator should be set.
243                  */
244                 if ((sc & BD_ENET_RX_LAST) == 0)
245                         printk(KERN_WARNING DRV_MODULE_NAME
246                                ": %s rcv is not +last\n",
247                                dev->name);
248
249                 /*
250                  * Check for errors. 
251                  */
252                 if (sc & (BD_ENET_RX_LG | BD_ENET_RX_SH | BD_ENET_RX_CL |
253                           BD_ENET_RX_NO | BD_ENET_RX_CR | BD_ENET_RX_OV)) {
254                         fep->stats.rx_errors++;
255                         /* Frame too long or too short. */
256                         if (sc & (BD_ENET_RX_LG | BD_ENET_RX_SH))
257                                 fep->stats.rx_length_errors++;
258                         /* Frame alignment */
259                         if (sc & (BD_ENET_RX_NO | BD_ENET_RX_CL))
260                                 fep->stats.rx_frame_errors++;
261                         /* CRC Error */
262                         if (sc & BD_ENET_RX_CR)
263                                 fep->stats.rx_crc_errors++;
264                         /* FIFO overrun */
265                         if (sc & BD_ENET_RX_OV)
266                                 fep->stats.rx_crc_errors++;
267
268                         skb = fep->rx_skbuff[curidx];
269
270                         dma_unmap_single(fep->dev, CBDR_BUFADDR(bdp),
271                                 L1_CACHE_ALIGN(PKT_MAXBUF_SIZE),
272                                 DMA_FROM_DEVICE);
273
274                         skbn = skb;
275
276                 } else {
277
278                         skb = fep->rx_skbuff[curidx];
279
280                         dma_unmap_single(fep->dev, CBDR_BUFADDR(bdp),
281                                 L1_CACHE_ALIGN(PKT_MAXBUF_SIZE),
282                                 DMA_FROM_DEVICE);
283
284                         /*
285                          * Process the incoming frame.
286                          */
287                         fep->stats.rx_packets++;
288                         pkt_len = CBDR_DATLEN(bdp) - 4; /* remove CRC */
289                         fep->stats.rx_bytes += pkt_len + 4;
290
291                         if (pkt_len <= fpi->rx_copybreak) {
292                                 /* +2 to make IP header L1 cache aligned */
293                                 skbn = dev_alloc_skb(pkt_len + 2);
294                                 if (skbn != NULL) {
295                                         skb_reserve(skbn, 2);   /* align IP header */
296                                         memcpy(skbn->data, skb->data, pkt_len);
297                                         /* swap */
298                                         skbt = skb;
299                                         skb = skbn;
300                                         skbn = skbt;
301                                 }
302                         } else
303                                 skbn = dev_alloc_skb(ENET_RX_FRSIZE);
304
305                         if (skbn != NULL) {
306                                 skb_put(skb, pkt_len);  /* Make room */
307                                 skb->protocol = eth_type_trans(skb, dev);
308                                 received++;
309                                 netif_rx(skb);
310                         } else {
311                                 printk(KERN_WARNING DRV_MODULE_NAME
312                                        ": %s Memory squeeze, dropping packet.\n",
313                                        dev->name);
314                                 fep->stats.rx_dropped++;
315                                 skbn = skb;
316                         }
317                 }
318
319                 fep->rx_skbuff[curidx] = skbn;
320                 CBDW_BUFADDR(bdp, dma_map_single(fep->dev, skbn->data,
321                              L1_CACHE_ALIGN(PKT_MAXBUF_SIZE),
322                              DMA_FROM_DEVICE));
323                 CBDW_DATLEN(bdp, 0);
324                 CBDW_SC(bdp, (sc & ~BD_ENET_RX_STATS) | BD_ENET_RX_EMPTY);
325
326                 /*
327                  * Update BD pointer to next entry. 
328                  */
329                 if ((sc & BD_ENET_RX_WRAP) == 0)
330                         bdp++;
331                 else
332                         bdp = fep->rx_bd_base;
333
334                 (*fep->ops->rx_bd_done)(dev);
335         }
336
337         fep->cur_rx = bdp;
338
339         return 0;
340 }
341
342 static void fs_enet_tx(struct net_device *dev)
343 {
344         struct fs_enet_private *fep = netdev_priv(dev);
345         cbd_t *bdp;
346         struct sk_buff *skb;
347         int dirtyidx, do_wake, do_restart;
348         u16 sc;
349
350         spin_lock(&fep->lock);
351         bdp = fep->dirty_tx;
352
353         do_wake = do_restart = 0;
354         while (((sc = CBDR_SC(bdp)) & BD_ENET_TX_READY) == 0) {
355
356                 dirtyidx = bdp - fep->tx_bd_base;
357
358                 if (fep->tx_free == fep->tx_ring)
359                         break;
360
361                 skb = fep->tx_skbuff[dirtyidx];
362
363                 /*
364                  * Check for errors. 
365                  */
366                 if (sc & (BD_ENET_TX_HB | BD_ENET_TX_LC |
367                           BD_ENET_TX_RL | BD_ENET_TX_UN | BD_ENET_TX_CSL)) {
368
369                         if (sc & BD_ENET_TX_HB) /* No heartbeat */
370                                 fep->stats.tx_heartbeat_errors++;
371                         if (sc & BD_ENET_TX_LC) /* Late collision */
372                                 fep->stats.tx_window_errors++;
373                         if (sc & BD_ENET_TX_RL) /* Retrans limit */
374                                 fep->stats.tx_aborted_errors++;
375                         if (sc & BD_ENET_TX_UN) /* Underrun */
376                                 fep->stats.tx_fifo_errors++;
377                         if (sc & BD_ENET_TX_CSL)        /* Carrier lost */
378                                 fep->stats.tx_carrier_errors++;
379
380                         if (sc & (BD_ENET_TX_LC | BD_ENET_TX_RL | BD_ENET_TX_UN)) {
381                                 fep->stats.tx_errors++;
382                                 do_restart = 1;
383                         }
384                 } else
385                         fep->stats.tx_packets++;
386
387                 if (sc & BD_ENET_TX_READY)
388                         printk(KERN_WARNING DRV_MODULE_NAME
389                                ": %s HEY! Enet xmit interrupt and TX_READY.\n",
390                                dev->name);
391
392                 /*
393                  * Deferred means some collisions occurred during transmit,
394                  * but we eventually sent the packet OK.
395                  */
396                 if (sc & BD_ENET_TX_DEF)
397                         fep->stats.collisions++;
398
399                 /* unmap */
400                 dma_unmap_single(fep->dev, CBDR_BUFADDR(bdp),
401                                 skb->len, DMA_TO_DEVICE);
402
403                 /*
404                  * Free the sk buffer associated with this last transmit. 
405                  */
406                 dev_kfree_skb_irq(skb);
407                 fep->tx_skbuff[dirtyidx] = NULL;
408
409                 /*
410                  * Update pointer to next buffer descriptor to be transmitted. 
411                  */
412                 if ((sc & BD_ENET_TX_WRAP) == 0)
413                         bdp++;
414                 else
415                         bdp = fep->tx_bd_base;
416
417                 /*
418                  * Since we have freed up a buffer, the ring is no longer
419                  * full.
420                  */
421                 if (!fep->tx_free++)
422                         do_wake = 1;
423         }
424
425         fep->dirty_tx = bdp;
426
427         if (do_restart)
428                 (*fep->ops->tx_restart)(dev);
429
430         spin_unlock(&fep->lock);
431
432         if (do_wake)
433                 netif_wake_queue(dev);
434 }
435
436 /*
437  * The interrupt handler.
438  * This is called from the MPC core interrupt.
439  */
440 static irqreturn_t
441 fs_enet_interrupt(int irq, void *dev_id)
442 {
443         struct net_device *dev = dev_id;
444         struct fs_enet_private *fep;
445         const struct fs_platform_info *fpi;
446         u32 int_events;
447         u32 int_clr_events;
448         int nr, napi_ok;
449         int handled;
450
451         fep = netdev_priv(dev);
452         fpi = fep->fpi;
453
454         nr = 0;
455         while ((int_events = (*fep->ops->get_int_events)(dev)) != 0) {
456
457                 nr++;
458
459                 int_clr_events = int_events;
460                 if (fpi->use_napi)
461                         int_clr_events &= ~fep->ev_napi_rx;
462
463                 (*fep->ops->clear_int_events)(dev, int_clr_events);
464
465                 if (int_events & fep->ev_err)
466                         (*fep->ops->ev_error)(dev, int_events);
467
468                 if (int_events & fep->ev_rx) {
469                         if (!fpi->use_napi)
470                                 fs_enet_rx_non_napi(dev);
471                         else {
472                                 napi_ok = netif_rx_schedule_prep(dev);
473
474                                 (*fep->ops->napi_disable_rx)(dev);
475                                 (*fep->ops->clear_int_events)(dev, fep->ev_napi_rx);
476
477                                 /* NOTE: it is possible for FCCs in NAPI mode    */
478                                 /* to submit a spurious interrupt while in poll  */
479                                 if (napi_ok)
480                                         __netif_rx_schedule(dev);
481                         }
482                 }
483
484                 if (int_events & fep->ev_tx)
485                         fs_enet_tx(dev);
486         }
487
488         handled = nr > 0;
489         return IRQ_RETVAL(handled);
490 }
491
492 void fs_init_bds(struct net_device *dev)
493 {
494         struct fs_enet_private *fep = netdev_priv(dev);
495         cbd_t *bdp;
496         struct sk_buff *skb;
497         int i;
498
499         fs_cleanup_bds(dev);
500
501         fep->dirty_tx = fep->cur_tx = fep->tx_bd_base;
502         fep->tx_free = fep->tx_ring;
503         fep->cur_rx = fep->rx_bd_base;
504
505         /*
506          * Initialize the receive buffer descriptors. 
507          */
508         for (i = 0, bdp = fep->rx_bd_base; i < fep->rx_ring; i++, bdp++) {
509                 skb = dev_alloc_skb(ENET_RX_FRSIZE);
510                 if (skb == NULL) {
511                         printk(KERN_WARNING DRV_MODULE_NAME
512                                ": %s Memory squeeze, unable to allocate skb\n",
513                                dev->name);
514                         break;
515                 }
516                 fep->rx_skbuff[i] = skb;
517                 CBDW_BUFADDR(bdp,
518                         dma_map_single(fep->dev, skb->data,
519                                 L1_CACHE_ALIGN(PKT_MAXBUF_SIZE),
520                                 DMA_FROM_DEVICE));
521                 CBDW_DATLEN(bdp, 0);    /* zero */
522                 CBDW_SC(bdp, BD_ENET_RX_EMPTY |
523                         ((i < fep->rx_ring - 1) ? 0 : BD_SC_WRAP));
524         }
525         /*
526          * if we failed, fillup remainder 
527          */
528         for (; i < fep->rx_ring; i++, bdp++) {
529                 fep->rx_skbuff[i] = NULL;
530                 CBDW_SC(bdp, (i < fep->rx_ring - 1) ? 0 : BD_SC_WRAP);
531         }
532
533         /*
534          * ...and the same for transmit.  
535          */
536         for (i = 0, bdp = fep->tx_bd_base; i < fep->tx_ring; i++, bdp++) {
537                 fep->tx_skbuff[i] = NULL;
538                 CBDW_BUFADDR(bdp, 0);
539                 CBDW_DATLEN(bdp, 0);
540                 CBDW_SC(bdp, (i < fep->tx_ring - 1) ? 0 : BD_SC_WRAP);
541         }
542 }
543
544 void fs_cleanup_bds(struct net_device *dev)
545 {
546         struct fs_enet_private *fep = netdev_priv(dev);
547         struct sk_buff *skb;
548         cbd_t *bdp;
549         int i;
550
551         /*
552          * Reset SKB transmit buffers.  
553          */
554         for (i = 0, bdp = fep->tx_bd_base; i < fep->tx_ring; i++, bdp++) {
555                 if ((skb = fep->tx_skbuff[i]) == NULL)
556                         continue;
557
558                 /* unmap */
559                 dma_unmap_single(fep->dev, CBDR_BUFADDR(bdp),
560                                 skb->len, DMA_TO_DEVICE);
561
562                 fep->tx_skbuff[i] = NULL;
563                 dev_kfree_skb(skb);
564         }
565
566         /*
567          * Reset SKB receive buffers 
568          */
569         for (i = 0, bdp = fep->rx_bd_base; i < fep->rx_ring; i++, bdp++) {
570                 if ((skb = fep->rx_skbuff[i]) == NULL)
571                         continue;
572
573                 /* unmap */
574                 dma_unmap_single(fep->dev, CBDR_BUFADDR(bdp),
575                         L1_CACHE_ALIGN(PKT_MAXBUF_SIZE),
576                         DMA_FROM_DEVICE);
577
578                 fep->rx_skbuff[i] = NULL;
579
580                 dev_kfree_skb(skb);
581         }
582 }
583
584 /**********************************************************************************/
585
586 static int fs_enet_start_xmit(struct sk_buff *skb, struct net_device *dev)
587 {
588         struct fs_enet_private *fep = netdev_priv(dev);
589         cbd_t *bdp;
590         int curidx;
591         u16 sc;
592         unsigned long flags;
593
594         spin_lock_irqsave(&fep->tx_lock, flags);
595
596         /*
597          * Fill in a Tx ring entry 
598          */
599         bdp = fep->cur_tx;
600
601         if (!fep->tx_free || (CBDR_SC(bdp) & BD_ENET_TX_READY)) {
602                 netif_stop_queue(dev);
603                 spin_unlock_irqrestore(&fep->tx_lock, flags);
604
605                 /*
606                  * Ooops.  All transmit buffers are full.  Bail out.
607                  * This should not happen, since the tx queue should be stopped.
608                  */
609                 printk(KERN_WARNING DRV_MODULE_NAME
610                        ": %s tx queue full!.\n", dev->name);
611                 return NETDEV_TX_BUSY;
612         }
613
614         curidx = bdp - fep->tx_bd_base;
615         /*
616          * Clear all of the status flags. 
617          */
618         CBDC_SC(bdp, BD_ENET_TX_STATS);
619
620         /*
621          * Save skb pointer. 
622          */
623         fep->tx_skbuff[curidx] = skb;
624
625         fep->stats.tx_bytes += skb->len;
626
627         /*
628          * Push the data cache so the CPM does not get stale memory data. 
629          */
630         CBDW_BUFADDR(bdp, dma_map_single(fep->dev,
631                                 skb->data, skb->len, DMA_TO_DEVICE));
632         CBDW_DATLEN(bdp, skb->len);
633
634         dev->trans_start = jiffies;
635
636         /*
637          * If this was the last BD in the ring, start at the beginning again. 
638          */
639         if ((CBDR_SC(bdp) & BD_ENET_TX_WRAP) == 0)
640                 fep->cur_tx++;
641         else
642                 fep->cur_tx = fep->tx_bd_base;
643
644         if (!--fep->tx_free)
645                 netif_stop_queue(dev);
646
647         /* Trigger transmission start */
648         sc = BD_ENET_TX_READY | BD_ENET_TX_INTR |
649              BD_ENET_TX_LAST | BD_ENET_TX_TC;
650
651         /* note that while FEC does not have this bit
652          * it marks it as available for software use
653          * yay for hw reuse :) */
654         if (skb->len <= 60)
655                 sc |= BD_ENET_TX_PAD;
656         CBDS_SC(bdp, sc);
657
658         (*fep->ops->tx_kickstart)(dev);
659
660         spin_unlock_irqrestore(&fep->tx_lock, flags);
661
662         return NETDEV_TX_OK;
663 }
664
665 static int fs_request_irq(struct net_device *dev, int irq, const char *name,
666                 irq_handler_t irqf)
667 {
668         struct fs_enet_private *fep = netdev_priv(dev);
669
670         (*fep->ops->pre_request_irq)(dev, irq);
671         return request_irq(irq, irqf, IRQF_SHARED, name, dev);
672 }
673
674 static void fs_free_irq(struct net_device *dev, int irq)
675 {
676         struct fs_enet_private *fep = netdev_priv(dev);
677
678         free_irq(irq, dev);
679         (*fep->ops->post_free_irq)(dev, irq);
680 }
681
682 static void fs_timeout(struct net_device *dev)
683 {
684         struct fs_enet_private *fep = netdev_priv(dev);
685         unsigned long flags;
686         int wake = 0;
687
688         fep->stats.tx_errors++;
689
690         spin_lock_irqsave(&fep->lock, flags);
691
692         if (dev->flags & IFF_UP) {
693                 phy_stop(fep->phydev);
694                 (*fep->ops->stop)(dev);
695                 (*fep->ops->restart)(dev);
696                 phy_start(fep->phydev);
697         }
698
699         phy_start(fep->phydev);
700         wake = fep->tx_free && !(CBDR_SC(fep->cur_tx) & BD_ENET_TX_READY);
701         spin_unlock_irqrestore(&fep->lock, flags);
702
703         if (wake)
704                 netif_wake_queue(dev);
705 }
706
707 /*-----------------------------------------------------------------------------
708  *  generic link-change handler - should be sufficient for most cases
709  *-----------------------------------------------------------------------------*/
710 static void generic_adjust_link(struct  net_device *dev)
711 {
712        struct fs_enet_private *fep = netdev_priv(dev);
713        struct phy_device *phydev = fep->phydev;
714        int new_state = 0;
715
716        if (phydev->link) {
717
718                /* adjust to duplex mode */
719                if (phydev->duplex != fep->oldduplex){
720                        new_state = 1;
721                        fep->oldduplex = phydev->duplex;
722                }
723
724                if (phydev->speed != fep->oldspeed) {
725                        new_state = 1;
726                        fep->oldspeed = phydev->speed;
727                }
728
729                if (!fep->oldlink) {
730                        new_state = 1;
731                        fep->oldlink = 1;
732                        netif_schedule(dev);
733                        netif_carrier_on(dev);
734                        netif_start_queue(dev);
735                }
736
737                if (new_state)
738                        fep->ops->restart(dev);
739
740        } else if (fep->oldlink) {
741                new_state = 1;
742                fep->oldlink = 0;
743                fep->oldspeed = 0;
744                fep->oldduplex = -1;
745                netif_carrier_off(dev);
746                netif_stop_queue(dev);
747        }
748
749        if (new_state && netif_msg_link(fep))
750                phy_print_status(phydev);
751 }
752
753
754 static void fs_adjust_link(struct net_device *dev)
755 {
756         struct fs_enet_private *fep = netdev_priv(dev);
757         unsigned long flags;
758
759         spin_lock_irqsave(&fep->lock, flags);
760
761         if(fep->ops->adjust_link)
762                 fep->ops->adjust_link(dev);
763         else
764                 generic_adjust_link(dev);
765
766         spin_unlock_irqrestore(&fep->lock, flags);
767 }
768
769 static int fs_init_phy(struct net_device *dev)
770 {
771         struct fs_enet_private *fep = netdev_priv(dev);
772         struct phy_device *phydev;
773
774         fep->oldlink = 0;
775         fep->oldspeed = 0;
776         fep->oldduplex = -1;
777         if(fep->fpi->bus_id)
778                 phydev = phy_connect(dev, fep->fpi->bus_id, &fs_adjust_link, 0,
779                                 PHY_INTERFACE_MODE_MII);
780         else {
781                 printk("No phy bus ID specified in BSP code\n");
782                 return -EINVAL;
783         }
784         if (IS_ERR(phydev)) {
785                 printk(KERN_ERR "%s: Could not attach to PHY\n", dev->name);
786                 return PTR_ERR(phydev);
787         }
788
789         fep->phydev = phydev;
790
791         return 0;
792 }
793
794
795 static int fs_enet_open(struct net_device *dev)
796 {
797         struct fs_enet_private *fep = netdev_priv(dev);
798         int r;
799         int err;
800
801         /* Install our interrupt handler. */
802         r = fs_request_irq(dev, fep->interrupt, "fs_enet-mac", fs_enet_interrupt);
803         if (r != 0) {
804                 printk(KERN_ERR DRV_MODULE_NAME
805                        ": %s Could not allocate FS_ENET IRQ!", dev->name);
806                 return -EINVAL;
807         }
808
809         err = fs_init_phy(dev);
810         if(err)
811                 return err;
812
813         phy_start(fep->phydev);
814
815         return 0;
816 }
817
818 static int fs_enet_close(struct net_device *dev)
819 {
820         struct fs_enet_private *fep = netdev_priv(dev);
821         unsigned long flags;
822
823         netif_stop_queue(dev);
824         netif_carrier_off(dev);
825         phy_stop(fep->phydev);
826
827         spin_lock_irqsave(&fep->lock, flags);
828         (*fep->ops->stop)(dev);
829         spin_unlock_irqrestore(&fep->lock, flags);
830
831         /* release any irqs */
832         phy_disconnect(fep->phydev);
833         fep->phydev = NULL;
834         fs_free_irq(dev, fep->interrupt);
835
836         return 0;
837 }
838
839 static struct net_device_stats *fs_enet_get_stats(struct net_device *dev)
840 {
841         struct fs_enet_private *fep = netdev_priv(dev);
842         return &fep->stats;
843 }
844
845 /*************************************************************************/
846
847 static void fs_get_drvinfo(struct net_device *dev,
848                             struct ethtool_drvinfo *info)
849 {
850         strcpy(info->driver, DRV_MODULE_NAME);
851         strcpy(info->version, DRV_MODULE_VERSION);
852 }
853
854 static int fs_get_regs_len(struct net_device *dev)
855 {
856         struct fs_enet_private *fep = netdev_priv(dev);
857
858         return (*fep->ops->get_regs_len)(dev);
859 }
860
861 static void fs_get_regs(struct net_device *dev, struct ethtool_regs *regs,
862                          void *p)
863 {
864         struct fs_enet_private *fep = netdev_priv(dev);
865         unsigned long flags;
866         int r, len;
867
868         len = regs->len;
869
870         spin_lock_irqsave(&fep->lock, flags);
871         r = (*fep->ops->get_regs)(dev, p, &len);
872         spin_unlock_irqrestore(&fep->lock, flags);
873
874         if (r == 0)
875                 regs->version = 0;
876 }
877
878 static int fs_get_settings(struct net_device *dev, struct ethtool_cmd *cmd)
879 {
880         struct fs_enet_private *fep = netdev_priv(dev);
881         return phy_ethtool_gset(fep->phydev, cmd);
882 }
883
884 static int fs_set_settings(struct net_device *dev, struct ethtool_cmd *cmd)
885 {
886         struct fs_enet_private *fep = netdev_priv(dev);
887         phy_ethtool_sset(fep->phydev, cmd);
888         return 0;
889 }
890
891 static int fs_nway_reset(struct net_device *dev)
892 {
893         return 0;
894 }
895
896 static u32 fs_get_msglevel(struct net_device *dev)
897 {
898         struct fs_enet_private *fep = netdev_priv(dev);
899         return fep->msg_enable;
900 }
901
902 static void fs_set_msglevel(struct net_device *dev, u32 value)
903 {
904         struct fs_enet_private *fep = netdev_priv(dev);
905         fep->msg_enable = value;
906 }
907
908 static const struct ethtool_ops fs_ethtool_ops = {
909         .get_drvinfo = fs_get_drvinfo,
910         .get_regs_len = fs_get_regs_len,
911         .get_settings = fs_get_settings,
912         .set_settings = fs_set_settings,
913         .nway_reset = fs_nway_reset,
914         .get_link = ethtool_op_get_link,
915         .get_msglevel = fs_get_msglevel,
916         .set_msglevel = fs_set_msglevel,
917         .get_tx_csum = ethtool_op_get_tx_csum,
918         .set_tx_csum = ethtool_op_set_tx_csum,  /* local! */
919         .get_sg = ethtool_op_get_sg,
920         .set_sg = ethtool_op_set_sg,
921         .get_regs = fs_get_regs,
922 };
923
924 static int fs_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
925 {
926         struct fs_enet_private *fep = netdev_priv(dev);
927         struct mii_ioctl_data *mii = (struct mii_ioctl_data *)&rq->ifr_data;
928         unsigned long flags;
929         int rc;
930
931         if (!netif_running(dev))
932                 return -EINVAL;
933
934         spin_lock_irqsave(&fep->lock, flags);
935         rc = phy_mii_ioctl(fep->phydev, mii, cmd);
936         spin_unlock_irqrestore(&fep->lock, flags);
937         return rc;
938 }
939
940 extern int fs_mii_connect(struct net_device *dev);
941 extern void fs_mii_disconnect(struct net_device *dev);
942
943 static struct net_device *fs_init_instance(struct device *dev,
944                 struct fs_platform_info *fpi)
945 {
946         struct net_device *ndev = NULL;
947         struct fs_enet_private *fep = NULL;
948         int privsize, i, r, err = 0, registered = 0;
949
950         fpi->fs_no = fs_get_id(fpi);
951         /* guard */
952         if ((unsigned int)fpi->fs_no >= FS_MAX_INDEX)
953                 return ERR_PTR(-EINVAL);
954
955         privsize = sizeof(*fep) + (sizeof(struct sk_buff **) *
956                             (fpi->rx_ring + fpi->tx_ring));
957
958         ndev = alloc_etherdev(privsize);
959         if (!ndev) {
960                 err = -ENOMEM;
961                 goto err;
962         }
963         SET_MODULE_OWNER(ndev);
964
965         fep = netdev_priv(ndev);
966         memset(fep, 0, privsize);       /* clear everything */
967
968         fep->dev = dev;
969         dev_set_drvdata(dev, ndev);
970         fep->fpi = fpi;
971         if (fpi->init_ioports)
972                 fpi->init_ioports((struct fs_platform_info *)fpi);
973
974 #ifdef CONFIG_FS_ENET_HAS_FEC
975         if (fs_get_fec_index(fpi->fs_no) >= 0)
976                 fep->ops = &fs_fec_ops;
977 #endif
978
979 #ifdef CONFIG_FS_ENET_HAS_SCC
980         if (fs_get_scc_index(fpi->fs_no) >=0 )
981                 fep->ops = &fs_scc_ops;
982 #endif
983
984 #ifdef CONFIG_FS_ENET_HAS_FCC
985         if (fs_get_fcc_index(fpi->fs_no) >= 0)
986                 fep->ops = &fs_fcc_ops;
987 #endif
988
989         if (fep->ops == NULL) {
990                 printk(KERN_ERR DRV_MODULE_NAME
991                        ": %s No matching ops found (%d).\n",
992                        ndev->name, fpi->fs_no);
993                 err = -EINVAL;
994                 goto err;
995         }
996
997         r = (*fep->ops->setup_data)(ndev);
998         if (r != 0) {
999                 printk(KERN_ERR DRV_MODULE_NAME
1000                        ": %s setup_data failed\n",
1001                         ndev->name);
1002                 err = r;
1003                 goto err;
1004         }
1005
1006         /* point rx_skbuff, tx_skbuff */
1007         fep->rx_skbuff = (struct sk_buff **)&fep[1];
1008         fep->tx_skbuff = fep->rx_skbuff + fpi->rx_ring;
1009
1010         /* init locks */
1011         spin_lock_init(&fep->lock);
1012         spin_lock_init(&fep->tx_lock);
1013
1014         /*
1015          * Set the Ethernet address. 
1016          */
1017         for (i = 0; i < 6; i++)
1018                 ndev->dev_addr[i] = fpi->macaddr[i];
1019         
1020         r = (*fep->ops->allocate_bd)(ndev);
1021         
1022         if (fep->ring_base == NULL) {
1023                 printk(KERN_ERR DRV_MODULE_NAME
1024                        ": %s buffer descriptor alloc failed (%d).\n", ndev->name, r);
1025                 err = r;
1026                 goto err;
1027         }
1028
1029         /*
1030          * Set receive and transmit descriptor base.
1031          */
1032         fep->rx_bd_base = fep->ring_base;
1033         fep->tx_bd_base = fep->rx_bd_base + fpi->rx_ring;
1034
1035         /* initialize ring size variables */
1036         fep->tx_ring = fpi->tx_ring;
1037         fep->rx_ring = fpi->rx_ring;
1038
1039         /*
1040          * The FEC Ethernet specific entries in the device structure. 
1041          */
1042         ndev->open = fs_enet_open;
1043         ndev->hard_start_xmit = fs_enet_start_xmit;
1044         ndev->tx_timeout = fs_timeout;
1045         ndev->watchdog_timeo = 2 * HZ;
1046         ndev->stop = fs_enet_close;
1047         ndev->get_stats = fs_enet_get_stats;
1048         ndev->set_multicast_list = fs_set_multicast_list;
1049         if (fpi->use_napi) {
1050                 ndev->poll = fs_enet_rx_napi;
1051                 ndev->weight = fpi->napi_weight;
1052         }
1053         ndev->ethtool_ops = &fs_ethtool_ops;
1054         ndev->do_ioctl = fs_ioctl;
1055
1056         init_timer(&fep->phy_timer_list);
1057
1058         netif_carrier_off(ndev);
1059
1060         err = register_netdev(ndev);
1061         if (err != 0) {
1062                 printk(KERN_ERR DRV_MODULE_NAME
1063                        ": %s register_netdev failed.\n", ndev->name);
1064                 goto err;
1065         }
1066         registered = 1;
1067
1068
1069         return ndev;
1070
1071       err:
1072         if (ndev != NULL) {
1073
1074                 if (registered)
1075                         unregister_netdev(ndev);
1076
1077                 if (fep != NULL) {
1078                         (*fep->ops->free_bd)(ndev);
1079                         (*fep->ops->cleanup_data)(ndev);
1080                 }
1081
1082                 free_netdev(ndev);
1083         }
1084
1085         dev_set_drvdata(dev, NULL);
1086
1087         return ERR_PTR(err);
1088 }
1089
1090 static int fs_cleanup_instance(struct net_device *ndev)
1091 {
1092         struct fs_enet_private *fep;
1093         const struct fs_platform_info *fpi;
1094         struct device *dev;
1095
1096         if (ndev == NULL)
1097                 return -EINVAL;
1098
1099         fep = netdev_priv(ndev);
1100         if (fep == NULL)
1101                 return -EINVAL;
1102
1103         fpi = fep->fpi;
1104
1105         unregister_netdev(ndev);
1106
1107         dma_free_coherent(fep->dev, (fpi->tx_ring + fpi->rx_ring) * sizeof(cbd_t),
1108                           fep->ring_base, fep->ring_mem_addr);
1109
1110         /* reset it */
1111         (*fep->ops->cleanup_data)(ndev);
1112
1113         dev = fep->dev;
1114         if (dev != NULL) {
1115                 dev_set_drvdata(dev, NULL);
1116                 fep->dev = NULL;
1117         }
1118
1119         free_netdev(ndev);
1120
1121         return 0;
1122 }
1123
1124 /**************************************************************************************/
1125
1126 /* handy pointer to the immap */
1127 void *fs_enet_immap = NULL;
1128
1129 static int setup_immap(void)
1130 {
1131         phys_addr_t paddr = 0;
1132         unsigned long size = 0;
1133
1134 #ifdef CONFIG_CPM1
1135         paddr = IMAP_ADDR;
1136         size = 0x10000; /* map 64K */
1137 #endif
1138
1139 #ifdef CONFIG_CPM2
1140         paddr = CPM_MAP_ADDR;
1141         size = 0x40000; /* map 256 K */
1142 #endif
1143         fs_enet_immap = ioremap(paddr, size);
1144         if (fs_enet_immap == NULL)
1145                 return -EBADF;  /* XXX ahem; maybe just BUG_ON? */
1146
1147         return 0;
1148 }
1149
1150 static void cleanup_immap(void)
1151 {
1152         if (fs_enet_immap != NULL) {
1153                 iounmap(fs_enet_immap);
1154                 fs_enet_immap = NULL;
1155         }
1156 }
1157
1158 /**************************************************************************************/
1159
1160 static int __devinit fs_enet_probe(struct device *dev)
1161 {
1162         struct net_device *ndev;
1163
1164         /* no fixup - no device */
1165         if (dev->platform_data == NULL) {
1166                 printk(KERN_INFO "fs_enet: "
1167                                 "probe called with no platform data; "
1168                                 "remove unused devices\n");
1169                 return -ENODEV;
1170         }
1171
1172         ndev = fs_init_instance(dev, dev->platform_data);
1173         if (IS_ERR(ndev))
1174                 return PTR_ERR(ndev);
1175         return 0;
1176 }
1177
1178 static int fs_enet_remove(struct device *dev)
1179 {
1180         return fs_cleanup_instance(dev_get_drvdata(dev));
1181 }
1182
1183 static struct device_driver fs_enet_fec_driver = {
1184         .name           = "fsl-cpm-fec",
1185         .bus            = &platform_bus_type,
1186         .probe          = fs_enet_probe,
1187         .remove         = fs_enet_remove,
1188 #ifdef CONFIG_PM
1189 /*      .suspend        = fs_enet_suspend,      TODO */
1190 /*      .resume         = fs_enet_resume,       TODO */
1191 #endif
1192 };
1193
1194 static struct device_driver fs_enet_scc_driver = {
1195         .name           = "fsl-cpm-scc",
1196         .bus            = &platform_bus_type,
1197         .probe          = fs_enet_probe,
1198         .remove         = fs_enet_remove,
1199 #ifdef CONFIG_PM
1200 /*      .suspend        = fs_enet_suspend,      TODO */
1201 /*      .resume         = fs_enet_resume,       TODO */
1202 #endif
1203 };
1204
1205 static struct device_driver fs_enet_fcc_driver = {
1206         .name           = "fsl-cpm-fcc",
1207         .bus            = &platform_bus_type,
1208         .probe          = fs_enet_probe,
1209         .remove         = fs_enet_remove,
1210 #ifdef CONFIG_PM
1211 /*      .suspend        = fs_enet_suspend,      TODO */
1212 /*      .resume         = fs_enet_resume,       TODO */
1213 #endif
1214 };
1215
1216 static int __init fs_init(void)
1217 {
1218         int r;
1219
1220         printk(KERN_INFO
1221                         "%s", version);
1222
1223         r = setup_immap();
1224         if (r != 0)
1225                 return r;
1226
1227 #ifdef CONFIG_FS_ENET_HAS_FCC
1228         /* let's insert mii stuff */
1229         r = fs_enet_mdio_bb_init();
1230
1231         if (r != 0) {
1232                 printk(KERN_ERR DRV_MODULE_NAME
1233                         "BB PHY init failed.\n");
1234                 return r;
1235         }
1236         r = driver_register(&fs_enet_fcc_driver);
1237         if (r != 0)
1238                 goto err;
1239 #endif
1240
1241 #ifdef CONFIG_FS_ENET_HAS_FEC
1242         r =  fs_enet_mdio_fec_init();
1243         if (r != 0) {
1244                 printk(KERN_ERR DRV_MODULE_NAME
1245                         "FEC PHY init failed.\n");
1246                 return r;
1247         }
1248
1249         r = driver_register(&fs_enet_fec_driver);
1250         if (r != 0)
1251                 goto err;
1252 #endif
1253
1254 #ifdef CONFIG_FS_ENET_HAS_SCC
1255         r = driver_register(&fs_enet_scc_driver);
1256         if (r != 0)
1257                 goto err;
1258 #endif
1259
1260         return 0;
1261 err:
1262         cleanup_immap();
1263         return r;
1264         
1265 }
1266
1267 static void __exit fs_cleanup(void)
1268 {
1269         driver_unregister(&fs_enet_fec_driver);
1270         driver_unregister(&fs_enet_fcc_driver);
1271         driver_unregister(&fs_enet_scc_driver);
1272         cleanup_immap();
1273 }
1274
1275 /**************************************************************************************/
1276
1277 module_init(fs_init);
1278 module_exit(fs_cleanup);