BSD 4_3_Tahoe release
[unix-history] / usr / src / sys / netinet / raw_ip.c
index 7e30f17..43eeb1a 100644 (file)
@@ -1,25 +1,45 @@
-/*     raw_ip.c        4.11    82/04/11        */
+/*
+ * Copyright (c) 1982, 1986 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms are permitted
+ * provided that the above copyright notice and this paragraph are
+ * duplicated in all such forms and that any documentation,
+ * advertising materials, and other materials related to such
+ * distribution and use acknowledge that the software was developed
+ * by the University of California, Berkeley.  The name of the
+ * University may not 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 MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ *
+ *     @(#)raw_ip.c    7.4 (Berkeley) 6/29/88
+ */
+
+#include "param.h"
+#include "mbuf.h"
+#include "socket.h"
+#include "protosw.h"
+#include "socketvar.h"
+#include "errno.h"
 
 
-#include "../h/param.h"
-#include "../h/mbuf.h"
-#include "../h/socket.h"
-#include "../h/protosw.h"
-#include "../h/socketvar.h"
 #include "../net/if.h"
 #include "../net/if.h"
-#include "../net/in.h"
-#include "../net/in_systm.h"
-#include "../net/ip.h"
-#include "../net/ip_var.h"
+#include "../net/route.h"
 #include "../net/raw_cb.h"
 #include "../net/raw_cb.h"
-#include <errno.h>
+
+#include "in.h"
+#include "in_systm.h"
+#include "ip.h"
+#include "ip_var.h"
 
 /*
  * Raw interface to IP protocol.
  */
 
 
 /*
  * Raw interface to IP protocol.
  */
 
-static struct sockaddr_in ripdst = { AF_INET };
-static struct sockaddr_in ripsrc = { AF_INET };
-static struct sockproto ripproto = { PF_INET };
+struct sockaddr_in ripdst = { AF_INET };
+struct sockaddr_in ripsrc = { AF_INET };
+struct sockproto ripproto = { PF_INET };
 /*
  * Setup generic address and protocol structures
  * for raw_input routine, then pass them along with
 /*
  * Setup generic address and protocol structures
  * for raw_input routine, then pass them along with
@@ -30,7 +50,6 @@ rip_input(m)
 {
        register struct ip *ip = mtod(m, struct ip *);
 
 {
        register struct ip *ip = mtod(m, struct ip *);
 
-COUNT(RIP_INPUT);
        ripproto.sp_protocol = ip->ip_p;
        ripdst.sin_addr = ip->ip_dst;
        ripsrc.sin_addr = ip->ip_src;
        ripproto.sp_protocol = ip->ip_p;
        ripdst.sin_addr = ip->ip_dst;
        ripsrc.sin_addr = ip->ip_src;
@@ -50,17 +69,15 @@ rip_output(m0, so)
        register struct ip *ip;
        int len = 0, error;
        struct rawcb *rp = sotorawcb(so);
        register struct ip *ip;
        int len = 0, error;
        struct rawcb *rp = sotorawcb(so);
-       struct ifnet *ifp;
-       struct sockaddr_in *src;
+       struct sockaddr_in *sin;
 
 
-COUNT(RIP_OUTPUT);
        /*
         * Calculate data length and get an mbuf
         * for IP header.
         */
        for (m = m0; m; m = m->m_next)
                len += m->m_len;
        /*
         * Calculate data length and get an mbuf
         * for IP header.
         */
        for (m = m0; m; m = m->m_next)
                len += m->m_len;
-       m = m_get(M_DONTWAIT);
+       m = m_get(M_DONTWAIT, MT_HEADER);
        if (m == 0) {
                error = ENOBUFS;
                goto bad;
        if (m == 0) {
                error = ENOBUFS;
                goto bad;
@@ -73,28 +90,74 @@ COUNT(RIP_OUTPUT);
        m->m_len = sizeof(struct ip);
        m->m_next = m0;
        ip = mtod(m, struct ip *);
        m->m_len = sizeof(struct ip);
        m->m_next = m0;
        ip = mtod(m, struct ip *);
-       ip->ip_p = so->so_proto->pr_protocol;
+       ip->ip_tos = 0;
+       ip->ip_off = 0;
+       ip->ip_p = rp->rcb_proto.sp_protocol;
        ip->ip_len = sizeof(struct ip) + len;
        ip->ip_len = sizeof(struct ip) + len;
-       ip->ip_dst = ((struct sockaddr_in *)&rp->rcb_faddr)->sin_addr;
-       /* local address may not be specified -- XXX */
-       ifp = if_ifonnetof(ip->ip_dst.s_net);
-       if (ifp == 0) {
-               error = ENETUNREACH;
-               goto bad;
-       }
-       if (rp->rcb_flags & RAW_LADDR)
-               src = (struct sockaddr_in *)&rp->rcb_laddr;
-       else {
-               if (ifp->if_addr.sa_family != AF_INET) {
+       if (rp->rcb_flags & RAW_LADDR) {
+               sin = (struct sockaddr_in *)&rp->rcb_laddr;
+               if (sin->sin_family != AF_INET) {
                        error = EAFNOSUPPORT;
                        goto bad;
                }
                        error = EAFNOSUPPORT;
                        goto bad;
                }
-               src = (struct sockaddr_in *)&ifp->if_addr;
-       }
-       ip->ip_src = src->sin_addr;
+               ip->ip_src.s_addr = sin->sin_addr.s_addr;
+       } else
+               ip->ip_src.s_addr = 0;
+       ip->ip_dst = ((struct sockaddr_in *)&rp->rcb_faddr)->sin_addr;
        ip->ip_ttl = MAXTTL;
        ip->ip_ttl = MAXTTL;
-       return (ip_output(m, (struct mbuf *)0, 0, 1));
+       return (ip_output(m, rp->rcb_options, &rp->rcb_route, 
+          (so->so_options & SO_DONTROUTE) | IP_ALLOWBROADCAST));
 bad:
        m_freem(m);
        return (error);
 }
 bad:
        m_freem(m);
        return (error);
 }
+
+/*
+ * Raw IP socket option processing.
+ */
+rip_ctloutput(op, so, level, optname, m)
+       int op;
+       struct socket *so;
+       int level, optname;
+       struct mbuf **m;
+{
+       int error = 0;
+       register struct rawcb *rp = sotorawcb(so);
+
+       if (level != IPPROTO_IP)
+               error = EINVAL;
+       else switch (op) {
+
+       case PRCO_SETOPT:
+               switch (optname) {
+               case IP_OPTIONS:
+                       return (ip_pcbopts(&rp->rcb_options, *m));
+
+               default:
+                       error = EINVAL;
+                       break;
+               }
+               break;
+
+       case PRCO_GETOPT:
+               switch (optname) {
+               case IP_OPTIONS:
+                       *m = m_get(M_WAIT, MT_SOOPTS);
+                       if (rp->rcb_options) {
+                               (*m)->m_off = rp->rcb_options->m_off;
+                               (*m)->m_len = rp->rcb_options->m_len;
+                               bcopy(mtod(rp->rcb_options, caddr_t),
+                                   mtod(*m, caddr_t), (unsigned)(*m)->m_len);
+                       } else
+                               (*m)->m_len = 0;
+                       break;
+               default:
+                       error = EINVAL;
+                       break;
+               }
+               break;
+       }
+       if (op == PRCO_SETOPT && *m)
+               (void)m_free(*m);
+       return (error);
+}