Latest fixes from Nesheim@cornell

[unix-history] / usr / src / sys / vax / if / if_en.c

diff --git a/usr/src/sys/vax/if/if_en.c b/usr/src/sys/vax/if/if_en.c
index 0fc0c29..89fe9bd 100644 (file)
--- a/usr/src/sys/vax/if/if_en.c
+++ b/usr/src/sys/vax/if/if_en.c
@@ -1,4 +1,10 @@
-/*     if_en.c 4.80    83/06/13        */
+/*
+ * Copyright (c) 1982 Regents of the University of California.
+ * All rights reserved.  The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ *
+ *     @(#)if_en.c     6.8 (Berkeley) %G%
+ */

 
 #include "en.h"
 
 
 #include "en.h"
 


@@ -7,30 +13,34 @@
  */
 #include "../machine/pte.h"
 
  */
 #include "../machine/pte.h"
 

-#include "../h/param.h"
-#include "../h/systm.h"
-#include "../h/mbuf.h"
-#include "../h/buf.h"
-#include "../h/protosw.h"
-#include "../h/socket.h"
-#include "../h/vmmac.h"
-#include "../h/errno.h"
-#include "../h/ioctl.h"
+#include "param.h"
+#include "systm.h"
+#include "mbuf.h"
+#include "buf.h"
+#include "protosw.h"
+#include "socket.h"
+#include "vmmac.h"
+#include "errno.h"
+#include "ioctl.h"

 
 #include "../net/if.h"
 #include "../net/netisr.h"
 #include "../net/route.h"
 #include "../netinet/in.h"
 #include "../netinet/in_systm.h"
 
 #include "../net/if.h"
 #include "../net/netisr.h"
 #include "../net/route.h"
 #include "../netinet/in.h"
 #include "../netinet/in_systm.h"

+#include "../netinet/in_var.h"

 #include "../netinet/ip.h"
 #include "../netinet/ip_var.h"
 #include "../netinet/ip.h"
 #include "../netinet/ip_var.h"

+#ifdef PUP

 #include "../netpup/pup.h"
 #include "../netpup/pup.h"

+#include "../netpup/ether.h"
+#endif

 
 #include "../vax/cpu.h"
 #include "../vax/mtpr.h"
 
 #include "../vax/cpu.h"
 #include "../vax/mtpr.h"

-#include "../vaxif/if_en.h"
-#include "../vaxif/if_enreg.h"
-#include "../vaxif/if_uba.h"
+#include "if_en.h"
+#include "if_enreg.h"
+#include "if_uba.h"

 #include "../vaxuba/ubareg.h"
 #include "../vaxuba/ubavar.h"
 
 #include "../vaxuba/ubareg.h"
 #include "../vaxuba/ubavar.h"
 


@@ -46,6 +56,14 @@ struct       uba_driver endriver =
 
 int    eninit(),enoutput(),enreset(),enioctl();
 
 
 int    eninit(),enoutput(),enreset(),enioctl();
 

+#ifdef notdef
+/*
+ * If you need to byte swap IP's in the system, define
+ * this and do a SIOCSIFFLAGS at boot time.
+ */
+#define        ENF_SWABIPS     0x1000
+#endif
+

 /*
  * Ethernet software status per interface.
  *
 /*
  * Ethernet software status per interface.
  *


@@ -61,6 +79,7 @@ int   eninit(),enoutput(),enreset(),enioctl();
 struct en_softc {
        struct  ifnet es_if;            /* network-visible interface */
        struct  ifuba es_ifuba;         /* UNIBUS resources */
 struct en_softc {
        struct  ifnet es_if;            /* network-visible interface */
        struct  ifuba es_ifuba;         /* UNIBUS resources */

+       short   es_host;                /* hardware host number */

        short   es_delay;               /* current output delay */
        short   es_mask;                /* mask for current output delay */
        short   es_lastx;               /* host last transmitted to */
        short   es_delay;               /* current output delay */
        short   es_mask;                /* mask for current output delay */
        short   es_lastx;               /* host last transmitted to */


@@ -104,6 +123,7 @@ enattach(ui)
        es->es_if.if_unit = ui->ui_unit;
        es->es_if.if_name = "en";
        es->es_if.if_mtu = ENMTU;
        es->es_if.if_unit = ui->ui_unit;
        es->es_if.if_name = "en";
        es->es_if.if_mtu = ENMTU;

+       es->es_if.if_flags = IFF_BROADCAST;

        es->es_if.if_init = eninit;
        es->es_if.if_output = enoutput;
        es->es_if.if_ioctl = enioctl;
        es->es_if.if_init = eninit;
        es->es_if.if_output = enoutput;
        es->es_if.if_ioctl = enioctl;


@@ -143,10 +163,9 @@ eninit(unit)
        register struct en_softc *es = &en_softc[unit];
        register struct uba_device *ui = eninfo[unit];
        register struct endevice *addr;
        register struct en_softc *es = &en_softc[unit];
        register struct uba_device *ui = eninfo[unit];
        register struct endevice *addr;

-       struct sockaddr_in *sin = (struct sockaddr_in *)&es->es_if.if_addr;

        int s;
 
        int s;
 

-       if (in_netof(sin->sin_addr) == 0)
+       if (es->es_if.if_addrlist == (struct ifaddr *)0)

                return;
        if (if_ubainit(&es->es_ifuba, ui->ui_ubanum,
            sizeof (struct en_header), (int)btoc(ENMRU)) == 0) { 
                return;
        if (if_ubainit(&es->es_ifuba, ui->ui_ubanum,
            sizeof (struct en_header), (int)btoc(ENMRU)) == 0) { 


@@ -166,10 +185,9 @@ eninit(unit)
        addr->en_iwc = -(sizeof (struct en_header) + ENMRU) >> 1;
        addr->en_istat = EN_IEN|EN_GO;
        es->es_oactive = 1;
        addr->en_iwc = -(sizeof (struct en_header) + ENMRU) >> 1;
        addr->en_istat = EN_IEN|EN_GO;
        es->es_oactive = 1;

-       es->es_if.if_flags |= IFF_UP|IFF_RUNNING;
+       es->es_if.if_flags |= IFF_RUNNING;

        enxint(unit);
        splx(s);
        enxint(unit);
        splx(s);

-       if_rtinit(&es->es_if, RTF_UP);

 }
 
 int    enalldelay = 0;
 }
 
 int    enalldelay = 0;


@@ -191,6 +209,7 @@ enstart(dev)
        struct uba_device *ui = eninfo[unit];
        register struct en_softc *es = &en_softc[unit];
        register struct endevice *addr;
        struct uba_device *ui = eninfo[unit];
        register struct en_softc *es = &en_softc[unit];
        register struct endevice *addr;

+       register struct en_header *en;

        struct mbuf *m;
        int dest;
 
        struct mbuf *m;
        int dest;
 


@@ -207,8 +226,26 @@ enstart(dev)
                es->es_oactive = 0;
                return;
        }
                es->es_oactive = 0;
                return;
        }

-       dest = mtod(m, struct en_header *)->en_dhost;
+       en = mtod(m, struct en_header *);
+       dest = en->en_dhost;
+       en->en_shost = es->es_host;

        es->es_olen = if_wubaput(&es->es_ifuba, m);
        es->es_olen = if_wubaput(&es->es_ifuba, m);

+#ifdef ENF_SWABIPS
+       /*
+        * The Xerox interface does word at a time DMA, so
+        * someone must do byte swapping of user data if high
+        * and low ender machines are to communicate.  It doesn't
+        * belong here, but certain people depend on it, so...
+        *
+        * Should swab everybody, but this is a kludge anyway.
+        */
+       if (es->es_if.if_flags & ENF_SWABIPS) {
+               en = (struct en_header *)es->es_ifuba.ifu_w.ifrw_addr;
+               if (en->en_type == ENTYPE_IP)
+                       enswab((caddr_t)(en + 1), (caddr_t)(en + 1),
+                           es->es_olen - sizeof (struct en_header) + 1);
+       }
+#endif

 
        /*
         * Ethernet cannot take back-to-back packets (no
 
        /*
         * Ethernet cannot take back-to-back packets (no


@@ -312,9 +349,11 @@ endocoll(unit)
        enstart(unit);
 }
 
        enstart(unit);
 }
 

-struct sockaddr_pup pupsrc = { AF_PUP };
-struct sockaddr_pup pupdst = { AF_PUP };
-struct sockproto pupproto = { PF_PUP };
+#ifdef notdef
+struct sockproto enproto = { AF_ETHERLINK };
+struct sockaddr_en endst = { AF_ETHERLINK };
+struct sockaddr_en ensrc = { AF_ETHERLINK };
+#endif

 /*
  * Ethernet interface receiver interrupt.
  * If input error just drop packet.
 /*
  * Ethernet interface receiver interrupt.
  * If input error just drop packet.


@@ -333,7 +372,7 @@ enrint(unit)
        struct mbuf *m;
        int len; short resid;
        register struct ifqueue *inq;
        struct mbuf *m;
        int len; short resid;
        register struct ifqueue *inq;

-       int off;
+       int off, s;

 
        es->es_if.if_ipackets++;
 
 
        es->es_if.if_ipackets++;
 


@@ -378,6 +417,10 @@ enrint(unit)
                off = 0;
        if (len == 0)
                goto setup;
                off = 0;
        if (len == 0)
                goto setup;

+#ifdef ENF_SWABIPS
+       if (es->es_if.if_flags & ENF_SWABIPS && en->en_type == ENTYPE_IP)
+               enswab((caddr_t)(en + 1), (caddr_t)(en + 1), len);
+#endif

        /*
         * Pull packet off interface.  Off is nonzero if packet
         * has trailing header; if_rubaget will then force this header
        /*
         * Pull packet off interface.  Off is nonzero if packet
         * has trailing header; if_rubaget will then force this header


@@ -400,29 +443,31 @@ enrint(unit)
                break;
 #endif
 #ifdef PUP
                break;
 #endif
 #ifdef PUP

-       case ENTYPE_PUP: {
-               struct pup_header *pup = mtod(m, struct pup_header *);
-
-               pupproto.sp_protocol = pup->pup_type;
-               bcopy((caddr_t)pup->pup_dnet, (caddr_t)pupdst.spup_net,
-                   sizeof (struct pupport));
-               bcopy((caddr_t)pup->pup_snet, (caddr_t)pupsrc.spup_net,
-                   sizeof (struct pupport));
-               raw_input(m, &pupproto, (struct sockaddr *)&pupsrc,
-                 (struct sockaddr *)&pupdst);
+       case ENTYPE_PUP:
+               rpup_input(m);

                goto setup;
                goto setup;

-       }

 #endif
        default:
 #endif
        default:

+#ifdef notdef
+               enproto.sp_protocol = en->en_type;
+               endst.sen_host = en->en_dhost;
+               endst.sen_net = ensrc.sen_net = es->es_if.if_net;
+               ensrc.sen_host = en->en_shost;
+               raw_input(m, &enproto,
+                   (struct sockaddr *)&ensrc, (struct sockaddr *)&endst);
+#else

                m_freem(m);
                m_freem(m);

+#endif

                goto setup;
        }
 
                goto setup;
        }
 

+       s = splimp();

        if (IF_QFULL(inq)) {
                IF_DROP(inq);
                m_freem(m);
        } else
                IF_ENQUEUE(inq, m);
        if (IF_QFULL(inq)) {
                IF_DROP(inq);
                m_freem(m);
        } else
                IF_ENQUEUE(inq, m);

+       splx(s);

 
 setup:
        /*
 
 setup:
        /*


@@ -453,12 +498,19 @@ enoutput(ifp, m0, dst)
 
 #ifdef INET
        case AF_INET:
 
 #ifdef INET
        case AF_INET:

-               dest = ((struct sockaddr_in *)dst)->sin_addr.s_addr;
-               if (in_lnaof(*((struct in_addr *)&dest)) >= 0x100) {
+               {
+               struct in_addr in;
+
+               in = ((struct sockaddr_in *)dst)->sin_addr;
+               if (in_broadcast(in))
+                       dest = EN_BROADCAST;
+               else
+                       dest = in_lnaof(in);
+               }
+               if (dest >= 0x100) {

                        error = EPERM;          /* ??? */
                        goto bad;
                }
                        error = EPERM;          /* ??? */
                        goto bad;
                }

-               dest = (dest >> 24) & 0xff;

                off = ntohs((u_short)mtod(m, struct ip *)->ip_len) - m->m_len;
                /* need per host negotiation */
                if ((ifp->if_flags & IFF_NOTRAILERS) == 0)
                off = ntohs((u_short)mtod(m, struct ip *)->ip_len) - m->m_len;
                /* need per host negotiation */
                if ((ifp->if_flags & IFF_NOTRAILERS) == 0)


@@ -483,6 +535,11 @@ enoutput(ifp, m0, dst)
                goto gottype;
 #endif
 
                goto gottype;
 #endif
 

+#ifdef notdef
+       case AF_ETHERLINK:
+               goto gotheader;
+#endif
+

        default:
                printf("en%d: can't handle af%d\n", ifp->if_unit,
                        dst->sa_family);
        default:
                printf("en%d: can't handle af%d\n", ifp->if_unit,
                        dst->sa_family);


@@ -509,7 +566,7 @@ gottype:
         */
        if (m->m_off > MMAXOFF ||
            MMINOFF + sizeof (struct en_header) > m->m_off) {
         */
        if (m->m_off > MMAXOFF ||
            MMINOFF + sizeof (struct en_header) > m->m_off) {

-               m = m_get(M_DONTWAIT, MT_HEADER);
+               MGET(m, M_DONTWAIT, MT_HEADER);

                if (m == 0) {
                        error = ENOBUFS;
                        goto bad;
                if (m == 0) {
                        error = ENOBUFS;
                        goto bad;


@@ -522,10 +579,11 @@ gottype:
                m->m_len += sizeof (struct en_header);
        }
        en = mtod(m, struct en_header *);
                m->m_len += sizeof (struct en_header);
        }
        en = mtod(m, struct en_header *);

-       en->en_shost = ifp->if_host[0];
+       /* add en_shost later */

        en->en_dhost = dest;
        en->en_type = htons((u_short)type);
 
        en->en_dhost = dest;
        en->en_type = htons((u_short)type);
 

+gotheader:

        /*
         * Queue message on interface, and start output if interface
         * not yet active.
        /*
         * Queue message on interface, and start output if interface
         * not yet active.


@@ -557,18 +615,28 @@ enioctl(ifp, cmd, data)
        int cmd;
        caddr_t data;
 {
        int cmd;
        caddr_t data;
 {

-       struct ifreq *ifr = (struct ifreq *)data;
+       register struct en_softc *es = ((struct en_softc *)ifp);
+       struct ifaddr *ifa = (struct ifaddr *) data;

        int s = splimp(), error = 0;
        int s = splimp(), error = 0;

+       struct endevice *enaddr;

 
        switch (cmd) {
 
        case SIOCSIFADDR:
 
        switch (cmd) {
 
        case SIOCSIFADDR:

-               if (ifp->if_flags & IFF_RUNNING)
-                       if_rtinit(ifp, -1);     /* delete previous route */
-               ensetaddr(ifp, (struct sockaddr_in *)&ifr->ifr_addr);
-               if (ifp->if_flags & IFF_RUNNING)
-                       if_rtinit(ifp, RTF_UP);
-               else
+               enaddr = (struct endevice *)eninfo[ifp->if_unit]->ui_addr;
+               es->es_host = (~enaddr->en_addr) & 0xff;
+               /*
+                * Attempt to check agreement of protocol address
+                * and board address.
+                */
+               switch (ifa->ifa_addr.sa_family) {
+               case AF_INET:
+                       if (in_lnaof(IA_SIN(ifa)->sin_addr) != es->es_host)
+                               return (EADDRNOTAVAIL);
+                       break;
+               }
+               ifp->if_flags |= IFF_UP;
+               if ((ifp->if_flags & IFF_RUNNING) == 0)

                        eninit(ifp->if_unit);
                break;
 
                        eninit(ifp->if_unit);
                break;
 


@@ -579,20 +647,31 @@ enioctl(ifp, cmd, data)
        return (error);
 }
 
        return (error);
 }
 

-ensetaddr(ifp, sin)
-       register struct ifnet *ifp;
-       register struct sockaddr_in *sin;
+#ifdef ENF_SWABIPS
+/*
+ * Swab bytes
+ * Jeffrey Mogul, Stanford
+ */
+enswab(from, to, n)
+       register unsigned char *from, *to;
+       register int n;

 {
 {

-       struct endevice *enaddr;
+       register unsigned long temp;

 
 

-       ifp->if_net = in_netof(sin->sin_addr);
-       enaddr = (struct endevice *)eninfo[ifp->if_unit]->ui_addr;
-       ifp->if_host[0] = (~enaddr->en_addr) & 0xff;
-       sin = (struct sockaddr_in *)&ifp->if_addr;
-       sin->sin_family = AF_INET;
-       sin->sin_addr = if_makeaddr(ifp->if_net, ifp->if_host[0]);
-       sin = (struct sockaddr_in *)&ifp->if_broadaddr;
-       sin->sin_family = AF_INET;
-       sin->sin_addr = if_makeaddr(ifp->if_net, INADDR_ANY);
-       ifp->if_flags |= IFF_BROADCAST;
+       if ((n <= 0) || (n > 0xFFFF)) {
+               printf("enswab: bad len %d\n", n);
+               return;
+       }
+       
+       n >>= 1; n++;
+#define        STEP    {temp = *from++;*to++ = *from++;*to++ = temp;}
+       /* round to multiple of 8 */
+       while ((--n) & 07)
+               STEP;
+       n >>= 3;
+       while (--n >= 0) {
+               STEP; STEP; STEP; STEP;
+               STEP; STEP; STEP; STEP;
+       }

 }
 }

+#endif