BSD 4_4 release
[unix-history] / usr / src / sys / net / if_loop.c
index 919178c..f09295e 100644 (file)
 /*
 /*
- * Copyright (c) 1982, 1986 Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1982, 1986, 1993
+ *     The Regents of the University of California.  All rights reserved.
  *
  *
- * Redistribution is only permitted until one year after the first shipment
- * of 4.4BSD by the Regents.  Otherwise, redistribution and use in source and
- * binary forms are permitted provided that: (1) source distributions retain
- * this entire copyright notice and comment, and (2) distributions including
- * binaries display the following acknowledgement:  This product includes
- * software developed by the University of California, Berkeley and its
- * contributors'' in the documentation or other materials provided with the
- * distribution and in all advertising materials mentioning features or use
- * of this software.  Neither the name of the University nor the names of
- * its contributors may be used to endorse or promote products derived from
- * this software without specific prior written permission.
- * THIS SOFTWARE IS PROVIDED AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
- * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
- * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
  *
  *
- *     @(#)if_loop.c   7.10 (Berkeley) 6/28/90
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ *     @(#)if_loop.c   8.1 (Berkeley) 6/10/93
  */
 
 /*
  * Loopback interface driver for protocol testing and timing.
  */
 
  */
 
 /*
  * Loopback interface driver for protocol testing and timing.
  */
 
-#include "param.h"
-#include "systm.h"
-#include "mbuf.h"
-#include "socket.h"
-#include "errno.h"
-#include "ioctl.h"
-
-#include "../net/if.h"
-#include "../net/if_types.h"
-#include "../net/netisr.h"
-#include "../net/route.h"
-
-#include "machine/mtpr.h"
+#include <sys/param.h>
+#include <sys/systm.h>
+#include <sys/kernel.h>
+#include <sys/mbuf.h>
+#include <sys/socket.h>
+#include <sys/errno.h>
+#include <sys/ioctl.h>
+#include <sys/time.h>
+#include <machine/cpu.h>
+
+#include <net/if.h>
+#include <net/if_types.h>
+#include <net/netisr.h>
+#include <net/route.h>
+#include <net/bpf.h>
 
 #ifdef INET
 
 #ifdef INET
-#include "../netinet/in.h"
-#include "../netinet/in_systm.h"
-#include "../netinet/in_var.h"
-#include "../netinet/ip.h"
+#include <netinet/in.h>
+#include <netinet/in_systm.h>
+#include <netinet/in_var.h>
+#include <netinet/ip.h>
 #endif
 
 #ifdef NS
 #endif
 
 #ifdef NS
-#include "../netns/ns.h"
-#include "../netns/ns_if.h"
+#include <netns/ns.h>
+#include <netns/ns_if.h>
 #endif
 
 #ifdef ISO
 #endif
 
 #ifdef ISO
-#include "../netiso/iso.h"
-#include "../netiso/iso_var.h"
+#include <netiso/iso.h>
+#include <netiso/iso_var.h>
 #endif
 
 #endif
 
+#include "bpfilter.h"
+
 #define        LOMTU   (1024+512)
 
 struct ifnet loif;
 #define        LOMTU   (1024+512)
 
 struct ifnet loif;
-int    looutput(), loioctl();
 
 
-loattach()
+/* ARGSUSED */
+void
+loopattach(n)
+       int n;
 {
        register struct ifnet *ifp = &loif;
 
 {
        register struct ifnet *ifp = &loif;
 
+#ifdef lint
+       n = n;                  /* Highlander: there can only be one... */
+#endif
        ifp->if_name = "lo";
        ifp->if_mtu = LOMTU;
        ifp->if_name = "lo";
        ifp->if_mtu = LOMTU;
-       ifp->if_flags = IFF_LOOPBACK;
+       ifp->if_flags = IFF_LOOPBACK | IFF_MULTICAST;
        ifp->if_ioctl = loioctl;
        ifp->if_output = looutput;
        ifp->if_type = IFT_LOOP;
        ifp->if_hdrlen = 0;
        ifp->if_addrlen = 0;
        if_attach(ifp);
        ifp->if_ioctl = loioctl;
        ifp->if_output = looutput;
        ifp->if_type = IFT_LOOP;
        ifp->if_hdrlen = 0;
        ifp->if_addrlen = 0;
        if_attach(ifp);
+#if NBPFILTER > 0
+       bpfattach(&ifp->if_bpf, ifp, DLT_NULL, sizeof(u_int));
+#endif
 }
 
 }
 
-struct mbuf *Loop_Sanity;
-
-looutput(ifp, m, dst)
+int
+looutput(ifp, m, dst, rt)
        struct ifnet *ifp;
        register struct mbuf *m;
        struct sockaddr *dst;
        struct ifnet *ifp;
        register struct mbuf *m;
        struct sockaddr *dst;
+       register struct rtentry *rt;
 {
 {
-       int s;
-       register struct ifqueue *ifq;
+       int s, isr;
+       register struct ifqueue *ifq = 0;
 
        if ((m->m_flags & M_PKTHDR) == 0)
                panic("looutput no HDR");
 
        if ((m->m_flags & M_PKTHDR) == 0)
                panic("looutput no HDR");
+       ifp->if_lastchange = time;
+#if NBPFILTER > 0
+       if (loif.if_bpf) {
+               /*
+                * We need to prepend the address family as
+                * a four byte field.  Cons up a dummy header
+                * to pacify bpf.  This is safe because bpf
+                * will only read from the mbuf (i.e., it won't
+                * try to free it or keep a pointer a to it).
+                */
+               struct mbuf m0;
+               u_int af = dst->sa_family;
+
+               m0.m_next = m;
+               m0.m_len = 4;
+               m0.m_data = (char *)&af;
+               
+               bpf_mtap(loif.if_bpf, &m0);
+       }
+#endif
        m->m_pkthdr.rcvif = ifp;
 
        m->m_pkthdr.rcvif = ifp;
 
-{struct mbuf *mm; int mlen = 0;
-for (mm = m; m; m = m->m_next) /* XXX debugging code -- sklower */
-    mlen += m->m_len;
-m = mm;
-if (mlen != m->m_pkthdr.len) {
-       if (Loop_Sanity)
-               m_freem(Loop_Sanity);
-       Loop_Sanity = m_copy(m, 0, (int)M_COPYALL);
-}
-}
-
-       s = splimp();
+       if (rt && rt->rt_flags & (RTF_REJECT|RTF_BLACKHOLE)) {
+               m_freem(m);
+               return (rt->rt_flags & RTF_BLACKHOLE ? 0 :
+                       rt->rt_flags & RTF_HOST ? EHOSTUNREACH : ENETUNREACH);
+       }
        ifp->if_opackets++;
        ifp->if_obytes += m->m_pkthdr.len;
        switch (dst->sa_family) {
        ifp->if_opackets++;
        ifp->if_obytes += m->m_pkthdr.len;
        switch (dst->sa_family) {
@@ -108,75 +146,100 @@ if (mlen != m->m_pkthdr.len) {
 #ifdef INET
        case AF_INET:
                ifq = &ipintrq;
 #ifdef INET
        case AF_INET:
                ifq = &ipintrq;
-               if (IF_QFULL(ifq)) {
-                       IF_DROP(ifq);
-                       m_freem(m);
-                       splx(s);
-                       return (ENOBUFS);
-               }
-               IF_ENQUEUE(ifq, m);
-               schednetisr(NETISR_IP);
+               isr = NETISR_IP;
                break;
 #endif
 #ifdef NS
        case AF_NS:
                ifq = &nsintrq;
                break;
 #endif
 #ifdef NS
        case AF_NS:
                ifq = &nsintrq;
-               if (IF_QFULL(ifq)) {
-                       IF_DROP(ifq);
-                       m_freem(m);
-                       splx(s);
-                       return (ENOBUFS);
-               }
-               IF_ENQUEUE(ifq, m);
-               schednetisr(NETISR_NS);
+               isr = NETISR_NS;
                break;
 #endif
 #ifdef ISO
        case AF_ISO:
                ifq = &clnlintrq;
                break;
 #endif
 #ifdef ISO
        case AF_ISO:
                ifq = &clnlintrq;
-               if (IF_QFULL(ifq)) {
-                       IF_DROP(ifq);
-                       m_freem(m);
-                       splx(s);
-                       return (ENOBUFS);
-               }
-               IF_ENQUEUE(ifq, m);
-               schednetisr(NETISR_ISO);
+               isr = NETISR_ISO;
                break;
 #endif
        default:
                break;
 #endif
        default:
-               splx(s);
                printf("lo%d: can't handle af%d\n", ifp->if_unit,
                        dst->sa_family);
                m_freem(m);
                return (EAFNOSUPPORT);
        }
                printf("lo%d: can't handle af%d\n", ifp->if_unit,
                        dst->sa_family);
                m_freem(m);
                return (EAFNOSUPPORT);
        }
+       s = splimp();
+       if (IF_QFULL(ifq)) {
+               IF_DROP(ifq);
+               m_freem(m);
+               splx(s);
+               return (ENOBUFS);
+       }
+       IF_ENQUEUE(ifq, m);
+       schednetisr(isr);
        ifp->if_ipackets++;
        ifp->if_ibytes += m->m_pkthdr.len;
        splx(s);
        return (0);
 }
 
        ifp->if_ipackets++;
        ifp->if_ibytes += m->m_pkthdr.len;
        splx(s);
        return (0);
 }
 
+/* ARGSUSED */
+void
+lortrequest(cmd, rt, sa)
+       int cmd;
+       struct rtentry *rt;
+       struct sockaddr *sa;
+{
+
+       if (rt)
+               rt->rt_rmx.rmx_mtu = LOMTU;
+}
+
 /*
  * Process an ioctl request.
  */
 /* ARGSUSED */
 /*
  * Process an ioctl request.
  */
 /* ARGSUSED */
+int
 loioctl(ifp, cmd, data)
        register struct ifnet *ifp;
        int cmd;
        caddr_t data;
 {
 loioctl(ifp, cmd, data)
        register struct ifnet *ifp;
        int cmd;
        caddr_t data;
 {
-       int error = 0;
+       register struct ifaddr *ifa;
+       register struct ifreq *ifr;
+       register int error = 0;
 
        switch (cmd) {
 
        case SIOCSIFADDR:
                ifp->if_flags |= IFF_UP;
 
        switch (cmd) {
 
        case SIOCSIFADDR:
                ifp->if_flags |= IFF_UP;
+               ifa = (struct ifaddr *)data;
+               if (ifa != 0 && ifa->ifa_addr->sa_family == AF_ISO)
+                       ifa->ifa_rtrequest = lortrequest;
                /*
                 * Everything else is done at a higher level.
                 */
                break;
 
                /*
                 * Everything else is done at a higher level.
                 */
                break;
 
+       case SIOCADDMULTI:
+       case SIOCDELMULTI:
+               ifr = (struct ifreq *)data;
+               if (ifr == 0) {
+                       error = EAFNOSUPPORT;           /* XXX */
+                       break;
+               }
+               switch (ifr->ifr_addr.sa_family) {
+
+#ifdef INET
+               case AF_INET:
+                       break;
+#endif
+
+               default:
+                       error = EAFNOSUPPORT;
+                       break;
+               }
+               break;
+
        default:
                error = EINVAL;
        }
        default:
                error = EINVAL;
        }