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