2 * Copyright (c) 1997, 2001 Hellmuth Michaelis. All rights reserved.
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
7 * 1. Redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer.
9 * 2. Redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution.
13 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
17 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 *---------------------------------------------------------------------------
27 * i4b_rbch.c - device driver for raw B channel data
28 * ---------------------------------------------------
30 * $FreeBSD: src/sys/i4b/driver/i4b_rbch.c,v 1.10.2.3 2001/08/12 16:22:48 hm Exp $
31 * $DragonFly: src/sys/net/i4b/driver/i4b_rbch.c,v 1.17 2005/06/15 11:56:03 joerg Exp $
33 * last edit-date: [Sat Aug 11 18:06:57 2001]
35 *---------------------------------------------------------------------------*/
37 #include "use_i4brbch.h"
41 #include <sys/param.h>
42 #include <sys/systm.h>
46 #include <sys/kernel.h>
48 #include <sys/socket.h>
51 #include <sys/thread2.h>
53 #include <net/i4b/include/machine/i4b_ioctl.h>
54 #include <net/i4b/include/machine/i4b_rbch_ioctl.h>
55 #include <net/i4b/include/machine/i4b_debug.h>
57 #include "../include/i4b_global.h"
58 #include "../include/i4b_mbuf.h"
59 #include "../include/i4b_l3l4.h"
60 #include "../layer4/i4b_l4.h"
62 #include <sys/ioccom.h>
64 #include <sys/filio.h>
66 static drvr_link_t rbch_drvr_linktab[NI4BRBCH];
67 static isdn_link_t *isdn_linktab[NI4BRBCH];
69 #define I4BRBCHACCT 1 /* enable accounting messages */
70 #define I4BRBCHACCTINTVL 2 /* accounting msg interval in secs */
72 static struct rbch_softc {
74 int sc_unit; /* unit number */
76 int sc_devstate; /* state of driver */
78 #define ST_CONNECTED 0x01
79 #define ST_ISOPEN 0x02
80 #define ST_RDWAITDATA 0x04
81 #define ST_WRWAITEMPTY 0x08
82 #define ST_NOBLOCK 0x10
84 int sc_bprot; /* B-ch protocol used */
86 call_desc_t *sc_cd; /* Call Descriptor */
90 struct ifqueue sc_hdlcq; /* hdlc read queue */
91 #define I4BRBCHMAXQLEN 10
93 struct selinfo selp; /* select / poll */
96 struct callout sc_timeout;
98 int sc_iinb; /* isdn driver # of inbytes */
99 int sc_ioutb; /* isdn driver # of outbytes */
100 int sc_linb; /* last # of bytes rx'd */
101 int sc_loutb; /* last # of bytes tx'd */
102 int sc_fn; /* flag, first null acct */
104 } rbch_softc[NI4BRBCH];
106 static void rbch_rx_data_rdy(int unit);
107 static void rbch_tx_queue_empty(int unit);
108 static void rbch_connect(int unit, void *cdp);
109 static void rbch_disconnect(int unit, void *cdp);
110 static void rbch_init_linktab(int unit);
111 static void rbch_clrq(int unit);
113 #define PDEVSTATIC static
114 #define IOCTL_CMD_T u_long
116 PDEVSTATIC d_open_t i4brbchopen;
117 PDEVSTATIC d_close_t i4brbchclose;
118 PDEVSTATIC d_read_t i4brbchread;
119 PDEVSTATIC d_read_t i4brbchwrite;
120 PDEVSTATIC d_ioctl_t i4brbchioctl;
122 PDEVSTATIC d_poll_t i4brbchpoll;
123 #define POLLFIELD i4brbchpoll
125 #define CDEV_MAJOR 57
127 static struct cdevsw i4brbch_cdevsw = {
128 /* name */ "i4brbch",
129 /* maj */ CDEV_MAJOR,
134 /* open */ i4brbchopen,
135 /* close */ i4brbchclose,
136 /* read */ i4brbchread,
137 /* write */ i4brbchwrite,
138 /* ioctl */ i4brbchioctl,
139 /* poll */ POLLFIELD,
141 /* strategy */ nostrategy,
146 static void i4brbchattach(void *);
147 PSEUDO_SET(i4brbchattach, i4b_rbch);
149 /*===========================================================================*
150 * DEVICE DRIVER ROUTINES
151 *===========================================================================*/
153 /*---------------------------------------------------------------------------*
154 * initialization at kernel load time
155 *---------------------------------------------------------------------------*/
157 i4brbchinit(void *unused)
159 cdevsw_add(&i4brbch_cdevsw, 0, 0);
162 SYSINIT(i4brbchdev, SI_SUB_DRIVERS,
163 SI_ORDER_MIDDLE+CDEV_MAJOR, &i4brbchinit, NULL);
165 /*---------------------------------------------------------------------------*
166 * interface attach routine
167 *---------------------------------------------------------------------------*/
169 i4brbchattach(void *dummy)
173 #ifndef HACK_NO_PSEUDO_ATTACH_MSG
174 printf("i4brbch: %d raw B channel access device(s) attached\n", NI4BRBCH);
177 for(i=0; i < NI4BRBCH; i++)
179 make_dev(&i4brbch_cdevsw, i,
180 UID_ROOT, GID_WHEEL, 0600, "i4brbch%d", i);
183 callout_init(&rbch_softc[i].sc_timeout);
184 rbch_softc[i].sc_fn = 1;
186 rbch_softc[i].sc_unit = i;
187 rbch_softc[i].sc_devstate = ST_IDLE;
188 rbch_softc[i].sc_hdlcq.ifq_maxlen = I4BRBCHMAXQLEN;
189 rbch_softc[i].it_in.c_ispeed = rbch_softc[i].it_in.c_ospeed = 64000;
190 termioschars(&rbch_softc[i].it_in);
191 rbch_init_linktab(i);
195 /*---------------------------------------------------------------------------*
197 *---------------------------------------------------------------------------*/
199 i4brbchopen(dev_t dev, int flag, int fmt, struct thread *td)
201 int unit = minor(dev);
206 if(rbch_softc[unit].sc_devstate & ST_ISOPEN)
213 rbch_softc[unit].sc_devstate |= ST_ISOPEN;
215 NDBGL4(L4_RBCHDBG, "unit %d, open", unit);
220 /*---------------------------------------------------------------------------*
222 *---------------------------------------------------------------------------*/
224 i4brbchclose(dev_t dev, int flag, int fmt, struct thread *td)
226 int unit = minor(dev);
227 struct rbch_softc *sc = &rbch_softc[unit];
229 if(sc->sc_devstate & ST_CONNECTED)
230 i4b_l4_drvrdisc(BDRV_RBCH, unit);
232 sc->sc_devstate &= ~ST_ISOPEN;
236 NDBGL4(L4_RBCHDBG, "unit %d, closed", unit);
241 /*---------------------------------------------------------------------------*
242 * read from rbch device
243 *---------------------------------------------------------------------------*/
245 i4brbchread(dev_t dev, struct uio *uio, int ioflag)
249 int unit = minor(dev);
251 struct rbch_softc *sc = &rbch_softc[unit];
255 NDBGL4(L4_RBCHDBG, "unit %d, enter read", unit);
258 if(!(sc->sc_devstate & ST_ISOPEN))
261 NDBGL4(L4_RBCHDBG, "unit %d, read while not open", unit);
265 if((sc->sc_devstate & ST_NOBLOCK))
267 if(!(sc->sc_devstate & ST_CONNECTED)) {
272 if(sc->sc_bprot == BPROT_RHDLC)
275 iqp = isdn_linktab[unit]->rx_queue;
277 if(IF_QEMPTY(iqp) && (sc->sc_devstate & ST_ISOPEN)) {
284 while(!(sc->sc_devstate & ST_CONNECTED))
286 NDBGL4(L4_RBCHDBG, "unit %d, wait read init", unit);
288 if((error = tsleep((caddr_t) &rbch_softc[unit],
289 PCATCH, "rrrbch", 0 )) != 0)
292 NDBGL4(L4_RBCHDBG, "unit %d, error %d tsleep", unit, error);
297 if(sc->sc_bprot == BPROT_RHDLC)
300 iqp = isdn_linktab[unit]->rx_queue;
302 while(IF_QEMPTY(iqp) && (sc->sc_devstate & ST_ISOPEN))
304 sc->sc_devstate |= ST_RDWAITDATA;
306 NDBGL4(L4_RBCHDBG, "unit %d, wait read data", unit);
308 if((error = tsleep((caddr_t) &isdn_linktab[unit]->rx_queue,
309 PCATCH, "rrbch", 0 )) != 0)
312 NDBGL4(L4_RBCHDBG, "unit %d, error %d tsleep read", unit, error);
313 sc->sc_devstate &= ~ST_RDWAITDATA;
321 NDBGL4(L4_RBCHDBG, "unit %d, read %d bytes", unit, m->m_len);
325 error = uiomove(m->m_data, m->m_len, uio);
329 NDBGL4(L4_RBCHDBG, "unit %d, error %d uiomove", unit, error);
341 /*---------------------------------------------------------------------------*
342 * write to rbch device
343 *---------------------------------------------------------------------------*/
345 i4brbchwrite(dev_t dev, struct uio * uio, int ioflag)
349 int unit = minor(dev);
350 struct rbch_softc *sc = &rbch_softc[unit];
354 NDBGL4(L4_RBCHDBG, "unit %d, write", unit);
357 if(!(sc->sc_devstate & ST_ISOPEN))
359 NDBGL4(L4_RBCHDBG, "unit %d, write while not open", unit);
364 if((sc->sc_devstate & ST_NOBLOCK))
366 if(!(sc->sc_devstate & ST_CONNECTED)) {
370 if(IF_QFULL(isdn_linktab[unit]->tx_queue) && (sc->sc_devstate & ST_ISOPEN)) {
377 while(!(sc->sc_devstate & ST_CONNECTED))
379 NDBGL4(L4_RBCHDBG, "unit %d, write wait init", unit);
381 error = tsleep((caddr_t) &rbch_softc[unit],
382 PCATCH, "wrrbch", 0 );
383 if(error == ERESTART) {
387 else if(error == EINTR)
390 NDBGL4(L4_RBCHDBG, "unit %d, EINTR during wait init", unit);
396 NDBGL4(L4_RBCHDBG, "unit %d, error %d tsleep init", unit, error);
399 tsleep((caddr_t) &rbch_softc[unit], PCATCH, "xrbch", (hz*1));
402 while(IF_QFULL(isdn_linktab[unit]->tx_queue) && (sc->sc_devstate & ST_ISOPEN))
404 sc->sc_devstate |= ST_WRWAITEMPTY;
406 NDBGL4(L4_RBCHDBG, "unit %d, write queue full", unit);
408 if ((error = tsleep((caddr_t) &isdn_linktab[unit]->tx_queue,
409 PCATCH, "wrbch", 0)) != 0) {
410 sc->sc_devstate &= ~ST_WRWAITEMPTY;
411 if(error == ERESTART)
416 else if(error == EINTR)
419 NDBGL4(L4_RBCHDBG, "unit %d, EINTR during wait write", unit);
425 NDBGL4(L4_RBCHDBG, "unit %d, error %d tsleep write", unit, error);
432 if(!(sc->sc_devstate & ST_ISOPEN))
434 NDBGL4(L4_RBCHDBG, "unit %d, not open anymore", unit);
439 if((m = i4b_Bgetmbuf(BCH_MAX_DATALEN)) != NULL)
441 m->m_len = min(BCH_MAX_DATALEN, uio->uio_resid);
443 NDBGL4(L4_RBCHDBG, "unit %d, write %d bytes", unit, m->m_len);
445 error = uiomove(m->m_data, m->m_len, uio);
447 if(IF_QFULL(isdn_linktab[unit]->tx_queue))
450 IF_ENQUEUE(isdn_linktab[unit]->tx_queue, m);
451 (*isdn_linktab[unit]->bch_tx_start)(isdn_linktab[unit]->unit, isdn_linktab[unit]->channel);
459 /*---------------------------------------------------------------------------*
460 * rbch device ioctl handlibg
461 *---------------------------------------------------------------------------*/
463 i4brbchioctl(dev_t dev, IOCTL_CMD_T cmd, caddr_t data, int flag, struct thread *td)
466 int unit = minor(dev);
467 struct rbch_softc *sc = &rbch_softc[unit];
471 case FIOASYNC: /* Set async mode */
474 NDBGL4(L4_RBCHDBG, "unit %d, setting async mode", unit);
478 NDBGL4(L4_RBCHDBG, "unit %d, clearing async mode", unit);
485 NDBGL4(L4_RBCHDBG, "unit %d, setting non-blocking mode", unit);
486 sc->sc_devstate |= ST_NOBLOCK;
490 NDBGL4(L4_RBCHDBG, "unit %d, clearing non-blocking mode", unit);
491 sc->sc_devstate &= ~ST_NOBLOCK;
495 case TIOCCDTR: /* Clear DTR */
496 if(sc->sc_devstate & ST_CONNECTED)
498 NDBGL4(L4_RBCHDBG, "unit %d, disconnecting for DTR down", unit);
499 i4b_l4_drvrdisc(BDRV_RBCH, unit);
503 case I4B_RBCH_DIALOUT:
507 for (l = 0; l < TELNO_MAX && ((char *)data)[l]; l++)
511 NDBGL4(L4_RBCHDBG, "unit %d, attempting dialout to %s", unit, (char *)data);
512 i4b_l4_dialoutnumber(BDRV_RBCH, unit, l, (char *)data);
515 /* fall through to SDTR */
518 case TIOCSDTR: /* Set DTR */
519 NDBGL4(L4_RBCHDBG, "unit %d, attempting dialout (DTR)", unit);
520 i4b_l4_dialout(BDRV_RBCH, unit);
523 case TIOCSETA: /* Set termios struct */
526 case TIOCGETA: /* Get termios struct */
527 *(struct termios *)data = sc->it_in;
531 *(int *)data = TIOCM_LE|TIOCM_DTR|TIOCM_RTS|TIOCM_CTS|TIOCM_DSR;
532 if (sc->sc_devstate & ST_CONNECTED)
533 *(int *)data |= TIOCM_CD;
536 case I4B_RBCH_VR_REQ:
540 mvr = (msg_vr_req_t *)data;
542 mvr->version = VERSION;
548 default: /* Unknown stuff */
549 NDBGL4(L4_RBCHDBG, "unit %d, ioctl, unknown cmd %lx", unit, (u_long)cmd);
556 /*---------------------------------------------------------------------------*
558 *---------------------------------------------------------------------------*/
560 i4brbchpoll(dev_t dev, int events, struct thread *td)
562 int revents = 0; /* Events we found */
563 int unit = minor(dev);
564 struct rbch_softc *sc = &rbch_softc[unit];
566 /* We can't check for anything but IN or OUT */
569 if(!(sc->sc_devstate & ST_ISOPEN))
576 * Writes are OK if we are connected and the
577 * transmit queue can take them
580 if((events & (POLLOUT|POLLWRNORM)) &&
581 (sc->sc_devstate & ST_CONNECTED) &&
582 !IF_QFULL(isdn_linktab[unit]->tx_queue))
584 revents |= (events & (POLLOUT|POLLWRNORM));
587 /* ... while reads are OK if we have any data */
589 if((events & (POLLIN|POLLRDNORM)) &&
590 (sc->sc_devstate & ST_CONNECTED))
594 if(sc->sc_bprot == BPROT_RHDLC)
597 iqp = isdn_linktab[unit]->rx_queue;
600 revents |= (events & (POLLIN|POLLRDNORM));
604 selrecord(td, &sc->selp);
611 /*---------------------------------------------------------------------------*
613 *---------------------------------------------------------------------------*/
615 rbch_timeout(struct rbch_softc *sc)
617 bchan_statistics_t bs;
618 int unit = sc->sc_unit;
620 /* get # of bytes in and out from the HSCX driver */
622 (*isdn_linktab[unit]->bch_stat)
623 (isdn_linktab[unit]->unit, isdn_linktab[unit]->channel, &bs);
625 sc->sc_ioutb += bs.outbytes;
626 sc->sc_iinb += bs.inbytes;
628 if((sc->sc_iinb != sc->sc_linb) || (sc->sc_ioutb != sc->sc_loutb) || sc->sc_fn)
630 int ri = (sc->sc_iinb - sc->sc_linb)/I4BRBCHACCTINTVL;
631 int ro = (sc->sc_ioutb - sc->sc_loutb)/I4BRBCHACCTINTVL;
633 if((sc->sc_iinb == sc->sc_linb) && (sc->sc_ioutb == sc->sc_loutb))
638 sc->sc_linb = sc->sc_iinb;
639 sc->sc_loutb = sc->sc_ioutb;
641 i4b_l4_accounting(BDRV_RBCH, unit, ACCT_DURING,
642 sc->sc_ioutb, sc->sc_iinb, ro, ri, sc->sc_ioutb, sc->sc_iinb);
644 callout_reset(&sc->sc_timeout, I4BRBCHACCTINTVL * hz,
645 (void *)rbch_timeout, sc);
647 #endif /* I4BRBCHACCT */
649 /*===========================================================================*
650 * ISDN INTERFACE ROUTINES
651 *===========================================================================*/
653 /*---------------------------------------------------------------------------*
654 * this routine is called from L4 handler at connect time
655 *---------------------------------------------------------------------------*/
657 rbch_connect(int unit, void *cdp)
659 call_desc_t *cd = (call_desc_t *)cdp;
660 struct rbch_softc *sc = &rbch_softc[unit];
662 sc->sc_bprot = cd->bprot;
665 if(sc->sc_bprot == BPROT_RHDLC)
672 callout_reset(&sc->sc_timeout, I4BRBCHACCTINTVL * hz,
673 (void *)rbch_timeout, sc);
676 if(!(sc->sc_devstate & ST_CONNECTED))
678 NDBGL4(L4_RBCHDBG, "unit %d, wakeup", unit);
679 sc->sc_devstate |= ST_CONNECTED;
685 /*---------------------------------------------------------------------------*
686 * this routine is called from L4 handler at disconnect time
687 *---------------------------------------------------------------------------*/
689 rbch_disconnect(int unit, void *cdp)
691 call_desc_t *cd = (call_desc_t *)cdp;
692 struct rbch_softc *sc = &rbch_softc[unit];
698 NDBGL4(L4_RBCHDBG, "rbch%d: channel %d not active",
699 cd->driver_unit, cd->channelid);
705 NDBGL4(L4_RBCHDBG, "unit %d, disconnect", unit);
707 sc->sc_devstate &= ~ST_CONNECTED;
712 i4b_l4_accounting(BDRV_RBCH, unit, ACCT_FINAL,
713 sc->sc_ioutb, sc->sc_iinb, 0, 0, sc->sc_ioutb, sc->sc_iinb);
714 callout_stop(&sc->sc_timeout);
719 /*---------------------------------------------------------------------------*
720 * feedback from daemon in case of dial problems
721 *---------------------------------------------------------------------------*/
723 rbch_dialresponse(int unit, int status, cause_t cause)
727 /*---------------------------------------------------------------------------*
729 *---------------------------------------------------------------------------*/
731 rbch_updown(int unit, int updown)
735 /*---------------------------------------------------------------------------*
736 * this routine is called from the HSCX interrupt handler
737 * when a new frame (mbuf) has been received and is to be put on
739 *---------------------------------------------------------------------------*/
741 rbch_rx_data_rdy(int unit)
743 if(rbch_softc[unit].sc_bprot == BPROT_RHDLC)
747 if((m = *isdn_linktab[unit]->rx_mbuf) == NULL)
750 m->m_pkthdr.len = m->m_len;
752 if(IF_QFULL(&(rbch_softc[unit].sc_hdlcq)))
754 NDBGL4(L4_RBCHDBG, "unit %d: hdlc rx queue full!", unit);
759 IF_ENQUEUE(&(rbch_softc[unit].sc_hdlcq), m);
763 if(rbch_softc[unit].sc_devstate & ST_RDWAITDATA)
765 NDBGL4(L4_RBCHDBG, "unit %d, wakeup", unit);
766 rbch_softc[unit].sc_devstate &= ~ST_RDWAITDATA;
767 wakeup((caddr_t) &isdn_linktab[unit]->rx_queue);
771 NDBGL4(L4_RBCHDBG, "unit %d, NO wakeup", unit);
773 selwakeup(&rbch_softc[unit].selp);
776 /*---------------------------------------------------------------------------*
777 * this routine is called from the HSCX interrupt handler
778 * when the last frame has been sent out and there is no
779 * further frame (mbuf) in the tx queue.
780 *---------------------------------------------------------------------------*/
782 rbch_tx_queue_empty(int unit)
784 if(rbch_softc[unit].sc_devstate & ST_WRWAITEMPTY)
786 NDBGL4(L4_RBCHDBG, "unit %d, wakeup", unit);
787 rbch_softc[unit].sc_devstate &= ~ST_WRWAITEMPTY;
788 wakeup((caddr_t) &isdn_linktab[unit]->tx_queue);
792 NDBGL4(L4_RBCHDBG, "unit %d, NO wakeup", unit);
794 selwakeup(&rbch_softc[unit].selp);
797 /*---------------------------------------------------------------------------*
798 * this routine is called from the HSCX interrupt handler
799 * each time a packet is received or transmitted
800 *---------------------------------------------------------------------------*/
802 rbch_activity(int unit, int rxtx)
804 if (rbch_softc[unit].sc_cd)
805 rbch_softc[unit].sc_cd->last_active_time = SECOND;
806 selwakeup(&rbch_softc[unit].selp);
809 /*---------------------------------------------------------------------------*
810 * clear an hdlc rx queue for a rbch unit
811 *---------------------------------------------------------------------------*/
818 IF_DRAIN(&rbch_softc[unit].sc_hdlcq);
822 /*---------------------------------------------------------------------------*
823 * return this drivers linktab address
824 *---------------------------------------------------------------------------*/
826 rbch_ret_linktab(int unit)
828 rbch_init_linktab(unit);
829 return(&rbch_drvr_linktab[unit]);
832 /*---------------------------------------------------------------------------*
833 * setup the isdn_linktab for this driver
834 *---------------------------------------------------------------------------*/
836 rbch_set_linktab(int unit, isdn_link_t *ilt)
838 isdn_linktab[unit] = ilt;
841 /*---------------------------------------------------------------------------*
842 * initialize this drivers linktab
843 *---------------------------------------------------------------------------*/
845 rbch_init_linktab(int unit)
847 rbch_drvr_linktab[unit].unit = unit;
848 rbch_drvr_linktab[unit].bch_rx_data_ready = rbch_rx_data_rdy;
849 rbch_drvr_linktab[unit].bch_tx_queue_empty = rbch_tx_queue_empty;
850 rbch_drvr_linktab[unit].bch_activity = rbch_activity;
851 rbch_drvr_linktab[unit].line_connected = rbch_connect;
852 rbch_drvr_linktab[unit].line_disconnected = rbch_disconnect;
853 rbch_drvr_linktab[unit].dial_response = rbch_dialresponse;
854 rbch_drvr_linktab[unit].updown_ind = rbch_updown;
857 /*===========================================================================*/
859 #endif /* NI4BRBCH > 0 */