Annotation of src/sys/netinet/raw_ip.c, Revision 1.41.6.1
1.41.6.1! kenh 1: /* $NetBSD: raw_ip.c,v 1.41 1998/04/03 07:49:16 thorpej Exp $ */
1.14 cgd 2:
1.1 cgd 3: /*
1.13 mycroft 4: * Copyright (c) 1982, 1986, 1988, 1993
5: * The Regents of the University of California. All rights reserved.
1.1 cgd 6: *
7: * Redistribution and use in source and binary forms, with or without
8: * modification, are permitted provided that the following conditions
9: * are met:
10: * 1. Redistributions of source code must retain the above copyright
11: * notice, this list of conditions and the following disclaimer.
12: * 2. Redistributions in binary form must reproduce the above copyright
13: * notice, this list of conditions and the following disclaimer in the
14: * documentation and/or other materials provided with the distribution.
15: * 3. All advertising materials mentioning features or use of this software
16: * must display the following acknowledgement:
17: * This product includes software developed by the University of
18: * California, Berkeley and its contributors.
19: * 4. Neither the name of the University nor the names of its contributors
20: * may be used to endorse or promote products derived from this software
21: * without specific prior written permission.
22: *
23: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33: * SUCH DAMAGE.
34: *
1.39 thorpej 35: * @(#)raw_ip.c 8.7 (Berkeley) 5/15/95
1.1 cgd 36: */
1.40 scottr 37:
38: #include "opt_mrouting.h"
1.1 cgd 39:
1.7 mycroft 40: #include <sys/param.h>
41: #include <sys/malloc.h>
42: #include <sys/mbuf.h>
43: #include <sys/socket.h>
44: #include <sys/protosw.h>
45: #include <sys/socketvar.h>
46: #include <sys/errno.h>
1.13 mycroft 47: #include <sys/systm.h>
1.26 mycroft 48: #include <sys/proc.h>
1.1 cgd 49:
1.7 mycroft 50: #include <net/if.h>
51: #include <net/route.h>
1.1 cgd 52:
1.7 mycroft 53: #include <netinet/in.h>
54: #include <netinet/in_systm.h>
55: #include <netinet/ip.h>
56: #include <netinet/ip_var.h>
1.13 mycroft 57: #include <netinet/ip_mroute.h>
1.7 mycroft 58: #include <netinet/in_pcb.h>
1.24 christos 59: #include <netinet/in_var.h>
60:
61: #include <machine/stdarg.h>
1.13 mycroft 62:
1.20 mycroft 63: struct inpcbtable rawcbtable;
1.30 pk 64:
65: int rip_bind __P((struct inpcb *, struct mbuf *));
66: int rip_connect __P((struct inpcb *, struct mbuf *));
67: void rip_disconnect __P((struct inpcb *));
1.13 mycroft 68:
69: /*
70: * Nominal space allocated to a raw ip socket.
71: */
72: #define RIPSNDQ 8192
73: #define RIPRCVQ 8192
1.1 cgd 74:
75: /*
76: * Raw interface to IP protocol.
77: */
1.13 mycroft 78:
79: /*
80: * Initialize raw connection block q.
81: */
82: void
83: rip_init()
84: {
85:
1.33 mycroft 86: in_pcbinit(&rawcbtable, 1, 1);
1.13 mycroft 87: }
88:
1.1 cgd 89: /*
90: * Setup generic address and protocol structures
91: * for raw_input routine, then pass them along with
92: * mbuf chain.
93: */
1.9 mycroft 94: void
1.24 christos 95: #if __STDC__
96: rip_input(struct mbuf *m, ...)
97: #else
98: rip_input(m, va_alist)
1.1 cgd 99: struct mbuf *m;
1.24 christos 100: va_dcl
101: #endif
1.1 cgd 102: {
103: register struct ip *ip = mtod(m, struct ip *);
1.13 mycroft 104: register struct inpcb *inp;
1.36 thorpej 105: struct inpcb *last = 0;
106: struct mbuf *opts = 0;
1.32 mycroft 107: struct sockaddr_in ripsrc;
1.1 cgd 108:
1.32 mycroft 109: ripsrc.sin_family = AF_INET;
110: ripsrc.sin_len = sizeof(struct sockaddr_in);
1.1 cgd 111: ripsrc.sin_addr = ip->ip_src;
1.34 mycroft 112: ripsrc.sin_port = 0;
113: bzero((caddr_t)ripsrc.sin_zero, sizeof(ripsrc.sin_zero));
1.32 mycroft 114:
1.21 cgd 115: for (inp = rawcbtable.inpt_queue.cqh_first;
116: inp != (struct inpcb *)&rawcbtable.inpt_queue;
117: inp = inp->inp_queue.cqe_next) {
1.13 mycroft 118: if (inp->inp_ip.ip_p && inp->inp_ip.ip_p != ip->ip_p)
119: continue;
1.32 mycroft 120: if (!in_nullhost(inp->inp_laddr) &&
121: !in_hosteq(inp->inp_laddr, ip->ip_dst))
1.13 mycroft 122: continue;
1.32 mycroft 123: if (!in_nullhost(inp->inp_faddr) &&
124: !in_hosteq(inp->inp_faddr, ip->ip_src))
1.13 mycroft 125: continue;
126: if (last) {
127: struct mbuf *n;
1.24 christos 128: if ((n = m_copy(m, 0, (int)M_COPYALL)) != NULL) {
1.36 thorpej 129: if (last->inp_flags & INP_CONTROLOPTS ||
130: last->inp_socket->so_options & SO_TIMESTAMP)
131: ip_savecontrol(last, &opts, ip, n);
132: if (sbappendaddr(&last->inp_socket->so_rcv,
133: sintosa(&ripsrc), n, opts) == 0) {
1.13 mycroft 134: /* should notify about lost packet */
135: m_freem(n);
1.36 thorpej 136: if (opts)
137: m_freem(opts);
138: } else
139: sorwakeup(last->inp_socket);
1.41 thorpej 140: opts = NULL;
1.13 mycroft 141: }
142: }
1.36 thorpej 143: last = inp;
1.13 mycroft 144: }
145: if (last) {
1.36 thorpej 146: if (last->inp_flags & INP_CONTROLOPTS ||
147: last->inp_socket->so_options & SO_TIMESTAMP)
148: ip_savecontrol(last, &opts, ip, m);
149: if (sbappendaddr(&last->inp_socket->so_rcv,
150: sintosa(&ripsrc), m, opts) == 0) {
1.13 mycroft 151: m_freem(m);
1.36 thorpej 152: if (opts)
153: m_freem(opts);
154: } else
155: sorwakeup(last->inp_socket);
1.13 mycroft 156: } else {
157: m_freem(m);
1.1 cgd 158: ipstat.ips_noproto++;
159: ipstat.ips_delivered--;
160: }
161: }
162:
163: /*
164: * Generate IP header and pass packet to ip_output.
165: * Tack on options user may have setup with control call.
166: */
1.9 mycroft 167: int
1.24 christos 168: #if __STDC__
169: rip_output(struct mbuf *m, ...)
170: #else
171: rip_output(m, va_alist)
172: struct mbuf *m;
173: va_dcl
174: #endif
175: {
1.27 mycroft 176: register struct inpcb *inp;
1.1 cgd 177: register struct ip *ip;
1.10 mycroft 178: struct mbuf *opts;
1.24 christos 179: int flags;
180: va_list ap;
181:
182: va_start(ap, m);
1.27 mycroft 183: inp = va_arg(ap, struct inpcb *);
1.24 christos 184: va_end(ap);
185:
1.27 mycroft 186: flags =
1.37 matt 187: (inp->inp_socket->so_options & SO_DONTROUTE) | IP_ALLOWBROADCAST
188: | IP_RETURNMTU;
1.1 cgd 189:
190: /*
191: * If the user handed us a complete IP packet, use it.
192: * Otherwise, allocate an mbuf for a header and fill it in.
193: */
1.13 mycroft 194: if ((inp->inp_flags & INP_HDRINCL) == 0) {
1.35 thorpej 195: if ((m->m_pkthdr.len + sizeof(struct ip)) > IP_MAXPACKET) {
196: m_freem(m);
197: return (EMSGSIZE);
198: }
1.1 cgd 199: M_PREPEND(m, sizeof(struct ip), M_WAIT);
200: ip = mtod(m, struct ip *);
201: ip->ip_tos = 0;
202: ip->ip_off = 0;
1.13 mycroft 203: ip->ip_p = inp->inp_ip.ip_p;
1.1 cgd 204: ip->ip_len = m->m_pkthdr.len;
1.13 mycroft 205: ip->ip_src = inp->inp_laddr;
1.27 mycroft 206: ip->ip_dst = inp->inp_faddr;
1.1 cgd 207: ip->ip_ttl = MAXTTL;
1.13 mycroft 208: opts = inp->inp_options;
209: } else {
1.35 thorpej 210: if (m->m_pkthdr.len > IP_MAXPACKET) {
211: m_freem(m);
212: return (EMSGSIZE);
213: }
1.13 mycroft 214: ip = mtod(m, struct ip *);
1.38 mycroft 215: if (m->m_pkthdr.len != ip->ip_len) {
216: m_freem(m);
217: return (EINVAL);
218: }
1.13 mycroft 219: if (ip->ip_id == 0)
220: ip->ip_id = htons(ip_id++);
221: opts = NULL;
222: /* XXX prevent ip_output from overwriting header fields */
223: flags |= IP_RAWOUTPUT;
224: ipstat.ips_rawout++;
1.1 cgd 225: }
1.37 matt 226: return (ip_output(m, opts, &inp->inp_route, flags, inp->inp_moptions, &inp->inp_errormtu));
1.1 cgd 227: }
228:
229: /*
230: * Raw IP socket option processing.
231: */
1.9 mycroft 232: int
1.1 cgd 233: rip_ctloutput(op, so, level, optname, m)
234: int op;
235: struct socket *so;
236: int level, optname;
237: struct mbuf **m;
238: {
1.13 mycroft 239: register struct inpcb *inp = sotoinpcb(so);
1.31 mycroft 240: int error = 0;
1.1 cgd 241:
1.15 mycroft 242: if (level != IPPROTO_IP) {
1.31 mycroft 243: error = ENOPROTOOPT;
244: if (op == PRCO_SETOPT && *m != 0)
245: (void) m_free(*m);
246: } else switch (op) {
247:
248: case PRCO_SETOPT:
249: switch (optname) {
250: case IP_HDRINCL:
251: if (*m == 0 || (*m)->m_len < sizeof (int))
252: error = EINVAL;
253: else {
1.13 mycroft 254: if (*mtod(*m, int *))
255: inp->inp_flags |= INP_HDRINCL;
256: else
257: inp->inp_flags &= ~INP_HDRINCL;
258: }
1.31 mycroft 259: if (*m != 0)
260: (void) m_free(*m);
261: break;
262:
263: #ifdef MROUTING
264: case MRT_INIT:
265: case MRT_DONE:
266: case MRT_ADD_VIF:
267: case MRT_DEL_VIF:
268: case MRT_ADD_MFC:
269: case MRT_DEL_MFC:
270: case MRT_ASSERT:
271: error = ip_mrouter_set(so, optname, m);
272: break;
273: #endif
274:
275: default:
276: error = ip_ctloutput(op, so, level, optname, m);
277: break;
1.13 mycroft 278: }
279: break;
1.1 cgd 280:
1.31 mycroft 281: case PRCO_GETOPT:
282: switch (optname) {
283: case IP_HDRINCL:
284: *m = m_get(M_WAIT, M_SOOPTS);
285: (*m)->m_len = sizeof (int);
286: *mtod(*m, int *) = inp->inp_flags & INP_HDRINCL ? 1 : 0;
287: break;
288:
1.6 hpeyerl 289: #ifdef MROUTING
1.31 mycroft 290: case MRT_VERSION:
291: case MRT_ASSERT:
292: error = ip_mrouter_get(so, optname, m);
1.18 mycroft 293: break;
1.31 mycroft 294: #endif
295:
1.18 mycroft 296: default:
1.31 mycroft 297: error = ip_ctloutput(op, so, level, optname, m);
1.18 mycroft 298: break;
299: }
1.31 mycroft 300: break;
1.1 cgd 301: }
1.31 mycroft 302: return (error);
1.1 cgd 303: }
304:
1.27 mycroft 305: int
1.29 mycroft 306: rip_bind(inp, nam)
307: struct inpcb *inp;
308: struct mbuf *nam;
309: {
310: struct sockaddr_in *addr = mtod(nam, struct sockaddr_in *);
1.41.6.1! kenh 311: struct ifaddr *ifa = NULL;
1.29 mycroft 312:
313: if (nam->m_len != sizeof(*addr))
314: return (EINVAL);
315: if (ifnet.tqh_first == 0)
316: return (EADDRNOTAVAIL);
317: if (addr->sin_family != AF_INET &&
318: addr->sin_family != AF_IMPLINK)
319: return (EAFNOSUPPORT);
1.32 mycroft 320: if (!in_nullhost(addr->sin_addr) &&
1.41.6.1! kenh 321: (ifa = ifa_ifwithaddr(sintosa(addr))) == 0)
1.29 mycroft 322: return (EADDRNOTAVAIL);
323: inp->inp_laddr = addr->sin_addr;
1.41.6.1! kenh 324: if (ifa != NULL)
! 325: ifa_delref(ifa);
1.29 mycroft 326: return (0);
327: }
328:
329: int
1.27 mycroft 330: rip_connect(inp, nam)
331: struct inpcb *inp;
332: struct mbuf *nam;
333: {
334: struct sockaddr_in *addr = mtod(nam, struct sockaddr_in *);
335:
336: if (nam->m_len != sizeof(*addr))
337: return (EINVAL);
338: if (ifnet.tqh_first == 0)
339: return (EADDRNOTAVAIL);
340: if (addr->sin_family != AF_INET &&
341: addr->sin_family != AF_IMPLINK)
342: return (EAFNOSUPPORT);
343: inp->inp_faddr = addr->sin_addr;
344: return (0);
345: }
346:
347: void
348: rip_disconnect(inp)
349: struct inpcb *inp;
350: {
351:
1.32 mycroft 352: inp->inp_faddr = zeroin_addr;
1.27 mycroft 353: }
354:
1.13 mycroft 355: u_long rip_sendspace = RIPSNDQ;
356: u_long rip_recvspace = RIPRCVQ;
357:
1.1 cgd 358: /*ARGSUSED*/
1.9 mycroft 359: int
1.26 mycroft 360: rip_usrreq(so, req, m, nam, control, p)
1.1 cgd 361: register struct socket *so;
362: int req;
1.2 cgd 363: struct mbuf *m, *nam, *control;
1.26 mycroft 364: struct proc *p;
1.1 cgd 365: {
1.27 mycroft 366: register struct inpcb *inp;
367: int s;
1.1 cgd 368: register int error = 0;
1.13 mycroft 369: #ifdef MROUTING
1.6 hpeyerl 370: extern struct socket *ip_mrouter;
371: #endif
1.27 mycroft 372:
1.22 pk 373: if (req == PRU_CONTROL)
374: return (in_control(so, (long)m, (caddr_t)nam,
1.26 mycroft 375: (struct ifnet *)control, p));
1.22 pk 376:
1.27 mycroft 377: s = splsoftnet();
378: inp = sotoinpcb(so);
1.28 mycroft 379: #ifdef DIAGNOSTIC
380: if (req != PRU_SEND && req != PRU_SENDOOB && control)
381: panic("rip_usrreq: unexpected control mbuf");
382: #endif
1.27 mycroft 383: if (inp == 0 && req != PRU_ATTACH) {
1.22 pk 384: error = EINVAL;
385: goto release;
386: }
387:
1.1 cgd 388: switch (req) {
389:
390: case PRU_ATTACH:
1.27 mycroft 391: if (inp != 0) {
392: error = EISCONN;
393: break;
394: }
1.26 mycroft 395: if (p == 0 || (error = suser(p->p_ucred, &p->p_acflag))) {
1.13 mycroft 396: error = EACCES;
397: break;
398: }
1.27 mycroft 399: if (so->so_snd.sb_hiwat == 0 || so->so_rcv.sb_hiwat == 0) {
400: error = soreserve(so, rip_sendspace, rip_recvspace);
401: if (error)
402: break;
403: }
404: error = in_pcballoc(so, &rawcbtable);
405: if (error)
1.13 mycroft 406: break;
1.27 mycroft 407: inp = sotoinpcb(so);
1.17 cgd 408: inp->inp_ip.ip_p = (long)nam;
1.1 cgd 409: break;
410:
411: case PRU_DETACH:
1.13 mycroft 412: #ifdef MROUTING
1.6 hpeyerl 413: if (so == ip_mrouter)
414: ip_mrouter_done();
415: #endif
1.13 mycroft 416: in_pcbdetach(inp);
1.1 cgd 417: break;
418:
419: case PRU_BIND:
1.29 mycroft 420: error = rip_bind(inp, nam);
1.27 mycroft 421: break;
422:
423: case PRU_LISTEN:
424: error = EOPNOTSUPP;
425: break;
426:
427: case PRU_CONNECT:
428: error = rip_connect(inp, nam);
429: if (error)
1.13 mycroft 430: break;
1.1 cgd 431: soisconnected(so);
1.13 mycroft 432: break;
433:
434: case PRU_CONNECT2:
435: error = EOPNOTSUPP;
436: break;
437:
1.27 mycroft 438: case PRU_DISCONNECT:
439: soisdisconnected(so);
440: rip_disconnect(inp);
441: break;
442:
1.13 mycroft 443: /*
444: * Mark the connection as being incapable of further input.
445: */
446: case PRU_SHUTDOWN:
447: socantsendmore(so);
448: break;
449:
1.27 mycroft 450: case PRU_RCVD:
451: error = EOPNOTSUPP;
452: break;
453:
1.13 mycroft 454: /*
455: * Ship a packet out. The appropriate raw output
456: * routine handles any massaging necessary.
457: */
458: case PRU_SEND:
1.28 mycroft 459: if (control && control->m_len) {
460: m_freem(control);
461: m_freem(m);
462: error = EINVAL;
463: break;
464: }
465: {
1.27 mycroft 466: if (nam) {
467: if ((so->so_state & SS_ISCONNECTED) != 0) {
1.13 mycroft 468: error = EISCONN;
1.28 mycroft 469: goto die;
1.13 mycroft 470: }
1.27 mycroft 471: error = rip_connect(inp, nam);
472: if (error) {
1.28 mycroft 473: die:
1.27 mycroft 474: m_freem(m);
475: break;
476: }
1.13 mycroft 477: } else {
1.27 mycroft 478: if ((so->so_state & SS_ISCONNECTED) == 0) {
1.13 mycroft 479: error = ENOTCONN;
1.28 mycroft 480: goto die;
1.13 mycroft 481: }
482: }
1.27 mycroft 483: error = rip_output(m, inp);
484: if (nam)
485: rip_disconnect(inp);
1.28 mycroft 486: }
1.13 mycroft 487: break;
488:
489: case PRU_SENSE:
490: /*
491: * stat: don't bother with a blocksize.
492: */
1.27 mycroft 493: splx(s);
1.1 cgd 494: return (0);
1.13 mycroft 495:
496: case PRU_RCVOOB:
1.27 mycroft 497: error = EOPNOTSUPP;
498: break;
499:
1.13 mycroft 500: case PRU_SENDOOB:
1.28 mycroft 501: m_freem(control);
1.27 mycroft 502: m_freem(m);
1.13 mycroft 503: error = EOPNOTSUPP;
504: break;
505:
506: case PRU_SOCKADDR:
507: in_setsockaddr(inp, nam);
508: break;
509:
510: case PRU_PEERADDR:
511: in_setpeeraddr(inp, nam);
512: break;
513:
514: default:
515: panic("rip_usrreq");
1.1 cgd 516: }
1.27 mycroft 517:
1.22 pk 518: release:
1.27 mycroft 519: splx(s);
1.1 cgd 520: return (error);
521: }
CVSweb <webmaster@jp.NetBSD.org>