common: Drop linux/delay.h from common header
[oweals/u-boot.git] / drivers / net / phy / phy.c
1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * Generic PHY Management code
4  *
5  * Copyright 2011 Freescale Semiconductor, Inc.
6  * author Andy Fleming
7  *
8  * Based loosely off of Linux's PHY Lib
9  */
10 #include <common.h>
11 #include <console.h>
12 #include <dm.h>
13 #include <log.h>
14 #include <malloc.h>
15 #include <net.h>
16 #include <command.h>
17 #include <miiphy.h>
18 #include <phy.h>
19 #include <errno.h>
20 #include <linux/delay.h>
21 #include <linux/err.h>
22 #include <linux/compiler.h>
23
24 DECLARE_GLOBAL_DATA_PTR;
25
26 /* Generic PHY support and helper functions */
27
28 /**
29  * genphy_config_advert - sanitize and advertise auto-negotiation parameters
30  * @phydev: target phy_device struct
31  *
32  * Description: Writes MII_ADVERTISE with the appropriate values,
33  *   after sanitizing the values to make sure we only advertise
34  *   what is supported.  Returns < 0 on error, 0 if the PHY's advertisement
35  *   hasn't changed, and > 0 if it has changed.
36  */
37 static int genphy_config_advert(struct phy_device *phydev)
38 {
39         u32 advertise;
40         int oldadv, adv, bmsr;
41         int err, changed = 0;
42
43         /* Only allow advertising what this PHY supports */
44         phydev->advertising &= phydev->supported;
45         advertise = phydev->advertising;
46
47         /* Setup standard advertisement */
48         adv = phy_read(phydev, MDIO_DEVAD_NONE, MII_ADVERTISE);
49         oldadv = adv;
50
51         if (adv < 0)
52                 return adv;
53
54         adv &= ~(ADVERTISE_ALL | ADVERTISE_100BASE4 | ADVERTISE_PAUSE_CAP |
55                  ADVERTISE_PAUSE_ASYM);
56         if (advertise & ADVERTISED_10baseT_Half)
57                 adv |= ADVERTISE_10HALF;
58         if (advertise & ADVERTISED_10baseT_Full)
59                 adv |= ADVERTISE_10FULL;
60         if (advertise & ADVERTISED_100baseT_Half)
61                 adv |= ADVERTISE_100HALF;
62         if (advertise & ADVERTISED_100baseT_Full)
63                 adv |= ADVERTISE_100FULL;
64         if (advertise & ADVERTISED_Pause)
65                 adv |= ADVERTISE_PAUSE_CAP;
66         if (advertise & ADVERTISED_Asym_Pause)
67                 adv |= ADVERTISE_PAUSE_ASYM;
68         if (advertise & ADVERTISED_1000baseX_Half)
69                 adv |= ADVERTISE_1000XHALF;
70         if (advertise & ADVERTISED_1000baseX_Full)
71                 adv |= ADVERTISE_1000XFULL;
72
73         if (adv != oldadv) {
74                 err = phy_write(phydev, MDIO_DEVAD_NONE, MII_ADVERTISE, adv);
75
76                 if (err < 0)
77                         return err;
78                 changed = 1;
79         }
80
81         bmsr = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMSR);
82         if (bmsr < 0)
83                 return bmsr;
84
85         /* Per 802.3-2008, Section 22.2.4.2.16 Extended status all
86          * 1000Mbits/sec capable PHYs shall have the BMSR_ESTATEN bit set to a
87          * logical 1.
88          */
89         if (!(bmsr & BMSR_ESTATEN))
90                 return changed;
91
92         /* Configure gigabit if it's supported */
93         adv = phy_read(phydev, MDIO_DEVAD_NONE, MII_CTRL1000);
94         oldadv = adv;
95
96         if (adv < 0)
97                 return adv;
98
99         adv &= ~(ADVERTISE_1000FULL | ADVERTISE_1000HALF);
100
101         if (phydev->supported & (SUPPORTED_1000baseT_Half |
102                                 SUPPORTED_1000baseT_Full)) {
103                 if (advertise & SUPPORTED_1000baseT_Half)
104                         adv |= ADVERTISE_1000HALF;
105                 if (advertise & SUPPORTED_1000baseT_Full)
106                         adv |= ADVERTISE_1000FULL;
107         }
108
109         if (adv != oldadv)
110                 changed = 1;
111
112         err = phy_write(phydev, MDIO_DEVAD_NONE, MII_CTRL1000, adv);
113         if (err < 0)
114                 return err;
115
116         return changed;
117 }
118
119 /**
120  * genphy_setup_forced - configures/forces speed/duplex from @phydev
121  * @phydev: target phy_device struct
122  *
123  * Description: Configures MII_BMCR to force speed/duplex
124  *   to the values in phydev. Assumes that the values are valid.
125  */
126 static int genphy_setup_forced(struct phy_device *phydev)
127 {
128         int err;
129         int ctl = BMCR_ANRESTART;
130
131         phydev->pause = 0;
132         phydev->asym_pause = 0;
133
134         if (phydev->speed == SPEED_1000)
135                 ctl |= BMCR_SPEED1000;
136         else if (phydev->speed == SPEED_100)
137                 ctl |= BMCR_SPEED100;
138
139         if (phydev->duplex == DUPLEX_FULL)
140                 ctl |= BMCR_FULLDPLX;
141
142         err = phy_write(phydev, MDIO_DEVAD_NONE, MII_BMCR, ctl);
143
144         return err;
145 }
146
147 /**
148  * genphy_restart_aneg - Enable and Restart Autonegotiation
149  * @phydev: target phy_device struct
150  */
151 int genphy_restart_aneg(struct phy_device *phydev)
152 {
153         int ctl;
154
155         ctl = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMCR);
156
157         if (ctl < 0)
158                 return ctl;
159
160         ctl |= (BMCR_ANENABLE | BMCR_ANRESTART);
161
162         /* Don't isolate the PHY if we're negotiating */
163         ctl &= ~(BMCR_ISOLATE);
164
165         ctl = phy_write(phydev, MDIO_DEVAD_NONE, MII_BMCR, ctl);
166
167         return ctl;
168 }
169
170 /**
171  * genphy_config_aneg - restart auto-negotiation or write BMCR
172  * @phydev: target phy_device struct
173  *
174  * Description: If auto-negotiation is enabled, we configure the
175  *   advertising, and then restart auto-negotiation.  If it is not
176  *   enabled, then we write the BMCR.
177  */
178 int genphy_config_aneg(struct phy_device *phydev)
179 {
180         int result;
181
182         if (phydev->autoneg != AUTONEG_ENABLE)
183                 return genphy_setup_forced(phydev);
184
185         result = genphy_config_advert(phydev);
186
187         if (result < 0) /* error */
188                 return result;
189
190         if (result == 0) {
191                 /*
192                  * Advertisment hasn't changed, but maybe aneg was never on to
193                  * begin with?  Or maybe phy was isolated?
194                  */
195                 int ctl = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMCR);
196
197                 if (ctl < 0)
198                         return ctl;
199
200                 if (!(ctl & BMCR_ANENABLE) || (ctl & BMCR_ISOLATE))
201                         result = 1; /* do restart aneg */
202         }
203
204         /*
205          * Only restart aneg if we are advertising something different
206          * than we were before.
207          */
208         if (result > 0)
209                 result = genphy_restart_aneg(phydev);
210
211         return result;
212 }
213
214 /**
215  * genphy_update_link - update link status in @phydev
216  * @phydev: target phy_device struct
217  *
218  * Description: Update the value in phydev->link to reflect the
219  *   current link value.  In order to do this, we need to read
220  *   the status register twice, keeping the second value.
221  */
222 int genphy_update_link(struct phy_device *phydev)
223 {
224         unsigned int mii_reg;
225
226         /*
227          * Wait if the link is up, and autonegotiation is in progress
228          * (ie - we're capable and it's not done)
229          */
230         mii_reg = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMSR);
231
232         /*
233          * If we already saw the link up, and it hasn't gone down, then
234          * we don't need to wait for autoneg again
235          */
236         if (phydev->link && mii_reg & BMSR_LSTATUS)
237                 return 0;
238
239         if ((phydev->autoneg == AUTONEG_ENABLE) &&
240             !(mii_reg & BMSR_ANEGCOMPLETE)) {
241                 int i = 0;
242
243                 printf("%s Waiting for PHY auto negotiation to complete",
244                        phydev->dev->name);
245                 while (!(mii_reg & BMSR_ANEGCOMPLETE)) {
246                         /*
247                          * Timeout reached ?
248                          */
249                         if (i > (PHY_ANEG_TIMEOUT / 50)) {
250                                 printf(" TIMEOUT !\n");
251                                 phydev->link = 0;
252                                 return -ETIMEDOUT;
253                         }
254
255                         if (ctrlc()) {
256                                 puts("user interrupt!\n");
257                                 phydev->link = 0;
258                                 return -EINTR;
259                         }
260
261                         if ((i++ % 10) == 0)
262                                 printf(".");
263
264                         mii_reg = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMSR);
265                         mdelay(50);     /* 50 ms */
266                 }
267                 printf(" done\n");
268                 phydev->link = 1;
269         } else {
270                 /* Read the link a second time to clear the latched state */
271                 mii_reg = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMSR);
272
273                 if (mii_reg & BMSR_LSTATUS)
274                         phydev->link = 1;
275                 else
276                         phydev->link = 0;
277         }
278
279         return 0;
280 }
281
282 /*
283  * Generic function which updates the speed and duplex.  If
284  * autonegotiation is enabled, it uses the AND of the link
285  * partner's advertised capabilities and our advertised
286  * capabilities.  If autonegotiation is disabled, we use the
287  * appropriate bits in the control register.
288  *
289  * Stolen from Linux's mii.c and phy_device.c
290  */
291 int genphy_parse_link(struct phy_device *phydev)
292 {
293         int mii_reg = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMSR);
294
295         /* We're using autonegotiation */
296         if (phydev->autoneg == AUTONEG_ENABLE) {
297                 u32 lpa = 0;
298                 int gblpa = 0;
299                 u32 estatus = 0;
300
301                 /* Check for gigabit capability */
302                 if (phydev->supported & (SUPPORTED_1000baseT_Full |
303                                         SUPPORTED_1000baseT_Half)) {
304                         /* We want a list of states supported by
305                          * both PHYs in the link
306                          */
307                         gblpa = phy_read(phydev, MDIO_DEVAD_NONE, MII_STAT1000);
308                         if (gblpa < 0) {
309                                 debug("Could not read MII_STAT1000. ");
310                                 debug("Ignoring gigabit capability\n");
311                                 gblpa = 0;
312                         }
313                         gblpa &= phy_read(phydev,
314                                         MDIO_DEVAD_NONE, MII_CTRL1000) << 2;
315                 }
316
317                 /* Set the baseline so we only have to set them
318                  * if they're different
319                  */
320                 phydev->speed = SPEED_10;
321                 phydev->duplex = DUPLEX_HALF;
322
323                 /* Check the gigabit fields */
324                 if (gblpa & (PHY_1000BTSR_1000FD | PHY_1000BTSR_1000HD)) {
325                         phydev->speed = SPEED_1000;
326
327                         if (gblpa & PHY_1000BTSR_1000FD)
328                                 phydev->duplex = DUPLEX_FULL;
329
330                         /* We're done! */
331                         return 0;
332                 }
333
334                 lpa = phy_read(phydev, MDIO_DEVAD_NONE, MII_ADVERTISE);
335                 lpa &= phy_read(phydev, MDIO_DEVAD_NONE, MII_LPA);
336
337                 if (lpa & (LPA_100FULL | LPA_100HALF)) {
338                         phydev->speed = SPEED_100;
339
340                         if (lpa & LPA_100FULL)
341                                 phydev->duplex = DUPLEX_FULL;
342
343                 } else if (lpa & LPA_10FULL) {
344                         phydev->duplex = DUPLEX_FULL;
345                 }
346
347                 /*
348                  * Extended status may indicate that the PHY supports
349                  * 1000BASE-T/X even though the 1000BASE-T registers
350                  * are missing. In this case we can't tell whether the
351                  * peer also supports it, so we only check extended
352                  * status if the 1000BASE-T registers are actually
353                  * missing.
354                  */
355                 if ((mii_reg & BMSR_ESTATEN) && !(mii_reg & BMSR_ERCAP))
356                         estatus = phy_read(phydev, MDIO_DEVAD_NONE,
357                                            MII_ESTATUS);
358
359                 if (estatus & (ESTATUS_1000_XFULL | ESTATUS_1000_XHALF |
360                                 ESTATUS_1000_TFULL | ESTATUS_1000_THALF)) {
361                         phydev->speed = SPEED_1000;
362                         if (estatus & (ESTATUS_1000_XFULL | ESTATUS_1000_TFULL))
363                                 phydev->duplex = DUPLEX_FULL;
364                 }
365
366         } else {
367                 u32 bmcr = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMCR);
368
369                 phydev->speed = SPEED_10;
370                 phydev->duplex = DUPLEX_HALF;
371
372                 if (bmcr & BMCR_FULLDPLX)
373                         phydev->duplex = DUPLEX_FULL;
374
375                 if (bmcr & BMCR_SPEED1000)
376                         phydev->speed = SPEED_1000;
377                 else if (bmcr & BMCR_SPEED100)
378                         phydev->speed = SPEED_100;
379         }
380
381         return 0;
382 }
383
384 int genphy_config(struct phy_device *phydev)
385 {
386         int val;
387         u32 features;
388
389         features = (SUPPORTED_TP | SUPPORTED_MII
390                         | SUPPORTED_AUI | SUPPORTED_FIBRE |
391                         SUPPORTED_BNC);
392
393         /* Do we support autonegotiation? */
394         val = phy_read(phydev, MDIO_DEVAD_NONE, MII_BMSR);
395
396         if (val < 0)
397                 return val;
398
399         if (val & BMSR_ANEGCAPABLE)
400                 features |= SUPPORTED_Autoneg;
401
402         if (val & BMSR_100FULL)
403                 features |= SUPPORTED_100baseT_Full;
404         if (val & BMSR_100HALF)
405                 features |= SUPPORTED_100baseT_Half;
406         if (val & BMSR_10FULL)
407                 features |= SUPPORTED_10baseT_Full;
408         if (val & BMSR_10HALF)
409                 features |= SUPPORTED_10baseT_Half;
410
411         if (val & BMSR_ESTATEN) {
412                 val = phy_read(phydev, MDIO_DEVAD_NONE, MII_ESTATUS);
413
414                 if (val < 0)
415                         return val;
416
417                 if (val & ESTATUS_1000_TFULL)
418                         features |= SUPPORTED_1000baseT_Full;
419                 if (val & ESTATUS_1000_THALF)
420                         features |= SUPPORTED_1000baseT_Half;
421                 if (val & ESTATUS_1000_XFULL)
422                         features |= SUPPORTED_1000baseX_Full;
423                 if (val & ESTATUS_1000_XHALF)
424                         features |= SUPPORTED_1000baseX_Half;
425         }
426
427         phydev->supported &= features;
428         phydev->advertising &= features;
429
430         genphy_config_aneg(phydev);
431
432         return 0;
433 }
434
435 int genphy_startup(struct phy_device *phydev)
436 {
437         int ret;
438
439         ret = genphy_update_link(phydev);
440         if (ret)
441                 return ret;
442
443         return genphy_parse_link(phydev);
444 }
445
446 int genphy_shutdown(struct phy_device *phydev)
447 {
448         return 0;
449 }
450
451 static struct phy_driver genphy_driver = {
452         .uid            = 0xffffffff,
453         .mask           = 0xffffffff,
454         .name           = "Generic PHY",
455         .features       = PHY_GBIT_FEATURES | SUPPORTED_MII |
456                           SUPPORTED_AUI | SUPPORTED_FIBRE |
457                           SUPPORTED_BNC,
458         .config         = genphy_config,
459         .startup        = genphy_startup,
460         .shutdown       = genphy_shutdown,
461 };
462
463 int genphy_init(void)
464 {
465         return phy_register(&genphy_driver);
466 }
467
468 static LIST_HEAD(phy_drivers);
469
470 int phy_init(void)
471 {
472 #ifdef CONFIG_NEEDS_MANUAL_RELOC
473         /*
474          * The pointers inside phy_drivers also needs to be updated incase of
475          * manual reloc, without which these points to some invalid
476          * pre reloc address and leads to invalid accesses, hangs.
477          */
478         struct list_head *head = &phy_drivers;
479
480         head->next = (void *)head->next + gd->reloc_off;
481         head->prev = (void *)head->prev + gd->reloc_off;
482 #endif
483
484 #ifdef CONFIG_B53_SWITCH
485         phy_b53_init();
486 #endif
487 #ifdef CONFIG_MV88E61XX_SWITCH
488         phy_mv88e61xx_init();
489 #endif
490 #ifdef CONFIG_PHY_AQUANTIA
491         phy_aquantia_init();
492 #endif
493 #ifdef CONFIG_PHY_ATHEROS
494         phy_atheros_init();
495 #endif
496 #ifdef CONFIG_PHY_BROADCOM
497         phy_broadcom_init();
498 #endif
499 #ifdef CONFIG_PHY_CORTINA
500         phy_cortina_init();
501 #endif
502 #ifdef CONFIG_PHY_DAVICOM
503         phy_davicom_init();
504 #endif
505 #ifdef CONFIG_PHY_ET1011C
506         phy_et1011c_init();
507 #endif
508 #ifdef CONFIG_PHY_LXT
509         phy_lxt_init();
510 #endif
511 #ifdef CONFIG_PHY_MARVELL
512         phy_marvell_init();
513 #endif
514 #ifdef CONFIG_PHY_MICREL_KSZ8XXX
515         phy_micrel_ksz8xxx_init();
516 #endif
517 #ifdef CONFIG_PHY_MICREL_KSZ90X1
518         phy_micrel_ksz90x1_init();
519 #endif
520 #ifdef CONFIG_PHY_MESON_GXL
521         phy_meson_gxl_init();
522 #endif
523 #ifdef CONFIG_PHY_NATSEMI
524         phy_natsemi_init();
525 #endif
526 #ifdef CONFIG_PHY_REALTEK
527         phy_realtek_init();
528 #endif
529 #ifdef CONFIG_PHY_SMSC
530         phy_smsc_init();
531 #endif
532 #ifdef CONFIG_PHY_TERANETICS
533         phy_teranetics_init();
534 #endif
535 #ifdef CONFIG_PHY_TI
536         phy_ti_init();
537 #endif
538 #ifdef CONFIG_PHY_VITESSE
539         phy_vitesse_init();
540 #endif
541 #ifdef CONFIG_PHY_XILINX
542         phy_xilinx_init();
543 #endif
544 #ifdef CONFIG_PHY_MSCC
545         phy_mscc_init();
546 #endif
547 #ifdef CONFIG_PHY_FIXED
548         phy_fixed_init();
549 #endif
550 #ifdef CONFIG_PHY_NCSI
551         phy_ncsi_init();
552 #endif
553 #ifdef CONFIG_PHY_XILINX_GMII2RGMII
554         phy_xilinx_gmii2rgmii_init();
555 #endif
556         genphy_init();
557
558         return 0;
559 }
560
561 int phy_register(struct phy_driver *drv)
562 {
563         INIT_LIST_HEAD(&drv->list);
564         list_add_tail(&drv->list, &phy_drivers);
565
566 #ifdef CONFIG_NEEDS_MANUAL_RELOC
567         if (drv->probe)
568                 drv->probe += gd->reloc_off;
569         if (drv->config)
570                 drv->config += gd->reloc_off;
571         if (drv->startup)
572                 drv->startup += gd->reloc_off;
573         if (drv->shutdown)
574                 drv->shutdown += gd->reloc_off;
575         if (drv->readext)
576                 drv->readext += gd->reloc_off;
577         if (drv->writeext)
578                 drv->writeext += gd->reloc_off;
579         if (drv->read_mmd)
580                 drv->read_mmd += gd->reloc_off;
581         if (drv->write_mmd)
582                 drv->write_mmd += gd->reloc_off;
583 #endif
584         return 0;
585 }
586
587 int phy_set_supported(struct phy_device *phydev, u32 max_speed)
588 {
589         /* The default values for phydev->supported are provided by the PHY
590          * driver "features" member, we want to reset to sane defaults first
591          * before supporting higher speeds.
592          */
593         phydev->supported &= PHY_DEFAULT_FEATURES;
594
595         switch (max_speed) {
596         default:
597                 return -ENOTSUPP;
598         case SPEED_1000:
599                 phydev->supported |= PHY_1000BT_FEATURES;
600                 /* fall through */
601         case SPEED_100:
602                 phydev->supported |= PHY_100BT_FEATURES;
603                 /* fall through */
604         case SPEED_10:
605                 phydev->supported |= PHY_10BT_FEATURES;
606         }
607
608         return 0;
609 }
610
611 static int phy_probe(struct phy_device *phydev)
612 {
613         int err = 0;
614
615         phydev->advertising = phydev->drv->features;
616         phydev->supported = phydev->drv->features;
617
618         phydev->mmds = phydev->drv->mmds;
619
620         if (phydev->drv->probe)
621                 err = phydev->drv->probe(phydev);
622
623         return err;
624 }
625
626 static struct phy_driver *generic_for_interface(phy_interface_t interface)
627 {
628 #ifdef CONFIG_PHYLIB_10G
629         if (is_10g_interface(interface))
630                 return &gen10g_driver;
631 #endif
632
633         return &genphy_driver;
634 }
635
636 static struct phy_driver *get_phy_driver(struct phy_device *phydev,
637                                          phy_interface_t interface)
638 {
639         struct list_head *entry;
640         int phy_id = phydev->phy_id;
641         struct phy_driver *drv = NULL;
642
643         list_for_each(entry, &phy_drivers) {
644                 drv = list_entry(entry, struct phy_driver, list);
645                 if ((drv->uid & drv->mask) == (phy_id & drv->mask))
646                         return drv;
647         }
648
649         /* If we made it here, there's no driver for this PHY */
650         return generic_for_interface(interface);
651 }
652
653 static struct phy_device *phy_device_create(struct mii_dev *bus, int addr,
654                                             u32 phy_id, bool is_c45,
655                                             phy_interface_t interface)
656 {
657         struct phy_device *dev;
658
659         /*
660          * We allocate the device, and initialize the
661          * default values
662          */
663         dev = malloc(sizeof(*dev));
664         if (!dev) {
665                 printf("Failed to allocate PHY device for %s:%d\n",
666                        bus->name, addr);
667                 return NULL;
668         }
669
670         memset(dev, 0, sizeof(*dev));
671
672         dev->duplex = -1;
673         dev->link = 0;
674         dev->interface = interface;
675
676 #ifdef CONFIG_DM_ETH
677         dev->node = ofnode_null();
678 #endif
679
680         dev->autoneg = AUTONEG_ENABLE;
681
682         dev->addr = addr;
683         dev->phy_id = phy_id;
684         dev->is_c45 = is_c45;
685         dev->bus = bus;
686
687         dev->drv = get_phy_driver(dev, interface);
688
689         if (phy_probe(dev)) {
690                 printf("%s, PHY probe failed\n", __func__);
691                 return NULL;
692         }
693
694         if (addr >= 0 && addr < PHY_MAX_ADDR)
695                 bus->phymap[addr] = dev;
696
697         return dev;
698 }
699
700 /**
701  * get_phy_id - reads the specified addr for its ID.
702  * @bus: the target MII bus
703  * @addr: PHY address on the MII bus
704  * @phy_id: where to store the ID retrieved.
705  *
706  * Description: Reads the ID registers of the PHY at @addr on the
707  *   @bus, stores it in @phy_id and returns zero on success.
708  */
709 int __weak get_phy_id(struct mii_dev *bus, int addr, int devad, u32 *phy_id)
710 {
711         int phy_reg;
712
713         /*
714          * Grab the bits from PHYIR1, and put them
715          * in the upper half
716          */
717         phy_reg = bus->read(bus, addr, devad, MII_PHYSID1);
718
719         if (phy_reg < 0)
720                 return -EIO;
721
722         *phy_id = (phy_reg & 0xffff) << 16;
723
724         /* Grab the bits from PHYIR2, and put them in the lower half */
725         phy_reg = bus->read(bus, addr, devad, MII_PHYSID2);
726
727         if (phy_reg < 0)
728                 return -EIO;
729
730         *phy_id |= (phy_reg & 0xffff);
731
732         return 0;
733 }
734
735 static struct phy_device *create_phy_by_mask(struct mii_dev *bus,
736                                              uint phy_mask, int devad,
737                                              phy_interface_t interface)
738 {
739         u32 phy_id = 0xffffffff;
740         bool is_c45;
741
742         while (phy_mask) {
743                 int addr = ffs(phy_mask) - 1;
744                 int r = get_phy_id(bus, addr, devad, &phy_id);
745
746                 /*
747                  * If the PHY ID is flat 0 we ignore it.  There are C45 PHYs
748                  * that return all 0s for C22 reads (like Aquantia AQR112) and
749                  * there are C22 PHYs that return all 0s for C45 reads (like
750                  * Atheros AR8035).
751                  */
752                 if (r == 0 && phy_id == 0)
753                         goto next;
754
755                 /* If the PHY ID is mostly f's, we didn't find anything */
756                 if (r == 0 && (phy_id & 0x1fffffff) != 0x1fffffff) {
757                         is_c45 = (devad == MDIO_DEVAD_NONE) ? false : true;
758                         return phy_device_create(bus, addr, phy_id, is_c45,
759                                                  interface);
760                 }
761 next:
762                 phy_mask &= ~(1 << addr);
763         }
764         return NULL;
765 }
766
767 static struct phy_device *search_for_existing_phy(struct mii_dev *bus,
768                                                   uint phy_mask,
769                                                   phy_interface_t interface)
770 {
771         /* If we have one, return the existing device, with new interface */
772         while (phy_mask) {
773                 int addr = ffs(phy_mask) - 1;
774
775                 if (bus->phymap[addr]) {
776                         bus->phymap[addr]->interface = interface;
777                         return bus->phymap[addr];
778                 }
779                 phy_mask &= ~(1 << addr);
780         }
781         return NULL;
782 }
783
784 static struct phy_device *get_phy_device_by_mask(struct mii_dev *bus,
785                                                  uint phy_mask,
786                                                  phy_interface_t interface)
787 {
788         int i;
789         struct phy_device *phydev;
790
791         phydev = search_for_existing_phy(bus, phy_mask, interface);
792         if (phydev)
793                 return phydev;
794         /* Try Standard (ie Clause 22) access */
795         /* Otherwise we have to try Clause 45 */
796         for (i = 0; i < 5; i++) {
797                 phydev = create_phy_by_mask(bus, phy_mask,
798                                             i ? i : MDIO_DEVAD_NONE, interface);
799                 if (IS_ERR(phydev))
800                         return NULL;
801                 if (phydev)
802                         return phydev;
803         }
804
805         debug("\n%s PHY: ", bus->name);
806         while (phy_mask) {
807                 int addr = ffs(phy_mask) - 1;
808
809                 debug("%d ", addr);
810                 phy_mask &= ~(1 << addr);
811         }
812         debug("not found\n");
813
814         return NULL;
815 }
816
817 /**
818  * get_phy_device - reads the specified PHY device and returns its
819  *                  @phy_device struct
820  * @bus: the target MII bus
821  * @addr: PHY address on the MII bus
822  *
823  * Description: Reads the ID registers of the PHY at @addr on the
824  *   @bus, then allocates and returns the phy_device to represent it.
825  */
826 static struct phy_device *get_phy_device(struct mii_dev *bus, int addr,
827                                          phy_interface_t interface)
828 {
829         return get_phy_device_by_mask(bus, 1 << addr, interface);
830 }
831
832 int phy_reset(struct phy_device *phydev)
833 {
834         int reg;
835         int timeout = 500;
836         int devad = MDIO_DEVAD_NONE;
837
838         if (phydev->flags & PHY_FLAG_BROKEN_RESET)
839                 return 0;
840
841 #ifdef CONFIG_PHYLIB_10G
842         /* If it's 10G, we need to issue reset through one of the MMDs */
843         if (is_10g_interface(phydev->interface)) {
844                 if (!phydev->mmds)
845                         gen10g_discover_mmds(phydev);
846
847                 devad = ffs(phydev->mmds) - 1;
848         }
849 #endif
850
851         if (phy_write(phydev, devad, MII_BMCR, BMCR_RESET) < 0) {
852                 debug("PHY reset failed\n");
853                 return -1;
854         }
855
856 #ifdef CONFIG_PHY_RESET_DELAY
857         udelay(CONFIG_PHY_RESET_DELAY); /* Intel LXT971A needs this */
858 #endif
859         /*
860          * Poll the control register for the reset bit to go to 0 (it is
861          * auto-clearing).  This should happen within 0.5 seconds per the
862          * IEEE spec.
863          */
864         reg = phy_read(phydev, devad, MII_BMCR);
865         while ((reg & BMCR_RESET) && timeout--) {
866                 reg = phy_read(phydev, devad, MII_BMCR);
867
868                 if (reg < 0) {
869                         debug("PHY status read failed\n");
870                         return -1;
871                 }
872                 udelay(1000);
873         }
874
875         if (reg & BMCR_RESET) {
876                 puts("PHY reset timed out\n");
877                 return -1;
878         }
879
880         return 0;
881 }
882
883 int miiphy_reset(const char *devname, unsigned char addr)
884 {
885         struct mii_dev *bus = miiphy_get_dev_by_name(devname);
886         struct phy_device *phydev;
887
888         /*
889          * miiphy_reset was only used on standard PHYs, so we'll fake it here.
890          * If later code tries to connect with the right interface, this will
891          * be corrected by get_phy_device in phy_connect()
892          */
893         phydev = get_phy_device(bus, addr, PHY_INTERFACE_MODE_MII);
894
895         return phy_reset(phydev);
896 }
897
898 struct phy_device *phy_find_by_mask(struct mii_dev *bus, uint phy_mask,
899                                     phy_interface_t interface)
900 {
901         /* Reset the bus */
902         if (bus->reset) {
903                 bus->reset(bus);
904
905                 /* Wait 15ms to make sure the PHY has come out of hard reset */
906                 mdelay(15);
907         }
908
909         return get_phy_device_by_mask(bus, phy_mask, interface);
910 }
911
912 #ifdef CONFIG_DM_ETH
913 void phy_connect_dev(struct phy_device *phydev, struct udevice *dev)
914 #else
915 void phy_connect_dev(struct phy_device *phydev, struct eth_device *dev)
916 #endif
917 {
918         /* Soft Reset the PHY */
919         phy_reset(phydev);
920         if (phydev->dev && phydev->dev != dev) {
921                 printf("%s:%d is connected to %s.  Reconnecting to %s\n",
922                        phydev->bus->name, phydev->addr,
923                        phydev->dev->name, dev->name);
924         }
925         phydev->dev = dev;
926         debug("%s connected to %s\n", dev->name, phydev->drv->name);
927 }
928
929 #ifdef CONFIG_PHY_XILINX_GMII2RGMII
930 #ifdef CONFIG_DM_ETH
931 static struct phy_device *phy_connect_gmii2rgmii(struct mii_dev *bus,
932                                                  struct udevice *dev,
933                                                  phy_interface_t interface)
934 #else
935 static struct phy_device *phy_connect_gmii2rgmii(struct mii_dev *bus,
936                                                  struct eth_device *dev,
937                                                  phy_interface_t interface)
938 #endif
939 {
940         struct phy_device *phydev = NULL;
941         int sn = dev_of_offset(dev);
942         int off;
943
944         while (sn > 0) {
945                 off = fdt_node_offset_by_compatible(gd->fdt_blob, sn,
946                                                     "xlnx,gmii-to-rgmii-1.0");
947                 if (off > 0) {
948                         phydev = phy_device_create(bus, off,
949                                                    PHY_GMII2RGMII_ID, false,
950                                                    interface);
951                         break;
952                 }
953                 if (off == -FDT_ERR_NOTFOUND)
954                         sn = fdt_first_subnode(gd->fdt_blob, sn);
955                 else
956                         printf("%s: Error finding compat string:%d\n",
957                                __func__, off);
958         }
959
960         return phydev;
961 }
962 #endif
963
964 #ifdef CONFIG_PHY_FIXED
965 #ifdef CONFIG_DM_ETH
966 static struct phy_device *phy_connect_fixed(struct mii_dev *bus,
967                                             struct udevice *dev,
968                                             phy_interface_t interface)
969 #else
970 static struct phy_device *phy_connect_fixed(struct mii_dev *bus,
971                                             struct eth_device *dev,
972                                             phy_interface_t interface)
973 #endif
974 {
975         struct phy_device *phydev = NULL;
976         int sn;
977         const char *name;
978
979         sn = fdt_first_subnode(gd->fdt_blob, dev_of_offset(dev));
980         while (sn > 0) {
981                 name = fdt_get_name(gd->fdt_blob, sn, NULL);
982                 if (name && strcmp(name, "fixed-link") == 0) {
983                         phydev = phy_device_create(bus, sn, PHY_FIXED_ID, false,
984                                                    interface);
985                         break;
986                 }
987                 sn = fdt_next_subnode(gd->fdt_blob, sn);
988         }
989
990         return phydev;
991 }
992 #endif
993
994 #ifdef CONFIG_DM_ETH
995 struct phy_device *phy_connect(struct mii_dev *bus, int addr,
996                                struct udevice *dev,
997                                phy_interface_t interface)
998 #else
999 struct phy_device *phy_connect(struct mii_dev *bus, int addr,
1000                                struct eth_device *dev,
1001                                phy_interface_t interface)
1002 #endif
1003 {
1004         struct phy_device *phydev = NULL;
1005         uint mask = (addr >= 0) ? (1 << addr) : 0xffffffff;
1006
1007 #ifdef CONFIG_PHY_FIXED
1008         phydev = phy_connect_fixed(bus, dev, interface);
1009 #endif
1010
1011 #ifdef CONFIG_PHY_NCSI
1012         if (!phydev)
1013                 phydev = phy_device_create(bus, 0, PHY_NCSI_ID, false, interface);
1014 #endif
1015
1016 #ifdef CONFIG_PHY_XILINX_GMII2RGMII
1017         if (!phydev)
1018                 phydev = phy_connect_gmii2rgmii(bus, dev, interface);
1019 #endif
1020
1021         if (!phydev)
1022                 phydev = phy_find_by_mask(bus, mask, interface);
1023
1024         if (phydev)
1025                 phy_connect_dev(phydev, dev);
1026         else
1027                 printf("Could not get PHY for %s: addr %d\n", bus->name, addr);
1028         return phydev;
1029 }
1030
1031 /*
1032  * Start the PHY.  Returns 0 on success, or a negative error code.
1033  */
1034 int phy_startup(struct phy_device *phydev)
1035 {
1036         if (phydev->drv->startup)
1037                 return phydev->drv->startup(phydev);
1038
1039         return 0;
1040 }
1041
1042 __weak int board_phy_config(struct phy_device *phydev)
1043 {
1044         if (phydev->drv->config)
1045                 return phydev->drv->config(phydev);
1046         return 0;
1047 }
1048
1049 int phy_config(struct phy_device *phydev)
1050 {
1051         /* Invoke an optional board-specific helper */
1052         return board_phy_config(phydev);
1053 }
1054
1055 int phy_shutdown(struct phy_device *phydev)
1056 {
1057         if (phydev->drv->shutdown)
1058                 phydev->drv->shutdown(phydev);
1059
1060         return 0;
1061 }
1062
1063 int phy_get_interface_by_name(const char *str)
1064 {
1065         int i;
1066
1067         for (i = 0; i < PHY_INTERFACE_MODE_COUNT; i++) {
1068                 if (!strcmp(str, phy_interface_strings[i]))
1069                         return i;
1070         }
1071
1072         return -1;
1073 }