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