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