d150a8dab533fa6cbb5fdb27553169e14b9fb499
[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.9 2005/01/06 09:14:13 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(m0, proto, src, dst)
68         struct mbuf *m0;
69         struct sockproto *proto;
70         struct sockaddr *src, *dst;
71 {
72         struct rawcb *rp;
73         struct mbuf *m = m0;
74         int sockets = 0;
75         struct socket *last;
76
77         last = 0;
78         LIST_FOREACH(rp, &rawcb_list, list) {
79                 if (rp->rcb_proto.sp_family != proto->sp_family)
80                         continue;
81                 if (rp->rcb_proto.sp_protocol  &&
82                     rp->rcb_proto.sp_protocol != proto->sp_protocol)
83                         continue;
84                 /*
85                  * We assume the lower level routines have
86                  * placed the address in a canonical format
87                  * suitable for a structure comparison.
88                  *
89                  * Note that if the lengths are not the same
90                  * the comparison will fail at the first byte.
91                  */
92                 if (rp->rcb_laddr && !sa_equal(rp->rcb_laddr, dst))
93                         continue;
94                 if (rp->rcb_faddr && !sa_equal(rp->rcb_faddr, src))
95                         continue;
96                 if (last) {
97                         struct mbuf *n;
98
99                         n = m_copypacket(m, MB_DONTWAIT);
100                         if (n) {
101                                 if (sbappendaddr(&last->so_rcv, src, n,
102                                                 (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, m, (struct mbuf *)0) == 0)
115                         m_freem(m);
116                 else {
117                         sorwakeup(last);
118                         sockets++;
119                 }
120         } else
121                 m_freem(m);
122 }
123
124 /*ARGSUSED*/
125 void
126 raw_ctlinput(cmd, arg, dummy)
127         int cmd;
128         struct sockaddr *arg;
129         void *dummy;
130 {
131
132         if (cmd < 0 || cmd > PRC_NCMDS)
133                 return;
134         /* INCOMPLETE */
135 }
136
137 static int
138 raw_uabort(struct socket *so)
139 {
140         struct rawcb *rp = sotorawcb(so);
141
142         if (rp == 0)
143                 return EINVAL;
144         raw_disconnect(rp);
145         sofree(so);
146         soisdisconnected(so);
147         return 0;
148 }
149
150 /* pru_accept is EOPNOTSUPP */
151
152 static int
153 raw_uattach(struct socket *so, int proto, struct pru_attach_info *ai)
154 {
155         struct rawcb *rp = sotorawcb(so);
156         int error;
157
158         if (rp == 0)
159                 return EINVAL;
160         if ((error = suser_cred(ai->p_ucred, NULL_CRED_OKAY)) != 0)
161                 return error;
162         return raw_attach(so, proto, ai->sb_rlimit);
163 }
164
165 static int
166 raw_ubind(struct socket *so, struct sockaddr *nam, struct thread *td)
167 {
168         return EINVAL;
169 }
170
171 static int
172 raw_uconnect(struct socket *so, struct sockaddr *nam, struct thread *td)
173 {
174         return EINVAL;
175 }
176
177 /* pru_connect2 is EOPNOTSUPP */
178 /* pru_control is EOPNOTSUPP */
179
180 static int
181 raw_udetach(struct socket *so)
182 {
183         struct rawcb *rp = sotorawcb(so);
184
185         if (rp == 0)
186                 return EINVAL;
187
188         raw_detach(rp);
189         return 0;
190 }
191
192 static int
193 raw_udisconnect(struct socket *so)
194 {
195         struct rawcb *rp = sotorawcb(so);
196
197         if (rp == 0)
198                 return EINVAL;
199         if (rp->rcb_faddr == 0) {
200                 return ENOTCONN;
201         }
202         raw_disconnect(rp);
203         soisdisconnected(so);
204         return 0;
205 }
206
207 /* pru_listen is EOPNOTSUPP */
208
209 static int
210 raw_upeeraddr(struct socket *so, struct sockaddr **nam)
211 {
212         struct rawcb *rp = sotorawcb(so);
213
214         if (rp == 0)
215                 return EINVAL;
216         if (rp->rcb_faddr == 0) {
217                 return ENOTCONN;
218         }
219         *nam = dup_sockaddr(rp->rcb_faddr);
220         return 0;
221 }
222
223 /* pru_rcvd is EOPNOTSUPP */
224 /* pru_rcvoob is EOPNOTSUPP */
225
226 static int
227 raw_usend(struct socket *so, int flags, struct mbuf *m,
228           struct sockaddr *nam, struct mbuf *control, struct thread *td)
229 {
230         int error;
231         struct rawcb *rp = sotorawcb(so);
232         struct pr_output_info oi;
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         oi.p_pid = td->td_proc->p_pid;
259         error = (*so->so_proto->pr_output)(m, so, &oi);
260         m = NULL;
261         if (nam)
262                 rp->rcb_faddr = 0;
263 release:
264         if (m != NULL)
265                 m_freem(m);
266         return (error);
267 }
268
269 /* pru_sense is null */
270
271 static int
272 raw_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
282 static int
283 raw_usockaddr(struct socket *so, struct sockaddr **nam)
284 {
285         struct rawcb *rp = sotorawcb(so);
286
287         if (rp == 0)
288                 return EINVAL;
289         if (rp->rcb_laddr == 0)
290                 return EINVAL;
291         *nam = dup_sockaddr(rp->rcb_laddr);
292         return 0;
293 }
294
295 struct pr_usrreqs raw_usrreqs = {
296         raw_uabort, pru_accept_notsupp, raw_uattach, raw_ubind, raw_uconnect,
297         pru_connect2_notsupp, pru_control_notsupp, raw_udetach, 
298         raw_udisconnect, pru_listen_notsupp, raw_upeeraddr, pru_rcvd_notsupp,
299         pru_rcvoob_notsupp, raw_usend, pru_sense_null, raw_ushutdown,
300         raw_usockaddr, sosend, soreceive, sopoll
301 };