]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - sys/dev/etherswitch/e6000sw/e6000sw.c
Add missing unlock in e6000sw driver
[FreeBSD/FreeBSD.git] / sys / dev / etherswitch / e6000sw / e6000sw.c
1 /*-
2  * Copyright (c) 2015 Semihalf
3  * Copyright (c) 2015 Stormshield
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  */
27
28 #include <sys/cdefs.h>
29 __FBSDID("$FreeBSD$");
30
31 #include <sys/types.h>
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/sockio.h>
35 #include <sys/kernel.h>
36 #include <sys/kthread.h>
37 #include <sys/socket.h>
38 #include <sys/module.h>
39 #include <sys/errno.h>
40 #include <sys/bus.h>
41 #include <sys/conf.h>
42 #include <sys/uio.h>
43 #include <sys/fcntl.h>
44
45 #include <net/if.h>
46 #include <net/if_media.h>
47 #include <net/if_types.h>
48
49 #include <machine/bus.h>
50 #include <machine/resource.h>
51
52 #include <arm/mv/mvwin.h>
53 #include <arm/mv/mvreg.h>
54 #include <arm/mv/mvvar.h>
55
56 #include <dev/etherswitch/etherswitch.h>
57 #include <dev/mdio/mdio.h>
58 #include <dev/mii/mii.h>
59 #include <dev/mii/miivar.h>
60 #include <dev/mge/if_mgevar.h>
61
62 #include <dev/fdt/fdt_common.h>
63 #include <dev/ofw/ofw_bus.h>
64 #include <dev/ofw/ofw_bus_subr.h>
65
66 #include "e6000swreg.h"
67 #include "etherswitch_if.h"
68 #include "miibus_if.h"
69 #include "mdio_if.h"
70
71 MALLOC_DECLARE(M_E6000SW);
72 MALLOC_DEFINE(M_E6000SW, "e6000sw", "e6000sw switch");
73
74 #define E6000SW_LOCK(_sc)                       \
75             sx_xlock(&(_sc)->sx)
76 #define E6000SW_UNLOCK(_sc)                     \
77             sx_unlock(&(_sc)->sx)
78 #define E6000SW_LOCK_ASSERT(_sc, _what)         \
79             sx_assert(&(_sc)->sx, (_what))
80 #define E6000SW_TRYLOCK(_sc)                    \
81             sx_tryxlock(&(_sc)->sx)
82
83 typedef struct e6000sw_softc {
84         device_t                dev;
85         phandle_t               node;
86
87         struct sx               sx;
88         struct ifnet            *ifp[E6000SW_MAX_PORTS];
89         char                    *ifname[E6000SW_MAX_PORTS];
90         device_t                miibus[E6000SW_MAX_PORTS];
91         struct mii_data         *mii[E6000SW_MAX_PORTS];
92         struct callout          tick_callout;
93
94         uint32_t                cpuports_mask;
95         uint32_t                fixed_mask;
96         int                     sw_addr;
97         int                     num_ports;
98         boolean_t               multi_chip;
99
100         int                     vid[E6000SW_NUM_VGROUPS];
101         int                     members[E6000SW_NUM_VGROUPS];
102         int                     vgroup[E6000SW_MAX_PORTS];
103 } e6000sw_softc_t;
104
105 static etherswitch_info_t etherswitch_info = {
106         .es_nports =            0,
107         .es_nvlangroups =       E6000SW_NUM_VGROUPS,
108         .es_name =              "Marvell 6000 series switch"
109 };
110
111 static void e6000sw_identify(driver_t *driver, device_t parent);
112 static int e6000sw_probe(device_t dev);
113 static int e6000sw_attach(device_t dev);
114 static int e6000sw_detach(device_t dev);
115 static int e6000sw_readphy(device_t dev, int phy, int reg);
116 static int e6000sw_writephy(device_t dev, int phy, int reg, int data);
117 static etherswitch_info_t* e6000sw_getinfo(device_t dev);
118 static void e6000sw_lock(device_t dev);
119 static void e6000sw_unlock(device_t dev);
120 static int e6000sw_getport(device_t dev, etherswitch_port_t *p);
121 static int e6000sw_setport(device_t dev, etherswitch_port_t *p);
122 static int e6000sw_readreg_wrapper(device_t dev, int addr_reg);
123 static int e6000sw_writereg_wrapper(device_t dev, int addr_reg, int val);
124 static int e6000sw_readphy_wrapper(device_t dev, int phy, int reg);
125 static int e6000sw_writephy_wrapper(device_t dev, int phy, int reg, int data);
126 static int e6000sw_getvgroup_wrapper(device_t dev, etherswitch_vlangroup_t *vg);
127 static int e6000sw_setvgroup_wrapper(device_t dev, etherswitch_vlangroup_t *vg);
128 static int e6000sw_setvgroup(device_t dev, etherswitch_vlangroup_t *vg);
129 static int e6000sw_getvgroup(device_t dev, etherswitch_vlangroup_t *vg);
130 static void e6000sw_setup(device_t dev, e6000sw_softc_t *sc);
131 static void e6000sw_port_vlan_conf(e6000sw_softc_t *sc);
132 static void e6000sw_tick(void *arg);
133 static void e6000sw_set_atustat(device_t dev, e6000sw_softc_t *sc, int bin,
134     int flag);
135 static int e6000sw_atu_flush(device_t dev, e6000sw_softc_t *sc, int flag);
136 static __inline void e6000sw_writereg(e6000sw_softc_t *sc, int addr, int reg,
137     int val);
138 static __inline uint32_t e6000sw_readreg(e6000sw_softc_t *sc, int addr,
139     int reg);
140 static int e6000sw_ifmedia_upd(struct ifnet *ifp);
141 static void e6000sw_ifmedia_sts(struct ifnet *ifp, struct ifmediareq *ifmr);
142 static int e6000sw_atu_mac_table(device_t dev, e6000sw_softc_t *sc, struct
143     atu_opt *atu, int flag);
144 static int e6000sw_get_pvid(e6000sw_softc_t *sc, int port, int *pvid);
145 static int e6000sw_set_pvid(e6000sw_softc_t *sc, int port, int pvid);
146 static __inline int e6000sw_is_cpuport(e6000sw_softc_t *sc, int port);
147 static __inline int e6000sw_is_fixedport(e6000sw_softc_t *sc, int port);
148 static __inline int e6000sw_is_phyport(e6000sw_softc_t *sc, int port);
149 static __inline struct mii_data *e6000sw_miiforphy(e6000sw_softc_t *sc,
150     unsigned int phy);
151
152 static struct proc *e6000sw_kproc;
153
154 static device_method_t e6000sw_methods[] = {
155         /* device interface */
156         DEVMETHOD(device_identify,              e6000sw_identify),
157         DEVMETHOD(device_probe,                 e6000sw_probe),
158         DEVMETHOD(device_attach,                e6000sw_attach),
159         DEVMETHOD(device_detach,                e6000sw_detach),
160
161         /* bus interface */
162         DEVMETHOD(bus_add_child,                device_add_child_ordered),
163
164         /* mii interface */
165         DEVMETHOD(miibus_readreg,               e6000sw_readphy),
166         DEVMETHOD(miibus_writereg,              e6000sw_writephy),
167
168         /* etherswitch interface */
169         DEVMETHOD(etherswitch_getinfo,          e6000sw_getinfo),
170         DEVMETHOD(etherswitch_lock,             e6000sw_lock),
171         DEVMETHOD(etherswitch_unlock,           e6000sw_unlock),
172         DEVMETHOD(etherswitch_getport,          e6000sw_getport),
173         DEVMETHOD(etherswitch_setport,          e6000sw_setport),
174         DEVMETHOD(etherswitch_readreg,          e6000sw_readreg_wrapper),
175         DEVMETHOD(etherswitch_writereg,         e6000sw_writereg_wrapper),
176         DEVMETHOD(etherswitch_readphyreg,       e6000sw_readphy_wrapper),
177         DEVMETHOD(etherswitch_writephyreg,      e6000sw_writephy_wrapper),
178         DEVMETHOD(etherswitch_setvgroup,        e6000sw_setvgroup_wrapper),
179         DEVMETHOD(etherswitch_getvgroup,        e6000sw_getvgroup_wrapper),
180
181         DEVMETHOD_END
182 };
183
184 static devclass_t e6000sw_devclass;
185
186 DEFINE_CLASS_0(e6000sw, e6000sw_driver, e6000sw_methods,
187     sizeof(e6000sw_softc_t));
188
189 DRIVER_MODULE(e6000sw, mdio, e6000sw_driver, e6000sw_devclass, 0, 0);
190 DRIVER_MODULE(etherswitch, e6000sw, etherswitch_driver, etherswitch_devclass, 0,
191     0);
192 DRIVER_MODULE(miibus, e6000sw, miibus_driver, miibus_devclass, 0, 0);
193 MODULE_DEPEND(e6000sw, mdio, 1, 1, 1);
194
195 #define SMI_CMD 0
196 #define SMI_CMD_BUSY    (1<<15)
197 #define SMI_CMD_OP_READ ((2<<10)|SMI_CMD_BUSY|(1<<12))
198 #define SMI_CMD_OP_WRITE        ((1<<10)|SMI_CMD_BUSY|(1<<12))
199 #define SMI_DATA        1
200
201 #define MDIO_READ(dev, addr, reg) MDIO_READREG(device_get_parent(dev), (addr), (reg))
202 #define MDIO_WRITE(dev, addr, reg, val) MDIO_WRITEREG(device_get_parent(dev), (addr), (reg), (val))
203 static void
204 e6000sw_identify(driver_t *driver, device_t parent)
205 {
206
207         if (device_find_child(parent, "e6000sw", -1) == NULL)
208                 BUS_ADD_CHILD(parent, 0, "e6000sw", -1);
209 }
210
211 static int
212 e6000sw_probe(device_t dev)
213 {
214         e6000sw_softc_t *sc;
215         const char *description;
216         unsigned int id;
217         phandle_t dsa_node, switch_node;
218
219         dsa_node = fdt_find_compatible(OF_finddevice("/"),
220             "marvell,dsa", 0);
221         switch_node = OF_child(dsa_node);
222
223         if (switch_node == 0)
224                 return (ENXIO);
225
226         sc = device_get_softc(dev);
227         bzero(sc, sizeof(e6000sw_softc_t));
228         sc->dev = dev;
229         sc->node = switch_node;
230
231         if (OF_getencprop(sc->node, "reg", &sc->sw_addr,
232             sizeof(sc->sw_addr)) < 0)
233                 return (ENXIO);
234         if (sc->sw_addr != 0 && (sc->sw_addr % 2) == 0)
235                 sc->multi_chip = true;
236
237         /* Lock is necessary due to assertions. */
238         sx_init(&sc->sx, "e6000sw");
239         E6000SW_LOCK(sc);
240
241         id = e6000sw_readreg(sc, REG_PORT(0), SWITCH_ID);
242
243         switch (id & 0xfff0) {
244         case 0x3520:
245                 description = "Marvell 88E6352";
246                 break;
247         case 0x1720:
248                 description = "Marvell 88E6172";
249                 break;
250         case 0x1760:
251                 description = "Marvell 88E6176";
252                 break;
253         default:
254                 E6000SW_UNLOCK(sc);
255                 sx_destroy(&sc->sx);
256                 device_printf(dev, "Unrecognized device, id 0x%x.\n", id);
257                 return (ENXIO);
258         }
259
260         device_set_desc(dev, description);
261
262         E6000SW_UNLOCK(sc);
263
264         return (BUS_PROBE_DEFAULT);
265 }
266
267 static int
268 e6000sw_parse_child_fdt(device_t dev, phandle_t child, uint32_t *fixed_mask,
269     uint32_t *cpu_mask, int *pport, int *pvlangroup)
270 {
271         char portlabel[100];
272         uint32_t port, vlangroup;
273         boolean_t fixed_link;
274
275         if (fixed_mask == NULL || cpu_mask == NULL || pport == NULL)
276                 return (ENXIO);
277
278         OF_getprop(child, "label", (void *)portlabel, 100);
279         OF_getencprop(child, "reg", (void *)&port, sizeof(port));
280
281         if (OF_getencprop(child, "vlangroup", (void *)&vlangroup,
282             sizeof(vlangroup)) > 0) {
283                 if (vlangroup >= E6000SW_NUM_VGROUPS)
284                         return (ENXIO);
285                 *pvlangroup = vlangroup;
286         } else {
287                 *pvlangroup = -1;
288         }
289
290         if (port >= E6000SW_MAX_PORTS)
291                 return (ENXIO);
292         *pport = port;
293
294         if (strncmp(portlabel, "cpu", 3) == 0) {
295                 device_printf(dev, "CPU port at %d\n", port);
296                 *cpu_mask |= (1 << port);
297                 return (0);
298         }
299
300         fixed_link = OF_child(child);
301         if (fixed_link) {
302                 *fixed_mask |= (1 << port);
303                 device_printf(dev, "fixed port at %d\n", port);
304         } else {
305                 device_printf(dev, "PHY at %d\n", port);
306         }
307
308         return (0);
309 }
310
311 static int
312 e6000sw_init_interface(e6000sw_softc_t *sc, int port)
313 {
314         char name[IFNAMSIZ];
315
316         snprintf(name, IFNAMSIZ, "%sport", device_get_nameunit(sc->dev));
317
318         sc->ifp[port] = if_alloc(IFT_ETHER);
319         if (sc->ifp[port] == NULL)
320                 return (ENOMEM);
321         sc->ifp[port]->if_softc = sc;
322         sc->ifp[port]->if_flags |= IFF_UP | IFF_BROADCAST |
323             IFF_DRV_RUNNING | IFF_SIMPLEX;
324         sc->ifname[port] = malloc(strlen(name) + 1, M_E6000SW, M_NOWAIT);
325         if (sc->ifname[port] == NULL) {
326                 if_free(sc->ifp[port]);
327                 return (ENOMEM);
328         }
329         memcpy(sc->ifname[port], name, strlen(name) + 1);
330         if_initname(sc->ifp[port], sc->ifname[port], port);
331
332         return (0);
333 }
334
335 static int
336 e6000sw_attach_miibus(e6000sw_softc_t *sc, int port)
337 {
338         int err;
339
340         err = mii_attach(sc->dev, &sc->miibus[port], sc->ifp[port],
341             e6000sw_ifmedia_upd, e6000sw_ifmedia_sts, BMSR_DEFCAPMASK,
342             port, MII_OFFSET_ANY, 0);
343         if (err != 0)
344                 return (err);
345
346         sc->mii[port] = device_get_softc(sc->miibus[port]);
347         return (0);
348 }
349
350 static int
351 e6000sw_attach(device_t dev)
352 {
353         e6000sw_softc_t *sc;
354         phandle_t child;
355         int err, port, vlangroup;
356         int member_ports[E6000SW_NUM_VGROUPS];
357         etherswitch_vlangroup_t vg;
358
359         err = 0;
360         sc = device_get_softc(dev);
361
362         if (sc->multi_chip)
363                 device_printf(dev, "multi-chip addressing mode\n");
364         else
365                 device_printf(dev, "single-chip addressing mode\n");
366
367         E6000SW_LOCK(sc);
368         e6000sw_setup(dev, sc);
369         bzero(member_ports, sizeof(member_ports));
370
371         for (child = OF_child(sc->node); child != 0; child = OF_peer(child)) {
372                 err = e6000sw_parse_child_fdt(dev, child, &sc->fixed_mask,
373                     &sc->cpuports_mask, &port, &vlangroup);
374                 if (err != 0) {
375                         device_printf(sc->dev, "failed to parse DTS\n");
376                         goto out_fail;
377                 }
378
379                 if (vlangroup != -1)
380                         member_ports[vlangroup] |= (1 << port);
381
382                 sc->num_ports++;
383
384                 err = e6000sw_init_interface(sc, port);
385                 if (err != 0) {
386                         device_printf(sc->dev, "failed to init interface\n");
387                         goto out_fail;
388                 }
389
390                 /* Don't attach miibus at CPU/fixed ports */
391                 if (!e6000sw_is_phyport(sc, port))
392                         continue;
393
394                 err = e6000sw_attach_miibus(sc, port);
395                 if (err != 0) {
396                         device_printf(sc->dev, "failed to attach miibus\n");
397                         goto out_fail;
398                 }
399         }
400
401         etherswitch_info.es_nports = sc->num_ports;
402         for (port = 0; port < sc->num_ports; port++)
403                 sc->vgroup[port] = E6000SW_PORT_NO_VGROUP;
404
405         /* Set VLAN configuration */
406         e6000sw_port_vlan_conf(sc);
407
408         /* Set vlangroups */
409         for (vlangroup = 0; vlangroup < E6000SW_NUM_VGROUPS; vlangroup++)
410                 if (member_ports[vlangroup] != 0) {
411                         vg.es_vlangroup = vg.es_vid = vlangroup;
412                         vg.es_member_ports = vg.es_untagged_ports =
413                             member_ports[vlangroup];
414                         e6000sw_setvgroup(dev, &vg);
415                 }
416
417         E6000SW_UNLOCK(sc);
418
419         bus_generic_probe(dev);
420         bus_generic_attach(dev);
421
422         kproc_create(e6000sw_tick, sc, &e6000sw_kproc, 0, 0,
423             "e6000sw tick kproc");
424
425         return (0);
426
427 out_fail:
428         E6000SW_UNLOCK(sc);
429         e6000sw_detach(dev);
430
431         return (err);
432 }
433
434 static __inline void
435 e6000sw_poll_done(e6000sw_softc_t *sc)
436 {
437
438         while (e6000sw_readreg(sc, REG_GLOBAL2, PHY_CMD) &
439             (1 << PHY_CMD_SMI_BUSY))
440                 continue;
441 }
442
443 /*
444  * PHY registers are paged. Put page index in reg 22 (accessible from every
445  * page), then access specific register.
446  */
447 static int
448 e6000sw_readphy(device_t dev, int phy, int reg)
449 {
450         e6000sw_softc_t *sc;
451         uint32_t val;
452
453         sc = device_get_softc(dev);
454         val = 0;
455
456         if (!e6000sw_is_phyport(sc, phy) || reg >= E6000SW_NUM_PHY_REGS) {
457                 device_printf(dev, "Wrong register address.\n");
458                 return (EINVAL);
459         }
460
461         E6000SW_LOCK_ASSERT(sc, SA_XLOCKED);
462
463         e6000sw_poll_done(sc);
464         val |= 1 << PHY_CMD_SMI_BUSY;
465         val |= PHY_CMD_MODE_MDIO << PHY_CMD_MODE;
466         val |= PHY_CMD_OPCODE_READ << PHY_CMD_OPCODE;
467         val |= (reg << PHY_CMD_REG_ADDR) & PHY_CMD_REG_ADDR_MASK;
468         val |= (phy << PHY_CMD_DEV_ADDR) & PHY_CMD_DEV_ADDR_MASK;
469         e6000sw_writereg(sc, REG_GLOBAL2, SMI_PHY_CMD_REG, val);
470         e6000sw_poll_done(sc);
471         val = e6000sw_readreg(sc, REG_GLOBAL2, SMI_PHY_DATA_REG)
472                 & PHY_DATA_MASK;
473
474         return (val);
475 }
476
477 static int
478 e6000sw_writephy(device_t dev, int phy, int reg, int data)
479 {
480         e6000sw_softc_t *sc;
481         uint32_t val;
482
483         sc = device_get_softc(dev);
484         val = 0;
485
486         if (!e6000sw_is_phyport(sc, phy) || reg >= E6000SW_NUM_PHY_REGS) {
487                 device_printf(dev, "Wrong register address.\n");
488                 return (EINVAL);
489         }
490
491         E6000SW_LOCK_ASSERT(sc, SA_XLOCKED);
492
493         e6000sw_poll_done(sc);
494         val |= PHY_CMD_MODE_MDIO << PHY_CMD_MODE;
495         val |= 1 << PHY_CMD_SMI_BUSY;
496         val |= PHY_CMD_OPCODE_WRITE << PHY_CMD_OPCODE;
497         val |= (reg << PHY_CMD_REG_ADDR) & PHY_CMD_REG_ADDR_MASK;
498         val |= (phy << PHY_CMD_DEV_ADDR) & PHY_CMD_DEV_ADDR_MASK;
499         e6000sw_writereg(sc, REG_GLOBAL2, SMI_PHY_DATA_REG,
500                          data & PHY_DATA_MASK);
501         e6000sw_writereg(sc, REG_GLOBAL2, SMI_PHY_CMD_REG, val);
502         e6000sw_poll_done(sc);
503
504         return (0);
505 }
506
507 static int
508 e6000sw_detach(device_t dev)
509 {
510         int phy;
511         e6000sw_softc_t *sc;
512
513         sc = device_get_softc(dev);
514         bus_generic_detach(dev);
515         sx_destroy(&sc->sx);
516         for (phy = 0; phy < sc->num_ports; phy++) {
517                 if (sc->miibus[phy] != NULL)
518                         device_delete_child(dev, sc->miibus[phy]);
519                 if (sc->ifp[phy] != NULL)
520                         if_free(sc->ifp[phy]);
521                 if (sc->ifname[phy] != NULL)
522                         free(sc->ifname[phy], M_E6000SW);
523         }
524
525         return (0);
526 }
527
528 static etherswitch_info_t*
529 e6000sw_getinfo(device_t dev)
530 {
531
532         return (&etherswitch_info);
533 }
534
535 static void
536 e6000sw_lock(device_t dev)
537 {
538         struct e6000sw_softc *sc;
539
540         sc = device_get_softc(dev);
541
542         E6000SW_LOCK_ASSERT(sc, SA_UNLOCKED);
543         E6000SW_LOCK(sc);
544 }
545
546 static void
547 e6000sw_unlock(device_t dev)
548 {
549         struct e6000sw_softc *sc;
550
551         sc = device_get_softc(dev);
552
553         E6000SW_LOCK_ASSERT(sc, SA_XLOCKED);
554         E6000SW_UNLOCK(sc);
555 }
556
557 static int
558 e6000sw_getport(device_t dev, etherswitch_port_t *p)
559 {
560         struct mii_data *mii;
561         int err;
562         struct ifmediareq *ifmr;
563
564         err = 0;
565         e6000sw_softc_t *sc = device_get_softc(dev);
566         E6000SW_LOCK_ASSERT(sc, SA_UNLOCKED);
567
568         E6000SW_LOCK(sc);
569
570         if (p->es_port >= sc->num_ports ||
571             p->es_port < 0) {
572                 err = EINVAL;
573                 goto out;
574         }
575
576         e6000sw_get_pvid(sc, p->es_port, &p->es_pvid);
577
578         if (e6000sw_is_cpuport(sc, p->es_port)) {
579                 p->es_flags |= ETHERSWITCH_PORT_CPU;
580                 ifmr = &p->es_ifmr;
581                 ifmr->ifm_status = IFM_ACTIVE | IFM_AVALID;
582                 ifmr->ifm_count = 0;
583                 ifmr->ifm_current = ifmr->ifm_active =
584                     IFM_ETHER | IFM_1000_T | IFM_FDX;
585                 ifmr->ifm_mask = 0;
586         } else if (e6000sw_is_fixedport(sc, p->es_port)) {
587                 ifmr = &p->es_ifmr;
588                 ifmr->ifm_status = IFM_ACTIVE | IFM_AVALID;
589                 ifmr->ifm_count = 0;
590                 ifmr->ifm_current = ifmr->ifm_active =
591                     IFM_ETHER | IFM_1000_T | IFM_FDX;
592                 ifmr->ifm_mask = 0;
593         } else {
594                 mii = e6000sw_miiforphy(sc, p->es_port);
595                 err = ifmedia_ioctl(mii->mii_ifp, &p->es_ifr,
596                     &mii->mii_media, SIOCGIFMEDIA);
597         }
598
599 out:
600         E6000SW_UNLOCK(sc);
601         return (err);
602 }
603
604 static int
605 e6000sw_setport(device_t dev, etherswitch_port_t *p)
606 {
607         e6000sw_softc_t *sc;
608         int err;
609         struct mii_data *mii;
610
611         err = 0;
612         sc = device_get_softc(dev);
613         E6000SW_LOCK_ASSERT(sc, SA_UNLOCKED);
614
615         E6000SW_LOCK(sc);
616
617         if (p->es_port >= sc->num_ports ||
618             p->es_port < 0) {
619                 err = EINVAL;
620                 goto out;
621         }
622
623         if (p->es_pvid != 0)
624                 e6000sw_set_pvid(sc, p->es_port, p->es_pvid);
625         if (!e6000sw_is_cpuport(sc, p->es_port)) {
626                 mii = e6000sw_miiforphy(sc, p->es_port);
627                 err = ifmedia_ioctl(mii->mii_ifp, &p->es_ifr, &mii->mii_media,
628                     SIOCSIFMEDIA);
629         }
630
631 out:
632         E6000SW_UNLOCK(sc);
633         return (err);
634 }
635
636 /*
637  * Registers in this switch are divided into sections, specified in
638  * documentation. So as to access any of them, section index and reg index
639  * is necessary. etherswitchcfg uses only one variable, so indexes were
640  * compressed into addr_reg: 32 * section_index + reg_index.
641  */
642 static int
643 e6000sw_readreg_wrapper(device_t dev, int addr_reg)
644 {
645
646         if ((addr_reg > (REG_GLOBAL2 * 32 + REG_NUM_MAX)) ||
647             (addr_reg < (REG_PORT(0) * 32))) {
648                 device_printf(dev, "Wrong register address.\n");
649                 return (EINVAL);
650         }
651
652         return (e6000sw_readreg(device_get_softc(dev), addr_reg / 32,
653             addr_reg % 32));
654 }
655
656 static int
657 e6000sw_writereg_wrapper(device_t dev, int addr_reg, int val)
658 {
659
660         if ((addr_reg > (REG_GLOBAL2 * 32 + REG_NUM_MAX)) ||
661             (addr_reg < (REG_PORT(0) * 32))) {
662                 device_printf(dev, "Wrong register address.\n");
663                 return (EINVAL);
664         }
665         e6000sw_writereg(device_get_softc(dev), addr_reg / 5,
666             addr_reg % 32, val);
667
668         return (0);
669 }
670
671 /*
672  * These wrappers are necessary because PHY accesses from etherswitchcfg
673  * need to be synchronized with locks, while miibus PHY accesses do not.
674  */
675 static int
676 e6000sw_readphy_wrapper(device_t dev, int phy, int reg)
677 {
678         e6000sw_softc_t *sc;
679         int ret;
680
681         sc = device_get_softc(dev);
682         E6000SW_LOCK_ASSERT(sc, SA_UNLOCKED);
683
684         E6000SW_LOCK(sc);
685         ret = e6000sw_readphy(dev, phy, reg);
686         E6000SW_UNLOCK(sc);
687
688         return (ret);
689 }
690
691 static int
692 e6000sw_writephy_wrapper(device_t dev, int phy, int reg, int data)
693 {
694         e6000sw_softc_t *sc;
695         int ret;
696
697         sc = device_get_softc(dev);
698         E6000SW_LOCK_ASSERT(sc, SA_UNLOCKED);
699
700         E6000SW_LOCK(sc);
701         ret = e6000sw_writephy(dev, phy, reg, data);
702         E6000SW_UNLOCK(sc);
703
704         return (ret);
705 }
706
707 /*
708  * setvgroup/getvgroup called from etherswitchfcg need to be locked,
709  * while internal calls do not.
710  */
711 static int
712 e6000sw_setvgroup_wrapper(device_t dev, etherswitch_vlangroup_t *vg)
713 {
714         e6000sw_softc_t *sc;
715         int ret;
716
717         sc = device_get_softc(dev);
718         E6000SW_LOCK_ASSERT(sc, SA_UNLOCKED);
719
720         E6000SW_LOCK(sc);
721         ret = e6000sw_setvgroup(dev, vg);
722         E6000SW_UNLOCK(sc);
723
724         return (ret);
725 }
726
727 static int
728 e6000sw_getvgroup_wrapper(device_t dev, etherswitch_vlangroup_t *vg)
729 {
730         e6000sw_softc_t *sc;
731         int ret;
732
733         sc = device_get_softc(dev);
734         E6000SW_LOCK_ASSERT(sc, SA_UNLOCKED);
735
736         E6000SW_LOCK(sc);
737         ret = e6000sw_getvgroup(dev, vg);
738         E6000SW_UNLOCK(sc);
739
740         return (ret);
741 }
742
743 static __inline void
744 e6000sw_flush_port(e6000sw_softc_t *sc, int port)
745 {
746         uint32_t reg;
747
748         reg = e6000sw_readreg(sc, REG_PORT(port),
749             PORT_VLAN_MAP);
750         reg &= ~PORT_VLAN_MAP_TABLE_MASK;
751         reg &= ~PORT_VLAN_MAP_FID_MASK;
752         e6000sw_writereg(sc, REG_PORT(port),
753             PORT_VLAN_MAP, reg);
754         if (sc->vgroup[port] != E6000SW_PORT_NO_VGROUP) {
755                 /*
756                  * If port belonged somewhere, owner-group
757                  * should have its entry removed.
758                  */
759                 sc->members[sc->vgroup[port]] &= ~(1 << port);
760                 sc->vgroup[port] = E6000SW_PORT_NO_VGROUP;
761         }
762 }
763
764 static __inline void
765 e6000sw_port_assign_vgroup(e6000sw_softc_t *sc, int port, int fid, int vgroup,
766     int members)
767 {
768         uint32_t reg;
769
770         reg = e6000sw_readreg(sc, REG_PORT(port),
771             PORT_VLAN_MAP);
772         reg &= ~PORT_VLAN_MAP_TABLE_MASK;
773         reg &= ~PORT_VLAN_MAP_FID_MASK;
774         reg |= members & ~(1 << port);
775         reg |= (fid << PORT_VLAN_MAP_FID) & PORT_VLAN_MAP_FID_MASK;
776         e6000sw_writereg(sc, REG_PORT(port), PORT_VLAN_MAP,
777             reg);
778         sc->vgroup[port] = vgroup;
779 }
780
781 static int
782 e6000sw_setvgroup(device_t dev, etherswitch_vlangroup_t *vg)
783 {
784         e6000sw_softc_t *sc;
785         int port, fid;
786
787         sc = device_get_softc(dev);
788         E6000SW_LOCK_ASSERT(sc, SA_XLOCKED);
789
790         if (vg->es_vlangroup >= E6000SW_NUM_VGROUPS)
791                 return (EINVAL);
792         if (vg->es_member_ports != vg->es_untagged_ports) {
793                 device_printf(dev, "Tagged ports not supported.\n");
794                 return (EINVAL);
795         }
796
797         vg->es_untagged_ports &= PORT_VLAN_MAP_TABLE_MASK;
798         fid = vg->es_vlangroup + 1;
799         for (port = 0; port < sc->num_ports; port++) {
800                 if ((sc->members[vg->es_vlangroup] & (1 << port)) ||
801                     (vg->es_untagged_ports & (1 << port)))
802                         e6000sw_flush_port(sc, port);
803                 if (vg->es_untagged_ports & (1 << port))
804                         e6000sw_port_assign_vgroup(sc, port, fid,
805                             vg->es_vlangroup, vg->es_untagged_ports);
806         }
807         sc->vid[vg->es_vlangroup] = vg->es_vid;
808         sc->members[vg->es_vlangroup] = vg->es_untagged_ports;
809
810         return (0);
811 }
812
813 static int
814 e6000sw_getvgroup(device_t dev, etherswitch_vlangroup_t *vg)
815 {
816         e6000sw_softc_t *sc;
817
818         sc = device_get_softc(dev);
819         E6000SW_LOCK_ASSERT(sc, SA_XLOCKED);
820
821         if (vg->es_vlangroup >= E6000SW_NUM_VGROUPS)
822                 return (EINVAL);
823         vg->es_untagged_ports = vg->es_member_ports =
824             sc->members[vg->es_vlangroup];
825         vg->es_vid = ETHERSWITCH_VID_VALID;
826
827         return (0);
828 }
829
830 static __inline struct mii_data*
831 e6000sw_miiforphy(e6000sw_softc_t *sc, unsigned int phy)
832 {
833
834         if (!e6000sw_is_phyport(sc, phy))
835                 return (NULL);
836
837         return (device_get_softc(sc->miibus[phy]));
838 }
839
840 static int
841 e6000sw_ifmedia_upd(struct ifnet *ifp)
842 {
843         e6000sw_softc_t *sc;
844         struct mii_data *mii;
845
846         sc = ifp->if_softc;
847         mii = e6000sw_miiforphy(sc, ifp->if_dunit);
848         if (mii == NULL)
849                 return (ENXIO);
850         mii_mediachg(mii);
851
852         return (0);
853 }
854
855 static void
856 e6000sw_ifmedia_sts(struct ifnet *ifp, struct ifmediareq *ifmr)
857 {
858         e6000sw_softc_t *sc;
859         struct mii_data *mii;
860
861         sc = ifp->if_softc;
862         mii = e6000sw_miiforphy(sc, ifp->if_dunit);
863
864         if (mii == NULL)
865                 return;
866
867         mii_pollstat(mii);
868         ifmr->ifm_active = mii->mii_media_active;
869         ifmr->ifm_status = mii->mii_media_status;
870 }
871
872
873 static int
874 e6000sw_smi_waitready(e6000sw_softc_t *sc, int phy)
875 {
876         int i;
877
878         for (i = 0; i < E6000SW_SMI_TIMEOUT; i++) {
879                 if ((MDIO_READ(sc->dev, phy, SMI_CMD)
880                      & SMI_CMD_BUSY) == 0)
881                         return 0;
882         }
883
884         return 1;
885 }
886
887 static __inline uint32_t
888 e6000sw_readreg(e6000sw_softc_t *sc, int addr, int reg)
889 {
890
891         E6000SW_LOCK_ASSERT(sc, SA_XLOCKED);
892
893         if (!sc->multi_chip)
894                 return (MDIO_READ(sc->dev, addr, reg) & 0xffff);
895
896         if (e6000sw_smi_waitready(sc, sc->sw_addr)) {
897                 printf("e6000sw: readreg timeout\n");
898                 return (0xffff);
899         }
900         MDIO_WRITE(sc->dev, sc->sw_addr, SMI_CMD, SMI_CMD_OP_READ |
901                    (addr << 5) | reg);
902         if (e6000sw_smi_waitready(sc, sc->sw_addr)) {
903                 printf("e6000sw: readreg timeout\n");
904                 return (0xffff);
905         }
906
907         return (MDIO_READ(sc->dev, sc->sw_addr, SMI_DATA) & 0xffff);
908 }
909
910 static __inline void
911 e6000sw_writereg(e6000sw_softc_t *sc, int addr, int reg, int val)
912 {
913
914         E6000SW_LOCK_ASSERT(sc, SA_XLOCKED);
915
916         if (!sc->multi_chip) {
917                 MDIO_WRITE(sc->dev, addr, reg, val);
918                 return;
919         }
920
921         if (e6000sw_smi_waitready(sc, sc->sw_addr)) {
922                 printf("e6000sw: readreg timeout\n");
923                 return;
924         }
925         MDIO_WRITE(sc->dev, sc->sw_addr, SMI_DATA, val);
926         MDIO_WRITE(sc->dev, sc->sw_addr, SMI_CMD, SMI_CMD_OP_WRITE |
927                    (addr << 5) | reg);
928         if (e6000sw_smi_waitready(sc, sc->sw_addr)) {
929                 printf("e6000sw: readreg timeout\n");
930                 return;
931         }
932
933         return;
934 }
935
936 static __inline int
937 e6000sw_is_cpuport(e6000sw_softc_t *sc, int port)
938 {
939
940         return (sc->cpuports_mask & (1 << port));
941 }
942
943 static __inline int
944 e6000sw_is_fixedport(e6000sw_softc_t *sc, int port)
945 {
946
947         return (sc->fixed_mask & (1 << port));
948 }
949
950 static __inline int
951 e6000sw_is_phyport(e6000sw_softc_t *sc, int port)
952 {
953         uint32_t phy_mask;
954         phy_mask = ~(sc->fixed_mask | sc->cpuports_mask);
955
956         return (phy_mask & (1 << port));
957 }
958
959 static __inline int
960 e6000sw_set_pvid(e6000sw_softc_t *sc, int port, int pvid)
961 {
962
963         e6000sw_writereg(sc, REG_PORT(port), PORT_VID, pvid &
964             PORT_VID_DEF_VID_MASK);
965
966         return (0);
967 }
968
969 static __inline int
970 e6000sw_get_pvid(e6000sw_softc_t *sc, int port, int *pvid)
971 {
972
973         if (pvid == NULL)
974                 return (ENXIO);
975
976         *pvid = e6000sw_readreg(sc, REG_PORT(port), PORT_VID) &
977             PORT_VID_DEF_VID_MASK;
978
979         return (0);
980 }
981
982 static void
983 e6000sw_tick (void *arg)
984 {
985         e6000sw_softc_t *sc;
986         struct mii_softc *miisc;
987         int port;
988
989         sc = arg;
990
991         E6000SW_LOCK_ASSERT(sc, SA_UNLOCKED);
992         for (;;) {
993                 E6000SW_LOCK(sc);
994                 for (port = 0; port < sc->num_ports; port++) {
995                         /* Tick only on PHY ports */
996                         if (!e6000sw_is_phyport(sc, port))
997                                 continue;
998                         mii_tick(sc->mii[port]);
999                         LIST_FOREACH(miisc, &sc->mii[port]->mii_phys, mii_list) {
1000                                 if (IFM_INST(sc->mii[port]->mii_media.ifm_cur->ifm_media)
1001                                     != miisc->mii_inst)
1002                                         continue;
1003                                 mii_phy_update(miisc, MII_POLLSTAT);
1004                         }
1005                 }
1006                 E6000SW_UNLOCK(sc);
1007                 pause("e6000sw tick", 1000);
1008         }
1009 }
1010
1011 static void
1012 e6000sw_setup(device_t dev, e6000sw_softc_t *sc)
1013 {
1014         uint16_t atu_ctrl, atu_age;
1015
1016         /* Set aging time */
1017         e6000sw_writereg(sc, REG_GLOBAL, ATU_CONTROL,
1018             (E6000SW_DEFAULT_AGETIME << ATU_CONTROL_AGETIME) |
1019             (1 << ATU_CONTROL_LEARN2ALL));
1020
1021         /* Send all with specific mac address to cpu port */
1022         e6000sw_writereg(sc, REG_GLOBAL2, MGMT_EN_2x, MGMT_EN_ALL);
1023         e6000sw_writereg(sc, REG_GLOBAL2, MGMT_EN_0x, MGMT_EN_ALL);
1024
1025         /* Disable Remote Management */
1026         e6000sw_writereg(sc, REG_GLOBAL, SWITCH_GLOBAL_CONTROL2, 0);
1027
1028         /* Disable loopback filter and flow control messages */
1029         e6000sw_writereg(sc, REG_GLOBAL2, SWITCH_MGMT,
1030             SWITCH_MGMT_PRI_MASK |
1031             (1 << SWITCH_MGMT_RSVD2CPU) |
1032             SWITCH_MGMT_FC_PRI_MASK |
1033             (1 << SWITCH_MGMT_FORCEFLOW));
1034
1035         e6000sw_atu_flush(dev, sc, NO_OPERATION);
1036         e6000sw_atu_mac_table(dev, sc, NULL, NO_OPERATION);
1037         e6000sw_set_atustat(dev, sc, 0, COUNT_ALL);
1038
1039         /* Set ATU AgeTime to 15 seconds */
1040         atu_age = 1;
1041
1042         atu_ctrl = e6000sw_readreg(sc, REG_GLOBAL, ATU_CONTROL);
1043
1044         /* Set new AgeTime field */
1045         atu_ctrl &= ~ATU_CONTROL_AGETIME_MASK;
1046         e6000sw_writereg(sc, REG_GLOBAL, ATU_CONTROL, atu_ctrl |
1047             (atu_age << ATU_CONTROL_AGETIME));
1048 }
1049
1050 static void
1051 e6000sw_port_vlan_conf(e6000sw_softc_t *sc)
1052 {
1053         int port, ret;
1054         device_t dev;
1055
1056         dev = sc->dev;
1057         /* Disable all ports */
1058         for (port = 0; port < sc->num_ports; port++) {
1059                 ret = e6000sw_readreg(sc, REG_PORT(port), PORT_CONTROL);
1060                 e6000sw_writereg(sc, REG_PORT(port), PORT_CONTROL,
1061                     (ret & ~PORT_CONTROL_ENABLE));
1062         }
1063
1064         /* Set port priority */
1065         for (port = 0; port < sc->num_ports; port++) {
1066                 ret = e6000sw_readreg(sc, REG_PORT(port), PORT_VID);
1067                 ret &= ~PORT_VID_PRIORITY_MASK;
1068                 e6000sw_writereg(sc, REG_PORT(port), PORT_VID, ret);
1069         }
1070
1071         /* Set VID map */
1072         for (port = 0; port < sc->num_ports; port++) {
1073                 ret = e6000sw_readreg(sc, REG_PORT(port), PORT_VID);
1074                 ret &= ~PORT_VID_DEF_VID_MASK;
1075                 ret |= (port + 1);
1076                 e6000sw_writereg(sc, REG_PORT(port), PORT_VID, ret);
1077         }
1078
1079         /* Enable all ports */
1080         for (port = 0; port < sc->num_ports; port++) {
1081                 ret = e6000sw_readreg(sc, REG_PORT(port), PORT_CONTROL);
1082                 e6000sw_writereg(sc, REG_PORT(port), PORT_CONTROL, (ret |
1083                     PORT_CONTROL_ENABLE));
1084         }
1085 }
1086
1087 static void
1088 e6000sw_set_atustat(device_t dev, e6000sw_softc_t *sc, int bin, int flag)
1089 {
1090         uint16_t ret;
1091
1092         ret = e6000sw_readreg(sc, REG_GLOBAL2, ATU_STATS);
1093         e6000sw_writereg(sc, REG_GLOBAL2, ATU_STATS, (bin << ATU_STATS_BIN ) |
1094             (flag << ATU_STATS_FLAG));
1095 }
1096
1097 static int
1098 e6000sw_atu_mac_table(device_t dev, e6000sw_softc_t *sc, struct atu_opt *atu,
1099     int flag)
1100 {
1101         uint16_t ret_opt;
1102         uint16_t ret_data;
1103         int retries;
1104
1105         if (flag == NO_OPERATION)
1106                 return (0);
1107         else if ((flag & (LOAD_FROM_FIB | PURGE_FROM_FIB | GET_NEXT_IN_FIB |
1108             GET_VIOLATION_DATA | CLEAR_VIOLATION_DATA)) == 0) {
1109                 device_printf(dev, "Wrong Opcode for ATU operation\n");
1110                 return (EINVAL);
1111         }
1112
1113         ret_opt = e6000sw_readreg(sc, REG_GLOBAL, ATU_OPERATION);
1114
1115         if (ret_opt & ATU_UNIT_BUSY) {
1116                 device_printf(dev, "ATU unit is busy, cannot access"
1117                     "register\n");
1118                 return (EBUSY);
1119         } else {
1120                 if(flag & LOAD_FROM_FIB) {
1121                         ret_data = e6000sw_readreg(sc, REG_GLOBAL, ATU_DATA);
1122                         e6000sw_writereg(sc, REG_GLOBAL2, ATU_DATA, (ret_data &
1123                             ~ENTRY_STATE));
1124                 }
1125                 e6000sw_writereg(sc, REG_GLOBAL, ATU_MAC_ADDR01, atu->mac_01);
1126                 e6000sw_writereg(sc, REG_GLOBAL, ATU_MAC_ADDR23, atu->mac_23);
1127                 e6000sw_writereg(sc, REG_GLOBAL, ATU_MAC_ADDR45, atu->mac_45);
1128                 e6000sw_writereg(sc, REG_GLOBAL, ATU_FID, atu->fid);
1129
1130                 e6000sw_writereg(sc, REG_GLOBAL, ATU_OPERATION, (ret_opt |
1131                     ATU_UNIT_BUSY | flag));
1132
1133                 retries = E6000SW_RETRIES;
1134                 while (--retries & (e6000sw_readreg(sc, REG_GLOBAL,
1135                     ATU_OPERATION) & ATU_UNIT_BUSY))
1136                         DELAY(1);
1137
1138                 if (retries == 0)
1139                         device_printf(dev, "Timeout while flushing\n");
1140                 else if (flag & GET_NEXT_IN_FIB) {
1141                         atu->mac_01 = e6000sw_readreg(sc, REG_GLOBAL,
1142                             ATU_MAC_ADDR01);
1143                         atu->mac_23 = e6000sw_readreg(sc, REG_GLOBAL,
1144                             ATU_MAC_ADDR23);
1145                         atu->mac_45 = e6000sw_readreg(sc, REG_GLOBAL,
1146                             ATU_MAC_ADDR45);
1147                 }
1148         }
1149
1150         return (0);
1151 }
1152
1153 static int
1154 e6000sw_atu_flush(device_t dev, e6000sw_softc_t *sc, int flag)
1155 {
1156         uint16_t ret;
1157         int retries;
1158
1159         if (flag == NO_OPERATION)
1160                 return (0);
1161
1162         ret = e6000sw_readreg(sc, REG_GLOBAL, ATU_OPERATION);
1163         if (ret & ATU_UNIT_BUSY) {
1164                 device_printf(dev, "Atu unit is busy, cannot flush\n");
1165                 return (EBUSY);
1166         } else {
1167                 e6000sw_writereg(sc, REG_GLOBAL, ATU_OPERATION, (ret |
1168                     ATU_UNIT_BUSY | flag));
1169                 retries = E6000SW_RETRIES;
1170                 while (--retries & (e6000sw_readreg(sc, REG_GLOBAL,
1171                     ATU_OPERATION) & ATU_UNIT_BUSY))
1172                         DELAY(1);
1173
1174                 if (retries == 0)
1175                         device_printf(dev, "Timeout while flushing\n");
1176         }
1177
1178         return (0);
1179 }