xref: /dragonfly/sys/net/raw_usrreq.c (revision 2e3ed54d)
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.10 2005/01/26 23:09:57 hsu 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/protosw.h>
43 #include <sys/socket.h>
44 #include <sys/socketvar.h>
45 
46 #include <net/raw_cb.h>
47 
48 /*
49  * Initialize raw connection block q.
50  */
51 void
52 raw_init()
53 {
54 	LIST_INIT(&rawcb_list);
55 }
56 
57 
58 /*
59  * Raw protocol input routine.  Find the socket
60  * associated with the packet(s) and move them over.  If
61  * nothing exists for this packet, drop it.
62  */
63 /*
64  * Raw protocol interface.
65  */
66 void
67 raw_input(struct mbuf *m0, struct sockproto *proto, const struct sockaddr *src,
68 	  const struct sockaddr *dst)
69 {
70 	struct rawcb *rp;
71 	struct mbuf *m = m0;
72 	struct socket *last;
73 
74 	last = NULL;
75 	LIST_FOREACH(rp, &rawcb_list, list) {
76 		if (rp->rcb_proto.sp_family != proto->sp_family)
77 			continue;
78 		if (rp->rcb_proto.sp_protocol  &&
79 		    rp->rcb_proto.sp_protocol != proto->sp_protocol)
80 			continue;
81 		/*
82 		 * We assume the lower level routines have
83 		 * placed the address in a canonical format
84 		 * suitable for a structure comparison.
85 		 *
86 		 * Note that if the lengths are not the same
87 		 * the comparison will fail at the first byte.
88 		 */
89 		if (rp->rcb_laddr && !sa_equal(rp->rcb_laddr, dst))
90 			continue;
91 		if (rp->rcb_faddr && !sa_equal(rp->rcb_faddr, src))
92 			continue;
93 		if (last) {
94 			struct mbuf *n;
95 
96 			n = m_copypacket(m, MB_DONTWAIT);
97 			if (n != NULL) {
98 				if (sbappendaddr(&last->so_rcv, src, n,
99 						 (struct mbuf *)0) == 0) {
100 					/* should notify about lost packet */
101 					m_freem(n);
102 				} else {
103 					sorwakeup(last);
104 				}
105 			}
106 		}
107 		last = rp->rcb_socket;
108 	}
109 	if (last) {
110 		if (sbappendaddr(&last->so_rcv, src, m, (struct mbuf *)0) == 0)
111 			m_freem(m);
112 		else
113 			sorwakeup(last);
114 	} else {
115 		m_freem(m);
116 	}
117 }
118 
119 /*ARGSUSED*/
120 void
121 raw_ctlinput(cmd, arg, dummy)
122 	int cmd;
123 	struct sockaddr *arg;
124 	void *dummy;
125 {
126 
127 	if (cmd < 0 || cmd > PRC_NCMDS)
128 		return;
129 	/* INCOMPLETE */
130 }
131 
132 static int
133 raw_uabort(struct socket *so)
134 {
135 	struct rawcb *rp = sotorawcb(so);
136 
137 	if (rp == NULL)
138 		return EINVAL;
139 	raw_disconnect(rp);
140 	sofree(so);
141 	soisdisconnected(so);
142 	return 0;
143 }
144 
145 /* pru_accept is EOPNOTSUPP */
146 
147 static int
148 raw_uattach(struct socket *so, int proto, struct pru_attach_info *ai)
149 {
150 	struct rawcb *rp = sotorawcb(so);
151 	int error;
152 
153 	if (rp == NULL)
154 		return EINVAL;
155 	if ((error = suser_cred(ai->p_ucred, NULL_CRED_OKAY)) != 0)
156 		return error;
157 	return raw_attach(so, proto, ai->sb_rlimit);
158 }
159 
160 static int
161 raw_ubind(struct socket *so, struct sockaddr *nam, struct thread *td)
162 {
163 	return EINVAL;
164 }
165 
166 static int
167 raw_uconnect(struct socket *so, struct sockaddr *nam, struct thread *td)
168 {
169 	return EINVAL;
170 }
171 
172 /* pru_connect2 is EOPNOTSUPP */
173 /* pru_control is EOPNOTSUPP */
174 
175 static int
176 raw_udetach(struct socket *so)
177 {
178 	struct rawcb *rp = sotorawcb(so);
179 
180 	if (rp == NULL)
181 		return EINVAL;
182 
183 	raw_detach(rp);
184 	return 0;
185 }
186 
187 static int
188 raw_udisconnect(struct socket *so)
189 {
190 	struct rawcb *rp = sotorawcb(so);
191 
192 	if (rp == NULL)
193 		return EINVAL;
194 	if (rp->rcb_faddr == NULL) {
195 		return ENOTCONN;
196 	}
197 	raw_disconnect(rp);
198 	soisdisconnected(so);
199 	return 0;
200 }
201 
202 /* pru_listen is EOPNOTSUPP */
203 
204 static int
205 raw_upeeraddr(struct socket *so, struct sockaddr **nam)
206 {
207 	struct rawcb *rp = sotorawcb(so);
208 
209 	if (rp == NULL)
210 		return EINVAL;
211 	if (rp->rcb_faddr == NULL) {
212 		return ENOTCONN;
213 	}
214 	*nam = dup_sockaddr(rp->rcb_faddr);
215 	return 0;
216 }
217 
218 /* pru_rcvd is EOPNOTSUPP */
219 /* pru_rcvoob is EOPNOTSUPP */
220 
221 static int
222 raw_usend(struct socket *so, int flags, struct mbuf *m,
223 	  struct sockaddr *nam, struct mbuf *control, struct thread *td)
224 {
225 	int error;
226 	struct rawcb *rp = sotorawcb(so);
227 	struct pr_output_info oi;
228 
229 	if (rp == NULL) {
230 		error = EINVAL;
231 		goto release;
232 	}
233 
234 	if (flags & PRUS_OOB) {
235 		error = EOPNOTSUPP;
236 		goto release;
237 	}
238 
239 	if (control && control->m_len) {
240 		error = EOPNOTSUPP;
241 		goto release;
242 	}
243 	if (nam) {
244 		if (rp->rcb_faddr) {
245 			error = EISCONN;
246 			goto release;
247 		}
248 		rp->rcb_faddr = nam;
249 	} else if (rp->rcb_faddr == NULL) {
250 		error = ENOTCONN;
251 		goto release;
252 	}
253 	oi.p_pid = td->td_proc->p_pid;
254 	error = (*so->so_proto->pr_output)(m, so, &oi);
255 	m = NULL;
256 	if (nam)
257 		rp->rcb_faddr = NULL;
258 release:
259 	if (m != NULL)
260 		m_freem(m);
261 	return (error);
262 }
263 
264 /* pru_sense is null */
265 
266 static int
267 raw_ushutdown(struct socket *so)
268 {
269 	struct rawcb *rp = sotorawcb(so);
270 
271 	if (rp == NULL)
272 		return EINVAL;
273 	socantsendmore(so);
274 	return 0;
275 }
276 
277 static int
278 raw_usockaddr(struct socket *so, struct sockaddr **nam)
279 {
280 	struct rawcb *rp = sotorawcb(so);
281 
282 	if (rp == NULL)
283 		return EINVAL;
284 	if (rp->rcb_laddr == NULL)
285 		return EINVAL;
286 	*nam = dup_sockaddr(rp->rcb_laddr);
287 	return 0;
288 }
289 
290 struct pr_usrreqs raw_usrreqs = {
291 	raw_uabort, pru_accept_notsupp, raw_uattach, raw_ubind, raw_uconnect,
292 	pru_connect2_notsupp, pru_control_notsupp, raw_udetach,
293 	raw_udisconnect, pru_listen_notsupp, raw_upeeraddr, pru_rcvd_notsupp,
294 	pru_rcvoob_notsupp, raw_usend, pru_sense_null, raw_ushutdown,
295 	raw_usockaddr, sosend, soreceive, sopoll
296 };
297