?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
linprocfs - Introduce /proc/mounts
[dragonfly.git] / sys / dev / netif / sbsh / if_sbsh.c
blob5b3349e210f8184c33b28ae57f76711878350d7f
1 /**
2 * Granch SBNI16 G.SHDSL Modem driver
3 * Written by Denis I. Timofeev, 2002-2003.
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 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 *
26 * $FreeBSD: src/sys/dev/sbsh/if_sbsh.c,v 1.3.2.1 2003/04/15 18:15:07 fjoe Exp $
27 * $DragonFly: src/sys/dev/netif/sbsh/if_sbsh.c,v 1.28 2008/08/17 04:32:34 sephe Exp $
28 */
29
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 #include <sys/sockio.h>
33 #include <sys/mbuf.h>
34 #include <sys/malloc.h>
35 #include <sys/kernel.h>
36 #include <sys/proc.h>
37 #include <sys/priv.h>
38 #include <sys/socket.h>
39 #include <sys/random.h>
40 #include <sys/serialize.h>
41 #include <sys/bus.h>
42 #include <sys/rman.h>
43 #include <sys/thread2.h>
44 #include <sys/interrupt.h>
45
46 #include <net/if.h>
47 #include <net/ifq_var.h>
48 #include <net/if_arp.h>
49 #include <net/ethernet.h>
50 #include <net/if_media.h>
51
52 #include <net/bpf.h>
53
54 #include <vm/vm.h>
55 #include <vm/pmap.h>
56
57 #include <bus/pci/pcireg.h>
58 #include <bus/pci/pcivar.h>
59
60 #include "if_sbshreg.h"
61
62 /* -------------------------------------------------------------------------- */
63
64 struct sbni16_hw_regs {
65 u_int8_t CR, CRB, SR, IMR, CTDR, LTDR, CRDR, LRDR;
66 };
67
68 struct hw_descr {
69 u_int32_t address;
70 u_int32_t length;
71 };
72
73 struct cx28975_cmdarea {
74 u_int8_t intr_host;
75 u_int8_t intr_8051;
76 u_int8_t map_version;
77
78 u_int8_t in_dest;
79 u_int8_t in_opcode;
80 u_int8_t in_zero;
81 u_int8_t in_length;
82 u_int8_t in_csum;
83 u_int8_t in_data[75];
84 u_int8_t in_datasum;
85
86 u_int8_t out_dest;
87 u_int8_t out_opcode;
88 u_int8_t out_ack;
89 u_int8_t out_length;
90 u_int8_t out_csum;
91 u_int8_t out_data[75];
92 u_int8_t out_datasum;
93 };
94
95 #define XQLEN 8
96 #define RQLEN 8
97
98 struct sbsh_softc {
99 struct arpcom arpcom; /* ethernet common */
100
101 struct resource *mem_res;
102 struct resource *irq_res;
103 void *intr_hand;
104
105 void *mem_base; /* mapped memory address */
106
107 volatile struct sbni16_hw_regs *regs;
108 volatile struct hw_descr *tbd;
109 volatile struct hw_descr *rbd;
110 volatile struct cx28975_cmdarea *cmdp;
111
112 /* SBNI16 controller statistics */
113 struct sbni16_stats {
114 u_int32_t sent_pkts, rcvd_pkts;
115 u_int32_t crc_errs, ufl_errs, ofl_errs, attempts, last_time;
116 } in_stats;
117
118 /* transmit and reception queues */
119 struct mbuf *xq[XQLEN], *rq[RQLEN];
120 unsigned head_xq, tail_xq, head_rq, tail_rq;
121
122 /* the descriptors mapped onto the first buffers in xq and rq */
123 unsigned head_tdesc, head_rdesc;
124 u_int8_t state;
125 };
126
127 struct cx28975_cfg {
128 u_int8_t *firmw_image;
129 u_int32_t firmw_len;
130 u_int32_t lrate: 10;
131 u_int32_t master: 1;
132 u_int32_t mod: 2;
133 u_int32_t crc16: 1;
134 u_int32_t fill_7e: 1;
135 u_int32_t inv: 1;
136 u_int32_t rburst: 1;
137 u_int32_t wburst: 1;
138 u_int32_t : 14;
139 };
140
141 /* SHDSL transceiver statistics */
142 struct dsl_stats {
143 u_int8_t status_1, status_3;
144 u_int8_t attenuat, nmr, tpbo, rpbo;
145 u_int16_t losw, segd, crc, sega, losd;
146 };
147
148 enum State { NOT_LOADED, DOWN, ACTIVATION, ACTIVE };
149
150 #define SIOCLOADFIRMW _IOWR('i', 67, struct ifreq)
151 #define SIOCGETSTATS _IOWR('i', 68, struct ifreq)
152 #define SIOCCLRSTATS _IOWR('i', 69, struct ifreq)
153
154 static int sbsh_probe(device_t);
155 static int sbsh_attach(device_t);
156 static int sbsh_detach(device_t);
157 static int sbsh_ioctl(struct ifnet *, u_long, caddr_t, struct ucred *);
158 static void sbsh_shutdown(device_t);
159 static int sbsh_suspend(device_t);
160 static int sbsh_resume(device_t);
161 static void sbsh_watchdog(struct ifnet *);
162
163 static void sbsh_start(struct ifnet *);
164 static void sbsh_init(void *);
165 static void sbsh_stop(struct sbsh_softc *);
166 static void init_card(struct sbsh_softc *);
167 static void sbsh_intr(void *);
168 static void resume_tx(struct sbsh_softc *);
169 static void start_xmit_frames(struct sbsh_softc *);
170 static void encap_frame(struct sbsh_softc *, struct mbuf *);
171 static struct mbuf * repack(struct sbsh_softc *, struct mbuf *);
172 static void free_sent_buffers(struct sbsh_softc *);
173 static void alloc_rx_buffers(struct sbsh_softc *);
174 static void indicate_frames(struct sbsh_softc *);
175 static void drop_queues(struct sbsh_softc *);
176 static void activate(struct sbsh_softc *);
177 static void deactivate(struct sbsh_softc *);
178 static void cx28975_interrupt(struct sbsh_softc *);
179 static int start_cx28975(struct sbsh_softc *, struct cx28975_cfg);
180 static int download_firmware(struct sbsh_softc *, u_int8_t *, u_int32_t);
181 static int issue_cx28975_cmd(struct sbsh_softc *, u_int8_t,
182 u_int8_t *, u_int8_t);
183
184 static device_method_t sbsh_methods[] = {
185 /* Device interface */
186 DEVMETHOD(device_probe, sbsh_probe),
187 DEVMETHOD(device_attach, sbsh_attach),
188 DEVMETHOD(device_detach, sbsh_detach),
189 DEVMETHOD(device_shutdown, sbsh_shutdown),
190 DEVMETHOD(device_suspend, sbsh_suspend),
191 DEVMETHOD(device_resume, sbsh_resume),
192
193 { 0, 0 }
194 };
195
196 static driver_t sbsh_driver = {
197 "sbsh",
198 sbsh_methods,
199 sizeof(struct sbsh_softc)
200 };
201
202 static devclass_t sbsh_devclass;
203
204 DECLARE_DUMMY_MODULE(if_sbsh);
205 DRIVER_MODULE(if_sbsh, pci, sbsh_driver, sbsh_devclass, 0, 0);
206
207 static int
208 sbsh_probe(device_t dev)
209 {
210 if (pci_get_vendor(dev) != SBNI16_VENDOR
211 || pci_get_device(dev) != SBNI16_DEVICE
212 || pci_get_subdevice(dev) != SBNI16_SUBDEV)
213 return (ENXIO);
214
215 device_set_desc(dev, "Granch SBNI16 G.SHDSL Modem");
216 return (0);
217 }
218
219 static int
220 sbsh_attach(device_t dev)
221 {
222 struct sbsh_softc *sc;
223 struct ifnet *ifp;
224 int unit, error = 0, rid;
225
226 sc = device_get_softc(dev);
227 unit = device_get_unit(dev);
228
229 rid = PCIR_MAPS + 4;
230 sc->mem_res = bus_alloc_resource(dev, SYS_RES_MEMORY, &rid,
231 0, ~0, 4096, RF_ACTIVE);
232
233 if (sc->mem_res == NULL) {
234 kprintf ("sbsh%d: couldn't map memory\n", unit);
235 error = ENXIO;
236 goto fail;
237 }
238
239 rid = 0;
240 sc->irq_res = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid,
241 RF_SHAREABLE | RF_ACTIVE);
242
243 if (sc->irq_res == NULL) {
244 kprintf("sbsh%d: couldn't map interrupt\n", unit);
245 error = ENXIO;
246 goto fail;
247 }
248
249 sc->mem_base = rman_get_virtual(sc->mem_res);
250 init_card(sc);
251 /* generate ethernet MAC address */
252 *(u_int32_t *)sc->arpcom.ac_enaddr = htonl(0x00ff0192);
253 read_random_unlimited(sc->arpcom.ac_enaddr + 4, 2);
254
255 ifp = &sc->arpcom.ac_if;
256 ifp->if_softc = sc;
257 if_initname(ifp, "sbsh", unit);
258 ifp->if_mtu = ETHERMTU;
259 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
260 ifp->if_ioctl = sbsh_ioctl;
261 ifp->if_start = sbsh_start;
262 ifp->if_watchdog = sbsh_watchdog;
263 ifp->if_init = sbsh_init;
264 ifp->if_baudrate = 4600000;
265 ifq_set_maxlen(&ifp->if_snd, IFQ_MAXLEN);
266 ifq_set_ready(&ifp->if_snd);
267
268 ether_ifattach(ifp, sc->arpcom.ac_enaddr, NULL);
269
270 error = bus_setup_intr(dev, sc->irq_res, INTR_MPSAFE,
271 sbsh_intr, sc, &sc->intr_hand,
272 ifp->if_serializer);
273 if (error) {
274 ether_ifdetach(ifp);
275 kprintf("sbsh%d: couldn't set up irq\n", unit);
276 goto fail;
277 }
278
279 ifp->if_cpuid = ithread_cpuid(rman_get_start(sc->irq_res));
280 KKASSERT(ifp->if_cpuid >= 0 && ifp->if_cpuid < ncpus);
281
282 return(0);
283
284 fail:
285 sbsh_detach(dev);
286 return (error);
287 }
288
289 static int
290 sbsh_detach(device_t dev)
291 {
292 struct sbsh_softc *sc = device_get_softc(dev);
293 struct ifnet *ifp = &sc->arpcom.ac_if;
294
295 if (device_is_attached(dev)) {
296 lwkt_serialize_enter(ifp->if_serializer);
297 sbsh_stop(sc);
298 bus_teardown_intr(dev, sc->irq_res, sc->intr_hand);
299 lwkt_serialize_exit(ifp->if_serializer);
300
301 ether_ifdetach(ifp);
302 }
303
304 if (sc->irq_res)
305 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->irq_res);
306 if (sc->mem_res) {
307 bus_release_resource(dev, SYS_RES_MEMORY, PCIR_MAPS + 4,
308 sc->mem_res);
309 }
310
311 return (0);
312 }
313
314
315 static void
316 sbsh_start(struct ifnet *ifp)
317 {
318 struct sbsh_softc *sc = ifp->if_softc;
319
320 if (sc->state == ACTIVE)
321 start_xmit_frames(ifp->if_softc);
322 }
323
324
325 static void
326 sbsh_init(void *xsc)
327 {
328 struct sbsh_softc *sc = xsc;
329 struct ifnet *ifp = &sc->arpcom.ac_if;
330 u_int8_t t;
331
332 if ((ifp->if_flags & IFF_RUNNING) || sc->state == NOT_LOADED) {
333 return;
334 }
335
336 bzero(&sc->in_stats, sizeof(struct sbni16_stats));
337 sc->head_xq = sc->tail_xq = sc->head_rq = sc->tail_rq = 0;
338 sc->head_tdesc = sc->head_rdesc = 0;
339
340 sc->regs->IMR = EXT;
341 t = 2;
342 issue_cx28975_cmd(sc, _DSL_CLEAR_ERROR_CTRS, &t, 1);
343 if (issue_cx28975_cmd(sc, _DSL_ACTIVATION, &t, 1) == 0) {
344 sc->state = ACTIVATION;
345
346 ifp->if_flags |= IFF_RUNNING;
347 ifp->if_flags &= ~IFF_OACTIVE;
348 }
349 }
350
351
352 static void
353 sbsh_stop(struct sbsh_softc *sc)
354 {
355 u_int8_t t;
356
357 sc->regs->IMR = EXT;
358
359 t = 0;
360 issue_cx28975_cmd(sc, _DSL_ACTIVATION, &t, 1);
361 if (sc->state == ACTIVE) {
362 t = 1;
363 issue_cx28975_cmd(sc, _DSL_FORCE_DEACTIVATE, &t, 1);
364 /* FIX! activation manager state */
365
366 /* Is it really must be done here? It calls from intr handler */
367 deactivate(sc);
368 }
369
370 sc->regs->IMR = 0;
371 sc->state = DOWN;
372 }
373
374
375 static void
376 init_card(struct sbsh_softc *sc)
377 {
378 sc->state = NOT_LOADED;
379 sc->tbd = (struct hw_descr *) sc->mem_base;
380 sc->rbd = (struct hw_descr *) ((u_int8_t *)sc->mem_base + 0x400);
381 sc->regs = (struct sbni16_hw_regs *) ((u_int8_t *)sc->mem_base + 0x800);
382 sc->cmdp = (struct cx28975_cmdarea *) ((u_int8_t *)sc->mem_base + 0xc00);
383
384 sc->regs->CR = 0;
385 sc->regs->SR = 0xff;
386 sc->regs->IMR = 0;
387 }
388
389
390 static int
391 sbsh_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data, struct ucred *cr)
392 {
393 struct sbsh_softc *sc = ifp->if_softc;
394 struct ifreq *ifr = (struct ifreq *) data;
395 struct cx28975_cfg cfg;
396 struct dsl_stats ds;
397 int error = 0;
398 u_int8_t t;
399
400 switch(cmd) {
401 case SIOCLOADFIRMW:
402 if ((error = priv_check_cred(cr, PRIV_ROOT, NULL_CRED_OKAY)) != 0)
403 break;
404 if (ifp->if_flags & IFF_UP)
405 error = EBUSY;
406
407 bcopy((caddr_t)ifr->ifr_data, (caddr_t)&cfg, sizeof cfg);
408 if (start_cx28975(sc, cfg) == 0) {
409 static char *modstr[] = {
410 "TCPAM32", "TCPAM16", "TCPAM8", "TCPAM4" };
411 if_printf(&sc->arpcom.ac_if, "%s, rate %d, %s\n",
412 cfg.master ? "master" : "slave",
413 cfg.lrate << 3, modstr[cfg.mod]);
414 } else {
415 if_printf(&sc->arpcom.ac_if,
416 "unable to load firmware\n");
417 error = EIO;
418 }
419 break;
420
421 case SIOCGETSTATS :
422 if ((error = priv_check_cred(cr, PRIV_ROOT, NULL_CRED_OKAY)) != 0)
423 break;
424
425 t = 0;
426 if (issue_cx28975_cmd(sc, _DSL_FAR_END_ATTEN, &t, 1))
427 error = EIO;
428 ds.attenuat = sc->cmdp->out_data[0];
429
430 if (issue_cx28975_cmd(sc, _DSL_NOISE_MARGIN, &t, 1))
431 error = EIO;
432 ds.nmr = sc->cmdp->out_data[0];
433
434 if (issue_cx28975_cmd(sc, _DSL_POWER_BACK_OFF_RESULT, &t, 1))
435 error = EIO;
436 ds.tpbo = sc->cmdp->out_data[0];
437 ds.rpbo = sc->cmdp->out_data[1];
438
439 if (!issue_cx28975_cmd(sc, _DSL_HDSL_PERF_ERR_CTRS, &t, 1)) {
440 int i;
441 for (i = 0; i < 10; ++i)
442 ((u_int8_t *) &ds.losw)[i] =
443 sc->cmdp->out_data[i];
444 } else
445 error = EIO;
446
447 ds.status_1 = ((volatile u_int8_t *)sc->cmdp)[0x3c0];
448 ds.status_3 = ((volatile u_int8_t *)sc->cmdp)[0x3c2];
449
450 bcopy(&sc->in_stats, ifr->ifr_data, sizeof(struct sbni16_stats));
451 bcopy(&ds, (char *)ifr->ifr_data + sizeof(struct sbni16_stats),
452 sizeof(struct dsl_stats));
453 break;
454
455 case SIOCCLRSTATS :
456 if (!(error = priv_check_cred(cr, PRIV_ROOT, NULL_CRED_OKAY))) {
457 bzero(&sc->in_stats, sizeof(struct sbni16_stats));
458 t = 2;
459 if (issue_cx28975_cmd(sc, _DSL_CLEAR_ERROR_CTRS, &t, 1))
460 error = EIO;
461 }
462 break;
463 case SIOCSIFFLAGS:
464 if (ifp->if_flags & IFF_UP) {
465 if (!(ifp->if_flags & IFF_RUNNING)) {
466 if (sc->state == NOT_LOADED) {
467 if_printf(ifp, "firmware wasn't loaded\n");
468 error = EBUSY;
469 } else
470 sbsh_init(sc);
471 }
472 } else {
473 if (ifp->if_flags & IFF_RUNNING) {
474 sbsh_stop(sc);
475 ifp->if_flags &= ~IFF_RUNNING;
476 }
477 }
478 break;
479
480 case SIOCADDMULTI:
481 case SIOCDELMULTI:
482 error = 0;
483 break;
484 default:
485 error = ether_ioctl(ifp, cmd, data);
486 break;
487 }
488 return (error);
489 }
490
491
492 static void
493 sbsh_shutdown(device_t dev)
494 {
495 struct sbsh_softc *sc = device_get_softc(dev);
496
497 lwkt_serialize_enter(sc->arpcom.ac_if.if_serializer);
498 sbsh_stop(sc);
499 lwkt_serialize_exit(sc->arpcom.ac_if.if_serializer);
500 }
501
502 static int
503 sbsh_suspend(device_t dev)
504 {
505 struct sbsh_softc *sc = device_get_softc(dev);
506
507 lwkt_serialize_enter(sc->arpcom.ac_if.if_serializer);
508 sbsh_stop(sc);
509 lwkt_serialize_exit(sc->arpcom.ac_if.if_serializer);
510
511 return (0);
512 }
513
514 static int
515 sbsh_resume(device_t dev)
516 {
517 struct sbsh_softc *sc = device_get_softc(dev);
518 struct ifnet *ifp = &sc->arpcom.ac_if;
519
520 if (ifp->if_flags & IFF_UP)
521 sbsh_init(sc);
522
523 return (0);
524 }
525
526
527 static void
528 sbsh_watchdog(struct ifnet *ifp)
529 {
530 struct sbsh_softc *sc = ifp->if_softc;
531
532 if_printf(ifp, "transmit timeout\n");
533
534 if (sc->regs->SR & TXS) {
535 sc->regs->SR = TXS;
536 if_printf(ifp, "interrupt posted but not delivered\n");
537 }
538 free_sent_buffers(sc);
539 }
540
541 /* -------------------------------------------------------------------------- */
542
543 static void
544 sbsh_intr(void *arg)
545 {
546 struct sbsh_softc *sc = (struct sbsh_softc *)arg;
547 u_int8_t status = sc->regs->SR;
548
549 if (status == 0)
550 return;
551
552 if (status & EXT) {
553 cx28975_interrupt(sc);
554 sc->regs->SR = EXT;
555 }
556
557 if (status & UFL) {
558 resume_tx(sc);
559 sc->regs->SR = UFL;
560 ++sc->in_stats.ufl_errs;
561 ++sc->arpcom.ac_if.if_oerrors;
562 }
563
564 if (status & RXS) {
565 sc->regs->SR = RXS;
566 indicate_frames(sc);
567 alloc_rx_buffers(sc);
568 }
569
570 if (status & TXS) {
571 sc->regs->SR = TXS;
572 free_sent_buffers(sc);
573 }
574
575 if (status & CRC) {
576 ++sc->in_stats.crc_errs;
577 ++sc->arpcom.ac_if.if_ierrors;
578 sc->regs->SR = CRC;
579 }
580
581 if (status & OFL) {
582 ++sc->in_stats.ofl_errs;
583 ++sc->arpcom.ac_if.if_ierrors;
584 sc->regs->SR = OFL;
585 }
586 }
587
588 /*
589 * Look for a first descriptor of a next packet, and write it's number
590 * into CTDR. Then enable the transmitter.
591 */
592 static void
593 resume_tx(struct sbsh_softc *sc)
594 {
595 u_int32_t cur_tbd = sc->regs->CTDR;
596
597 while (cur_tbd != sc->regs->LTDR
598 && (sc->tbd[cur_tbd++].length & LAST_FRAG) == 0)
599 ;
600 sc->regs->CTDR = cur_tbd;
601 sc->regs->CR |= TXEN;
602 }
603
604 static void
605 start_xmit_frames(struct sbsh_softc *sc)
606 {
607 struct ifnet *ifp = &sc->arpcom.ac_if;
608 struct mbuf *m;
609
610 /*
611 * Check if we have any free descriptor(s) and free space in
612 * our transmit queue.
613 */
614 while (sc->tail_xq != ((sc->head_xq - 1) & (XQLEN - 1))
615 && sc->regs->LTDR != ((sc->head_tdesc - 1) & 0x7f)) {
616
617 m = ifq_dequeue(&ifp->if_snd, NULL);
618 if (m == NULL)
619 break;
620 if (m->m_pkthdr.len) {
621 BPF_MTAP(ifp, m);
622 encap_frame(sc, m);
623 } else
624 m_freem(m);
625 }
626
627 if (sc->regs->CTDR != sc->regs->LTDR)
628 ifp->if_flags |= IFF_OACTIVE;
629 else
630 ifp->if_flags &= ~IFF_OACTIVE;
631 }
632
633
634 static void
635 encap_frame(struct sbsh_softc *sc, struct mbuf *m_head)
636 {
637 struct mbuf *m;
638 u_int32_t cur_tbd;
639 int done;
640
641 look_for_nonzero:
642 for (m = m_head; !m->m_len; m = m->m_next)
643 ;
644
645 cur_tbd = sc->regs->LTDR & 0x7f;
646 done = 0;
647 do {
648 if (m->m_len < 5 || cur_tbd == ((sc->head_tdesc - 1) & 0x7f)) {
649 if ((m_head = repack(sc, m_head)) != NULL)
650 goto look_for_nonzero;
651 else
652 return;
653 }
654
655 sc->tbd[cur_tbd].address = vtophys(mtod(m, vm_offset_t));
656 sc->tbd[cur_tbd].length = m->m_len;
657
658 do {
659 m = m->m_next;
660 } while (m && !m->m_len);
661
662 if (!m) { /* last fragment has been reached */
663 sc->tbd[cur_tbd].length |= LAST_FRAG;
664 done = 1;
665 }
666
667 ++cur_tbd;
668 cur_tbd &= 0x7f;
669 } while (!done);
670
671 sc->xq[sc->tail_xq++] = m_head;
672 sc->tail_xq &= (XQLEN - 1);
673
674 sc->regs->LTDR = cur_tbd;
675 ++sc->in_stats.sent_pkts;
676 ++sc->arpcom.ac_if.if_opackets;
677 }
678
679 static struct mbuf *
680 repack(struct sbsh_softc *sc, struct mbuf *m)
681 {
682 struct mbuf *m_new;
683
684 MGETHDR(m_new, MB_DONTWAIT, MT_DATA);
685 if (!m_new) {
686 if_printf (&sc->arpcom.ac_if,
687 "unable to get mbuf.\n");
688 return (NULL);
689 }
690
691 if (m->m_pkthdr.len > MHLEN) {
692 MCLGET(m_new, MB_DONTWAIT);
693 if (!(m_new->m_flags & M_EXT)) {
694 m_freem(m_new);
695 if_printf (&sc->arpcom.ac_if,
696 "unable to get mbuf cluster.\n");
697 return (NULL);
698 }
699 }
700
701 m_copydata(m, 0, m->m_pkthdr.len, mtod(m_new, caddr_t));
702 m_new->m_pkthdr.len = m_new->m_len = m->m_pkthdr.len;
703 m_freem(m);
704 return (m_new);
705 }
706
707 static void
708 free_sent_buffers(struct sbsh_softc *sc)
709 {
710 u_int32_t cur_tbd;
711
712 cur_tbd = sc->regs->CTDR;
713
714 while (sc->head_tdesc != cur_tbd) {
715 /*
716 * Be careful! one element in xq may correspond to
717 * multiple descriptors.
718 */
719 if (sc->tbd[sc->head_tdesc].length & LAST_FRAG) {
720 m_freem(sc->xq[sc->head_xq++]);
721 sc->head_xq &= (XQLEN - 1);
722 }
723
724 sc->tbd[sc->head_tdesc].length = 0;
725 sc->head_tdesc = (sc->head_tdesc + 1) & 0x7f;
726 }
727
728 start_xmit_frames(sc);
729 }
730
731 /*
732 * DON'T use free_sent_buffers to drop the queue!
733 */
734 static void
735 alloc_rx_buffers(struct sbsh_softc *sc)
736 {
737 unsigned cur_rbd = sc->regs->LRDR & 0x7f;
738 struct mbuf *m;
739
740 while (sc->tail_rq != ((sc->head_rq - 1) & (RQLEN - 1))) {
741 MGETHDR(m, MB_DONTWAIT, MT_DATA);
742 if (!m) {
743 if_printf (&sc->arpcom.ac_if,
744 "unable to get mbuf.\n");
745 return;
746 }
747
748 if (SBNI16_MAX_FRAME > MHLEN) {
749 MCLGET(m, MB_DONTWAIT);
750 if (!(m->m_flags & M_EXT)) {
751 m_freem(m);
752 if_printf (&sc->arpcom.ac_if,
753 "unable to get mbuf cluster.\n");
754 return;
755 }
756 m->m_pkthdr.len = m->m_len = MCLBYTES;
757 }
758
759 m_adj(m, 2); /* align ip on longword boundaries */
760
761 sc->rq[sc->tail_rq++] = m;
762 sc->tail_rq &= (RQLEN - 1);
763
764 sc->rbd[cur_rbd].address = vtophys(mtod(m, vm_offset_t));
765 sc->rbd[cur_rbd].length = 0;
766 sc->regs->LRDR = cur_rbd = (cur_rbd + 1) & 0x7f;
767 }
768 }
769
770 static void
771 indicate_frames(struct sbsh_softc *sc)
772 {
773 struct ifnet *ifp = &sc->arpcom.ac_if;
774 unsigned cur_rbd = sc->regs->CRDR & 0x7f;
775
776 while (sc->head_rdesc != cur_rbd) {
777 struct mbuf *m = sc->rq[sc->head_rq++];
778 sc->head_rq &= (RQLEN - 1);
779
780 m->m_pkthdr.len = m->m_len =
781 sc->rbd[sc->head_rdesc].length & 0x7ff;
782 m->m_pkthdr.rcvif = ifp;
783
784 ifp->if_input(ifp, m);
785 ++sc->in_stats.rcvd_pkts;
786 ++ifp->if_ipackets;
787
788 sc->head_rdesc = (sc->head_rdesc + 1) & 0x7f;
789 }
790 }
791
792 static void
793 drop_queues(struct sbsh_softc *sc)
794 {
795 while (sc->head_rq != sc->tail_rq) {
796 m_freem(sc->rq[sc->head_rq++]);
797 sc->head_rq &= (RQLEN - 1);
798 }
799
800 while (sc->head_xq != sc->tail_xq) {
801 m_freem(sc->xq[sc->head_xq++]);
802 sc->head_xq &= (XQLEN - 1);
803 }
804 }
805
806 /* -------------------------------------------------------------------------- */
807
808 static void
809 activate(struct sbsh_softc *sc)
810 {
811 struct timeval tv;
812
813 sc->regs->SR = 0xff; /* clear it! */
814 sc->regs->CTDR = sc->regs->LTDR = sc->regs->CRDR = sc->regs->LRDR = 0;
815
816 sc->head_tdesc = sc->head_rdesc = 0;
817 alloc_rx_buffers(sc);
818
819 sc->regs->CRB &= ~RXDE;
820 sc->regs->IMR = EXT | RXS | TXS | CRC | OFL | UFL;
821 sc->regs->CR |= TXEN | RXEN;
822
823 sc->state = ACTIVE;
824 ++sc->in_stats.attempts;
825 microtime(&tv);
826 sc->in_stats.last_time = tv.tv_sec;
827 start_xmit_frames(sc);
828 }
829
830 static void
831 deactivate(struct sbsh_softc *sc)
832 {
833 sc->regs->CR &= ~(RXEN | TXEN);
834 sc->regs->CRB |= RXDE;
835 sc->regs->IMR = EXT;
836 sc->regs->CTDR = sc->regs->LTDR;
837 sc->regs->CRDR = sc->regs->LRDR;
838 sc->state = ACTIVATION;
839
840 drop_queues(sc);
841 }
842
843 /* -------------------------------------------------------------------------- */
844
845 static void
846 cx28975_interrupt(struct sbsh_softc *sc)
847 {
848 volatile struct cx28975_cmdarea *p = sc->cmdp;
849 u_int8_t t;
850
851 if (p->intr_host != 0xfe)
852 return;
853
854 if (p->out_ack & 0x80) {
855 if (*((volatile u_int8_t *)p + 0x3c7) & 2) {
856 if (sc->state != ACTIVE
857 && (*((volatile u_int8_t *)p + 0x3c0) & 0xc0) == 0x40) {
858 activate(sc);
859 if_printf(&sc->arpcom.ac_if, "connected to peer\n");
860 } else if (sc->state == ACTIVE
861 && (*((volatile u_int8_t *)p + 0x3c0) & 0xc0) != 0x40) {
862 deactivate(sc);
863 if_printf(&sc->arpcom.ac_if, "carrier lost\n");
864 }
865 }
866
867 p->intr_host = 0;
868 t = p->intr_host;
869 p->out_ack = 0;
870 } else {
871 wakeup(sc);
872
873 p->intr_host = 0;
874 t = p->intr_host;
875 }
876 }
877
878 /* -------------------------------------------------------------------------- */
879
880 static int
881 start_cx28975(struct sbsh_softc *sc, struct cx28975_cfg cfg)
882 {
883 static char thresh[] = { +8, -4, -16, -40 };
884
885 volatile struct cx28975_cmdarea *p = sc->cmdp;
886 u_int8_t t, parm[12];
887
888 p->intr_host = 0;
889 t = p->intr_host;
890
891 /* reset chip set */
892 sc->regs->IMR = EXT;
893 sc->regs->CR = 0;
894 sc->regs->SR = 0xff;
895 DELAY(2);
896 sc->regs->CR = XRST;
897 if (cfg.crc16)
898 sc->regs->CR |= CMOD;
899 if (cfg.fill_7e)
900 sc->regs->CR |= FMOD;
901 if (cfg.inv)
902 sc->regs->CR |= PMOD;
903
904 sc->regs->CRB |= RODD | RXDE;
905 if (cfg.rburst)
906 sc->regs->CRB |= RDBE;
907 if (cfg.wburst)
908 sc->regs->CRB |= WTBE;
909
910 tsleep(sc, 0, "sbsh", 0);
911 if ((p->out_ack & 0x1f) != _ACK_BOOT_WAKE_UP)
912 return (-1);
913
914 if (download_firmware(sc, cfg.firmw_image, cfg.firmw_len))
915 return (-1);
916
917 tsleep(sc, 0, "sbsh", 0);
918 if ((p->out_ack & 0x1f) != _ACK_OPER_WAKE_UP)
919 return (-1);
920
921 t = cfg.master ? 1 : 9;
922 if (issue_cx28975_cmd(sc, _DSL_SYSTEM_ENABLE, &t, 1))
923 return (-1);
924
925 t = 0x63;
926 if (issue_cx28975_cmd(sc, _DSL_SYSTEM_CONFIG, &t, 1))
927 return (-1);
928
929 *(u_int16_t *)parm = cfg.lrate >> 3;
930 parm[2] = parm[3] = parm[0];
931 parm[5] = cfg.lrate & 7;
932 parm[4] = parm[7] = 1;
933 parm[6] = 0;
934 if (issue_cx28975_cmd(sc, _DSL_MULTI_RATE_CONFIG, parm, 8))
935 return (-1);
936
937 parm[0] = 0x02 | (cfg.mod << 4);
938 parm[1] = 0;
939 if (issue_cx28975_cmd(sc, _DSL_TRAINING_MODE, parm, 2))
940 return (-1);
941
942 bzero(parm, 12);
943 parm[0] = 0x04; /* pre-activation: G.hs */
944 parm[4] = 0x04; /* no remote configuration */
945 parm[7] = 0x01; /* annex A (default) */
946 parm[8] = 0xff; /* i-bit mask (all bits) */
947 if (issue_cx28975_cmd(sc, _DSL_PREACTIVATION_CFG, parm, 12))
948 return (-1);
949
950 parm[0] = 0x03; /* dying gasp time - 3 frames */
951 parm[1] = thresh[cfg.mod];
952 parm[2] = 0xff; /* attenuation */
953 parm[3] = 0x04; /* line probe NMR (+2 dB) */
954 parm[4] = 0x00; /* reserved */
955 parm[5] = 0x00;
956 if (issue_cx28975_cmd(sc, _DSL_THRESHOLDS, parm, 6))
957 return (-1);
958
959 t = cfg.master ? 0x23 : 0x21;
960 if (issue_cx28975_cmd(sc, _DSL_FR_PCM_CONFIG, &t, 1))
961 return (-1);
962
963 t = 0x02;
964 if (issue_cx28975_cmd(sc, _DSL_INTR_HOST_MASK, &t, 1))
965 return (-1);
966
967 sc->state = DOWN;
968 return (0);
969 }
970
971 static int
972 download_firmware(struct sbsh_softc *sc, u_int8_t *img, u_int32_t img_len)
973 {
974 u_int32_t t;
975 int i;
976 u_int8_t cksum = 0;
977
978 for (i = 0; i < img_len; ++i)
979 cksum += img[i];
980
981 t = img_len;
982 if (issue_cx28975_cmd(sc, _DSL_DOWNLOAD_START, (u_int8_t *) &t, 4))
983 return (-1);
984
985 for (i = 0; img_len >= 75; i += 75, img_len -= 75) {
986 if (issue_cx28975_cmd(sc, _DSL_DOWNLOAD_DATA, img + i, 75))
987 return (-1);
988 }
989
990 if (img_len
991 && issue_cx28975_cmd(sc, _DSL_DOWNLOAD_DATA, img + i, img_len))
992 return (-1);
993
994 t = (cksum ^ 0xff) + 1;
995 if (issue_cx28975_cmd(sc, _DSL_DOWNLOAD_END, (u_int8_t *) &t, 1))
996 return (-1);
997
998 return (0);
999 }
1000
1001 static int
1002 issue_cx28975_cmd(struct sbsh_softc *sc, u_int8_t cmd,
1003 u_int8_t *data, u_int8_t size)
1004 {
1005 volatile struct cx28975_cmdarea *p = sc->cmdp;
1006 volatile u_int8_t *databuf = p->in_data;
1007 int i;
1008
1009 u_int8_t cksum = 0;
1010
1011 p->in_dest = 0xf0;
1012 p->in_opcode = cmd;
1013 p->in_zero = 0;
1014 p->in_length = --size;
1015 p->in_csum = 0xf0 ^ cmd ^ size ^ 0xaa;
1016
1017 for (i = 0; i <= size; ++i) {
1018 cksum ^= *data;
1019 *databuf++ = *data++; /* only 1 byte per cycle! */
1020 }
1021
1022 p->in_datasum = cksum ^ 0xaa;
1023 p->out_ack = _ACK_NOT_COMPLETE;
1024 p->intr_8051 = 0xfe;
1025
1026 if (tsleep(sc, 0, "sbsh", hz << 3))
1027 return (-1);
1028
1029 while (p->out_ack == _ACK_NOT_COMPLETE)
1030 ; /* FIXME ! */
1031
1032 if ((p->out_ack & 0x1f) == _ACK_PASS) {
1033 p->out_ack = 0;
1034 return (0);
1035 } else {
1036 p->out_ack = 0;
1037 return (-1);
1038 }
1039 }
DragonFly BSD