- New function Buf_Append(), which is given a pointer to a string to
[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.10 2005/01/26 23:09:57 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(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 (sbappendaddr(&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 (sbappendaddr(&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(cmd, arg, dummy)
122         int cmd;
123         struct sockaddr *arg;
124         void *dummy;
125 {
126
127         if (cmd < 0 || cmd > PRC_NCMDS)
128                 return;
129         /* INCOMPLETE */
130 }
131
132 static int
133 raw_uabort(struct socket *so)
134 {
135         struct rawcb *rp = sotorawcb(so);
136
137         if (rp == NULL)
138                 return EINVAL;
139         raw_disconnect(rp);
140         sofree(so);
141         soisdisconnected(so);
142         return 0;
143 }
144
145 /* pru_accept is EOPNOTSUPP */
146
147 static int
148 raw_uattach(struct socket *so, int proto, struct pru_attach_info *ai)
149 {
150         struct rawcb *rp = sotorawcb(so);
151         int error;
152
153         if (rp == NULL)
154                 return EINVAL;
155         if ((error = suser_cred(ai->p_ucred, NULL_CRED_OKAY)) != 0)
156                 return error;
157         return raw_attach(so, proto, ai->sb_rlimit);
158 }
159
160 static int
161 raw_ubind(struct socket *so, struct sockaddr *nam, struct thread *td)
162 {
163         return EINVAL;
164 }
165
166 static int
167 raw_uconnect(struct socket *so, struct sockaddr *nam, struct thread *td)
168 {
169         return EINVAL;
170 }
171
172 /* pru_connect2 is EOPNOTSUPP */
173 /* pru_control is EOPNOTSUPP */
174
175 static int
176 raw_udetach(struct socket *so)
177 {
178         struct rawcb *rp = sotorawcb(so);
179
180         if (rp == NULL)
181                 return EINVAL;
182
183         raw_detach(rp);
184         return 0;
185 }
186
187 static int
188 raw_udisconnect(struct socket *so)
189 {
190         struct rawcb *rp = sotorawcb(so);
191
192         if (rp == NULL)
193                 return EINVAL;
194         if (rp->rcb_faddr == NULL) {
195                 return ENOTCONN;
196         }
197         raw_disconnect(rp);
198         soisdisconnected(so);
199         return 0;
200 }
201
202 /* pru_listen is EOPNOTSUPP */
203
204 static int
205 raw_upeeraddr(struct socket *so, struct sockaddr **nam)
206 {
207         struct rawcb *rp = sotorawcb(so);
208
209         if (rp == NULL)
210                 return EINVAL;
211         if (rp->rcb_faddr == NULL) {
212                 return ENOTCONN;
213         }
214         *nam = dup_sockaddr(rp->rcb_faddr);
215         return 0;
216 }
217
218 /* pru_rcvd is EOPNOTSUPP */
219 /* pru_rcvoob is EOPNOTSUPP */
220
221 static int
222 raw_usend(struct socket *so, int flags, struct mbuf *m,
223           struct sockaddr *nam, struct mbuf *control, struct thread *td)
224 {
225         int error;
226         struct rawcb *rp = sotorawcb(so);
227         struct pr_output_info oi;
228
229         if (rp == NULL) {
230                 error = EINVAL;
231                 goto release;
232         }
233
234         if (flags & PRUS_OOB) {
235                 error = EOPNOTSUPP;
236                 goto release;
237         }
238
239         if (control && control->m_len) {
240                 error = EOPNOTSUPP;
241                 goto release;
242         }
243         if (nam) {
244                 if (rp->rcb_faddr) {
245                         error = EISCONN;
246                         goto release;
247                 }
248                 rp->rcb_faddr = nam;
249         } else if (rp->rcb_faddr == NULL) {
250                 error = ENOTCONN;
251                 goto release;
252         }
253         oi.p_pid = td->td_proc->p_pid;
254         error = (*so->so_proto->pr_output)(m, so, &oi);
255         m = NULL;
256         if (nam)
257                 rp->rcb_faddr = NULL;
258 release:
259         if (m != NULL)
260                 m_freem(m);
261         return (error);
262 }
263
264 /* pru_sense is null */
265
266 static int
267 raw_ushutdown(struct socket *so)
268 {
269         struct rawcb *rp = sotorawcb(so);
270
271         if (rp == NULL)
272                 return EINVAL;
273         socantsendmore(so);
274         return 0;
275 }
276
277 static int
278 raw_usockaddr(struct socket *so, struct sockaddr **nam)
279 {
280         struct rawcb *rp = sotorawcb(so);
281
282         if (rp == NULL)
283                 return EINVAL;
284         if (rp->rcb_laddr == NULL)
285                 return EINVAL;
286         *nam = dup_sockaddr(rp->rcb_laddr);
287         return 0;
288 }
289
290 struct pr_usrreqs raw_usrreqs = {
291         raw_uabort, pru_accept_notsupp, raw_uattach, raw_ubind, raw_uconnect,
292         pru_connect2_notsupp, pru_control_notsupp, raw_udetach, 
293         raw_udisconnect, pru_listen_notsupp, raw_upeeraddr, pru_rcvd_notsupp,
294         pru_rcvoob_notsupp, raw_usend, pru_sense_null, raw_ushutdown,
295         raw_usockaddr, sosend, soreceive, sopoll
296 };