| version 1.55, 2001/02/26 07:20:44 |
version 1.55.2.6, 2002/11/07 17:58:51 |
|
|
| /* |
/* |
| * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project. |
* Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project. |
| * All rights reserved. |
* All rights reserved. |
| * |
* |
| * Redistribution and use in source and binary forms, with or without |
* Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
* modification, are permitted provided that the following conditions |
| * are met: |
* are met: |
|
|
| * 3. Neither the name of the project nor the names of its contributors |
* 3. Neither the name of the project nor the names of its contributors |
| * may be used to endorse or promote products derived from this software |
* may be used to endorse or promote products derived from this software |
| * without specific prior written permission. |
* without specific prior written permission. |
| * |
* |
| * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND |
* THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND |
| * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
|
|
| * @(#)raw_ip.c 8.7 (Berkeley) 5/15/95 |
* @(#)raw_ip.c 8.7 (Berkeley) 5/15/95 |
| */ |
*/ |
| |
|
| |
#include <sys/cdefs.h> |
| |
__KERNEL_RCSID(0, "$NetBSD$"); |
| |
|
| #include "opt_ipsec.h" |
#include "opt_ipsec.h" |
| #include "opt_mrouting.h" |
#include "opt_mrouting.h" |
| |
|
|
|
| |
|
| struct inpcbtable rawcbtable; |
struct inpcbtable rawcbtable; |
| |
|
| |
int rip_pcbnotify __P((struct inpcbtable *, struct in_addr, |
| |
struct in_addr, int, int, void (*) __P((struct inpcb *, int)))); |
| int rip_bind __P((struct inpcb *, struct mbuf *)); |
int rip_bind __P((struct inpcb *, struct mbuf *)); |
| int rip_connect __P((struct inpcb *, struct mbuf *)); |
int rip_connect __P((struct inpcb *, struct mbuf *)); |
| void rip_disconnect __P((struct inpcb *)); |
void rip_disconnect __P((struct inpcb *)); |
|
|
| in_pcbinit(&rawcbtable, 1, 1); |
in_pcbinit(&rawcbtable, 1, 1); |
| } |
} |
| |
|
| static struct sockaddr_in ripsrc = { sizeof(ripsrc), AF_INET }; |
|
| |
|
| /* |
/* |
| * Setup generic address and protocol structures |
* Setup generic address and protocol structures |
| * for raw_input routine, then pass them along with |
* for raw_input routine, then pass them along with |
| Line 137 rip_input(m, va_alist) |
|
| Line 140 rip_input(m, va_alist) |
|
| va_dcl |
va_dcl |
| #endif |
#endif |
| { |
{ |
| int off, proto; |
int proto; |
| struct ip *ip = mtod(m, struct ip *); |
struct ip *ip = mtod(m, struct ip *); |
| struct inpcb *inp; |
struct inpcb *inp; |
| struct inpcb *last = 0; |
struct inpcb *last = 0; |
| Line 146 rip_input(m, va_alist) |
|
| Line 149 rip_input(m, va_alist) |
|
| va_list ap; |
va_list ap; |
| |
|
| va_start(ap, m); |
va_start(ap, m); |
| off = va_arg(ap, int); |
(void)va_arg(ap, int); /* ignore value, advance ap */ |
| proto = va_arg(ap, int); |
proto = va_arg(ap, int); |
| va_end(ap); |
va_end(ap); |
| |
|
| Line 158 rip_input(m, va_alist) |
|
| Line 161 rip_input(m, va_alist) |
|
| |
|
| /* |
/* |
| * XXX Compatibility: programs using raw IP expect ip_len |
* XXX Compatibility: programs using raw IP expect ip_len |
| * XXX to have the header length subtracted. |
* XXX to have the header length subtracted, and in host order. |
| |
* XXX ip_off is also expected to be host order. |
| */ |
*/ |
| ip->ip_len -= ip->ip_hl << 2; |
ip->ip_len = ntohs(ip->ip_len) - (ip->ip_hl << 2); |
| |
NTOHS(ip->ip_off); |
| |
|
| for (inp = rawcbtable.inpt_queue.cqh_first; |
CIRCLEQ_FOREACH(inp, &rawcbtable.inpt_queue, inp_queue) { |
| inp != (struct inpcb *)&rawcbtable.inpt_queue; |
|
| inp = inp->inp_queue.cqe_next) { |
|
| if (inp->inp_ip.ip_p && inp->inp_ip.ip_p != proto) |
if (inp->inp_ip.ip_p && inp->inp_ip.ip_p != proto) |
| continue; |
continue; |
| if (!in_nullhost(inp->inp_laddr) && |
if (!in_nullhost(inp->inp_laddr) && |
| Line 232 rip_input(m, va_alist) |
|
| Line 235 rip_input(m, va_alist) |
|
| return; |
return; |
| } |
} |
| |
|
| |
int |
| |
rip_pcbnotify(table, faddr, laddr, proto, errno, notify) |
| |
struct inpcbtable *table; |
| |
struct in_addr faddr, laddr; |
| |
int proto; |
| |
int errno; |
| |
void (*notify) __P((struct inpcb *, int)); |
| |
{ |
| |
struct inpcb *inp, *ninp; |
| |
int nmatch; |
| |
|
| |
nmatch = 0; |
| |
for (inp = CIRCLEQ_FIRST(&table->inpt_queue); |
| |
inp != (struct inpcb *)&table->inpt_queue; |
| |
inp = ninp) { |
| |
ninp = inp->inp_queue.cqe_next; |
| |
if (inp->inp_ip.ip_p && inp->inp_ip.ip_p != proto) |
| |
continue; |
| |
if (in_hosteq(inp->inp_faddr, faddr) && |
| |
in_hosteq(inp->inp_laddr, laddr)) { |
| |
(*notify)(inp, errno); |
| |
nmatch++; |
| |
} |
| |
} |
| |
|
| |
return nmatch; |
| |
} |
| |
|
| |
void * |
| |
rip_ctlinput(cmd, sa, v) |
| |
int cmd; |
| |
struct sockaddr *sa; |
| |
void *v; |
| |
{ |
| |
struct ip *ip = v; |
| |
void (*notify) __P((struct inpcb *, int)) = in_rtchange; |
| |
int errno; |
| |
|
| |
if (sa->sa_family != AF_INET || |
| |
sa->sa_len != sizeof(struct sockaddr_in)) |
| |
return NULL; |
| |
if ((unsigned)cmd >= PRC_NCMDS) |
| |
return NULL; |
| |
errno = inetctlerrmap[cmd]; |
| |
if (PRC_IS_REDIRECT(cmd)) |
| |
notify = in_rtchange, ip = 0; |
| |
else if (cmd == PRC_HOSTDEAD) |
| |
ip = 0; |
| |
else if (errno == 0) |
| |
return NULL; |
| |
if (ip) { |
| |
rip_pcbnotify(&rawcbtable, satosin(sa)->sin_addr, |
| |
ip->ip_src, ip->ip_p, errno, notify); |
| |
|
| |
/* XXX mapped address case */ |
| |
} else |
| |
in_pcbnotifyall(&rawcbtable, satosin(sa)->sin_addr, errno, |
| |
notify); |
| |
return NULL; |
| |
} |
| |
|
| /* |
/* |
| * Generate IP header and pass packet to ip_output. |
* Generate IP header and pass packet to ip_output. |
| * Tack on options user may have setup with control call. |
* Tack on options user may have setup with control call. |
| Line 271 rip_output(m, va_alist) |
|
| Line 335 rip_output(m, va_alist) |
|
| M_PREPEND(m, sizeof(struct ip), M_WAIT); |
M_PREPEND(m, sizeof(struct ip), M_WAIT); |
| ip = mtod(m, struct ip *); |
ip = mtod(m, struct ip *); |
| ip->ip_tos = 0; |
ip->ip_tos = 0; |
| ip->ip_off = 0; |
ip->ip_off = htons(0); |
| ip->ip_p = inp->inp_ip.ip_p; |
ip->ip_p = inp->inp_ip.ip_p; |
| ip->ip_len = m->m_pkthdr.len; |
ip->ip_len = htons(m->m_pkthdr.len); |
| ip->ip_src = inp->inp_laddr; |
ip->ip_src = inp->inp_laddr; |
| ip->ip_dst = inp->inp_faddr; |
ip->ip_dst = inp->inp_faddr; |
| ip->ip_ttl = MAXTTL; |
ip->ip_ttl = MAXTTL; |
| Line 284 rip_output(m, va_alist) |
|
| Line 348 rip_output(m, va_alist) |
|
| return (EMSGSIZE); |
return (EMSGSIZE); |
| } |
} |
| ip = mtod(m, struct ip *); |
ip = mtod(m, struct ip *); |
| |
|
| |
/* |
| |
* If the mbuf is read-only, we need to allocate |
| |
* a new mbuf for the header, since we need to |
| |
* modify the header. |
| |
*/ |
| |
if (M_READONLY(m)) { |
| |
int hlen = ip->ip_hl << 2; |
| |
|
| |
m = m_copyup(m, hlen, (max_linkhdr + 3) & ~3); |
| |
if (m == NULL) |
| |
return (ENOMEM); /* XXX */ |
| |
ip = mtod(m, struct ip *); |
| |
} |
| |
|
| |
/* XXX userland passes ip_len and ip_off in host order */ |
| if (m->m_pkthdr.len != ip->ip_len) { |
if (m->m_pkthdr.len != ip->ip_len) { |
| m_freem(m); |
m_freem(m); |
| return (EINVAL); |
return (EINVAL); |
| } |
} |
| |
HTONS(ip->ip_len); |
| |
HTONS(ip->ip_off); |
| if (ip->ip_id == 0) |
if (ip->ip_id == 0) |
| ip->ip_id = htons(ip_id++); |
ip->ip_id = htons(ip_id++); |
| opts = NULL; |
opts = NULL; |
| Line 301 rip_output(m, va_alist) |
|
| Line 383 rip_output(m, va_alist) |
|
| return ENOBUFS; |
return ENOBUFS; |
| } |
} |
| #endif /*IPSEC*/ |
#endif /*IPSEC*/ |
| return (ip_output(m, opts, &inp->inp_route, flags, inp->inp_moptions, &inp->inp_errormtu)); |
return (ip_output(m, opts, &inp->inp_route, flags, inp->inp_moptions, |
| |
&inp->inp_errormtu)); |
| } |
} |
| |
|
| /* |
/* |
| Line 389 rip_bind(inp, nam) |
|
| Line 472 rip_bind(inp, nam) |
|
| |
|
| if (nam->m_len != sizeof(*addr)) |
if (nam->m_len != sizeof(*addr)) |
| return (EINVAL); |
return (EINVAL); |
| if (ifnet.tqh_first == 0) |
if (TAILQ_FIRST(&ifnet) == 0) |
| return (EADDRNOTAVAIL); |
return (EADDRNOTAVAIL); |
| if (addr->sin_family != AF_INET && |
if (addr->sin_family != AF_INET && |
| addr->sin_family != AF_IMPLINK) |
addr->sin_family != AF_IMPLINK) |
| Line 410 rip_connect(inp, nam) |
|
| Line 493 rip_connect(inp, nam) |
|
| |
|
| if (nam->m_len != sizeof(*addr)) |
if (nam->m_len != sizeof(*addr)) |
| return (EINVAL); |
return (EINVAL); |
| if (ifnet.tqh_first == 0) |
if (TAILQ_FIRST(&ifnet) == 0) |
| return (EADDRNOTAVAIL); |
return (EADDRNOTAVAIL); |
| if (addr->sin_family != AF_INET && |
if (addr->sin_family != AF_INET && |
| addr->sin_family != AF_IMPLINK) |
addr->sin_family != AF_IMPLINK) |
| Line 450 rip_usrreq(so, req, m, nam, control, p) |
|
| Line 533 rip_usrreq(so, req, m, nam, control, p) |
|
| (struct ifnet *)control, p)); |
(struct ifnet *)control, p)); |
| |
|
| if (req == PRU_PURGEIF) { |
if (req == PRU_PURGEIF) { |
| |
in_pcbpurgeif0(&rawcbtable, (struct ifnet *)control); |
| in_purgeif((struct ifnet *)control); |
in_purgeif((struct ifnet *)control); |
| in_pcbpurgeif(&rawcbtable, (struct ifnet *)control); |
in_pcbpurgeif(&rawcbtable, (struct ifnet *)control); |
| return (0); |
return (0); |
| Line 487 rip_usrreq(so, req, m, nam, control, p) |
|
| Line 571 rip_usrreq(so, req, m, nam, control, p) |
|
| break; |
break; |
| inp = sotoinpcb(so); |
inp = sotoinpcb(so); |
| inp->inp_ip.ip_p = (long)nam; |
inp->inp_ip.ip_p = (long)nam; |
| #ifdef IPSEC |
|
| error = ipsec_init_policy(so, &inp->inp_sp); |
|
| if (error != 0) { |
|
| in_pcbdetach(inp); |
|
| break; |
|
| } |
|
| #endif /*IPSEC*/ |
|
| break; |
break; |
| |
|
| case PRU_DETACH: |
case PRU_DETACH: |