BSD 4_3_Reno release
[unix-history] / usr / src / sys / net / if_loop.c
index 4c77c17..919178c 100644 (file)
@@ -1,31 +1,60 @@
-/*     if_loop.c       4.19    83/06/13        */
+/*
+ * Copyright (c) 1982, 1986 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.
+ *
+ *     @(#)if_loop.c   7.10 (Berkeley) 6/28/90
+ */
 
 /*
  * Loopback interface driver for protocol testing and timing.
  */
 
 
 /*
  * Loopback interface driver for protocol testing and timing.
  */
 
-#include "../h/param.h"
-#include "../h/systm.h"
-#include "../h/mbuf.h"
-#include "../h/socket.h"
-#include "../h/errno.h"
-#include "../h/ioctl.h"
+#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.h"
+#include "../net/if_types.h"
 #include "../net/netisr.h"
 #include "../net/route.h"
 
 #include "../net/netisr.h"
 #include "../net/route.h"
 
+#include "machine/mtpr.h"
+
+#ifdef INET
 #include "../netinet/in.h"
 #include "../netinet/in_systm.h"
 #include "../netinet/in.h"
 #include "../netinet/in_systm.h"
+#include "../netinet/in_var.h"
 #include "../netinet/ip.h"
 #include "../netinet/ip.h"
-#include "../netinet/ip_var.h"
+#endif
 
 
-#ifdef vax
-#include "../vax/mtpr.h"
+#ifdef NS
+#include "../netns/ns.h"
+#include "../netns/ns_if.h"
+#endif
+
+#ifdef ISO
+#include "../netiso/iso.h"
+#include "../netiso/iso_var.h"
 #endif
 
 #endif
 
-#define        LONET   127
-#define        LOHOST  1                       /* can't be 0, that's broadcast */
 #define        LOMTU   (1024+512)
 
 struct ifnet loif;
 #define        LOMTU   (1024+512)
 
 struct ifnet loif;
@@ -34,31 +63,46 @@ int looutput(), loioctl();
 loattach()
 {
        register struct ifnet *ifp = &loif;
 loattach()
 {
        register struct ifnet *ifp = &loif;
-       register struct sockaddr_in *sin;
 
        ifp->if_name = "lo";
        ifp->if_mtu = LOMTU;
 
        ifp->if_name = "lo";
        ifp->if_mtu = LOMTU;
-       ifp->if_net = LONET;
-       ifp->if_host[0] = LOHOST;
-       sin = (struct sockaddr_in *)&ifp->if_addr;
-       sin->sin_family = AF_INET;
-       sin->sin_addr = if_makeaddr(LONET, LOHOST);
-       ifp->if_flags = IFF_UP | IFF_RUNNING;
+       ifp->if_flags = IFF_LOOPBACK;
        ifp->if_ioctl = loioctl;
        ifp->if_output = looutput;
        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_attach(ifp);
-       if_rtinit(ifp, RTF_UP);
 }
 
 }
 
-looutput(ifp, m0, dst)
+struct mbuf *Loop_Sanity;
+
+looutput(ifp, m, dst)
        struct ifnet *ifp;
        struct ifnet *ifp;
-       struct mbuf *m0;
+       register struct mbuf *m;
        struct sockaddr *dst;
 {
        struct sockaddr *dst;
 {
-       int s = splimp();
+       int s;
        register struct ifqueue *ifq;
 
        register struct ifqueue *ifq;
 
+       if ((m->m_flags & M_PKTHDR) == 0)
+               panic("looutput no HDR");
+       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();
        ifp->if_opackets++;
        ifp->if_opackets++;
+       ifp->if_obytes += m->m_pkthdr.len;
        switch (dst->sa_family) {
 
 #ifdef INET
        switch (dst->sa_family) {
 
 #ifdef INET
@@ -66,22 +110,49 @@ looutput(ifp, m0, dst)
                ifq = &ipintrq;
                if (IF_QFULL(ifq)) {
                        IF_DROP(ifq);
                ifq = &ipintrq;
                if (IF_QFULL(ifq)) {
                        IF_DROP(ifq);
-                       m_freem(m0);
+                       m_freem(m);
                        splx(s);
                        return (ENOBUFS);
                }
                        splx(s);
                        return (ENOBUFS);
                }
-               IF_ENQUEUE(ifq, m0);
+               IF_ENQUEUE(ifq, m);
                schednetisr(NETISR_IP);
                break;
                schednetisr(NETISR_IP);
                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);
+               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);
+               break;
 #endif
        default:
                splx(s);
                printf("lo%d: can't handle af%d\n", ifp->if_unit,
                        dst->sa_family);
 #endif
        default:
                splx(s);
                printf("lo%d: can't handle af%d\n", ifp->if_unit,
                        dst->sa_family);
-               m_freem(m0);
+               m_freem(m);
                return (EAFNOSUPPORT);
        }
        ifp->if_ipackets++;
                return (EAFNOSUPPORT);
        }
        ifp->if_ipackets++;
+       ifp->if_ibytes += m->m_pkthdr.len;
        splx(s);
        return (0);
 }
        splx(s);
        return (0);
 }
@@ -89,30 +160,25 @@ looutput(ifp, m0, dst)
 /*
  * Process an ioctl request.
  */
 /*
  * Process an ioctl request.
  */
+/* ARGSUSED */
 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;
 {
-       struct ifreq *ifr = (struct ifreq *)data;
-       struct sockaddr_in *sin;
-       int s = splimp(), error = 0;
+       int error = 0;
 
        switch (cmd) {
 
        case SIOCSIFADDR:
 
        switch (cmd) {
 
        case SIOCSIFADDR:
-               if (ifp->if_flags & IFF_RUNNING)
-                       if_rtinit(ifp, -1);     /* delete previous route */
-               ifp->if_addr = ifr->ifr_addr;
-               sin = (struct sockaddr_in *)&ifp->if_addr;
-               ifp->if_net = in_netof(sin->sin_addr);
-               ifp->if_host[0] = in_lnaof(sin->sin_addr);
-               if_rtinit(ifp, RTF_UP);
+               ifp->if_flags |= IFF_UP;
+               /*
+                * Everything else is done at a higher level.
+                */
                break;
 
        default:
                error = EINVAL;
        }
                break;
 
        default:
                error = EINVAL;
        }
-       splx(s);
        return (error);
 }
        return (error);
 }