Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / drivers / net / ethernet / allwinner / sun4i-emac.c
1 /*
2  * Allwinner EMAC Fast Ethernet driver for Linux.
3  *
4  * Copyright 2012-2013 Stefan Roese <sr@denx.de>
5  * Copyright 2013 Maxime Ripard <maxime.ripard@free-electrons.com>
6  *
7  * Based on the Linux driver provided by Allwinner:
8  * Copyright (C) 1997  Sten Wang
9  *
10  * This file is licensed under the terms of the GNU General Public
11  * License version 2. This program is licensed "as is" without any
12  * warranty of any kind, whether express or implied.
13  */
14
15 #include <linux/clk.h>
16 #include <linux/etherdevice.h>
17 #include <linux/ethtool.h>
18 #include <linux/gpio.h>
19 #include <linux/interrupt.h>
20 #include <linux/irq.h>
21 #include <linux/mii.h>
22 #include <linux/module.h>
23 #include <linux/netdevice.h>
24 #include <linux/of_address.h>
25 #include <linux/of_irq.h>
26 #include <linux/of_mdio.h>
27 #include <linux/of_net.h>
28 #include <linux/of_platform.h>
29 #include <linux/platform_device.h>
30 #include <linux/phy.h>
31
32 #include "sun4i-emac.h"
33
34 #define DRV_NAME                "sun4i-emac"
35 #define DRV_VERSION             "1.02"
36
37 #define EMAC_MAX_FRAME_LEN      0x0600
38
39 /* Transmit timeout, default 5 seconds. */
40 static int watchdog = 5000;
41 module_param(watchdog, int, 0400);
42 MODULE_PARM_DESC(watchdog, "transmit timeout in milliseconds");
43
44 /* EMAC register address locking.
45  *
46  * The EMAC uses an address register to control where data written
47  * to the data register goes. This means that the address register
48  * must be preserved over interrupts or similar calls.
49  *
50  * During interrupt and other critical calls, a spinlock is used to
51  * protect the system, but the calls themselves save the address
52  * in the address register in case they are interrupting another
53  * access to the device.
54  *
55  * For general accesses a lock is provided so that calls which are
56  * allowed to sleep are serialised so that the address register does
57  * not need to be saved. This lock also serves to serialise access
58  * to the EEPROM and PHY access registers which are shared between
59  * these two devices.
60  */
61
62 /* The driver supports the original EMACE, and now the two newer
63  * devices, EMACA and EMACB.
64  */
65
66 struct emac_board_info {
67         struct clk              *clk;
68         struct device           *dev;
69         struct platform_device  *pdev;
70         spinlock_t              lock;
71         void __iomem            *membase;
72         u32                     msg_enable;
73         struct net_device       *ndev;
74         struct sk_buff          *skb_last;
75         u16                     tx_fifo_stat;
76
77         int                     emacrx_completed_flag;
78
79         struct phy_device       *phy_dev;
80         struct device_node      *phy_node;
81         unsigned int            link;
82         unsigned int            speed;
83         unsigned int            duplex;
84
85         phy_interface_t         phy_interface;
86 };
87
88 static void emac_update_speed(struct net_device *dev)
89 {
90         struct emac_board_info *db = netdev_priv(dev);
91         unsigned int reg_val;
92
93         /* set EMAC SPEED, depend on PHY  */
94         reg_val = readl(db->membase + EMAC_MAC_SUPP_REG);
95         reg_val &= ~(0x1 << 8);
96         if (db->speed == SPEED_100)
97                 reg_val |= 1 << 8;
98         writel(reg_val, db->membase + EMAC_MAC_SUPP_REG);
99 }
100
101 static void emac_update_duplex(struct net_device *dev)
102 {
103         struct emac_board_info *db = netdev_priv(dev);
104         unsigned int reg_val;
105
106         /* set duplex depend on phy */
107         reg_val = readl(db->membase + EMAC_MAC_CTL1_REG);
108         reg_val &= ~EMAC_MAC_CTL1_DUPLEX_EN;
109         if (db->duplex)
110                 reg_val |= EMAC_MAC_CTL1_DUPLEX_EN;
111         writel(reg_val, db->membase + EMAC_MAC_CTL1_REG);
112 }
113
114 static void emac_handle_link_change(struct net_device *dev)
115 {
116         struct emac_board_info *db = netdev_priv(dev);
117         struct phy_device *phydev = db->phy_dev;
118         unsigned long flags;
119         int status_change = 0;
120
121         if (phydev->link) {
122                 if (db->speed != phydev->speed) {
123                         spin_lock_irqsave(&db->lock, flags);
124                         db->speed = phydev->speed;
125                         emac_update_speed(dev);
126                         spin_unlock_irqrestore(&db->lock, flags);
127                         status_change = 1;
128                 }
129
130                 if (db->duplex != phydev->duplex) {
131                         spin_lock_irqsave(&db->lock, flags);
132                         db->duplex = phydev->duplex;
133                         emac_update_duplex(dev);
134                         spin_unlock_irqrestore(&db->lock, flags);
135                         status_change = 1;
136                 }
137         }
138
139         if (phydev->link != db->link) {
140                 if (!phydev->link) {
141                         db->speed = 0;
142                         db->duplex = -1;
143                 }
144                 db->link = phydev->link;
145
146                 status_change = 1;
147         }
148
149         if (status_change)
150                 phy_print_status(phydev);
151 }
152
153 static int emac_mdio_probe(struct net_device *dev)
154 {
155         struct emac_board_info *db = netdev_priv(dev);
156
157         /* to-do: PHY interrupts are currently not supported */
158
159         /* attach the mac to the phy */
160         db->phy_dev = of_phy_connect(db->ndev, db->phy_node,
161                                      &emac_handle_link_change, 0,
162                                      db->phy_interface);
163         if (!db->phy_dev) {
164                 netdev_err(db->ndev, "could not find the PHY\n");
165                 return -ENODEV;
166         }
167
168         /* mask with MAC supported features */
169         db->phy_dev->supported &= PHY_BASIC_FEATURES;
170         db->phy_dev->advertising = db->phy_dev->supported;
171
172         db->link = 0;
173         db->speed = 0;
174         db->duplex = -1;
175
176         return 0;
177 }
178
179 static void emac_mdio_remove(struct net_device *dev)
180 {
181         struct emac_board_info *db = netdev_priv(dev);
182
183         phy_disconnect(db->phy_dev);
184         db->phy_dev = NULL;
185 }
186
187 static void emac_reset(struct emac_board_info *db)
188 {
189         dev_dbg(db->dev, "resetting device\n");
190
191         /* RESET device */
192         writel(0, db->membase + EMAC_CTL_REG);
193         udelay(200);
194         writel(EMAC_CTL_RESET, db->membase + EMAC_CTL_REG);
195         udelay(200);
196 }
197
198 static void emac_outblk_32bit(void __iomem *reg, void *data, int count)
199 {
200         writesl(reg, data, round_up(count, 4) / 4);
201 }
202
203 static void emac_inblk_32bit(void __iomem *reg, void *data, int count)
204 {
205         readsl(reg, data, round_up(count, 4) / 4);
206 }
207
208 static int emac_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
209 {
210         struct emac_board_info *dm = netdev_priv(dev);
211         struct phy_device *phydev = dm->phy_dev;
212
213         if (!netif_running(dev))
214                 return -EINVAL;
215
216         if (!phydev)
217                 return -ENODEV;
218
219         return phy_mii_ioctl(phydev, rq, cmd);
220 }
221
222 /* ethtool ops */
223 static void emac_get_drvinfo(struct net_device *dev,
224                               struct ethtool_drvinfo *info)
225 {
226         strlcpy(info->driver, DRV_NAME, sizeof(DRV_NAME));
227         strlcpy(info->version, DRV_VERSION, sizeof(DRV_VERSION));
228         strlcpy(info->bus_info, dev_name(&dev->dev), sizeof(info->bus_info));
229 }
230
231 static int emac_get_settings(struct net_device *dev, struct ethtool_cmd *cmd)
232 {
233         struct emac_board_info *dm = netdev_priv(dev);
234         struct phy_device *phydev = dm->phy_dev;
235
236         if (!phydev)
237                 return -ENODEV;
238
239         return phy_ethtool_gset(phydev, cmd);
240 }
241
242 static int emac_set_settings(struct net_device *dev, struct ethtool_cmd *cmd)
243 {
244         struct emac_board_info *dm = netdev_priv(dev);
245         struct phy_device *phydev = dm->phy_dev;
246
247         if (!phydev)
248                 return -ENODEV;
249
250         return phy_ethtool_sset(phydev, cmd);
251 }
252
253 static const struct ethtool_ops emac_ethtool_ops = {
254         .get_drvinfo    = emac_get_drvinfo,
255         .get_settings   = emac_get_settings,
256         .set_settings   = emac_set_settings,
257         .get_link       = ethtool_op_get_link,
258 };
259
260 static unsigned int emac_setup(struct net_device *ndev)
261 {
262         struct emac_board_info *db = netdev_priv(ndev);
263         unsigned int reg_val;
264
265         /* set up TX */
266         reg_val = readl(db->membase + EMAC_TX_MODE_REG);
267
268         writel(reg_val | EMAC_TX_MODE_ABORTED_FRAME_EN,
269                 db->membase + EMAC_TX_MODE_REG);
270
271         /* set MAC */
272         /* set MAC CTL0 */
273         reg_val = readl(db->membase + EMAC_MAC_CTL0_REG);
274         writel(reg_val | EMAC_MAC_CTL0_RX_FLOW_CTL_EN |
275                 EMAC_MAC_CTL0_TX_FLOW_CTL_EN,
276                 db->membase + EMAC_MAC_CTL0_REG);
277
278         /* set MAC CTL1 */
279         reg_val = readl(db->membase + EMAC_MAC_CTL1_REG);
280         reg_val |= EMAC_MAC_CTL1_LEN_CHECK_EN;
281         reg_val |= EMAC_MAC_CTL1_CRC_EN;
282         reg_val |= EMAC_MAC_CTL1_PAD_EN;
283         writel(reg_val, db->membase + EMAC_MAC_CTL1_REG);
284
285         /* set up IPGT */
286         writel(EMAC_MAC_IPGT_FULL_DUPLEX, db->membase + EMAC_MAC_IPGT_REG);
287
288         /* set up IPGR */
289         writel((EMAC_MAC_IPGR_IPG1 << 8) | EMAC_MAC_IPGR_IPG2,
290                 db->membase + EMAC_MAC_IPGR_REG);
291
292         /* set up Collison window */
293         writel((EMAC_MAC_CLRT_COLLISION_WINDOW << 8) | EMAC_MAC_CLRT_RM,
294                 db->membase + EMAC_MAC_CLRT_REG);
295
296         /* set up Max Frame Length */
297         writel(EMAC_MAX_FRAME_LEN,
298                 db->membase + EMAC_MAC_MAXF_REG);
299
300         return 0;
301 }
302
303 static void emac_set_rx_mode(struct net_device *ndev)
304 {
305         struct emac_board_info *db = netdev_priv(ndev);
306         unsigned int reg_val;
307
308         /* set up RX */
309         reg_val = readl(db->membase + EMAC_RX_CTL_REG);
310
311         if (ndev->flags & IFF_PROMISC)
312                 reg_val |= EMAC_RX_CTL_PASS_ALL_EN;
313         else
314                 reg_val &= ~EMAC_RX_CTL_PASS_ALL_EN;
315
316         writel(reg_val | EMAC_RX_CTL_PASS_LEN_OOR_EN |
317                 EMAC_RX_CTL_ACCEPT_UNICAST_EN | EMAC_RX_CTL_DA_FILTER_EN |
318                 EMAC_RX_CTL_ACCEPT_MULTICAST_EN |
319                 EMAC_RX_CTL_ACCEPT_BROADCAST_EN,
320                 db->membase + EMAC_RX_CTL_REG);
321 }
322
323 static unsigned int emac_powerup(struct net_device *ndev)
324 {
325         struct emac_board_info *db = netdev_priv(ndev);
326         unsigned int reg_val;
327
328         /* initial EMAC */
329         /* flush RX FIFO */
330         reg_val = readl(db->membase + EMAC_RX_CTL_REG);
331         reg_val |= 0x8;
332         writel(reg_val, db->membase + EMAC_RX_CTL_REG);
333         udelay(1);
334
335         /* initial MAC */
336         /* soft reset MAC */
337         reg_val = readl(db->membase + EMAC_MAC_CTL0_REG);
338         reg_val &= ~EMAC_MAC_CTL0_SOFT_RESET;
339         writel(reg_val, db->membase + EMAC_MAC_CTL0_REG);
340
341         /* set MII clock */
342         reg_val = readl(db->membase + EMAC_MAC_MCFG_REG);
343         reg_val &= (~(0xf << 2));
344         reg_val |= (0xD << 2);
345         writel(reg_val, db->membase + EMAC_MAC_MCFG_REG);
346
347         /* clear RX counter */
348         writel(0x0, db->membase + EMAC_RX_FBC_REG);
349
350         /* disable all interrupt and clear interrupt status */
351         writel(0, db->membase + EMAC_INT_CTL_REG);
352         reg_val = readl(db->membase + EMAC_INT_STA_REG);
353         writel(reg_val, db->membase + EMAC_INT_STA_REG);
354
355         udelay(1);
356
357         /* set up EMAC */
358         emac_setup(ndev);
359
360         /* set mac_address to chip */
361         writel(ndev->dev_addr[0] << 16 | ndev->dev_addr[1] << 8 | ndev->
362                dev_addr[2], db->membase + EMAC_MAC_A1_REG);
363         writel(ndev->dev_addr[3] << 16 | ndev->dev_addr[4] << 8 | ndev->
364                dev_addr[5], db->membase + EMAC_MAC_A0_REG);
365
366         mdelay(1);
367
368         return 0;
369 }
370
371 static int emac_set_mac_address(struct net_device *dev, void *p)
372 {
373         struct sockaddr *addr = p;
374         struct emac_board_info *db = netdev_priv(dev);
375
376         if (netif_running(dev))
377                 return -EBUSY;
378
379         memcpy(dev->dev_addr, addr->sa_data, ETH_ALEN);
380
381         writel(dev->dev_addr[0] << 16 | dev->dev_addr[1] << 8 | dev->
382                dev_addr[2], db->membase + EMAC_MAC_A1_REG);
383         writel(dev->dev_addr[3] << 16 | dev->dev_addr[4] << 8 | dev->
384                dev_addr[5], db->membase + EMAC_MAC_A0_REG);
385
386         return 0;
387 }
388
389 /* Initialize emac board */
390 static void emac_init_device(struct net_device *dev)
391 {
392         struct emac_board_info *db = netdev_priv(dev);
393         unsigned long flags;
394         unsigned int reg_val;
395
396         spin_lock_irqsave(&db->lock, flags);
397
398         emac_update_speed(dev);
399         emac_update_duplex(dev);
400
401         /* enable RX/TX */
402         reg_val = readl(db->membase + EMAC_CTL_REG);
403         writel(reg_val | EMAC_CTL_RESET | EMAC_CTL_TX_EN | EMAC_CTL_RX_EN,
404                 db->membase + EMAC_CTL_REG);
405
406         /* enable RX/TX0/RX Hlevel interrup */
407         reg_val = readl(db->membase + EMAC_INT_CTL_REG);
408         reg_val |= (0xf << 0) | (0x01 << 8);
409         writel(reg_val, db->membase + EMAC_INT_CTL_REG);
410
411         spin_unlock_irqrestore(&db->lock, flags);
412 }
413
414 /* Our watchdog timed out. Called by the networking layer */
415 static void emac_timeout(struct net_device *dev)
416 {
417         struct emac_board_info *db = netdev_priv(dev);
418         unsigned long flags;
419
420         if (netif_msg_timer(db))
421                 dev_err(db->dev, "tx time out.\n");
422
423         /* Save previous register address */
424         spin_lock_irqsave(&db->lock, flags);
425
426         netif_stop_queue(dev);
427         emac_reset(db);
428         emac_init_device(dev);
429         /* We can accept TX packets again */
430         dev->trans_start = jiffies;
431         netif_wake_queue(dev);
432
433         /* Restore previous register address */
434         spin_unlock_irqrestore(&db->lock, flags);
435 }
436
437 /* Hardware start transmission.
438  * Send a packet to media from the upper layer.
439  */
440 static int emac_start_xmit(struct sk_buff *skb, struct net_device *dev)
441 {
442         struct emac_board_info *db = netdev_priv(dev);
443         unsigned long channel;
444         unsigned long flags;
445
446         channel = db->tx_fifo_stat & 3;
447         if (channel == 3)
448                 return 1;
449
450         channel = (channel == 1 ? 1 : 0);
451
452         spin_lock_irqsave(&db->lock, flags);
453
454         writel(channel, db->membase + EMAC_TX_INS_REG);
455
456         emac_outblk_32bit(db->membase + EMAC_TX_IO_DATA_REG,
457                         skb->data, skb->len);
458         dev->stats.tx_bytes += skb->len;
459
460         db->tx_fifo_stat |= 1 << channel;
461         /* TX control: First packet immediately send, second packet queue */
462         if (channel == 0) {
463                 /* set TX len */
464                 writel(skb->len, db->membase + EMAC_TX_PL0_REG);
465                 /* start translate from fifo to phy */
466                 writel(readl(db->membase + EMAC_TX_CTL0_REG) | 1,
467                        db->membase + EMAC_TX_CTL0_REG);
468
469                 /* save the time stamp */
470                 dev->trans_start = jiffies;
471         } else if (channel == 1) {
472                 /* set TX len */
473                 writel(skb->len, db->membase + EMAC_TX_PL1_REG);
474                 /* start translate from fifo to phy */
475                 writel(readl(db->membase + EMAC_TX_CTL1_REG) | 1,
476                        db->membase + EMAC_TX_CTL1_REG);
477
478                 /* save the time stamp */
479                 dev->trans_start = jiffies;
480         }
481
482         if ((db->tx_fifo_stat & 3) == 3) {
483                 /* Second packet */
484                 netif_stop_queue(dev);
485         }
486
487         spin_unlock_irqrestore(&db->lock, flags);
488
489         /* free this SKB */
490         dev_consume_skb_any(skb);
491
492         return NETDEV_TX_OK;
493 }
494
495 /* EMAC interrupt handler
496  * receive the packet to upper layer, free the transmitted packet
497  */
498 static void emac_tx_done(struct net_device *dev, struct emac_board_info *db,
499                           unsigned int tx_status)
500 {
501         /* One packet sent complete */
502         db->tx_fifo_stat &= ~(tx_status & 3);
503         if (3 == (tx_status & 3))
504                 dev->stats.tx_packets += 2;
505         else
506                 dev->stats.tx_packets++;
507
508         if (netif_msg_tx_done(db))
509                 dev_dbg(db->dev, "tx done, NSR %02x\n", tx_status);
510
511         netif_wake_queue(dev);
512 }
513
514 /* Received a packet and pass to upper layer
515  */
516 static void emac_rx(struct net_device *dev)
517 {
518         struct emac_board_info *db = netdev_priv(dev);
519         struct sk_buff *skb;
520         u8 *rdptr;
521         bool good_packet;
522         static int rxlen_last;
523         unsigned int reg_val;
524         u32 rxhdr, rxstatus, rxcount, rxlen;
525
526         /* Check packet ready or not */
527         while (1) {
528                 /* race warning: the first packet might arrive with
529                  * the interrupts disabled, but the second will fix
530                  * it
531                  */
532                 rxcount = readl(db->membase + EMAC_RX_FBC_REG);
533
534                 if (netif_msg_rx_status(db))
535                         dev_dbg(db->dev, "RXCount: %x\n", rxcount);
536
537                 if ((db->skb_last != NULL) && (rxlen_last > 0)) {
538                         dev->stats.rx_bytes += rxlen_last;
539
540                         /* Pass to upper layer */
541                         db->skb_last->protocol = eth_type_trans(db->skb_last,
542                                                                 dev);
543                         netif_rx(db->skb_last);
544                         dev->stats.rx_packets++;
545                         db->skb_last = NULL;
546                         rxlen_last = 0;
547
548                         reg_val = readl(db->membase + EMAC_RX_CTL_REG);
549                         reg_val &= ~EMAC_RX_CTL_DMA_EN;
550                         writel(reg_val, db->membase + EMAC_RX_CTL_REG);
551                 }
552
553                 if (!rxcount) {
554                         db->emacrx_completed_flag = 1;
555                         reg_val = readl(db->membase + EMAC_INT_CTL_REG);
556                         reg_val |= (0xf << 0) | (0x01 << 8);
557                         writel(reg_val, db->membase + EMAC_INT_CTL_REG);
558
559                         /* had one stuck? */
560                         rxcount = readl(db->membase + EMAC_RX_FBC_REG);
561                         if (!rxcount)
562                                 return;
563                 }
564
565                 reg_val = readl(db->membase + EMAC_RX_IO_DATA_REG);
566                 if (netif_msg_rx_status(db))
567                         dev_dbg(db->dev, "receive header: %x\n", reg_val);
568                 if (reg_val != EMAC_UNDOCUMENTED_MAGIC) {
569                         /* disable RX */
570                         reg_val = readl(db->membase + EMAC_CTL_REG);
571                         writel(reg_val & ~EMAC_CTL_RX_EN,
572                                db->membase + EMAC_CTL_REG);
573
574                         /* Flush RX FIFO */
575                         reg_val = readl(db->membase + EMAC_RX_CTL_REG);
576                         writel(reg_val | (1 << 3),
577                                db->membase + EMAC_RX_CTL_REG);
578
579                         do {
580                                 reg_val = readl(db->membase + EMAC_RX_CTL_REG);
581                         } while (reg_val & (1 << 3));
582
583                         /* enable RX */
584                         reg_val = readl(db->membase + EMAC_CTL_REG);
585                         writel(reg_val | EMAC_CTL_RX_EN,
586                                db->membase + EMAC_CTL_REG);
587                         reg_val = readl(db->membase + EMAC_INT_CTL_REG);
588                         reg_val |= (0xf << 0) | (0x01 << 8);
589                         writel(reg_val, db->membase + EMAC_INT_CTL_REG);
590
591                         db->emacrx_completed_flag = 1;
592
593                         return;
594                 }
595
596                 /* A packet ready now  & Get status/length */
597                 good_packet = true;
598
599                 emac_inblk_32bit(db->membase + EMAC_RX_IO_DATA_REG,
600                                 &rxhdr, sizeof(rxhdr));
601
602                 if (netif_msg_rx_status(db))
603                         dev_dbg(db->dev, "rxhdr: %x\n", *((int *)(&rxhdr)));
604
605                 rxlen = EMAC_RX_IO_DATA_LEN(rxhdr);
606                 rxstatus = EMAC_RX_IO_DATA_STATUS(rxhdr);
607
608                 if (netif_msg_rx_status(db))
609                         dev_dbg(db->dev, "RX: status %02x, length %04x\n",
610                                 rxstatus, rxlen);
611
612                 /* Packet Status check */
613                 if (rxlen < 0x40) {
614                         good_packet = false;
615                         if (netif_msg_rx_err(db))
616                                 dev_dbg(db->dev, "RX: Bad Packet (runt)\n");
617                 }
618
619                 if (unlikely(!(rxstatus & EMAC_RX_IO_DATA_STATUS_OK))) {
620                         good_packet = false;
621
622                         if (rxstatus & EMAC_RX_IO_DATA_STATUS_CRC_ERR) {
623                                 if (netif_msg_rx_err(db))
624                                         dev_dbg(db->dev, "crc error\n");
625                                 dev->stats.rx_crc_errors++;
626                         }
627
628                         if (rxstatus & EMAC_RX_IO_DATA_STATUS_LEN_ERR) {
629                                 if (netif_msg_rx_err(db))
630                                         dev_dbg(db->dev, "length error\n");
631                                 dev->stats.rx_length_errors++;
632                         }
633                 }
634
635                 /* Move data from EMAC */
636                 if (good_packet) {
637                         skb = netdev_alloc_skb(dev, rxlen + 4);
638                         if (!skb)
639                                 continue;
640                         skb_reserve(skb, 2);
641                         rdptr = (u8 *) skb_put(skb, rxlen - 4);
642
643                         /* Read received packet from RX SRAM */
644                         if (netif_msg_rx_status(db))
645                                 dev_dbg(db->dev, "RxLen %x\n", rxlen);
646
647                         emac_inblk_32bit(db->membase + EMAC_RX_IO_DATA_REG,
648                                         rdptr, rxlen);
649                         dev->stats.rx_bytes += rxlen;
650
651                         /* Pass to upper layer */
652                         skb->protocol = eth_type_trans(skb, dev);
653                         netif_rx(skb);
654                         dev->stats.rx_packets++;
655                 }
656         }
657 }
658
659 static irqreturn_t emac_interrupt(int irq, void *dev_id)
660 {
661         struct net_device *dev = dev_id;
662         struct emac_board_info *db = netdev_priv(dev);
663         int int_status;
664         unsigned long flags;
665         unsigned int reg_val;
666
667         /* A real interrupt coming */
668
669         /* holders of db->lock must always block IRQs */
670         spin_lock_irqsave(&db->lock, flags);
671
672         /* Disable all interrupts */
673         writel(0, db->membase + EMAC_INT_CTL_REG);
674
675         /* Got EMAC interrupt status */
676         /* Got ISR */
677         int_status = readl(db->membase + EMAC_INT_STA_REG);
678         /* Clear ISR status */
679         writel(int_status, db->membase + EMAC_INT_STA_REG);
680
681         if (netif_msg_intr(db))
682                 dev_dbg(db->dev, "emac interrupt %02x\n", int_status);
683
684         /* Received the coming packet */
685         if ((int_status & 0x100) && (db->emacrx_completed_flag == 1)) {
686                 /* carrier lost */
687                 db->emacrx_completed_flag = 0;
688                 emac_rx(dev);
689         }
690
691         /* Transmit Interrupt check */
692         if (int_status & (0x01 | 0x02))
693                 emac_tx_done(dev, db, int_status);
694
695         if (int_status & (0x04 | 0x08))
696                 netdev_info(dev, " ab : %x\n", int_status);
697
698         /* Re-enable interrupt mask */
699         if (db->emacrx_completed_flag == 1) {
700                 reg_val = readl(db->membase + EMAC_INT_CTL_REG);
701                 reg_val |= (0xf << 0) | (0x01 << 8);
702                 writel(reg_val, db->membase + EMAC_INT_CTL_REG);
703         }
704         spin_unlock_irqrestore(&db->lock, flags);
705
706         return IRQ_HANDLED;
707 }
708
709 #ifdef CONFIG_NET_POLL_CONTROLLER
710 /*
711  * Used by netconsole
712  */
713 static void emac_poll_controller(struct net_device *dev)
714 {
715         disable_irq(dev->irq);
716         emac_interrupt(dev->irq, dev);
717         enable_irq(dev->irq);
718 }
719 #endif
720
721 /*  Open the interface.
722  *  The interface is opened whenever "ifconfig" actives it.
723  */
724 static int emac_open(struct net_device *dev)
725 {
726         struct emac_board_info *db = netdev_priv(dev);
727         int ret;
728
729         if (netif_msg_ifup(db))
730                 dev_dbg(db->dev, "enabling %s\n", dev->name);
731
732         if (request_irq(dev->irq, &emac_interrupt, 0, dev->name, dev))
733                 return -EAGAIN;
734
735         /* Initialize EMAC board */
736         emac_reset(db);
737         emac_init_device(dev);
738
739         ret = emac_mdio_probe(dev);
740         if (ret < 0) {
741                 free_irq(dev->irq, dev);
742                 netdev_err(dev, "cannot probe MDIO bus\n");
743                 return ret;
744         }
745
746         phy_start(db->phy_dev);
747         netif_start_queue(dev);
748
749         return 0;
750 }
751
752 static void emac_shutdown(struct net_device *dev)
753 {
754         unsigned int reg_val;
755         struct emac_board_info *db = netdev_priv(dev);
756
757         /* Disable all interrupt */
758         writel(0, db->membase + EMAC_INT_CTL_REG);
759
760         /* clear interrupt status */
761         reg_val = readl(db->membase + EMAC_INT_STA_REG);
762         writel(reg_val, db->membase + EMAC_INT_STA_REG);
763
764         /* Disable RX/TX */
765         reg_val = readl(db->membase + EMAC_CTL_REG);
766         reg_val &= ~(EMAC_CTL_TX_EN | EMAC_CTL_RX_EN | EMAC_CTL_RESET);
767         writel(reg_val, db->membase + EMAC_CTL_REG);
768 }
769
770 /* Stop the interface.
771  * The interface is stopped when it is brought.
772  */
773 static int emac_stop(struct net_device *ndev)
774 {
775         struct emac_board_info *db = netdev_priv(ndev);
776
777         if (netif_msg_ifdown(db))
778                 dev_dbg(db->dev, "shutting down %s\n", ndev->name);
779
780         netif_stop_queue(ndev);
781         netif_carrier_off(ndev);
782
783         phy_stop(db->phy_dev);
784
785         emac_mdio_remove(ndev);
786
787         emac_shutdown(ndev);
788
789         free_irq(ndev->irq, ndev);
790
791         return 0;
792 }
793
794 static const struct net_device_ops emac_netdev_ops = {
795         .ndo_open               = emac_open,
796         .ndo_stop               = emac_stop,
797         .ndo_start_xmit         = emac_start_xmit,
798         .ndo_tx_timeout         = emac_timeout,
799         .ndo_set_rx_mode        = emac_set_rx_mode,
800         .ndo_do_ioctl           = emac_ioctl,
801         .ndo_change_mtu         = eth_change_mtu,
802         .ndo_validate_addr      = eth_validate_addr,
803         .ndo_set_mac_address    = emac_set_mac_address,
804 #ifdef CONFIG_NET_POLL_CONTROLLER
805         .ndo_poll_controller    = emac_poll_controller,
806 #endif
807 };
808
809 /* Search EMAC board, allocate space and register it
810  */
811 static int emac_probe(struct platform_device *pdev)
812 {
813         struct device_node *np = pdev->dev.of_node;
814         struct emac_board_info *db;
815         struct net_device *ndev;
816         int ret = 0;
817         const char *mac_addr;
818
819         ndev = alloc_etherdev(sizeof(struct emac_board_info));
820         if (!ndev) {
821                 dev_err(&pdev->dev, "could not allocate device.\n");
822                 return -ENOMEM;
823         }
824
825         SET_NETDEV_DEV(ndev, &pdev->dev);
826
827         db = netdev_priv(ndev);
828         memset(db, 0, sizeof(*db));
829
830         db->dev = &pdev->dev;
831         db->ndev = ndev;
832         db->pdev = pdev;
833
834         spin_lock_init(&db->lock);
835
836         db->membase = of_iomap(np, 0);
837         if (!db->membase) {
838                 dev_err(&pdev->dev, "failed to remap registers\n");
839                 ret = -ENOMEM;
840                 goto out;
841         }
842
843         /* fill in parameters for net-dev structure */
844         ndev->base_addr = (unsigned long)db->membase;
845         ndev->irq = irq_of_parse_and_map(np, 0);
846         if (ndev->irq == -ENXIO) {
847                 netdev_err(ndev, "No irq resource\n");
848                 ret = ndev->irq;
849                 goto out;
850         }
851
852         db->clk = devm_clk_get(&pdev->dev, NULL);
853         if (IS_ERR(db->clk)) {
854                 ret = PTR_ERR(db->clk);
855                 goto out;
856         }
857
858         clk_prepare_enable(db->clk);
859
860         db->phy_node = of_parse_phandle(np, "phy", 0);
861         if (!db->phy_node) {
862                 dev_err(&pdev->dev, "no associated PHY\n");
863                 ret = -ENODEV;
864                 goto out;
865         }
866
867         /* Read MAC-address from DT */
868         mac_addr = of_get_mac_address(np);
869         if (mac_addr)
870                 memcpy(ndev->dev_addr, mac_addr, ETH_ALEN);
871
872         /* Check if the MAC address is valid, if not get a random one */
873         if (!is_valid_ether_addr(ndev->dev_addr)) {
874                 eth_hw_addr_random(ndev);
875                 dev_warn(&pdev->dev, "using random MAC address %pM\n",
876                          ndev->dev_addr);
877         }
878
879         db->emacrx_completed_flag = 1;
880         emac_powerup(ndev);
881         emac_reset(db);
882
883         ndev->netdev_ops = &emac_netdev_ops;
884         ndev->watchdog_timeo = msecs_to_jiffies(watchdog);
885         ndev->ethtool_ops = &emac_ethtool_ops;
886
887         platform_set_drvdata(pdev, ndev);
888
889         /* Carrier starts down, phylib will bring it up */
890         netif_carrier_off(ndev);
891
892         ret = register_netdev(ndev);
893         if (ret) {
894                 dev_err(&pdev->dev, "Registering netdev failed!\n");
895                 ret = -ENODEV;
896                 goto out;
897         }
898
899         dev_info(&pdev->dev, "%s: at %p, IRQ %d MAC: %pM\n",
900                  ndev->name, db->membase, ndev->irq, ndev->dev_addr);
901
902         return 0;
903
904 out:
905         dev_err(db->dev, "not found (%d).\n", ret);
906
907         free_netdev(ndev);
908
909         return ret;
910 }
911
912 static int emac_remove(struct platform_device *pdev)
913 {
914         struct net_device *ndev = platform_get_drvdata(pdev);
915
916         unregister_netdev(ndev);
917         free_netdev(ndev);
918
919         dev_dbg(&pdev->dev, "released and freed device\n");
920         return 0;
921 }
922
923 static int emac_suspend(struct platform_device *dev, pm_message_t state)
924 {
925         struct net_device *ndev = platform_get_drvdata(dev);
926
927         netif_carrier_off(ndev);
928         netif_device_detach(ndev);
929         emac_shutdown(ndev);
930
931         return 0;
932 }
933
934 static int emac_resume(struct platform_device *dev)
935 {
936         struct net_device *ndev = platform_get_drvdata(dev);
937         struct emac_board_info *db = netdev_priv(ndev);
938
939         emac_reset(db);
940         emac_init_device(ndev);
941         netif_device_attach(ndev);
942
943         return 0;
944 }
945
946 static const struct of_device_id emac_of_match[] = {
947         {.compatible = "allwinner,sun4i-a10-emac",},
948
949         /* Deprecated */
950         {.compatible = "allwinner,sun4i-emac",},
951         {},
952 };
953
954 MODULE_DEVICE_TABLE(of, emac_of_match);
955
956 static struct platform_driver emac_driver = {
957         .driver = {
958                 .name = "sun4i-emac",
959                 .of_match_table = emac_of_match,
960         },
961         .probe = emac_probe,
962         .remove = emac_remove,
963         .suspend = emac_suspend,
964         .resume = emac_resume,
965 };
966
967 module_platform_driver(emac_driver);
968
969 MODULE_AUTHOR("Stefan Roese <sr@denx.de>");
970 MODULE_AUTHOR("Maxime Ripard <maxime.ripard@free-electrons.com>");
971 MODULE_DESCRIPTION("Allwinner A10 emac network driver");
972 MODULE_LICENSE("GPL");