raw_usrreq.c revision 1.26 1 /* $NetBSD: raw_usrreq.c,v 1.26 2006/05/14 21:19:33 elad Exp $ */
2
3 /*
4 * Copyright (c) 1980, 1986, 1993
5 * The Regents of the University of California. All rights reserved.
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. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 *
31 * @(#)raw_usrreq.c 8.1 (Berkeley) 6/10/93
32 */
33
34 #include <sys/cdefs.h>
35 __KERNEL_RCSID(0, "$NetBSD: raw_usrreq.c,v 1.26 2006/05/14 21:19:33 elad Exp $");
36
37 #include <sys/param.h>
38 #include <sys/mbuf.h>
39 #include <sys/domain.h>
40 #include <sys/protosw.h>
41 #include <sys/socket.h>
42 #include <sys/socketvar.h>
43 #include <sys/errno.h>
44 #include <sys/systm.h>
45 #include <sys/proc.h>
46 #include <sys/kauth.h>
47
48 #include <net/if.h>
49 #include <net/route.h>
50 #include <net/netisr.h>
51 #include <net/raw_cb.h>
52
53 #include <machine/stdarg.h>
54 /*
55 * Initialize raw connection block q.
56 */
57 void
58 raw_init(void)
59 {
60
61 LIST_INIT(&rawcb);
62 }
63
64
65 /*
66 * Raw protocol input routine. Find the socket
67 * associated with the packet(s) and move them over. If
68 * nothing exists for this packet, drop it.
69 */
70 /*
71 * Raw protocol interface.
72 */
73 void
74 raw_input(struct mbuf *m0, ...)
75 {
76 struct rawcb *rp;
77 struct mbuf *m = m0;
78 int sockets = 0;
79 struct socket *last;
80 va_list ap;
81 struct sockproto *proto;
82 struct sockaddr *src, *dst;
83
84 va_start(ap, m0);
85 proto = va_arg(ap, struct sockproto *);
86 src = va_arg(ap, struct sockaddr *);
87 dst = va_arg(ap, struct sockaddr *);
88 va_end(ap);
89
90 last = 0;
91 LIST_FOREACH(rp, &rawcb, rcb_list) {
92 if (rp->rcb_proto.sp_family != proto->sp_family)
93 continue;
94 if (rp->rcb_proto.sp_protocol &&
95 rp->rcb_proto.sp_protocol != proto->sp_protocol)
96 continue;
97 /*
98 * We assume the lower level routines have
99 * placed the address in a canonical format
100 * suitable for a structure comparison.
101 *
102 * Note that if the lengths are not the same
103 * the comparison will fail at the first byte.
104 */
105 #define equal(a1, a2) \
106 (bcmp((caddr_t)(a1), (caddr_t)(a2), a1->sa_len) == 0)
107 if (rp->rcb_laddr && !equal(rp->rcb_laddr, dst))
108 continue;
109 if (rp->rcb_faddr && !equal(rp->rcb_faddr, src))
110 continue;
111 if (last) {
112 struct mbuf *n;
113 if ((n = m_copy(m, 0, (int)M_COPYALL)) != NULL) {
114 if (sbappendaddr(&last->so_rcv, src,
115 n, (struct mbuf *)0) == 0)
116 /* should notify about lost packet */
117 m_freem(n);
118 else {
119 sorwakeup(last);
120 sockets++;
121 }
122 }
123 }
124 last = rp->rcb_socket;
125 }
126 if (last) {
127 if (sbappendaddr(&last->so_rcv, src,
128 m, (struct mbuf *)0) == 0)
129 m_freem(m);
130 else {
131 sorwakeup(last);
132 sockets++;
133 }
134 } else
135 m_freem(m);
136 }
137
138 /*ARGSUSED*/
139 void *
140 raw_ctlinput(int cmd, struct sockaddr *arg, void *d)
141 {
142
143 if ((unsigned)cmd >= PRC_NCMDS)
144 return NULL;
145 return NULL;
146 /* INCOMPLETE */
147 }
148
149 void
150 raw_setsockaddr(struct rawcb *rp, struct mbuf *nam)
151 {
152
153 nam->m_len = rp->rcb_laddr->sa_len;
154 bcopy(rp->rcb_laddr, mtod(nam, caddr_t), (size_t)nam->m_len);
155 }
156
157 void
158 raw_setpeeraddr(struct rawcb *rp, struct mbuf *nam)
159 {
160
161 nam->m_len = rp->rcb_faddr->sa_len;
162 bcopy(rp->rcb_faddr, mtod(nam, caddr_t), (size_t)nam->m_len);
163 }
164
165 /*ARGSUSED*/
166 int
167 raw_usrreq(struct socket *so, int req, struct mbuf *m, struct mbuf *nam,
168 struct mbuf *control, struct lwp *l)
169 {
170 struct rawcb *rp;
171 struct proc *p;
172 int s;
173 int error = 0;
174
175 if (req == PRU_CONTROL)
176 return (EOPNOTSUPP);
177
178 p = l ? l->l_proc : NULL;
179 s = splsoftnet();
180 rp = sotorawcb(so);
181 #ifdef DIAGNOSTIC
182 if (req != PRU_SEND && req != PRU_SENDOOB && control)
183 panic("raw_usrreq: unexpected control mbuf");
184 #endif
185 if (rp == 0 && req != PRU_ATTACH) {
186 error = EINVAL;
187 goto release;
188 }
189
190 switch (req) {
191
192 /*
193 * Allocate a raw control block and fill in the
194 * necessary info to allow packets to be routed to
195 * the appropriate raw interface routine.
196 */
197 case PRU_ATTACH:
198 if (p == 0 || (error = kauth_authorize_generic(p->p_cred, KAUTH_GENERIC_ISSUSER, &p->p_acflag))) {
199 error = EACCES;
200 break;
201 }
202 error = raw_attach(so, (int)(long)nam);
203 break;
204
205 /*
206 * Destroy state just before socket deallocation.
207 * Flush data or not depending on the options.
208 */
209 case PRU_DETACH:
210 raw_detach(rp);
211 break;
212
213 /*
214 * If a socket isn't bound to a single address,
215 * the raw input routine will hand it anything
216 * within that protocol family (assuming there's
217 * nothing else around it should go to).
218 */
219 case PRU_BIND:
220 case PRU_LISTEN:
221 case PRU_CONNECT:
222 case PRU_CONNECT2:
223 error = EOPNOTSUPP;
224 break;
225
226 case PRU_DISCONNECT:
227 soisdisconnected(so);
228 raw_disconnect(rp);
229 break;
230
231 /*
232 * Mark the connection as being incapable of further input.
233 */
234 case PRU_SHUTDOWN:
235 socantsendmore(so);
236 break;
237
238 case PRU_RCVD:
239 error = EOPNOTSUPP;
240 break;
241
242 /*
243 * Ship a packet out. The appropriate raw output
244 * routine handles any massaging necessary.
245 */
246 case PRU_SEND:
247 if (control && control->m_len) {
248 m_freem(control);
249 m_freem(m);
250 error = EINVAL;
251 break;
252 }
253 if (nam) {
254 if ((so->so_state & SS_ISCONNECTED) != 0) {
255 error = EISCONN;
256 goto die;
257 }
258 error = (*so->so_proto->pr_usrreq)(so, PRU_CONNECT,
259 (struct mbuf *)0, nam, (struct mbuf *)0, l);
260 if (error) {
261 die:
262 m_freem(m);
263 break;
264 }
265 } else {
266 if ((so->so_state & SS_ISCONNECTED) == 0) {
267 error = ENOTCONN;
268 goto die;
269 }
270 }
271 error = (*so->so_proto->pr_output)(m, so);
272 if (nam)
273 raw_disconnect(rp);
274 break;
275
276 case PRU_SENSE:
277 /*
278 * stat: don't bother with a blocksize.
279 */
280 return (0);
281
282 /*
283 * Not supported.
284 */
285 case PRU_RCVOOB:
286 error = EOPNOTSUPP;
287 break;
288
289 case PRU_SENDOOB:
290 m_freem(control);
291 m_freem(m);
292 error = EOPNOTSUPP;
293 break;
294
295 case PRU_SOCKADDR:
296 if (rp->rcb_laddr == 0) {
297 error = EINVAL;
298 break;
299 }
300 raw_setsockaddr(rp, nam);
301 break;
302
303 case PRU_PEERADDR:
304 if (rp->rcb_faddr == 0) {
305 error = ENOTCONN;
306 break;
307 }
308 raw_setpeeraddr(rp, nam);
309 break;
310
311 default:
312 panic("raw_usrreq");
313 }
314
315 release:
316 splx(s);
317 return (error);
318 }
319