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_ipr.c - isdn4bsd IP over raw HDLC ISDN network driver
28 * ---------------------------------------------------------
30 * $FreeBSD: src/sys/i4b/driver/i4b_ipr.c,v 1.8.2.3 2001/10/27 15:48:17 hm Exp $
31 * $DragonFly: src/sys/net/i4b/driver/i4b_ipr.c,v 1.12 2004/09/16 04:36:30 dillon Exp $
33 * last edit-date: [Fri Oct 26 19:32:38 2001]
35 *---------------------------------------------------------------------------*
37 * statistics counter usage (interface lifetime):
38 * ----------------------------------------------
39 * sc->sc_if.if_ipackets # of received packets
40 * sc->sc_if.if_ierrors # of error packets not going to upper layers
41 * sc->sc_if.if_opackets # of transmitted packets
42 * sc->sc_if.if_oerrors # of error packets not being transmitted
43 * sc->sc_if.if_collisions # of invalid ip packets after VJ decompression
44 * sc->sc_if.if_ibytes # of bytes coming in from the line (before VJ)
45 * sc->sc_if.if_obytes # of bytes going out to the line (after VJ)
46 * sc->sc_if.if_imcasts (currently unused)
47 * sc->sc_if.if_omcasts # of frames sent out of the fastqueue
48 * sc->sc_if.if_iqdrops # of frames dropped on input because queue full
49 * sc->sc_if.if_noproto # of frames dropped on output because !AF_INET
51 * statistics counter usage (connection lifetime):
52 * -----------------------------------------------
53 * sc->sc_iinb # of ISDN incoming bytes from HSCX
54 * sc->sc_ioutb # of ISDN outgoing bytes from HSCX
55 * sc->sc_inb # of incoming bytes after decompression
56 * sc->sc_outb # of outgoing bytes before compression
58 *---------------------------------------------------------------------------*/
60 #include "use_i4bipr.h"
64 #if defined(__DragonFly__) || defined(__FreeBSD__)
68 #include <sys/param.h>
69 #include <sys/systm.h>
71 #include <sys/socket.h>
72 #include <sys/errno.h>
74 #if defined(__DragonFly__) || defined(__FreeBSD__)
75 #include <sys/ioccom.h>
76 #include <sys/sockio.h>
78 #include <sys/malloc.h>
81 #include <sys/ioctl.h>
84 #if defined(__NetBSD__) && __NetBSD_Version__ >= 104230000
85 #include <sys/callout.h>
88 #include <sys/kernel.h>
91 #include <net/if_types.h>
92 #include <net/netisr.h>
94 #include <netinet/in.h>
95 #include <netinet/in_systm.h>
96 #include <netinet/in_var.h>
97 #include <netinet/ip.h>
100 #include <net/slcompress.h>
101 #define IPR_COMPRESS IFF_LINK0 /* compress TCP traffic */
102 #define IPR_AUTOCOMP IFF_LINK1 /* auto-enable TCP compression */
104 /*---------------------------------------------------------------------------
105 * NOTICE: using NO separate buffer relies on the assumption, that the HSCX
106 * IRQ handler _always_ allocates a single, continuous mbuf cluster large
107 * enough to hold the maximum MTU size if the ipr interface !
109 * CAUTION: i have re-defined IPR_VJ_USEBUFFER because it makes problems
110 * with 2 i4b's back to back running cvs over ssh, cvs simply
111 * aborts because it gets bad data. Everything else (telnet/ftp?etc)
113 *---------------------------------------------------------------------------*/
114 #define IPR_VJ_USEBUFFER /* define to use an allocated separate buffer*/
115 /* undef to uncompress in the mbuf itself */
118 #if defined(__DragonFly__) || (defined(__FreeBSD_version) && __FreeBSD_version >= 400008)
121 #include "bpfilter.h"
124 #if NBPFILTER > 0 || NBPF > 0
125 #include <sys/time.h>
129 #if defined(__DragonFly__) || defined(__FreeBSD__)
130 #include <net/i4b/include/machine/i4b_debug.h>
131 #include <net/i4b/include/machine/i4b_ioctl.h>
133 #include <i4b/i4b_debug.h>
134 #include <i4b/i4b_ioctl.h>
137 #include "../include/i4b_global.h"
138 #include "../include/i4b_l3l4.h"
140 #include "../layer4/i4b_l4.h"
142 #if !defined(__DragonFly__) || !defined(__FreeBSD__)
143 #include <machine/cpu.h> /* For softnet */
146 #if defined(__FreeBSD__) && !defined(__DragonFly__)
147 #define IPR_FMT "ipr%d: "
148 #define IPR_ARG(sc) ((sc)->sc_if.if_unit)
149 #define PDEVSTATIC static
150 #elif defined(__bsdi__)
151 #define IPR_FMT "ipr%d: "
152 #define IPR_ARG(sc) ((sc)->sc_if.if_unit)
153 #define PDEVSTATIC /* not static */
155 #define IPR_FMT "%s: "
156 #define IPR_ARG(sc) ((sc)->sc_if.if_xname)
157 #define PDEVSTATIC /* not static */
160 #define I4BIPRMTU 1500 /* regular MTU */
161 #define I4BIPRMAXMTU 2000 /* max MTU */
162 #define I4BIPRMINMTU 500 /* min MTU */
164 #define I4BIPRMAXQLEN 50 /* max queue length */
166 #define I4BIPRACCT 1 /* enable accounting messages */
167 #define I4BIPRACCTINTVL 2 /* accounting msg interval in secs */
168 #define I4BIPRADJFRXP 1 /* adjust 1st rxd packet */
170 /* initialized by L4 */
172 static drvr_link_t ipr_drvr_linktab[NI4BIPR];
173 static isdn_link_t *isdn_linktab[NI4BIPR];
176 struct ifnet sc_if; /* network-visible interface */
177 int sc_state; /* state of the interface */
179 #if !defined(__FreeBSD__) || defined(__DragonFly__)
180 int sc_unit; /* unit number for Net/OpenBSD */
183 call_desc_t *sc_cdp; /* ptr to call descriptor */
184 int sc_updown; /* soft state of interface */
185 struct ifqueue sc_fastq; /* interactive traffic */
186 int sc_dialresp; /* dialresponse */
187 int sc_lastdialresp;/* last dialresponse */
190 int sc_iinb; /* isdn driver # of inbytes */
191 int sc_ioutb; /* isdn driver # of outbytes */
192 int sc_inb; /* # of bytes rx'd */
193 int sc_outb; /* # of bytes tx'd */
194 int sc_linb; /* last # of bytes rx'd */
195 int sc_loutb; /* last # of bytes tx'd */
196 int sc_fn; /* flag, first null acct */
199 struct callout sc_timeout;
202 int sc_first_pkt; /* flag, first rxd packet */
205 int sc_log_first; /* log first n packets */
209 struct slcompress sc_compr; /* tcp compression data */
210 #ifdef IPR_VJ_USEBUFFER
211 u_char *sc_cbuf; /* tcp decompression buffer */
215 } ipr_softc[NI4BIPR];
218 ST_IDLE, /* initialized, ready, idle */
219 ST_DIALING, /* dialling out to remote */
220 ST_CONNECTED_W, /* connected to remote */
221 ST_CONNECTED_A, /* connected to remote */
224 #if (defined(__FreeBSD__) && !defined(__DragonFly__)) || (defined(__bsdi__))
225 #define THE_UNIT sc->sc_if.if_unit
227 #define THE_UNIT sc->sc_unit
230 #if defined(__DragonFly__) || defined __FreeBSD__ || defined __NetBSD__
231 # define IOCTL_CMD_T u_long
233 # define IOCTL_CMD_T int
236 #if defined(__DragonFly__) || defined(__FreeBSD__)
237 PDEVSTATIC void i4biprattach(void *);
238 PSEUDO_SET(i4biprattach, i4b_ipr);
239 static int i4biprioctl(struct ifnet *ifp, IOCTL_CMD_T cmd, caddr_t data,
242 PDEVSTATIC void i4biprattach (void);
243 static int i4biprioctl(struct ifnet *ifp, u_long cmd, caddr_t data);
247 static int iprwatchdog(int unit);
249 static void iprwatchdog(struct ifnet *ifp);
251 static void ipr_init_linktab(int unit);
252 static void ipr_tx_queue_empty(int unit);
253 static int i4biproutput(struct ifnet *ifp, struct mbuf *m, struct sockaddr *dst, struct rtentry *rtp);
254 static void iprclearqueues(struct ipr_softc *sc);
256 /*===========================================================================*
257 * DEVICE DRIVER ROUTINES
258 *===========================================================================*/
260 /*---------------------------------------------------------------------------*
261 * interface attach routine at kernel boot time
262 *---------------------------------------------------------------------------*/
264 #if defined(__DragonFly__) || defined(__FreeBSD__)
265 i4biprattach(void *dummy)
270 struct ipr_softc *sc = ipr_softc;
274 printf("i4bipr: %d IP over raw HDLC ISDN device(s) attached (VJ header compression)\n", NI4BIPR);
276 printf("i4bipr: %d IP over raw HDLC ISDN device(s) attached\n", NI4BIPR);
279 for(i=0; i < NI4BIPR; sc++, i++)
283 NDBGL4(L4_DIALST, "setting dial state to ST_IDLE");
285 sc->sc_state = ST_IDLE;
288 if_initname(&(sc->sc_if), "ipr", i);
289 #elif defined(__FreeBSD__)
290 sc->sc_if.if_name = "ipr";
291 sc->sc_if.if_unit = i;
292 #elif defined(__bsdi__)
293 sc->sc_if.if_name = "ipr";
294 sc->sc_if.if_unit = i;
296 sprintf(sc->sc_if.if_xname, "ipr%d", i);
297 sc->sc_if.if_softc = sc;
302 sc->sc_if.if_flags = IFF_POINTOPOINT | IFF_SIMPLEX | IPR_AUTOCOMP;
304 sc->sc_if.if_flags = IFF_POINTOPOINT | IFF_SIMPLEX;
307 callout_init(&sc->sc_timeout);
309 sc->sc_if.if_mtu = I4BIPRMTU;
310 sc->sc_if.if_type = IFT_ISDNBASIC;
311 sc->sc_if.if_ioctl = i4biprioctl;
312 sc->sc_if.if_output = i4biproutput;
314 sc->sc_if.if_snd.ifq_maxlen = I4BIPRMAXQLEN;
315 sc->sc_fastq.ifq_maxlen = I4BIPRMAXQLEN;
317 #if defined (__FreeBSD__) && __FreeBSD__ > 4
318 mtx_init(&sc->sc_fastq.ifq_mtx, "i4b_ipr_fastq", MTX_DEF);
320 sc->sc_if.if_ipackets = 0;
321 sc->sc_if.if_ierrors = 0;
322 sc->sc_if.if_opackets = 0;
323 sc->sc_if.if_oerrors = 0;
324 sc->sc_if.if_collisions = 0;
325 sc->sc_if.if_ibytes = 0;
326 sc->sc_if.if_obytes = 0;
327 sc->sc_if.if_imcasts = 0;
328 sc->sc_if.if_omcasts = 0;
329 sc->sc_if.if_iqdrops = 0;
330 sc->sc_if.if_noproto = 0;
333 sc->sc_if.if_timer = 0;
334 sc->sc_if.if_watchdog = iprwatchdog;
344 sc->sc_log_first = IPR_LOG;
348 #if defined(__DragonFly__) || defined(__FreeBSD__)
349 sl_compress_init(&sc->sc_compr, -1);
351 sl_compress_init(&sc->sc_compr);
354 #ifdef IPR_VJ_USEBUFFER
356 (u_char *)malloc(I4BIPRMAXMTU+128, M_DEVBUF, M_WAITOK))))
358 panic("if_ipr.c, ipr_attach: VJ malloc failed");
362 sc->sc_updown = SOFT_ENA; /* soft enabled */
363 sc->sc_dialresp = DSTAT_NONE; /* no response */
364 sc->sc_lastdialresp = DSTAT_NONE;
366 if_attach(&sc->sc_if);
368 #if NBPFILTER > 0 || NBPF > 0
369 #if defined(__DragonFly__) || defined(__FreeBSD__)
370 bpfattach(&sc->sc_if, DLT_NULL, sizeof(u_int));
372 bpfattach(&sc->sc_if.if_bpf, &sc->sc_if, DLT_NULL, sizeof(u_int));
378 /*---------------------------------------------------------------------------*
379 * output a packet to the ISDN B-channel
380 *---------------------------------------------------------------------------*/
382 i4biproutput(struct ifnet *ifp, struct mbuf *m, struct sockaddr *dst,
385 struct ipr_softc *sc;
393 #if (defined(__FreeBSD__) && !defined(__DragonFly__)) || (defined(__bsdi__))
395 sc = &ipr_softc[unit];
403 if(dst->sa_family != AF_INET)
405 printf(IPR_FMT "af%d not supported\n", IPR_ARG(sc), dst->sa_family);
408 sc->sc_if.if_noproto++;
409 sc->sc_if.if_oerrors++;
410 return(EAFNOSUPPORT);
413 /* check interface state = UP */
415 if(!(ifp->if_flags & IFF_UP))
417 NDBGL4(L4_IPRDBG, "ipr%d: interface is DOWN!", unit);
420 sc->sc_if.if_oerrors++;
424 /* dial if necessary */
426 if(sc->sc_state == ST_IDLE || sc->sc_state == ST_DIALING)
430 switch(sc->sc_dialresp)
432 case DSTAT_TFAIL: /* transient failure */
433 NDBGL4(L4_IPRDBG, "ipr%d: transient dial failure!", unit);
436 sc->sc_dialresp = DSTAT_NONE;
438 sc->sc_if.if_oerrors++;
442 case DSTAT_PFAIL: /* permanent failure */
443 NDBGL4(L4_IPRDBG, "ipr%d: permanent dial failure!", unit);
446 sc->sc_dialresp = DSTAT_NONE;
448 sc->sc_if.if_oerrors++;
449 return(EHOSTUNREACH);
452 case DSTAT_INONLY: /* no dialout allowed*/
453 NDBGL4(L4_IPRDBG, "ipr%d: dialout not allowed failure!", unit);
456 sc->sc_dialresp = DSTAT_NONE;
458 sc->sc_if.if_oerrors++;
459 return(EHOSTUNREACH);
464 NDBGL4(L4_IPRDBG, "ipr%d: send dial request message!", unit);
465 NDBGL4(L4_DIALST, "ipr%d: setting dial state to ST_DIALING", unit);
466 i4b_l4_dialout(BDRV_IPR, unit);
467 sc->sc_state = ST_DIALING;
471 if(sc->sc_log_first > 0)
473 --(sc->sc_log_first);
474 i4b_l4_packet_ind(BDRV_IPR, unit, 1, m );
478 /* update access time */
480 microtime(&sc->sc_if.if_lastchange);
483 * check, if type of service indicates interactive, i.e. telnet,
484 * traffic. in case it is interactive, put it into the fast queue,
485 * else (i.e. ftp traffic) put it into the "normal" queue
488 ip = mtod(m, struct ip *); /* get ptr to ip header */
490 if(ip->ip_tos & IPTOS_LOWDELAY)
493 ifq = &sc->sc_if.if_snd;
495 /* check for space in choosen send queue */
497 #if defined(__DragonFly__) || defined (__FreeBSD__)
498 if (netisr_queue(NETISR_IP, m))
500 NDBGL4(L4_IPRDBG, "ipr%d: send queue full!", unit);
502 sc->sc_if.if_oerrors++;
507 NDBGL4(L4_IPRDBG, "ipr%d: add packet to send queue!", unit);
509 ipr_tx_queue_empty(unit);
516 /*---------------------------------------------------------------------------*
518 *---------------------------------------------------------------------------*/
519 #if defined(__DragonFly__) || defined(__FreeBSD__)
521 i4biprioctl(struct ifnet *ifp, IOCTL_CMD_T cmd, caddr_t data, struct ucred *cr)
524 i4biprioctl(struct ifnet *ifp, u_long cmd, caddr_t data)
527 #if (defined(__FreeBSD__) && !defined(__DragonFly__)) || (defined(__bsdi__))
528 struct ipr_softc *sc = &ipr_softc[ifp->if_unit];
530 struct ipr_softc *sc = ifp->if_softc;
533 struct ifreq *ifr = (struct ifreq *)data;
534 struct ifaddr *ifa = (struct ifaddr *)data;
542 case SIOCAIFADDR: /* add interface address */
543 case SIOCSIFADDR: /* set interface address */
544 case SIOCSIFDSTADDR: /* set interface destination address */
545 if(ifa->ifa_addr->sa_family != AF_INET)
546 error = EAFNOSUPPORT;
548 sc->sc_if.if_flags |= IFF_UP;
549 microtime(&sc->sc_if.if_lastchange);
552 case SIOCSIFFLAGS: /* set interface flags */
553 if(!(ifr->ifr_flags & IFF_UP))
555 if(sc->sc_if.if_flags & IFF_RUNNING)
557 /* disconnect ISDN line */
558 #if (defined(__FreeBSD__) && !defined(__DragonFly__)) || (defined(__bsdi__))
559 i4b_l4_drvrdisc(BDRV_IPR, ifp->if_unit);
561 i4b_l4_drvrdisc(BDRV_IPR, sc->sc_unit);
563 sc->sc_if.if_flags &= ~IFF_RUNNING;
566 sc->sc_state = ST_IDLE;
573 if(ifr->ifr_flags & IFF_DEBUG)
575 /* enable debug messages */
578 microtime(&sc->sc_if.if_lastchange);
581 #if !defined(__OpenBSD__)
582 case SIOCSIFMTU: /* set interface MTU */
583 if(ifr->ifr_mtu > I4BIPRMAXMTU)
585 else if(ifr->ifr_mtu < I4BIPRMINMTU)
589 ifp->if_mtu = ifr->ifr_mtu;
590 microtime(&sc->sc_if.if_lastchange);
593 #endif /* __OPENBSD__ */
596 /* not needed for FreeBSD, done in sl_compress_init() (-hm) */
598 /* need to add an ioctl: set VJ max slot ID
599 * #define IPRIOCSMAXCID _IOW('I', XXX, int)
604 struct thread *td = curthread; /* XXX */
606 if ((error = suser(td)) != 0)
608 sl_compress_setup(sc->sc_compr, *(int *)data);
623 /*---------------------------------------------------------------------------*
624 * clear the interface's send queues
625 *---------------------------------------------------------------------------*/
627 iprclearqueues(struct ipr_softc *sc)
631 #if defined (__FreeBSD__) && __FreeBSD__ > 4
633 IF_DRAIN(&sc->sc_fastq);
634 IF_DRAIN(&sc->sc_if.if_snd);
642 IF_DEQUEUE(&sc->sc_fastq, m);
653 IF_DEQUEUE(&sc->sc_if.if_snd, m);
664 /*---------------------------------------------------------------------------*
666 *---------------------------------------------------------------------------*/
669 iprwatchdog(int unit)
673 iprwatchdog(struct ifnet *ifp)
676 #if defined(__FreeBSD__) && !defined(__DragonFly__)
677 int unit = ifp->if_unit;
678 struct ipr_softc *sc = &ipr_softc[unit];
679 #elif defined(__bsdi__)
680 struct ipr_softc *sc = &ipr_softc[unit];
681 struct ifnet *ifp = &ipr_softc[unit].sc_if;
683 struct ipr_softc *sc = ifp->if_softc;
684 int unit = sc->sc_unit;
686 bchan_statistics_t bs;
688 /* get # of bytes in and out from the HSCX driver */
690 (*isdn_linktab[unit]->bch_stat)
691 (isdn_linktab[unit]->unit, isdn_linktab[unit]->channel, &bs);
693 sc->sc_ioutb += bs.outbytes;
694 sc->sc_iinb += bs.inbytes;
696 if((sc->sc_iinb != sc->sc_linb) || (sc->sc_ioutb != sc->sc_loutb) || sc->sc_fn)
698 int ri = (sc->sc_iinb - sc->sc_linb)/I4BIPRACCTINTVL;
699 int ro = (sc->sc_ioutb - sc->sc_loutb)/I4BIPRACCTINTVL;
701 if((sc->sc_iinb == sc->sc_linb) && (sc->sc_ioutb == sc->sc_loutb))
706 sc->sc_linb = sc->sc_iinb;
707 sc->sc_loutb = sc->sc_ioutb;
709 i4b_l4_accounting(BDRV_IPR, unit, ACCT_DURING,
710 sc->sc_ioutb, sc->sc_iinb, ro, ri, sc->sc_outb, sc->sc_inb);
712 sc->sc_if.if_timer = I4BIPRACCTINTVL;
717 #endif /* I4BIPRACCT */
719 /*===========================================================================*
720 * ISDN INTERFACE ROUTINES
721 *===========================================================================*/
723 /*---------------------------------------------------------------------------*
724 * start transmitting after connect
725 *---------------------------------------------------------------------------*/
727 i4bipr_connect_startio(struct ipr_softc *sc)
731 if(sc->sc_state == ST_CONNECTED_W)
733 sc->sc_state = ST_CONNECTED_A;
734 ipr_tx_queue_empty(THE_UNIT);
740 /*---------------------------------------------------------------------------*
741 * this routine is called from L4 handler at connect time
742 *---------------------------------------------------------------------------*/
744 ipr_connect(int unit, void *cdp)
746 struct ipr_softc *sc = &ipr_softc[unit];
749 sc->sc_cdp = (call_desc_t *)cdp;
753 NDBGL4(L4_DIALST, "ipr%d: setting dial state to ST_CONNECTED", unit);
755 sc->sc_if.if_flags |= IFF_RUNNING;
756 sc->sc_state = ST_CONNECTED_W;
758 sc->sc_dialresp = DSTAT_NONE;
759 sc->sc_lastdialresp = DSTAT_NONE;
768 sc->sc_if.if_timer = I4BIPRACCTINTVL;
772 sc->sc_first_pkt = 1;
776 * Sometimes ISDN B-channels are switched thru asymmetic. This
777 * means that under such circumstances B-channel data (the first
778 * three packets of a TCP connection in my case) may get lost,
779 * causing a large delay until the connection is started.
780 * When the sending of the very first packet of a TCP connection
781 * is delayed for a to be empirically determined delay (close
782 * to a second in my case) those packets go thru and the TCP
783 * connection comes up "almost" immediately (-hm).
786 if(sc->sc_cdp->isdntxdelay > 0)
791 delay = sc->sc_cdp->isdntxdelay; /* avoid any rounding */
793 delay = sc->sc_cdp->isdntxdelay*hz;
797 callout_reset(&sc->sc_timeout, delay,
798 (TIMEOUT_FUNC_T)i4bipr_connect_startio, sc);
802 sc->sc_state = ST_CONNECTED_A;
803 ipr_tx_queue_empty(unit);
808 /* we don't need any negotiation - pass event back right now */
809 i4b_l4_negcomplete(sc->sc_cdp);
812 /*---------------------------------------------------------------------------*
813 * this routine is called from L4 handler at disconnect time
814 *---------------------------------------------------------------------------*/
816 ipr_disconnect(int unit, void *cdp)
818 call_desc_t *cd = (call_desc_t *)cdp;
819 struct ipr_softc *sc = &ipr_softc[unit];
821 /* new stuff to check that the active channel is being closed */
823 if (cd != sc->sc_cdp)
825 NDBGL4(L4_IPRDBG, "ipr%d: channel %d not active",
826 cd->driver_unit, cd->channelid);
831 sc->sc_if.if_timer = 0;
834 /* show next IPR_LOG packets again */
835 sc->sc_log_first = IPR_LOG;
838 i4b_l4_accounting(BDRV_IPR, cd->driver_unit, ACCT_FINAL,
839 sc->sc_ioutb, sc->sc_iinb, 0, 0, sc->sc_outb, sc->sc_inb);
841 sc->sc_cdp = (call_desc_t *)0;
843 NDBGL4(L4_DIALST, "setting dial state to ST_IDLE");
845 sc->sc_dialresp = DSTAT_NONE;
846 sc->sc_lastdialresp = DSTAT_NONE;
848 sc->sc_if.if_flags &= ~IFF_RUNNING;
849 sc->sc_state = ST_IDLE;
852 /*---------------------------------------------------------------------------*
853 * this routine is used to give a feedback from userland daemon
854 * in case of dial problems
855 *---------------------------------------------------------------------------*/
857 ipr_dialresponse(int unit, int status, cause_t cause)
859 struct ipr_softc *sc = &ipr_softc[unit];
860 sc->sc_dialresp = status;
862 NDBGL4(L4_IPRDBG, "ipr%d: last=%d, this=%d",
863 unit, sc->sc_lastdialresp, sc->sc_dialresp);
865 if(status != DSTAT_NONE)
867 NDBGL4(L4_IPRDBG, "ipr%d: clearing queues", unit);
872 /*---------------------------------------------------------------------------*
873 * interface soft up/down
874 *---------------------------------------------------------------------------*/
876 ipr_updown(int unit, int updown)
878 struct ipr_softc *sc = &ipr_softc[unit];
879 sc->sc_updown = updown;
882 /*---------------------------------------------------------------------------*
883 * this routine is called from the HSCX interrupt handler
884 * when a new frame (mbuf) has been received and was put on
885 * the rx queue. It is assumed that this routines runs at
886 * pri level splimp() ! Keep it short !
887 *---------------------------------------------------------------------------*/
889 ipr_rx_data_rdy(int unit)
891 struct ipr_softc *sc = &ipr_softc[unit];
894 #ifdef IPR_VJ_USEBUFFER
895 u_char *cp = sc->sc_cbuf;
900 if((m = *isdn_linktab[unit]->rx_mbuf) == NULL)
903 m->m_pkthdr.rcvif = &sc->sc_if;
905 m->m_pkthdr.len = m->m_len;
907 microtime(&sc->sc_if.if_lastchange);
912 * The very first packet after the B channel is switched thru
913 * has very often several bytes of random data prepended. This
914 * routine looks where the IP header starts and removes the
920 unsigned char *mp = m->m_data;
923 sc->sc_first_pkt = 0;
925 for(i = 0; i < m->m_len; i++, mp++)
927 if( ((*mp & 0xf0) == 0x40) &&
928 ((*mp & 0x0f) >= 0x05) )
931 m->m_pkthdr.len -= i;
938 sc->sc_if.if_ipackets++;
939 sc->sc_if.if_ibytes += m->m_pkthdr.len;
942 if((c = (*(mtod(m, u_char *)) & 0xf0)) != (IPVERSION << 4))
944 /* copy data to buffer */
948 #ifdef IPR_VJ_USEBUFFER
949 /* XXX */ m_copydata(m, 0, len, cp);
954 c = TYPE_COMPRESSED_TCP;
956 else if(c == TYPE_UNCOMPRESSED_TCP)
958 #ifdef IPR_VJ_USEBUFFER
959 *cp &= 0x4f; /* XXX */
961 *(mtod(m, u_char *)) &= 0x4f;
966 * We've got something that's not an IP packet.
967 * If compression is enabled, try to decompress it.
968 * Otherwise, if `auto-enable' compression is on and
969 * it's a reasonable packet, decompress it and then
970 * enable compression. Otherwise, drop it.
972 if(sc->sc_if.if_flags & IPR_COMPRESS)
974 #ifdef IPR_VJ_USEBUFFER
975 len = sl_uncompress_tcp(&cp,len,(u_int)c,&sc->sc_compr);
977 len = sl_uncompress_tcp((u_char **)&m->m_data, len,
978 (u_int)c, &sc->sc_compr);
984 printf("i4b_ipr, ipr_rx_data_rdy: len <= 0 IPR_COMPRESS!\n");
989 else if((sc->sc_if.if_flags & IPR_AUTOCOMP) &&
990 (c == TYPE_UNCOMPRESSED_TCP) && (len >= 40))
992 #ifdef IPR_VJ_USEBUFFER
993 len = sl_uncompress_tcp(&cp,len,(u_int)c,&sc->sc_compr);
995 len = sl_uncompress_tcp((u_char **)&m->m_data, len,
996 (u_int)c, &sc->sc_compr);
1002 printf("i4b_ipr, ipr_rx_data_rdy: len <= 0 IPR_AUTOCOMP!\n");
1007 sc->sc_if.if_flags |= IPR_COMPRESS;
1012 printf("i4b_ipr, ipr_input: invalid ip packet!\n");
1016 sc->sc_if.if_ierrors++;
1017 sc->sc_if.if_collisions++;
1021 #ifdef IPR_VJ_USEBUFFER
1022 /* XXX */ m_copyback(m, 0, len, cp);
1024 m->m_len = m->m_pkthdr.len = len;
1030 /* NB. do the accounting after decompression! */
1031 sc->sc_inb += m->m_pkthdr.len;
1034 if(sc->sc_log_first > 0)
1036 --(sc->sc_log_first);
1037 i4b_l4_packet_ind(BDRV_IPR, unit, 0, m );
1041 #if NBPFILTER > 0 || NBPF > 0
1042 if(sc->sc_if.if_bpf)
1044 /* prepend the address family as a four byte field */
1049 mm.m_data = (char *)⁡
1051 #if defined(__DragonFly__) || defined(__FreeBSD__)
1052 bpf_mtap(&sc->sc_if, &mm);
1054 bpf_mtap(sc->sc_if.if_bpf, &mm);
1057 #endif /* NBPFILTER > 0 || NBPF > 0 */
1059 #if defined(__DragonFly__) || defined (__FreeBSD__)
1060 if (netisr_queue(NETISR_IP, m)) {
1061 NDBGL4(L4_IPRDBG, "ipr%d: ipintrq full!", unit);
1062 sc->sc_if.if_ierrors++;
1063 sc->sc_if.if_iqdrops++;
1068 /*---------------------------------------------------------------------------*
1069 * this routine is called from the HSCX interrupt handler
1070 * when the last frame has been sent out and there is no
1071 * further frame (mbuf) in the tx queue.
1072 *---------------------------------------------------------------------------*/
1074 ipr_tx_queue_empty(int unit)
1076 struct ipr_softc *sc = &ipr_softc[unit];
1083 if(sc->sc_state != ST_CONNECTED_A)
1088 IF_DEQUEUE(&sc->sc_fastq, m);
1091 sc->sc_if.if_omcasts++;
1095 IF_DEQUEUE(&sc->sc_if.if_snd, m);
1100 microtime(&sc->sc_if.if_lastchange);
1102 #if NBPFILTER > 0 || NBPF > 0
1103 if(sc->sc_if.if_bpf)
1105 /* prepend the address family as a four byte field */
1111 mm.m_data = (char *)⁡
1113 #if defined(__DragonFly__) || defined(__FreeBSD__)
1114 bpf_mtap(&sc->sc_if, &mm);
1116 bpf_mtap(sc->sc_if.if_bpf, &mm);
1119 #endif /* NBPFILTER */
1122 sc->sc_outb += m->m_pkthdr.len; /* size before compression */
1126 if((ip = mtod(m, struct ip *))->ip_p == IPPROTO_TCP)
1128 if(sc->sc_if.if_flags & IPR_COMPRESS)
1130 *mtod(m, u_char *) |= sl_compress_tcp(m, ip,
1137 IF_LOCK(isdn_linktab[unit]->tx_queue);
1138 if(_IF_QFULL(isdn_linktab[unit]->tx_queue))
1140 NDBGL4(L4_IPRDBG, "ipr%d: tx queue full!", unit);
1145 sc->sc_if.if_obytes += m->m_pkthdr.len;
1147 sc->sc_if.if_opackets++;
1149 _IF_ENQUEUE(isdn_linktab[unit]->tx_queue, m);
1152 IF_UNLOCK(isdn_linktab[unit]->tx_queue);
1156 (*isdn_linktab[unit]->bch_tx_start)(isdn_linktab[unit]->unit, isdn_linktab[unit]->channel);
1159 /*---------------------------------------------------------------------------*
1160 * this routine is called from the HSCX interrupt handler
1161 * each time a packet is received or transmitted. It should
1162 * be used to implement an activity timeout mechanism.
1163 *---------------------------------------------------------------------------*/
1165 ipr_activity(int unit, int rxtx)
1167 ipr_softc[unit].sc_cdp->last_active_time = SECOND;
1170 /*---------------------------------------------------------------------------*
1171 * return this drivers linktab address
1172 *---------------------------------------------------------------------------*/
1174 ipr_ret_linktab(int unit)
1176 return(&ipr_drvr_linktab[unit]);
1179 /*---------------------------------------------------------------------------*
1180 * setup the isdn_linktab for this driver
1181 *---------------------------------------------------------------------------*/
1183 ipr_set_linktab(int unit, isdn_link_t *ilt)
1185 isdn_linktab[unit] = ilt;
1188 /*---------------------------------------------------------------------------*
1189 * initialize this drivers linktab
1190 *---------------------------------------------------------------------------*/
1192 ipr_init_linktab(int unit)
1194 ipr_drvr_linktab[unit].unit = unit;
1195 ipr_drvr_linktab[unit].bch_rx_data_ready = ipr_rx_data_rdy;
1196 ipr_drvr_linktab[unit].bch_tx_queue_empty = ipr_tx_queue_empty;
1197 ipr_drvr_linktab[unit].bch_activity = ipr_activity;
1198 ipr_drvr_linktab[unit].line_connected = ipr_connect;
1199 ipr_drvr_linktab[unit].line_disconnected = ipr_disconnect;
1200 ipr_drvr_linktab[unit].dial_response = ipr_dialresponse;
1201 ipr_drvr_linktab[unit].updown_ind = ipr_updown;
1204 /*===========================================================================*/
1206 #endif /* NI4BIPR > 0 */