Home | History | Annotate | Line # | Download | only in net
if_ppp.c revision 1.88
      1  1.88   mycroft /*	$NetBSD: if_ppp.c,v 1.88 2003/10/28 20:16:28 mycroft Exp $	*/
      2  1.37  christos /*	Id: if_ppp.c,v 1.6 1997/03/04 03:33:00 paulus Exp 	*/
      3  1.14       cgd 
      4   1.1   deraadt /*
      5   1.1   deraadt  * if_ppp.c - Point-to-Point Protocol (PPP) Asynchronous driver.
      6   1.1   deraadt  *
      7  1.78    itojun  * Copyright (c) 1984-2000 Carnegie Mellon University. All rights reserved.
      8   1.1   deraadt  *
      9  1.78    itojun  * Redistribution and use in source and binary forms, with or without
     10  1.78    itojun  * modification, are permitted provided that the following conditions
     11  1.78    itojun  * are met:
     12  1.78    itojun  *
     13  1.78    itojun  * 1. Redistributions of source code must retain the above copyright
     14  1.78    itojun  *    notice, this list of conditions and the following disclaimer.
     15  1.78    itojun  *
     16  1.78    itojun  * 2. Redistributions in binary form must reproduce the above copyright
     17  1.78    itojun  *    notice, this list of conditions and the following disclaimer in
     18  1.78    itojun  *    the documentation and/or other materials provided with the
     19  1.78    itojun  *    distribution.
     20  1.78    itojun  *
     21  1.78    itojun  * 3. The name "Carnegie Mellon University" must not be used to
     22  1.78    itojun  *    endorse or promote products derived from this software without
     23  1.78    itojun  *    prior written permission. For permission or any legal
     24  1.78    itojun  *    details, please contact
     25  1.78    itojun  *      Office of Technology Transfer
     26  1.78    itojun  *      Carnegie Mellon University
     27  1.78    itojun  *      5000 Forbes Avenue
     28  1.78    itojun  *      Pittsburgh, PA  15213-3890
     29  1.78    itojun  *      (412) 268-4387, fax: (412) 268-7395
     30  1.78    itojun  *      tech-transfer (at) andrew.cmu.edu
     31  1.78    itojun  *
     32  1.78    itojun  * 4. Redistributions of any form whatsoever must retain the following
     33  1.78    itojun  *    acknowledgment:
     34  1.78    itojun  *    "This product includes software developed by Computing Services
     35  1.78    itojun  *     at Carnegie Mellon University (http://www.cmu.edu/computing/)."
     36  1.78    itojun  *
     37  1.78    itojun  * CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO
     38  1.78    itojun  * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
     39  1.78    itojun  * AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE
     40  1.78    itojun  * FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
     41  1.78    itojun  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
     42  1.78    itojun  * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
     43  1.78    itojun  * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
     44   1.1   deraadt  *
     45   1.1   deraadt  * Based on:
     46   1.1   deraadt  *	@(#)if_sl.c	7.6.1.2 (Berkeley) 2/15/89
     47   1.1   deraadt  *
     48   1.1   deraadt  * Copyright (c) 1987 Regents of the University of California.
     49   1.1   deraadt  * All rights reserved.
     50   1.1   deraadt  *
     51   1.1   deraadt  * Redistribution and use in source and binary forms are permitted
     52   1.1   deraadt  * provided that the above copyright notice and this paragraph are
     53   1.1   deraadt  * duplicated in all such forms and that any documentation,
     54   1.1   deraadt  * advertising materials, and other materials related to such
     55   1.1   deraadt  * distribution and use acknowledge that the software was developed
     56   1.1   deraadt  * by the University of California, Berkeley.  The name of the
     57   1.1   deraadt  * University may not be used to endorse or promote products derived
     58   1.1   deraadt  * from this software without specific prior written permission.
     59   1.1   deraadt  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
     60   1.1   deraadt  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
     61   1.1   deraadt  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
     62   1.1   deraadt  *
     63   1.1   deraadt  * Serial Line interface
     64   1.1   deraadt  *
     65   1.1   deraadt  * Rick Adams
     66   1.1   deraadt  * Center for Seismic Studies
     67   1.1   deraadt  * 1300 N 17th Street, Suite 1450
     68   1.1   deraadt  * Arlington, Virginia 22209
     69   1.1   deraadt  * (703)276-7900
     70   1.1   deraadt  * rick (at) seismo.ARPA
     71   1.1   deraadt  * seismo!rick
     72   1.1   deraadt  *
     73   1.1   deraadt  * Pounded on heavily by Chris Torek (chris (at) mimsy.umd.edu, umcp-cs!chris).
     74   1.1   deraadt  * Converted to 4.3BSD Beta by Chris Torek.
     75   1.1   deraadt  * Other changes made at Berkeley, based in part on code by Kirk Smith.
     76   1.1   deraadt  *
     77   1.1   deraadt  * Converted to 4.3BSD+ 386BSD by Brad Parker (brad (at) cayman.com)
     78   1.1   deraadt  * Added VJ tcp header compression; more unified ioctls
     79   1.1   deraadt  *
     80   1.1   deraadt  * Extensively modified by Paul Mackerras (paulus (at) cs.anu.edu.au).
     81   1.1   deraadt  * Cleaned up a lot of the mbuf-related code to fix bugs that
     82   1.1   deraadt  * caused system crashes and packet corruption.  Changed pppstart
     83   1.1   deraadt  * so that it doesn't just give up with a collision if the whole
     84   1.1   deraadt  * packet doesn't fit in the output ring buffer.
     85   1.1   deraadt  *
     86   1.2    paulus  * Added priority queueing for interactive IP packets, following
     87   1.2    paulus  * the model of if_sl.c, plus hooks for bpf.
     88   1.2    paulus  * Paul Mackerras (paulus (at) cs.anu.edu.au).
     89   1.1   deraadt  */
     90   1.1   deraadt 
     91   1.2    paulus /* from if_sl.c,v 1.11 84/10/04 12:54:47 rick Exp */
     92  1.22    paulus /* from NetBSD: if_ppp.c,v 1.15.2.2 1994/07/28 05:17:58 cgd Exp */
     93   1.2    paulus 
     94  1.68   thorpej /*
     95  1.68   thorpej  * XXX IMP ME HARDER
     96  1.68   thorpej  *
     97  1.68   thorpej  * This is an explanation of that comment.  This code used to use
     98  1.68   thorpej  * splimp() to block both network and tty interrupts.  However,
     99  1.68   thorpej  * that call is deprecated.  So, we have replaced the uses of
    100  1.68   thorpej  * splimp() with splhigh() in order to applomplish what it needs
    101  1.68   thorpej  * to accomplish, and added that happy little comment.
    102  1.68   thorpej  */
    103  1.72     lukem 
    104  1.72     lukem #include <sys/cdefs.h>
    105  1.88   mycroft __KERNEL_RCSID(0, "$NetBSD: if_ppp.c,v 1.88 2003/10/28 20:16:28 mycroft Exp $");
    106  1.68   thorpej 
    107   1.1   deraadt #include "ppp.h"
    108  1.60    itojun 
    109  1.61      onoe #include "opt_inet.h"
    110  1.61      onoe #include "opt_gateway.h"
    111  1.61      onoe #include "opt_ppp.h"
    112  1.61      onoe 
    113  1.59    itojun #ifdef INET
    114   1.1   deraadt #define VJC
    115  1.59    itojun #endif
    116  1.22    paulus #define PPP_COMPRESS
    117   1.1   deraadt 
    118   1.5   mycroft #include <sys/param.h>
    119   1.5   mycroft #include <sys/proc.h>
    120   1.5   mycroft #include <sys/mbuf.h>
    121   1.5   mycroft #include <sys/socket.h>
    122   1.5   mycroft #include <sys/ioctl.h>
    123   1.5   mycroft #include <sys/kernel.h>
    124  1.28  christos #include <sys/systm.h>
    125  1.29    paulus #include <sys/time.h>
    126  1.29    paulus #include <sys/malloc.h>
    127  1.22    paulus 
    128   1.5   mycroft #include <net/if.h>
    129   1.5   mycroft #include <net/if_types.h>
    130   1.5   mycroft #include <net/netisr.h>
    131   1.5   mycroft #include <net/route.h>
    132  1.37  christos #ifdef PPP_FILTER
    133  1.29    paulus #include <net/bpf.h>
    134  1.37  christos #endif
    135   1.5   mycroft 
    136  1.66   thorpej #include <machine/intr.h>
    137  1.66   thorpej 
    138   1.5   mycroft #include <netinet/in.h>
    139   1.5   mycroft #include <netinet/in_systm.h>
    140   1.5   mycroft #include <netinet/in_var.h>
    141  1.59    itojun #ifdef INET
    142   1.5   mycroft #include <netinet/ip.h>
    143   1.1   deraadt #endif
    144   1.1   deraadt 
    145   1.2    paulus #include "bpfilter.h"
    146   1.2    paulus #if NBPFILTER > 0
    147   1.5   mycroft #include <sys/time.h>
    148   1.5   mycroft #include <net/bpf.h>
    149   1.2    paulus #endif
    150   1.2    paulus 
    151  1.47  christos #if defined(PPP_FILTER) || NBPFILTER > 0
    152  1.47  christos #include <net/slip.h>
    153  1.47  christos #endif
    154  1.47  christos 
    155   1.1   deraadt #ifdef VJC
    156   1.8    paulus #include <net/slcompress.h>
    157   1.1   deraadt #endif
    158   1.1   deraadt 
    159  1.22    paulus #include <net/ppp_defs.h>
    160   1.8    paulus #include <net/if_ppp.h>
    161  1.22    paulus #include <net/if_pppvar.h>
    162   1.6       cgd #include <machine/cpu.h>
    163   1.1   deraadt 
    164  1.22    paulus #ifdef PPP_COMPRESS
    165  1.22    paulus #define PACKETPTR	struct mbuf *
    166  1.22    paulus #include <net/ppp-comp.h>
    167  1.22    paulus #endif
    168   1.1   deraadt 
    169  1.37  christos static int	pppsioctl __P((struct ifnet *, u_long, caddr_t));
    170  1.22    paulus static void	ppp_requeue __P((struct ppp_softc *));
    171  1.28  christos static void	ppp_ccp __P((struct ppp_softc *, struct mbuf *m, int rcvd));
    172  1.22    paulus static void	ppp_ccp_closed __P((struct ppp_softc *));
    173  1.22    paulus static void	ppp_inproc __P((struct ppp_softc *, struct mbuf *));
    174  1.22    paulus static void	pppdumpm __P((struct mbuf *m0));
    175  1.75    itojun #ifdef ALTQ
    176  1.75    itojun static void	ppp_ifstart __P((struct ifnet *ifp));
    177  1.75    itojun #endif
    178   1.1   deraadt 
    179  1.66   thorpej #ifndef __HAVE_GENERIC_SOFT_INTERRUPTS
    180  1.66   thorpej void		pppnetisr(void);
    181  1.66   thorpej #endif
    182  1.66   thorpej void		pppintr(void *);
    183  1.66   thorpej 
    184   1.1   deraadt /*
    185   1.1   deraadt  * Some useful mbuf macros not in mbuf.h.
    186   1.1   deraadt  */
    187  1.22    paulus #define M_IS_CLUSTER(m)	((m)->m_flags & M_EXT)
    188  1.22    paulus 
    189   1.1   deraadt #define M_DATASTART(m)	\
    190  1.22    paulus 	(M_IS_CLUSTER(m) ? (m)->m_ext.ext_buf : \
    191   1.1   deraadt 	    (m)->m_flags & M_PKTHDR ? (m)->m_pktdat : (m)->m_dat)
    192   1.1   deraadt 
    193   1.1   deraadt #define M_DATASIZE(m)	\
    194  1.22    paulus 	(M_IS_CLUSTER(m) ? (m)->m_ext.ext_size : \
    195   1.1   deraadt 	    (m)->m_flags & M_PKTHDR ? MHLEN: MLEN)
    196   1.1   deraadt 
    197   1.1   deraadt /*
    198  1.50   thorpej  * We define two link layer specific mbuf flags, to mark high-priority
    199  1.50   thorpej  * packets for output, and received packets following lost/corrupted
    200  1.50   thorpej  * packets.
    201   1.2    paulus  */
    202  1.50   thorpej #define	M_HIGHPRI	M_LINK0	/* output packet for sc_fastq */
    203  1.50   thorpej #define	M_ERRMARK	M_LINK1	/* rx packet following lost/corrupted pkt */
    204  1.77      matt 
    205  1.77      matt struct	ppp_softc ppp_softc[NPPP];
    206   1.2    paulus 
    207  1.22    paulus #ifdef PPP_COMPRESS
    208   1.2    paulus /*
    209  1.22    paulus  * List of compressors we know about.
    210  1.22    paulus  * We leave some space so maybe we can modload compressors.
    211   1.2    paulus  */
    212  1.22    paulus 
    213  1.22    paulus extern struct compressor ppp_bsd_compress;
    214  1.41  christos extern struct compressor ppp_deflate, ppp_deflate_draft;
    215  1.22    paulus 
    216  1.83  christos struct compressor *ppp_compressors[PPP_COMPRESSORS_MAX] = {
    217  1.30    paulus #if DO_BSD_COMPRESS && defined(PPP_BSDCOMP)
    218  1.22    paulus     &ppp_bsd_compress,
    219  1.22    paulus #endif
    220  1.30    paulus #if DO_DEFLATE && defined(PPP_DEFLATE)
    221  1.29    paulus     &ppp_deflate,
    222  1.41  christos     &ppp_deflate_draft,
    223  1.29    paulus #endif
    224  1.22    paulus     NULL
    225  1.22    paulus };
    226  1.22    paulus #endif /* PPP_COMPRESS */
    227   1.2    paulus 
    228  1.37  christos 
    229   1.2    paulus /*
    230   1.1   deraadt  * Called from boot code to establish ppp interfaces.
    231   1.1   deraadt  */
    232   1.1   deraadt void
    233   1.1   deraadt pppattach()
    234   1.1   deraadt {
    235  1.58  augustss     struct ppp_softc *sc;
    236  1.58  augustss     int i = 0;
    237   1.1   deraadt 
    238   1.1   deraadt     for (sc = ppp_softc; i < NPPP; sc++) {
    239  1.31   thorpej 	sc->sc_unit = i;	/* XXX */
    240  1.35  christos 	sprintf(sc->sc_if.if_xname, "ppp%d", i++);
    241  1.57   thorpej 	callout_init(&sc->sc_timo_ch);
    242  1.31   thorpej 	sc->sc_if.if_softc = sc;
    243   1.1   deraadt 	sc->sc_if.if_mtu = PPP_MTU;
    244  1.29    paulus 	sc->sc_if.if_flags = IFF_POINTOPOINT | IFF_MULTICAST;
    245   1.1   deraadt 	sc->sc_if.if_type = IFT_PPP;
    246   1.7   deraadt 	sc->sc_if.if_hdrlen = PPP_HDRLEN;
    247  1.65   thorpej 	sc->sc_if.if_dlt = DLT_NULL;
    248  1.22    paulus 	sc->sc_if.if_ioctl = pppsioctl;
    249   1.1   deraadt 	sc->sc_if.if_output = pppoutput;
    250  1.75    itojun #ifdef ALTQ
    251  1.75    itojun 	sc->sc_if.if_start = ppp_ifstart;
    252  1.75    itojun #endif
    253  1.64   thorpej 	IFQ_SET_MAXLEN(&sc->sc_if.if_snd, IFQ_MAXLEN);
    254   1.1   deraadt 	sc->sc_inq.ifq_maxlen = IFQ_MAXLEN;
    255   1.2    paulus 	sc->sc_fastq.ifq_maxlen = IFQ_MAXLEN;
    256  1.22    paulus 	sc->sc_rawq.ifq_maxlen = IFQ_MAXLEN;
    257  1.64   thorpej 	IFQ_SET_READY(&sc->sc_if.if_snd);
    258   1.1   deraadt 	if_attach(&sc->sc_if);
    259  1.67   thorpej 	if_alloc_sadl(&sc->sc_if);
    260   1.2    paulus #if NBPFILTER > 0
    261  1.63   thorpej 	bpfattach(&sc->sc_if, DLT_NULL, 0);
    262   1.2    paulus #endif
    263   1.1   deraadt     }
    264   1.1   deraadt }
    265   1.1   deraadt 
    266   1.1   deraadt /*
    267   1.8    paulus  * Allocate a ppp interface unit and initialize it.
    268   1.8    paulus  */
    269   1.8    paulus struct ppp_softc *
    270   1.8    paulus pppalloc(pid)
    271   1.8    paulus     pid_t pid;
    272   1.8    paulus {
    273  1.22    paulus     int nppp, i;
    274   1.8    paulus     struct ppp_softc *sc;
    275   1.8    paulus 
    276   1.8    paulus     for (nppp = 0, sc = ppp_softc; nppp < NPPP; nppp++, sc++)
    277   1.8    paulus 	if (sc->sc_xfer == pid) {
    278   1.8    paulus 	    sc->sc_xfer = 0;
    279  1.22    paulus 	    return sc;
    280  1.22    paulus 	}
    281  1.22    paulus     for (nppp = 0, sc = ppp_softc; nppp < NPPP; nppp++, sc++)
    282  1.22    paulus 	if (sc->sc_devp == NULL)
    283   1.8    paulus 	    break;
    284   1.8    paulus     if (nppp >= NPPP)
    285   1.8    paulus 	return NULL;
    286   1.8    paulus 
    287  1.66   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    288  1.66   thorpej     sc->sc_si = softintr_establish(IPL_SOFTNET, pppintr, sc);
    289  1.66   thorpej     if (sc->sc_si == NULL) {
    290  1.66   thorpej 	printf("ppp%d: unable to establish softintr\n", sc->sc_unit);
    291  1.66   thorpej 	return (NULL);
    292  1.66   thorpej     }
    293  1.66   thorpej #endif
    294  1.66   thorpej 
    295   1.8    paulus     sc->sc_flags = 0;
    296   1.8    paulus     sc->sc_mru = PPP_MRU;
    297  1.22    paulus     sc->sc_relinq = NULL;
    298  1.70   thorpej     memset((char *)&sc->sc_stats, 0, sizeof(sc->sc_stats));
    299   1.8    paulus #ifdef VJC
    300  1.29    paulus     MALLOC(sc->sc_comp, struct slcompress *, sizeof(struct slcompress),
    301  1.29    paulus 	   M_DEVBUF, M_NOWAIT);
    302  1.29    paulus     if (sc->sc_comp)
    303  1.39  christos 	sl_compress_init(sc->sc_comp);
    304   1.8    paulus #endif
    305  1.22    paulus #ifdef PPP_COMPRESS
    306  1.22    paulus     sc->sc_xc_state = NULL;
    307  1.22    paulus     sc->sc_rc_state = NULL;
    308  1.22    paulus #endif /* PPP_COMPRESS */
    309  1.22    paulus     for (i = 0; i < NUM_NP; ++i)
    310  1.22    paulus 	sc->sc_npmode[i] = NPMODE_ERROR;
    311  1.22    paulus     sc->sc_npqueue = NULL;
    312  1.22    paulus     sc->sc_npqtail = &sc->sc_npqueue;
    313  1.22    paulus     sc->sc_last_sent = sc->sc_last_recv = time.tv_sec;
    314   1.8    paulus 
    315   1.8    paulus     return sc;
    316   1.8    paulus }
    317   1.8    paulus 
    318   1.8    paulus /*
    319  1.22    paulus  * Deallocate a ppp unit.  Must be called at splsoftnet or higher.
    320   1.8    paulus  */
    321  1.22    paulus void
    322   1.8    paulus pppdealloc(sc)
    323   1.8    paulus     struct ppp_softc *sc;
    324   1.8    paulus {
    325   1.8    paulus     struct mbuf *m;
    326   1.8    paulus 
    327  1.66   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    328  1.66   thorpej     softintr_disestablish(sc->sc_si);
    329  1.66   thorpej #endif
    330   1.8    paulus     if_down(&sc->sc_if);
    331  1.22    paulus     sc->sc_if.if_flags &= ~(IFF_UP|IFF_RUNNING);
    332   1.8    paulus     sc->sc_devp = NULL;
    333   1.8    paulus     sc->sc_xfer = 0;
    334   1.8    paulus     for (;;) {
    335  1.22    paulus 	IF_DEQUEUE(&sc->sc_rawq, m);
    336  1.22    paulus 	if (m == NULL)
    337  1.22    paulus 	    break;
    338  1.22    paulus 	m_freem(m);
    339  1.22    paulus     }
    340  1.22    paulus     for (;;) {
    341   1.8    paulus 	IF_DEQUEUE(&sc->sc_inq, m);
    342   1.8    paulus 	if (m == NULL)
    343   1.8    paulus 	    break;
    344   1.8    paulus 	m_freem(m);
    345   1.8    paulus     }
    346   1.8    paulus     for (;;) {
    347   1.8    paulus 	IF_DEQUEUE(&sc->sc_fastq, m);
    348   1.8    paulus 	if (m == NULL)
    349   1.8    paulus 	    break;
    350   1.8    paulus 	m_freem(m);
    351   1.8    paulus     }
    352  1.22    paulus     while ((m = sc->sc_npqueue) != NULL) {
    353  1.22    paulus 	sc->sc_npqueue = m->m_nextpkt;
    354  1.22    paulus 	m_freem(m);
    355   1.1   deraadt     }
    356  1.22    paulus     if (sc->sc_togo != NULL) {
    357  1.22    paulus 	m_freem(sc->sc_togo);
    358  1.22    paulus 	sc->sc_togo = NULL;
    359  1.22    paulus     }
    360  1.22    paulus #ifdef PPP_COMPRESS
    361  1.22    paulus     ppp_ccp_closed(sc);
    362  1.22    paulus     sc->sc_xc_state = NULL;
    363  1.22    paulus     sc->sc_rc_state = NULL;
    364  1.22    paulus #endif /* PPP_COMPRESS */
    365  1.37  christos #ifdef PPP_FILTER
    366  1.53      tron     if (sc->sc_pass_filt_in.bf_insns != 0) {
    367  1.53      tron 	FREE(sc->sc_pass_filt_in.bf_insns, M_DEVBUF);
    368  1.53      tron 	sc->sc_pass_filt_in.bf_insns = 0;
    369  1.53      tron 	sc->sc_pass_filt_in.bf_len = 0;
    370  1.29    paulus     }
    371  1.53      tron     if (sc->sc_pass_filt_out.bf_insns != 0) {
    372  1.53      tron 	FREE(sc->sc_pass_filt_out.bf_insns, M_DEVBUF);
    373  1.53      tron 	sc->sc_pass_filt_out.bf_insns = 0;
    374  1.53      tron 	sc->sc_pass_filt_out.bf_len = 0;
    375  1.53      tron     }
    376  1.53      tron     if (sc->sc_active_filt_in.bf_insns != 0) {
    377  1.53      tron 	FREE(sc->sc_active_filt_in.bf_insns, M_DEVBUF);
    378  1.53      tron 	sc->sc_active_filt_in.bf_insns = 0;
    379  1.53      tron 	sc->sc_active_filt_in.bf_len = 0;
    380  1.53      tron     }
    381  1.53      tron     if (sc->sc_active_filt_out.bf_insns != 0) {
    382  1.53      tron 	FREE(sc->sc_active_filt_out.bf_insns, M_DEVBUF);
    383  1.53      tron 	sc->sc_active_filt_out.bf_insns = 0;
    384  1.53      tron 	sc->sc_active_filt_out.bf_len = 0;
    385  1.29    paulus     }
    386  1.37  christos #endif /* PPP_FILTER */
    387  1.29    paulus #ifdef VJC
    388  1.29    paulus     if (sc->sc_comp != 0) {
    389  1.29    paulus 	FREE(sc->sc_comp, M_DEVBUF);
    390  1.29    paulus 	sc->sc_comp = 0;
    391  1.29    paulus     }
    392  1.29    paulus #endif
    393   1.1   deraadt }
    394   1.1   deraadt 
    395   1.1   deraadt /*
    396  1.22    paulus  * Ioctl routine for generic ppp devices.
    397   1.1   deraadt  */
    398   1.1   deraadt int
    399  1.22    paulus pppioctl(sc, cmd, data, flag, p)
    400  1.22    paulus     struct ppp_softc *sc;
    401  1.20       cgd     u_long cmd;
    402   1.1   deraadt     caddr_t data;
    403  1.20       cgd     int flag;
    404   1.8    paulus     struct proc *p;
    405   1.1   deraadt {
    406  1.71  jdolecek     int s, error, flags, mru, npx;
    407  1.71  jdolecek     u_int nb;
    408  1.22    paulus     struct ppp_option_data *odp;
    409  1.22    paulus     struct compressor **cp;
    410  1.22    paulus     struct npioctl *npi;
    411  1.22    paulus     time_t t;
    412  1.37  christos #ifdef PPP_FILTER
    413  1.86  christos /*###413 [cc] warning: `bp' might be used uninitialized in this function%%%*/
    414  1.29    paulus     struct bpf_program *bp, *nbp;
    415  1.29    paulus     struct bpf_insn *newcode, *oldcode;
    416  1.29    paulus     int newcodelen;
    417  1.37  christos #endif /* PPP_FILTER */
    418  1.22    paulus #ifdef	PPP_COMPRESS
    419  1.22    paulus     u_char ccp_option[CCP_MAX_OPTION_LENGTH];
    420  1.22    paulus #endif
    421   1.8    paulus 
    422   1.1   deraadt     switch (cmd) {
    423   1.1   deraadt     case FIONREAD:
    424   1.1   deraadt 	*(int *)data = sc->sc_inq.ifq_len;
    425   1.1   deraadt 	break;
    426   1.1   deraadt 
    427   1.1   deraadt     case PPPIOCGUNIT:
    428  1.31   thorpej 	*(int *)data = sc->sc_unit;	/* XXX */
    429   1.1   deraadt 	break;
    430   1.1   deraadt 
    431   1.1   deraadt     case PPPIOCGFLAGS:
    432   1.1   deraadt 	*(u_int *)data = sc->sc_flags;
    433  1.85  christos 	break;
    434  1.85  christos 
    435  1.85  christos     case PPPIOCGRAWIN:
    436  1.85  christos 	{
    437  1.85  christos 	    struct ppp_rawin *rwin = (struct ppp_rawin *)data;
    438  1.85  christos 	    u_char p, q = 0;
    439  1.85  christos 
    440  1.85  christos 	    for (p = sc->sc_rawin_start; p < sizeof(sc->sc_rawin.buf);)
    441  1.85  christos 		rwin->buf[q++] = sc->sc_rawin.buf[p++];
    442  1.85  christos 
    443  1.85  christos 	    for (p = 0; p < sc->sc_rawin_start;)
    444  1.85  christos 		rwin->buf[q++] = sc->sc_rawin.buf[p++];
    445  1.85  christos 
    446  1.85  christos 	    rwin->count = sc->sc_rawin.count;
    447  1.85  christos 	}
    448   1.1   deraadt 	break;
    449   1.1   deraadt 
    450   1.1   deraadt     case PPPIOCSFLAGS:
    451  1.28  christos 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    452   1.1   deraadt 	    return (error);
    453   1.2    paulus 	flags = *(int *)data & SC_MASK;
    454  1.22    paulus 	s = splsoftnet();
    455  1.22    paulus #ifdef PPP_COMPRESS
    456  1.22    paulus 	if (sc->sc_flags & SC_CCP_OPEN && !(flags & SC_CCP_OPEN))
    457  1.22    paulus 	    ppp_ccp_closed(sc);
    458  1.22    paulus #endif
    459  1.68   thorpej 	splhigh();	/* XXX IMP ME HARDER */
    460   1.2    paulus 	sc->sc_flags = (sc->sc_flags & ~SC_MASK) | flags;
    461   1.1   deraadt 	splx(s);
    462   1.1   deraadt 	break;
    463   1.1   deraadt 
    464   1.2    paulus     case PPPIOCSMRU:
    465  1.28  christos 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    466   1.2    paulus 	    return (error);
    467   1.2    paulus 	mru = *(int *)data;
    468  1.62       wiz 	if (mru >= PPP_MINMRU && mru <= PPP_MAXMRU)
    469   1.2    paulus 	    sc->sc_mru = mru;
    470   1.2    paulus 	break;
    471   1.2    paulus 
    472   1.2    paulus     case PPPIOCGMRU:
    473   1.2    paulus 	*(int *)data = sc->sc_mru;
    474   1.2    paulus 	break;
    475   1.2    paulus 
    476   1.8    paulus #ifdef VJC
    477   1.8    paulus     case PPPIOCSMAXCID:
    478  1.28  christos 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    479   1.8    paulus 	    return (error);
    480  1.29    paulus 	if (sc->sc_comp) {
    481  1.29    paulus 	    s = splsoftnet();
    482  1.40  christos 	    sl_compress_setup(sc->sc_comp, *(int *)data);
    483  1.29    paulus 	    splx(s);
    484  1.29    paulus 	}
    485   1.8    paulus 	break;
    486   1.8    paulus #endif
    487   1.8    paulus 
    488   1.8    paulus     case PPPIOCXFERUNIT:
    489  1.28  christos 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    490   1.8    paulus 	    return (error);
    491   1.8    paulus 	sc->sc_xfer = p->p_pid;
    492   1.8    paulus 	break;
    493   1.8    paulus 
    494  1.22    paulus #ifdef PPP_COMPRESS
    495  1.22    paulus     case PPPIOCSCOMPRESS:
    496  1.28  christos 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    497  1.22    paulus 	    return (error);
    498  1.22    paulus 	odp = (struct ppp_option_data *) data;
    499  1.22    paulus 	nb = odp->length;
    500  1.22    paulus 	if (nb > sizeof(ccp_option))
    501  1.22    paulus 	    nb = sizeof(ccp_option);
    502  1.28  christos 	if ((error = copyin(odp->ptr, ccp_option, nb)) != 0)
    503  1.22    paulus 	    return (error);
    504  1.22    paulus 	if (ccp_option[1] < 2)	/* preliminary check on the length byte */
    505  1.22    paulus 	    return (EINVAL);
    506  1.22    paulus 	for (cp = ppp_compressors; *cp != NULL; ++cp)
    507  1.22    paulus 	    if ((*cp)->compress_proto == ccp_option[0]) {
    508  1.22    paulus 		/*
    509  1.22    paulus 		 * Found a handler for the protocol - try to allocate
    510  1.22    paulus 		 * a compressor or decompressor.
    511  1.22    paulus 		 */
    512  1.22    paulus 		error = 0;
    513  1.22    paulus 		if (odp->transmit) {
    514  1.22    paulus 		    s = splsoftnet();
    515  1.22    paulus 		    if (sc->sc_xc_state != NULL)
    516  1.22    paulus 			(*sc->sc_xcomp->comp_free)(sc->sc_xc_state);
    517  1.22    paulus 		    sc->sc_xcomp = *cp;
    518  1.22    paulus 		    sc->sc_xc_state = (*cp)->comp_alloc(ccp_option, nb);
    519  1.22    paulus 		    if (sc->sc_xc_state == NULL) {
    520  1.22    paulus 			if (sc->sc_flags & SC_DEBUG)
    521  1.35  christos 			    printf("%s: comp_alloc failed\n",
    522  1.34  christos 				sc->sc_if.if_xname);
    523  1.22    paulus 			error = ENOBUFS;
    524  1.22    paulus 		    }
    525  1.68   thorpej 		    splhigh();	/* XXX IMP ME HARDER */
    526  1.22    paulus 		    sc->sc_flags &= ~SC_COMP_RUN;
    527  1.22    paulus 		    splx(s);
    528  1.22    paulus 		} else {
    529  1.22    paulus 		    s = splsoftnet();
    530  1.22    paulus 		    if (sc->sc_rc_state != NULL)
    531  1.22    paulus 			(*sc->sc_rcomp->decomp_free)(sc->sc_rc_state);
    532  1.22    paulus 		    sc->sc_rcomp = *cp;
    533  1.22    paulus 		    sc->sc_rc_state = (*cp)->decomp_alloc(ccp_option, nb);
    534  1.22    paulus 		    if (sc->sc_rc_state == NULL) {
    535  1.22    paulus 			if (sc->sc_flags & SC_DEBUG)
    536  1.35  christos 			    printf("%s: decomp_alloc failed\n",
    537  1.34  christos 				sc->sc_if.if_xname);
    538  1.22    paulus 			error = ENOBUFS;
    539  1.22    paulus 		    }
    540  1.68   thorpej 		    splhigh();	/* XXX IMP ME HARDER */
    541  1.22    paulus 		    sc->sc_flags &= ~SC_DECOMP_RUN;
    542  1.22    paulus 		    splx(s);
    543  1.22    paulus 		}
    544  1.22    paulus 		return (error);
    545  1.22    paulus 	    }
    546  1.22    paulus 	if (sc->sc_flags & SC_DEBUG)
    547  1.35  christos 	    printf("%s: no compressor for [%x %x %x], %x\n",
    548  1.34  christos 		sc->sc_if.if_xname, ccp_option[0], ccp_option[1],
    549  1.34  christos 		ccp_option[2], nb);
    550  1.22    paulus 	return (EINVAL);	/* no handler found */
    551  1.22    paulus #endif /* PPP_COMPRESS */
    552  1.22    paulus 
    553  1.22    paulus     case PPPIOCGNPMODE:
    554  1.22    paulus     case PPPIOCSNPMODE:
    555  1.22    paulus 	npi = (struct npioctl *) data;
    556  1.22    paulus 	switch (npi->protocol) {
    557  1.22    paulus 	case PPP_IP:
    558  1.22    paulus 	    npx = NP_IP;
    559  1.22    paulus 	    break;
    560  1.55    itojun 	case PPP_IPV6:
    561  1.55    itojun 	    npx = NP_IPV6;
    562  1.55    itojun 	    break;
    563  1.22    paulus 	default:
    564  1.22    paulus 	    return EINVAL;
    565  1.22    paulus 	}
    566  1.22    paulus 	if (cmd == PPPIOCGNPMODE) {
    567  1.22    paulus 	    npi->mode = sc->sc_npmode[npx];
    568  1.22    paulus 	} else {
    569  1.28  christos 	    if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    570  1.22    paulus 		return (error);
    571  1.22    paulus 	    if (npi->mode != sc->sc_npmode[npx]) {
    572  1.68   thorpej 		s = splnet();
    573  1.22    paulus 		sc->sc_npmode[npx] = npi->mode;
    574  1.22    paulus 		if (npi->mode != NPMODE_QUEUE) {
    575  1.22    paulus 		    ppp_requeue(sc);
    576  1.44  sommerfe 		    ppp_restart(sc);
    577  1.22    paulus 		}
    578  1.22    paulus 		splx(s);
    579  1.22    paulus 	    }
    580  1.22    paulus 	}
    581  1.22    paulus 	break;
    582  1.22    paulus 
    583  1.22    paulus     case PPPIOCGIDLE:
    584  1.22    paulus 	s = splsoftnet();
    585  1.22    paulus 	t = time.tv_sec;
    586  1.22    paulus 	((struct ppp_idle *)data)->xmit_idle = t - sc->sc_last_sent;
    587  1.22    paulus 	((struct ppp_idle *)data)->recv_idle = t - sc->sc_last_recv;
    588  1.22    paulus 	splx(s);
    589  1.22    paulus 	break;
    590  1.22    paulus 
    591  1.37  christos #ifdef PPP_FILTER
    592  1.29    paulus     case PPPIOCSPASS:
    593  1.29    paulus     case PPPIOCSACTIVE:
    594  1.52   thorpej 	/* These are no longer supported. */
    595  1.52   thorpej 	return EOPNOTSUPP;
    596  1.52   thorpej 
    597  1.52   thorpej     case PPPIOCSIPASS:
    598  1.52   thorpej     case PPPIOCSOPASS:
    599  1.52   thorpej     case PPPIOCSIACTIVE:
    600  1.52   thorpej     case PPPIOCSOACTIVE:
    601  1.29    paulus 	nbp = (struct bpf_program *) data;
    602  1.29    paulus 	if ((unsigned) nbp->bf_len > BPF_MAXINSNS)
    603  1.29    paulus 	    return EINVAL;
    604  1.29    paulus 	newcodelen = nbp->bf_len * sizeof(struct bpf_insn);
    605  1.29    paulus 	if (newcodelen != 0) {
    606  1.52   thorpej 	    newcode = malloc(newcodelen, M_DEVBUF, M_WAITOK);
    607  1.52   thorpej 	    /* WAITOK -- malloc() never fails. */
    608  1.29    paulus 	    if ((error = copyin((caddr_t)nbp->bf_insns, (caddr_t)newcode,
    609  1.29    paulus 			       newcodelen)) != 0) {
    610  1.52   thorpej 		free(newcode, M_DEVBUF);
    611  1.29    paulus 		return error;
    612  1.29    paulus 	    }
    613  1.29    paulus 	    if (!bpf_validate(newcode, nbp->bf_len)) {
    614  1.52   thorpej 		free(newcode, M_DEVBUF);
    615  1.29    paulus 		return EINVAL;
    616  1.29    paulus 	    }
    617  1.29    paulus 	} else
    618  1.29    paulus 	    newcode = 0;
    619  1.52   thorpej 	switch (cmd) {
    620  1.52   thorpej 	case PPPIOCSIPASS:
    621  1.52   thorpej 	    bp = &sc->sc_pass_filt_in;
    622  1.52   thorpej 	    break;
    623  1.52   thorpej 
    624  1.52   thorpej 	case PPPIOCSOPASS:
    625  1.52   thorpej 	    bp = &sc->sc_pass_filt_out;
    626  1.52   thorpej 	    break;
    627  1.52   thorpej 
    628  1.52   thorpej 	case PPPIOCSIACTIVE:
    629  1.52   thorpej 	    bp = &sc->sc_active_filt_in;
    630  1.52   thorpej 	    break;
    631  1.52   thorpej 
    632  1.52   thorpej 	case PPPIOCSOACTIVE:
    633  1.52   thorpej 	    bp = &sc->sc_active_filt_out;
    634  1.86  christos 	    break;
    635  1.86  christos 	default:
    636  1.88   mycroft 	    free(newcode, M_DEVBUF);
    637  1.87   mycroft 	    return (EPASSTHROUGH);
    638  1.52   thorpej 	}
    639  1.29    paulus 	oldcode = bp->bf_insns;
    640  1.68   thorpej 	s = splnet();
    641  1.29    paulus 	bp->bf_len = nbp->bf_len;
    642  1.29    paulus 	bp->bf_insns = newcode;
    643  1.29    paulus 	splx(s);
    644  1.29    paulus 	if (oldcode != 0)
    645  1.52   thorpej 	    free(oldcode, M_DEVBUF);
    646  1.29    paulus 	break;
    647  1.52   thorpej #endif /* PPP_FILTER */
    648  1.29    paulus 
    649   1.1   deraadt     default:
    650  1.76    atatat 	return (EPASSTHROUGH);
    651   1.1   deraadt     }
    652   1.1   deraadt     return (0);
    653   1.1   deraadt }
    654   1.1   deraadt 
    655   1.1   deraadt /*
    656  1.22    paulus  * Process an ioctl request to the ppp network interface.
    657   1.1   deraadt  */
    658  1.37  christos static int
    659  1.22    paulus pppsioctl(ifp, cmd, data)
    660  1.58  augustss     struct ifnet *ifp;
    661  1.22    paulus     u_long cmd;
    662  1.22    paulus     caddr_t data;
    663  1.22    paulus {
    664  1.58  augustss     struct proc *p = curproc;	/* XXX */
    665  1.58  augustss     struct ppp_softc *sc = ifp->if_softc;
    666  1.58  augustss     struct ifaddr *ifa = (struct ifaddr *)data;
    667  1.58  augustss     struct ifreq *ifr = (struct ifreq *)data;
    668  1.22    paulus     struct ppp_stats *psp;
    669  1.22    paulus #ifdef	PPP_COMPRESS
    670  1.22    paulus     struct ppp_comp_stats *pcp;
    671  1.22    paulus #endif
    672  1.68   thorpej     int s = splnet(), error = 0;
    673  1.22    paulus 
    674  1.22    paulus     switch (cmd) {
    675  1.22    paulus     case SIOCSIFFLAGS:
    676  1.22    paulus 	if ((ifp->if_flags & IFF_RUNNING) == 0)
    677  1.22    paulus 	    ifp->if_flags &= ~IFF_UP;
    678  1.22    paulus 	break;
    679  1.22    paulus 
    680  1.22    paulus     case SIOCSIFADDR:
    681  1.55    itojun 	switch (ifa->ifa_addr->sa_family) {
    682  1.55    itojun #ifdef INET
    683  1.55    itojun 	case AF_INET:
    684  1.55    itojun 	    break;
    685  1.55    itojun #endif
    686  1.55    itojun #ifdef INET6
    687  1.55    itojun 	case AF_INET6:
    688  1.55    itojun 	    break;
    689  1.55    itojun #endif
    690  1.55    itojun 	default:
    691  1.49  christos 	    error = EAFNOSUPPORT;
    692  1.55    itojun 	    break;
    693  1.55    itojun 	}
    694  1.49  christos 	break;
    695  1.49  christos 
    696  1.22    paulus     case SIOCSIFDSTADDR:
    697  1.55    itojun 	switch (ifa->ifa_addr->sa_family) {
    698  1.55    itojun #ifdef INET
    699  1.55    itojun 	case AF_INET:
    700  1.55    itojun 	    break;
    701  1.55    itojun #endif
    702  1.55    itojun #ifdef INET6
    703  1.55    itojun 	case AF_INET6:
    704  1.55    itojun 	    break;
    705  1.55    itojun #endif
    706  1.55    itojun 	default:
    707  1.22    paulus 	    error = EAFNOSUPPORT;
    708  1.55    itojun 	    break;
    709  1.55    itojun 	}
    710  1.22    paulus 	break;
    711  1.22    paulus 
    712  1.22    paulus     case SIOCSIFMTU:
    713  1.37  christos 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    714  1.37  christos 	    break;
    715  1.22    paulus 	sc->sc_if.if_mtu = ifr->ifr_mtu;
    716  1.22    paulus 	break;
    717  1.22    paulus 
    718  1.37  christos     case SIOCGIFMTU:
    719  1.37  christos 	ifr->ifr_mtu = sc->sc_if.if_mtu;
    720  1.37  christos 	break;
    721  1.37  christos 
    722  1.29    paulus     case SIOCADDMULTI:
    723  1.29    paulus     case SIOCDELMULTI:
    724  1.29    paulus 	if (ifr == 0) {
    725  1.29    paulus 	    error = EAFNOSUPPORT;
    726  1.29    paulus 	    break;
    727  1.29    paulus 	}
    728  1.84    itojun 	switch (ifr->ifr_addr.sa_family) {
    729  1.29    paulus #ifdef INET
    730  1.29    paulus 	case AF_INET:
    731  1.29    paulus 	    break;
    732  1.29    paulus #endif
    733  1.55    itojun #ifdef INET6
    734  1.55    itojun 	case AF_INET6:
    735  1.55    itojun 	    break;
    736  1.55    itojun #endif
    737  1.29    paulus 	default:
    738  1.29    paulus 	    error = EAFNOSUPPORT;
    739  1.29    paulus 	    break;
    740  1.29    paulus 	}
    741  1.29    paulus 	break;
    742  1.29    paulus 
    743  1.22    paulus     case SIOCGPPPSTATS:
    744  1.22    paulus 	psp = &((struct ifpppstatsreq *) data)->stats;
    745  1.70   thorpej 	memset(psp, 0, sizeof(*psp));
    746  1.29    paulus 	psp->p = sc->sc_stats;
    747  1.29    paulus #if defined(VJC) && !defined(SL_NO_STATS)
    748  1.29    paulus 	if (sc->sc_comp) {
    749  1.29    paulus 	    psp->vj.vjs_packets = sc->sc_comp->sls_packets;
    750  1.29    paulus 	    psp->vj.vjs_compressed = sc->sc_comp->sls_compressed;
    751  1.29    paulus 	    psp->vj.vjs_searches = sc->sc_comp->sls_searches;
    752  1.29    paulus 	    psp->vj.vjs_misses = sc->sc_comp->sls_misses;
    753  1.29    paulus 	    psp->vj.vjs_uncompressedin = sc->sc_comp->sls_uncompressedin;
    754  1.29    paulus 	    psp->vj.vjs_compressedin = sc->sc_comp->sls_compressedin;
    755  1.29    paulus 	    psp->vj.vjs_errorin = sc->sc_comp->sls_errorin;
    756  1.29    paulus 	    psp->vj.vjs_tossed = sc->sc_comp->sls_tossed;
    757  1.29    paulus 	}
    758  1.22    paulus #endif /* VJC */
    759  1.22    paulus 	break;
    760  1.22    paulus 
    761  1.22    paulus #ifdef PPP_COMPRESS
    762  1.22    paulus     case SIOCGPPPCSTATS:
    763  1.22    paulus 	pcp = &((struct ifpppcstatsreq *) data)->stats;
    764  1.70   thorpej 	memset(pcp, 0, sizeof(*pcp));
    765  1.22    paulus 	if (sc->sc_xc_state != NULL)
    766  1.22    paulus 	    (*sc->sc_xcomp->comp_stat)(sc->sc_xc_state, &pcp->c);
    767  1.22    paulus 	if (sc->sc_rc_state != NULL)
    768  1.22    paulus 	    (*sc->sc_rcomp->decomp_stat)(sc->sc_rc_state, &pcp->d);
    769  1.22    paulus 	break;
    770  1.22    paulus #endif /* PPP_COMPRESS */
    771   1.1   deraadt 
    772  1.22    paulus     default:
    773  1.22    paulus 	error = EINVAL;
    774  1.22    paulus     }
    775  1.22    paulus     splx(s);
    776  1.22    paulus     return (error);
    777   1.1   deraadt }
    778   1.1   deraadt 
    779   1.1   deraadt /*
    780   1.1   deraadt  * Queue a packet.  Start transmission if not active.
    781   1.1   deraadt  * Packet is placed in Information field of PPP frame.
    782   1.1   deraadt  */
    783   1.1   deraadt int
    784   1.9   mycroft pppoutput(ifp, m0, dst, rtp)
    785   1.1   deraadt     struct ifnet *ifp;
    786   1.1   deraadt     struct mbuf *m0;
    787   1.1   deraadt     struct sockaddr *dst;
    788   1.9   mycroft     struct rtentry *rtp;
    789   1.1   deraadt {
    790  1.58  augustss     struct ppp_softc *sc = ifp->if_softc;
    791   1.2    paulus     int protocol, address, control;
    792   1.2    paulus     u_char *cp;
    793   1.2    paulus     int s, error;
    794  1.59    itojun #ifdef INET
    795   1.2    paulus     struct ip *ip;
    796  1.59    itojun #endif
    797   1.2    paulus     struct ifqueue *ifq;
    798  1.22    paulus     enum NPmode mode;
    799  1.37  christos     int len;
    800  1.81    itojun     struct mbuf *m;
    801  1.64   thorpej     ALTQ_DECL(struct altq_pktattr pktattr;)
    802   1.1   deraadt 
    803   1.8    paulus     if (sc->sc_devp == NULL || (ifp->if_flags & IFF_RUNNING) == 0
    804  1.28  christos 	|| ((ifp->if_flags & IFF_UP) == 0 && dst->sa_family != AF_UNSPEC)) {
    805   1.1   deraadt 	error = ENETDOWN;	/* sort of */
    806   1.1   deraadt 	goto bad;
    807   1.1   deraadt     }
    808   1.1   deraadt 
    809  1.64   thorpej     IFQ_CLASSIFY(&ifp->if_snd, m0, dst->sa_family, &pktattr);
    810  1.64   thorpej 
    811   1.1   deraadt     /*
    812   1.1   deraadt      * Compute PPP header.
    813   1.1   deraadt      */
    814  1.22    paulus     m0->m_flags &= ~M_HIGHPRI;
    815   1.1   deraadt     switch (dst->sa_family) {
    816   1.1   deraadt #ifdef INET
    817   1.1   deraadt     case AF_INET:
    818  1.22    paulus 	address = PPP_ALLSTATIONS;
    819  1.22    paulus 	control = PPP_UI;
    820   1.1   deraadt 	protocol = PPP_IP;
    821  1.22    paulus 	mode = sc->sc_npmode[NP_IP];
    822  1.22    paulus 
    823   1.2    paulus 	/*
    824  1.22    paulus 	 * If this packet has the "low delay" bit set in the IP header,
    825  1.22    paulus 	 * put it on the fastq instead.
    826   1.2    paulus 	 */
    827  1.22    paulus 	ip = mtod(m0, struct ip *);
    828  1.22    paulus 	if (ip->ip_tos & IPTOS_LOWDELAY)
    829  1.22    paulus 	    m0->m_flags |= M_HIGHPRI;
    830   1.1   deraadt 	break;
    831   1.1   deraadt #endif
    832  1.55    itojun #ifdef INET6
    833  1.55    itojun     case AF_INET6:
    834  1.55    itojun 	address = PPP_ALLSTATIONS;	/*XXX*/
    835  1.55    itojun 	control = PPP_UI;		/*XXX*/
    836  1.55    itojun 	protocol = PPP_IPV6;
    837  1.55    itojun 	mode = sc->sc_npmode[NP_IPV6];
    838  1.55    itojun 
    839  1.55    itojun #if 0	/* XXX flowinfo/traffic class, maybe? */
    840  1.55    itojun 	/*
    841  1.55    itojun 	 * If this packet has the "low delay" bit set in the IP header,
    842  1.55    itojun 	 * put it on the fastq instead.
    843  1.55    itojun 	 */
    844  1.55    itojun 	ip = mtod(m0, struct ip *);
    845  1.55    itojun 	if (ip->ip_tos & IPTOS_LOWDELAY)
    846  1.55    itojun 	    m0->m_flags |= M_HIGHPRI;
    847  1.56   hannken #endif
    848  1.55    itojun 	break;
    849  1.55    itojun #endif
    850   1.1   deraadt     case AF_UNSPEC:
    851  1.22    paulus 	address = PPP_ADDRESS(dst->sa_data);
    852  1.22    paulus 	control = PPP_CONTROL(dst->sa_data);
    853  1.22    paulus 	protocol = PPP_PROTOCOL(dst->sa_data);
    854  1.22    paulus 	mode = NPMODE_PASS;
    855   1.1   deraadt 	break;
    856   1.1   deraadt     default:
    857  1.35  christos 	printf("%s: af%d not supported\n", ifp->if_xname, dst->sa_family);
    858   1.1   deraadt 	error = EAFNOSUPPORT;
    859   1.1   deraadt 	goto bad;
    860   1.1   deraadt     }
    861   1.1   deraadt 
    862   1.1   deraadt     /*
    863  1.22    paulus      * Drop this packet, or return an error, if necessary.
    864  1.22    paulus      */
    865  1.22    paulus     if (mode == NPMODE_ERROR) {
    866  1.22    paulus 	error = ENETDOWN;
    867  1.22    paulus 	goto bad;
    868  1.22    paulus     }
    869  1.22    paulus     if (mode == NPMODE_DROP) {
    870  1.22    paulus 	error = 0;
    871  1.22    paulus 	goto bad;
    872  1.22    paulus     }
    873  1.22    paulus 
    874  1.22    paulus     /*
    875   1.1   deraadt      * Add PPP header.  If no space in first mbuf, allocate another.
    876   1.2    paulus      * (This assumes M_LEADINGSPACE is always 0 for a cluster mbuf.)
    877   1.1   deraadt      */
    878   1.7   deraadt     if (M_LEADINGSPACE(m0) < PPP_HDRLEN) {
    879   1.7   deraadt 	m0 = m_prepend(m0, PPP_HDRLEN, M_DONTWAIT);
    880   1.1   deraadt 	if (m0 == 0) {
    881   1.1   deraadt 	    error = ENOBUFS;
    882   1.1   deraadt 	    goto bad;
    883   1.1   deraadt 	}
    884   1.1   deraadt 	m0->m_len = 0;
    885   1.1   deraadt     } else
    886   1.7   deraadt 	m0->m_data -= PPP_HDRLEN;
    887   1.1   deraadt 
    888   1.1   deraadt     cp = mtod(m0, u_char *);
    889   1.2    paulus     *cp++ = address;
    890   1.2    paulus     *cp++ = control;
    891   1.2    paulus     *cp++ = protocol >> 8;
    892   1.1   deraadt     *cp++ = protocol & 0xff;
    893   1.7   deraadt     m0->m_len += PPP_HDRLEN;
    894  1.81    itojun 
    895  1.81    itojun     len = 0;
    896  1.81    itojun     for (m = m0; m != 0; m = m->m_next)
    897  1.81    itojun 	len += m->m_len;
    898  1.29    paulus 
    899   1.8    paulus     if (sc->sc_flags & SC_LOG_OUTPKT) {
    900  1.35  christos 	printf("%s output: ", ifp->if_xname);
    901  1.22    paulus 	pppdumpm(m0);
    902   1.1   deraadt     }
    903   1.1   deraadt 
    904  1.29    paulus     if ((protocol & 0x8000) == 0) {
    905  1.37  christos #ifdef PPP_FILTER
    906  1.37  christos 	/*
    907  1.37  christos 	 * Apply the pass and active filters to the packet,
    908  1.37  christos 	 * but only if it is a data packet.
    909  1.37  christos 	 */
    910  1.52   thorpej 	if (sc->sc_pass_filt_out.bf_insns != 0
    911  1.52   thorpej 	    && bpf_filter(sc->sc_pass_filt_out.bf_insns, (u_char *) m0,
    912  1.29    paulus 			  len, 0) == 0) {
    913  1.29    paulus 	    error = 0;		/* drop this packet */
    914  1.29    paulus 	    goto bad;
    915  1.29    paulus 	}
    916  1.29    paulus 
    917  1.29    paulus 	/*
    918  1.29    paulus 	 * Update the time we sent the most recent packet.
    919  1.29    paulus 	 */
    920  1.52   thorpej 	if (sc->sc_active_filt_out.bf_insns == 0
    921  1.52   thorpej 	    || bpf_filter(sc->sc_active_filt_out.bf_insns, (u_char *) m0,
    922  1.52   thorpej 	    		  len, 0))
    923  1.29    paulus 	    sc->sc_last_sent = time.tv_sec;
    924  1.37  christos #else
    925  1.37  christos 	/*
    926  1.37  christos 	 * Update the time we sent the most recent packet.
    927  1.37  christos 	 */
    928  1.37  christos 	sc->sc_last_sent = time.tv_sec;
    929  1.37  christos #endif /* PPP_FILTER */
    930  1.29    paulus     }
    931  1.29    paulus 
    932   1.2    paulus #if NBPFILTER > 0
    933  1.22    paulus     /*
    934  1.22    paulus      * See if bpf wants to look at the packet.
    935  1.22    paulus      */
    936  1.63   thorpej     if (sc->sc_if.if_bpf)
    937  1.63   thorpej 	bpf_mtap(sc->sc_if.if_bpf, m0);
    938   1.2    paulus #endif
    939   1.2    paulus 
    940   1.2    paulus     /*
    941   1.2    paulus      * Put the packet on the appropriate queue.
    942   1.2    paulus      */
    943  1.68   thorpej     s = splnet();
    944  1.22    paulus     if (mode == NPMODE_QUEUE) {
    945  1.22    paulus 	/* XXX we should limit the number of packets on this queue */
    946  1.22    paulus 	*sc->sc_npqtail = m0;
    947  1.22    paulus 	m0->m_nextpkt = NULL;
    948  1.22    paulus 	sc->sc_npqtail = &m0->m_nextpkt;
    949  1.22    paulus     } else {
    950  1.64   thorpej 	if ((m0->m_flags & M_HIGHPRI)
    951  1.64   thorpej #ifdef ALTQ
    952  1.64   thorpej 	    && ALTQ_IS_ENABLED(&sc->sc_if.if_snd) == 0
    953  1.64   thorpej #endif
    954  1.64   thorpej 	    ) {
    955  1.64   thorpej 	    ifq = &sc->sc_fastq;
    956  1.64   thorpej 	    if (IF_QFULL(ifq) && dst->sa_family != AF_UNSPEC) {
    957  1.64   thorpej 	        IF_DROP(ifq);
    958  1.64   thorpej 		splx(s);
    959  1.64   thorpej 		error = ENOBUFS;
    960  1.64   thorpej 		goto bad;
    961  1.64   thorpej 	    } else {
    962  1.64   thorpej 		IF_ENQUEUE(ifq, m0);
    963  1.64   thorpej 		error = 0;
    964  1.64   thorpej 	    }
    965  1.64   thorpej 	} else
    966  1.64   thorpej 	    IFQ_ENQUEUE(&sc->sc_if.if_snd, m0, &pktattr, error);
    967  1.64   thorpej 	if (error) {
    968  1.22    paulus 	    splx(s);
    969  1.22    paulus 	    sc->sc_if.if_oerrors++;
    970  1.29    paulus 	    sc->sc_stats.ppp_oerrors++;
    971  1.64   thorpej 	    return (error);
    972  1.22    paulus 	}
    973  1.44  sommerfe 	ppp_restart(sc);
    974   1.1   deraadt     }
    975  1.29    paulus     ifp->if_opackets++;
    976  1.29    paulus     ifp->if_obytes += len;
    977   1.8    paulus 
    978   1.1   deraadt     splx(s);
    979   1.1   deraadt     return (0);
    980   1.1   deraadt 
    981   1.1   deraadt bad:
    982   1.1   deraadt     m_freem(m0);
    983   1.1   deraadt     return (error);
    984   1.1   deraadt }
    985   1.1   deraadt 
    986   1.1   deraadt /*
    987  1.22    paulus  * After a change in the NPmode for some NP, move packets from the
    988  1.22    paulus  * npqueue to the send queue or the fast queue as appropriate.
    989  1.68   thorpej  * Should be called at splnet, since we muck with the queues.
    990   1.8    paulus  */
    991  1.22    paulus static void
    992  1.22    paulus ppp_requeue(sc)
    993   1.8    paulus     struct ppp_softc *sc;
    994   1.8    paulus {
    995  1.22    paulus     struct mbuf *m, **mpp;
    996  1.22    paulus     struct ifqueue *ifq;
    997  1.22    paulus     enum NPmode mode;
    998  1.64   thorpej     int error;
    999   1.8    paulus 
   1000  1.22    paulus     for (mpp = &sc->sc_npqueue; (m = *mpp) != NULL; ) {
   1001  1.22    paulus 	switch (PPP_PROTOCOL(mtod(m, u_char *))) {
   1002  1.22    paulus 	case PPP_IP:
   1003  1.22    paulus 	    mode = sc->sc_npmode[NP_IP];
   1004  1.22    paulus 	    break;
   1005  1.55    itojun 	case PPP_IPV6:
   1006  1.55    itojun 	    mode = sc->sc_npmode[NP_IPV6];
   1007  1.55    itojun 	    break;
   1008  1.22    paulus 	default:
   1009  1.22    paulus 	    mode = NPMODE_PASS;
   1010  1.22    paulus 	}
   1011   1.8    paulus 
   1012  1.22    paulus 	switch (mode) {
   1013  1.22    paulus 	case NPMODE_PASS:
   1014  1.22    paulus 	    /*
   1015  1.22    paulus 	     * This packet can now go on one of the queues to be sent.
   1016  1.22    paulus 	     */
   1017  1.22    paulus 	    *mpp = m->m_nextpkt;
   1018  1.22    paulus 	    m->m_nextpkt = NULL;
   1019  1.64   thorpej 	    if ((m->m_flags & M_HIGHPRI)
   1020  1.64   thorpej #ifdef ALTQ
   1021  1.64   thorpej 		&& ALTQ_IS_ENABLED(&sc->sc_if.if_snd) == 0
   1022  1.64   thorpej #endif
   1023  1.64   thorpej 		) {
   1024  1.64   thorpej 		ifq = &sc->sc_fastq;
   1025  1.64   thorpej 		if (IF_QFULL(ifq)) {
   1026  1.64   thorpej 		    IF_DROP(ifq);
   1027  1.64   thorpej 		    m_freem(m);
   1028  1.64   thorpej 		    error = ENOBUFS;
   1029  1.64   thorpej 		} else {
   1030  1.64   thorpej 		    IF_ENQUEUE(ifq, m);
   1031  1.64   thorpej 		    error = 0;
   1032  1.64   thorpej 		}
   1033  1.64   thorpej 	    } else
   1034  1.64   thorpej 		IFQ_ENQUEUE(&sc->sc_if.if_snd, m, NULL, error);
   1035  1.64   thorpej 	    if (error) {
   1036  1.22    paulus 		sc->sc_if.if_oerrors++;
   1037  1.29    paulus 		sc->sc_stats.ppp_oerrors++;
   1038  1.64   thorpej 	    }
   1039  1.22    paulus 	    break;
   1040   1.8    paulus 
   1041  1.22    paulus 	case NPMODE_DROP:
   1042  1.22    paulus 	case NPMODE_ERROR:
   1043  1.22    paulus 	    *mpp = m->m_nextpkt;
   1044  1.22    paulus 	    m_freem(m);
   1045  1.22    paulus 	    break;
   1046  1.22    paulus 
   1047  1.22    paulus 	case NPMODE_QUEUE:
   1048  1.22    paulus 	    mpp = &m->m_nextpkt;
   1049  1.22    paulus 	    break;
   1050  1.22    paulus 	}
   1051  1.22    paulus     }
   1052  1.22    paulus     sc->sc_npqtail = mpp;
   1053  1.22    paulus }
   1054  1.22    paulus 
   1055  1.22    paulus /*
   1056  1.37  christos  * Transmitter has finished outputting some stuff;
   1057  1.37  christos  * remember to call sc->sc_start later at splsoftnet.
   1058  1.22    paulus  */
   1059  1.37  christos void
   1060  1.37  christos ppp_restart(sc)
   1061  1.22    paulus     struct ppp_softc *sc;
   1062  1.22    paulus {
   1063  1.68   thorpej     int s = splhigh();	/* XXX IMP ME HARDER */
   1064  1.22    paulus 
   1065  1.22    paulus     sc->sc_flags &= ~SC_TBUSY;
   1066  1.66   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
   1067  1.66   thorpej     softintr_schedule(sc->sc_si);
   1068  1.66   thorpej #else
   1069  1.22    paulus     schednetisr(NETISR_PPP);
   1070  1.66   thorpej #endif
   1071  1.22    paulus     splx(s);
   1072  1.22    paulus }
   1073  1.22    paulus 
   1074  1.22    paulus /*
   1075  1.37  christos  * Get a packet to send.  This procedure is intended to be called at
   1076  1.37  christos  * splsoftnet, since it may involve time-consuming operations such as
   1077  1.37  christos  * applying VJ compression, packet compression, address/control and/or
   1078  1.37  christos  * protocol field compression to the packet.
   1079  1.22    paulus  */
   1080  1.37  christos struct mbuf *
   1081  1.37  christos ppp_dequeue(sc)
   1082  1.22    paulus     struct ppp_softc *sc;
   1083  1.22    paulus {
   1084  1.22    paulus     struct mbuf *m, *mp;
   1085  1.22    paulus     u_char *cp;
   1086  1.22    paulus     int address, control, protocol;
   1087  1.44  sommerfe     int s;
   1088  1.22    paulus 
   1089  1.22    paulus     /*
   1090  1.22    paulus      * Grab a packet to send: first try the fast queue, then the
   1091  1.22    paulus      * normal queue.
   1092  1.22    paulus      */
   1093  1.68   thorpej     s = splnet();
   1094  1.22    paulus     IF_DEQUEUE(&sc->sc_fastq, m);
   1095  1.22    paulus     if (m == NULL)
   1096  1.64   thorpej 	IFQ_DEQUEUE(&sc->sc_if.if_snd, m);
   1097  1.44  sommerfe     splx(s);
   1098  1.44  sommerfe 
   1099  1.22    paulus     if (m == NULL)
   1100  1.37  christos 	return NULL;
   1101  1.22    paulus 
   1102  1.29    paulus     ++sc->sc_stats.ppp_opackets;
   1103  1.29    paulus 
   1104  1.22    paulus     /*
   1105  1.22    paulus      * Extract the ppp header of the new packet.
   1106  1.22    paulus      * The ppp header will be in one mbuf.
   1107  1.22    paulus      */
   1108  1.22    paulus     cp = mtod(m, u_char *);
   1109  1.22    paulus     address = PPP_ADDRESS(cp);
   1110  1.22    paulus     control = PPP_CONTROL(cp);
   1111  1.22    paulus     protocol = PPP_PROTOCOL(cp);
   1112  1.22    paulus 
   1113  1.22    paulus     switch (protocol) {
   1114  1.22    paulus     case PPP_IP:
   1115  1.22    paulus #ifdef VJC
   1116  1.22    paulus 	/*
   1117  1.22    paulus 	 * If the packet is a TCP/IP packet, see if we can compress it.
   1118  1.22    paulus 	 */
   1119  1.29    paulus 	if ((sc->sc_flags & SC_COMP_TCP) && sc->sc_comp != NULL) {
   1120  1.22    paulus 	    struct ip *ip;
   1121  1.22    paulus 	    int type;
   1122  1.13    paulus 
   1123  1.13    paulus 	    mp = m;
   1124  1.13    paulus 	    ip = (struct ip *) (cp + PPP_HDRLEN);
   1125  1.13    paulus 	    if (mp->m_len <= PPP_HDRLEN) {
   1126  1.13    paulus 		mp = mp->m_next;
   1127  1.13    paulus 		if (mp == NULL)
   1128  1.13    paulus 		    break;
   1129  1.13    paulus 		ip = mtod(mp, struct ip *);
   1130  1.13    paulus 	    }
   1131  1.13    paulus 	    /* this code assumes the IP/TCP header is in one non-shared mbuf */
   1132  1.13    paulus 	    if (ip->ip_p == IPPROTO_TCP) {
   1133  1.29    paulus 		type = sl_compress_tcp(mp, ip, sc->sc_comp,
   1134  1.13    paulus 				       !(sc->sc_flags & SC_NO_TCP_CCID));
   1135  1.13    paulus 		switch (type) {
   1136  1.13    paulus 		case TYPE_UNCOMPRESSED_TCP:
   1137  1.13    paulus 		    protocol = PPP_VJC_UNCOMP;
   1138  1.13    paulus 		    break;
   1139  1.13    paulus 		case TYPE_COMPRESSED_TCP:
   1140  1.13    paulus 		    protocol = PPP_VJC_COMP;
   1141  1.13    paulus 		    cp = mtod(m, u_char *);
   1142  1.13    paulus 		    cp[0] = address;	/* header has moved */
   1143  1.13    paulus 		    cp[1] = control;
   1144  1.13    paulus 		    cp[2] = 0;
   1145  1.13    paulus 		    break;
   1146  1.13    paulus 		}
   1147  1.13    paulus 		cp[3] = protocol;	/* update protocol in PPP header */
   1148   1.8    paulus 	    }
   1149   1.8    paulus 	}
   1150   1.8    paulus #endif	/* VJC */
   1151  1.22    paulus 	break;
   1152  1.22    paulus 
   1153  1.22    paulus #ifdef PPP_COMPRESS
   1154  1.22    paulus     case PPP_CCP:
   1155  1.22    paulus 	ppp_ccp(sc, m, 0);
   1156  1.22    paulus 	break;
   1157  1.22    paulus #endif	/* PPP_COMPRESS */
   1158  1.22    paulus     }
   1159  1.22    paulus 
   1160  1.22    paulus #ifdef PPP_COMPRESS
   1161  1.22    paulus     if (protocol != PPP_LCP && protocol != PPP_CCP
   1162  1.22    paulus 	&& sc->sc_xc_state && (sc->sc_flags & SC_COMP_RUN)) {
   1163  1.29    paulus 	struct mbuf *mcomp = NULL;
   1164  1.82    simonb 	int slen;
   1165  1.22    paulus 
   1166  1.81    itojun 	slen = 0;
   1167  1.81    itojun 	for (mp = m; mp != NULL; mp = mp->m_next)
   1168  1.81    itojun 	    slen += mp->m_len;
   1169  1.82    simonb 	(*sc->sc_xcomp->compress)
   1170  1.37  christos 	    (sc->sc_xc_state, &mcomp, m, slen, sc->sc_if.if_mtu + PPP_HDRLEN);
   1171  1.22    paulus 	if (mcomp != NULL) {
   1172  1.37  christos 	    if (sc->sc_flags & SC_CCP_UP) {
   1173  1.37  christos 		/* Send the compressed packet instead of the original. */
   1174  1.37  christos 		m_freem(m);
   1175  1.37  christos 		m = mcomp;
   1176  1.37  christos 		cp = mtod(m, u_char *);
   1177  1.37  christos 		protocol = cp[3];
   1178  1.37  christos 	    } else {
   1179  1.37  christos 		/* Can't transmit compressed packets until CCP is up. */
   1180  1.37  christos 		m_freem(mcomp);
   1181  1.37  christos 	    }
   1182  1.22    paulus 	}
   1183   1.8    paulus     }
   1184  1.22    paulus #endif	/* PPP_COMPRESS */
   1185   1.8    paulus 
   1186   1.8    paulus     /*
   1187   1.8    paulus      * Compress the address/control and protocol, if possible.
   1188   1.8    paulus      */
   1189   1.8    paulus     if (sc->sc_flags & SC_COMP_AC && address == PPP_ALLSTATIONS &&
   1190   1.8    paulus 	control == PPP_UI && protocol != PPP_ALLSTATIONS &&
   1191   1.8    paulus 	protocol != PPP_LCP) {
   1192   1.8    paulus 	/* can compress address/control */
   1193   1.8    paulus 	m->m_data += 2;
   1194   1.8    paulus 	m->m_len -= 2;
   1195   1.8    paulus     }
   1196   1.8    paulus     if (sc->sc_flags & SC_COMP_PROT && protocol < 0xFF) {
   1197   1.8    paulus 	/* can compress protocol */
   1198   1.8    paulus 	if (mtod(m, u_char *) == cp) {
   1199   1.8    paulus 	    cp[2] = cp[1];	/* move address/control up */
   1200   1.8    paulus 	    cp[1] = cp[0];
   1201   1.8    paulus 	}
   1202  1.81    itojun 	++m->m_data;
   1203  1.81    itojun 	--m->m_len;
   1204   1.8    paulus     }
   1205   1.8    paulus 
   1206  1.37  christos     return m;
   1207  1.37  christos }
   1208  1.37  christos 
   1209  1.66   thorpej #ifndef __HAVE_GENERIC_SOFT_INTERRUPTS
   1210  1.66   thorpej void
   1211  1.66   thorpej pppnetisr(void)
   1212  1.66   thorpej {
   1213  1.66   thorpej 	struct ppp_softc *sc;
   1214  1.66   thorpej 	int i;
   1215  1.66   thorpej 
   1216  1.66   thorpej 	for (i = 0; i < NPPP; i++) {
   1217  1.66   thorpej 		sc = &ppp_softc[i];
   1218  1.66   thorpej 		pppintr(sc);
   1219  1.66   thorpej 	}
   1220  1.66   thorpej }
   1221  1.66   thorpej #endif
   1222  1.66   thorpej 
   1223  1.37  christos /*
   1224  1.37  christos  * Software interrupt routine, called at splsoftnet.
   1225  1.37  christos  */
   1226  1.37  christos void
   1227  1.66   thorpej pppintr(void *arg)
   1228  1.37  christos {
   1229  1.66   thorpej 	struct ppp_softc *sc = arg;
   1230  1.66   thorpej 	struct mbuf *m;
   1231  1.66   thorpej 	int s;
   1232  1.37  christos 
   1233  1.37  christos 	if (!(sc->sc_flags & SC_TBUSY)
   1234  1.64   thorpej 	    && (IFQ_IS_EMPTY(&sc->sc_if.if_snd) == 0 || sc->sc_fastq.ifq_head
   1235  1.46  sommerfe 		|| sc->sc_outm)) {
   1236  1.68   thorpej 		s = splhigh();	/* XXX IMP ME HARDER */
   1237  1.66   thorpej 		sc->sc_flags |= SC_TBUSY;
   1238  1.66   thorpej 		splx(s);
   1239  1.66   thorpej 		(*sc->sc_start)(sc);
   1240  1.37  christos 	}
   1241  1.37  christos 	for (;;) {
   1242  1.68   thorpej 		s = splnet();
   1243  1.66   thorpej 		IF_DEQUEUE(&sc->sc_rawq, m);
   1244  1.66   thorpej 		splx(s);
   1245  1.66   thorpej 		if (m == NULL)
   1246  1.66   thorpej 			break;
   1247  1.66   thorpej 		ppp_inproc(sc, m);
   1248  1.37  christos 	}
   1249   1.8    paulus }
   1250   1.8    paulus 
   1251  1.22    paulus #ifdef PPP_COMPRESS
   1252   1.8    paulus /*
   1253  1.22    paulus  * Handle a CCP packet.  `rcvd' is 1 if the packet was received,
   1254  1.22    paulus  * 0 if it is about to be transmitted.
   1255   1.8    paulus  */
   1256  1.28  christos static void
   1257  1.22    paulus ppp_ccp(sc, m, rcvd)
   1258  1.22    paulus     struct ppp_softc *sc;
   1259  1.22    paulus     struct mbuf *m;
   1260  1.22    paulus     int rcvd;
   1261   1.8    paulus {
   1262  1.22    paulus     u_char *dp, *ep;
   1263  1.22    paulus     struct mbuf *mp;
   1264  1.22    paulus     int slen, s;
   1265   1.8    paulus 
   1266  1.22    paulus     /*
   1267  1.22    paulus      * Get a pointer to the data after the PPP header.
   1268  1.22    paulus      */
   1269  1.22    paulus     if (m->m_len <= PPP_HDRLEN) {
   1270  1.22    paulus 	mp = m->m_next;
   1271  1.22    paulus 	if (mp == NULL)
   1272  1.22    paulus 	    return;
   1273  1.22    paulus 	dp = (mp != NULL)? mtod(mp, u_char *): NULL;
   1274  1.22    paulus     } else {
   1275  1.22    paulus 	mp = m;
   1276  1.22    paulus 	dp = mtod(mp, u_char *) + PPP_HDRLEN;
   1277  1.22    paulus     }
   1278   1.8    paulus 
   1279  1.22    paulus     ep = mtod(mp, u_char *) + mp->m_len;
   1280  1.22    paulus     if (dp + CCP_HDRLEN > ep)
   1281   1.8    paulus 	return;
   1282  1.22    paulus     slen = CCP_LENGTH(dp);
   1283  1.22    paulus     if (dp + slen > ep) {
   1284  1.22    paulus 	if (sc->sc_flags & SC_DEBUG)
   1285  1.35  christos 	    printf("if_ppp/ccp: not enough data in mbuf (%p+%x > %p+%x)\n",
   1286  1.34  christos 		dp, slen, mtod(mp, u_char *), mp->m_len);
   1287   1.8    paulus 	return;
   1288   1.8    paulus     }
   1289   1.1   deraadt 
   1290  1.22    paulus     switch (CCP_CODE(dp)) {
   1291  1.22    paulus     case CCP_CONFREQ:
   1292  1.22    paulus     case CCP_TERMREQ:
   1293  1.22    paulus     case CCP_TERMACK:
   1294  1.22    paulus 	/* CCP must be going down - disable compression */
   1295  1.22    paulus 	if (sc->sc_flags & SC_CCP_UP) {
   1296  1.68   thorpej 	    s = splhigh();	/* XXX IMP ME HARDER */
   1297  1.22    paulus 	    sc->sc_flags &= ~(SC_CCP_UP | SC_COMP_RUN | SC_DECOMP_RUN);
   1298  1.22    paulus 	    splx(s);
   1299   1.1   deraadt 	}
   1300  1.22    paulus 	break;
   1301   1.1   deraadt 
   1302  1.22    paulus     case CCP_CONFACK:
   1303  1.22    paulus 	if (sc->sc_flags & SC_CCP_OPEN && !(sc->sc_flags & SC_CCP_UP)
   1304  1.22    paulus 	    && slen >= CCP_HDRLEN + CCP_OPT_MINLEN
   1305  1.22    paulus 	    && slen >= CCP_OPT_LENGTH(dp + CCP_HDRLEN) + CCP_HDRLEN) {
   1306  1.22    paulus 	    if (!rcvd) {
   1307  1.22    paulus 		/* we're agreeing to send compressed packets. */
   1308  1.22    paulus 		if (sc->sc_xc_state != NULL
   1309  1.22    paulus 		    && (*sc->sc_xcomp->comp_init)
   1310  1.22    paulus 			(sc->sc_xc_state, dp + CCP_HDRLEN, slen - CCP_HDRLEN,
   1311  1.31   thorpej 			 sc->sc_unit, 0, sc->sc_flags & SC_DEBUG)) {
   1312  1.68   thorpej 		    s = splhigh();	/* XXX IMP ME HARDER */
   1313  1.22    paulus 		    sc->sc_flags |= SC_COMP_RUN;
   1314  1.22    paulus 		    splx(s);
   1315  1.22    paulus 		}
   1316  1.22    paulus 	    } else {
   1317  1.22    paulus 		/* peer is agreeing to send compressed packets. */
   1318  1.22    paulus 		if (sc->sc_rc_state != NULL
   1319  1.22    paulus 		    && (*sc->sc_rcomp->decomp_init)
   1320  1.22    paulus 			(sc->sc_rc_state, dp + CCP_HDRLEN, slen - CCP_HDRLEN,
   1321  1.31   thorpej 			 sc->sc_unit, 0, sc->sc_mru,
   1322  1.22    paulus 			 sc->sc_flags & SC_DEBUG)) {
   1323  1.68   thorpej 		    s = splhigh();	/* XXX IMP ME HARDER */
   1324  1.22    paulus 		    sc->sc_flags |= SC_DECOMP_RUN;
   1325  1.22    paulus 		    sc->sc_flags &= ~(SC_DC_ERROR | SC_DC_FERROR);
   1326  1.22    paulus 		    splx(s);
   1327  1.22    paulus 		}
   1328   1.1   deraadt 	    }
   1329   1.1   deraadt 	}
   1330  1.22    paulus 	break;
   1331   1.1   deraadt 
   1332  1.22    paulus     case CCP_RESETACK:
   1333  1.22    paulus 	if (sc->sc_flags & SC_CCP_UP) {
   1334  1.22    paulus 	    if (!rcvd) {
   1335  1.22    paulus 		if (sc->sc_xc_state && (sc->sc_flags & SC_COMP_RUN))
   1336  1.22    paulus 		    (*sc->sc_xcomp->comp_reset)(sc->sc_xc_state);
   1337  1.22    paulus 	    } else {
   1338  1.22    paulus 		if (sc->sc_rc_state && (sc->sc_flags & SC_DECOMP_RUN)) {
   1339  1.22    paulus 		    (*sc->sc_rcomp->decomp_reset)(sc->sc_rc_state);
   1340  1.68   thorpej 		    s = splhigh();	/* XXX IMP ME HARDER */
   1341  1.22    paulus 		    sc->sc_flags &= ~SC_DC_ERROR;
   1342  1.22    paulus 		    splx(s);
   1343   1.1   deraadt 		}
   1344   1.1   deraadt 	    }
   1345   1.2    paulus 	}
   1346  1.22    paulus 	break;
   1347   1.1   deraadt     }
   1348   1.1   deraadt }
   1349   1.1   deraadt 
   1350   1.1   deraadt /*
   1351  1.22    paulus  * CCP is down; free (de)compressor state if necessary.
   1352   1.1   deraadt  */
   1353  1.22    paulus static void
   1354  1.22    paulus ppp_ccp_closed(sc)
   1355  1.22    paulus     struct ppp_softc *sc;
   1356   1.1   deraadt {
   1357  1.22    paulus     if (sc->sc_xc_state) {
   1358  1.22    paulus 	(*sc->sc_xcomp->comp_free)(sc->sc_xc_state);
   1359  1.22    paulus 	sc->sc_xc_state = NULL;
   1360  1.22    paulus     }
   1361  1.22    paulus     if (sc->sc_rc_state) {
   1362  1.22    paulus 	(*sc->sc_rcomp->decomp_free)(sc->sc_rc_state);
   1363  1.22    paulus 	sc->sc_rc_state = NULL;
   1364   1.1   deraadt     }
   1365   1.1   deraadt }
   1366  1.22    paulus #endif /* PPP_COMPRESS */
   1367   1.1   deraadt 
   1368   1.1   deraadt /*
   1369   1.8    paulus  * PPP packet input routine.
   1370  1.13    paulus  * The caller has checked and removed the FCS and has inserted
   1371  1.13    paulus  * the address/control bytes and the protocol high byte if they
   1372  1.22    paulus  * were omitted.
   1373  1.22    paulus  */
   1374  1.22    paulus void
   1375  1.22    paulus ppppktin(sc, m, lost)
   1376  1.22    paulus     struct ppp_softc *sc;
   1377  1.22    paulus     struct mbuf *m;
   1378  1.22    paulus     int lost;
   1379  1.22    paulus {
   1380  1.68   thorpej     int s = splhigh();	/* XXX IMP ME HARDER */
   1381  1.22    paulus 
   1382  1.22    paulus     if (lost)
   1383  1.22    paulus 	m->m_flags |= M_ERRMARK;
   1384  1.22    paulus     IF_ENQUEUE(&sc->sc_rawq, m);
   1385  1.66   thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
   1386  1.66   thorpej     softintr_schedule(sc->sc_si);
   1387  1.66   thorpej #else
   1388  1.22    paulus     schednetisr(NETISR_PPP);
   1389  1.66   thorpej #endif
   1390  1.22    paulus     splx(s);
   1391  1.22    paulus }
   1392  1.22    paulus 
   1393  1.22    paulus /*
   1394  1.22    paulus  * Process a received PPP packet, doing decompression as necessary.
   1395  1.22    paulus  * Should be called at splsoftnet.
   1396   1.1   deraadt  */
   1397   1.1   deraadt #define COMPTYPE(proto)	((proto) == PPP_VJC_COMP? TYPE_COMPRESSED_TCP: \
   1398   1.1   deraadt 			 TYPE_UNCOMPRESSED_TCP)
   1399   1.1   deraadt 
   1400  1.22    paulus static void
   1401  1.22    paulus ppp_inproc(sc, m)
   1402   1.8    paulus     struct ppp_softc *sc;
   1403   1.8    paulus     struct mbuf *m;
   1404   1.8    paulus {
   1405  1.24   mycroft     struct ifnet *ifp = &sc->sc_if;
   1406   1.8    paulus     struct ifqueue *inq;
   1407  1.59    itojun     int s, ilen, proto, rv;
   1408  1.13    paulus     u_char *cp, adrs, ctrl;
   1409  1.29    paulus     struct mbuf *mp, *dmp = NULL;
   1410  1.59    itojun #ifdef VJC
   1411  1.59    itojun     int xlen;
   1412  1.22    paulus     u_char *iphdr;
   1413  1.22    paulus     u_int hlen;
   1414  1.59    itojun #endif
   1415   1.8    paulus 
   1416  1.29    paulus     sc->sc_stats.ppp_ipackets++;
   1417  1.22    paulus 
   1418  1.22    paulus     if (sc->sc_flags & SC_LOG_INPKT) {
   1419  1.81    itojun 	ilen = 0;
   1420  1.81    itojun 	for (mp = m; mp != NULL; mp = mp->m_next)
   1421  1.81    itojun 	    ilen += mp->m_len;
   1422  1.35  christos 	printf("%s: got %d bytes\n", ifp->if_xname, ilen);
   1423  1.22    paulus 	pppdumpm(m);
   1424  1.22    paulus     }
   1425   1.8    paulus 
   1426  1.13    paulus     cp = mtod(m, u_char *);
   1427  1.22    paulus     adrs = PPP_ADDRESS(cp);
   1428  1.22    paulus     ctrl = PPP_CONTROL(cp);
   1429  1.22    paulus     proto = PPP_PROTOCOL(cp);
   1430  1.22    paulus 
   1431  1.22    paulus     if (m->m_flags & M_ERRMARK) {
   1432  1.22    paulus 	m->m_flags &= ~M_ERRMARK;
   1433  1.68   thorpej 	s = splhigh();	/* XXX IMP ME HARDER */
   1434  1.22    paulus 	sc->sc_flags |= SC_VJ_RESET;
   1435  1.22    paulus 	splx(s);
   1436  1.22    paulus     }
   1437  1.22    paulus 
   1438  1.22    paulus #ifdef PPP_COMPRESS
   1439  1.22    paulus     /*
   1440  1.22    paulus      * Decompress this packet if necessary, update the receiver's
   1441  1.22    paulus      * dictionary, or take appropriate action on a CCP packet.
   1442  1.22    paulus      */
   1443  1.22    paulus     if (proto == PPP_COMP && sc->sc_rc_state && (sc->sc_flags & SC_DECOMP_RUN)
   1444  1.22    paulus 	&& !(sc->sc_flags & SC_DC_ERROR) && !(sc->sc_flags & SC_DC_FERROR)) {
   1445  1.22    paulus 	/* decompress this packet */
   1446  1.22    paulus 	rv = (*sc->sc_rcomp->decompress)(sc->sc_rc_state, m, &dmp);
   1447  1.22    paulus 	if (rv == DECOMP_OK) {
   1448  1.22    paulus 	    m_freem(m);
   1449  1.22    paulus 	    if (dmp == NULL) {
   1450  1.22    paulus 		/* no error, but no decompressed packet produced */
   1451  1.22    paulus 		return;
   1452  1.22    paulus 	    }
   1453  1.22    paulus 	    m = dmp;
   1454  1.22    paulus 	    cp = mtod(m, u_char *);
   1455  1.22    paulus 	    proto = PPP_PROTOCOL(cp);
   1456  1.22    paulus 
   1457  1.22    paulus 	} else {
   1458  1.22    paulus 	    /*
   1459  1.22    paulus 	     * An error has occurred in decompression.
   1460  1.22    paulus 	     * Pass the compressed packet up to pppd, which may take
   1461  1.22    paulus 	     * CCP down or issue a Reset-Req.
   1462  1.22    paulus 	     */
   1463  1.22    paulus 	    if (sc->sc_flags & SC_DEBUG)
   1464  1.35  christos 		printf("%s: decompress failed %d\n", ifp->if_xname, rv);
   1465  1.68   thorpej 	    s = splhigh();	/* XXX IMP ME HARDER */
   1466  1.22    paulus 	    sc->sc_flags |= SC_VJ_RESET;
   1467  1.22    paulus 	    if (rv == DECOMP_ERROR)
   1468  1.22    paulus 		sc->sc_flags |= SC_DC_ERROR;
   1469  1.22    paulus 	    else
   1470  1.22    paulus 		sc->sc_flags |= SC_DC_FERROR;
   1471  1.22    paulus 	    splx(s);
   1472  1.22    paulus 	}
   1473  1.22    paulus 
   1474  1.22    paulus     } else {
   1475  1.22    paulus 	if (sc->sc_rc_state && (sc->sc_flags & SC_DECOMP_RUN)) {
   1476  1.22    paulus 	    (*sc->sc_rcomp->incomp)(sc->sc_rc_state, m);
   1477  1.22    paulus 	}
   1478  1.22    paulus 	if (proto == PPP_CCP) {
   1479  1.22    paulus 	    ppp_ccp(sc, m, 1);
   1480  1.22    paulus 	}
   1481  1.22    paulus     }
   1482  1.22    paulus #endif
   1483  1.27        pk 
   1484  1.81    itojun     ilen = 0;
   1485  1.81    itojun     for (mp = m; mp != NULL; mp = mp->m_next)
   1486  1.81    itojun 	ilen += mp->m_len;
   1487   1.8    paulus 
   1488   1.8    paulus #ifdef VJC
   1489  1.22    paulus     if (sc->sc_flags & SC_VJ_RESET) {
   1490  1.22    paulus 	/*
   1491  1.22    paulus 	 * If we've missed a packet, we must toss subsequent compressed
   1492  1.22    paulus 	 * packets which don't have an explicit connection ID.
   1493  1.22    paulus 	 */
   1494  1.29    paulus 	if (sc->sc_comp)
   1495  1.29    paulus 	    sl_uncompress_tcp(NULL, 0, TYPE_ERROR, sc->sc_comp);
   1496  1.68   thorpej 	s = splhigh();	/* XXX IMP ME HARDER */
   1497  1.22    paulus 	sc->sc_flags &= ~SC_VJ_RESET;
   1498  1.22    paulus 	splx(s);
   1499  1.22    paulus     }
   1500  1.22    paulus 
   1501   1.8    paulus     /*
   1502   1.8    paulus      * See if we have a VJ-compressed packet to uncompress.
   1503   1.8    paulus      */
   1504  1.22    paulus     if (proto == PPP_VJC_COMP) {
   1505  1.29    paulus 	if ((sc->sc_flags & SC_REJ_COMP_TCP) || sc->sc_comp == 0)
   1506  1.22    paulus 	    goto bad;
   1507  1.22    paulus 
   1508  1.22    paulus 	xlen = sl_uncompress_tcp_core(cp + PPP_HDRLEN, m->m_len - PPP_HDRLEN,
   1509  1.22    paulus 				      ilen - PPP_HDRLEN, TYPE_COMPRESSED_TCP,
   1510  1.29    paulus 				      sc->sc_comp, &iphdr, &hlen);
   1511   1.8    paulus 
   1512  1.22    paulus 	if (xlen <= 0) {
   1513   1.8    paulus 	    if (sc->sc_flags & SC_DEBUG)
   1514  1.35  christos 		printf("%s: VJ uncompress failed on type comp\n",
   1515  1.34  christos 		    ifp->if_xname);
   1516  1.22    paulus 	    goto bad;
   1517  1.17    paulus 	}
   1518  1.17    paulus 
   1519  1.22    paulus 	/* Copy the PPP and IP headers into a new mbuf. */
   1520  1.22    paulus 	MGETHDR(mp, M_DONTWAIT, MT_DATA);
   1521  1.22    paulus 	if (mp == NULL)
   1522  1.22    paulus 	    goto bad;
   1523  1.22    paulus 	mp->m_len = 0;
   1524  1.81    itojun 	mp->m_next = NULL;
   1525  1.22    paulus 	if (hlen + PPP_HDRLEN > MHLEN) {
   1526  1.22    paulus 	    MCLGET(mp, M_DONTWAIT);
   1527  1.22    paulus 	    if (M_TRAILINGSPACE(mp) < hlen + PPP_HDRLEN) {
   1528  1.22    paulus 		m_freem(mp);
   1529  1.22    paulus 		goto bad;	/* lose if big headers and no clusters */
   1530  1.22    paulus 	    }
   1531   1.8    paulus 	}
   1532  1.22    paulus 	cp = mtod(mp, u_char *);
   1533  1.22    paulus 	cp[0] = adrs;
   1534  1.22    paulus 	cp[1] = ctrl;
   1535  1.22    paulus 	cp[2] = 0;
   1536  1.22    paulus 	cp[3] = PPP_IP;
   1537  1.22    paulus 	proto = PPP_IP;
   1538  1.22    paulus 	bcopy(iphdr, cp + PPP_HDRLEN, hlen);
   1539  1.22    paulus 	mp->m_len = hlen + PPP_HDRLEN;
   1540  1.22    paulus 
   1541  1.22    paulus 	/*
   1542  1.22    paulus 	 * Trim the PPP and VJ headers off the old mbuf
   1543  1.22    paulus 	 * and stick the new and old mbufs together.
   1544  1.22    paulus 	 */
   1545  1.22    paulus 	m->m_data += PPP_HDRLEN + xlen;
   1546  1.22    paulus 	m->m_len -= PPP_HDRLEN + xlen;
   1547  1.22    paulus 	if (m->m_len <= M_TRAILINGSPACE(mp)) {
   1548  1.22    paulus 	    bcopy(mtod(m, u_char *), mtod(mp, u_char *) + mp->m_len, m->m_len);
   1549  1.22    paulus 	    mp->m_len += m->m_len;
   1550  1.22    paulus 	    MFREE(m, mp->m_next);
   1551  1.22    paulus 	} else
   1552  1.22    paulus 	    mp->m_next = m;
   1553  1.22    paulus 	m = mp;
   1554  1.22    paulus 	ilen += hlen - xlen;
   1555   1.8    paulus 
   1556  1.22    paulus     } else if (proto == PPP_VJC_UNCOMP) {
   1557  1.29    paulus 	if ((sc->sc_flags & SC_REJ_COMP_TCP) || sc->sc_comp == 0)
   1558  1.22    paulus 	    goto bad;
   1559  1.22    paulus 
   1560  1.22    paulus 	xlen = sl_uncompress_tcp_core(cp + PPP_HDRLEN, m->m_len - PPP_HDRLEN,
   1561  1.22    paulus 				      ilen - PPP_HDRLEN, TYPE_UNCOMPRESSED_TCP,
   1562  1.29    paulus 				      sc->sc_comp, &iphdr, &hlen);
   1563   1.8    paulus 
   1564  1.22    paulus 	if (xlen < 0) {
   1565   1.8    paulus 	    if (sc->sc_flags & SC_DEBUG)
   1566  1.35  christos 		printf("%s: VJ uncompress failed on type uncomp\n",
   1567  1.34  christos 		    ifp->if_xname);
   1568  1.22    paulus 	    goto bad;
   1569   1.8    paulus 	}
   1570   1.8    paulus 
   1571   1.8    paulus 	proto = PPP_IP;
   1572  1.13    paulus 	cp[3] = PPP_IP;
   1573   1.8    paulus     }
   1574   1.8    paulus #endif /* VJC */
   1575   1.8    paulus 
   1576  1.13    paulus     /*
   1577  1.13    paulus      * If the packet will fit in a header mbuf, don't waste a
   1578  1.13    paulus      * whole cluster on it.
   1579  1.13    paulus      */
   1580  1.22    paulus     if (ilen <= MHLEN && M_IS_CLUSTER(m)) {
   1581  1.13    paulus 	MGETHDR(mp, M_DONTWAIT, MT_DATA);
   1582  1.13    paulus 	if (mp != NULL) {
   1583  1.13    paulus 	    m_copydata(m, 0, ilen, mtod(mp, caddr_t));
   1584  1.13    paulus 	    m_freem(m);
   1585  1.13    paulus 	    m = mp;
   1586  1.13    paulus 	    m->m_len = ilen;
   1587  1.13    paulus 	}
   1588   1.8    paulus     }
   1589   1.8    paulus     m->m_pkthdr.len = ilen;
   1590  1.24   mycroft     m->m_pkthdr.rcvif = ifp;
   1591   1.8    paulus 
   1592  1.29    paulus     if ((proto & 0x8000) == 0) {
   1593  1.37  christos #ifdef PPP_FILTER
   1594  1.37  christos 	/*
   1595  1.37  christos 	 * See whether we want to pass this packet, and
   1596  1.37  christos 	 * if it counts as link activity.
   1597  1.37  christos 	 */
   1598  1.52   thorpej 	if (sc->sc_pass_filt_in.bf_insns != 0
   1599  1.52   thorpej 	    && bpf_filter(sc->sc_pass_filt_in.bf_insns, (u_char *) m,
   1600  1.29    paulus 			  ilen, 0) == 0) {
   1601  1.29    paulus 	    /* drop this packet */
   1602  1.29    paulus 	    m_freem(m);
   1603  1.29    paulus 	    return;
   1604  1.29    paulus 	}
   1605  1.52   thorpej 	if (sc->sc_active_filt_in.bf_insns == 0
   1606  1.52   thorpej 	    || bpf_filter(sc->sc_active_filt_in.bf_insns, (u_char *) m,
   1607  1.52   thorpej 	    		  ilen, 0))
   1608  1.29    paulus 	    sc->sc_last_recv = time.tv_sec;
   1609  1.37  christos #else
   1610  1.37  christos 	/*
   1611  1.37  christos 	 * Record the time that we received this packet.
   1612  1.37  christos 	 */
   1613  1.37  christos 	sc->sc_last_recv = time.tv_sec;
   1614  1.37  christos #endif /* PPP_FILTER */
   1615  1.29    paulus     }
   1616  1.51   thorpej 
   1617   1.8    paulus #if NBPFILTER > 0
   1618   1.8    paulus     /* See if bpf wants to look at the packet. */
   1619  1.63   thorpej     if (sc->sc_if.if_bpf)
   1620  1.63   thorpej 	bpf_mtap(sc->sc_if.if_bpf, m);
   1621   1.8    paulus #endif
   1622   1.8    paulus 
   1623  1.22    paulus     rv = 0;
   1624   1.8    paulus     switch (proto) {
   1625   1.8    paulus #ifdef INET
   1626   1.8    paulus     case PPP_IP:
   1627   1.8    paulus 	/*
   1628   1.8    paulus 	 * IP packet - take off the ppp header and pass it up to IP.
   1629   1.8    paulus 	 */
   1630  1.24   mycroft 	if ((ifp->if_flags & IFF_UP) == 0
   1631  1.22    paulus 	    || sc->sc_npmode[NP_IP] != NPMODE_PASS) {
   1632   1.8    paulus 	    /* interface is down - drop the packet. */
   1633   1.8    paulus 	    m_freem(m);
   1634  1.22    paulus 	    return;
   1635   1.8    paulus 	}
   1636   1.8    paulus 	m->m_pkthdr.len -= PPP_HDRLEN;
   1637   1.8    paulus 	m->m_data += PPP_HDRLEN;
   1638   1.8    paulus 	m->m_len -= PPP_HDRLEN;
   1639  1.45   thorpej #ifdef GATEWAY
   1640  1.45   thorpej 	if (ipflow_fastforward(m))
   1641  1.45   thorpej 		return;
   1642  1.45   thorpej #endif
   1643   1.8    paulus 	schednetisr(NETISR_IP);
   1644   1.8    paulus 	inq = &ipintrq;
   1645  1.55    itojun 	break;
   1646  1.55    itojun #endif
   1647  1.55    itojun 
   1648  1.55    itojun #ifdef INET6
   1649  1.55    itojun     case PPP_IPV6:
   1650  1.55    itojun 	/*
   1651  1.55    itojun 	 * IPv6 packet - take off the ppp header and pass it up to IPv6.
   1652  1.55    itojun 	 */
   1653  1.55    itojun 	if ((ifp->if_flags & IFF_UP) == 0
   1654  1.55    itojun 	    || sc->sc_npmode[NP_IPV6] != NPMODE_PASS) {
   1655  1.55    itojun 	    /* interface is down - drop the packet. */
   1656  1.55    itojun 	    m_freem(m);
   1657  1.55    itojun 	    return;
   1658  1.55    itojun 	}
   1659  1.55    itojun 	m->m_pkthdr.len -= PPP_HDRLEN;
   1660  1.55    itojun 	m->m_data += PPP_HDRLEN;
   1661  1.55    itojun 	m->m_len -= PPP_HDRLEN;
   1662  1.55    itojun 	schednetisr(NETISR_IPV6);
   1663  1.55    itojun 	inq = &ip6intrq;
   1664   1.8    paulus 	break;
   1665   1.8    paulus #endif
   1666   1.8    paulus 
   1667   1.8    paulus     default:
   1668   1.8    paulus 	/*
   1669   1.8    paulus 	 * Some other protocol - place on input queue for read().
   1670   1.8    paulus 	 */
   1671   1.8    paulus 	inq = &sc->sc_inq;
   1672   1.8    paulus 	rv = 1;
   1673   1.8    paulus 	break;
   1674   1.8    paulus     }
   1675   1.8    paulus 
   1676   1.8    paulus     /*
   1677   1.8    paulus      * Put the packet on the appropriate input queue.
   1678   1.8    paulus      */
   1679  1.68   thorpej     s = splnet();
   1680   1.8    paulus     if (IF_QFULL(inq)) {
   1681   1.8    paulus 	IF_DROP(inq);
   1682  1.22    paulus 	splx(s);
   1683   1.8    paulus 	if (sc->sc_flags & SC_DEBUG)
   1684  1.35  christos 	    printf("%s: input queue full\n", ifp->if_xname);
   1685  1.24   mycroft 	ifp->if_iqdrops++;
   1686  1.22    paulus 	goto bad;
   1687  1.22    paulus     }
   1688  1.22    paulus     IF_ENQUEUE(inq, m);
   1689   1.8    paulus     splx(s);
   1690  1.29    paulus     ifp->if_ipackets++;
   1691  1.29    paulus     ifp->if_ibytes += ilen;
   1692   1.1   deraadt 
   1693  1.22    paulus     if (rv)
   1694  1.22    paulus 	(*sc->sc_ctlp)(sc);
   1695   1.1   deraadt 
   1696   1.1   deraadt     return;
   1697   1.1   deraadt 
   1698  1.22    paulus  bad:
   1699  1.22    paulus     m_freem(m);
   1700  1.22    paulus     sc->sc_if.if_ierrors++;
   1701  1.29    paulus     sc->sc_stats.ppp_ierrors++;
   1702   1.1   deraadt }
   1703   1.1   deraadt 
   1704   1.1   deraadt #define MAX_DUMP_BYTES	128
   1705   1.1   deraadt 
   1706   1.1   deraadt static void
   1707  1.22    paulus pppdumpm(m0)
   1708   1.1   deraadt     struct mbuf *m0;
   1709   1.1   deraadt {
   1710   1.8    paulus     char buf[3*MAX_DUMP_BYTES+4];
   1711   1.1   deraadt     char *bp = buf;
   1712   1.1   deraadt     struct mbuf *m;
   1713   1.1   deraadt     static char digits[] = "0123456789abcdef";
   1714   1.1   deraadt 
   1715  1.22    paulus     for (m = m0; m; m = m->m_next) {
   1716   1.1   deraadt 	int l = m->m_len;
   1717   1.1   deraadt 	u_char *rptr = (u_char *)m->m_data;
   1718   1.1   deraadt 
   1719   1.1   deraadt 	while (l--) {
   1720   1.1   deraadt 	    if (bp > buf + sizeof(buf) - 4)
   1721   1.1   deraadt 		goto done;
   1722   1.1   deraadt 	    *bp++ = digits[*rptr >> 4]; /* convert byte to ascii hex */
   1723   1.1   deraadt 	    *bp++ = digits[*rptr++ & 0xf];
   1724   1.1   deraadt 	}
   1725   1.1   deraadt 
   1726   1.1   deraadt 	if (m->m_next) {
   1727   1.1   deraadt 	    if (bp > buf + sizeof(buf) - 3)
   1728   1.1   deraadt 		goto done;
   1729   1.1   deraadt 	    *bp++ = '|';
   1730   1.8    paulus 	} else
   1731   1.8    paulus 	    *bp++ = ' ';
   1732   1.1   deraadt     }
   1733   1.1   deraadt done:
   1734  1.22    paulus     if (m)
   1735   1.1   deraadt 	*bp++ = '>';
   1736   1.1   deraadt     *bp = 0;
   1737  1.35  christos     printf("%s\n", buf);
   1738   1.1   deraadt }
   1739  1.75    itojun 
   1740  1.75    itojun #ifdef ALTQ
   1741  1.75    itojun /*
   1742  1.75    itojun  * a wrapper to transmit a packet from if_start since ALTQ uses
   1743  1.75    itojun  * if_start to send a packet.
   1744  1.75    itojun  */
   1745  1.75    itojun static void
   1746  1.75    itojun ppp_ifstart(ifp)
   1747  1.75    itojun 	struct ifnet *ifp;
   1748  1.75    itojun {
   1749  1.75    itojun 	struct ppp_softc *sc;
   1750  1.75    itojun 
   1751  1.75    itojun 	sc = ifp->if_softc;
   1752  1.75    itojun 	(*sc->sc_start)(sc);
   1753  1.75    itojun }
   1754  1.75    itojun #endif
   1755