Initial import from FreeBSD RELENG_4:
[dragonfly.git] / sys / net / raw_usrreq.c
CommitLineData
984263bc
MD
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 */
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)) != 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
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
227static int
228raw_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;
262release:
263 if (m != NULL)
264 m_freem(m);
265 return (error);
266}
267
268/* pru_sense is null */
269
270static int
271raw_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
281static int
282raw_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
294struct 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};