raw_usrreq.c revision 28270
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 *	$Id: raw_usrreq.c,v 1.13 1997/08/02 14:32:40 bde 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 */
50void
51raw_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 */
65void
66raw_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*/
126void
127raw_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
138static int
139raw_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
153static int
154raw_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->p_ucred, &p->p_acflag)) != 0)
162		return error;
163	return raw_attach(so, proto);
164}
165
166static int
167raw_ubind(struct socket *so, struct sockaddr *nam, struct proc *p)
168{
169	return EINVAL;
170}
171
172static int
173raw_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
181static int
182raw_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
193static int
194raw_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
210static int
211raw_upeeraddr(struct socket *so, struct sockaddr **nam)
212{
213	struct rawcb *rp = sotorawcb(so);
214	unsigned len;
215
216	if (rp == 0)
217		return EINVAL;
218	if (rp->rcb_faddr == 0) {
219		return ENOTCONN;
220	}
221	*nam = dup_sockaddr(rp->rcb_faddr, 1);
222	return 0;
223}
224
225/* pru_rcvd is EOPNOTSUPP */
226/* pru_rcvoob is EOPNOTSUPP */
227
228static int
229raw_usend(struct socket *so, int flags, struct mbuf *m,
230	  struct sockaddr *nam, struct mbuf *control, struct proc *p)
231{
232	int error;
233	struct rawcb *rp = sotorawcb(so);
234
235	if (rp == 0) {
236		error = EINVAL;
237		goto release;
238	}
239
240	if (flags & PRUS_OOB) {
241		error = EOPNOTSUPP;
242		goto release;
243	}
244
245	if (control && control->m_len) {
246		error = EOPNOTSUPP;
247		goto release;
248	}
249	if (nam) {
250		if (rp->rcb_faddr) {
251			error = EISCONN;
252			goto release;
253		}
254		rp->rcb_faddr = nam;
255	} else if (rp->rcb_faddr == 0) {
256		error = ENOTCONN;
257		goto release;
258	}
259	error = (*so->so_proto->pr_output)(m, so);
260	m = NULL;
261	if (nam)
262		rp->rcb_faddr = 0;
263release:
264	if (m != NULL)
265		m_freem(m);
266	return (error);
267}
268
269/* pru_sense is null */
270
271static int
272raw_ushutdown(struct socket *so)
273{
274	struct rawcb *rp = sotorawcb(so);
275
276	if (rp == 0)
277		return EINVAL;
278	socantsendmore(so);
279	return 0;
280}
281
282static int
283raw_usockaddr(struct socket *so, struct sockaddr **nam)
284{
285	struct rawcb *rp = sotorawcb(so);
286	unsigned len;
287
288	if (rp == 0)
289		return EINVAL;
290	if (rp->rcb_laddr == 0)
291		return EINVAL;
292	*nam = dup_sockaddr(rp->rcb_laddr, 1);
293	return 0;
294}
295
296struct pr_usrreqs raw_usrreqs = {
297	raw_uabort, pru_accept_notsupp, raw_uattach, raw_ubind, raw_uconnect,
298	pru_connect2_notsupp, pru_control_notsupp, raw_udetach,
299	raw_udisconnect, pru_listen_notsupp, raw_upeeraddr, pru_rcvd_notsupp,
300	pru_rcvoob_notsupp, raw_usend, pru_sense_null, raw_ushutdown,
301	raw_usockaddr, sosend, soreceive, soselect
302};
303