FreeBSD/Linux Kernel Cross Reference
sys/dev/netif/sk/if_sk.c
1 /*
2 * Copyright (c) 1997, 1998, 1999, 2000
3 * Bill Paul <wpaul@ctr.columbia.edu>. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by Bill Paul.
16 * 4. Neither the name of the author nor the names of any co-contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL Bill Paul OR THE VOICES IN HIS HEAD
24 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
30 * THE POSSIBILITY OF SUCH DAMAGE.
31 *
32 * $OpenBSD: if_sk.c,v 1.129 2006/10/16 12:30:08 tom Exp $
33 * $FreeBSD: /c/ncvs/src/sys/pci/if_sk.c,v 1.20 2000/04/22 02:16:37 wpaul Exp $
34 */
35
36 /*
37 * Copyright (c) 2003 Nathan L. Binkert <binkertn@umich.edu>
38 *
39 * Permission to use, copy, modify, and distribute this software for any
40 * purpose with or without fee is hereby granted, provided that the above
41 * copyright notice and this permission notice appear in all copies.
42 *
43 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
44 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
45 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
46 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
47 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
48 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
49 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
50 */
51
52 /*
53 * SysKonnect SK-NET gigabit ethernet driver for FreeBSD. Supports
54 * the SK-984x series adapters, both single port and dual port.
55 * References:
56 * The XaQti XMAC II datasheet,
57 * http://www.freebsd.org/~wpaul/SysKonnect/xmacii_datasheet_rev_c_9-29.pdf
58 * The SysKonnect GEnesis manual, http://www.syskonnect.com
59 *
60 * Note: XaQti has been acquired by Vitesse, and Vitesse does not have the
61 * XMAC II datasheet online. I have put my copy at people.freebsd.org as a
62 * convenience to others until Vitesse corrects this problem:
63 *
64 * http://people.freebsd.org/~wpaul/SysKonnect/xmacii_datasheet_rev_c_9-29.pdf
65 *
66 * Written by Bill Paul <wpaul@ee.columbia.edu>
67 * Department of Electrical Engineering
68 * Columbia University, New York City
69 */
70
71 /*
72 * The SysKonnect gigabit ethernet adapters consist of two main
73 * components: the SysKonnect GEnesis controller chip and the XaQti Corp.
74 * XMAC II gigabit ethernet MAC. The XMAC provides all of the MAC
75 * components and a PHY while the GEnesis controller provides a PCI
76 * interface with DMA support. Each card may have between 512K and
77 * 2MB of SRAM on board depending on the configuration.
78 *
79 * The SysKonnect GEnesis controller can have either one or two XMAC
80 * chips connected to it, allowing single or dual port NIC configurations.
81 * SysKonnect has the distinction of being the only vendor on the market
82 * with a dual port gigabit ethernet NIC. The GEnesis provides dual FIFOs,
83 * dual DMA queues, packet/MAC/transmit arbiters and direct access to the
84 * XMAC registers. This driver takes advantage of these features to allow
85 * both XMACs to operate as independent interfaces.
86 */
87
88 #include <sys/param.h>
89 #include <sys/bus.h>
90 #include <sys/endian.h>
91 #include <sys/in_cksum.h>
92 #include <sys/kernel.h>
93 #include <sys/interrupt.h>
94 #include <sys/mbuf.h>
95 #include <sys/malloc.h>
96 #include <sys/queue.h>
97 #include <sys/rman.h>
98 #include <sys/serialize.h>
99 #include <sys/socket.h>
100 #include <sys/sockio.h>
101 #include <sys/sysctl.h>
102
103 #include <net/bpf.h>
104 #include <net/ethernet.h>
105 #include <net/if.h>
106 #include <net/if_arp.h>
107 #include <net/if_dl.h>
108 #include <net/if_media.h>
109 #include <net/ifq_var.h>
110 #include <net/vlan/if_vlan_var.h>
111
112 #include <netinet/ip.h>
113 #include <netinet/udp.h>
114
115 #include <dev/netif/mii_layer/mii.h>
116 #include <dev/netif/mii_layer/miivar.h>
117 #include <dev/netif/mii_layer/brgphyreg.h>
118
119 #include <bus/pci/pcireg.h>
120 #include <bus/pci/pcivar.h>
121 #include "pcidevs.h"
122
123 #include <dev/netif/sk/if_skreg.h>
124 #include <dev/netif/sk/yukonreg.h>
125 #include <dev/netif/sk/xmaciireg.h>
126 #include <dev/netif/sk/if_skvar.h>
127
128 #include "miibus_if.h"
129
130 #if 0
131 #define SK_DEBUG
132 #endif
133
134 #if 0
135 #define SK_RXCSUM
136 #endif
137
138 /* supported device vendors */
139 static const struct skc_type {
140 uint16_t skc_vid;
141 uint16_t skc_did;
142 const char *skc_name;
143 } skc_devs[] = {
144 { PCI_VENDOR_3COM, PCI_PRODUCT_3COM_3C940,
145 "3Com 3C940" },
146 { PCI_VENDOR_3COM, PCI_PRODUCT_3COM_3C940B,
147 "3Com 3C940B" },
148
149 { PCI_VENDOR_CNET, PCI_PRODUCT_CNET_GIGACARD,
150 "CNet GigaCard" },
151
152 { PCI_VENDOR_DLINK, PCI_PRODUCT_DLINK_DGE530T_A1,
153 "D-Link DGE-530T A1" },
154 { PCI_VENDOR_DLINK, PCI_PRODUCT_DLINK_DGE530T_B1,
155 "D-Link DGE-530T B1" },
156
157 { PCI_VENDOR_LINKSYS, PCI_PRODUCT_LINKSYS_EG1032,
158 "Linksys EG1032 v2" },
159 { PCI_VENDOR_LINKSYS, PCI_PRODUCT_LINKSYS_EG1064,
160 "Linksys EG1064" },
161
162 { PCI_VENDOR_MARVELL, PCI_PRODUCT_MARVELL_YUKON,
163 "Marvell Yukon 88E8001/8003/8010" },
164 { PCI_VENDOR_MARVELL, PCI_PRODUCT_MARVELL_YUKON_BELKIN,
165 "Belkin F5D5005" },
166
167 { PCI_VENDOR_SCHNEIDERKOCH, PCI_PRODUCT_SCHNEIDERKOCH_SKNET_GE,
168 "SysKonnect SK-NET" },
169 { PCI_VENDOR_SCHNEIDERKOCH, PCI_PRODUCT_SCHNEIDERKOCH_SK9821v2,
170 "SysKonnect SK9821 v2" },
171
172 { 0, 0, NULL }
173 };
174
175 static int skc_probe(device_t);
176 static int skc_attach(device_t);
177 static int skc_detach(device_t);
178 static void skc_shutdown(device_t);
179 static int skc_sysctl_imtime(SYSCTL_HANDLER_ARGS);
180
181 static int sk_probe(device_t);
182 static int sk_attach(device_t);
183 static int sk_detach(device_t);
184 static void sk_tick(void *);
185 static void sk_yukon_tick(void *);
186 static void sk_intr(void *);
187 static void sk_intr_bcom(struct sk_if_softc *);
188 static void sk_intr_xmac(struct sk_if_softc *);
189 static void sk_intr_yukon(struct sk_if_softc *);
190 static void sk_rxeof(struct sk_if_softc *);
191 static void sk_txeof(struct sk_if_softc *);
192 static int sk_encap(struct sk_if_softc *, struct mbuf **, uint32_t *);
193 static void sk_start(struct ifnet *, struct ifaltq_subque *);
194 static int sk_ioctl(struct ifnet *, u_long, caddr_t, struct ucred *);
195 static void sk_init(void *);
196 static void sk_init_xmac(struct sk_if_softc *);
197 static void sk_init_yukon(struct sk_if_softc *);
198 static void sk_stop(struct sk_if_softc *);
199 static void sk_watchdog(struct ifnet *);
200 static int sk_ifmedia_upd(struct ifnet *);
201 static void sk_ifmedia_sts(struct ifnet *, struct ifmediareq *);
202 static void sk_reset(struct sk_softc *);
203 static int sk_newbuf_jumbo(struct sk_if_softc *, int, int);
204 static int sk_newbuf_std(struct sk_if_softc *, int, int);
205 static int sk_jpool_alloc(device_t);
206 static void sk_jpool_free(struct sk_if_softc *);
207 static struct sk_jpool_entry
208 *sk_jalloc(struct sk_if_softc *);
209 static void sk_jfree(void *);
210 static void sk_jref(void *);
211 static int sk_init_rx_ring(struct sk_if_softc *);
212 static int sk_init_tx_ring(struct sk_if_softc *);
213
214 static int sk_miibus_readreg(device_t, int, int);
215 static int sk_miibus_writereg(device_t, int, int, int);
216 static void sk_miibus_statchg(device_t);
217
218 static int sk_xmac_miibus_readreg(struct sk_if_softc *, int, int);
219 static int sk_xmac_miibus_writereg(struct sk_if_softc *, int, int, int);
220 static void sk_xmac_miibus_statchg(struct sk_if_softc *);
221
222 static int sk_marv_miibus_readreg(struct sk_if_softc *, int, int);
223 static int sk_marv_miibus_writereg(struct sk_if_softc *, int, int, int);
224 static void sk_marv_miibus_statchg(struct sk_if_softc *);
225
226 static void sk_setfilt(struct sk_if_softc *, caddr_t, int);
227 static void sk_setmulti(struct sk_if_softc *);
228 static void sk_setpromisc(struct sk_if_softc *);
229
230 #ifdef SK_RXCSUM
231 static void sk_rxcsum(struct ifnet *, struct mbuf *, const uint16_t,
232 const uint16_t);
233 #endif
234 static int sk_dma_alloc(device_t);
235 static void sk_dma_free(device_t);
236
237 #ifdef SK_DEBUG
238 #define DPRINTF(x) if (skdebug) kprintf x
239 #define DPRINTFN(n,x) if (skdebug >= (n)) kprintf x
240 static int skdebug = 2;
241
242 static void sk_dump_txdesc(struct sk_tx_desc *, int);
243 static void sk_dump_mbuf(struct mbuf *);
244 static void sk_dump_bytes(const char *, int);
245 #else
246 #define DPRINTF(x)
247 #define DPRINTFN(n,x)
248 #endif
249
250 /* Interrupt moderation time. */
251 static int skc_imtime = SK_IMTIME_DEFAULT;
252 TUNABLE_INT("hw.skc.imtime", &skc_imtime);
253
254 /*
255 * Note that we have newbus methods for both the GEnesis controller
256 * itself and the XMAC(s). The XMACs are children of the GEnesis, and
257 * the miibus code is a child of the XMACs. We need to do it this way
258 * so that the miibus drivers can access the PHY registers on the
259 * right PHY. It's not quite what I had in mind, but it's the only
260 * design that achieves the desired effect.
261 */
262 static device_method_t skc_methods[] = {
263 /* Device interface */
264 DEVMETHOD(device_probe, skc_probe),
265 DEVMETHOD(device_attach, skc_attach),
266 DEVMETHOD(device_detach, skc_detach),
267 DEVMETHOD(device_shutdown, skc_shutdown),
268
269 /* bus interface */
270 DEVMETHOD(bus_print_child, bus_generic_print_child),
271 DEVMETHOD(bus_driver_added, bus_generic_driver_added),
272
273 DEVMETHOD_END
274 };
275
276 static DEFINE_CLASS_0(skc, skc_driver, skc_methods, sizeof(struct sk_softc));
277 static devclass_t skc_devclass;
278
279 static device_method_t sk_methods[] = {
280 /* Device interface */
281 DEVMETHOD(device_probe, sk_probe),
282 DEVMETHOD(device_attach, sk_attach),
283 DEVMETHOD(device_detach, sk_detach),
284 DEVMETHOD(device_shutdown, bus_generic_shutdown),
285
286 /* bus interface */
287 DEVMETHOD(bus_print_child, bus_generic_print_child),
288 DEVMETHOD(bus_driver_added, bus_generic_driver_added),
289
290 /* MII interface */
291 DEVMETHOD(miibus_readreg, sk_miibus_readreg),
292 DEVMETHOD(miibus_writereg, sk_miibus_writereg),
293 DEVMETHOD(miibus_statchg, sk_miibus_statchg),
294
295 DEVMETHOD_END
296 };
297
298 static DEFINE_CLASS_0(sk, sk_driver, sk_methods, sizeof(struct sk_if_softc));
299 static devclass_t sk_devclass;
300
301 DECLARE_DUMMY_MODULE(if_sk);
302 DRIVER_MODULE(if_sk, pci, skc_driver, skc_devclass, NULL, NULL);
303 DRIVER_MODULE(if_sk, skc, sk_driver, sk_devclass, NULL, NULL);
304 DRIVER_MODULE(miibus, sk, miibus_driver, miibus_devclass, NULL, NULL);
305
306 static __inline uint32_t
307 sk_win_read_4(struct sk_softc *sc, uint32_t reg)
308 {
309 return CSR_READ_4(sc, reg);
310 }
311
312 static __inline uint16_t
313 sk_win_read_2(struct sk_softc *sc, uint32_t reg)
314 {
315 return CSR_READ_2(sc, reg);
316 }
317
318 static __inline uint8_t
319 sk_win_read_1(struct sk_softc *sc, uint32_t reg)
320 {
321 return CSR_READ_1(sc, reg);
322 }
323
324 static __inline void
325 sk_win_write_4(struct sk_softc *sc, uint32_t reg, uint32_t x)
326 {
327 CSR_WRITE_4(sc, reg, x);
328 }
329
330 static __inline void
331 sk_win_write_2(struct sk_softc *sc, uint32_t reg, uint16_t x)
332 {
333 CSR_WRITE_2(sc, reg, x);
334 }
335
336 static __inline void
337 sk_win_write_1(struct sk_softc *sc, uint32_t reg, uint8_t x)
338 {
339 CSR_WRITE_1(sc, reg, x);
340 }
341
342 static __inline int
343 sk_newbuf(struct sk_if_softc *sc_if, int idx, int wait)
344 {
345 int ret;
346
347 if (sc_if->sk_use_jumbo)
348 ret = sk_newbuf_jumbo(sc_if, idx, wait);
349 else
350 ret = sk_newbuf_std(sc_if, idx, wait);
351 return ret;
352 }
353
354 static int
355 sk_miibus_readreg(device_t dev, int phy, int reg)
356 {
357 struct sk_if_softc *sc_if = device_get_softc(dev);
358
359 if (SK_IS_GENESIS(sc_if->sk_softc))
360 return sk_xmac_miibus_readreg(sc_if, phy, reg);
361 else
362 return sk_marv_miibus_readreg(sc_if, phy, reg);
363 }
364
365 static int
366 sk_miibus_writereg(device_t dev, int phy, int reg, int val)
367 {
368 struct sk_if_softc *sc_if = device_get_softc(dev);
369
370 if (SK_IS_GENESIS(sc_if->sk_softc))
371 return sk_xmac_miibus_writereg(sc_if, phy, reg, val);
372 else
373 return sk_marv_miibus_writereg(sc_if, phy, reg, val);
374 }
375
376 static void
377 sk_miibus_statchg(device_t dev)
378 {
379 struct sk_if_softc *sc_if = device_get_softc(dev);
380
381 if (SK_IS_GENESIS(sc_if->sk_softc))
382 sk_xmac_miibus_statchg(sc_if);
383 else
384 sk_marv_miibus_statchg(sc_if);
385 }
386
387 static int
388 sk_xmac_miibus_readreg(struct sk_if_softc *sc_if, int phy, int reg)
389 {
390 int i;
391
392 DPRINTFN(9, ("sk_xmac_miibus_readreg\n"));
393
394 if (sc_if->sk_phytype == SK_PHYTYPE_XMAC && phy != 0)
395 return(0);
396
397 SK_XM_WRITE_2(sc_if, XM_PHY_ADDR, reg|(phy << 8));
398 SK_XM_READ_2(sc_if, XM_PHY_DATA);
399 if (sc_if->sk_phytype != SK_PHYTYPE_XMAC) {
400 for (i = 0; i < SK_TIMEOUT; i++) {
401 DELAY(1);
402 if (SK_XM_READ_2(sc_if, XM_MMUCMD) &
403 XM_MMUCMD_PHYDATARDY)
404 break;
405 }
406
407 if (i == SK_TIMEOUT) {
408 if_printf(&sc_if->arpcom.ac_if,
409 "phy failed to come ready\n");
410 return(0);
411 }
412 }
413 DELAY(1);
414 return(SK_XM_READ_2(sc_if, XM_PHY_DATA));
415 }
416
417 static int
418 sk_xmac_miibus_writereg(struct sk_if_softc *sc_if, int phy, int reg, int val)
419 {
420 int i;
421
422 DPRINTFN(9, ("sk_xmac_miibus_writereg\n"));
423
424 SK_XM_WRITE_2(sc_if, XM_PHY_ADDR, reg|(phy << 8));
425 for (i = 0; i < SK_TIMEOUT; i++) {
426 if ((SK_XM_READ_2(sc_if, XM_MMUCMD) & XM_MMUCMD_PHYBUSY) == 0)
427 break;
428 }
429
430 if (i == SK_TIMEOUT) {
431 if_printf(&sc_if->arpcom.ac_if, "phy failed to come ready\n");
432 return(ETIMEDOUT);
433 }
434
435 SK_XM_WRITE_2(sc_if, XM_PHY_DATA, val);
436 for (i = 0; i < SK_TIMEOUT; i++) {
437 DELAY(1);
438 if ((SK_XM_READ_2(sc_if, XM_MMUCMD) & XM_MMUCMD_PHYBUSY) == 0)
439 break;
440 }
441
442 if (i == SK_TIMEOUT)
443 if_printf(&sc_if->arpcom.ac_if, "phy write timed out\n");
444 return(0);
445 }
446
447 static void
448 sk_xmac_miibus_statchg(struct sk_if_softc *sc_if)
449 {
450 struct mii_data *mii;
451
452 mii = device_get_softc(sc_if->sk_miibus);
453 DPRINTFN(9, ("sk_xmac_miibus_statchg\n"));
454
455 /*
456 * If this is a GMII PHY, manually set the XMAC's
457 * duplex mode accordingly.
458 */
459 if (sc_if->sk_phytype != SK_PHYTYPE_XMAC) {
460 if ((mii->mii_media_active & IFM_GMASK) == IFM_FDX)
461 SK_XM_SETBIT_2(sc_if, XM_MMUCMD, XM_MMUCMD_GMIIFDX);
462 else
463 SK_XM_CLRBIT_2(sc_if, XM_MMUCMD, XM_MMUCMD_GMIIFDX);
464 }
465 }
466
467 static int
468 sk_marv_miibus_readreg(struct sk_if_softc *sc_if, int phy, int reg)
469 {
470 uint16_t val;
471 int i;
472
473 if (phy != 0 ||
474 (sc_if->sk_phytype != SK_PHYTYPE_MARV_COPPER &&
475 sc_if->sk_phytype != SK_PHYTYPE_MARV_FIBER)) {
476 DPRINTFN(9, ("sk_marv_miibus_readreg (skip) phy=%d, reg=%#x\n",
477 phy, reg));
478 return(0);
479 }
480
481 SK_YU_WRITE_2(sc_if, YUKON_SMICR, YU_SMICR_PHYAD(phy) |
482 YU_SMICR_REGAD(reg) | YU_SMICR_OP_READ);
483
484 for (i = 0; i < SK_TIMEOUT; i++) {
485 DELAY(1);
486 val = SK_YU_READ_2(sc_if, YUKON_SMICR);
487 if (val & YU_SMICR_READ_VALID)
488 break;
489 }
490
491 if (i == SK_TIMEOUT) {
492 if_printf(&sc_if->arpcom.ac_if, "phy failed to come ready\n");
493 return(0);
494 }
495
496 DPRINTFN(9, ("sk_marv_miibus_readreg: i=%d, timeout=%d\n", i,
497 SK_TIMEOUT));
498
499 val = SK_YU_READ_2(sc_if, YUKON_SMIDR);
500
501 DPRINTFN(9, ("sk_marv_miibus_readreg phy=%d, reg=%#x, val=%#x\n",
502 phy, reg, val));
503
504 return(val);
505 }
506
507 static int
508 sk_marv_miibus_writereg(struct sk_if_softc *sc_if, int phy, int reg, int val)
509 {
510 int i;
511
512 DPRINTFN(9, ("sk_marv_miibus_writereg phy=%d reg=%#x val=%#x\n",
513 phy, reg, val));
514
515 SK_YU_WRITE_2(sc_if, YUKON_SMIDR, val);
516 SK_YU_WRITE_2(sc_if, YUKON_SMICR, YU_SMICR_PHYAD(phy) |
517 YU_SMICR_REGAD(reg) | YU_SMICR_OP_WRITE);
518
519 for (i = 0; i < SK_TIMEOUT; i++) {
520 DELAY(1);
521 if (SK_YU_READ_2(sc_if, YUKON_SMICR) & YU_SMICR_BUSY)
522 break;
523 }
524
525 if (i == SK_TIMEOUT)
526 if_printf(&sc_if->arpcom.ac_if, "phy write timed out\n");
527
528 return(0);
529 }
530
531 static void
532 sk_marv_miibus_statchg(struct sk_if_softc *sc_if)
533 {
534 DPRINTFN(9, ("sk_marv_miibus_statchg: gpcr=%x\n",
535 SK_YU_READ_2(sc_if, YUKON_GPCR)));
536 }
537
538 #define HASH_BITS 6
539
540 static uint32_t
541 sk_xmac_hash(caddr_t addr)
542 {
543 uint32_t crc;
544
545 crc = ether_crc32_le(addr, ETHER_ADDR_LEN);
546 return (~crc & ((1 << HASH_BITS) - 1));
547 }
548
549 static uint32_t
550 sk_yukon_hash(caddr_t addr)
551 {
552 uint32_t crc;
553
554 crc = ether_crc32_be(addr, ETHER_ADDR_LEN);
555 return (crc & ((1 << HASH_BITS) - 1));
556 }
557
558 static void
559 sk_setfilt(struct sk_if_softc *sc_if, caddr_t addr, int slot)
560 {
561 int base;
562
563 base = XM_RXFILT_ENTRY(slot);
564
565 SK_XM_WRITE_2(sc_if, base, *(uint16_t *)(&addr[0]));
566 SK_XM_WRITE_2(sc_if, base + 2, *(uint16_t *)(&addr[2]));
567 SK_XM_WRITE_2(sc_if, base + 4, *(uint16_t *)(&addr[4]));
568 }
569
570 static void
571 sk_setmulti(struct sk_if_softc *sc_if)
572 {
573 struct sk_softc *sc = sc_if->sk_softc;
574 struct ifnet *ifp = &sc_if->arpcom.ac_if;
575 uint32_t hashes[2] = { 0, 0 };
576 int h = 0, i;
577 struct ifmultiaddr *ifma;
578 uint8_t dummy[] = { 0, 0, 0, 0, 0 ,0 };
579
580 /* First, zot all the existing filters. */
581 switch(sc->sk_type) {
582 case SK_GENESIS:
583 for (i = 1; i < XM_RXFILT_MAX; i++)
584 sk_setfilt(sc_if, (caddr_t)&dummy, i);
585
586 SK_XM_WRITE_4(sc_if, XM_MAR0, 0);
587 SK_XM_WRITE_4(sc_if, XM_MAR2, 0);
588 break;
589 case SK_YUKON:
590 case SK_YUKON_LITE:
591 case SK_YUKON_LP:
592 SK_YU_WRITE_2(sc_if, YUKON_MCAH1, 0);
593 SK_YU_WRITE_2(sc_if, YUKON_MCAH2, 0);
594 SK_YU_WRITE_2(sc_if, YUKON_MCAH3, 0);
595 SK_YU_WRITE_2(sc_if, YUKON_MCAH4, 0);
596 break;
597 }
598
599 /* Now program new ones. */
600 if (ifp->if_flags & IFF_ALLMULTI || ifp->if_flags & IFF_PROMISC) {
601 hashes[0] = 0xFFFFFFFF;
602 hashes[1] = 0xFFFFFFFF;
603 } else {
604 i = 1;
605 /* First find the tail of the list. */
606 TAILQ_FOREACH_REVERSE(ifma, &ifp->if_multiaddrs, ifmultihead,
607 ifma_link) {
608 caddr_t maddr;
609
610 if (ifma->ifma_addr->sa_family != AF_LINK)
611 continue;
612
613 maddr = LLADDR((struct sockaddr_dl *)ifma->ifma_addr);
614
615 /*
616 * Program the first XM_RXFILT_MAX multicast groups
617 * into the perfect filter. For all others,
618 * use the hash table.
619 */
620 if (SK_IS_GENESIS(sc) && i < XM_RXFILT_MAX) {
621 sk_setfilt(sc_if, maddr, i);
622 i++;
623 continue;
624 }
625
626 switch(sc->sk_type) {
627 case SK_GENESIS:
628 h = sk_xmac_hash(maddr);
629 break;
630
631 case SK_YUKON:
632 case SK_YUKON_LITE:
633 case SK_YUKON_LP:
634 h = sk_yukon_hash(maddr);
635 break;
636 }
637 if (h < 32)
638 hashes[0] |= (1 << h);
639 else
640 hashes[1] |= (1 << (h - 32));
641 }
642 }
643
644 switch(sc->sk_type) {
645 case SK_GENESIS:
646 SK_XM_SETBIT_4(sc_if, XM_MODE, XM_MODE_RX_USE_HASH|
647 XM_MODE_RX_USE_PERFECT);
648 SK_XM_WRITE_4(sc_if, XM_MAR0, hashes[0]);
649 SK_XM_WRITE_4(sc_if, XM_MAR2, hashes[1]);
650 break;
651 case SK_YUKON:
652 case SK_YUKON_LITE:
653 case SK_YUKON_LP:
654 SK_YU_WRITE_2(sc_if, YUKON_MCAH1, hashes[0] & 0xffff);
655 SK_YU_WRITE_2(sc_if, YUKON_MCAH2, (hashes[0] >> 16) & 0xffff);
656 SK_YU_WRITE_2(sc_if, YUKON_MCAH3, hashes[1] & 0xffff);
657 SK_YU_WRITE_2(sc_if, YUKON_MCAH4, (hashes[1] >> 16) & 0xffff);
658 break;
659 }
660 }
661
662 static void
663 sk_setpromisc(struct sk_if_softc *sc_if)
664 {
665 struct sk_softc *sc = sc_if->sk_softc;
666 struct ifnet *ifp = &sc_if->arpcom.ac_if;
667
668 switch(sc->sk_type) {
669 case SK_GENESIS:
670 if (ifp->if_flags & IFF_PROMISC)
671 SK_XM_SETBIT_4(sc_if, XM_MODE, XM_MODE_RX_PROMISC);
672 else
673 SK_XM_CLRBIT_4(sc_if, XM_MODE, XM_MODE_RX_PROMISC);
674 break;
675 case SK_YUKON:
676 case SK_YUKON_LITE:
677 case SK_YUKON_LP:
678 if (ifp->if_flags & IFF_PROMISC) {
679 SK_YU_CLRBIT_2(sc_if, YUKON_RCR,
680 YU_RCR_UFLEN | YU_RCR_MUFLEN);
681 } else {
682 SK_YU_SETBIT_2(sc_if, YUKON_RCR,
683 YU_RCR_UFLEN | YU_RCR_MUFLEN);
684 }
685 break;
686 }
687 }
688
689 static int
690 sk_init_rx_ring(struct sk_if_softc *sc_if)
691 {
692 struct sk_chain_data *cd = &sc_if->sk_cdata;
693 struct sk_ring_data *rd = &sc_if->sk_rdata;
694 int i, nexti, error;
695
696 bzero(rd->sk_rx_ring, SK_RX_RING_SIZE);
697
698 for (i = 0; i < SK_RX_RING_CNT; i++) {
699 bus_addr_t paddr;
700
701 if (i == (SK_RX_RING_CNT - 1))
702 nexti = 0;
703 else
704 nexti = i + 1;
705 paddr = rd->sk_rx_ring_paddr +
706 (nexti * sizeof(struct sk_rx_desc));
707
708 rd->sk_rx_ring[i].sk_next = htole32(SK_ADDR_LO(paddr));
709 rd->sk_rx_ring[i].sk_csum1_start = htole16(ETHER_HDR_LEN);
710 rd->sk_rx_ring[i].sk_csum2_start =
711 htole16(ETHER_HDR_LEN + sizeof(struct ip));
712
713 error = sk_newbuf(sc_if, i, 1);
714 if (error) {
715 if_printf(&sc_if->arpcom.ac_if,
716 "failed alloc of %dth mbuf\n", i);
717 return error;
718 }
719 }
720
721 cd->sk_rx_prod = 0;
722 cd->sk_rx_cons = 0;
723
724 return (0);
725 }
726
727 static int
728 sk_init_tx_ring(struct sk_if_softc *sc_if)
729 {
730 struct sk_ring_data *rd = &sc_if->sk_rdata;
731 int i, nexti;
732
733 bzero(rd->sk_tx_ring, SK_TX_RING_SIZE);
734
735 for (i = 0; i < SK_TX_RING_CNT; i++) {
736 bus_addr_t paddr;
737
738 if (i == (SK_TX_RING_CNT - 1))
739 nexti = 0;
740 else
741 nexti = i + 1;
742 paddr = rd->sk_tx_ring_paddr +
743 (nexti * sizeof(struct sk_tx_desc));
744
745 rd->sk_tx_ring[i].sk_next = htole32(SK_ADDR_LO(paddr));
746 }
747
748 sc_if->sk_cdata.sk_tx_prod = 0;
749 sc_if->sk_cdata.sk_tx_cons = 0;
750 sc_if->sk_cdata.sk_tx_cnt = 0;
751
752 return (0);
753 }
754
755 static int
756 sk_newbuf_jumbo(struct sk_if_softc *sc_if, int idx, int wait)
757 {
758 struct sk_jpool_entry *entry;
759 struct mbuf *m_new = NULL;
760 struct sk_rx_desc *r;
761 bus_addr_t paddr;
762
763 KKASSERT(idx < SK_RX_RING_CNT && idx >= 0);
764
765 MGETHDR(m_new, wait ? MB_WAIT : MB_DONTWAIT, MT_DATA);
766 if (m_new == NULL)
767 return ENOBUFS;
768
769 /* Allocate the jumbo buffer */
770 entry = sk_jalloc(sc_if);
771 if (entry == NULL) {
772 m_freem(m_new);
773 DPRINTFN(1, ("%s jumbo allocation failed -- packet "
774 "dropped!\n", sc_if->arpcom.ac_if.if_xname));
775 return ENOBUFS;
776 }
777
778 m_new->m_ext.ext_arg = entry;
779 m_new->m_ext.ext_buf = entry->buf;
780 m_new->m_ext.ext_free = sk_jfree;
781 m_new->m_ext.ext_ref = sk_jref;
782 m_new->m_ext.ext_size = SK_JLEN;
783
784 m_new->m_flags |= M_EXT;
785
786 m_new->m_data = m_new->m_ext.ext_buf;
787 m_new->m_len = m_new->m_pkthdr.len = m_new->m_ext.ext_size;
788
789 paddr = entry->paddr;
790
791 /*
792 * Adjust alignment so packet payload begins on a
793 * longword boundary. Mandatory for Alpha, useful on
794 * x86 too.
795 */
796 m_adj(m_new, ETHER_ALIGN);
797 paddr += ETHER_ALIGN;
798
799 sc_if->sk_cdata.sk_rx_mbuf[idx] = m_new;
800
801 r = &sc_if->sk_rdata.sk_rx_ring[idx];
802 r->sk_data_lo = htole32(SK_ADDR_LO(paddr));
803 r->sk_data_hi = htole32(SK_ADDR_HI(paddr));
804 r->sk_ctl = htole32(m_new->m_pkthdr.len | SK_RXSTAT);
805
806 return 0;
807 }
808
809 static int
810 sk_newbuf_std(struct sk_if_softc *sc_if, int idx, int wait)
811 {
812 struct mbuf *m_new = NULL;
813 struct sk_chain_data *cd = &sc_if->sk_cdata;
814 struct sk_rx_desc *r;
815 bus_dma_segment_t seg;
816 bus_dmamap_t map;
817 int error, nseg;
818
819 KKASSERT(idx < SK_RX_RING_CNT && idx >= 0);
820
821 m_new = m_getcl(wait ? MB_WAIT : MB_DONTWAIT, MT_DATA, M_PKTHDR);
822 if (m_new == NULL)
823 return ENOBUFS;
824
825 m_new->m_len = m_new->m_pkthdr.len = MCLBYTES;
826
827 /*
828 * Adjust alignment so packet payload begins on a
829 * longword boundary. Mandatory for Alpha, useful on
830 * x86 too.
831 */
832 m_adj(m_new, ETHER_ALIGN);
833
834 error = bus_dmamap_load_mbuf_segment(cd->sk_rx_dtag, cd->sk_rx_dmap_tmp,
835 m_new, &seg, 1, &nseg, BUS_DMA_NOWAIT);
836 if (error) {
837 m_freem(m_new);
838 if (wait) {
839 if_printf(&sc_if->arpcom.ac_if,
840 "could not map RX mbuf\n");
841 }
842 return error;
843 }
844
845 /* Unload originally mapped mbuf */
846 if (cd->sk_rx_mbuf[idx] != NULL) {
847 bus_dmamap_sync(cd->sk_rx_dtag, cd->sk_rx_dmap[idx],
848 BUS_DMASYNC_POSTREAD);
849 bus_dmamap_unload(cd->sk_rx_dtag, cd->sk_rx_dmap[idx]);
850 }
851
852 /* Switch DMA map with tmp DMA map */
853 map = cd->sk_rx_dmap_tmp;
854 cd->sk_rx_dmap_tmp = cd->sk_rx_dmap[idx];
855 cd->sk_rx_dmap[idx] = map;
856
857 cd->sk_rx_mbuf[idx] = m_new;
858
859 r = &sc_if->sk_rdata.sk_rx_ring[idx];
860 r->sk_data_lo = htole32(SK_ADDR_LO(seg.ds_addr));
861 r->sk_data_hi = htole32(SK_ADDR_HI(seg.ds_addr));
862 r->sk_ctl = htole32(m_new->m_pkthdr.len | SK_RXSTAT);
863
864 return 0;
865 }
866
867 /*
868 * Allocate a jumbo buffer.
869 */
870 struct sk_jpool_entry *
871 sk_jalloc(struct sk_if_softc *sc_if)
872 {
873 struct sk_chain_data *cd = &sc_if->sk_cdata;
874 struct sk_jpool_entry *entry;
875
876 lwkt_serialize_enter(&cd->sk_jpool_serializer);
877
878 entry = SLIST_FIRST(&cd->sk_jpool_free_ent);
879 if (entry != NULL) {
880 SLIST_REMOVE_HEAD(&cd->sk_jpool_free_ent, entry_next);
881 entry->inuse = 1;
882 } else {
883 DPRINTF(("no free jumbo buffer\n"));
884 }
885
886 lwkt_serialize_exit(&cd->sk_jpool_serializer);
887 return entry;
888 }
889
890 /*
891 * Release a jumbo buffer.
892 */
893 void
894 sk_jfree(void *arg)
895 {
896 struct sk_jpool_entry *entry = arg;
897 struct sk_chain_data *cd = &entry->sc_if->sk_cdata;
898
899 if (&cd->sk_jpool_ent[entry->slot] != entry)
900 panic("%s: free wrong jumbo buffer", __func__);
901 else if (entry->inuse == 0)
902 panic("%s: jumbo buffer already freed", __func__);
903
904 lwkt_serialize_enter(&cd->sk_jpool_serializer);
905
906 atomic_subtract_int(&entry->inuse, 1);
907 if (entry->inuse == 0)
908 SLIST_INSERT_HEAD(&cd->sk_jpool_free_ent, entry, entry_next);
909
910 lwkt_serialize_exit(&cd->sk_jpool_serializer);
911 }
912
913 static void
914 sk_jref(void *arg)
915 {
916 struct sk_jpool_entry *entry = arg;
917 struct sk_chain_data *cd = &entry->sc_if->sk_cdata;
918
919 if (&cd->sk_jpool_ent[entry->slot] != entry)
920 panic("%s: free wrong jumbo buffer", __func__);
921 else if (entry->inuse == 0)
922 panic("%s: jumbo buffer already freed", __func__);
923
924 atomic_add_int(&entry->inuse, 1);
925 }
926
927 /*
928 * Set media options.
929 */
930 static int
931 sk_ifmedia_upd(struct ifnet *ifp)
932 {
933 struct sk_if_softc *sc_if = ifp->if_softc;
934 struct mii_data *mii;
935
936 mii = device_get_softc(sc_if->sk_miibus);
937 sk_init(sc_if);
938 mii_mediachg(mii);
939
940 return(0);
941 }
942
943 /*
944 * Report current media status.
945 */
946 static void
947 sk_ifmedia_sts(struct ifnet *ifp, struct ifmediareq *ifmr)
948 {
949 struct sk_if_softc *sc_if;
950 struct mii_data *mii;
951
952 sc_if = ifp->if_softc;
953 mii = device_get_softc(sc_if->sk_miibus);
954
955 mii_pollstat(mii);
956 ifmr->ifm_active = mii->mii_media_active;
957 ifmr->ifm_status = mii->mii_media_status;
958 }
959
960 static int
961 sk_ioctl(struct ifnet *ifp, u_long command, caddr_t data, struct ucred *cr)
962 {
963 struct sk_if_softc *sc_if = ifp->if_softc;
964 struct ifreq *ifr = (struct ifreq *)data;
965 struct mii_data *mii;
966 int error = 0;
967
968 ASSERT_SERIALIZED(ifp->if_serializer);
969
970 switch(command) {
971 case SIOCSIFMTU:
972 if (ifr->ifr_mtu > SK_JUMBO_MTU)
973 error = EINVAL;
974 else {
975 ifp->if_mtu = ifr->ifr_mtu;
976 ifp->if_flags &= ~IFF_RUNNING;
977 sk_init(sc_if);
978 }
979 break;
980 case SIOCSIFFLAGS:
981 if (ifp->if_flags & IFF_UP) {
982 if (ifp->if_flags & IFF_RUNNING) {
983 if ((ifp->if_flags ^ sc_if->sk_if_flags)
984 & IFF_PROMISC) {
985 sk_setpromisc(sc_if);
986 sk_setmulti(sc_if);
987 }
988 } else
989 sk_init(sc_if);
990 } else {
991 if (ifp->if_flags & IFF_RUNNING)
992 sk_stop(sc_if);
993 }
994 sc_if->sk_if_flags = ifp->if_flags;
995 break;
996 case SIOCADDMULTI:
997 case SIOCDELMULTI:
998 sk_setmulti(sc_if);
999 break;
1000 case SIOCGIFMEDIA:
1001 case SIOCSIFMEDIA:
1002 mii = device_get_softc(sc_if->sk_miibus);
1003 error = ifmedia_ioctl(ifp, ifr, &mii->mii_media, command);
1004 break;
1005 default:
1006 error = ether_ioctl(ifp, command, data);
1007 break;
1008 }
1009
1010 return(error);
1011 }
1012
1013 /*
1014 * Probe for a SysKonnect GEnesis chip. Check the PCI vendor and device
1015 * IDs against our list and return a device name if we find a match.
1016 */
1017 static int
1018 skc_probe(device_t dev)
1019 {
1020 const struct skc_type *t;
1021 uint16_t vid, did;
1022
1023 vid = pci_get_vendor(dev);
1024 did = pci_get_device(dev);
1025
1026 /*
1027 * Only attach to rev.2 of the Linksys EG1032 adapter.
1028 * Rev.3 is supported by re(4).
1029 */
1030 if (vid == PCI_VENDOR_LINKSYS &&
1031 did == PCI_PRODUCT_LINKSYS_EG1032 &&
1032 pci_get_subdevice(dev) != SUBDEVICEID_LINKSYS_EG1032_REV2)
1033 return ENXIO;
1034
1035 for (t = skc_devs; t->skc_name != NULL; t++) {
1036 if (vid == t->skc_vid && did == t->skc_did) {
1037 device_set_desc(dev, t->skc_name);
1038 return 0;
1039 }
1040 }
1041 return ENXIO;
1042 }
1043
1044 /*
1045 * Force the GEnesis into reset, then bring it out of reset.
1046 */
1047 static void
1048 sk_reset(struct sk_softc *sc)
1049 {
1050 DPRINTFN(2, ("sk_reset\n"));
1051
1052 CSR_WRITE_2(sc, SK_CSR, SK_CSR_SW_RESET);
1053 CSR_WRITE_2(sc, SK_CSR, SK_CSR_MASTER_RESET);
1054 if (SK_IS_YUKON(sc))
1055 CSR_WRITE_2(sc, SK_LINK_CTRL, SK_LINK_RESET_SET);
1056
1057 DELAY(1000);
1058 CSR_WRITE_2(sc, SK_CSR, SK_CSR_SW_UNRESET);
1059 DELAY(2);
1060 CSR_WRITE_2(sc, SK_CSR, SK_CSR_MASTER_UNRESET);
1061 if (SK_IS_YUKON(sc))
1062 CSR_WRITE_2(sc, SK_LINK_CTRL, SK_LINK_RESET_CLEAR);
1063
1064 DPRINTFN(2, ("sk_reset: sk_csr=%x\n", CSR_READ_2(sc, SK_CSR)));
1065 DPRINTFN(2, ("sk_reset: sk_link_ctrl=%x\n",
1066 CSR_READ_2(sc, SK_LINK_CTRL)));
1067
1068 if (SK_IS_GENESIS(sc)) {
1069 /* Configure packet arbiter */
1070 sk_win_write_2(sc, SK_PKTARB_CTL, SK_PKTARBCTL_UNRESET);
1071 sk_win_write_2(sc, SK_RXPA1_TINIT, SK_PKTARB_TIMEOUT);
1072 sk_win_write_2(sc, SK_TXPA1_TINIT, SK_PKTARB_TIMEOUT);
1073 sk_win_write_2(sc, SK_RXPA2_TINIT, SK_PKTARB_TIMEOUT);
1074 sk_win_write_2(sc, SK_TXPA2_TINIT, SK_PKTARB_TIMEOUT);
1075 }
1076
1077 /* Enable RAM interface */
1078 sk_win_write_4(sc, SK_RAMCTL, SK_RAMCTL_UNRESET);
1079
1080 /*
1081 * Configure interrupt moderation. The moderation timer
1082 * defers interrupts specified in the interrupt moderation
1083 * timer mask based on the timeout specified in the interrupt
1084 * moderation timer init register. Each bit in the timer
1085 * register represents one tick, so to specify a timeout in
1086 * microseconds, we have to multiply by the correct number of
1087 * ticks-per-microsecond.
1088 */
1089 KKASSERT(sc->sk_imtimer_ticks != 0 && sc->sk_imtime != 0);
1090 sk_win_write_4(sc, SK_IMTIMERINIT, SK_IM_USECS(sc, sc->sk_imtime));
1091 sk_win_write_4(sc, SK_IMMR, SK_ISR_TX1_S_EOF|SK_ISR_TX2_S_EOF|
1092 SK_ISR_RX1_EOF|SK_ISR_RX2_EOF);
1093 sk_win_write_1(sc, SK_IMTIMERCTL, SK_IMCTL_START);
1094 }
1095
1096 static int
1097 sk_probe(device_t dev)
1098 {
1099 struct sk_softc *sc = device_get_softc(device_get_parent(dev));
1100 const char *revstr = "", *name = NULL;
1101 char devname[80];
1102
1103 switch (sc->sk_type) {
1104 case SK_GENESIS:
1105 name = "SysKonnect GEnesis";
1106 break;
1107 case SK_YUKON:
1108 name = "Marvell Yukon";
1109 break;
1110 case SK_YUKON_LITE:
1111 name = "Marvell Yukon Lite";
1112 switch (sc->sk_rev) {
1113 case SK_YUKON_LITE_REV_A0:
1114 revstr = " rev.A0";
1115 break;
1116 case SK_YUKON_LITE_REV_A1:
1117 revstr = " rev.A1";
1118 break;
1119 case SK_YUKON_LITE_REV_A3:
1120 revstr = " rev.A3";
1121 break;
1122 }
1123 break;
1124 case SK_YUKON_LP:
1125 name = "Marvell Yukon LP";
1126 break;
1127 default:
1128 return ENXIO;
1129 }
1130
1131 ksnprintf(devname, sizeof(devname), "%s%s (0x%x)",
1132 name, revstr, sc->sk_rev);
1133 device_set_desc_copy(dev, devname);
1134 return 0;
1135 }
1136
1137 /*
1138 * Each XMAC chip is attached as a separate logical IP interface.
1139 * Single port cards will have only one logical interface of course.
1140 */
1141 static int
1142 sk_attach(device_t dev)
1143 {
1144 struct sk_softc *sc = device_get_softc(device_get_parent(dev));
1145 struct sk_if_softc *sc_if = device_get_softc(dev);
1146 struct ifnet *ifp = &sc_if->arpcom.ac_if;
1147 int i, error, if_attached = 0;
1148
1149 if_initname(ifp, device_get_name(dev), device_get_unit(dev));
1150
1151 sc_if->sk_port = *(int *)device_get_ivars(dev);
1152 KKASSERT(sc_if->sk_port == SK_PORT_A || sc_if->sk_port == SK_PORT_B);
1153
1154 sc_if->sk_softc = sc;
1155 sc->sk_if[sc_if->sk_port] = sc_if;
1156
1157 kfree(device_get_ivars(dev), M_DEVBUF);
1158 device_set_ivars(dev, NULL);
1159
1160 if (sc_if->sk_port == SK_PORT_A)
1161 sc_if->sk_tx_bmu = SK_BMU_TXS_CSR0;
1162 if (sc_if->sk_port == SK_PORT_B)
1163 sc_if->sk_tx_bmu = SK_BMU_TXS_CSR1;
1164
1165 DPRINTFN(2, ("begin sk_attach: port=%d\n", sc_if->sk_port));
1166
1167 /*
1168 * Get station address for this interface. Note that
1169 * dual port cards actually come with three station
1170 * addresses: one for each port, plus an extra. The
1171 * extra one is used by the SysKonnect driver software
1172 * as a 'virtual' station address for when both ports
1173 * are operating in failover mode. Currently we don't
1174 * use this extra address.
1175 */
1176 for (i = 0; i < ETHER_ADDR_LEN; i++) {
1177 /* XXX */
1178 sc_if->arpcom.ac_enaddr[i] =
1179 sk_win_read_1(sc, SK_MAC0_0 + (sc_if->sk_port * 8) + i);
1180 }
1181
1182 /*
1183 * Set up RAM buffer addresses. The NIC will have a certain
1184 * amount of SRAM on it, somewhere between 512K and 2MB. We
1185 * need to divide this up a) between the transmitter and
1186 * receiver and b) between the two XMACs, if this is a
1187 * dual port NIC. Our algorithm is to divide up the memory
1188 * evenly so that everyone gets a fair share.
1189 */
1190 if (sk_win_read_1(sc, SK_CONFIG) & SK_CONFIG_SINGLEMAC) {
1191 uint32_t chunk, val;
1192
1193 chunk = sc->sk_ramsize / 2;
1194 val = sc->sk_rboff / sizeof(uint64_t);
1195 sc_if->sk_rx_ramstart = val;
1196 val += (chunk / sizeof(uint64_t));
1197 sc_if->sk_rx_ramend = val - 1;
1198 sc_if->sk_tx_ramstart = val;
1199 val += (chunk / sizeof(uint64_t));
1200 sc_if->sk_tx_ramend = val - 1;
1201 } else {
1202 uint32_t chunk, val;
1203
1204 chunk = sc->sk_ramsize / 4;
1205 val = (sc->sk_rboff + (chunk * 2 * sc_if->sk_port)) /
1206 sizeof(uint64_t);
1207 sc_if->sk_rx_ramstart = val;
1208 val += (chunk / sizeof(uint64_t));
1209 sc_if->sk_rx_ramend = val - 1;
1210 sc_if->sk_tx_ramstart = val;
1211 val += (chunk / sizeof(uint64_t));
1212 sc_if->sk_tx_ramend = val - 1;
1213 }
1214
1215 DPRINTFN(2, ("sk_attach: rx_ramstart=%#x rx_ramend=%#x\n"
1216 " tx_ramstart=%#x tx_ramend=%#x\n",
1217 sc_if->sk_rx_ramstart, sc_if->sk_rx_ramend,
1218 sc_if->sk_tx_ramstart, sc_if->sk_tx_ramend));
1219
1220 /* Read and save PHY type */
1221 sc_if->sk_phytype = sk_win_read_1(sc, SK_EPROM1) & 0xF;
1222
1223 /* Set PHY address */
1224 if (SK_IS_GENESIS(sc)) {
1225 switch (sc_if->sk_phytype) {
1226 case SK_PHYTYPE_XMAC:
1227 sc_if->sk_phyaddr = SK_PHYADDR_XMAC;
1228 break;
1229 case SK_PHYTYPE_BCOM:
1230 sc_if->sk_phyaddr = SK_PHYADDR_BCOM;
1231 break;
1232 default:
1233 device_printf(dev, "unsupported PHY type: %d\n",
1234 sc_if->sk_phytype);
1235 error = ENXIO;
1236 goto fail;
1237 }
1238 }
1239
1240 if (SK_IS_YUKON(sc)) {
1241 if ((sc_if->sk_phytype < SK_PHYTYPE_MARV_COPPER &&
1242 sc->sk_pmd != 'L' && sc->sk_pmd != 'S')) {
1243 /* not initialized, punt */
1244 sc_if->sk_phytype = SK_PHYTYPE_MARV_COPPER;
1245 sc->sk_coppertype = 1;
1246 }
1247
1248 sc_if->sk_phyaddr = SK_PHYADDR_MARV;
1249
1250 if (!(sc->sk_coppertype))
1251 sc_if->sk_phytype = SK_PHYTYPE_MARV_FIBER;
1252 }
1253
1254 error = sk_dma_alloc(dev);
1255 if (error)
1256 goto fail;
1257
1258 ifp->if_softc = sc_if;
1259 ifp->if_mtu = ETHERMTU;
1260 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
1261 ifp->if_ioctl = sk_ioctl;
1262 ifp->if_start = sk_start;
1263 ifp->if_watchdog = sk_watchdog;
1264 ifp->if_init = sk_init;
1265 ifp->if_baudrate = 1000000000;
1266 ifq_set_maxlen(&ifp->if_snd, SK_TX_RING_CNT - 1);
1267 ifq_set_ready(&ifp->if_snd);
1268
1269 ifp->if_capabilities = IFCAP_VLAN_MTU;
1270
1271 /* Don't use jumbo buffers by default */
1272 sc_if->sk_use_jumbo = 0;
1273
1274 /*
1275 * Call MI attach routines.
1276 *
1277 * NOTE:
1278 * This must be done before following sk_init_xxx(), in which
1279 * if_multiaddrs will be used.
1280 */
1281 ether_ifattach(ifp, sc_if->arpcom.ac_enaddr, &sc->sk_serializer);
1282 if_attached = 1;
1283
1284 /*
1285 * Do miibus setup.
1286 */
1287 switch (sc->sk_type) {
1288 case SK_GENESIS:
1289 sk_init_xmac(sc_if);
1290 break;
1291 case SK_YUKON:
1292 case SK_YUKON_LITE:
1293 case SK_YUKON_LP:
1294 sk_init_yukon(sc_if);
1295 break;
1296 default:
1297 device_printf(dev, "unknown device type %d\n", sc->sk_type);
1298 error = ENXIO;
1299 goto fail;
1300 }
1301
1302 DPRINTFN(2, ("sk_attach: 1\n"));
1303
1304 error = mii_phy_probe(dev, &sc_if->sk_miibus,
1305 sk_ifmedia_upd, sk_ifmedia_sts);
1306 if (error) {
1307 device_printf(dev, "no PHY found!\n");
1308 goto fail;
1309 }
1310
1311 callout_init(&sc_if->sk_tick_timer);
1312
1313 DPRINTFN(2, ("sk_attach: end\n"));
1314 return 0;
1315 fail:
1316 if (if_attached)
1317 ether_ifdetach(ifp);
1318 sk_detach(dev);
1319 sc->sk_if[sc_if->sk_port] = NULL;
1320 return error;
1321 }
1322
1323 /*
1324 * Attach the interface. Allocate softc structures, do ifmedia
1325 * setup and ethernet/BPF attach.
1326 */
1327 static int
1328 skc_attach(device_t dev)
1329 {
1330 struct sk_softc *sc = device_get_softc(dev);
1331 uint8_t skrs;
1332 int *port;
1333 int error, cpuid;
1334
1335 DPRINTFN(2, ("begin skc_attach\n"));
1336
1337 sc->sk_dev = dev;
1338 lwkt_serialize_init(&sc->sk_serializer);
1339
1340 #ifndef BURN_BRIDGES
1341 /*
1342 * Handle power management nonsense.
1343 */
1344 if (pci_get_powerstate(dev) != PCI_POWERSTATE_D0) {
1345 uint32_t iobase, membase, irq;
1346
1347 /* Save important PCI config data. */
1348 iobase = pci_read_config(dev, SK_PCI_LOIO, 4);
1349 membase = pci_read_config(dev, SK_PCI_LOMEM, 4);
1350 irq = pci_read_config(dev, SK_PCI_INTLINE, 4);
1351
1352 /* Reset the power state. */
1353 device_printf(dev, "chip is in D%d power mode "
1354 "-- setting to D0\n", pci_get_powerstate(dev));
1355
1356 pci_set_powerstate(dev, PCI_POWERSTATE_D0);
1357
1358 /* Restore PCI config data. */
1359 pci_write_config(dev, SK_PCI_LOIO, iobase, 4);
1360 pci_write_config(dev, SK_PCI_LOMEM, membase, 4);
1361 pci_write_config(dev, SK_PCI_INTLINE, irq, 4);
1362 }
1363 #endif /* BURN_BRIDGES */
1364
1365 /*
1366 * Map control/status registers.
1367 */
1368 pci_enable_busmaster(dev);
1369
1370 sc->sk_res_rid = SK_PCI_LOMEM;
1371 sc->sk_res = bus_alloc_resource_any(dev, SYS_RES_MEMORY,
1372 &sc->sk_res_rid, RF_ACTIVE);
1373 if (sc->sk_res == NULL) {
1374 device_printf(dev, "couldn't map memory\n");
1375 error = ENXIO;
1376 goto fail;
1377 }
1378 sc->sk_btag = rman_get_bustag(sc->sk_res);
1379 sc->sk_bhandle = rman_get_bushandle(sc->sk_res);
1380
1381 sc->sk_type = sk_win_read_1(sc, SK_CHIPVER);
1382 sc->sk_rev = (sk_win_read_1(sc, SK_CONFIG) >> 4);
1383
1384 /* Bail out here if chip is not recognized */
1385 if (!SK_IS_GENESIS(sc) && !SK_IS_YUKON(sc)) {
1386 device_printf(dev, "unknown chip type: %d\n", sc->sk_type);
1387 error = ENXIO;
1388 goto fail;
1389 }
1390
1391 DPRINTFN(2, ("skc_attach: allocate interrupt\n"));
1392
1393 /* Allocate interrupt */
1394 sc->sk_irq_rid = 0;
1395 sc->sk_irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->sk_irq_rid,
1396 RF_SHAREABLE | RF_ACTIVE);
1397 if (sc->sk_irq == NULL) {
1398 device_printf(dev, "couldn't map interrupt\n");
1399 error = ENXIO;
1400 goto fail;
1401 }
1402
1403 switch (sc->sk_type) {
1404 case SK_GENESIS:
1405 sc->sk_imtimer_ticks = SK_IMTIMER_TICKS_GENESIS;
1406 break;
1407 default:
1408 sc->sk_imtimer_ticks = SK_IMTIMER_TICKS_YUKON;
1409 break;
1410 }
1411 sc->sk_imtime = skc_imtime;
1412
1413 /* Reset the adapter. */
1414 sk_reset(sc);
1415
1416 skrs = sk_win_read_1(sc, SK_EPROM0);
1417 if (SK_IS_GENESIS(sc)) {
1418 /* Read and save RAM size and RAMbuffer offset */
1419 switch(skrs) {
1420 case SK_RAMSIZE_512K_64:
1421 sc->sk_ramsize = 0x80000;
1422 sc->sk_rboff = SK_RBOFF_0;
1423 break;
1424 case SK_RAMSIZE_1024K_64:
1425 sc->sk_ramsize = 0x100000;
1426 sc->sk_rboff = SK_RBOFF_80000;
1427 break;
1428 case SK_RAMSIZE_1024K_128:
1429 sc->sk_ramsize = 0x100000;
1430 sc->sk_rboff = SK_RBOFF_0;
1431 break;
1432 case SK_RAMSIZE_2048K_128:
1433 sc->sk_ramsize = 0x200000;
1434 sc->sk_rboff = SK_RBOFF_0;
1435 break;
1436 default:
1437 device_printf(dev, "unknown ram size: %d\n", skrs);
1438 error = ENXIO;
1439 goto fail;
1440 }
1441 } else {
1442 if (skrs == 0x00)
1443 sc->sk_ramsize = 0x20000;
1444 else
1445 sc->sk_ramsize = skrs * (1<<12);
1446 sc->sk_rboff = SK_RBOFF_0;
1447 }
1448
1449 DPRINTFN(2, ("skc_attach: ramsize=%d (%dk), rboff=%d\n",
1450 sc->sk_ramsize, sc->sk_ramsize / 1024,
1451 sc->sk_rboff));
1452
1453 /* Read and save physical media type */
1454 sc->sk_pmd = sk_win_read_1(sc, SK_PMDTYPE);
1455
1456 if (sc->sk_pmd == 'T' || sc->sk_pmd == '1')
1457 sc->sk_coppertype = 1;
1458 else
1459 sc->sk_coppertype = 0;
1460
1461 /* Yukon Lite Rev A0 needs special test, from sk98lin driver */
1462 if (sc->sk_type == SK_YUKON || sc->sk_type == SK_YUKON_LP) {
1463 uint32_t flashaddr;
1464 uint8_t testbyte;
1465
1466 flashaddr = sk_win_read_4(sc, SK_EP_ADDR);
1467
1468 /* Test Flash-Address Register */
1469 sk_win_write_1(sc, SK_EP_ADDR+3, 0xff);
1470 testbyte = sk_win_read_1(sc, SK_EP_ADDR+3);
1471
1472 if (testbyte != 0) {
1473 /* This is a Yukon Lite Rev A0 */
1474 sc->sk_type = SK_YUKON_LITE;
1475 sc->sk_rev = SK_YUKON_LITE_REV_A0;
1476 /* Restore Flash-Address Register */
1477 sk_win_write_4(sc, SK_EP_ADDR, flashaddr);
1478 }
1479 }
1480
1481 /*
1482 * Create sysctl nodes.
1483 */
1484 sysctl_ctx_init(&sc->sk_sysctl_ctx);
1485 sc->sk_sysctl_tree = SYSCTL_ADD_NODE(&sc->sk_sysctl_ctx,
1486 SYSCTL_STATIC_CHILDREN(_hw),
1487 OID_AUTO,
1488 device_get_nameunit(dev),
1489 CTLFLAG_RD, 0, "");
1490 if (sc->sk_sysctl_tree == NULL) {
1491 device_printf(dev, "can't add sysctl node\n");
1492 error = ENXIO;
1493 goto fail;
1494 }
1495 SYSCTL_ADD_PROC(&sc->sk_sysctl_ctx,
1496 SYSCTL_CHILDREN(sc->sk_sysctl_tree),
1497 OID_AUTO, "imtime", CTLTYPE_INT | CTLFLAG_RW,
1498 sc, 0, skc_sysctl_imtime, "I",
1499 "Interrupt moderation time (usec).");
1500
1501 sc->sk_devs[SK_PORT_A] = device_add_child(dev, "sk", -1);
1502 port = kmalloc(sizeof(*port), M_DEVBUF, M_WAITOK);
1503 *port = SK_PORT_A;
1504 device_set_ivars(sc->sk_devs[SK_PORT_A], port);
1505
1506 if (!(sk_win_read_1(sc, SK_CONFIG) & SK_CONFIG_SINGLEMAC)) {
1507 sc->sk_devs[SK_PORT_B] = device_add_child(dev, "sk", -1);
1508 port = kmalloc(sizeof(*port), M_DEVBUF, M_WAITOK);
1509 *port = SK_PORT_B;
1510 device_set_ivars(sc->sk_devs[SK_PORT_B], port);
1511 }
1512
1513 /* Turn on the 'driver is loaded' LED. */
1514 CSR_WRITE_2(sc, SK_LED, SK_LED_GREEN_ON);
1515
1516 bus_generic_attach(dev);
1517
1518 cpuid = rman_get_cpuid(sc->sk_irq);
1519 if (sc->sk_if[0] != NULL)
1520 ifq_set_cpuid(&sc->sk_if[0]->arpcom.ac_if.if_snd, cpuid);
1521 if (sc->sk_if[1] != NULL)
1522 ifq_set_cpuid(&sc->sk_if[1]->arpcom.ac_if.if_snd, cpuid);
1523
1524 error = bus_setup_intr(dev, sc->sk_irq, INTR_MPSAFE, sk_intr, sc,
1525 &sc->sk_intrhand, &sc->sk_serializer);
1526 if (error) {
1527 device_printf(dev, "couldn't set up irq\n");
1528 goto fail;
1529 }
1530
1531 return 0;
1532 fail:
1533 skc_detach(dev);
1534 return error;
1535 }
1536
1537 static int
1538 sk_detach(device_t dev)
1539 {
1540 struct sk_if_softc *sc_if = device_get_softc(dev);
1541
1542 if (device_is_attached(dev)) {
1543 struct sk_softc *sc = sc_if->sk_softc;
1544 struct ifnet *ifp = &sc_if->arpcom.ac_if;
1545
1546 lwkt_serialize_enter(ifp->if_serializer);
1547
1548 if (sc->sk_intrhand != NULL) {
1549 if (sc->sk_if[SK_PORT_A] != NULL)
1550 sk_stop(sc->sk_if[SK_PORT_A]);
1551 if (sc->sk_if[SK_PORT_B] != NULL)
1552 sk_stop(sc->sk_if[SK_PORT_B]);
1553
1554 bus_teardown_intr(sc->sk_dev, sc->sk_irq,
1555 sc->sk_intrhand);
1556 sc->sk_intrhand = NULL;
1557 }
1558
1559 lwkt_serialize_exit(ifp->if_serializer);
1560
1561 ether_ifdetach(ifp);
1562 }
1563
1564 if (sc_if->sk_miibus != NULL)
1565 device_delete_child(dev, sc_if->sk_miibus);
1566
1567 sk_dma_free(dev);
1568 return 0;
1569 }
1570
1571 static int
1572 skc_detach(device_t dev)
1573 {
1574 struct sk_softc *sc = device_get_softc(dev);
1575 int *port;
1576
1577 #ifdef INVARIANTS
1578 if (device_is_attached(dev)) {
1579 KASSERT(sc->sk_intrhand == NULL,
1580 ("intr has not been torn down yet"));
1581 }
1582 #endif
1583
1584 if (sc->sk_devs[SK_PORT_A] != NULL) {
1585 port = device_get_ivars(sc->sk_devs[SK_PORT_A]);
1586 if (port != NULL) {
1587 kfree(port, M_DEVBUF);
1588 device_set_ivars(sc->sk_devs[SK_PORT_A], NULL);
1589 }
1590 device_delete_child(dev, sc->sk_devs[SK_PORT_A]);
1591 }
1592 if (sc->sk_devs[SK_PORT_B] != NULL) {
1593 port = device_get_ivars(sc->sk_devs[SK_PORT_B]);
1594 if (port != NULL) {
1595 kfree(port, M_DEVBUF);
1596 device_set_ivars(sc->sk_devs[SK_PORT_B], NULL);
1597 }
1598 device_delete_child(dev, sc->sk_devs[SK_PORT_B]);
1599 }
1600
1601 if (sc->sk_irq != NULL) {
1602 bus_release_resource(dev, SYS_RES_IRQ, sc->sk_irq_rid,
1603 sc->sk_irq);
1604 }
1605 if (sc->sk_res != NULL) {
1606 bus_release_resource(dev, SYS_RES_MEMORY, sc->sk_res_rid,
1607 sc->sk_res);
1608 }
1609
1610 if (sc->sk_sysctl_tree != NULL)
1611 sysctl_ctx_free(&sc->sk_sysctl_ctx);
1612
1613 return 0;
1614 }
1615
1616 static int
1617 sk_encap(struct sk_if_softc *sc_if, struct mbuf **m_head0, uint32_t *txidx)
1618 {
1619 struct sk_chain_data *cd = &sc_if->sk_cdata;
1620 struct sk_ring_data *rd = &sc_if->sk_rdata;
1621 struct sk_tx_desc *f = NULL;
1622 uint32_t frag, cur, sk_ctl;
1623 bus_dma_segment_t segs[SK_NTXSEG];
1624 bus_dmamap_t map;
1625 int i, error, maxsegs, nsegs;
1626
1627 DPRINTFN(2, ("sk_encap\n"));
1628
1629 maxsegs = SK_TX_RING_CNT - sc_if->sk_cdata.sk_tx_cnt - SK_NDESC_RESERVE;
1630 KASSERT(maxsegs >= SK_NDESC_SPARE, ("not enough spare TX desc"));
1631 if (maxsegs > SK_NTXSEG)
1632 maxsegs = SK_NTXSEG;
1633
1634 cur = frag = *txidx;
1635
1636 #ifdef SK_DEBUG
1637 if (skdebug >= 2)
1638 sk_dump_mbuf(*m_head0);
1639 #endif
1640
1641 map = cd->sk_tx_dmap[*txidx];
1642
1643 error = bus_dmamap_load_mbuf_defrag(cd->sk_tx_dtag, map, m_head0,
1644 segs, maxsegs, &nsegs, BUS_DMA_NOWAIT);
1645 if (error) {
1646 m_freem(*m_head0);
1647 *m_head0 = NULL;
1648 return error;
1649 }
1650
1651 DPRINTFN(2, ("sk_encap: nsegs=%d\n", nsegs));
1652
1653 /* Sync the DMA map. */
1654 bus_dmamap_sync(cd->sk_tx_dtag, map, BUS_DMASYNC_PREWRITE);
1655
1656 for (i = 0; i < nsegs; i++) {
1657 f = &rd->sk_tx_ring[frag];
1658 f->sk_data_lo = htole32(SK_ADDR_LO(segs[i].ds_addr));
1659 f->sk_data_hi = htole32(SK_ADDR_HI(segs[i].ds_addr));
1660 sk_ctl = segs[i].ds_len | SK_OPCODE_DEFAULT;
1661 if (i == 0)
1662 sk_ctl |= SK_TXCTL_FIRSTFRAG;
1663 else
1664 sk_ctl |= SK_TXCTL_OWN;
1665 f->sk_ctl = htole32(sk_ctl);
1666 cur = frag;
1667 SK_INC(frag, SK_TX_RING_CNT);
1668 }
1669
1670 cd->sk_tx_mbuf[cur] = *m_head0;
1671 /* Switch DMA map */
1672 cd->sk_tx_dmap[*txidx] = cd->sk_tx_dmap[cur];
1673 cd->sk_tx_dmap[cur] = map;
1674
1675 rd->sk_tx_ring[cur].sk_ctl |=
1676 htole32(SK_TXCTL_LASTFRAG|SK_TXCTL_EOF_INTR);
1677 rd->sk_tx_ring[*txidx].sk_ctl |= htole32(SK_TXCTL_OWN);
1678
1679 sc_if->sk_cdata.sk_tx_cnt += nsegs;
1680
1681 #ifdef SK_DEBUG
1682 if (skdebug >= 2) {
1683 struct sk_tx_desc *desc;
1684 uint32_t idx;
1685
1686 for (idx = *txidx; idx != frag; SK_INC(idx, SK_TX_RING_CNT)) {
1687 desc = &sc_if->sk_rdata->sk_tx_ring[idx];
1688 sk_dump_txdesc(desc, idx);
1689 }
1690 }
1691 #endif
1692
1693 *txidx = frag;
1694
1695 DPRINTFN(2, ("sk_encap: completed successfully\n"));
1696
1697 return (0);
1698 }
1699
1700 static void
1701 sk_start(struct ifnet *ifp, struct ifaltq_subque *ifsq)
1702 {
1703 struct sk_if_softc *sc_if = ifp->if_softc;
1704 struct sk_softc *sc = sc_if->sk_softc;
1705 uint32_t idx = sc_if->sk_cdata.sk_tx_prod;
1706 int trans = 0;
1707
1708 ASSERT_ALTQ_SQ_DEFAULT(ifp, ifsq);
1709 DPRINTFN(2, ("sk_start\n"));
1710
1711 if ((ifp->if_flags & IFF_RUNNING) == 0 || ifq_is_oactive(&ifp->if_snd))
1712 return;
1713
1714 while (sc_if->sk_cdata.sk_tx_mbuf[idx] == NULL) {
1715 struct mbuf *m_head;
1716
1717 if (SK_IS_OACTIVE(sc_if)) {
1718 ifq_set_oactive(&ifp->if_snd);
1719 break;
1720 }
1721
1722 m_head = ifq_dequeue(&ifp->if_snd);
1723 if (m_head == NULL)
1724 break;
1725
1726 /*
1727 * Pack the data into the transmit ring. If we
1728 * don't have room, set the OACTIVE flag and wait
1729 * for the NIC to drain the ring.
1730 */
1731 if (sk_encap(sc_if, &m_head, &idx)) {
1732 if (sc_if->sk_cdata.sk_tx_cnt == 0) {
1733 continue;
1734 } else {
1735 ifq_set_oactive(&ifp->if_snd);
1736 break;
1737 }
1738 }
1739
1740 trans = 1;
1741 BPF_MTAP(ifp, m_head);
1742 }
1743 if (!trans)
1744 return;
1745
1746 /* Transmit */
1747 if (idx != sc_if->sk_cdata.sk_tx_prod) {
1748 sc_if->sk_cdata.sk_tx_prod = idx;
1749 CSR_WRITE_4(sc, sc_if->sk_tx_bmu, SK_TXBMU_TX_START);
1750
1751 /* Set a timeout in case the chip goes out to lunch. */
1752 ifp->if_timer = 5;
1753 }
1754 }
1755
1756 static void
1757 sk_watchdog(struct ifnet *ifp)
1758 {
1759 struct sk_if_softc *sc_if = ifp->if_softc;
1760
1761 ASSERT_SERIALIZED(ifp->if_serializer);
1762 /*
1763 * Reclaim first as there is a possibility of losing Tx completion
1764 * interrupts.
1765 */
1766 sk_txeof(sc_if);
1767 if (sc_if->sk_cdata.sk_tx_cnt != 0) {
1768 if_printf(&sc_if->arpcom.ac_if, "watchdog timeout\n");
1769 IFNET_STAT_INC(ifp, oerrors, 1);
1770 ifp->if_flags &= ~IFF_RUNNING;
1771 sk_init(sc_if);
1772 }
1773 }
1774
1775 static void
1776 skc_shutdown(device_t dev)
1777 {
1778 struct sk_softc *sc = device_get_softc(dev);
1779
1780 DPRINTFN(2, ("sk_shutdown\n"));
1781
1782 lwkt_serialize_enter(&sc->sk_serializer);
1783
1784 /* Turn off the 'driver is loaded' LED. */
1785 CSR_WRITE_2(sc, SK_LED, SK_LED_GREEN_OFF);
1786
1787 /*
1788 * Reset the GEnesis controller. Doing this should also
1789 * assert the resets on the attached XMAC(s).
1790 */
1791 sk_reset(sc);
1792
1793 lwkt_serialize_exit(&sc->sk_serializer);
1794 }
1795
1796 static __inline int
1797 sk_rxvalid(struct sk_softc *sc, uint32_t stat, uint32_t len)
1798 {
1799 if (sc->sk_type == SK_GENESIS) {
1800 if ((stat & XM_RXSTAT_ERRFRAME) == XM_RXSTAT_ERRFRAME ||
1801 XM_RXSTAT_BYTES(stat) != len)
1802 return (0);
1803 } else {
1804 if ((stat & (YU_RXSTAT_CRCERR | YU_RXSTAT_LONGERR |
1805 YU_RXSTAT_MIIERR | YU_RXSTAT_BADFC | YU_RXSTAT_GOODFC |
1806 YU_RXSTAT_JABBER)) != 0 ||
1807 (stat & YU_RXSTAT_RXOK) != YU_RXSTAT_RXOK ||
1808 YU_RXSTAT_BYTES(stat) != len)
1809 return (0);
1810 }
1811
1812 return (1);
1813 }
1814
1815 static void
1816 sk_rxeof(struct sk_if_softc *sc_if)
1817 {
1818 struct sk_softc *sc = sc_if->sk_softc;
1819 struct ifnet *ifp = &sc_if->arpcom.ac_if;
1820 struct sk_chain_data *cd = &sc_if->sk_cdata;
1821 struct sk_ring_data *rd = &sc_if->sk_rdata;
1822 int i, max_frmlen;
1823
1824 DPRINTFN(2, ("sk_rxeof\n"));
1825
1826 i = cd->sk_rx_prod;
1827
1828 if (sc_if->sk_use_jumbo)
1829 max_frmlen = SK_JUMBO_FRAMELEN;
1830 else
1831 max_frmlen = ETHER_MAX_LEN;
1832
1833 for (;;) {
1834 struct sk_rx_desc *cur_desc;
1835 uint32_t rxstat, sk_ctl;
1836 #ifdef SK_RXCSUM
1837 uint16_t csum1, csum2;
1838 #endif
1839 int cur, total_len;
1840 struct mbuf *m;
1841
1842 cur = i;
1843 cur_desc = &rd->sk_rx_ring[cur];
1844
1845 sk_ctl = le32toh(cur_desc->sk_ctl);
1846 if (sk_ctl & SK_RXCTL_OWN) {
1847 /* Invalidate the descriptor -- it's not ready yet */
1848 cd->sk_rx_prod = cur;
1849 break;
1850 }
1851
1852 rxstat = le32toh(cur_desc->sk_xmac_rxstat);
1853 total_len = SK_RXBYTES(le32toh(cur_desc->sk_ctl));
1854
1855 #ifdef SK_RXCSUM
1856 csum1 = le16toh(cur_desc->sk_csum1);
1857 csum2 = le16toh(cur_desc->sk_csum2);
1858 #endif
1859
1860 m = cd->sk_rx_mbuf[cur];
1861
1862 /*
1863 * Bump 'i' here, so we can keep going, even if the current
1864 * RX descriptor reaping fails later. 'i' shoult NOT be used
1865 * in the following processing any more.
1866 */
1867 SK_INC(i, SK_RX_RING_CNT);
1868
1869 if ((sk_ctl & (SK_RXCTL_STATUS_VALID | SK_RXCTL_FIRSTFRAG |
1870 SK_RXCTL_LASTFRAG)) != (SK_RXCTL_STATUS_VALID |
1871 SK_RXCTL_FIRSTFRAG | SK_RXCTL_LASTFRAG) ||
1872 total_len < SK_MIN_FRAMELEN || total_len > max_frmlen ||
1873 sk_rxvalid(sc, rxstat, total_len) == 0) {
1874 IFNET_STAT_INC(ifp, ierrors, 1);
1875 cur_desc->sk_ctl = htole32(m->m_pkthdr.len | SK_RXSTAT);
1876 continue;
1877 }
1878
1879 /*
1880 * Try to allocate a new RX buffer. If that fails,
1881 * copy the packet to mbufs and put the RX buffer
1882 * back in the ring so it can be re-used. If
1883 * allocating mbufs fails, then we have to drop
1884 * the packet.
1885 */
1886 if (sk_newbuf(sc_if, cur, 0)) {
1887 IFNET_STAT_INC(ifp, ierrors, 1);
1888 cur_desc->sk_ctl = htole32(m->m_pkthdr.len | SK_RXSTAT);
1889 continue;
1890 } else {
1891 m->m_pkthdr.rcvif = ifp;
1892 m->m_pkthdr.len = m->m_len = total_len;
1893 }
1894
1895 #ifdef SK_RXCSUM
1896 sk_rxcsum(ifp, m, csum1, csum2);
1897 #endif
1898
1899 IFNET_STAT_INC(ifp, ipackets, 1);
1900 ifp->if_input(ifp, m);
1901 }
1902 }
1903
1904 #ifdef SK_RXCSUM
1905 static void
1906 sk_rxcsum(struct ifnet *ifp, struct mbuf *m,
1907 const uint16_t csum1, const uint16_t csum2)
1908 {
1909 struct ether_header *eh;
1910 struct ip *ip;
1911 uint8_t *pp;
1912 int hlen, len, plen;
1913 uint16_t iph_csum, ipo_csum, ipd_csum, csum;
1914
1915 pp = mtod(m, uint8_t *);
1916 plen = m->m_pkthdr.len;
1917 if (plen < sizeof(*eh))
1918 return;
1919 eh = (struct ether_header *)pp;
1920 iph_csum = in_addword(csum1, (~csum2 & 0xffff));
1921
1922 if (eh->ether_type == htons(ETHERTYPE_VLAN)) {
1923 uint16_t *xp = (uint16_t *)pp;
1924
1925 xp = (uint16_t *)pp;
1926 if (xp[1] != htons(ETHERTYPE_IP))
1927 return;
1928 iph_csum = in_addword(iph_csum, (~xp[0] & 0xffff));
1929 iph_csum = in_addword(iph_csum, (~xp[1] & 0xffff));
1930 xp = (uint16_t *)(pp + sizeof(struct ip));
1931 iph_csum = in_addword(iph_csum, xp[0]);
1932 iph_csum = in_addword(iph_csum, xp[1]);
1933 pp += EVL_ENCAPLEN;
1934 } else if (eh->ether_type != htons(ETHERTYPE_IP)) {
1935 return;
1936 }
1937
1938 pp += sizeof(*eh);
1939 plen -= sizeof(*eh);
1940
1941 ip = (struct ip *)pp;
1942
1943 if (ip->ip_v != IPVERSION)
1944 return;
1945
1946 hlen = ip->ip_hl << 2;
1947 if (hlen < sizeof(struct ip))
1948 return;
1949 if (hlen > ntohs(ip->ip_len))
1950 return;
1951
1952 /* Don't deal with truncated or padded packets. */
1953 if (plen != ntohs(ip->ip_len))
1954 return;
1955
1956 len = hlen - sizeof(struct ip);
1957 if (len > 0) {
1958 uint16_t *p;
1959
1960 p = (uint16_t *)(ip + 1);
1961 ipo_csum = 0;
1962 for (ipo_csum = 0; len > 0; len -= sizeof(*p), p++)
1963 ipo_csum = in_addword(ipo_csum, *p);
1964 iph_csum = in_addword(iph_csum, ipo_csum);
1965 ipd_csum = in_addword(csum2, (~ipo_csum & 0xffff));
1966 } else {
1967 ipd_csum = csum2;
1968 }
1969
1970 if (iph_csum != 0xffff)
1971 return;
1972 m->m_pkthdr.csum_flags = CSUM_IP_CHECKED | CSUM_IP_VALID;
1973
1974 if (ip->ip_off & htons(IP_MF | IP_OFFMASK))
1975 return; /* ip frag, we're done for now */
1976
1977 pp += hlen;
1978
1979 /* Only know checksum protocol for udp/tcp */
1980 if (ip->ip_p == IPPROTO_UDP) {
1981 struct udphdr *uh = (struct udphdr *)pp;
1982
1983 if (uh->uh_sum == 0) /* udp with no checksum */
1984 return;
1985 } else if (ip->ip_p != IPPROTO_TCP) {
1986 return;
1987 }
1988
1989 csum = in_pseudo(ip->ip_src.s_addr, ip->ip_dst.s_addr,
1990 htonl(ntohs(ip->ip_len) - hlen + ip->ip_p) + ipd_csum);
1991 if (csum == 0xffff) {
1992 m->m_pkthdr.csum_data = csum;
1993 m->m_pkthdr.csum_flags |= (CSUM_DATA_VALID | CSUM_PSEUDO_HDR);
1994 }
1995 }
1996 #endif
1997
1998 static void
1999 sk_txeof(struct sk_if_softc *sc_if)
2000 {
2001 struct sk_chain_data *cd = &sc_if->sk_cdata;
2002 struct ifnet *ifp = &sc_if->arpcom.ac_if;
2003 uint32_t idx;
2004
2005 DPRINTFN(2, ("sk_txeof\n"));
2006
2007 /*
2008 * Go through our tx ring and free mbufs for those
2009 * frames that have been sent.
2010 */
2011 idx = cd->sk_tx_cons;
2012 while (idx != cd->sk_tx_prod) {
2013 struct sk_tx_desc *cur_tx;
2014 uint32_t sk_ctl;
2015
2016 cur_tx = &sc_if->sk_rdata.sk_tx_ring[idx];
2017 sk_ctl = le32toh(cur_tx->sk_ctl);
2018 #ifdef SK_DEBUG
2019 if (skdebug >= 2)
2020 sk_dump_txdesc(cur_tx, idx);
2021 #endif
2022 if (sk_ctl & SK_TXCTL_OWN)
2023 break;
2024 if (sk_ctl & SK_TXCTL_LASTFRAG)
2025 IFNET_STAT_INC(ifp, opackets, 1);
2026 if (cd->sk_tx_mbuf[idx] != NULL) {
2027 bus_dmamap_unload(cd->sk_tx_dtag, cd->sk_tx_dmap[idx]);
2028 m_freem(cd->sk_tx_mbuf[idx]);
2029 cd->sk_tx_mbuf[idx] = NULL;
2030 }
2031 sc_if->sk_cdata.sk_tx_cnt--;
2032 SK_INC(idx, SK_TX_RING_CNT);
2033 }
2034
2035 if (!SK_IS_OACTIVE(sc_if))
2036 ifq_clr_oactive(&ifp->if_snd);
2037
2038 if (sc_if->sk_cdata.sk_tx_cnt == 0)
2039 ifp->if_timer = 0;
2040
2041 sc_if->sk_cdata.sk_tx_cons = idx;
2042 }
2043
2044 static void
2045 sk_tick(void *xsc_if)
2046 {
2047 struct sk_if_softc *sc_if = xsc_if;
2048 struct ifnet *ifp = &sc_if->arpcom.ac_if;
2049 struct mii_data *mii = device_get_softc(sc_if->sk_miibus);
2050 int i;
2051
2052 DPRINTFN(2, ("sk_tick\n"));
2053
2054 lwkt_serialize_enter(ifp->if_serializer);
2055
2056 if ((ifp->if_flags & IFF_UP) == 0) {
2057 lwkt_serialize_exit(ifp->if_serializer);
2058 return;
2059 }
2060
2061 if (sc_if->sk_phytype == SK_PHYTYPE_BCOM) {
2062 sk_intr_bcom(sc_if);
2063 lwkt_serialize_exit(ifp->if_serializer);
2064 return;
2065 }
2066
2067 /*
2068 * According to SysKonnect, the correct way to verify that
2069 * the link has come back up is to poll bit 0 of the GPIO
2070 * register three times. This pin has the signal from the
2071 * link sync pin connected to it; if we read the same link
2072 * state 3 times in a row, we know the link is up.
2073 */
2074 for (i = 0; i < 3; i++) {
2075 if (SK_XM_READ_2(sc_if, XM_GPIO) & XM_GPIO_GP0_SET)
2076 break;
2077 }
2078
2079 if (i != 3) {
2080 callout_reset(&sc_if->sk_tick_timer, hz, sk_tick, sc_if);
2081 lwkt_serialize_exit(ifp->if_serializer);
2082 return;
2083 }
2084
2085 /* Turn the GP0 interrupt back on. */
2086 SK_XM_CLRBIT_2(sc_if, XM_IMR, XM_IMR_GP0_SET);
2087 SK_XM_READ_2(sc_if, XM_ISR);
2088 mii_tick(mii);
2089 callout_stop(&sc_if->sk_tick_timer);
2090 lwkt_serialize_exit(ifp->if_serializer);
2091 }
2092
2093 static void
2094 sk_yukon_tick(void *xsc_if)
2095 {
2096 struct sk_if_softc *sc_if = xsc_if;
2097 struct ifnet *ifp = &sc_if->arpcom.ac_if;
2098 struct mii_data *mii = device_get_softc(sc_if->sk_miibus);
2099
2100 lwkt_serialize_enter(ifp->if_serializer);
2101 mii_tick(mii);
2102 callout_reset(&sc_if->sk_tick_timer, hz, sk_yukon_tick, sc_if);
2103 lwkt_serialize_exit(ifp->if_serializer);
2104 }
2105
2106 static void
2107 sk_intr_bcom(struct sk_if_softc *sc_if)
2108 {
2109 struct mii_data *mii = device_get_softc(sc_if->sk_miibus);
2110 struct ifnet *ifp = &sc_if->arpcom.ac_if;
2111 int status;
2112
2113 DPRINTFN(2, ("sk_intr_bcom\n"));
2114
2115 SK_XM_CLRBIT_2(sc_if, XM_MMUCMD, XM_MMUCMD_TX_ENB|XM_MMUCMD_RX_ENB);
2116
2117 /*
2118 * Read the PHY interrupt register to make sure
2119 * we clear any pending interrupts.
2120 */
2121 status = sk_xmac_miibus_readreg(sc_if, SK_PHYADDR_BCOM, BRGPHY_MII_ISR);
2122
2123 if ((ifp->if_flags & IFF_RUNNING) == 0) {
2124 sk_init_xmac(sc_if);
2125 return;
2126 }
2127
2128 if (status & (BRGPHY_ISR_LNK_CHG|BRGPHY_ISR_AN_PR)) {
2129 int lstat;
2130
2131 lstat = sk_xmac_miibus_readreg(sc_if, SK_PHYADDR_BCOM,
2132 BRGPHY_MII_AUXSTS);
2133
2134 if (!(lstat & BRGPHY_AUXSTS_LINK) && sc_if->sk_link) {
2135 mii_mediachg(mii);
2136 /* Turn off the link LED. */
2137 SK_IF_WRITE_1(sc_if, 0,
2138 SK_LINKLED1_CTL, SK_LINKLED_OFF);
2139 sc_if->sk_link = 0;
2140 } else if (status & BRGPHY_ISR_LNK_CHG) {
2141 sk_xmac_miibus_writereg(sc_if, SK_PHYADDR_BCOM,
2142 BRGPHY_MII_IMR, 0xFF00);
2143 mii_tick(mii);
2144 sc_if->sk_link = 1;
2145 /* Turn on the link LED. */
2146 SK_IF_WRITE_1(sc_if, 0, SK_LINKLED1_CTL,
2147 SK_LINKLED_ON|SK_LINKLED_LINKSYNC_OFF|
2148 SK_LINKLED_BLINK_OFF);
2149 } else {
2150 mii_tick(mii);
2151 callout_reset(&sc_if->sk_tick_timer, hz,
2152 sk_tick, sc_if);
2153 }
2154 }
2155
2156 SK_XM_SETBIT_2(sc_if, XM_MMUCMD, XM_MMUCMD_TX_ENB|XM_MMUCMD_RX_ENB);
2157 }
2158
2159 static void
2160 sk_intr_xmac(struct sk_if_softc *sc_if)
2161 {
2162 uint16_t status;
2163
2164 status = SK_XM_READ_2(sc_if, XM_ISR);
2165 DPRINTFN(2, ("sk_intr_xmac\n"));
2166
2167 if (sc_if->sk_phytype == SK_PHYTYPE_XMAC &&
2168 (status & (XM_ISR_GP0_SET | XM_ISR_AUTONEG_DONE))) {
2169 if (status & XM_ISR_GP0_SET)
2170 SK_XM_SETBIT_2(sc_if, XM_IMR, XM_IMR_GP0_SET);
2171
2172 callout_reset(&sc_if->sk_tick_timer, hz,
2173 sk_tick, sc_if);
2174 }
2175
2176 if (status & XM_IMR_TX_UNDERRUN)
2177 SK_XM_SETBIT_4(sc_if, XM_MODE, XM_MODE_FLUSH_TXFIFO);
2178
2179 if (status & XM_IMR_RX_OVERRUN)
2180 SK_XM_SETBIT_4(sc_if, XM_MODE, XM_MODE_FLUSH_RXFIFO);
2181 }
2182
2183 static void
2184 sk_intr_yukon(struct sk_if_softc *sc_if)
2185 {
2186 uint8_t status;
2187
2188 status = SK_IF_READ_1(sc_if, 0, SK_GMAC_ISR);
2189 /* RX overrun */
2190 if ((status & SK_GMAC_INT_RX_OVER) != 0) {
2191 SK_IF_WRITE_1(sc_if, 0, SK_RXMF1_CTRL_TEST,
2192 SK_RFCTL_RX_FIFO_OVER);
2193 }
2194 /* TX underrun */
2195 if ((status & SK_GMAC_INT_TX_UNDER) != 0) {
2196 SK_IF_WRITE_1(sc_if, 0, SK_RXMF1_CTRL_TEST,
2197 SK_TFCTL_TX_FIFO_UNDER);
2198 }
2199
2200 DPRINTFN(2, ("sk_intr_yukon status=%#x\n", status));
2201 }
2202
2203 static void
2204 sk_intr(void *xsc)
2205 {
2206 struct sk_softc *sc = xsc;
2207 struct sk_if_softc *sc_if0 = sc->sk_if[SK_PORT_A];
2208 struct sk_if_softc *sc_if1 = sc->sk_if[SK_PORT_B];
2209 struct ifnet *ifp0 = NULL, *ifp1 = NULL;
2210 uint32_t status;
2211
2212 ASSERT_SERIALIZED(&sc->sk_serializer);
2213
2214 status = CSR_READ_4(sc, SK_ISSR);
2215 if (status == 0 || status == 0xffffffff)
2216 return;
2217
2218 if (sc_if0 != NULL)
2219 ifp0 = &sc_if0->arpcom.ac_if;
2220 if (sc_if1 != NULL)
2221 ifp1 = &sc_if1->arpcom.ac_if;
2222
2223 for (; (status &= sc->sk_intrmask) != 0;) {
2224 /* Handle receive interrupts first. */
2225 if (sc_if0 && (status & SK_ISR_RX1_EOF)) {
2226 sk_rxeof(sc_if0);
2227 CSR_WRITE_4(sc, SK_BMU_RX_CSR0,
2228 SK_RXBMU_CLR_IRQ_EOF|SK_RXBMU_RX_START);
2229 }
2230 if (sc_if1 && (status & SK_ISR_RX2_EOF)) {
2231 sk_rxeof(sc_if1);
2232 CSR_WRITE_4(sc, SK_BMU_RX_CSR1,
2233 SK_RXBMU_CLR_IRQ_EOF|SK_RXBMU_RX_START);
2234 }
2235
2236 /* Then transmit interrupts. */
2237 if (sc_if0 && (status & SK_ISR_TX1_S_EOF)) {
2238 sk_txeof(sc_if0);
2239 CSR_WRITE_4(sc, SK_BMU_TXS_CSR0,
2240 SK_TXBMU_CLR_IRQ_EOF);
2241 }
2242 if (sc_if1 && (status & SK_ISR_TX2_S_EOF)) {
2243 sk_txeof(sc_if1);
2244 CSR_WRITE_4(sc, SK_BMU_TXS_CSR1,
2245 SK_TXBMU_CLR_IRQ_EOF);
2246 }
2247
2248 /* Then MAC interrupts. */
2249 if (sc_if0 && (status & SK_ISR_MAC1) &&
2250 (ifp0->if_flags & IFF_RUNNING)) {
2251 if (SK_IS_GENESIS(sc))
2252 sk_intr_xmac(sc_if0);
2253 else
2254 sk_intr_yukon(sc_if0);
2255 }
2256
2257 if (sc_if1 && (status & SK_ISR_MAC2) &&
2258 (ifp1->if_flags & IFF_RUNNING)) {
2259 if (SK_IS_GENESIS(sc))
2260 sk_intr_xmac(sc_if1);
2261 else
2262 sk_intr_yukon(sc_if1);
2263 }
2264
2265 if (status & SK_ISR_EXTERNAL_REG) {
2266 if (sc_if0 != NULL &&
2267 sc_if0->sk_phytype == SK_PHYTYPE_BCOM)
2268 sk_intr_bcom(sc_if0);
2269
2270 if (sc_if1 != NULL &&
2271 sc_if1->sk_phytype == SK_PHYTYPE_BCOM)
2272 sk_intr_bcom(sc_if1);
2273 }
2274 status = CSR_READ_4(sc, SK_ISSR);
2275 }
2276
2277 CSR_WRITE_4(sc, SK_IMR, sc->sk_intrmask);
2278
2279 if (ifp0 != NULL && !ifq_is_empty(&ifp0->if_snd))
2280 if_devstart(ifp0);
2281 if (ifp1 != NULL && !ifq_is_empty(&ifp1->if_snd))
2282 if_devstart(ifp1);
2283 }
2284
2285 static void
2286 sk_init_xmac(struct sk_if_softc *sc_if)
2287 {
2288 struct sk_softc *sc = sc_if->sk_softc;
2289 struct ifnet *ifp = &sc_if->arpcom.ac_if;
2290 static const struct sk_bcom_hack bhack[] = {
2291 { 0x18, 0x0c20 }, { 0x17, 0x0012 }, { 0x15, 0x1104 }, { 0x17, 0x0013 },
2292 { 0x15, 0x0404 }, { 0x17, 0x8006 }, { 0x15, 0x0132 }, { 0x17, 0x8006 },
2293 { 0x15, 0x0232 }, { 0x17, 0x800D }, { 0x15, 0x000F }, { 0x18, 0x0420 },
2294 { 0, 0 } };
2295
2296 DPRINTFN(2, ("sk_init_xmac\n"));
2297
2298 /* Unreset the XMAC. */
2299 SK_IF_WRITE_2(sc_if, 0, SK_TXF1_MACCTL, SK_TXMACCTL_XMAC_UNRESET);
2300 DELAY(1000);
2301
2302 /* Reset the XMAC's internal state. */
2303 SK_XM_SETBIT_2(sc_if, XM_GPIO, XM_GPIO_RESETMAC);
2304
2305 /* Save the XMAC II revision */
2306 sc_if->sk_xmac_rev = XM_XMAC_REV(SK_XM_READ_4(sc_if, XM_DEVID));
2307
2308 /*
2309 * Perform additional initialization for external PHYs,
2310 * namely for the 1000baseT cards that use the XMAC's
2311 * GMII mode.
2312 */
2313 if (sc_if->sk_phytype == SK_PHYTYPE_BCOM) {
2314 int i = 0;
2315 uint32_t val;
2316
2317 /* Take PHY out of reset. */
2318 val = sk_win_read_4(sc, SK_GPIO);
2319 if (sc_if->sk_port == SK_PORT_A)
2320 val |= SK_GPIO_DIR0|SK_GPIO_DAT0;
2321 else
2322 val |= SK_GPIO_DIR2|SK_GPIO_DAT2;
2323 sk_win_write_4(sc, SK_GPIO, val);
2324
2325 /* Enable GMII mode on the XMAC. */
2326 SK_XM_SETBIT_2(sc_if, XM_HWCFG, XM_HWCFG_GMIIMODE);
2327
2328 sk_xmac_miibus_writereg(sc_if, SK_PHYADDR_BCOM,
2329 BRGPHY_MII_BMCR, BRGPHY_BMCR_RESET);
2330 DELAY(10000);
2331 sk_xmac_miibus_writereg(sc_if, SK_PHYADDR_BCOM,
2332 BRGPHY_MII_IMR, 0xFFF0);
2333
2334 /*
2335 * Early versions of the BCM5400 apparently have
2336 * a bug that requires them to have their reserved
2337 * registers initialized to some magic values. I don't
2338 * know what the numbers do, I'm just the messenger.
2339 */
2340 if (sk_xmac_miibus_readreg(sc_if, SK_PHYADDR_BCOM, 0x03)
2341 == 0x6041) {
2342 while(bhack[i].reg) {
2343 sk_xmac_miibus_writereg(sc_if, SK_PHYADDR_BCOM,
2344 bhack[i].reg, bhack[i].val);
2345 i++;
2346 }
2347 }
2348 }
2349
2350 /* Set station address */
2351 SK_XM_WRITE_2(sc_if, XM_PAR0,
2352 *(uint16_t *)(&sc_if->arpcom.ac_enaddr[0]));
2353 SK_XM_WRITE_2(sc_if, XM_PAR1,
2354 *(uint16_t *)(&sc_if->arpcom.ac_enaddr[2]));
2355 SK_XM_WRITE_2(sc_if, XM_PAR2,
2356 *(uint16_t *)(&sc_if->arpcom.ac_enaddr[4]));
2357 SK_XM_SETBIT_4(sc_if, XM_MODE, XM_MODE_RX_USE_STATION);
2358
2359 if (ifp->if_flags & IFF_BROADCAST)
2360 SK_XM_CLRBIT_4(sc_if, XM_MODE, XM_MODE_RX_NOBROAD);
2361 else
2362 SK_XM_SETBIT_4(sc_if, XM_MODE, XM_MODE_RX_NOBROAD);
2363
2364 /* We don't need the FCS appended to the packet. */
2365 SK_XM_SETBIT_2(sc_if, XM_RXCMD, XM_RXCMD_STRIPFCS);
2366
2367 /* We want short frames padded to 60 bytes. */
2368 SK_XM_SETBIT_2(sc_if, XM_TXCMD, XM_TXCMD_AUTOPAD);
2369
2370 /*
2371 * Enable the reception of all error frames. This is
2372 * a necessary evil due to the design of the XMAC. The
2373 * XMAC's receive FIFO is only 8K in size, however jumbo
2374 * frames can be up to 9000 bytes in length. When bad
2375 * frame filtering is enabled, the XMAC's RX FIFO operates
2376 * in 'store and forward' mode. For this to work, the
2377 * entire frame has to fit into the FIFO, but that means
2378 * that jumbo frames larger than 8192 bytes will be
2379 * truncated. Disabling all bad frame filtering causes
2380 * the RX FIFO to operate in streaming mode, in which
2381 * case the XMAC will start transfering frames out of the
2382 * RX FIFO as soon as the FIFO threshold is reached.
2383 */
2384 if (sc_if->sk_use_jumbo) {
2385 SK_XM_SETBIT_4(sc_if, XM_MODE, XM_MODE_RX_BADFRAMES|
2386 XM_MODE_RX_GIANTS|XM_MODE_RX_RUNTS|XM_MODE_RX_CRCERRS|
2387 XM_MODE_RX_INRANGELEN);
2388 }
2389
2390 SK_XM_SETBIT_2(sc_if, XM_RXCMD, XM_RXCMD_BIGPKTOK);
2391
2392 /*
2393 * Bump up the transmit threshold. This helps hold off transmit
2394 * underruns when we're blasting traffic from both ports at once.
2395 */
2396 SK_XM_WRITE_2(sc_if, XM_TX_REQTHRESH, SK_XM_TX_FIFOTHRESH);
2397
2398 /* Set promiscuous mode */
2399 sk_setpromisc(sc_if);
2400
2401 /* Set multicast filter */
2402 sk_setmulti(sc_if);
2403
2404 /* Clear and enable interrupts */
2405 SK_XM_READ_2(sc_if, XM_ISR);
2406 if (sc_if->sk_phytype == SK_PHYTYPE_XMAC)
2407 SK_XM_WRITE_2(sc_if, XM_IMR, XM_INTRS);
2408 else
2409 SK_XM_WRITE_2(sc_if, XM_IMR, 0xFFFF);
2410
2411 /* Configure MAC arbiter */
2412 switch(sc_if->sk_xmac_rev) {
2413 case XM_XMAC_REV_B2:
2414 sk_win_write_1(sc, SK_RCINIT_RX1, SK_RCINIT_XMAC_B2);
2415 sk_win_write_1(sc, SK_RCINIT_TX1, SK_RCINIT_XMAC_B2);
2416 sk_win_write_1(sc, SK_RCINIT_RX2, SK_RCINIT_XMAC_B2);
2417 sk_win_write_1(sc, SK_RCINIT_TX2, SK_RCINIT_XMAC_B2);
2418 sk_win_write_1(sc, SK_MINIT_RX1, SK_MINIT_XMAC_B2);
2419 sk_win_write_1(sc, SK_MINIT_TX1, SK_MINIT_XMAC_B2);
2420 sk_win_write_1(sc, SK_MINIT_RX2, SK_MINIT_XMAC_B2);
2421 sk_win_write_1(sc, SK_MINIT_TX2, SK_MINIT_XMAC_B2);
2422 sk_win_write_1(sc, SK_RECOVERY_CTL, SK_RECOVERY_XMAC_B2);
2423 break;
2424 case XM_XMAC_REV_C1:
2425 sk_win_write_1(sc, SK_RCINIT_RX1, SK_RCINIT_XMAC_C1);
2426 sk_win_write_1(sc, SK_RCINIT_TX1, SK_RCINIT_XMAC_C1);
2427 sk_win_write_1(sc, SK_RCINIT_RX2, SK_RCINIT_XMAC_C1);
2428 sk_win_write_1(sc, SK_RCINIT_TX2, SK_RCINIT_XMAC_C1);
2429 sk_win_write_1(sc, SK_MINIT_RX1, SK_MINIT_XMAC_C1);
2430 sk_win_write_1(sc, SK_MINIT_TX1, SK_MINIT_XMAC_C1);
2431 sk_win_write_1(sc, SK_MINIT_RX2, SK_MINIT_XMAC_C1);
2432 sk_win_write_1(sc, SK_MINIT_TX2, SK_MINIT_XMAC_C1);
2433 sk_win_write_1(sc, SK_RECOVERY_CTL, SK_RECOVERY_XMAC_B2);
2434 break;
2435 default:
2436 break;
2437 }
2438 sk_win_write_2(sc, SK_MACARB_CTL,
2439 SK_MACARBCTL_UNRESET|SK_MACARBCTL_FASTOE_OFF);
2440
2441 sc_if->sk_link = 1;
2442 }
2443
2444 static void
2445 sk_init_yukon(struct sk_if_softc *sc_if)
2446 {
2447 uint32_t phy, v;
2448 uint16_t reg;
2449 struct sk_softc *sc;
2450 int i;
2451
2452 sc = sc_if->sk_softc;
2453
2454 DPRINTFN(2, ("sk_init_yukon: start: sk_csr=%#x\n",
2455 CSR_READ_4(sc_if->sk_softc, SK_CSR)));
2456
2457 if (sc->sk_type == SK_YUKON_LITE &&
2458 sc->sk_rev >= SK_YUKON_LITE_REV_A3) {
2459 /*
2460 * Workaround code for COMA mode, set PHY reset.
2461 * Otherwise it will not correctly take chip out of
2462 * powerdown (coma)
2463 */
2464 v = sk_win_read_4(sc, SK_GPIO);
2465 v |= SK_GPIO_DIR9 | SK_GPIO_DAT9;
2466 sk_win_write_4(sc, SK_GPIO, v);
2467 }
2468
2469 DPRINTFN(6, ("sk_init_yukon: 1\n"));
2470
2471 /* GMAC and GPHY Reset */
2472 SK_IF_WRITE_4(sc_if, 0, SK_GPHY_CTRL, SK_GPHY_RESET_SET);
2473 SK_IF_WRITE_4(sc_if, 0, SK_GMAC_CTRL, SK_GMAC_RESET_SET);
2474 DELAY(1000);
2475
2476 DPRINTFN(6, ("sk_init_yukon: 2\n"));
2477
2478 if (sc->sk_type == SK_YUKON_LITE &&
2479 sc->sk_rev >= SK_YUKON_LITE_REV_A3) {
2480 /*
2481 * Workaround code for COMA mode, clear PHY reset
2482 */
2483 v = sk_win_read_4(sc, SK_GPIO);
2484 v |= SK_GPIO_DIR9;
2485 v &= ~SK_GPIO_DAT9;
2486 sk_win_write_4(sc, SK_GPIO, v);
2487 }
2488
2489 phy = SK_GPHY_INT_POL_HI | SK_GPHY_DIS_FC | SK_GPHY_DIS_SLEEP |
2490 SK_GPHY_ENA_XC | SK_GPHY_ANEG_ALL | SK_GPHY_ENA_PAUSE;
2491
2492 if (sc->sk_coppertype)
2493 phy |= SK_GPHY_COPPER;
2494 else
2495 phy |= SK_GPHY_FIBER;
2496
2497 DPRINTFN(3, ("sk_init_yukon: phy=%#x\n", phy));
2498
2499 SK_IF_WRITE_4(sc_if, 0, SK_GPHY_CTRL, phy | SK_GPHY_RESET_SET);
2500 DELAY(1000);
2501 SK_IF_WRITE_4(sc_if, 0, SK_GPHY_CTRL, phy | SK_GPHY_RESET_CLEAR);
2502 SK_IF_WRITE_4(sc_if, 0, SK_GMAC_CTRL, SK_GMAC_LOOP_OFF |
2503 SK_GMAC_PAUSE_ON | SK_GMAC_RESET_CLEAR);
2504
2505 DPRINTFN(3, ("sk_init_yukon: gmac_ctrl=%#x\n",
2506 SK_IF_READ_4(sc_if, 0, SK_GMAC_CTRL)));
2507
2508 DPRINTFN(6, ("sk_init_yukon: 3\n"));
2509
2510 /* unused read of the interrupt source register */
2511 DPRINTFN(6, ("sk_init_yukon: 4\n"));
2512 SK_IF_READ_2(sc_if, 0, SK_GMAC_ISR);
2513
2514 DPRINTFN(6, ("sk_init_yukon: 4a\n"));
2515 reg = SK_YU_READ_2(sc_if, YUKON_PAR);
2516 DPRINTFN(6, ("sk_init_yukon: YUKON_PAR=%#x\n", reg));
2517
2518 /* MIB Counter Clear Mode set */
2519 reg |= YU_PAR_MIB_CLR;
2520 DPRINTFN(6, ("sk_init_yukon: YUKON_PAR=%#x\n", reg));
2521 DPRINTFN(6, ("sk_init_yukon: 4b\n"));
2522 SK_YU_WRITE_2(sc_if, YUKON_PAR, reg);
2523
2524 /* MIB Counter Clear Mode clear */
2525 DPRINTFN(6, ("sk_init_yukon: 5\n"));
2526 reg &= ~YU_PAR_MIB_CLR;
2527 SK_YU_WRITE_2(sc_if, YUKON_PAR, reg);
2528
2529 /* receive control reg */
2530 DPRINTFN(6, ("sk_init_yukon: 7\n"));
2531 SK_YU_WRITE_2(sc_if, YUKON_RCR, YU_RCR_CRCR);
2532
2533 /* transmit parameter register */
2534 DPRINTFN(6, ("sk_init_yukon: 8\n"));
2535 SK_YU_WRITE_2(sc_if, YUKON_TPR, YU_TPR_JAM_LEN(0x3) |
2536 YU_TPR_JAM_IPG(0xb) | YU_TPR_JAM2DATA_IPG(0x1a) );
2537
2538 /* serial mode register */
2539 DPRINTFN(6, ("sk_init_yukon: 9\n"));
2540 reg = YU_SMR_DATA_BLIND(0x1c) | YU_SMR_MFL_VLAN | YU_SMR_IPG_DATA(0x1e);
2541 if (sc_if->sk_use_jumbo)
2542 reg |= YU_SMR_MFL_JUMBO;
2543 SK_YU_WRITE_2(sc_if, YUKON_SMR, reg);
2544
2545 DPRINTFN(6, ("sk_init_yukon: 10\n"));
2546 /* Setup Yukon's address */
2547 for (i = 0; i < 3; i++) {
2548 /* Write Source Address 1 (unicast filter) */
2549 SK_YU_WRITE_2(sc_if, YUKON_SAL1 + i * 4,
2550 sc_if->arpcom.ac_enaddr[i * 2] |
2551 sc_if->arpcom.ac_enaddr[i * 2 + 1] << 8);
2552 }
2553
2554 for (i = 0; i < 3; i++) {
2555 reg = sk_win_read_2(sc_if->sk_softc,
2556 SK_MAC1_0 + i * 2 + sc_if->sk_port * 8);
2557 SK_YU_WRITE_2(sc_if, YUKON_SAL2 + i * 4, reg);
2558 }
2559
2560 /* Set promiscuous mode */
2561 sk_setpromisc(sc_if);
2562
2563 /* Set multicast filter */
2564 DPRINTFN(6, ("sk_init_yukon: 11\n"));
2565 sk_setmulti(sc_if);
2566
2567 /* enable interrupt mask for counter overflows */
2568 DPRINTFN(6, ("sk_init_yukon: 12\n"));
2569 SK_YU_WRITE_2(sc_if, YUKON_TIMR, 0);
2570 SK_YU_WRITE_2(sc_if, YUKON_RIMR, 0);
2571 SK_YU_WRITE_2(sc_if, YUKON_TRIMR, 0);
2572
2573 /* Configure RX MAC FIFO Flush Mask */
2574 v = YU_RXSTAT_FOFL | YU_RXSTAT_CRCERR | YU_RXSTAT_MIIERR |
2575 YU_RXSTAT_BADFC | YU_RXSTAT_GOODFC | YU_RXSTAT_RUNT |
2576 YU_RXSTAT_JABBER;
2577 SK_IF_WRITE_2(sc_if, 0, SK_RXMF1_FLUSH_MASK, v);
2578
2579 /* Disable RX MAC FIFO Flush for YUKON-Lite Rev. A0 only */
2580 if (sc->sk_type == SK_YUKON_LITE && sc->sk_rev == SK_YUKON_LITE_REV_A0)
2581 v = SK_TFCTL_OPERATION_ON;
2582 else
2583 v = SK_TFCTL_OPERATION_ON | SK_RFCTL_FIFO_FLUSH_ON;
2584 /* Configure RX MAC FIFO */
2585 SK_IF_WRITE_1(sc_if, 0, SK_RXMF1_CTRL_TEST, SK_RFCTL_RESET_CLEAR);
2586 SK_IF_WRITE_2(sc_if, 0, SK_RXMF1_CTRL_TEST, v);
2587
2588 /* Increase flush threshould to 64 bytes */
2589 SK_IF_WRITE_2(sc_if, 0, SK_RXMF1_FLUSH_THRESHOLD,
2590 SK_RFCTL_FIFO_THRESHOLD + 1);
2591
2592 /* Configure TX MAC FIFO */
2593 SK_IF_WRITE_1(sc_if, 0, SK_TXMF1_CTRL_TEST, SK_TFCTL_RESET_CLEAR);
2594 SK_IF_WRITE_2(sc_if, 0, SK_TXMF1_CTRL_TEST, SK_TFCTL_OPERATION_ON);
2595
2596 DPRINTFN(6, ("sk_init_yukon: end\n"));
2597 }
2598
2599 /*
2600 * Note that to properly initialize any part of the GEnesis chip,
2601 * you first have to take it out of reset mode.
2602 */
2603 static void
2604 sk_init(void *xsc_if)
2605 {
2606 struct sk_if_softc *sc_if = xsc_if;
2607 struct sk_softc *sc = sc_if->sk_softc;
2608 struct ifnet *ifp = &sc_if->arpcom.ac_if;
2609 struct mii_data *mii = device_get_softc(sc_if->sk_miibus);
2610
2611 DPRINTFN(2, ("sk_init\n"));
2612
2613 ASSERT_SERIALIZED(ifp->if_serializer);
2614
2615 if (ifp->if_flags & IFF_RUNNING)
2616 return;
2617
2618 /* Cancel pending I/O and free all RX/TX buffers. */
2619 sk_stop(sc_if);
2620
2621 /*
2622 * NOTE: Change sk_use_jumbo after sk_stop(),
2623 * but before real initialization.
2624 */
2625 if (ifp->if_mtu > ETHER_MAX_LEN)
2626 sc_if->sk_use_jumbo = 1;
2627 else
2628 sc_if->sk_use_jumbo = 0;
2629 DPRINTF(("use jumbo buffer: %s\n", sc_if->sk_use_jumbo ? "YES" : "NO"));
2630
2631 if (SK_IS_GENESIS(sc)) {
2632 /* Configure LINK_SYNC LED */
2633 SK_IF_WRITE_1(sc_if, 0, SK_LINKLED1_CTL, SK_LINKLED_ON);
2634 SK_IF_WRITE_1(sc_if, 0, SK_LINKLED1_CTL,
2635 SK_LINKLED_LINKSYNC_ON);
2636
2637 /* Configure RX LED */
2638 SK_IF_WRITE_1(sc_if, 0, SK_RXLED1_CTL,
2639 SK_RXLEDCTL_COUNTER_START);
2640
2641 /* Configure TX LED */
2642 SK_IF_WRITE_1(sc_if, 0, SK_TXLED1_CTL,
2643 SK_TXLEDCTL_COUNTER_START);
2644 }
2645
2646 /*
2647 * Configure descriptor poll timer
2648 *
2649 * SK-NET GENESIS data sheet says that possibility of losing Start
2650 * transmit command due to CPU/cache related interim storage problems
2651 * under certain conditions. The document recommends a polling
2652 * mechanism to send a Start transmit command to initiate transfer
2653 * of ready descriptors regulary. To cope with this issue sk(4) now
2654 * enables descriptor poll timer to initiate descriptor processing
2655 * periodically as defined by SK_DPT_TIMER_MAX. However sk(4) still
2656 * issue SK_TXBMU_TX_START to Tx BMU to get fast execution of Tx
2657 * command instead of waiting for next descriptor polling time.
2658 * The same rule may apply to Rx side too but it seems that is not
2659 * needed at the moment.
2660 * Since sk(4) uses descriptor polling as a last resort there is no
2661 * need to set smaller polling time than maximum allowable one.
2662 */
2663 SK_IF_WRITE_4(sc_if, 0, SK_DPT_INIT, SK_DPT_TIMER_MAX);
2664
2665 /* Configure I2C registers */
2666
2667 /* Configure XMAC(s) */
2668 switch (sc->sk_type) {
2669 case SK_GENESIS:
2670 sk_init_xmac(sc_if);
2671 break;
2672 case SK_YUKON:
2673 case SK_YUKON_LITE:
2674 case SK_YUKON_LP:
2675 sk_init_yukon(sc_if);
2676 break;
2677 }
2678 mii_mediachg(mii);
2679
2680 if (SK_IS_GENESIS(sc)) {
2681 /* Configure MAC FIFOs */
2682 SK_IF_WRITE_4(sc_if, 0, SK_RXF1_CTL, SK_FIFO_UNRESET);
2683 SK_IF_WRITE_4(sc_if, 0, SK_RXF1_END, SK_FIFO_END);
2684 SK_IF_WRITE_4(sc_if, 0, SK_RXF1_CTL, SK_FIFO_ON);
2685
2686 SK_IF_WRITE_4(sc_if, 0, SK_TXF1_CTL, SK_FIFO_UNRESET);
2687 SK_IF_WRITE_4(sc_if, 0, SK_TXF1_END, SK_FIFO_END);
2688 SK_IF_WRITE_4(sc_if, 0, SK_TXF1_CTL, SK_FIFO_ON);
2689 }
2690
2691 /* Configure transmit arbiter(s) */
2692 SK_IF_WRITE_1(sc_if, 0, SK_TXAR1_COUNTERCTL,
2693 SK_TXARCTL_ON | SK_TXARCTL_FSYNC_ON);
2694
2695 /* Configure RAMbuffers */
2696 SK_IF_WRITE_4(sc_if, 0, SK_RXRB1_CTLTST, SK_RBCTL_UNRESET);
2697 SK_IF_WRITE_4(sc_if, 0, SK_RXRB1_START, sc_if->sk_rx_ramstart);
2698 SK_IF_WRITE_4(sc_if, 0, SK_RXRB1_WR_PTR, sc_if->sk_rx_ramstart);
2699 SK_IF_WRITE_4(sc_if, 0, SK_RXRB1_RD_PTR, sc_if->sk_rx_ramstart);
2700 SK_IF_WRITE_4(sc_if, 0, SK_RXRB1_END, sc_if->sk_rx_ramend);
2701 SK_IF_WRITE_4(sc_if, 0, SK_RXRB1_CTLTST, SK_RBCTL_ON);
2702
2703 SK_IF_WRITE_4(sc_if, 1, SK_TXRBS1_CTLTST, SK_RBCTL_UNRESET);
2704 SK_IF_WRITE_4(sc_if, 1, SK_TXRBS1_CTLTST, SK_RBCTL_STORENFWD_ON);
2705 SK_IF_WRITE_4(sc_if, 1, SK_TXRBS1_START, sc_if->sk_tx_ramstart);
2706 SK_IF_WRITE_4(sc_if, 1, SK_TXRBS1_WR_PTR, sc_if->sk_tx_ramstart);
2707 SK_IF_WRITE_4(sc_if, 1, SK_TXRBS1_RD_PTR, sc_if->sk_tx_ramstart);
2708 SK_IF_WRITE_4(sc_if, 1, SK_TXRBS1_END, sc_if->sk_tx_ramend);
2709 SK_IF_WRITE_4(sc_if, 1, SK_TXRBS1_CTLTST, SK_RBCTL_ON);
2710
2711 /* Configure BMUs */
2712 SK_IF_WRITE_4(sc_if, 0, SK_RXQ1_BMU_CSR, SK_RXBMU_ONLINE);
2713 SK_IF_WRITE_4(sc_if, 0, SK_RXQ1_CURADDR_LO,
2714 SK_ADDR_LO(sc_if->sk_rdata.sk_rx_ring_paddr));
2715 SK_IF_WRITE_4(sc_if, 0, SK_RXQ1_CURADDR_HI,
2716 SK_ADDR_HI(sc_if->sk_rdata.sk_rx_ring_paddr));
2717
2718 SK_IF_WRITE_4(sc_if, 1, SK_TXQS1_BMU_CSR, SK_TXBMU_ONLINE);
2719 SK_IF_WRITE_4(sc_if, 1, SK_TXQS1_CURADDR_LO,
2720 SK_ADDR_LO(sc_if->sk_rdata.sk_tx_ring_paddr));
2721 SK_IF_WRITE_4(sc_if, 1, SK_TXQS1_CURADDR_HI,
2722 SK_ADDR_HI(sc_if->sk_rdata.sk_tx_ring_paddr));
2723
2724 /* Init descriptors */
2725 if (sk_init_rx_ring(sc_if) == ENOBUFS) {
2726 if_printf(ifp, "initialization failed: "
2727 "no memory for rx buffers\n");
2728 sk_stop(sc_if);
2729 return;
2730 }
2731
2732 if (sk_init_tx_ring(sc_if) == ENOBUFS) {
2733 if_printf(ifp, "initialization failed: "
2734 "no memory for tx buffers\n");
2735 sk_stop(sc_if);
2736 return;
2737 }
2738
2739 /* Configure interrupt handling */
2740 CSR_READ_4(sc, SK_ISSR);
2741 if (sc_if->sk_port == SK_PORT_A)
2742 sc->sk_intrmask |= SK_INTRS1;
2743 else
2744 sc->sk_intrmask |= SK_INTRS2;
2745
2746 sc->sk_intrmask |= SK_ISR_EXTERNAL_REG;
2747
2748 CSR_WRITE_4(sc, SK_IMR, sc->sk_intrmask);
2749
2750 /* Start BMUs. */
2751 SK_IF_WRITE_4(sc_if, 0, SK_RXQ1_BMU_CSR, SK_RXBMU_RX_START);
2752
2753 if (SK_IS_GENESIS(sc)) {
2754 /* Enable XMACs TX and RX state machines */
2755 SK_XM_CLRBIT_2(sc_if, XM_MMUCMD, XM_MMUCMD_IGNPAUSE);
2756 SK_XM_SETBIT_2(sc_if, XM_MMUCMD,
2757 XM_MMUCMD_TX_ENB|XM_MMUCMD_RX_ENB);
2758 }
2759
2760 if (SK_IS_YUKON(sc)) {
2761 uint16_t reg = SK_YU_READ_2(sc_if, YUKON_GPCR);
2762 reg |= YU_GPCR_TXEN | YU_GPCR_RXEN;
2763 #if 0
2764 /* XXX disable 100Mbps and full duplex mode? */
2765 reg &= ~(YU_GPCR_SPEED | YU_GPCR_DPLX_DIS);
2766 #endif
2767 SK_YU_WRITE_2(sc_if, YUKON_GPCR, reg);
2768 }
2769
2770 /* Activate descriptor polling timer */
2771 SK_IF_WRITE_4(sc_if, 0, SK_DPT_TIMER_CTRL, SK_DPT_TCTL_START);
2772 /* Start transfer of Tx descriptors */
2773 CSR_WRITE_4(sc, sc_if->sk_tx_bmu, SK_TXBMU_TX_START);
2774
2775 ifp->if_flags |= IFF_RUNNING;
2776 ifq_clr_oactive(&ifp->if_snd);
2777
2778 if (SK_IS_YUKON(sc))
2779 callout_reset(&sc_if->sk_tick_timer, hz, sk_yukon_tick, sc_if);
2780 }
2781
2782 static void
2783 sk_stop(struct sk_if_softc *sc_if)
2784 {
2785 struct sk_softc *sc = sc_if->sk_softc;
2786 struct ifnet *ifp = &sc_if->arpcom.ac_if;
2787 struct sk_chain_data *cd = &sc_if->sk_cdata;
2788 uint32_t val;
2789 int i;
2790
2791 ASSERT_SERIALIZED(ifp->if_serializer);
2792
2793 DPRINTFN(2, ("sk_stop\n"));
2794
2795 callout_stop(&sc_if->sk_tick_timer);
2796
2797 ifp->if_flags &= ~IFF_RUNNING;
2798 ifq_clr_oactive(&ifp->if_snd);
2799
2800 /* Stop Tx descriptor polling timer */
2801 SK_IF_WRITE_4(sc_if, 0, SK_DPT_TIMER_CTRL, SK_DPT_TCTL_STOP);
2802
2803 /* Stop transfer of Tx descriptors */
2804 CSR_WRITE_4(sc, sc_if->sk_tx_bmu, SK_TXBMU_TX_STOP);
2805 for (i = 0; i < SK_TIMEOUT; i++) {
2806 val = CSR_READ_4(sc, sc_if->sk_tx_bmu);
2807 if (!(val & SK_TXBMU_TX_STOP))
2808 break;
2809 DELAY(1);
2810 }
2811 if (i == SK_TIMEOUT)
2812 if_printf(ifp, "cannot stop transfer of Tx descriptors\n");
2813
2814 /* Stop transfer of Rx descriptors */
2815 SK_IF_WRITE_4(sc_if, 0, SK_RXQ1_BMU_CSR, SK_RXBMU_RX_STOP);
2816 for (i = 0; i < SK_TIMEOUT; i++) {
2817 val = SK_IF_READ_4(sc_if, 0, SK_RXQ1_BMU_CSR);
2818 if (!(val & SK_RXBMU_RX_STOP))
2819 break;
2820 DELAY(1);
2821 }
2822 if (i == SK_TIMEOUT)
2823 if_printf(ifp, "cannot stop transfer of Rx descriptors\n");
2824
2825 if (sc_if->sk_phytype == SK_PHYTYPE_BCOM) {
2826 /* Put PHY back into reset. */
2827 val = sk_win_read_4(sc, SK_GPIO);
2828 if (sc_if->sk_port == SK_PORT_A) {
2829 val |= SK_GPIO_DIR0;
2830 val &= ~SK_GPIO_DAT0;
2831 } else {
2832 val |= SK_GPIO_DIR2;
2833 val &= ~SK_GPIO_DAT2;
2834 }
2835 sk_win_write_4(sc, SK_GPIO, val);
2836 }
2837
2838 /* Turn off various components of this interface. */
2839 SK_XM_SETBIT_2(sc_if, XM_GPIO, XM_GPIO_RESETMAC);
2840 switch (sc->sk_type) {
2841 case SK_GENESIS:
2842 SK_IF_WRITE_2(sc_if, 0, SK_TXF1_MACCTL, SK_TXMACCTL_XMAC_RESET);
2843 SK_IF_WRITE_4(sc_if, 0, SK_RXF1_CTL, SK_FIFO_RESET);
2844 break;
2845 case SK_YUKON:
2846 case SK_YUKON_LITE:
2847 case SK_YUKON_LP:
2848 SK_IF_WRITE_1(sc_if,0, SK_RXMF1_CTRL_TEST, SK_RFCTL_RESET_SET);
2849 SK_IF_WRITE_1(sc_if,0, SK_TXMF1_CTRL_TEST, SK_TFCTL_RESET_SET);
2850 break;
2851 }
2852 SK_IF_WRITE_4(sc_if, 0, SK_RXQ1_BMU_CSR, SK_RXBMU_OFFLINE);
2853 SK_IF_WRITE_4(sc_if, 0, SK_RXRB1_CTLTST, SK_RBCTL_RESET | SK_RBCTL_OFF);
2854 SK_IF_WRITE_4(sc_if, 1, SK_TXQS1_BMU_CSR, SK_TXBMU_OFFLINE);
2855 SK_IF_WRITE_4(sc_if, 1, SK_TXRBS1_CTLTST,
2856 SK_RBCTL_RESET | SK_RBCTL_OFF);
2857 SK_IF_WRITE_1(sc_if, 0, SK_TXAR1_COUNTERCTL, SK_TXARCTL_OFF);
2858 SK_IF_WRITE_1(sc_if, 0, SK_RXLED1_CTL, SK_RXLEDCTL_COUNTER_STOP);
2859 SK_IF_WRITE_1(sc_if, 0, SK_TXLED1_CTL, SK_RXLEDCTL_COUNTER_STOP);
2860 SK_IF_WRITE_1(sc_if, 0, SK_LINKLED1_CTL, SK_LINKLED_OFF);
2861 SK_IF_WRITE_1(sc_if, 0, SK_LINKLED1_CTL, SK_LINKLED_LINKSYNC_OFF);
2862
2863 /* Disable interrupts */
2864 if (sc_if->sk_port == SK_PORT_A)
2865 sc->sk_intrmask &= ~SK_INTRS1;
2866 else
2867 sc->sk_intrmask &= ~SK_INTRS2;
2868 CSR_WRITE_4(sc, SK_IMR, sc->sk_intrmask);
2869
2870 SK_XM_READ_2(sc_if, XM_ISR);
2871 SK_XM_WRITE_2(sc_if, XM_IMR, 0xFFFF);
2872
2873 /* Free RX and TX mbufs still in the queues. */
2874 for (i = 0; i < SK_RX_RING_CNT; i++) {
2875 if (cd->sk_rx_mbuf[i] != NULL) {
2876 if (!sc_if->sk_use_jumbo) {
2877 bus_dmamap_unload(cd->sk_rx_dtag,
2878 cd->sk_rx_dmap[i]);
2879 }
2880 m_freem(cd->sk_rx_mbuf[i]);
2881 cd->sk_rx_mbuf[i] = NULL;
2882 }
2883 }
2884 for (i = 0; i < SK_TX_RING_CNT; i++) {
2885 if (cd->sk_tx_mbuf[i] != NULL) {
2886 bus_dmamap_unload(cd->sk_tx_dtag, cd->sk_tx_dmap[i]);
2887 m_freem(cd->sk_tx_mbuf[i]);
2888 cd->sk_tx_mbuf[i] = NULL;
2889 }
2890 }
2891 }
2892
2893 #ifdef SK_DEBUG
2894 static void
2895 sk_dump_txdesc(struct sk_tx_desc *desc, int idx)
2896 {
2897 #define DESC_PRINT(X) \
2898 if (X) \
2899 kprintf("txdesc[%d]." #X "=%#x\n", \
2900 idx, X);
2901
2902 DESC_PRINT(le32toh(desc->sk_ctl));
2903 DESC_PRINT(le32toh(desc->sk_next));
2904 DESC_PRINT(le32toh(desc->sk_data_lo));
2905 DESC_PRINT(le32toh(desc->sk_data_hi));
2906 DESC_PRINT(le32toh(desc->sk_xmac_txstat));
2907 DESC_PRINT(le16toh(desc->sk_rsvd0));
2908 DESC_PRINT(le16toh(desc->sk_csum_startval));
2909 DESC_PRINT(le16toh(desc->sk_csum_startpos));
2910 DESC_PRINT(le16toh(desc->sk_csum_writepos));
2911 DESC_PRINT(le16toh(desc->sk_rsvd1));
2912 #undef PRINT
2913 }
2914
2915 static void
2916 sk_dump_bytes(const char *data, int len)
2917 {
2918 int c, i, j;
2919
2920 for (i = 0; i < len; i += 16) {
2921 kprintf("%08x ", i);
2922 c = len - i;
2923 if (c > 16) c = 16;
2924
2925 for (j = 0; j < c; j++) {
2926 kprintf("%02x ", data[i + j] & 0xff);
2927 if ((j & 0xf) == 7 && j > 0)
2928 kprintf(" ");
2929 }
2930
2931 for (; j < 16; j++)
2932 kprintf(" ");
2933 kprintf(" ");
2934
2935 for (j = 0; j < c; j++) {
2936 int ch = data[i + j] & 0xff;
2937 kprintf("%c", ' ' <= ch && ch <= '~' ? ch : ' ');
2938 }
2939
2940 kprintf("\n");
2941
2942 if (c < 16)
2943 break;
2944 }
2945 }
2946
2947 static void
2948 sk_dump_mbuf(struct mbuf *m)
2949 {
2950 int count = m->m_pkthdr.len;
2951
2952 kprintf("m=%p, m->m_pkthdr.len=%d\n", m, m->m_pkthdr.len);
2953
2954 while (count > 0 && m) {
2955 kprintf("m=%p, m->m_data=%p, m->m_len=%d\n",
2956 m, m->m_data, m->m_len);
2957 sk_dump_bytes(mtod(m, char *), m->m_len);
2958
2959 count -= m->m_len;
2960 m = m->m_next;
2961 }
2962 }
2963 #endif
2964
2965 /*
2966 * Allocate jumbo buffer storage. The SysKonnect adapters support
2967 * "jumbograms" (9K frames), although SysKonnect doesn't currently
2968 * use them in their drivers. In order for us to use them, we need
2969 * large 9K receive buffers, however standard mbuf clusters are only
2970 * 2048 bytes in size. Consequently, we need to allocate and manage
2971 * our own jumbo buffer pool. Fortunately, this does not require an
2972 * excessive amount of additional code.
2973 */
2974 static int
2975 sk_jpool_alloc(device_t dev)
2976 {
2977 struct sk_if_softc *sc_if = device_get_softc(dev);
2978 struct sk_chain_data *cd = &sc_if->sk_cdata;
2979 bus_dmamem_t dmem;
2980 bus_addr_t paddr;
2981 caddr_t buf;
2982 int error, i;
2983
2984 lwkt_serialize_init(&cd->sk_jpool_serializer);
2985
2986 error = bus_dmamem_coherent(cd->sk_buf_dtag, PAGE_SIZE /* XXX */, 0,
2987 BUS_SPACE_MAXADDR, BUS_SPACE_MAXADDR,
2988 SK_JMEM, BUS_DMA_WAITOK, &dmem);
2989 if (error) {
2990 device_printf(dev, "can't allocate jumbo frame pool\n");
2991 return error;
2992 }
2993 cd->sk_jpool_dtag = dmem.dmem_tag;
2994 cd->sk_jpool_dmap = dmem.dmem_map;
2995 cd->sk_jpool = dmem.dmem_addr;
2996 paddr = dmem.dmem_busaddr;
2997
2998 SLIST_INIT(&cd->sk_jpool_free_ent);
2999 buf = cd->sk_jpool;
3000
3001 /*
3002 * Now divide it up into SK_JLEN pieces.
3003 */
3004 for (i = 0; i < SK_JSLOTS; i++) {
3005 struct sk_jpool_entry *entry = &cd->sk_jpool_ent[i];
3006
3007 entry->sc_if = sc_if;
3008 entry->inuse = 0;
3009 entry->slot = i;
3010 entry->buf = buf;
3011 entry->paddr = paddr;
3012
3013 SLIST_INSERT_HEAD(&cd->sk_jpool_free_ent, entry, entry_next);
3014
3015 buf += SK_JLEN;
3016 paddr += SK_JLEN;
3017 }
3018 return 0;
3019 }
3020
3021 static void
3022 sk_jpool_free(struct sk_if_softc *sc_if)
3023 {
3024 struct sk_chain_data *cd = &sc_if->sk_cdata;
3025
3026 if (cd->sk_jpool_dtag != NULL) {
3027 bus_dmamap_unload(cd->sk_jpool_dtag, cd->sk_jpool_dmap);
3028 bus_dmamem_free(cd->sk_jpool_dtag, cd->sk_jpool,
3029 cd->sk_jpool_dmap);
3030 bus_dma_tag_destroy(cd->sk_jpool_dtag);
3031 cd->sk_jpool_dtag = NULL;
3032 }
3033 }
3034
3035 static int
3036 sk_dma_alloc(device_t dev)
3037 {
3038 struct sk_if_softc *sc_if = device_get_softc(dev);
3039 struct sk_chain_data *cd = &sc_if->sk_cdata;
3040 struct sk_ring_data *rd = &sc_if->sk_rdata;
3041 bus_dmamem_t dmem;
3042 int i, j, error;
3043
3044 /* Create parent DMA tag */
3045 error = bus_dma_tag_create(NULL, 1, 0,
3046 BUS_SPACE_MAXADDR, BUS_SPACE_MAXADDR,
3047 NULL, NULL,
3048 BUS_SPACE_MAXSIZE_32BIT, 0,
3049 BUS_SPACE_MAXSIZE_32BIT,
3050 0, &sc_if->sk_parent_dtag);
3051 if (error) {
3052 device_printf(dev, "can't create parent DMA tag\n");
3053 return error;
3054 }
3055
3056 /* Create top level ring DMA tag */
3057 error = bus_dma_tag_create(sc_if->sk_parent_dtag,
3058 1, SK_RING_BOUNDARY,
3059 BUS_SPACE_MAXADDR, BUS_SPACE_MAXADDR,
3060 NULL, NULL,
3061 BUS_SPACE_MAXSIZE_32BIT, 0,
3062 BUS_SPACE_MAXSIZE_32BIT,
3063 0, &rd->sk_ring_dtag);
3064 if (error) {
3065 device_printf(dev, "can't create ring DMA tag\n");
3066 return error;
3067 }
3068
3069 /* Create top level buffer DMA tag */
3070 error = bus_dma_tag_create(sc_if->sk_parent_dtag, 1, 0,
3071 BUS_SPACE_MAXADDR, BUS_SPACE_MAXADDR,
3072 NULL, NULL,
3073 BUS_SPACE_MAXSIZE_32BIT, 0,
3074 BUS_SPACE_MAXSIZE_32BIT,
3075 0, &cd->sk_buf_dtag);
3076 if (error) {
3077 device_printf(dev, "can't create buf DMA tag\n");
3078 return error;
3079 }
3080
3081 /* Allocate the TX descriptor queue. */
3082 error = bus_dmamem_coherent(rd->sk_ring_dtag, SK_RING_ALIGN, 0,
3083 BUS_SPACE_MAXADDR, BUS_SPACE_MAXADDR,
3084 SK_TX_RING_SIZE,
3085 BUS_DMA_WAITOK | BUS_DMA_ZERO, &dmem);
3086 if (error) {
3087 device_printf(dev, "can't allocate TX ring\n");
3088 return error;
3089 }
3090 rd->sk_tx_ring_dtag = dmem.dmem_tag;
3091 rd->sk_tx_ring_dmap = dmem.dmem_map;
3092 rd->sk_tx_ring = dmem.dmem_addr;
3093 rd->sk_tx_ring_paddr = dmem.dmem_busaddr;
3094
3095 /* Allocate the RX descriptor queue. */
3096 error = bus_dmamem_coherent(rd->sk_ring_dtag, SK_RING_ALIGN, 0,
3097 BUS_SPACE_MAXADDR, BUS_SPACE_MAXADDR,
3098 SK_RX_RING_SIZE,
3099 BUS_DMA_WAITOK | BUS_DMA_ZERO, &dmem);
3100 if (error) {
3101 device_printf(dev, "can't allocate TX ring\n");
3102 return error;
3103 }
3104 rd->sk_rx_ring_dtag = dmem.dmem_tag;
3105 rd->sk_rx_ring_dmap = dmem.dmem_map;
3106 rd->sk_rx_ring = dmem.dmem_addr;
3107 rd->sk_rx_ring_paddr = dmem.dmem_busaddr;
3108
3109 /* Try to allocate memory for jumbo buffers. */
3110 error = sk_jpool_alloc(dev);
3111 if (error) {
3112 device_printf(dev, "jumbo buffer allocation failed\n");
3113 return error;
3114 }
3115
3116 /* Create DMA tag for TX. */
3117 error = bus_dma_tag_create(cd->sk_buf_dtag, 1, 0,
3118 BUS_SPACE_MAXADDR, BUS_SPACE_MAXADDR,
3119 NULL, NULL,
3120 SK_JLEN, SK_NTXSEG, SK_JLEN,
3121 BUS_DMA_ALLOCNOW | BUS_DMA_WAITOK |
3122 BUS_DMA_ONEBPAGE,
3123 &cd->sk_tx_dtag);
3124 if (error) {
3125 device_printf(dev, "can't create TX DMA tag\n");
3126 return error;
3127 }
3128
3129 /* Create DMA maps for TX. */
3130 for (i = 0; i < SK_TX_RING_CNT; i++) {
3131 error = bus_dmamap_create(cd->sk_tx_dtag,
3132 BUS_DMA_WAITOK | BUS_DMA_ONEBPAGE,
3133 &cd->sk_tx_dmap[i]);
3134 if (error) {
3135 device_printf(dev, "can't create %dth TX DMA map\n", i);
3136
3137 for (j = 0; j < i; ++j) {
3138 bus_dmamap_destroy(cd->sk_tx_dtag,
3139 cd->sk_tx_dmap[i]);
3140 }
3141 bus_dma_tag_destroy(cd->sk_tx_dtag);
3142 cd->sk_tx_dtag = NULL;
3143 return error;
3144 }
3145 }
3146
3147 /* Create DMA tag for RX. */
3148 error = bus_dma_tag_create(cd->sk_buf_dtag, 1, 0,
3149 BUS_SPACE_MAXADDR, BUS_SPACE_MAXADDR,
3150 NULL, NULL,
3151 MCLBYTES, 1, MCLBYTES,
3152 BUS_DMA_ALLOCNOW | BUS_DMA_WAITOK,
3153 &cd->sk_rx_dtag);
3154 if (error) {
3155 device_printf(dev, "can't create RX DMA tag\n");
3156 return error;
3157 }
3158
3159 /* Create a spare RX DMA map. */
3160 error = bus_dmamap_create(cd->sk_rx_dtag, BUS_DMA_WAITOK,
3161 &cd->sk_rx_dmap_tmp);
3162 if (error) {
3163 device_printf(dev, "can't create spare RX DMA map\n");
3164 bus_dma_tag_destroy(cd->sk_rx_dtag);
3165 cd->sk_rx_dtag = NULL;
3166 return error;
3167 }
3168
3169 /* Create DMA maps for RX. */
3170 for (i = 0; i < SK_RX_RING_CNT; ++i) {
3171 error = bus_dmamap_create(cd->sk_rx_dtag, BUS_DMA_WAITOK,
3172 &cd->sk_rx_dmap[i]);
3173 if (error) {
3174 device_printf(dev, "can't create %dth RX DMA map\n", i);
3175
3176 for (j = 0; j < i; ++j) {
3177 bus_dmamap_destroy(cd->sk_rx_dtag,
3178 cd->sk_rx_dmap[i]);
3179 }
3180 bus_dmamap_destroy(cd->sk_rx_dtag, cd->sk_rx_dmap_tmp);
3181 bus_dma_tag_destroy(cd->sk_rx_dtag);
3182 cd->sk_rx_dtag = NULL;
3183 return error;
3184 }
3185 }
3186 return 0;
3187 }
3188
3189 static void
3190 sk_dma_free(device_t dev)
3191 {
3192 struct sk_if_softc *sc_if = device_get_softc(dev);
3193 struct sk_chain_data *cd = &sc_if->sk_cdata;
3194 struct sk_ring_data *rd = &sc_if->sk_rdata;
3195 int i;
3196
3197 if (cd->sk_tx_dtag != NULL) {
3198 for (i = 0; i < SK_TX_RING_CNT; ++i) {
3199 KASSERT(cd->sk_tx_mbuf[i] == NULL,
3200 ("sk_stop() is not called before %s()",
3201 __func__));
3202 bus_dmamap_destroy(cd->sk_tx_dtag, cd->sk_tx_dmap[i]);
3203 }
3204 bus_dma_tag_destroy(cd->sk_tx_dtag);
3205 }
3206
3207 if (cd->sk_rx_dtag != NULL) {
3208 for (i = 0; i < SK_RX_RING_CNT; ++i) {
3209 KASSERT(cd->sk_rx_mbuf[i] == NULL,
3210 ("sk_stop() is not called before %s()",
3211 __func__));
3212 bus_dmamap_destroy(cd->sk_rx_dtag, cd->sk_rx_dmap[i]);
3213 }
3214 bus_dmamap_destroy(cd->sk_rx_dtag, cd->sk_rx_dmap_tmp);
3215 bus_dma_tag_destroy(cd->sk_rx_dtag);
3216 }
3217
3218 sk_jpool_free(sc_if);
3219
3220 if (rd->sk_rx_ring_dtag != NULL) {
3221 bus_dmamap_unload(rd->sk_rx_ring_dtag, rd->sk_rx_ring_dmap);
3222 bus_dmamem_free(rd->sk_rx_ring_dtag, rd->sk_rx_ring,
3223 rd->sk_rx_ring_dmap);
3224 bus_dma_tag_destroy(rd->sk_rx_ring_dtag);
3225 }
3226
3227 if (rd->sk_tx_ring_dtag != NULL) {
3228 bus_dmamap_unload(rd->sk_tx_ring_dtag, rd->sk_tx_ring_dmap);
3229 bus_dmamem_free(rd->sk_tx_ring_dtag, rd->sk_tx_ring,
3230 rd->sk_tx_ring_dmap);
3231 bus_dma_tag_destroy(rd->sk_tx_ring_dtag);
3232 }
3233
3234 if (rd->sk_ring_dtag != NULL)
3235 bus_dma_tag_destroy(rd->sk_ring_dtag);
3236 if (cd->sk_buf_dtag != NULL)
3237 bus_dma_tag_destroy(cd->sk_buf_dtag);
3238 if (sc_if->sk_parent_dtag != NULL)
3239 bus_dma_tag_destroy(sc_if->sk_parent_dtag);
3240 }
3241
3242 static int
3243 skc_sysctl_imtime(SYSCTL_HANDLER_ARGS)
3244 {
3245 struct sk_softc *sc = arg1;
3246 struct lwkt_serialize *slize = &sc->sk_serializer;
3247 int error = 0, v;
3248
3249 lwkt_serialize_enter(slize);
3250
3251 v = sc->sk_imtime;
3252 error = sysctl_handle_int(oidp, &v, 0, req);
3253 if (error || req->newptr == NULL)
3254 goto back;
3255 if (v <= 0) {
3256 error = EINVAL;
3257 goto back;
3258 }
3259
3260 if (sc->sk_imtime != v) {
3261 sc->sk_imtime = v;
3262 sk_win_write_4(sc, SK_IMTIMERINIT,
3263 SK_IM_USECS(sc, sc->sk_imtime));
3264
3265 /*
3266 * Force interrupt moderation timer to
3267 * reload new value.
3268 */
3269 sk_win_write_4(sc, SK_IMTIMER, 0);
3270 }
3271 back:
3272 lwkt_serialize_exit(slize);
3273 return error;
3274 }
Cache object: 241c60c98286b2274ffb3de2d040b047
|