Merge branch 'for-linus' of git://www.atmel.no/~hskinnemoen/linux/kernel/avr32
[pandora-kernel.git] / drivers / net / macb.c
1 /*
2  * Atmel MACB Ethernet Controller driver
3  *
4  * Copyright (C) 2004-2006 Atmel Corporation
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 as
8  * published by the Free Software Foundation.
9  */
10
11 #include <linux/clk.h>
12 #include <linux/module.h>
13 #include <linux/moduleparam.h>
14 #include <linux/kernel.h>
15 #include <linux/types.h>
16 #include <linux/slab.h>
17 #include <linux/init.h>
18 #include <linux/netdevice.h>
19 #include <linux/etherdevice.h>
20 #include <linux/mii.h>
21 #include <linux/mutex.h>
22 #include <linux/dma-mapping.h>
23 #include <linux/ethtool.h>
24 #include <linux/platform_device.h>
25
26 #include <asm/arch/board.h>
27
28 #include "macb.h"
29
30 #define to_net_dev(class) container_of(class, struct net_device, class_dev)
31
32 #define RX_BUFFER_SIZE          128
33 #define RX_RING_SIZE            512
34 #define RX_RING_BYTES           (sizeof(struct dma_desc) * RX_RING_SIZE)
35
36 /* Make the IP header word-aligned (the ethernet header is 14 bytes) */
37 #define RX_OFFSET               2
38
39 #define TX_RING_SIZE            128
40 #define DEF_TX_RING_PENDING     (TX_RING_SIZE - 1)
41 #define TX_RING_BYTES           (sizeof(struct dma_desc) * TX_RING_SIZE)
42
43 #define TX_RING_GAP(bp)                                         \
44         (TX_RING_SIZE - (bp)->tx_pending)
45 #define TX_BUFFS_AVAIL(bp)                                      \
46         (((bp)->tx_tail <= (bp)->tx_head) ?                     \
47          (bp)->tx_tail + (bp)->tx_pending - (bp)->tx_head :     \
48          (bp)->tx_tail - (bp)->tx_head - TX_RING_GAP(bp))
49 #define NEXT_TX(n)              (((n) + 1) & (TX_RING_SIZE - 1))
50
51 #define NEXT_RX(n)              (((n) + 1) & (RX_RING_SIZE - 1))
52
53 /* minimum number of free TX descriptors before waking up TX process */
54 #define MACB_TX_WAKEUP_THRESH   (TX_RING_SIZE / 4)
55
56 #define MACB_RX_INT_FLAGS       (MACB_BIT(RCOMP) | MACB_BIT(RXUBR)      \
57                                  | MACB_BIT(ISR_ROVR))
58
59 static void __macb_set_hwaddr(struct macb *bp)
60 {
61         u32 bottom;
62         u16 top;
63
64         bottom = cpu_to_le32(*((u32 *)bp->dev->dev_addr));
65         macb_writel(bp, SA1B, bottom);
66         top = cpu_to_le16(*((u16 *)(bp->dev->dev_addr + 4)));
67         macb_writel(bp, SA1T, top);
68 }
69
70 static void __init macb_get_hwaddr(struct macb *bp)
71 {
72         u32 bottom;
73         u16 top;
74         u8 addr[6];
75
76         bottom = macb_readl(bp, SA1B);
77         top = macb_readl(bp, SA1T);
78
79         addr[0] = bottom & 0xff;
80         addr[1] = (bottom >> 8) & 0xff;
81         addr[2] = (bottom >> 16) & 0xff;
82         addr[3] = (bottom >> 24) & 0xff;
83         addr[4] = top & 0xff;
84         addr[5] = (top >> 8) & 0xff;
85
86         if (is_valid_ether_addr(addr))
87                 memcpy(bp->dev->dev_addr, addr, sizeof(addr));
88 }
89
90 static void macb_enable_mdio(struct macb *bp)
91 {
92         unsigned long flags;
93         u32 reg;
94
95         spin_lock_irqsave(&bp->lock, flags);
96         reg = macb_readl(bp, NCR);
97         reg |= MACB_BIT(MPE);
98         macb_writel(bp, NCR, reg);
99         macb_writel(bp, IER, MACB_BIT(MFD));
100         spin_unlock_irqrestore(&bp->lock, flags);
101 }
102
103 static void macb_disable_mdio(struct macb *bp)
104 {
105         unsigned long flags;
106         u32 reg;
107
108         spin_lock_irqsave(&bp->lock, flags);
109         reg = macb_readl(bp, NCR);
110         reg &= ~MACB_BIT(MPE);
111         macb_writel(bp, NCR, reg);
112         macb_writel(bp, IDR, MACB_BIT(MFD));
113         spin_unlock_irqrestore(&bp->lock, flags);
114 }
115
116 static int macb_mdio_read(struct net_device *dev, int phy_id, int location)
117 {
118         struct macb *bp = netdev_priv(dev);
119         int value;
120
121         mutex_lock(&bp->mdio_mutex);
122
123         macb_enable_mdio(bp);
124         macb_writel(bp, MAN, (MACB_BF(SOF, MACB_MAN_SOF)
125                               | MACB_BF(RW, MACB_MAN_READ)
126                               | MACB_BF(PHYA, phy_id)
127                               | MACB_BF(REGA, location)
128                               | MACB_BF(CODE, MACB_MAN_CODE)));
129
130         wait_for_completion(&bp->mdio_complete);
131
132         value = MACB_BFEXT(DATA, macb_readl(bp, MAN));
133         macb_disable_mdio(bp);
134         mutex_unlock(&bp->mdio_mutex);
135
136         return value;
137 }
138
139 static void macb_mdio_write(struct net_device *dev, int phy_id,
140                             int location, int val)
141 {
142         struct macb *bp = netdev_priv(dev);
143
144         dev_dbg(&bp->pdev->dev, "mdio_write %02x:%02x <- %04x\n",
145                 phy_id, location, val);
146
147         mutex_lock(&bp->mdio_mutex);
148         macb_enable_mdio(bp);
149
150         macb_writel(bp, MAN, (MACB_BF(SOF, MACB_MAN_SOF)
151                               | MACB_BF(RW, MACB_MAN_WRITE)
152                               | MACB_BF(PHYA, phy_id)
153                               | MACB_BF(REGA, location)
154                               | MACB_BF(CODE, MACB_MAN_CODE)
155                               | MACB_BF(DATA, val)));
156
157         wait_for_completion(&bp->mdio_complete);
158
159         macb_disable_mdio(bp);
160         mutex_unlock(&bp->mdio_mutex);
161 }
162
163 static int macb_phy_probe(struct macb *bp)
164 {
165         int phy_address;
166         u16 phyid1, phyid2;
167
168         for (phy_address = 0; phy_address < 32; phy_address++) {
169                 phyid1 = macb_mdio_read(bp->dev, phy_address, MII_PHYSID1);
170                 phyid2 = macb_mdio_read(bp->dev, phy_address, MII_PHYSID2);
171
172                 if (phyid1 != 0xffff && phyid1 != 0x0000
173                     && phyid2 != 0xffff && phyid2 != 0x0000)
174                         break;
175         }
176
177         if (phy_address == 32)
178                 return -ENODEV;
179
180         dev_info(&bp->pdev->dev,
181                  "detected PHY at address %d (ID %04x:%04x)\n",
182                  phy_address, phyid1, phyid2);
183
184         bp->mii.phy_id = phy_address;
185         return 0;
186 }
187
188 static void macb_set_media(struct macb *bp, int media)
189 {
190         u32 reg;
191
192         spin_lock_irq(&bp->lock);
193         reg = macb_readl(bp, NCFGR);
194         reg &= ~(MACB_BIT(SPD) | MACB_BIT(FD));
195         if (media & (ADVERTISE_100HALF | ADVERTISE_100FULL))
196                 reg |= MACB_BIT(SPD);
197         if (media & ADVERTISE_FULL)
198                 reg |= MACB_BIT(FD);
199         macb_writel(bp, NCFGR, reg);
200         spin_unlock_irq(&bp->lock);
201 }
202
203 static void macb_check_media(struct macb *bp, int ok_to_print, int init_media)
204 {
205         struct mii_if_info *mii = &bp->mii;
206         unsigned int old_carrier, new_carrier;
207         int advertise, lpa, media, duplex;
208
209         /* if forced media, go no further */
210         if (mii->force_media)
211                 return;
212
213         /* check current and old link status */
214         old_carrier = netif_carrier_ok(mii->dev) ? 1 : 0;
215         new_carrier = (unsigned int) mii_link_ok(mii);
216
217         /* if carrier state did not change, assume nothing else did */
218         if (!init_media && old_carrier == new_carrier)
219                 return;
220
221         /* no carrier, nothing much to do */
222         if (!new_carrier) {
223                 netif_carrier_off(mii->dev);
224                 printk(KERN_INFO "%s: link down\n", mii->dev->name);
225                 return;
226         }
227
228         /*
229          * we have carrier, see who's on the other end
230          */
231         netif_carrier_on(mii->dev);
232
233         /* get MII advertise and LPA values */
234         if (!init_media && mii->advertising) {
235                 advertise = mii->advertising;
236         } else {
237                 advertise = mii->mdio_read(mii->dev, mii->phy_id, MII_ADVERTISE);
238                 mii->advertising = advertise;
239         }
240         lpa = mii->mdio_read(mii->dev, mii->phy_id, MII_LPA);
241
242         /* figure out media and duplex from advertise and LPA values */
243         media = mii_nway_result(lpa & advertise);
244         duplex = (media & ADVERTISE_FULL) ? 1 : 0;
245
246         if (ok_to_print)
247                 printk(KERN_INFO "%s: link up, %sMbps, %s-duplex, lpa 0x%04X\n",
248                        mii->dev->name,
249                        media & (ADVERTISE_100FULL | ADVERTISE_100HALF) ? "100" : "10",
250                        duplex ? "full" : "half", lpa);
251
252         mii->full_duplex = duplex;
253
254         /* Let the MAC know about the new link state */
255         macb_set_media(bp, media);
256 }
257
258 static void macb_update_stats(struct macb *bp)
259 {
260         u32 __iomem *reg = bp->regs + MACB_PFR;
261         u32 *p = &bp->hw_stats.rx_pause_frames;
262         u32 *end = &bp->hw_stats.tx_pause_frames + 1;
263
264         WARN_ON((unsigned long)(end - p - 1) != (MACB_TPF - MACB_PFR) / 4);
265
266         for(; p < end; p++, reg++)
267                 *p += __raw_readl(reg);
268 }
269
270 static void macb_periodic_task(struct work_struct *work)
271 {
272         struct macb *bp = container_of(work, struct macb, periodic_task.work);
273
274         macb_update_stats(bp);
275         macb_check_media(bp, 1, 0);
276
277         schedule_delayed_work(&bp->periodic_task, HZ);
278 }
279
280 static void macb_tx(struct macb *bp)
281 {
282         unsigned int tail;
283         unsigned int head;
284         u32 status;
285
286         status = macb_readl(bp, TSR);
287         macb_writel(bp, TSR, status);
288
289         dev_dbg(&bp->pdev->dev, "macb_tx status = %02lx\n",
290                 (unsigned long)status);
291
292         if (status & MACB_BIT(UND)) {
293                 printk(KERN_ERR "%s: TX underrun, resetting buffers\n",
294                        bp->dev->name);
295                 bp->tx_head = bp->tx_tail = 0;
296         }
297
298         if (!(status & MACB_BIT(COMP)))
299                 /*
300                  * This may happen when a buffer becomes complete
301                  * between reading the ISR and scanning the
302                  * descriptors.  Nothing to worry about.
303                  */
304                 return;
305
306         head = bp->tx_head;
307         for (tail = bp->tx_tail; tail != head; tail = NEXT_TX(tail)) {
308                 struct ring_info *rp = &bp->tx_skb[tail];
309                 struct sk_buff *skb = rp->skb;
310                 u32 bufstat;
311
312                 BUG_ON(skb == NULL);
313
314                 rmb();
315                 bufstat = bp->tx_ring[tail].ctrl;
316
317                 if (!(bufstat & MACB_BIT(TX_USED)))
318                         break;
319
320                 dev_dbg(&bp->pdev->dev, "skb %u (data %p) TX complete\n",
321                         tail, skb->data);
322                 dma_unmap_single(&bp->pdev->dev, rp->mapping, skb->len,
323                                  DMA_TO_DEVICE);
324                 bp->stats.tx_packets++;
325                 bp->stats.tx_bytes += skb->len;
326                 rp->skb = NULL;
327                 dev_kfree_skb_irq(skb);
328         }
329
330         bp->tx_tail = tail;
331         if (netif_queue_stopped(bp->dev) &&
332             TX_BUFFS_AVAIL(bp) > MACB_TX_WAKEUP_THRESH)
333                 netif_wake_queue(bp->dev);
334 }
335
336 static int macb_rx_frame(struct macb *bp, unsigned int first_frag,
337                          unsigned int last_frag)
338 {
339         unsigned int len;
340         unsigned int frag;
341         unsigned int offset = 0;
342         struct sk_buff *skb;
343
344         len = MACB_BFEXT(RX_FRMLEN, bp->rx_ring[last_frag].ctrl);
345
346         dev_dbg(&bp->pdev->dev, "macb_rx_frame frags %u - %u (len %u)\n",
347                 first_frag, last_frag, len);
348
349         skb = dev_alloc_skb(len + RX_OFFSET);
350         if (!skb) {
351                 bp->stats.rx_dropped++;
352                 for (frag = first_frag; ; frag = NEXT_RX(frag)) {
353                         bp->rx_ring[frag].addr &= ~MACB_BIT(RX_USED);
354                         if (frag == last_frag)
355                                 break;
356                 }
357                 wmb();
358                 return 1;
359         }
360
361         skb_reserve(skb, RX_OFFSET);
362         skb->dev = bp->dev;
363         skb->ip_summed = CHECKSUM_NONE;
364         skb_put(skb, len);
365
366         for (frag = first_frag; ; frag = NEXT_RX(frag)) {
367                 unsigned int frag_len = RX_BUFFER_SIZE;
368
369                 if (offset + frag_len > len) {
370                         BUG_ON(frag != last_frag);
371                         frag_len = len - offset;
372                 }
373                 memcpy(skb->data + offset,
374                        bp->rx_buffers + (RX_BUFFER_SIZE * frag),
375                        frag_len);
376                 offset += RX_BUFFER_SIZE;
377                 bp->rx_ring[frag].addr &= ~MACB_BIT(RX_USED);
378                 wmb();
379
380                 if (frag == last_frag)
381                         break;
382         }
383
384         skb->protocol = eth_type_trans(skb, bp->dev);
385
386         bp->stats.rx_packets++;
387         bp->stats.rx_bytes += len;
388         bp->dev->last_rx = jiffies;
389         dev_dbg(&bp->pdev->dev, "received skb of length %u, csum: %08x\n",
390                 skb->len, skb->csum);
391         netif_receive_skb(skb);
392
393         return 0;
394 }
395
396 /* Mark DMA descriptors from begin up to and not including end as unused */
397 static void discard_partial_frame(struct macb *bp, unsigned int begin,
398                                   unsigned int end)
399 {
400         unsigned int frag;
401
402         for (frag = begin; frag != end; frag = NEXT_RX(frag))
403                 bp->rx_ring[frag].addr &= ~MACB_BIT(RX_USED);
404         wmb();
405
406         /*
407          * When this happens, the hardware stats registers for
408          * whatever caused this is updated, so we don't have to record
409          * anything.
410          */
411 }
412
413 static int macb_rx(struct macb *bp, int budget)
414 {
415         int received = 0;
416         unsigned int tail = bp->rx_tail;
417         int first_frag = -1;
418
419         for (; budget > 0; tail = NEXT_RX(tail)) {
420                 u32 addr, ctrl;
421
422                 rmb();
423                 addr = bp->rx_ring[tail].addr;
424                 ctrl = bp->rx_ring[tail].ctrl;
425
426                 if (!(addr & MACB_BIT(RX_USED)))
427                         break;
428
429                 if (ctrl & MACB_BIT(RX_SOF)) {
430                         if (first_frag != -1)
431                                 discard_partial_frame(bp, first_frag, tail);
432                         first_frag = tail;
433                 }
434
435                 if (ctrl & MACB_BIT(RX_EOF)) {
436                         int dropped;
437                         BUG_ON(first_frag == -1);
438
439                         dropped = macb_rx_frame(bp, first_frag, tail);
440                         first_frag = -1;
441                         if (!dropped) {
442                                 received++;
443                                 budget--;
444                         }
445                 }
446         }
447
448         if (first_frag != -1)
449                 bp->rx_tail = first_frag;
450         else
451                 bp->rx_tail = tail;
452
453         return received;
454 }
455
456 static int macb_poll(struct net_device *dev, int *budget)
457 {
458         struct macb *bp = netdev_priv(dev);
459         int orig_budget, work_done, retval = 0;
460         u32 status;
461
462         status = macb_readl(bp, RSR);
463         macb_writel(bp, RSR, status);
464
465         if (!status) {
466                 /*
467                  * This may happen if an interrupt was pending before
468                  * this function was called last time, and no packets
469                  * have been received since.
470                  */
471                 netif_rx_complete(dev);
472                 goto out;
473         }
474
475         dev_dbg(&bp->pdev->dev, "poll: status = %08lx, budget = %d\n",
476                 (unsigned long)status, *budget);
477
478         if (!(status & MACB_BIT(REC))) {
479                 dev_warn(&bp->pdev->dev,
480                          "No RX buffers complete, status = %02lx\n",
481                          (unsigned long)status);
482                 netif_rx_complete(dev);
483                 goto out;
484         }
485
486         orig_budget = *budget;
487         if (orig_budget > dev->quota)
488                 orig_budget = dev->quota;
489
490         work_done = macb_rx(bp, orig_budget);
491         if (work_done < orig_budget) {
492                 netif_rx_complete(dev);
493                 retval = 0;
494         } else {
495                 retval = 1;
496         }
497
498         /*
499          * We've done what we can to clean the buffers. Make sure we
500          * get notified when new packets arrive.
501          */
502 out:
503         macb_writel(bp, IER, MACB_RX_INT_FLAGS);
504
505         /* TODO: Handle errors */
506
507         return retval;
508 }
509
510 static irqreturn_t macb_interrupt(int irq, void *dev_id)
511 {
512         struct net_device *dev = dev_id;
513         struct macb *bp = netdev_priv(dev);
514         u32 status;
515
516         status = macb_readl(bp, ISR);
517
518         if (unlikely(!status))
519                 return IRQ_NONE;
520
521         spin_lock(&bp->lock);
522
523         while (status) {
524                 if (status & MACB_BIT(MFD))
525                         complete(&bp->mdio_complete);
526
527                 /* close possible race with dev_close */
528                 if (unlikely(!netif_running(dev))) {
529                         macb_writel(bp, IDR, ~0UL);
530                         break;
531                 }
532
533                 if (status & MACB_RX_INT_FLAGS) {
534                         if (netif_rx_schedule_prep(dev)) {
535                                 /*
536                                  * There's no point taking any more interrupts
537                                  * until we have processed the buffers
538                                  */
539                                 macb_writel(bp, IDR, MACB_RX_INT_FLAGS);
540                                 dev_dbg(&bp->pdev->dev, "scheduling RX softirq\n");
541                                 __netif_rx_schedule(dev);
542                         }
543                 }
544
545                 if (status & (MACB_BIT(TCOMP) | MACB_BIT(ISR_TUND)))
546                         macb_tx(bp);
547
548                 /*
549                  * Link change detection isn't possible with RMII, so we'll
550                  * add that if/when we get our hands on a full-blown MII PHY.
551                  */
552
553                 if (status & MACB_BIT(HRESP)) {
554                         /*
555                          * TODO: Reset the hardware, and maybe move the printk
556                          * to a lower-priority context as well (work queue?)
557                          */
558                         printk(KERN_ERR "%s: DMA bus error: HRESP not OK\n",
559                                dev->name);
560                 }
561
562                 status = macb_readl(bp, ISR);
563         }
564
565         spin_unlock(&bp->lock);
566
567         return IRQ_HANDLED;
568 }
569
570 static int macb_start_xmit(struct sk_buff *skb, struct net_device *dev)
571 {
572         struct macb *bp = netdev_priv(dev);
573         dma_addr_t mapping;
574         unsigned int len, entry;
575         u32 ctrl;
576
577 #ifdef DEBUG
578         int i;
579         dev_dbg(&bp->pdev->dev,
580                 "start_xmit: len %u head %p data %p tail %p end %p\n",
581                 skb->len, skb->head, skb->data, skb->tail, skb->end);
582         dev_dbg(&bp->pdev->dev,
583                 "data:");
584         for (i = 0; i < 16; i++)
585                 printk(" %02x", (unsigned int)skb->data[i]);
586         printk("\n");
587 #endif
588
589         len = skb->len;
590         spin_lock_irq(&bp->lock);
591
592         /* This is a hard error, log it. */
593         if (TX_BUFFS_AVAIL(bp) < 1) {
594                 netif_stop_queue(dev);
595                 spin_unlock_irq(&bp->lock);
596                 dev_err(&bp->pdev->dev,
597                         "BUG! Tx Ring full when queue awake!\n");
598                 dev_dbg(&bp->pdev->dev, "tx_head = %u, tx_tail = %u\n",
599                         bp->tx_head, bp->tx_tail);
600                 return 1;
601         }
602
603         entry = bp->tx_head;
604         dev_dbg(&bp->pdev->dev, "Allocated ring entry %u\n", entry);
605         mapping = dma_map_single(&bp->pdev->dev, skb->data,
606                                  len, DMA_TO_DEVICE);
607         bp->tx_skb[entry].skb = skb;
608         bp->tx_skb[entry].mapping = mapping;
609         dev_dbg(&bp->pdev->dev, "Mapped skb data %p to DMA addr %08lx\n",
610                 skb->data, (unsigned long)mapping);
611
612         ctrl = MACB_BF(TX_FRMLEN, len);
613         ctrl |= MACB_BIT(TX_LAST);
614         if (entry == (TX_RING_SIZE - 1))
615                 ctrl |= MACB_BIT(TX_WRAP);
616
617         bp->tx_ring[entry].addr = mapping;
618         bp->tx_ring[entry].ctrl = ctrl;
619         wmb();
620
621         entry = NEXT_TX(entry);
622         bp->tx_head = entry;
623
624         macb_writel(bp, NCR, macb_readl(bp, NCR) | MACB_BIT(TSTART));
625
626         if (TX_BUFFS_AVAIL(bp) < 1)
627                 netif_stop_queue(dev);
628
629         spin_unlock_irq(&bp->lock);
630
631         dev->trans_start = jiffies;
632
633         return 0;
634 }
635
636 static void macb_free_consistent(struct macb *bp)
637 {
638         if (bp->tx_skb) {
639                 kfree(bp->tx_skb);
640                 bp->tx_skb = NULL;
641         }
642         if (bp->rx_ring) {
643                 dma_free_coherent(&bp->pdev->dev, RX_RING_BYTES,
644                                   bp->rx_ring, bp->rx_ring_dma);
645                 bp->rx_ring = NULL;
646         }
647         if (bp->tx_ring) {
648                 dma_free_coherent(&bp->pdev->dev, TX_RING_BYTES,
649                                   bp->tx_ring, bp->tx_ring_dma);
650                 bp->tx_ring = NULL;
651         }
652         if (bp->rx_buffers) {
653                 dma_free_coherent(&bp->pdev->dev,
654                                   RX_RING_SIZE * RX_BUFFER_SIZE,
655                                   bp->rx_buffers, bp->rx_buffers_dma);
656                 bp->rx_buffers = NULL;
657         }
658 }
659
660 static int macb_alloc_consistent(struct macb *bp)
661 {
662         int size;
663
664         size = TX_RING_SIZE * sizeof(struct ring_info);
665         bp->tx_skb = kmalloc(size, GFP_KERNEL);
666         if (!bp->tx_skb)
667                 goto out_err;
668
669         size = RX_RING_BYTES;
670         bp->rx_ring = dma_alloc_coherent(&bp->pdev->dev, size,
671                                          &bp->rx_ring_dma, GFP_KERNEL);
672         if (!bp->rx_ring)
673                 goto out_err;
674         dev_dbg(&bp->pdev->dev,
675                 "Allocated RX ring of %d bytes at %08lx (mapped %p)\n",
676                 size, (unsigned long)bp->rx_ring_dma, bp->rx_ring);
677
678         size = TX_RING_BYTES;
679         bp->tx_ring = dma_alloc_coherent(&bp->pdev->dev, size,
680                                          &bp->tx_ring_dma, GFP_KERNEL);
681         if (!bp->tx_ring)
682                 goto out_err;
683         dev_dbg(&bp->pdev->dev,
684                 "Allocated TX ring of %d bytes at %08lx (mapped %p)\n",
685                 size, (unsigned long)bp->tx_ring_dma, bp->tx_ring);
686
687         size = RX_RING_SIZE * RX_BUFFER_SIZE;
688         bp->rx_buffers = dma_alloc_coherent(&bp->pdev->dev, size,
689                                             &bp->rx_buffers_dma, GFP_KERNEL);
690         if (!bp->rx_buffers)
691                 goto out_err;
692         dev_dbg(&bp->pdev->dev,
693                 "Allocated RX buffers of %d bytes at %08lx (mapped %p)\n",
694                 size, (unsigned long)bp->rx_buffers_dma, bp->rx_buffers);
695
696         return 0;
697
698 out_err:
699         macb_free_consistent(bp);
700         return -ENOMEM;
701 }
702
703 static void macb_init_rings(struct macb *bp)
704 {
705         int i;
706         dma_addr_t addr;
707
708         addr = bp->rx_buffers_dma;
709         for (i = 0; i < RX_RING_SIZE; i++) {
710                 bp->rx_ring[i].addr = addr;
711                 bp->rx_ring[i].ctrl = 0;
712                 addr += RX_BUFFER_SIZE;
713         }
714         bp->rx_ring[RX_RING_SIZE - 1].addr |= MACB_BIT(RX_WRAP);
715
716         for (i = 0; i < TX_RING_SIZE; i++) {
717                 bp->tx_ring[i].addr = 0;
718                 bp->tx_ring[i].ctrl = MACB_BIT(TX_USED);
719         }
720         bp->tx_ring[TX_RING_SIZE - 1].ctrl |= MACB_BIT(TX_WRAP);
721
722         bp->rx_tail = bp->tx_head = bp->tx_tail = 0;
723 }
724
725 static void macb_reset_hw(struct macb *bp)
726 {
727         /* Make sure we have the write buffer for ourselves */
728         wmb();
729
730         /*
731          * Disable RX and TX (XXX: Should we halt the transmission
732          * more gracefully?)
733          */
734         macb_writel(bp, NCR, 0);
735
736         /* Clear the stats registers (XXX: Update stats first?) */
737         macb_writel(bp, NCR, MACB_BIT(CLRSTAT));
738
739         /* Clear all status flags */
740         macb_writel(bp, TSR, ~0UL);
741         macb_writel(bp, RSR, ~0UL);
742
743         /* Disable all interrupts */
744         macb_writel(bp, IDR, ~0UL);
745         macb_readl(bp, ISR);
746 }
747
748 static void macb_init_hw(struct macb *bp)
749 {
750         u32 config;
751
752         macb_reset_hw(bp);
753         __macb_set_hwaddr(bp);
754
755         config = macb_readl(bp, NCFGR) & MACB_BF(CLK, -1L);
756         config |= MACB_BIT(PAE);                /* PAuse Enable */
757         config |= MACB_BIT(DRFCS);              /* Discard Rx FCS */
758         if (bp->dev->flags & IFF_PROMISC)
759                 config |= MACB_BIT(CAF);        /* Copy All Frames */
760         if (!(bp->dev->flags & IFF_BROADCAST))
761                 config |= MACB_BIT(NBC);        /* No BroadCast */
762         macb_writel(bp, NCFGR, config);
763
764         /* Initialize TX and RX buffers */
765         macb_writel(bp, RBQP, bp->rx_ring_dma);
766         macb_writel(bp, TBQP, bp->tx_ring_dma);
767
768         /* Enable TX and RX */
769         macb_writel(bp, NCR, MACB_BIT(RE) | MACB_BIT(TE));
770
771         /* Enable interrupts */
772         macb_writel(bp, IER, (MACB_BIT(RCOMP)
773                               | MACB_BIT(RXUBR)
774                               | MACB_BIT(ISR_TUND)
775                               | MACB_BIT(ISR_RLE)
776                               | MACB_BIT(TXERR)
777                               | MACB_BIT(TCOMP)
778                               | MACB_BIT(ISR_ROVR)
779                               | MACB_BIT(HRESP)));
780 }
781
782 static void macb_init_phy(struct net_device *dev)
783 {
784         struct macb *bp = netdev_priv(dev);
785
786         /* Set some reasonable default settings */
787         macb_mdio_write(dev, bp->mii.phy_id, MII_ADVERTISE,
788                         ADVERTISE_CSMA | ADVERTISE_ALL);
789         macb_mdio_write(dev, bp->mii.phy_id, MII_BMCR,
790                         (BMCR_SPEED100 | BMCR_ANENABLE
791                          | BMCR_ANRESTART | BMCR_FULLDPLX));
792 }
793
794 static int macb_open(struct net_device *dev)
795 {
796         struct macb *bp = netdev_priv(dev);
797         int err;
798
799         dev_dbg(&bp->pdev->dev, "open\n");
800
801         if (!is_valid_ether_addr(dev->dev_addr))
802                 return -EADDRNOTAVAIL;
803
804         err = macb_alloc_consistent(bp);
805         if (err) {
806                 printk(KERN_ERR
807                        "%s: Unable to allocate DMA memory (error %d)\n",
808                        dev->name, err);
809                 return err;
810         }
811
812         macb_init_rings(bp);
813         macb_init_hw(bp);
814         macb_init_phy(dev);
815
816         macb_check_media(bp, 1, 1);
817         netif_start_queue(dev);
818
819         schedule_delayed_work(&bp->periodic_task, HZ);
820
821         return 0;
822 }
823
824 static int macb_close(struct net_device *dev)
825 {
826         struct macb *bp = netdev_priv(dev);
827         unsigned long flags;
828
829         cancel_rearming_delayed_work(&bp->periodic_task);
830
831         netif_stop_queue(dev);
832
833         spin_lock_irqsave(&bp->lock, flags);
834         macb_reset_hw(bp);
835         netif_carrier_off(dev);
836         spin_unlock_irqrestore(&bp->lock, flags);
837
838         macb_free_consistent(bp);
839
840         return 0;
841 }
842
843 static struct net_device_stats *macb_get_stats(struct net_device *dev)
844 {
845         struct macb *bp = netdev_priv(dev);
846         struct net_device_stats *nstat = &bp->stats;
847         struct macb_stats *hwstat = &bp->hw_stats;
848
849         /* Convert HW stats into netdevice stats */
850         nstat->rx_errors = (hwstat->rx_fcs_errors +
851                             hwstat->rx_align_errors +
852                             hwstat->rx_resource_errors +
853                             hwstat->rx_overruns +
854                             hwstat->rx_oversize_pkts +
855                             hwstat->rx_jabbers +
856                             hwstat->rx_undersize_pkts +
857                             hwstat->sqe_test_errors +
858                             hwstat->rx_length_mismatch);
859         nstat->tx_errors = (hwstat->tx_late_cols +
860                             hwstat->tx_excessive_cols +
861                             hwstat->tx_underruns +
862                             hwstat->tx_carrier_errors);
863         nstat->collisions = (hwstat->tx_single_cols +
864                              hwstat->tx_multiple_cols +
865                              hwstat->tx_excessive_cols);
866         nstat->rx_length_errors = (hwstat->rx_oversize_pkts +
867                                    hwstat->rx_jabbers +
868                                    hwstat->rx_undersize_pkts +
869                                    hwstat->rx_length_mismatch);
870         nstat->rx_over_errors = hwstat->rx_resource_errors;
871         nstat->rx_crc_errors = hwstat->rx_fcs_errors;
872         nstat->rx_frame_errors = hwstat->rx_align_errors;
873         nstat->rx_fifo_errors = hwstat->rx_overruns;
874         /* XXX: What does "missed" mean? */
875         nstat->tx_aborted_errors = hwstat->tx_excessive_cols;
876         nstat->tx_carrier_errors = hwstat->tx_carrier_errors;
877         nstat->tx_fifo_errors = hwstat->tx_underruns;
878         /* Don't know about heartbeat or window errors... */
879
880         return nstat;
881 }
882
883 static int macb_get_settings(struct net_device *dev, struct ethtool_cmd *cmd)
884 {
885         struct macb *bp = netdev_priv(dev);
886         int ret;
887         unsigned long flags;
888
889         spin_lock_irqsave(&bp->lock, flags);
890         ret = mii_ethtool_gset(&bp->mii, cmd);
891         spin_unlock_irqrestore(&bp->lock, flags);
892
893         return ret;
894 }
895
896 static int macb_set_settings(struct net_device *dev, struct ethtool_cmd *cmd)
897 {
898         struct macb *bp = netdev_priv(dev);
899         int ret;
900         unsigned long flags;
901
902         spin_lock_irqsave(&bp->lock, flags);
903         ret = mii_ethtool_sset(&bp->mii, cmd);
904         spin_unlock_irqrestore(&bp->lock, flags);
905
906         return ret;
907 }
908
909 static void macb_get_drvinfo(struct net_device *dev, struct ethtool_drvinfo *info)
910 {
911         struct macb *bp = netdev_priv(dev);
912
913         strcpy(info->driver, bp->pdev->dev.driver->name);
914         strcpy(info->version, "$Revision: 1.14 $");
915         strcpy(info->bus_info, bp->pdev->dev.bus_id);
916 }
917
918 static int macb_nway_reset(struct net_device *dev)
919 {
920         struct macb *bp = netdev_priv(dev);
921         return mii_nway_restart(&bp->mii);
922 }
923
924 static struct ethtool_ops macb_ethtool_ops = {
925         .get_settings           = macb_get_settings,
926         .set_settings           = macb_set_settings,
927         .get_drvinfo            = macb_get_drvinfo,
928         .nway_reset             = macb_nway_reset,
929         .get_link               = ethtool_op_get_link,
930 };
931
932 static int macb_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
933 {
934         struct macb *bp = netdev_priv(dev);
935         int ret;
936         unsigned long flags;
937
938         if (!netif_running(dev))
939                 return -EINVAL;
940
941         spin_lock_irqsave(&bp->lock, flags);
942         ret = generic_mii_ioctl(&bp->mii, if_mii(rq), cmd, NULL);
943         spin_unlock_irqrestore(&bp->lock, flags);
944
945         return ret;
946 }
947
948 static ssize_t macb_mii_show(const struct class_device *cd, char *buf,
949                         unsigned long addr)
950 {
951         struct net_device *dev = to_net_dev(cd);
952         struct macb *bp = netdev_priv(dev);
953         ssize_t ret = -EINVAL;
954
955         if (netif_running(dev)) {
956                 int value;
957                 value = macb_mdio_read(dev, bp->mii.phy_id, addr);
958                 ret = sprintf(buf, "0x%04x\n", (uint16_t)value);
959         }
960
961         return ret;
962 }
963
964 #define MII_ENTRY(name, addr)                                   \
965 static ssize_t show_##name(struct class_device *cd, char *buf)  \
966 {                                                               \
967         return macb_mii_show(cd, buf, addr);                    \
968 }                                                               \
969 static CLASS_DEVICE_ATTR(name, S_IRUGO, show_##name, NULL)
970
971 MII_ENTRY(bmcr, MII_BMCR);
972 MII_ENTRY(bmsr, MII_BMSR);
973 MII_ENTRY(physid1, MII_PHYSID1);
974 MII_ENTRY(physid2, MII_PHYSID2);
975 MII_ENTRY(advertise, MII_ADVERTISE);
976 MII_ENTRY(lpa, MII_LPA);
977 MII_ENTRY(expansion, MII_EXPANSION);
978
979 static struct attribute *macb_mii_attrs[] = {
980         &class_device_attr_bmcr.attr,
981         &class_device_attr_bmsr.attr,
982         &class_device_attr_physid1.attr,
983         &class_device_attr_physid2.attr,
984         &class_device_attr_advertise.attr,
985         &class_device_attr_lpa.attr,
986         &class_device_attr_expansion.attr,
987         NULL,
988 };
989
990 static struct attribute_group macb_mii_group = {
991         .name   = "mii",
992         .attrs  = macb_mii_attrs,
993 };
994
995 static void macb_unregister_sysfs(struct net_device *net)
996 {
997         struct class_device *class_dev = &net->class_dev;
998
999         sysfs_remove_group(&class_dev->kobj, &macb_mii_group);
1000 }
1001
1002 static int macb_register_sysfs(struct net_device *net)
1003 {
1004         struct class_device *class_dev = &net->class_dev;
1005         int ret;
1006
1007         ret = sysfs_create_group(&class_dev->kobj, &macb_mii_group);
1008         if (ret)
1009                 printk(KERN_WARNING
1010                        "%s: sysfs mii attribute registration failed: %d\n",
1011                        net->name, ret);
1012         return ret;
1013 }
1014 static int __devinit macb_probe(struct platform_device *pdev)
1015 {
1016         struct eth_platform_data *pdata;
1017         struct resource *regs;
1018         struct net_device *dev;
1019         struct macb *bp;
1020         unsigned long pclk_hz;
1021         u32 config;
1022         int err = -ENXIO;
1023
1024         regs = platform_get_resource(pdev, IORESOURCE_MEM, 0);
1025         if (!regs) {
1026                 dev_err(&pdev->dev, "no mmio resource defined\n");
1027                 goto err_out;
1028         }
1029
1030         err = -ENOMEM;
1031         dev = alloc_etherdev(sizeof(*bp));
1032         if (!dev) {
1033                 dev_err(&pdev->dev, "etherdev alloc failed, aborting.\n");
1034                 goto err_out;
1035         }
1036
1037         SET_MODULE_OWNER(dev);
1038         SET_NETDEV_DEV(dev, &pdev->dev);
1039
1040         /* TODO: Actually, we have some interesting features... */
1041         dev->features |= 0;
1042
1043         bp = netdev_priv(dev);
1044         bp->pdev = pdev;
1045         bp->dev = dev;
1046
1047         spin_lock_init(&bp->lock);
1048
1049         bp->pclk = clk_get(&pdev->dev, "pclk");
1050         if (IS_ERR(bp->pclk)) {
1051                 dev_err(&pdev->dev, "failed to get pclk\n");
1052                 goto err_out_free_dev;
1053         }
1054         bp->hclk = clk_get(&pdev->dev, "hclk");
1055         if (IS_ERR(bp->hclk)) {
1056                 dev_err(&pdev->dev, "failed to get hclk\n");
1057                 goto err_out_put_pclk;
1058         }
1059
1060         clk_enable(bp->pclk);
1061         clk_enable(bp->hclk);
1062
1063         bp->regs = ioremap(regs->start, regs->end - regs->start + 1);
1064         if (!bp->regs) {
1065                 dev_err(&pdev->dev, "failed to map registers, aborting.\n");
1066                 err = -ENOMEM;
1067                 goto err_out_disable_clocks;
1068         }
1069
1070         dev->irq = platform_get_irq(pdev, 0);
1071         err = request_irq(dev->irq, macb_interrupt, SA_SAMPLE_RANDOM,
1072                           dev->name, dev);
1073         if (err) {
1074                 printk(KERN_ERR
1075                        "%s: Unable to request IRQ %d (error %d)\n",
1076                        dev->name, dev->irq, err);
1077                 goto err_out_iounmap;
1078         }
1079
1080         dev->open = macb_open;
1081         dev->stop = macb_close;
1082         dev->hard_start_xmit = macb_start_xmit;
1083         dev->get_stats = macb_get_stats;
1084         dev->do_ioctl = macb_ioctl;
1085         dev->poll = macb_poll;
1086         dev->weight = 64;
1087         dev->ethtool_ops = &macb_ethtool_ops;
1088
1089         dev->base_addr = regs->start;
1090
1091         INIT_DELAYED_WORK(&bp->periodic_task, macb_periodic_task);
1092         mutex_init(&bp->mdio_mutex);
1093         init_completion(&bp->mdio_complete);
1094
1095         /* Set MII management clock divider */
1096         pclk_hz = clk_get_rate(bp->pclk);
1097         if (pclk_hz <= 20000000)
1098                 config = MACB_BF(CLK, MACB_CLK_DIV8);
1099         else if (pclk_hz <= 40000000)
1100                 config = MACB_BF(CLK, MACB_CLK_DIV16);
1101         else if (pclk_hz <= 80000000)
1102                 config = MACB_BF(CLK, MACB_CLK_DIV32);
1103         else
1104                 config = MACB_BF(CLK, MACB_CLK_DIV64);
1105         macb_writel(bp, NCFGR, config);
1106
1107         bp->mii.dev = dev;
1108         bp->mii.mdio_read = macb_mdio_read;
1109         bp->mii.mdio_write = macb_mdio_write;
1110         bp->mii.phy_id_mask = 0x1f;
1111         bp->mii.reg_num_mask = 0x1f;
1112
1113         macb_get_hwaddr(bp);
1114         err = macb_phy_probe(bp);
1115         if (err) {
1116                 dev_err(&pdev->dev, "Failed to detect PHY, aborting.\n");
1117                 goto err_out_free_irq;
1118         }
1119
1120         pdata = pdev->dev.platform_data;
1121         if (pdata && pdata->is_rmii)
1122                 macb_writel(bp, USRIO, 0);
1123         else
1124                 macb_writel(bp, USRIO, MACB_BIT(MII));
1125
1126         bp->tx_pending = DEF_TX_RING_PENDING;
1127
1128         err = register_netdev(dev);
1129         if (err) {
1130                 dev_err(&pdev->dev, "Cannot register net device, aborting.\n");
1131                 goto err_out_free_irq;
1132         }
1133
1134         platform_set_drvdata(pdev, dev);
1135
1136         macb_register_sysfs(dev);
1137
1138         printk(KERN_INFO "%s: Atmel MACB at 0x%08lx irq %d "
1139                "(%02x:%02x:%02x:%02x:%02x:%02x)\n",
1140                dev->name, dev->base_addr, dev->irq,
1141                dev->dev_addr[0], dev->dev_addr[1], dev->dev_addr[2],
1142                dev->dev_addr[3], dev->dev_addr[4], dev->dev_addr[5]);
1143
1144         return 0;
1145
1146 err_out_free_irq:
1147         free_irq(dev->irq, dev);
1148 err_out_iounmap:
1149         iounmap(bp->regs);
1150 err_out_disable_clocks:
1151         clk_disable(bp->hclk);
1152         clk_disable(bp->pclk);
1153         clk_put(bp->hclk);
1154 err_out_put_pclk:
1155         clk_put(bp->pclk);
1156 err_out_free_dev:
1157         free_netdev(dev);
1158 err_out:
1159         platform_set_drvdata(pdev, NULL);
1160         return err;
1161 }
1162
1163 static int __devexit macb_remove(struct platform_device *pdev)
1164 {
1165         struct net_device *dev;
1166         struct macb *bp;
1167
1168         dev = platform_get_drvdata(pdev);
1169
1170         if (dev) {
1171                 bp = netdev_priv(dev);
1172                 macb_unregister_sysfs(dev);
1173                 unregister_netdev(dev);
1174                 free_irq(dev->irq, dev);
1175                 iounmap(bp->regs);
1176                 clk_disable(bp->hclk);
1177                 clk_disable(bp->pclk);
1178                 clk_put(bp->hclk);
1179                 clk_put(bp->pclk);
1180                 free_netdev(dev);
1181                 platform_set_drvdata(pdev, NULL);
1182         }
1183
1184         return 0;
1185 }
1186
1187 static struct platform_driver macb_driver = {
1188         .probe          = macb_probe,
1189         .remove         = __devexit_p(macb_remove),
1190         .driver         = {
1191                 .name           = "macb",
1192         },
1193 };
1194
1195 static int __init macb_init(void)
1196 {
1197         return platform_driver_register(&macb_driver);
1198 }
1199
1200 static void __exit macb_exit(void)
1201 {
1202         platform_driver_unregister(&macb_driver);
1203 }
1204
1205 module_init(macb_init);
1206 module_exit(macb_exit);
1207
1208 MODULE_LICENSE("GPL");
1209 MODULE_DESCRIPTION("Atmel MACB Ethernet driver");
1210 MODULE_AUTHOR("Haavard Skinnemoen <hskinnemoen@atmel.com>");