xref: /dflybsd-src/sys/net/raw_usrreq.c (revision 93bffecadc0caefc46f12b736eab0e62c2b6f42e)
1 /*
2  * Copyright (c) 1980, 1986, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *	This product includes software developed by the University of
16  *	California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  *	@(#)raw_usrreq.c	8.1 (Berkeley) 6/10/93
34  * $FreeBSD: src/sys/net/raw_usrreq.c,v 1.18 1999/08/28 00:48:28 peter Exp $
35  * $DragonFly: src/sys/net/raw_usrreq.c,v 1.14 2007/06/24 20:00:00 dillon Exp $
36  */
37 
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/mbuf.h>
41 #include <sys/proc.h>
42 #include <sys/priv.h>
43 #include <sys/protosw.h>
44 #include <sys/socket.h>
45 #include <sys/socketvar.h>
46 
47 #include <sys/socketvar2.h>
48 
49 #include <net/raw_cb.h>
50 
51 
52 static struct lwkt_token raw_token = LWKT_TOKEN_MP_INITIALIZER(raw_token);
53 
54 /*
55  * Initialize raw connection block q.
56  */
57 void
58 raw_init(void)
59 {
60 	LIST_INIT(&rawcb_list);
61 }
62 
63 /************************************************************************
64  *			 RAW PROTOCOL INTERFACE				*
65  ************************************************************************/
66 
67 /*
68  * Raw protocol input routine.  Find the socket associated with the packet(s)
69  * and move them over.  If nothing exists for this packet, drop it.  This
70  * routine is indirect called via rts_input() and will be serialized on
71  * cpu 0.
72  *
73  * Most other raw protocol interface functions are also serialized XXX.
74  */
75 void
76 raw_input(struct mbuf *m0, const struct sockproto *proto,
77 	  const struct sockaddr *src, const struct sockaddr *dst,
78 	  const struct rawcb *skip)
79 {
80 	struct rawcb *rp;
81 	struct mbuf *m = m0;
82 	struct socket *last;
83 
84 	lwkt_gettoken(&raw_token);
85 
86 	last = NULL;
87 	LIST_FOREACH(rp, &rawcb_list, list) {
88 		if (rp == skip)
89 			continue;
90 		if (rp->rcb_proto.sp_family != proto->sp_family)
91 			continue;
92 		if (rp->rcb_proto.sp_protocol  &&
93 		    rp->rcb_proto.sp_protocol != proto->sp_protocol)
94 			continue;
95 		/*
96 		 * We assume the lower level routines have
97 		 * placed the address in a canonical format
98 		 * suitable for a structure comparison.
99 		 *
100 		 * Note that if the lengths are not the same
101 		 * the comparison will fail at the first byte.
102 		 */
103 		if (rp->rcb_laddr && !sa_equal(rp->rcb_laddr, dst))
104 			continue;
105 		if (rp->rcb_faddr && !sa_equal(rp->rcb_faddr, src))
106 			continue;
107 		if (last) {
108 			struct mbuf *n;
109 
110 			n = m_copypacket(m, MB_DONTWAIT);
111 			if (n != NULL) {
112 				lwkt_gettoken(&last->so_rcv.ssb_token);
113 				if (ssb_appendaddr(&last->so_rcv, src, n,
114 						 NULL) == 0) {
115 					/* should notify about lost packet */
116 					m_freem(n);
117 				} else {
118 					sorwakeup(last);
119 				}
120 				lwkt_reltoken(&last->so_rcv.ssb_token);
121 			}
122 		}
123 		last = rp->rcb_socket;
124 	}
125 	if (last) {
126 		lwkt_gettoken(&last->so_rcv.ssb_token);
127 		if (ssb_appendaddr(&last->so_rcv, src, m, NULL) == 0)
128 			m_freem(m);
129 		else
130 			sorwakeup(last);
131 		lwkt_reltoken(&last->so_rcv.ssb_token);
132 	} else {
133 		m_freem(m);
134 	}
135 	lwkt_reltoken(&raw_token);
136 }
137 
138 /*ARGSUSED*/
139 void
140 raw_ctlinput(int cmd, struct sockaddr *arg, void *dummy)
141 {
142 
143 	if (cmd < 0 || cmd > PRC_NCMDS)
144 		return;
145 	/* INCOMPLETE */
146 }
147 
148 /*
149  * NOTE: (so) is referenced from soabort*() and netmsg_pru_abort()
150  *	 will sofree() it when we return.
151  */
152 static int
153 raw_uabort(struct socket *so)
154 {
155 	struct rawcb *rp = sotorawcb(so);
156 
157 	if (rp == NULL)
158 		return EINVAL;
159 	raw_disconnect(rp);
160 	soisdisconnected(so);
161 	return 0;
162 }
163 
164 /* pru_accept is EOPNOTSUPP */
165 
166 static int
167 raw_uattach(struct socket *so, int proto, struct pru_attach_info *ai)
168 {
169 	struct rawcb *rp = sotorawcb(so);
170 	int error;
171 
172 	if (rp == NULL)
173 		return EINVAL;
174 	if ((error = priv_check_cred(ai->p_ucred, PRIV_ROOT, NULL_CRED_OKAY)) != 0)
175 		return error;
176 	return raw_attach(so, proto, ai->sb_rlimit);
177 }
178 
179 static int
180 raw_ubind(struct socket *so, struct sockaddr *nam, struct thread *td)
181 {
182 	return EINVAL;
183 }
184 
185 static int
186 raw_uconnect(struct socket *so, struct sockaddr *nam, struct thread *td)
187 {
188 	return EINVAL;
189 }
190 
191 /* pru_connect2 is EOPNOTSUPP */
192 /* pru_control is EOPNOTSUPP */
193 
194 static int
195 raw_udetach(struct socket *so)
196 {
197 	struct rawcb *rp = sotorawcb(so);
198 
199 	if (rp == NULL)
200 		return EINVAL;
201 
202 	raw_detach(rp);
203 	return 0;
204 }
205 
206 static int
207 raw_udisconnect(struct socket *so)
208 {
209 	struct rawcb *rp = sotorawcb(so);
210 
211 	if (rp == NULL)
212 		return EINVAL;
213 	if (rp->rcb_faddr == NULL) {
214 		return ENOTCONN;
215 	}
216 	soreference(so);
217 	raw_disconnect(rp);
218 	soisdisconnected(so);
219 	sofree(so);
220 
221 	return 0;
222 }
223 
224 /* pru_listen is EOPNOTSUPP */
225 
226 static int
227 raw_upeeraddr(struct socket *so, struct sockaddr **nam)
228 {
229 	struct rawcb *rp = sotorawcb(so);
230 
231 	if (rp == NULL)
232 		return EINVAL;
233 	if (rp->rcb_faddr == NULL) {
234 		return ENOTCONN;
235 	}
236 	*nam = dup_sockaddr(rp->rcb_faddr);
237 	return 0;
238 }
239 
240 /* pru_rcvd is EOPNOTSUPP */
241 /* pru_rcvoob is EOPNOTSUPP */
242 
243 static int
244 raw_usend(struct socket *so, int flags, struct mbuf *m,
245 	  struct sockaddr *nam, struct mbuf *control, struct thread *td)
246 {
247 	int error;
248 	struct rawcb *rp = sotorawcb(so);
249 	struct pr_output_info oi;
250 
251 	if (rp == NULL) {
252 		error = EINVAL;
253 		goto release;
254 	}
255 
256 	if (flags & PRUS_OOB) {
257 		error = EOPNOTSUPP;
258 		goto release;
259 	}
260 
261 	if (control && control->m_len) {
262 		error = EOPNOTSUPP;
263 		goto release;
264 	}
265 	if (nam) {
266 		if (rp->rcb_faddr) {
267 			error = EISCONN;
268 			goto release;
269 		}
270 		rp->rcb_faddr = nam;
271 	} else if (rp->rcb_faddr == NULL) {
272 		error = ENOTCONN;
273 		goto release;
274 	}
275 	oi.p_pid = td->td_proc->p_pid;
276 	error = (*so->so_proto->pr_output)(m, so, &oi);
277 	m = NULL;
278 	if (nam)
279 		rp->rcb_faddr = NULL;
280 release:
281 	if (m != NULL)
282 		m_freem(m);
283 	return (error);
284 }
285 
286 /* pru_sense is null */
287 
288 static int
289 raw_ushutdown(struct socket *so)
290 {
291 	struct rawcb *rp = sotorawcb(so);
292 
293 	if (rp == NULL)
294 		return EINVAL;
295 	socantsendmore(so);
296 	return 0;
297 }
298 
299 static int
300 raw_usockaddr(struct socket *so, struct sockaddr **nam)
301 {
302 	struct rawcb *rp = sotorawcb(so);
303 
304 	if (rp == NULL)
305 		return EINVAL;
306 	if (rp->rcb_laddr == NULL)
307 		return EINVAL;
308 	*nam = dup_sockaddr(rp->rcb_laddr);
309 	return 0;
310 }
311 
312 struct pr_usrreqs raw_usrreqs = {
313 	.pru_abort = raw_uabort,
314 	.pru_accept = pru_accept_notsupp,
315 	.pru_attach = raw_uattach,
316 	.pru_bind = raw_ubind,
317 	.pru_connect = raw_uconnect,
318 	.pru_connect2 = pru_connect2_notsupp,
319 	.pru_control = pru_control_notsupp,
320 	.pru_detach = raw_udetach,
321 	.pru_disconnect = raw_udisconnect,
322 	.pru_listen = pru_listen_notsupp,
323 	.pru_peeraddr = raw_upeeraddr,
324 	.pru_rcvd = pru_rcvd_notsupp,
325 	.pru_rcvoob = pru_rcvoob_notsupp,
326 	.pru_send = raw_usend,
327 	.pru_sense = pru_sense_null,
328 	.pru_shutdown = raw_ushutdown,
329 	.pru_sockaddr = raw_usockaddr,
330 	.pru_sosend = sosend,
331 	.pru_soreceive = soreceive
332 };
333