Annotation of src/sys/netinet/raw_ip.c, Revision 1.28
1.28 ! mycroft 1: /* $NetBSD: raw_ip.c,v 1.27 1996/05/23 16:12:15 mycroft 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.14 cgd 35: * @(#)raw_ip.c 8.2 (Berkeley) 1/4/94
1.1 cgd 36: */
37:
1.7 mycroft 38: #include <sys/param.h>
39: #include <sys/malloc.h>
40: #include <sys/mbuf.h>
41: #include <sys/socket.h>
42: #include <sys/protosw.h>
43: #include <sys/socketvar.h>
44: #include <sys/errno.h>
1.13 mycroft 45: #include <sys/systm.h>
1.26 mycroft 46: #include <sys/proc.h>
1.1 cgd 47:
1.7 mycroft 48: #include <net/if.h>
49: #include <net/route.h>
1.1 cgd 50:
1.7 mycroft 51: #include <netinet/in.h>
52: #include <netinet/in_systm.h>
53: #include <netinet/ip.h>
54: #include <netinet/ip_var.h>
1.13 mycroft 55: #include <netinet/ip_mroute.h>
1.7 mycroft 56: #include <netinet/in_pcb.h>
1.24 christos 57: #include <netinet/in_var.h>
58:
59: #include <machine/stdarg.h>
1.13 mycroft 60:
1.20 mycroft 61: struct inpcbtable rawcbtable;
1.13 mycroft 62:
63: /*
64: * Nominal space allocated to a raw ip socket.
65: */
66: #define RIPSNDQ 8192
67: #define RIPRCVQ 8192
1.1 cgd 68:
69: /*
70: * Raw interface to IP protocol.
71: */
1.13 mycroft 72:
73: /*
74: * Initialize raw connection block q.
75: */
76: void
77: rip_init()
78: {
79:
1.23 mycroft 80: in_pcbinit(&rawcbtable, 1);
1.13 mycroft 81: }
82:
1.1 cgd 83: struct sockaddr_in ripsrc = { sizeof(ripsrc), AF_INET };
84: /*
85: * Setup generic address and protocol structures
86: * for raw_input routine, then pass them along with
87: * mbuf chain.
88: */
1.9 mycroft 89: void
1.24 christos 90: #if __STDC__
91: rip_input(struct mbuf *m, ...)
92: #else
93: rip_input(m, va_alist)
1.1 cgd 94: struct mbuf *m;
1.24 christos 95: va_dcl
96: #endif
1.1 cgd 97: {
98: register struct ip *ip = mtod(m, struct ip *);
1.13 mycroft 99: register struct inpcb *inp;
100: struct socket *last = 0;
1.1 cgd 101:
102: ripsrc.sin_addr = ip->ip_src;
1.21 cgd 103: for (inp = rawcbtable.inpt_queue.cqh_first;
104: inp != (struct inpcb *)&rawcbtable.inpt_queue;
105: inp = inp->inp_queue.cqe_next) {
1.13 mycroft 106: if (inp->inp_ip.ip_p && inp->inp_ip.ip_p != ip->ip_p)
107: continue;
1.27 mycroft 108: if (inp->inp_laddr.s_addr != INADDR_ANY &&
1.16 glass 109: inp->inp_laddr.s_addr != ip->ip_dst.s_addr)
1.13 mycroft 110: continue;
1.27 mycroft 111: if (inp->inp_faddr.s_addr != INADDR_ANY &&
1.16 glass 112: inp->inp_faddr.s_addr != ip->ip_src.s_addr)
1.13 mycroft 113: continue;
114: if (last) {
115: struct mbuf *n;
1.24 christos 116: if ((n = m_copy(m, 0, (int)M_COPYALL)) != NULL) {
1.13 mycroft 117: if (sbappendaddr(&last->so_rcv,
1.19 mycroft 118: sintosa(&ripsrc), n,
119: (struct mbuf *)0) == 0)
1.13 mycroft 120: /* should notify about lost packet */
121: m_freem(n);
122: else
123: sorwakeup(last);
124: }
125: }
126: last = inp->inp_socket;
127: }
128: if (last) {
1.19 mycroft 129: if (sbappendaddr(&last->so_rcv, sintosa(&ripsrc), m,
130: (struct mbuf *)0) == 0)
1.13 mycroft 131: m_freem(m);
132: else
133: sorwakeup(last);
134: } else {
135: m_freem(m);
1.1 cgd 136: ipstat.ips_noproto++;
137: ipstat.ips_delivered--;
138: }
139: }
140:
141: /*
142: * Generate IP header and pass packet to ip_output.
143: * Tack on options user may have setup with control call.
144: */
1.9 mycroft 145: int
1.24 christos 146: #if __STDC__
147: rip_output(struct mbuf *m, ...)
148: #else
149: rip_output(m, va_alist)
150: struct mbuf *m;
151: va_dcl
152: #endif
153: {
1.27 mycroft 154: register struct inpcb *inp;
1.1 cgd 155: register struct ip *ip;
1.10 mycroft 156: struct mbuf *opts;
1.24 christos 157: int flags;
158: va_list ap;
159:
160: va_start(ap, m);
1.27 mycroft 161: inp = va_arg(ap, struct inpcb *);
1.24 christos 162: va_end(ap);
163:
1.27 mycroft 164: flags =
165: (inp->inp_socket->so_options & SO_DONTROUTE) | IP_ALLOWBROADCAST;
1.1 cgd 166:
167: /*
168: * If the user handed us a complete IP packet, use it.
169: * Otherwise, allocate an mbuf for a header and fill it in.
170: */
1.13 mycroft 171: if ((inp->inp_flags & INP_HDRINCL) == 0) {
1.1 cgd 172: M_PREPEND(m, sizeof(struct ip), M_WAIT);
173: ip = mtod(m, struct ip *);
174: ip->ip_tos = 0;
175: ip->ip_off = 0;
1.13 mycroft 176: ip->ip_p = inp->inp_ip.ip_p;
1.1 cgd 177: ip->ip_len = m->m_pkthdr.len;
1.13 mycroft 178: ip->ip_src = inp->inp_laddr;
1.27 mycroft 179: ip->ip_dst = inp->inp_faddr;
1.1 cgd 180: ip->ip_ttl = MAXTTL;
1.13 mycroft 181: opts = inp->inp_options;
182: } else {
183: ip = mtod(m, struct ip *);
184: if (ip->ip_id == 0)
185: ip->ip_id = htons(ip_id++);
186: opts = NULL;
187: /* XXX prevent ip_output from overwriting header fields */
188: flags |= IP_RAWOUTPUT;
189: ipstat.ips_rawout++;
1.1 cgd 190: }
1.13 mycroft 191: return (ip_output(m, opts, &inp->inp_route, flags, inp->inp_moptions));
1.1 cgd 192: }
193:
194: /*
195: * Raw IP socket option processing.
196: */
1.9 mycroft 197: int
1.1 cgd 198: rip_ctloutput(op, so, level, optname, m)
199: int op;
200: struct socket *so;
201: int level, optname;
202: struct mbuf **m;
203: {
1.13 mycroft 204: register struct inpcb *inp = sotoinpcb(so);
1.25 christos 205: #ifdef MROUTING
206: int error;
207: #endif
1.1 cgd 208:
1.15 mycroft 209: if (level != IPPROTO_IP) {
210: if (m != 0 && *m != 0)
211: (void)m_free(*m);
1.13 mycroft 212: return (EINVAL);
1.15 mycroft 213: }
1.1 cgd 214:
1.13 mycroft 215: switch (optname) {
1.1 cgd 216:
1.13 mycroft 217: case IP_HDRINCL:
218: if (op == PRCO_SETOPT || op == PRCO_GETOPT) {
219: if (m == 0 || *m == 0 || (*m)->m_len < sizeof (int))
220: return (EINVAL);
221: if (op == PRCO_SETOPT) {
222: if (*mtod(*m, int *))
223: inp->inp_flags |= INP_HDRINCL;
224: else
225: inp->inp_flags &= ~INP_HDRINCL;
226: (void)m_free(*m);
227: } else {
228: (*m)->m_len = sizeof (int);
229: *mtod(*m, int *) = inp->inp_flags & INP_HDRINCL;
230: }
231: return (0);
232: }
233: break;
1.1 cgd 234:
1.18 mycroft 235: case MRT_INIT:
236: case MRT_DONE:
237: case MRT_ADD_VIF:
238: case MRT_DEL_VIF:
239: case MRT_ADD_MFC:
240: case MRT_DEL_MFC:
241: case MRT_VERSION:
242: case MRT_ASSERT:
1.6 hpeyerl 243: #ifdef MROUTING
1.18 mycroft 244: switch (op) {
245: case PRCO_SETOPT:
246: error = ip_mrouter_set(optname, so, m);
247: break;
248: case PRCO_GETOPT:
249: error = ip_mrouter_get(optname, so, m);
250: break;
251: default:
1.13 mycroft 252: error = EINVAL;
1.18 mycroft 253: break;
254: }
1.13 mycroft 255: return (error);
1.6 hpeyerl 256: #else
1.13 mycroft 257: if (op == PRCO_SETOPT && *m)
1.18 mycroft 258: m_free(*m);
1.13 mycroft 259: return (EOPNOTSUPP);
1.6 hpeyerl 260: #endif
1.1 cgd 261: }
1.13 mycroft 262: return (ip_ctloutput(op, so, level, optname, m));
1.1 cgd 263: }
264:
1.27 mycroft 265: int
266: rip_connect(inp, nam)
267: struct inpcb *inp;
268: struct mbuf *nam;
269: {
270: struct sockaddr_in *addr = mtod(nam, struct sockaddr_in *);
271:
272: if (nam->m_len != sizeof(*addr))
273: return (EINVAL);
274: if (ifnet.tqh_first == 0)
275: return (EADDRNOTAVAIL);
276: if (addr->sin_family != AF_INET &&
277: addr->sin_family != AF_IMPLINK)
278: return (EAFNOSUPPORT);
279: inp->inp_faddr = addr->sin_addr;
280: return (0);
281: }
282:
283: void
284: rip_disconnect(inp)
285: struct inpcb *inp;
286: {
287:
288: inp->inp_faddr.s_addr = INADDR_ANY;
289: }
290:
1.13 mycroft 291: u_long rip_sendspace = RIPSNDQ;
292: u_long rip_recvspace = RIPRCVQ;
293:
1.1 cgd 294: /*ARGSUSED*/
1.9 mycroft 295: int
1.26 mycroft 296: rip_usrreq(so, req, m, nam, control, p)
1.1 cgd 297: register struct socket *so;
298: int req;
1.2 cgd 299: struct mbuf *m, *nam, *control;
1.26 mycroft 300: struct proc *p;
1.1 cgd 301: {
1.27 mycroft 302: register struct inpcb *inp;
303: int s;
1.1 cgd 304: register int error = 0;
1.13 mycroft 305: #ifdef MROUTING
1.6 hpeyerl 306: extern struct socket *ip_mrouter;
307: #endif
1.27 mycroft 308:
1.22 pk 309: if (req == PRU_CONTROL)
310: return (in_control(so, (long)m, (caddr_t)nam,
1.26 mycroft 311: (struct ifnet *)control, p));
1.22 pk 312:
1.27 mycroft 313: s = splsoftnet();
314: inp = sotoinpcb(so);
1.28 ! mycroft 315: #ifdef DIAGNOSTIC
! 316: if (req != PRU_SEND && req != PRU_SENDOOB && control)
! 317: panic("rip_usrreq: unexpected control mbuf");
! 318: #endif
1.27 mycroft 319: if (inp == 0 && req != PRU_ATTACH) {
1.22 pk 320: error = EINVAL;
321: goto release;
322: }
323:
1.1 cgd 324: switch (req) {
325:
326: case PRU_ATTACH:
1.27 mycroft 327: if (inp != 0) {
328: error = EISCONN;
329: break;
330: }
1.26 mycroft 331: if (p == 0 || (error = suser(p->p_ucred, &p->p_acflag))) {
1.13 mycroft 332: error = EACCES;
333: break;
334: }
1.27 mycroft 335: if (so->so_snd.sb_hiwat == 0 || so->so_rcv.sb_hiwat == 0) {
336: error = soreserve(so, rip_sendspace, rip_recvspace);
337: if (error)
338: break;
339: }
340: error = in_pcballoc(so, &rawcbtable);
341: if (error)
1.13 mycroft 342: break;
1.27 mycroft 343: inp = sotoinpcb(so);
1.17 cgd 344: inp->inp_ip.ip_p = (long)nam;
1.1 cgd 345: break;
346:
347: case PRU_DETACH:
1.13 mycroft 348: #ifdef MROUTING
1.6 hpeyerl 349: if (so == ip_mrouter)
350: ip_mrouter_done();
351: #endif
1.13 mycroft 352: in_pcbdetach(inp);
1.1 cgd 353: break;
354:
355: case PRU_BIND:
356: {
357: struct sockaddr_in *addr = mtod(nam, struct sockaddr_in *);
358:
1.13 mycroft 359: if (nam->m_len != sizeof(*addr)) {
360: error = EINVAL;
361: break;
362: }
1.27 mycroft 363: if (ifnet.tqh_first == 0) {
1.13 mycroft 364: error = EADDRNOTAVAIL;
365: break;
366: }
1.27 mycroft 367: if (addr->sin_family != AF_INET &&
368: addr->sin_family != AF_IMPLINK) {
369: error = EAFNOSUPPORT;
1.13 mycroft 370: break;
371: }
1.27 mycroft 372: if (addr->sin_addr.s_addr != INADDR_ANY &&
373: ifa_ifwithaddr(sintosa(addr)) == 0) {
1.13 mycroft 374: error = EADDRNOTAVAIL;
375: break;
376: }
1.27 mycroft 377: inp->inp_laddr = addr->sin_addr;
378: break;
379: }
380:
381: case PRU_LISTEN:
382: error = EOPNOTSUPP;
383: break;
384:
385: case PRU_CONNECT:
386: error = rip_connect(inp, nam);
387: if (error)
1.13 mycroft 388: break;
1.1 cgd 389: soisconnected(so);
1.13 mycroft 390: break;
391:
392: case PRU_CONNECT2:
393: error = EOPNOTSUPP;
394: break;
395:
1.27 mycroft 396: case PRU_DISCONNECT:
397: soisdisconnected(so);
398: rip_disconnect(inp);
399: break;
400:
1.13 mycroft 401: /*
402: * Mark the connection as being incapable of further input.
403: */
404: case PRU_SHUTDOWN:
405: socantsendmore(so);
406: break;
407:
1.27 mycroft 408: case PRU_RCVD:
409: error = EOPNOTSUPP;
410: break;
411:
1.13 mycroft 412: /*
413: * Ship a packet out. The appropriate raw output
414: * routine handles any massaging necessary.
415: */
416: case PRU_SEND:
1.28 ! mycroft 417: if (control && control->m_len) {
! 418: m_freem(control);
! 419: m_freem(m);
! 420: error = EINVAL;
! 421: break;
! 422: }
! 423: {
1.27 mycroft 424: if (nam) {
425: if ((so->so_state & SS_ISCONNECTED) != 0) {
1.13 mycroft 426: error = EISCONN;
1.28 ! mycroft 427: goto die;
1.13 mycroft 428: }
1.27 mycroft 429: error = rip_connect(inp, nam);
430: if (error) {
1.28 ! mycroft 431: die:
1.27 mycroft 432: m_freem(m);
433: break;
434: }
1.13 mycroft 435: } else {
1.27 mycroft 436: if ((so->so_state & SS_ISCONNECTED) == 0) {
1.13 mycroft 437: error = ENOTCONN;
1.28 ! mycroft 438: goto die;
1.13 mycroft 439: }
440: }
1.27 mycroft 441: error = rip_output(m, inp);
442: if (nam)
443: rip_disconnect(inp);
1.28 ! mycroft 444: }
1.13 mycroft 445: break;
446:
447: case PRU_SENSE:
448: /*
449: * stat: don't bother with a blocksize.
450: */
1.27 mycroft 451: splx(s);
1.1 cgd 452: return (0);
1.13 mycroft 453:
454: case PRU_RCVOOB:
1.27 mycroft 455: error = EOPNOTSUPP;
456: break;
457:
1.13 mycroft 458: case PRU_SENDOOB:
1.28 ! mycroft 459: m_freem(control);
1.27 mycroft 460: m_freem(m);
1.13 mycroft 461: error = EOPNOTSUPP;
462: break;
463:
464: case PRU_SOCKADDR:
465: in_setsockaddr(inp, nam);
466: break;
467:
468: case PRU_PEERADDR:
469: in_setpeeraddr(inp, nam);
470: break;
471:
472: default:
473: panic("rip_usrreq");
1.1 cgd 474: }
1.27 mycroft 475:
1.22 pk 476: release:
1.27 mycroft 477: splx(s);
1.1 cgd 478: return (error);
479: }
CVSweb <webmaster@jp.NetBSD.org>