Merge from vendor branch AWK:
[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.13 2007/04/22 01:13:11 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/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(void)
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(struct mbuf *m0, struct sockproto *proto, const struct sockaddr *src,
68           const struct sockaddr *dst)
69 {
70         struct rawcb *rp;
71         struct mbuf *m = m0;
72         struct socket *last;
73
74         last = NULL;
75         LIST_FOREACH(rp, &rawcb_list, list) {
76                 if (rp->rcb_proto.sp_family != proto->sp_family)
77                         continue;
78                 if (rp->rcb_proto.sp_protocol  &&
79                     rp->rcb_proto.sp_protocol != proto->sp_protocol)
80                         continue;
81                 /*
82                  * We assume the lower level routines have
83                  * placed the address in a canonical format
84                  * suitable for a structure comparison.
85                  *
86                  * Note that if the lengths are not the same
87                  * the comparison will fail at the first byte.
88                  */
89                 if (rp->rcb_laddr && !sa_equal(rp->rcb_laddr, dst))
90                         continue;
91                 if (rp->rcb_faddr && !sa_equal(rp->rcb_faddr, src))
92                         continue;
93                 if (last) {
94                         struct mbuf *n;
95
96                         n = m_copypacket(m, MB_DONTWAIT);
97                         if (n != NULL) {
98                                 if (ssb_appendaddr(&last->so_rcv, src, n,
99                                                  (struct mbuf *)0) == 0) {
100                                         /* should notify about lost packet */
101                                         m_freem(n);
102                                 } else {
103                                         sorwakeup(last);
104                                 }
105                         }
106                 }
107                 last = rp->rcb_socket;
108         }
109         if (last) {
110                 if (ssb_appendaddr(&last->so_rcv, src, m, (struct mbuf *)0) == 0)
111                         m_freem(m);
112                 else
113                         sorwakeup(last);
114         } else {
115                 m_freem(m);
116         }
117 }
118
119 /*ARGSUSED*/
120 void
121 raw_ctlinput(int cmd, struct sockaddr *arg, void *dummy)
122 {
123
124         if (cmd < 0 || cmd > PRC_NCMDS)
125                 return;
126         /* INCOMPLETE */
127 }
128
129 static int
130 raw_uabort(struct socket *so)
131 {
132         struct rawcb *rp = sotorawcb(so);
133
134         if (rp == NULL)
135                 return EINVAL;
136         raw_disconnect(rp);
137         sofree(so);
138         soisdisconnected(so);
139         return 0;
140 }
141
142 /* pru_accept is EOPNOTSUPP */
143
144 static int
145 raw_uattach(struct socket *so, int proto, struct pru_attach_info *ai)
146 {
147         struct rawcb *rp = sotorawcb(so);
148         int error;
149
150         if (rp == NULL)
151                 return EINVAL;
152         if ((error = suser_cred(ai->p_ucred, NULL_CRED_OKAY)) != 0)
153                 return error;
154         return raw_attach(so, proto, ai->sb_rlimit);
155 }
156
157 static int
158 raw_ubind(struct socket *so, struct sockaddr *nam, struct thread *td)
159 {
160         return EINVAL;
161 }
162
163 static int
164 raw_uconnect(struct socket *so, struct sockaddr *nam, struct thread *td)
165 {
166         return EINVAL;
167 }
168
169 /* pru_connect2 is EOPNOTSUPP */
170 /* pru_control is EOPNOTSUPP */
171
172 static int
173 raw_udetach(struct socket *so)
174 {
175         struct rawcb *rp = sotorawcb(so);
176
177         if (rp == NULL)
178                 return EINVAL;
179
180         raw_detach(rp);
181         return 0;
182 }
183
184 static int
185 raw_udisconnect(struct socket *so)
186 {
187         struct rawcb *rp = sotorawcb(so);
188
189         if (rp == NULL)
190                 return EINVAL;
191         if (rp->rcb_faddr == NULL) {
192                 return ENOTCONN;
193         }
194         raw_disconnect(rp);
195         soisdisconnected(so);
196         return 0;
197 }
198
199 /* pru_listen is EOPNOTSUPP */
200
201 static int
202 raw_upeeraddr(struct socket *so, struct sockaddr **nam)
203 {
204         struct rawcb *rp = sotorawcb(so);
205
206         if (rp == NULL)
207                 return EINVAL;
208         if (rp->rcb_faddr == NULL) {
209                 return ENOTCONN;
210         }
211         *nam = dup_sockaddr(rp->rcb_faddr);
212         return 0;
213 }
214
215 /* pru_rcvd is EOPNOTSUPP */
216 /* pru_rcvoob is EOPNOTSUPP */
217
218 static int
219 raw_usend(struct socket *so, int flags, struct mbuf *m,
220           struct sockaddr *nam, struct mbuf *control, struct thread *td)
221 {
222         int error;
223         struct rawcb *rp = sotorawcb(so);
224         struct pr_output_info oi;
225
226         if (rp == NULL) {
227                 error = EINVAL;
228                 goto release;
229         }
230
231         if (flags & PRUS_OOB) {
232                 error = EOPNOTSUPP;
233                 goto release;
234         }
235
236         if (control && control->m_len) {
237                 error = EOPNOTSUPP;
238                 goto release;
239         }
240         if (nam) {
241                 if (rp->rcb_faddr) {
242                         error = EISCONN;
243                         goto release;
244                 }
245                 rp->rcb_faddr = nam;
246         } else if (rp->rcb_faddr == NULL) {
247                 error = ENOTCONN;
248                 goto release;
249         }
250         oi.p_pid = td->td_proc->p_pid;
251         error = (*so->so_proto->pr_output)(m, so, &oi);
252         m = NULL;
253         if (nam)
254                 rp->rcb_faddr = NULL;
255 release:
256         if (m != NULL)
257                 m_freem(m);
258         return (error);
259 }
260
261 /* pru_sense is null */
262
263 static int
264 raw_ushutdown(struct socket *so)
265 {
266         struct rawcb *rp = sotorawcb(so);
267
268         if (rp == NULL)
269                 return EINVAL;
270         socantsendmore(so);
271         return 0;
272 }
273
274 static int
275 raw_usockaddr(struct socket *so, struct sockaddr **nam)
276 {
277         struct rawcb *rp = sotorawcb(so);
278
279         if (rp == NULL)
280                 return EINVAL;
281         if (rp->rcb_laddr == NULL)
282                 return EINVAL;
283         *nam = dup_sockaddr(rp->rcb_laddr);
284         return 0;
285 }
286
287 struct pr_usrreqs raw_usrreqs = {
288         .pru_abort = raw_uabort,
289         .pru_accept = pru_accept_notsupp,
290         .pru_attach = raw_uattach,
291         .pru_bind = raw_ubind,
292         .pru_connect = raw_uconnect,
293         .pru_connect2 = pru_connect2_notsupp,
294         .pru_control = pru_control_notsupp,
295         .pru_detach = raw_udetach, 
296         .pru_disconnect = raw_udisconnect,
297         .pru_listen = pru_listen_notsupp,
298         .pru_peeraddr = raw_upeeraddr,
299         .pru_rcvd = pru_rcvd_notsupp,
300         .pru_rcvoob = pru_rcvoob_notsupp,
301         .pru_send = raw_usend,
302         .pru_sense = pru_sense_null,
303         .pru_shutdown = raw_ushutdown,
304         .pru_sockaddr = raw_usockaddr,
305         .pru_sosend = sosend,
306         .pru_soreceive = soreceive,
307         .pru_sopoll = sopoll
308 };
309