Home | History | Annotate | Line # | Download | only in net
if_sl.c revision 1.83.2.5
      1  1.83.2.5     skrll /*	$NetBSD: if_sl.c,v 1.83.2.5 2004/12/18 09:32:50 skrll Exp $	*/
      2      1.29       cgd 
      3       1.1       cgd /*
      4      1.28   mycroft  * Copyright (c) 1987, 1989, 1992, 1993
      5      1.28   mycroft  *	The Regents of the University of California.  All rights reserved.
      6       1.1       cgd  *
      7       1.1       cgd  * Redistribution and use in source and binary forms, with or without
      8       1.1       cgd  * modification, are permitted provided that the following conditions
      9       1.1       cgd  * are met:
     10       1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     11       1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     12       1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13       1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     14       1.1       cgd  *    documentation and/or other materials provided with the distribution.
     15  1.83.2.1     skrll  * 3. Neither the name of the University nor the names of its contributors
     16       1.1       cgd  *    may be used to endorse or promote products derived from this software
     17       1.1       cgd  *    without specific prior written permission.
     18       1.1       cgd  *
     19       1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20       1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21       1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22       1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23       1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24       1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25       1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26       1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27       1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28       1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29       1.1       cgd  * SUCH DAMAGE.
     30       1.1       cgd  *
     31      1.47      fvdl  *	@(#)if_sl.c	8.9 (Berkeley) 1/9/95
     32       1.1       cgd  */
     33       1.1       cgd 
     34       1.1       cgd /*
     35       1.1       cgd  * Serial Line interface
     36       1.1       cgd  *
     37       1.1       cgd  * Rick Adams
     38       1.1       cgd  * Center for Seismic Studies
     39       1.1       cgd  * 1300 N 17th Street, Suite 1450
     40       1.1       cgd  * Arlington, Virginia 22209
     41       1.1       cgd  * (703)276-7900
     42       1.1       cgd  * rick (at) seismo.ARPA
     43       1.1       cgd  * seismo!rick
     44       1.1       cgd  *
     45       1.1       cgd  * Pounded on heavily by Chris Torek (chris (at) mimsy.umd.edu, umcp-cs!chris).
     46       1.1       cgd  * N.B.: this belongs in netinet, not net, the way it stands now.
     47       1.1       cgd  * Should have a link-layer type designation, but wouldn't be
     48       1.1       cgd  * backwards-compatible.
     49       1.1       cgd  *
     50       1.1       cgd  * Converted to 4.3BSD Beta by Chris Torek.
     51       1.1       cgd  * Other changes made at Berkeley, based in part on code by Kirk Smith.
     52       1.1       cgd  * W. Jolitz added slip abort.
     53       1.1       cgd  *
     54       1.1       cgd  * Hacked almost beyond recognition by Van Jacobson (van (at) helios.ee.lbl.gov).
     55       1.1       cgd  * Added priority queuing for "interactive" traffic; hooks for TCP
     56       1.1       cgd  * header compression; ICMP filtering (at 2400 baud, some cretin
     57       1.1       cgd  * pinging you can use up all your bandwidth).  Made low clist behavior
     58       1.1       cgd  * more robust and slightly less likely to hang serial line.
     59       1.1       cgd  * Sped up a bunch of things.
     60       1.1       cgd  */
     61      1.78     lukem 
     62      1.78     lukem #include <sys/cdefs.h>
     63  1.83.2.5     skrll __KERNEL_RCSID(0, "$NetBSD: if_sl.c,v 1.83.2.5 2004/12/18 09:32:50 skrll Exp $");
     64       1.1       cgd 
     65      1.50  jonathan #include "opt_inet.h"
     66      1.22       cgd #include "bpfilter.h"
     67      1.22       cgd 
     68      1.20   mycroft #include <sys/param.h>
     69      1.20   mycroft #include <sys/proc.h>
     70      1.45   thorpej #include <sys/malloc.h>
     71      1.20   mycroft #include <sys/mbuf.h>
     72      1.20   mycroft #include <sys/buf.h>
     73      1.20   mycroft #include <sys/dkstat.h>
     74      1.20   mycroft #include <sys/socket.h>
     75      1.20   mycroft #include <sys/ioctl.h>
     76      1.20   mycroft #include <sys/file.h>
     77      1.59     itohy #include <sys/conf.h>
     78      1.20   mycroft #include <sys/tty.h>
     79      1.20   mycroft #include <sys/kernel.h>
     80      1.38  christos #if __NetBSD__
     81      1.38  christos #include <sys/systm.h>
     82      1.38  christos #endif
     83      1.20   mycroft 
     84      1.22       cgd #include <machine/cpu.h>
     85      1.71   thorpej #include <machine/intr.h>
     86      1.22       cgd 
     87      1.20   mycroft #include <net/if.h>
     88      1.20   mycroft #include <net/if_types.h>
     89      1.20   mycroft #include <net/netisr.h>
     90      1.20   mycroft #include <net/route.h>
     91       1.1       cgd 
     92      1.51       jtk #ifdef INET
     93      1.20   mycroft #include <netinet/in.h>
     94      1.20   mycroft #include <netinet/in_systm.h>
     95      1.20   mycroft #include <netinet/in_var.h>
     96      1.20   mycroft #include <netinet/ip.h>
     97       1.1       cgd #endif
     98       1.1       cgd 
     99      1.20   mycroft #include <net/slcompress.h>
    100      1.20   mycroft #include <net/if_slvar.h>
    101      1.26       cgd #include <net/slip.h>
    102       1.3       cgd 
    103       1.3       cgd #if NBPFILTER > 0
    104       1.3       cgd #include <sys/time.h>
    105       1.3       cgd #include <net/bpf.h>
    106       1.3       cgd #endif
    107       1.1       cgd 
    108       1.1       cgd /*
    109       1.1       cgd  * SLMAX is a hard limit on input packet size.  To simplify the code
    110       1.1       cgd  * and improve performance, we require that packets fit in an mbuf
    111       1.1       cgd  * cluster, and if we get a compressed packet, there's enough extra
    112       1.1       cgd  * room to expand the header into a max length tcp/ip header (128
    113       1.1       cgd  * bytes).  So, SLMAX can be at most
    114       1.1       cgd  *	MCLBYTES - 128
    115       1.1       cgd  *
    116       1.1       cgd  * SLMTU is a hard limit on output packet size.  To insure good
    117       1.1       cgd  * interactive response, SLMTU wants to be the smallest size that
    118       1.1       cgd  * amortizes the header cost.  (Remember that even with
    119       1.1       cgd  * type-of-service queuing, we have to wait for any in-progress
    120       1.1       cgd  * packet to finish.  I.e., we wait, on the average, 1/2 * mtu /
    121       1.1       cgd  * cps, where cps is the line speed in characters per second.
    122       1.1       cgd  * E.g., 533ms wait for a 1024 byte MTU on a 9600 baud line.  The
    123       1.1       cgd  * average compressed header size is 6-8 bytes so any MTU > 90
    124       1.1       cgd  * bytes will give us 90% of the line bandwidth.  A 100ms wait is
    125       1.1       cgd  * tolerable (500ms is not), so want an MTU around 296.  (Since TCP
    126       1.1       cgd  * will send 256 byte segments (to allow for 40 byte headers), the
    127       1.1       cgd  * typical packet size on the wire will be around 260 bytes).  In
    128       1.1       cgd  * 4.3tahoe+ systems, we can set an MTU in a route so we do that &
    129       1.1       cgd  * leave the interface MTU relatively high (so we don't IP fragment
    130       1.1       cgd  * when acting as a gateway to someone using a stupid MTU).
    131       1.1       cgd  *
    132       1.1       cgd  * Similar considerations apply to SLIP_HIWAT:  It's the amount of
    133       1.1       cgd  * data that will be queued 'downstream' of us (i.e., in clists
    134       1.1       cgd  * waiting to be picked up by the tty output interrupt).  If we
    135       1.1       cgd  * queue a lot of data downstream, it's immune to our t.o.s. queuing.
    136       1.1       cgd  * E.g., if SLIP_HIWAT is 1024, the interactive traffic in mixed
    137       1.1       cgd  * telnet/ftp will see a 1 sec wait, independent of the mtu (the
    138       1.1       cgd  * wait is dependent on the ftp window size but that's typically
    139       1.1       cgd  * 1k - 4k).  So, we want SLIP_HIWAT just big enough to amortize
    140       1.1       cgd  * the cost (in idle time on the wire) of the tty driver running
    141       1.1       cgd  * off the end of its clists & having to call back slstart for a
    142       1.1       cgd  * new packet.  For a tty interface with any buffering at all, this
    143       1.1       cgd  * cost will be zero.  Even with a totally brain dead interface (like
    144       1.1       cgd  * the one on a typical workstation), the cost will be <= 1 character
    145       1.1       cgd  * time.  So, setting SLIP_HIWAT to ~100 guarantees that we'll lose
    146       1.1       cgd  * at most 1% while maintaining good interactive response.
    147       1.1       cgd  */
    148      1.22       cgd #define	BUFOFFSET	(128+sizeof(struct ifnet **)+SLIP_HDRLEN)
    149       1.1       cgd #define	SLMAX		(MCLBYTES - BUFOFFSET)
    150       1.1       cgd #define	SLBUFSIZE	(SLMAX + BUFOFFSET)
    151      1.27       cgd #ifndef SLMTU
    152      1.22       cgd #define	SLMTU		296
    153      1.27       cgd #endif
    154      1.27       cgd #if (SLMTU < 3)
    155      1.53    kleink #error SLMTU way too small.
    156      1.27       cgd #endif
    157       1.1       cgd #define	SLIP_HIWAT	roundup(50,CBSIZE)
    158      1.52       mrg #ifndef __NetBSD__					/* XXX - cgd */
    159      1.22       cgd #define	CLISTRESERVE	1024	/* Can't let clists get too low */
    160      1.52       mrg #endif	/* !__NetBSD__ */
    161       1.1       cgd 
    162       1.1       cgd /*
    163       1.1       cgd  * SLIP ABORT ESCAPE MECHANISM:
    164       1.1       cgd  *	(inspired by HAYES modem escape arrangement)
    165       1.1       cgd  *	1sec escape 1sec escape 1sec escape { 1sec escape 1sec escape }
    166      1.22       cgd  *	within window time signals a "soft" exit from slip mode by remote end
    167      1.22       cgd  *	if the IFF_DEBUG flag is on.
    168       1.1       cgd  */
    169       1.1       cgd #define	ABT_ESC		'\033'	/* can't be t_intr - distant host must know it*/
    170      1.22       cgd #define	ABT_IDLE	1	/* in seconds - idle before an escape */
    171      1.22       cgd #define	ABT_COUNT	3	/* count of escapes for abort */
    172      1.22       cgd #define	ABT_WINDOW	(ABT_COUNT*2+2)	/* in seconds - time to count */
    173       1.1       cgd 
    174  1.83.2.5     skrll static int		sl_clone_create(struct if_clone *, int);
    175  1.83.2.5     skrll static int		sl_clone_destroy(struct ifnet *);
    176  1.83.2.5     skrll 
    177  1.83.2.5     skrll static LIST_HEAD(, sl_softc) sl_softc_list;
    178  1.83.2.5     skrll 
    179  1.83.2.5     skrll struct if_clone sl_cloner =
    180  1.83.2.5     skrll     IF_CLONE_INITIALIZER("sl", sl_clone_create, sl_clone_destroy);
    181       1.1       cgd 
    182       1.1       cgd #define FRAME_END	 	0xc0		/* Frame End */
    183       1.1       cgd #define FRAME_ESCAPE		0xdb		/* Frame Esc */
    184       1.1       cgd #define TRANS_FRAME_END	 	0xdc		/* transposed frame end */
    185       1.1       cgd #define TRANS_FRAME_ESCAPE 	0xdd		/* transposed frame esc */
    186       1.1       cgd 
    187      1.71   thorpej #ifndef __HAVE_GENERIC_SOFT_INTERRUPTS
    188      1.71   thorpej void	slnetisr(void);
    189      1.71   thorpej #endif
    190      1.71   thorpej void	slintr(void *);
    191      1.71   thorpej 
    192      1.22       cgd static int slinit __P((struct sl_softc *));
    193      1.22       cgd static struct mbuf *sl_btom __P((struct sl_softc *, int));
    194       1.1       cgd 
    195      1.22       cgd void
    196  1.83.2.5     skrll slattach(void)
    197  1.83.2.5     skrll {
    198  1.83.2.5     skrll 	LIST_INIT(&sl_softc_list);
    199  1.83.2.5     skrll 	if_clone_attach(&sl_cloner);
    200  1.83.2.5     skrll }
    201  1.83.2.5     skrll 
    202  1.83.2.5     skrll static int
    203  1.83.2.5     skrll sl_clone_create(struct if_clone *ifc, int unit)
    204       1.1       cgd {
    205      1.57  augustss 	struct sl_softc *sc;
    206       1.1       cgd 
    207  1.83.2.5     skrll 	MALLOC(sc, struct sl_softc *, sizeof(*sc), M_DEVBUF, M_WAIT|M_ZERO);
    208  1.83.2.5     skrll 	sc->sc_unit = unit;
    209  1.83.2.5     skrll 	(void)snprintf(sc->sc_if.if_xname, sizeof(sc->sc_if.if_xname),
    210  1.83.2.5     skrll 	    "%s%d", ifc->ifc_name, unit);
    211  1.83.2.5     skrll 	sc->sc_if.if_softc = sc;
    212  1.83.2.5     skrll 	sc->sc_if.if_mtu = SLMTU;
    213  1.83.2.5     skrll 	sc->sc_if.if_flags = IFF_POINTOPOINT | SC_AUTOCOMP | IFF_MULTICAST;
    214  1.83.2.5     skrll 	sc->sc_if.if_type = IFT_SLIP;
    215  1.83.2.5     skrll 	sc->sc_if.if_ioctl = slioctl;
    216  1.83.2.5     skrll 	sc->sc_if.if_output = sloutput;
    217  1.83.2.5     skrll 	sc->sc_if.if_dlt = DLT_SLIP;
    218  1.83.2.5     skrll 	sc->sc_fastq.ifq_maxlen = 32;
    219  1.83.2.5     skrll 	IFQ_SET_READY(&sc->sc_if.if_snd);
    220  1.83.2.5     skrll 	if_attach(&sc->sc_if);
    221  1.83.2.5     skrll 	if_alloc_sadl(&sc->sc_if);
    222       1.3       cgd #if NBPFILTER > 0
    223  1.83.2.5     skrll 	bpfattach(&sc->sc_if, DLT_SLIP, SLIP_HDRLEN);
    224       1.3       cgd #endif
    225  1.83.2.5     skrll 	LIST_INSERT_HEAD(&sl_softc_list, sc, sc_iflist);
    226  1.83.2.5     skrll 	return 0;
    227  1.83.2.5     skrll }
    228  1.83.2.5     skrll 
    229  1.83.2.5     skrll static int
    230  1.83.2.5     skrll sl_clone_destroy(struct ifnet *ifp)
    231  1.83.2.5     skrll {
    232  1.83.2.5     skrll 	struct sl_softc *sc = (struct sl_softc *)ifp->if_softc;
    233  1.83.2.5     skrll 
    234  1.83.2.5     skrll 	if (sc->sc_ttyp != NULL)
    235  1.83.2.5     skrll 		return EBUSY;	/* Not removing it */
    236  1.83.2.5     skrll 
    237  1.83.2.5     skrll 	LIST_REMOVE(sc, sc_iflist);
    238  1.83.2.5     skrll 
    239  1.83.2.5     skrll #if NBPFILTER > 0
    240  1.83.2.5     skrll 	bpfdetach(ifp);
    241  1.83.2.5     skrll #endif
    242  1.83.2.5     skrll 	if_detach(ifp);
    243  1.83.2.5     skrll 
    244  1.83.2.5     skrll 	FREE(sc, M_DEVBUF);
    245  1.83.2.5     skrll 	return 0;
    246       1.1       cgd }
    247       1.1       cgd 
    248       1.1       cgd static int
    249       1.1       cgd slinit(sc)
    250      1.57  augustss 	struct sl_softc *sc;
    251       1.1       cgd {
    252       1.1       cgd 
    253      1.64   thorpej 	if (sc->sc_mbuf == NULL) {
    254      1.82      matt 		sc->sc_mbuf = m_gethdr(M_WAIT, MT_DATA);
    255      1.82      matt 		m_clget(sc->sc_mbuf, M_WAIT);
    256      1.64   thorpej 	}
    257      1.64   thorpej 	sc->sc_ep = (u_char *) sc->sc_mbuf->m_ext.ext_buf +
    258      1.64   thorpej 	    sc->sc_mbuf->m_ext.ext_size;
    259      1.64   thorpej 	sc->sc_mp = sc->sc_pktstart = (u_char *) sc->sc_mbuf->m_ext.ext_buf +
    260      1.64   thorpej 	    BUFOFFSET;
    261      1.64   thorpej 
    262  1.83.2.5     skrll #ifdef INET
    263      1.46  christos 	sl_compress_init(&sc->sc_comp);
    264  1.83.2.5     skrll #endif
    265      1.64   thorpej 
    266       1.1       cgd 	return (1);
    267       1.1       cgd }
    268       1.1       cgd 
    269       1.1       cgd /*
    270       1.1       cgd  * Line specific open routine.
    271       1.1       cgd  * Attach the given tty to the first available sl unit.
    272       1.1       cgd  */
    273       1.1       cgd /* ARGSUSED */
    274       1.9    andrew int
    275      1.22       cgd slopen(dev, tp)
    276      1.22       cgd 	dev_t dev;
    277      1.57  augustss 	struct tty *tp;
    278       1.1       cgd {
    279       1.1       cgd 	struct proc *p = curproc;		/* XXX */
    280      1.57  augustss 	struct sl_softc *sc;
    281       1.1       cgd 	int error;
    282      1.27       cgd 	int s;
    283       1.1       cgd 
    284      1.38  christos 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    285       1.1       cgd 		return (error);
    286       1.1       cgd 
    287      1.73     enami 	if (tp->t_linesw->l_no == SLIPDISC)
    288       1.1       cgd 		return (0);
    289       1.1       cgd 
    290  1.83.2.5     skrll 	LIST_FOREACH(sc, &sl_softc_list, sc_iflist)
    291       1.1       cgd 		if (sc->sc_ttyp == NULL) {
    292      1.71   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    293      1.71   thorpej 			sc->sc_si = softintr_establish(IPL_SOFTNET,
    294      1.71   thorpej 			    slintr, sc);
    295      1.71   thorpej 			if (sc->sc_si == NULL)
    296      1.71   thorpej 				return (ENOMEM);
    297      1.71   thorpej #endif
    298      1.71   thorpej 			if (slinit(sc) == 0) {
    299      1.71   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    300      1.71   thorpej 				softintr_disestablish(sc->sc_si);
    301      1.71   thorpej #endif
    302       1.1       cgd 				return (ENOBUFS);
    303      1.71   thorpej 			}
    304       1.1       cgd 			tp->t_sc = (caddr_t)sc;
    305       1.1       cgd 			sc->sc_ttyp = tp;
    306       1.1       cgd 			sc->sc_if.if_baudrate = tp->t_ospeed;
    307      1.47      fvdl 			s = spltty();
    308      1.47      fvdl 			tp->t_state |= TS_ISOPEN | TS_XCLUDE;
    309      1.47      fvdl 			splx(s);
    310       1.1       cgd 			ttyflush(tp, FREAD | FWRITE);
    311      1.52       mrg #ifdef __NetBSD__
    312      1.27       cgd 			/*
    313      1.27       cgd 			 * make sure tty output queue is large enough
    314      1.27       cgd 			 * to hold a full-sized packet (including frame
    315      1.27       cgd 			 * end, and a possible extra frame end).  full-sized
    316      1.54      tron 			 * packet occupies a max of 2*SLMAX bytes (because
    317      1.27       cgd 			 * of possible escapes), and add two on for frame
    318      1.27       cgd 			 * ends.
    319      1.27       cgd 			 */
    320      1.27       cgd 			s = spltty();
    321      1.54      tron 			if (tp->t_outq.c_cn < 2*SLMAX+2) {
    322      1.27       cgd 				sc->sc_oldbufsize = tp->t_outq.c_cn;
    323      1.27       cgd 				sc->sc_oldbufquot = tp->t_outq.c_cq != 0;
    324      1.27       cgd 
    325      1.27       cgd 				clfree(&tp->t_outq);
    326      1.54      tron 				error = clalloc(&tp->t_outq, 2*SLMAX+2, 0);
    327      1.27       cgd 				if (error) {
    328      1.27       cgd 					splx(s);
    329      1.71   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    330      1.71   thorpej 					softintr_disestablish(sc->sc_si);
    331      1.71   thorpej #endif
    332      1.80    atatat 					/*
    333      1.80    atatat 					 * clalloc() might return -1 which
    334      1.80    atatat 					 * is no good, so we need to return
    335      1.80    atatat 					 * something else.
    336      1.80    atatat 					 */
    337      1.81    itojun 					return (ENOMEM); /* XXX ?! */
    338      1.27       cgd 				}
    339      1.27       cgd 			} else
    340      1.27       cgd 				sc->sc_oldbufsize = sc->sc_oldbufquot = 0;
    341      1.27       cgd 			splx(s);
    342      1.52       mrg #endif /* __NetBSD__ */
    343       1.1       cgd 			return (0);
    344       1.1       cgd 		}
    345       1.1       cgd 	return (ENXIO);
    346       1.1       cgd }
    347       1.1       cgd 
    348       1.1       cgd /*
    349       1.1       cgd  * Line specific close routine.
    350       1.1       cgd  * Detach the tty from the sl unit.
    351       1.1       cgd  */
    352       1.9    andrew void
    353      1.22       cgd slclose(tp)
    354       1.1       cgd 	struct tty *tp;
    355       1.1       cgd {
    356      1.57  augustss 	struct sl_softc *sc;
    357       1.1       cgd 	int s;
    358       1.1       cgd 
    359       1.1       cgd 	ttywflush(tp);
    360      1.69   thorpej 	sc = tp->t_sc;
    361      1.69   thorpej 
    362       1.1       cgd 	if (sc != NULL) {
    363      1.71   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    364      1.71   thorpej 		softintr_disestablish(sc->sc_si);
    365      1.71   thorpej #endif
    366      1.69   thorpej 		s = splnet();
    367       1.1       cgd 		if_down(&sc->sc_if);
    368      1.69   thorpej 		IF_PURGE(&sc->sc_fastq);
    369      1.69   thorpej 		splx(s);
    370      1.69   thorpej 
    371      1.69   thorpej 		s = spltty();
    372      1.69   thorpej 		tp->t_linesw = linesw[0];	/* default line disc. */
    373      1.69   thorpej 		tp->t_state = 0;
    374      1.69   thorpej 
    375       1.1       cgd 		sc->sc_ttyp = NULL;
    376       1.1       cgd 		tp->t_sc = NULL;
    377      1.69   thorpej 
    378      1.64   thorpej 		m_freem(sc->sc_mbuf);
    379      1.70   thorpej 		sc->sc_mbuf = NULL;
    380      1.64   thorpej 		sc->sc_ep = sc->sc_mp = sc->sc_pktstart = NULL;
    381      1.65   thorpej 		IF_PURGE(&sc->sc_inq);
    382      1.69   thorpej 
    383      1.69   thorpej 		/*
    384      1.69   thorpej 		 * If necessary, install a new outq buffer of the
    385      1.69   thorpej 		 * appropriate size.
    386      1.69   thorpej 		 */
    387      1.69   thorpej 		if (sc->sc_oldbufsize != 0) {
    388      1.69   thorpej 			clfree(&tp->t_outq);
    389      1.69   thorpej 			clalloc(&tp->t_outq, sc->sc_oldbufsize,
    390      1.69   thorpej 			    sc->sc_oldbufquot);
    391      1.69   thorpej 		}
    392      1.69   thorpej 		splx(s);
    393       1.1       cgd 	}
    394       1.1       cgd }
    395       1.1       cgd 
    396       1.1       cgd /*
    397       1.1       cgd  * Line specific (tty) ioctl routine.
    398       1.1       cgd  * Provide a way to get the sl unit number.
    399       1.1       cgd  */
    400       1.1       cgd /* ARGSUSED */
    401      1.22       cgd int
    402       1.1       cgd sltioctl(tp, cmd, data, flag)
    403       1.1       cgd 	struct tty *tp;
    404      1.32       cgd 	u_long cmd;
    405       1.1       cgd 	caddr_t data;
    406      1.22       cgd 	int flag;
    407       1.1       cgd {
    408       1.1       cgd 	struct sl_softc *sc = (struct sl_softc *)tp->t_sc;
    409       1.1       cgd 
    410       1.1       cgd 	switch (cmd) {
    411       1.1       cgd 	case SLIOCGUNIT:
    412      1.39   thorpej 		*(int *)data = sc->sc_unit;	/* XXX */
    413       1.1       cgd 		break;
    414       1.1       cgd 
    415       1.1       cgd 	default:
    416      1.80    atatat 		return (EPASSTHROUGH);
    417       1.1       cgd 	}
    418       1.1       cgd 	return (0);
    419       1.1       cgd }
    420       1.1       cgd 
    421       1.1       cgd /*
    422       1.1       cgd  * Queue a packet.  Start transmission if not active.
    423      1.67   thorpej  * Compression happens in slintr(); if we do it here, IP TOS
    424      1.22       cgd  * will cause us to not compress "background" packets, because
    425      1.67   thorpej  * ordering gets trashed.  It can be done for all packets in slintr().
    426       1.1       cgd  */
    427      1.22       cgd int
    428      1.22       cgd sloutput(ifp, m, dst, rtp)
    429       1.1       cgd 	struct ifnet *ifp;
    430      1.57  augustss 	struct mbuf *m;
    431       1.1       cgd 	struct sockaddr *dst;
    432      1.22       cgd 	struct rtentry *rtp;
    433       1.1       cgd {
    434      1.57  augustss 	struct sl_softc *sc = ifp->if_softc;
    435      1.57  augustss 	struct ip *ip;
    436      1.63   thorpej 	int s, error;
    437      1.63   thorpej 	ALTQ_DECL(struct altq_pktattr pktattr;)
    438      1.63   thorpej 
    439      1.63   thorpej 	IFQ_CLASSIFY(&ifp->if_snd, m, dst->sa_family, &pktattr);
    440       1.1       cgd 
    441       1.1       cgd 	/*
    442       1.1       cgd 	 * `Cannot happen' (see slioctl).  Someday we will extend
    443       1.1       cgd 	 * the line protocol to support other address families.
    444       1.1       cgd 	 */
    445       1.1       cgd 	if (dst->sa_family != AF_INET) {
    446      1.44  christos 		printf("%s: af%d not supported\n", sc->sc_if.if_xname,
    447      1.43  christos 		    dst->sa_family);
    448       1.1       cgd 		m_freem(m);
    449      1.22       cgd 		sc->sc_if.if_noproto++;
    450       1.1       cgd 		return (EAFNOSUPPORT);
    451       1.1       cgd 	}
    452       1.1       cgd 
    453       1.1       cgd 	if (sc->sc_ttyp == NULL) {
    454       1.1       cgd 		m_freem(m);
    455       1.1       cgd 		return (ENETDOWN);	/* sort of */
    456       1.1       cgd 	}
    457      1.14   mycroft 	if ((sc->sc_ttyp->t_state & TS_CARR_ON) == 0 &&
    458      1.14   mycroft 	    (sc->sc_ttyp->t_cflag & CLOCAL) == 0) {
    459       1.1       cgd 		m_freem(m);
    460      1.49     enami 		printf("%s: no carrier and not local\n", sc->sc_if.if_xname);
    461       1.1       cgd 		return (EHOSTUNREACH);
    462       1.1       cgd 	}
    463      1.22       cgd 	ip = mtod(m, struct ip *);
    464  1.83.2.5     skrll #ifdef INET
    465      1.22       cgd 	if (sc->sc_if.if_flags & SC_NOICMP && ip->ip_p == IPPROTO_ICMP) {
    466       1.1       cgd 		m_freem(m);
    467      1.22       cgd 		return (ENETRESET);		/* XXX ? */
    468       1.1       cgd 	}
    469  1.83.2.5     skrll #endif
    470      1.69   thorpej 
    471      1.69   thorpej 	s = spltty();
    472      1.27       cgd 	if (sc->sc_oqlen && sc->sc_ttyp->t_outq.c_cc == sc->sc_oqlen) {
    473      1.35   mycroft 		struct timeval tv;
    474      1.27       cgd 
    475      1.27       cgd 		/* if output's been stalled for too long, and restart */
    476      1.76    itojun 		timersub(&time, &sc->sc_lastpacket, &tv);
    477      1.27       cgd 		if (tv.tv_sec > 0) {
    478      1.27       cgd 			sc->sc_otimeout++;
    479      1.27       cgd 			slstart(sc->sc_ttyp);
    480      1.27       cgd 		}
    481      1.27       cgd 	}
    482      1.69   thorpej 	splx(s);
    483      1.69   thorpej 
    484      1.69   thorpej 	s = splnet();
    485  1.83.2.5     skrll #ifdef INET
    486      1.63   thorpej 	if ((ip->ip_tos & IPTOS_LOWDELAY) != 0
    487      1.63   thorpej #ifdef ALTQ
    488      1.63   thorpej 	    && ALTQ_IS_ENABLED(&ifp->if_snd) == 0
    489      1.63   thorpej #endif
    490      1.63   thorpej 	    ) {
    491      1.63   thorpej 		if (IF_QFULL(&sc->sc_fastq)) {
    492      1.63   thorpej 			IF_DROP(&sc->sc_fastq);
    493      1.63   thorpej 			m_freem(m);
    494      1.63   thorpej 			error = ENOBUFS;
    495      1.63   thorpej 		} else {
    496      1.63   thorpej 			IF_ENQUEUE(&sc->sc_fastq, m);
    497      1.63   thorpej 			error = 0;
    498      1.63   thorpej 		}
    499      1.63   thorpej 	} else
    500  1.83.2.5     skrll #endif
    501      1.63   thorpej 		IFQ_ENQUEUE(&ifp->if_snd, m, &pktattr, error);
    502      1.63   thorpej 	if (error) {
    503       1.1       cgd 		splx(s);
    504      1.63   thorpej 		ifp->if_oerrors++;
    505      1.63   thorpej 		return (error);
    506       1.1       cgd 	}
    507      1.76    itojun 	sc->sc_lastpacket = time;
    508      1.69   thorpej 	splx(s);
    509      1.69   thorpej 
    510      1.69   thorpej 	s = spltty();
    511      1.27       cgd 	if ((sc->sc_oqlen = sc->sc_ttyp->t_outq.c_cc) == 0)
    512       1.1       cgd 		slstart(sc->sc_ttyp);
    513       1.1       cgd 	splx(s);
    514      1.69   thorpej 
    515       1.1       cgd 	return (0);
    516       1.1       cgd }
    517       1.1       cgd 
    518       1.1       cgd /*
    519       1.1       cgd  * Start output on interface.  Get another datagram
    520       1.1       cgd  * to send from the interface queue and map it to
    521       1.1       cgd  * the interface before starting output.
    522       1.1       cgd  */
    523       1.9    andrew void
    524       1.1       cgd slstart(tp)
    525      1.57  augustss 	struct tty *tp;
    526       1.1       cgd {
    527      1.71   thorpej 	struct sl_softc *sc = tp->t_sc;
    528       1.1       cgd 
    529      1.67   thorpej 	/*
    530      1.67   thorpej 	 * If there is more in the output queue, just send it now.
    531      1.67   thorpej 	 * We are being called in lieu of ttstart and must do what
    532      1.67   thorpej 	 * it would.
    533      1.67   thorpej 	 */
    534      1.67   thorpej 	if (tp->t_outq.c_cc != 0) {
    535      1.67   thorpej 		(*tp->t_oproc)(tp);
    536      1.67   thorpej 		if (tp->t_outq.c_cc > SLIP_HIWAT)
    537       1.1       cgd 			return;
    538      1.67   thorpej 	}
    539       1.1       cgd 
    540      1.67   thorpej 	/*
    541      1.67   thorpej 	 * This happens briefly when the line shuts down.
    542      1.67   thorpej 	 */
    543      1.71   thorpej 	if (sc == NULL)
    544      1.67   thorpej 		return;
    545      1.71   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    546      1.71   thorpej 	softintr_schedule(sc->sc_si);
    547      1.71   thorpej #else
    548      1.71   thorpej     {
    549      1.74   thorpej 	int s = splhigh();
    550      1.67   thorpej 	schednetisr(NETISR_SLIP);
    551      1.67   thorpej 	splx(s);
    552      1.71   thorpej     }
    553      1.71   thorpej #endif
    554       1.1       cgd }
    555       1.1       cgd 
    556       1.1       cgd /*
    557       1.1       cgd  * Copy data buffer to mbuf chain; add ifnet pointer.
    558       1.1       cgd  */
    559       1.1       cgd static struct mbuf *
    560       1.1       cgd sl_btom(sc, len)
    561      1.57  augustss 	struct sl_softc *sc;
    562      1.57  augustss 	int len;
    563       1.1       cgd {
    564      1.57  augustss 	struct mbuf *m;
    565       1.1       cgd 
    566       1.1       cgd 	/*
    567      1.66   thorpej 	 * Allocate a new input buffer and swap.
    568       1.1       cgd 	 */
    569      1.66   thorpej 	m = sc->sc_mbuf;
    570      1.66   thorpej 	MGETHDR(sc->sc_mbuf, M_DONTWAIT, MT_DATA);
    571      1.66   thorpej 	if (sc->sc_mbuf == NULL) {
    572      1.66   thorpej 		sc->sc_mbuf = m;
    573      1.66   thorpej 		return (NULL);
    574      1.66   thorpej 	}
    575      1.66   thorpej 	MCLGET(sc->sc_mbuf, M_DONTWAIT);
    576      1.66   thorpej 	if ((sc->sc_mbuf->m_flags & M_EXT) == 0) {
    577      1.68   thorpej 		m_freem(sc->sc_mbuf);
    578      1.66   thorpej 		sc->sc_mbuf = m;
    579      1.66   thorpej 		return (NULL);
    580      1.66   thorpej 	}
    581      1.66   thorpej 	sc->sc_ep = (u_char *) sc->sc_mbuf->m_ext.ext_buf +
    582      1.66   thorpej 	    sc->sc_mbuf->m_ext.ext_size;
    583      1.64   thorpej 
    584      1.66   thorpej 	m->m_data = sc->sc_pktstart;
    585       1.1       cgd 
    586      1.64   thorpej 	m->m_pkthdr.len = m->m_len = len;
    587       1.1       cgd 	m->m_pkthdr.rcvif = &sc->sc_if;
    588       1.1       cgd 	return (m);
    589       1.1       cgd }
    590       1.1       cgd 
    591       1.1       cgd /*
    592       1.1       cgd  * tty interface receiver interrupt.
    593       1.1       cgd  */
    594       1.9    andrew void
    595       1.1       cgd slinput(c, tp)
    596      1.57  augustss 	int c;
    597      1.57  augustss 	struct tty *tp;
    598       1.1       cgd {
    599      1.57  augustss 	struct sl_softc *sc;
    600      1.57  augustss 	struct mbuf *m;
    601      1.57  augustss 	int len;
    602      1.22       cgd 
    603       1.1       cgd 	tk_nin++;
    604       1.1       cgd 	sc = (struct sl_softc *)tp->t_sc;
    605       1.1       cgd 	if (sc == NULL)
    606       1.1       cgd 		return;
    607      1.47      fvdl 	if ((c & TTY_ERRORMASK) || ((tp->t_state & TS_CARR_ON) == 0 &&
    608      1.22       cgd 	    (tp->t_cflag & CLOCAL) == 0)) {
    609       1.2       cgd 		sc->sc_flags |= SC_ERROR;
    610       1.1       cgd 		return;
    611       1.2       cgd 	}
    612      1.22       cgd 	c &= TTY_CHARMASK;
    613       1.1       cgd 
    614       1.1       cgd 	++sc->sc_if.if_ibytes;
    615       1.1       cgd 
    616      1.19       cgd 	if (sc->sc_if.if_flags & IFF_DEBUG) {
    617      1.22       cgd 		if (c == ABT_ESC) {
    618      1.22       cgd 			/*
    619      1.22       cgd 			 * If we have a previous abort, see whether
    620      1.22       cgd 			 * this one is within the time limit.
    621      1.22       cgd 			 */
    622      1.22       cgd 			if (sc->sc_abortcount &&
    623      1.22       cgd 			    time.tv_sec >= sc->sc_starttime + ABT_WINDOW)
    624       1.1       cgd 				sc->sc_abortcount = 0;
    625      1.22       cgd 			/*
    626      1.22       cgd 			 * If we see an abort after "idle" time, count it;
    627      1.22       cgd 			 * record when the first abort escape arrived.
    628      1.22       cgd 			 */
    629      1.22       cgd 			if (time.tv_sec >= sc->sc_lasttime + ABT_IDLE) {
    630      1.22       cgd 				if (++sc->sc_abortcount == 1)
    631      1.22       cgd 					sc->sc_starttime = time.tv_sec;
    632      1.22       cgd 				if (sc->sc_abortcount >= ABT_COUNT) {
    633      1.22       cgd 					slclose(tp);
    634      1.22       cgd 					return;
    635      1.22       cgd 				}
    636       1.1       cgd 			}
    637      1.22       cgd 		} else
    638      1.22       cgd 			sc->sc_abortcount = 0;
    639       1.1       cgd 		sc->sc_lasttime = time.tv_sec;
    640       1.1       cgd 	}
    641       1.1       cgd 
    642       1.1       cgd 	switch (c) {
    643       1.1       cgd 
    644       1.1       cgd 	case TRANS_FRAME_ESCAPE:
    645       1.1       cgd 		if (sc->sc_escape)
    646       1.1       cgd 			c = FRAME_ESCAPE;
    647       1.1       cgd 		break;
    648       1.1       cgd 
    649       1.1       cgd 	case TRANS_FRAME_END:
    650       1.1       cgd 		if (sc->sc_escape)
    651       1.1       cgd 			c = FRAME_END;
    652       1.1       cgd 		break;
    653       1.1       cgd 
    654       1.1       cgd 	case FRAME_ESCAPE:
    655       1.1       cgd 		sc->sc_escape = 1;
    656       1.1       cgd 		return;
    657       1.1       cgd 
    658       1.1       cgd 	case FRAME_END:
    659       1.3       cgd 		if(sc->sc_flags & SC_ERROR) {
    660       1.2       cgd 			sc->sc_flags &= ~SC_ERROR;
    661       1.2       cgd 			goto newpack;
    662       1.2       cgd 		}
    663      1.64   thorpej 		len = sc->sc_mp - sc->sc_pktstart;
    664       1.1       cgd 		if (len < 3)
    665       1.1       cgd 			/* less than min length packet - ignore */
    666       1.1       cgd 			goto newpack;
    667       1.1       cgd 
    668      1.64   thorpej 		m = sl_btom(sc, len);
    669      1.64   thorpej 		if (m == NULL)
    670      1.64   thorpej 			goto error;
    671      1.64   thorpej 
    672      1.65   thorpej 		IF_ENQUEUE(&sc->sc_inq, m);
    673      1.71   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    674      1.71   thorpej 		softintr_schedule(sc->sc_si);
    675      1.71   thorpej #else
    676      1.71   thorpej 	    {
    677      1.74   thorpej 		int s = splhigh();
    678      1.65   thorpej 		schednetisr(NETISR_SLIP);
    679       1.1       cgd 		splx(s);
    680      1.71   thorpej 	    }
    681      1.71   thorpej #endif
    682       1.1       cgd 		goto newpack;
    683       1.1       cgd 	}
    684       1.1       cgd 	if (sc->sc_mp < sc->sc_ep) {
    685       1.1       cgd 		*sc->sc_mp++ = c;
    686       1.1       cgd 		sc->sc_escape = 0;
    687       1.1       cgd 		return;
    688       1.1       cgd 	}
    689      1.22       cgd 
    690      1.22       cgd 	/* can't put lower; would miss an extra frame */
    691       1.3       cgd 	sc->sc_flags |= SC_ERROR;
    692      1.22       cgd 
    693       1.1       cgd error:
    694       1.1       cgd 	sc->sc_if.if_ierrors++;
    695       1.1       cgd newpack:
    696      1.64   thorpej 	sc->sc_mp = sc->sc_pktstart = (u_char *) sc->sc_mbuf->m_ext.ext_buf +
    697      1.64   thorpej 	    BUFOFFSET;
    698       1.1       cgd 	sc->sc_escape = 0;
    699      1.65   thorpej }
    700      1.65   thorpej 
    701      1.71   thorpej #ifndef __HAVE_GENERIC_SOFT_INTERRUPTS
    702      1.65   thorpej void
    703      1.71   thorpej slnetisr(void)
    704      1.65   thorpej {
    705      1.65   thorpej 	struct sl_softc *sc;
    706      1.71   thorpej 
    707  1.83.2.5     skrll 	LIST_FOREACH(sc, &sl_softc_list, sc_iflist) {
    708      1.71   thorpej 		if (sc->sc_ttyp == NULL)
    709      1.71   thorpej 			continue;
    710      1.71   thorpej 		slintr(sc);
    711      1.71   thorpej 	}
    712      1.71   thorpej }
    713      1.71   thorpej #endif
    714      1.71   thorpej 
    715      1.71   thorpej void
    716      1.71   thorpej slintr(void *arg)
    717      1.71   thorpej {
    718      1.71   thorpej 	struct sl_softc *sc = arg;
    719      1.71   thorpej 	struct tty *tp = sc->sc_ttyp;
    720      1.65   thorpej 	struct mbuf *m;
    721      1.71   thorpej 	int s, len;
    722  1.83.2.5     skrll 	u_char *pktstart;
    723  1.83.2.5     skrll #ifdef INET
    724  1.83.2.5     skrll 	u_char c;
    725  1.83.2.5     skrll #endif
    726      1.66   thorpej #if NBPFILTER > 0
    727      1.66   thorpej 	u_char chdr[CHDR_LEN];
    728      1.66   thorpej #endif
    729      1.65   thorpej 
    730      1.71   thorpej 	KASSERT(tp != NULL);
    731      1.67   thorpej 
    732      1.71   thorpej 	/*
    733      1.71   thorpej 	 * Output processing loop.
    734      1.71   thorpej 	 */
    735      1.71   thorpej 	for (;;) {
    736  1.83.2.5     skrll #ifdef INET
    737      1.71   thorpej 		struct ip *ip;
    738  1.83.2.5     skrll #endif
    739      1.71   thorpej 		struct mbuf *m2;
    740      1.71   thorpej #if NBPFILTER > 0
    741      1.71   thorpej 		struct mbuf *bpf_m;
    742      1.71   thorpej #endif
    743      1.67   thorpej 
    744      1.67   thorpej 		/*
    745      1.71   thorpej 		 * Do not remove the packet from the queue if it
    746      1.71   thorpej 		 * doesn't look like it will fit into the current
    747      1.71   thorpej 		 * serial output queue.  With a packet full of
    748      1.71   thorpej 		 * escapes, this could be as bad as MTU*2+2.
    749      1.67   thorpej 		 */
    750      1.71   thorpej 		s = spltty();
    751      1.71   thorpej 		if (tp->t_outq.c_cn - tp->t_outq.c_cc <
    752      1.71   thorpej 		    2*sc->sc_if.if_mtu+2) {
    753      1.67   thorpej 			splx(s);
    754      1.71   thorpej 			break;
    755      1.71   thorpej 		}
    756      1.71   thorpej 		splx(s);
    757      1.67   thorpej 
    758      1.71   thorpej 		/*
    759      1.71   thorpej 		 * Get a packet and send it to the interface.
    760      1.71   thorpej 		 */
    761      1.71   thorpej 		s = splnet();
    762      1.71   thorpej 		IF_DEQUEUE(&sc->sc_fastq, m);
    763      1.71   thorpej 		if (m)
    764      1.71   thorpej 			sc->sc_if.if_omcasts++;	/* XXX */
    765      1.71   thorpej 		else
    766      1.71   thorpej 			IFQ_DEQUEUE(&sc->sc_if.if_snd, m);
    767      1.71   thorpej 		splx(s);
    768      1.67   thorpej 
    769      1.71   thorpej 		if (m == NULL)
    770      1.71   thorpej 			break;
    771      1.67   thorpej 
    772      1.71   thorpej 		/*
    773      1.71   thorpej 		 * We do the header compression here rather than in
    774      1.71   thorpej 		 * sloutput() because the packets will be out of order
    775      1.71   thorpej 		 * if we are using TOS queueing, and the connection
    776      1.71   thorpej 		 * ID compression will get munged when this happens.
    777      1.71   thorpej 		 */
    778      1.71   thorpej #if NBPFILTER > 0
    779      1.71   thorpej 		if (sc->sc_if.if_bpf) {
    780      1.67   thorpej 			/*
    781      1.71   thorpej 			 * We need to save the TCP/IP header before
    782      1.71   thorpej 			 * it's compressed.  To avoid complicated
    783      1.71   thorpej 			 * code, we just make a deep copy of the
    784      1.71   thorpej 			 * entire packet (since this is a serial
    785      1.71   thorpej 			 * line, packets should be short and/or the
    786      1.71   thorpej 			 * copy should be negligible cost compared
    787      1.71   thorpej 			 * to the packet transmission time).
    788      1.67   thorpej 			 */
    789      1.71   thorpej 			bpf_m = m_dup(m, 0, M_COPYALL, M_DONTWAIT);
    790      1.71   thorpej 		} else
    791      1.71   thorpej 			bpf_m = NULL;
    792      1.67   thorpej #endif
    793  1.83.2.5     skrll #ifdef INET
    794      1.71   thorpej 		if ((ip = mtod(m, struct ip *))->ip_p == IPPROTO_TCP) {
    795      1.71   thorpej 			if (sc->sc_if.if_flags & SC_COMPRESS)
    796      1.71   thorpej 				*mtod(m, u_char *) |=
    797      1.71   thorpej 				    sl_compress_tcp(m, ip,
    798      1.71   thorpej 				    &sc->sc_comp, 1);
    799      1.71   thorpej 		}
    800  1.83.2.5     skrll #endif
    801      1.67   thorpej #if NBPFILTER > 0
    802  1.83.2.2     skrll 		if (sc->sc_if.if_bpf && bpf_m != NULL)
    803  1.83.2.2     skrll 			bpf_mtap_sl_out(sc->sc_if.if_bpf, mtod(m, u_char *),
    804  1.83.2.2     skrll 			    bpf_m);
    805      1.67   thorpej #endif
    806      1.76    itojun 		sc->sc_lastpacket = time;
    807      1.67   thorpej 
    808      1.71   thorpej 		s = spltty();
    809      1.67   thorpej 
    810      1.71   thorpej 		/*
    811      1.71   thorpej 		 * The extra FRAME_END will start up a new packet,
    812      1.71   thorpej 		 * and thus will flush any accumulated garbage.  We
    813      1.71   thorpej 		 * do this whenever the line may have been idle for
    814      1.71   thorpej 		 * some time.
    815      1.71   thorpej 		 */
    816      1.71   thorpej 		if (tp->t_outq.c_cc == 0) {
    817      1.71   thorpej 			sc->sc_if.if_obytes++;
    818      1.71   thorpej 			(void) putc(FRAME_END, &tp->t_outq);
    819      1.71   thorpej 		}
    820      1.67   thorpej 
    821      1.71   thorpej 		while (m) {
    822      1.71   thorpej 			u_char *bp, *cp, *ep;
    823      1.67   thorpej 
    824      1.71   thorpej 			bp = cp = mtod(m, u_char *);
    825      1.71   thorpej 			ep = cp + m->m_len;
    826      1.71   thorpej 			while (cp < ep) {
    827      1.71   thorpej 				/*
    828      1.71   thorpej 				 * Find out how many bytes in the
    829      1.71   thorpej 				 * string we can handle without
    830      1.71   thorpej 				 * doing something special.
    831      1.71   thorpej 				 */
    832      1.67   thorpej 				while (cp < ep) {
    833      1.71   thorpej 					switch (*cp++) {
    834      1.71   thorpej 					case FRAME_ESCAPE:
    835      1.71   thorpej 					case FRAME_END:
    836      1.71   thorpej 						cp--;
    837      1.71   thorpej 						goto out;
    838      1.67   thorpej 					}
    839      1.71   thorpej 				}
    840      1.71   thorpej 				out:
    841      1.71   thorpej 				if (cp > bp) {
    842      1.67   thorpej 					/*
    843      1.71   thorpej 					 * Put N characters at once
    844      1.71   thorpej 					 * into the tty output queue.
    845      1.67   thorpej 					 */
    846      1.71   thorpej 					if (b_to_q(bp, cp - bp,
    847      1.71   thorpej 					    &tp->t_outq))
    848      1.71   thorpej 						break;
    849      1.71   thorpej 					sc->sc_if.if_obytes += cp - bp;
    850      1.67   thorpej 				}
    851      1.67   thorpej 				/*
    852      1.71   thorpej 				 * If there are characters left in
    853      1.71   thorpej 				 * the mbuf, the first one must be
    854      1.71   thorpej 				 * special..  Put it out in a different
    855      1.71   thorpej 				 * form.
    856      1.67   thorpej 				 */
    857      1.71   thorpej 				if (cp < ep) {
    858      1.71   thorpej 					if (putc(FRAME_ESCAPE,
    859      1.71   thorpej 					    &tp->t_outq))
    860      1.71   thorpej 						break;
    861      1.71   thorpej 					if (putc(*cp++ == FRAME_ESCAPE ?
    862      1.71   thorpej 					    TRANS_FRAME_ESCAPE :
    863      1.71   thorpej 					    TRANS_FRAME_END,
    864      1.71   thorpej 					    &tp->t_outq)) {
    865      1.71   thorpej 						(void)
    866      1.71   thorpej 						   unputc(&tp->t_outq);
    867      1.71   thorpej 						break;
    868      1.71   thorpej 					}
    869      1.71   thorpej 					sc->sc_if.if_obytes += 2;
    870      1.71   thorpej 				}
    871      1.77    martin 				bp = cp;
    872      1.67   thorpej 			}
    873      1.71   thorpej 			MFREE(m, m2);
    874      1.71   thorpej 			m = m2;
    875      1.71   thorpej 		}
    876      1.67   thorpej 
    877      1.71   thorpej 		if (putc(FRAME_END, &tp->t_outq)) {
    878      1.67   thorpej 			/*
    879      1.71   thorpej 			 * Not enough room.  Remove a char to make
    880      1.71   thorpej 			 * room and end the packet normally.  If
    881      1.71   thorpej 			 * you get many collisions (more than one
    882      1.71   thorpej 			 * or two a day), you probably do not have
    883      1.71   thorpej 			 * enough clists and you should increase
    884      1.71   thorpej 			 * "nclist" in param.c
    885      1.67   thorpej 			 */
    886      1.71   thorpej 			(void) unputc(&tp->t_outq);
    887      1.71   thorpej 			(void) putc(FRAME_END, &tp->t_outq);
    888      1.71   thorpej 			sc->sc_if.if_collisions++;
    889      1.71   thorpej 		} else {
    890      1.71   thorpej 			sc->sc_if.if_obytes++;
    891      1.71   thorpej 			sc->sc_if.if_opackets++;
    892      1.67   thorpej 		}
    893      1.67   thorpej 
    894      1.67   thorpej 		/*
    895      1.71   thorpej 		 * We now have characters in the output queue,
    896      1.71   thorpej 		 * kick the serial port.
    897      1.67   thorpej 		 */
    898      1.71   thorpej 		(*tp->t_oproc)(tp);
    899      1.71   thorpej 		splx(s);
    900      1.71   thorpej 	}
    901      1.71   thorpej 
    902      1.71   thorpej 	/*
    903      1.71   thorpej 	 * Input processing loop.
    904      1.71   thorpej 	 */
    905      1.71   thorpej 	for (;;) {
    906      1.71   thorpej 		s = spltty();
    907      1.71   thorpej 		IF_DEQUEUE(&sc->sc_inq, m);
    908      1.71   thorpej 		splx(s);
    909      1.71   thorpej 		if (m == NULL)
    910      1.71   thorpej 			break;
    911      1.71   thorpej 		pktstart = mtod(m, u_char *);
    912      1.71   thorpej 		len = m->m_pkthdr.len;
    913      1.65   thorpej #if NBPFILTER > 0
    914      1.71   thorpej 		if (sc->sc_if.if_bpf) {
    915      1.71   thorpej 			/*
    916      1.71   thorpej 			 * Save the compressed header, so we
    917      1.71   thorpej 			 * can tack it on later.  Note that we
    918      1.71   thorpej 			 * will end up copying garbage in some
    919      1.71   thorpej 			 * cases but this is okay.  We remember
    920      1.71   thorpej 			 * where the buffer started so we can
    921      1.71   thorpej 			 * compute the new header length.
    922      1.71   thorpej 			 */
    923      1.71   thorpej 			memcpy(chdr, pktstart, CHDR_LEN);
    924      1.71   thorpej 		}
    925      1.66   thorpej #endif /* NBPFILTER > 0 */
    926  1.83.2.5     skrll #ifdef INET
    927      1.71   thorpej 		if ((c = (*pktstart & 0xf0)) != (IPVERSION << 4)) {
    928      1.71   thorpej 			if (c & 0x80)
    929      1.71   thorpej 				c = TYPE_COMPRESSED_TCP;
    930      1.71   thorpej 			else if (c == TYPE_UNCOMPRESSED_TCP)
    931      1.71   thorpej 				*pktstart &= 0x4f; /* XXX */
    932      1.71   thorpej 			/*
    933      1.71   thorpej 			 * We've got something that's not an IP
    934      1.71   thorpej 			 * packet.  If compression is enabled,
    935      1.71   thorpej 			 * try to decompress it.  Otherwise, if
    936      1.71   thorpej 			 * `auto-enable' compression is on and
    937      1.71   thorpej 			 * it's a reasonable packet, decompress
    938      1.71   thorpej 			 * it and then enable compression.
    939      1.71   thorpej 			 * Otherwise, drop it.
    940      1.71   thorpej 			 */
    941      1.71   thorpej 			if (sc->sc_if.if_flags & SC_COMPRESS) {
    942      1.71   thorpej 				len = sl_uncompress_tcp(&pktstart, len,
    943      1.71   thorpej 				    (u_int)c, &sc->sc_comp);
    944      1.71   thorpej 				if (len <= 0) {
    945      1.71   thorpej 					m_freem(m);
    946      1.71   thorpej 					continue;
    947      1.71   thorpej 				}
    948      1.71   thorpej 			} else if ((sc->sc_if.if_flags & SC_AUTOCOMP) &&
    949      1.71   thorpej 			    c == TYPE_UNCOMPRESSED_TCP && len >= 40) {
    950      1.71   thorpej 				len = sl_uncompress_tcp(&pktstart, len,
    951      1.71   thorpej 				    (u_int)c, &sc->sc_comp);
    952      1.71   thorpej 				if (len <= 0) {
    953      1.66   thorpej 					m_freem(m);
    954      1.66   thorpej 					continue;
    955      1.66   thorpej 				}
    956      1.71   thorpej 				sc->sc_if.if_flags |= SC_COMPRESS;
    957      1.71   thorpej 			} else {
    958      1.71   thorpej 				m_freem(m);
    959      1.71   thorpej 				continue;
    960      1.66   thorpej 			}
    961      1.71   thorpej 		}
    962  1.83.2.5     skrll #endif
    963      1.71   thorpej 		m->m_data = (caddr_t) pktstart;
    964      1.71   thorpej 		m->m_pkthdr.len = m->m_len = len;
    965      1.66   thorpej #if NBPFILTER > 0
    966      1.71   thorpej 		if (sc->sc_if.if_bpf) {
    967  1.83.2.2     skrll 			bpf_mtap_sl_in(sc->sc_if.if_bpf, chdr, &m);
    968      1.71   thorpej 			if (m == NULL)
    969      1.71   thorpej 				continue;
    970      1.71   thorpej 		}
    971      1.66   thorpej #endif /* NBPFILTER > 0 */
    972      1.71   thorpej 		/*
    973      1.71   thorpej 		 * If the packet will fit into a single
    974      1.71   thorpej 		 * header mbuf, copy it into one, to save
    975      1.71   thorpej 		 * memory.
    976      1.71   thorpej 		 */
    977      1.71   thorpej 		if (m->m_pkthdr.len < MHLEN) {
    978      1.71   thorpej 			struct mbuf *n;
    979      1.66   thorpej 
    980      1.71   thorpej 			MGETHDR(n, M_DONTWAIT, MT_DATA);
    981      1.71   thorpej 			M_COPY_PKTHDR(n, m);
    982      1.71   thorpej 			memcpy(mtod(n, caddr_t), mtod(m, caddr_t),
    983      1.71   thorpej 			    m->m_pkthdr.len);
    984      1.71   thorpej 			n->m_len = m->m_len;
    985      1.71   thorpej 			m_freem(m);
    986      1.71   thorpej 			m = n;
    987      1.71   thorpej 		}
    988      1.66   thorpej 
    989      1.71   thorpej 		sc->sc_if.if_ipackets++;
    990      1.76    itojun 		sc->sc_lastpacket = time;
    991      1.66   thorpej 
    992  1.83.2.5     skrll #ifdef INET
    993      1.74   thorpej 		s = splnet();
    994      1.71   thorpej 		if (IF_QFULL(&ipintrq)) {
    995      1.71   thorpej 			IF_DROP(&ipintrq);
    996      1.71   thorpej 			sc->sc_if.if_ierrors++;
    997      1.71   thorpej 			sc->sc_if.if_iqdrops++;
    998      1.71   thorpej 			m_freem(m);
    999      1.71   thorpej 		} else {
   1000      1.71   thorpej 			IF_ENQUEUE(&ipintrq, m);
   1001      1.71   thorpej 			schednetisr(NETISR_IP);
   1002      1.65   thorpej 		}
   1003      1.71   thorpej 		splx(s);
   1004  1.83.2.5     skrll #endif
   1005      1.65   thorpej 	}
   1006       1.1       cgd }
   1007       1.1       cgd 
   1008       1.1       cgd /*
   1009       1.1       cgd  * Process an ioctl request.
   1010       1.1       cgd  */
   1011      1.22       cgd int
   1012       1.1       cgd slioctl(ifp, cmd, data)
   1013      1.57  augustss 	struct ifnet *ifp;
   1014      1.32       cgd 	u_long cmd;
   1015       1.1       cgd 	caddr_t data;
   1016       1.1       cgd {
   1017      1.57  augustss 	struct ifaddr *ifa = (struct ifaddr *)data;
   1018      1.57  augustss 	struct ifreq *ifr = (struct ifreq *)data;
   1019      1.69   thorpej 	int s = splnet(), error = 0;
   1020      1.57  augustss 	struct sl_softc *sc = ifp->if_softc;
   1021       1.1       cgd 
   1022       1.1       cgd 	switch (cmd) {
   1023       1.1       cgd 
   1024       1.1       cgd 	case SIOCSIFADDR:
   1025       1.1       cgd 		if (ifa->ifa_addr->sa_family == AF_INET)
   1026       1.1       cgd 			ifp->if_flags |= IFF_UP;
   1027       1.1       cgd 		else
   1028       1.1       cgd 			error = EAFNOSUPPORT;
   1029       1.1       cgd 		break;
   1030       1.1       cgd 
   1031       1.1       cgd 	case SIOCSIFDSTADDR:
   1032       1.1       cgd 		if (ifa->ifa_addr->sa_family != AF_INET)
   1033       1.1       cgd 			error = EAFNOSUPPORT;
   1034       1.1       cgd 		break;
   1035      1.22       cgd 
   1036      1.54      tron 	case SIOCSIFMTU:
   1037      1.54      tron 		if ((ifr->ifr_mtu < 3) || (ifr->ifr_mtu > SLMAX)) {
   1038      1.54      tron 		    error = EINVAL;
   1039      1.54      tron 		    break;
   1040      1.54      tron 		}
   1041      1.54      tron 		sc->sc_if.if_mtu = ifr->ifr_mtu;
   1042      1.54      tron 		break;
   1043      1.54      tron 
   1044      1.54      tron 	case SIOCGIFMTU:
   1045      1.54      tron 		ifr->ifr_mtu = sc->sc_if.if_mtu;
   1046      1.54      tron 		break;
   1047      1.54      tron 
   1048      1.18   hpeyerl 	case SIOCADDMULTI:
   1049      1.18   hpeyerl 	case SIOCDELMULTI:
   1050      1.18   hpeyerl 		if (ifr == 0) {
   1051      1.18   hpeyerl 			error = EAFNOSUPPORT;		/* XXX */
   1052      1.18   hpeyerl 			break;
   1053      1.18   hpeyerl 		}
   1054      1.18   hpeyerl 		switch (ifr->ifr_addr.sa_family) {
   1055      1.18   hpeyerl 
   1056      1.18   hpeyerl #ifdef INET
   1057      1.18   hpeyerl 		case AF_INET:
   1058      1.18   hpeyerl 			break;
   1059      1.18   hpeyerl #endif
   1060      1.22       cgd 
   1061      1.18   hpeyerl 		default:
   1062      1.18   hpeyerl 			error = EAFNOSUPPORT;
   1063      1.18   hpeyerl 			break;
   1064      1.18   hpeyerl 		}
   1065      1.18   hpeyerl 		break;
   1066      1.22       cgd 
   1067       1.1       cgd 	default:
   1068       1.1       cgd 		error = EINVAL;
   1069       1.1       cgd 	}
   1070       1.1       cgd 	splx(s);
   1071       1.1       cgd 	return (error);
   1072       1.1       cgd }
   1073