trailer's handled wrong on pup's
[unix-history] / usr / src / sys / net / raw_usrreq.c
index c1dac29..aee828e 100644 (file)
-/*     raw_usrreq.c    4.2     81/12/02        */
+/*     raw_usrreq.c    4.11    82/03/19        */
 
 #include "../h/param.h"
 #include "../h/mbuf.h"
 
 #include "../h/param.h"
 #include "../h/mbuf.h"
+#include "../h/protosw.h"
 #include "../h/socket.h"
 #include "../h/socketvar.h"
 #include "../h/mtpr.h"
 #include "../net/in.h"
 #include "../net/in_systm.h"
 #include "../net/if.h"
 #include "../h/socket.h"
 #include "../h/socketvar.h"
 #include "../h/mtpr.h"
 #include "../net/in.h"
 #include "../net/in_systm.h"
 #include "../net/if.h"
+#include "../net/raw_cb.h"
+#include "../errno.h"
+
+int    rawqmaxlen = IFQ_MAXLEN;
+
+/*
+ * Initialize raw connection block q.
+ */
+raw_init()
+{
+
+COUNT(RAW_INIT);
+       rawcb.rcb_next = rawcb.rcb_prev = &rawcb;
+       rawintrq.ifq_maxlen = IFQ_MAXLEN;
+}
 
 /*
  * Raw protocol interface.
  */
 
 /*
  * Raw protocol interface.
  */
-raw_input(m, pf, af)
-       struct mbuf *m;
-       struct sockproto pf;
-       struct sockaddr af;
+raw_input(m0, pf, daf, saf)
+       struct mbuf *m0;
+       struct sockproto *pf;
+       struct sockaddr *daf, *saf;
 {
 {
-       struct mbuf *mh;
+       register struct mbuf *m;
+       struct raw_header *rh;
        int s;
 
        int s;
 
-       mh = m_get(0);
-       if (mh == 0)
-               goto drop;
-       mh->m_next = m;
-       mh->m_off = MMINOFF + sizeof (struct sockproto);
-       *mtod(m, struct sockaddr *) = af;
-       mh->m_off = MMINOFF;
-       *mtod(m, struct sockproto *) = pf;
-       mh->m_len = sizeof (struct sockproto) + sizeof (struct sockaddr);
+COUNT(RAW_INPUT);
+       /*
+        * Rip off an mbuf for a generic header.
+        */
+       m = m_get(M_DONTWAIT);
+       if (m == 0) {
+               m_freem(m0);
+               return;
+       }
+       m->m_next = m0;
+       m->m_off = MMINOFF;
+       m->m_len = sizeof(struct raw_header);
+       rh = mtod(m, struct raw_header *);
+       rh->raw_dst = *daf;
+       rh->raw_src = *saf;
+       rh->raw_protocol = *pf;
+
+       /*
+        * Header now contains enough info to decide
+        * which socket to place packet in (if any).
+        * Queue it up for the raw protocol process
+        * running at software interrupt level.
+        */
        s = splimp();
        s = splimp();
-       IF_ENQUEUE(&rawintrq, mh);
+       if (IF_QFULL(&rawintrq))
+               m_freem(m);
+       else
+               IF_ENQUEUE(&rawintrq, m);
        splx(s);
        splx(s);
-       setrawintr();
-       return;
-drop:
-       m_freem(m);
+       schednetisr(NETISR_RAW);
 }
 
 }
 
+/*
+ * Raw protocol input routine.  Process packets entered
+ * into the queue at interrupt time.  Find the socket
+ * associated with the packet(s) and move them over.  If
+ * nothing exists for this packet, drop it.
+ */
 rawintr()
 {
        int s;
        struct mbuf *m;
 rawintr()
 {
        int s;
        struct mbuf *m;
+       register struct rawcb *rp;
+       register struct socket *so;
+       register struct protosw *pr;
+       register struct sockproto *sp;
+       register struct sockaddr *sa;
+       struct raw_header *rawp;
+       struct socket *last;
 
 COUNT(RAWINTR);
 next:
        s = splimp();
 
 COUNT(RAWINTR);
 next:
        s = splimp();
-/*###45 [cc] rawintrq undefined %%%*/
        IF_DEQUEUE(&rawintrq, m);
        splx(s);
        if (m == 0)
                return;
        IF_DEQUEUE(&rawintrq, m);
        splx(s);
        if (m == 0)
                return;
-       /* ... */
-       goto drop;
+       rawp = mtod(m, struct raw_header *);
+       sp = &rawp->raw_protocol;
+       sa = &rawp->raw_dst;
+
+       /*
+        * Find the appropriate socket(s) in which to place this
+        * packet.  This is done by matching the protocol and
+        * address information prepended by raw_input against
+        * the info stored in the control block structures.
+        */
+       last = 0;
+       for (rp = rawcb.rcb_next; rp != &rawcb; rp = rp->rcb_next) {
+               so = rp->rcb_socket;
+               pr = so->so_proto;
+               if (pr->pr_family != sp->sp_family ||
+                   (pr->pr_protocol && pr->pr_protocol != sp->sp_protocol))
+                       continue;
+               if (so->so_addr.sa_family && 
+                   sa->sa_family != so->so_addr.sa_family)
+                       continue;
+               /*
+                * We assume the lower level routines have
+                * placed the address in a canonical format
+                * suitable for a structure comparison. Packets
+                * are duplicated for each receiving socket.
+                *
+                * SHOULD HAVE A NUMBER OF MECHANISMS FOR
+                * MATCHING BASED ON rcb_flags
+                */
+               if ((rp->rcb_flags & RAW_ADDR) &&
+                   bcmp(sa->sa_data, so->so_addr.sa_data, 14) != 0)
+                       continue;
+               /*
+                * To avoid extraneous packet copies, we keep
+                * track of the last socket the packet should be
+                * placed in, and make copies only after finding a
+                * socket which "collides".
+                */
+               if (last) {
+                       struct mbuf *n;
+
+                       if (n = m_copy(m->m_next, 0, (int)M_COPYALL))
+                               goto nospace;
+                       if (sbappendaddr(&last->so_rcv, &rawp->raw_src, n) == 0) {
+                               /*
+                                * Should drop notification of lost packet
+                                * into this guy's queue, but...
+                                */
+                               m_freem(n);
+                               goto nospace;
+                       }
+                       sorwakeup(last);
+               }
+nospace:
+               last = so;
+       }
+       if (last == 0)
+               goto drop;
+       if (sbappendaddr(&last->so_rcv, &rawp->raw_src, m->m_next) == 0)
+{
+printf("rawintr: sbappendaddr failed\n");
+               goto drop;
+}
+       (void) m_free(m);       /* generic header */
+       sorwakeup(last);
+       goto next;
 drop:
        m_freem(m);
        goto next;
 drop:
        m_freem(m);
        goto next;
@@ -65,7 +172,101 @@ raw_usrreq(so, req, m, addr)
        struct mbuf *m;
        caddr_t addr;
 {
        struct mbuf *m;
        caddr_t addr;
 {
+       register struct rawcb *rp = sotorawcb(so);
+       int error = 0;
 
 COUNT(RAW_USRREQ);
 
 COUNT(RAW_USRREQ);
+       if (rp == 0 && req != PRU_ATTACH)
+               return (EINVAL);
+
+       switch (req) {
+
+       /*
+        * Allocate a raw control block and fill in the
+        * necessary info to allow packets to be routed to
+        * the appropriate raw interface routine.
+        */
+       case PRU_ATTACH:
+               if ((so->so_state & SS_PRIV) == 0)
+                       return (EPERM);
+               if (rp)
+                       return (EINVAL);
+               error = raw_attach(so, (struct sockaddr *)addr);
+               break;
+
+       /*
+        * Destroy state just before socket deallocation.
+        * Flush data or not depending on the options.
+        */
+       case PRU_DETACH:
+               if (rp == 0)
+                       return (ENOTCONN);
+               raw_detach(rp);
+               break;
+
+       /*
+        * If a socket isn't bound to a single address,
+        * the raw input routine will hand it anything
+        * within that protocol family (assuming there's
+        * nothing else around it should go to). 
+        */
+       case PRU_CONNECT:
+               if (rp->rcb_flags & RAW_ADDR)
+                       return (EISCONN);
+               raw_connaddr(rp, (struct sockaddr *)addr);
+               soisconnected(so);
+               break;
+
+       case PRU_DISCONNECT:
+               if ((rp->rcb_flags & RAW_ADDR) == 0)
+                       return (ENOTCONN);
+               raw_disconnect(rp);
+               soisdisconnected(so);
+               break;
+
+       /*
+        * Mark the connection as being incapable of further input.
+        */
+       case PRU_SHUTDOWN:
+               socantsendmore(so);
+               break;
+
+       /*
+        * Ship a packet out.  The appropriate raw output
+        * routine handles any massaging necessary.
+        */
+       case PRU_SEND:
+               if (addr) {
+                       if (rp->rcb_flags & RAW_ADDR)
+                               return (EISCONN);
+                       raw_connaddr(rp, (struct sockaddr *)addr);
+               } else if ((rp->rcb_flags & RAW_ADDR) == 0)
+                       return (ENOTCONN);
+               (void) (*so->so_proto->pr_output)(m, so);
+               if (addr)
+                       rp->rcb_flags &= ~RAW_ADDR;
+               break;
+
+       case PRU_ABORT:
+               raw_disconnect(rp);
+               sofree(so);
+               soisdisconnected(so);
+               break;
+
+       /*
+        * Not supported.
+        */
+       case PRU_ACCEPT:
+       case PRU_RCVD:
+       case PRU_CONTROL:
+       case PRU_SENSE:
+       case PRU_RCVOOB:
+       case PRU_SENDOOB:
+               error = EOPNOTSUPP;
+               break;
 
 
+       default:
+               panic("raw_usrreq");
+       }
+       return (error);
 }
 }