Merge branch 'vendor/TOP'
[dragonfly.git] / sys / netinet6 / udp6_output.c
1 /*      $FreeBSD: src/sys/netinet6/udp6_output.c,v 1.1.2.6 2003/01/23 21:06:47 sam Exp $        */
2 /*      $KAME: udp6_output.c,v 1.31 2001/05/21 16:39:15 jinmei Exp $    */
3
4 /*
5  * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the name of the project nor the names of its contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32
33 /*
34  * Copyright (c) 1982, 1986, 1989, 1993
35  *      The Regents of the University of California.  All rights reserved.
36  *
37  * Redistribution and use in source and binary forms, with or without
38  * modification, are permitted provided that the following conditions
39  * are met:
40  * 1. Redistributions of source code must retain the above copyright
41  *    notice, this list of conditions and the following disclaimer.
42  * 2. Redistributions in binary form must reproduce the above copyright
43  *    notice, this list of conditions and the following disclaimer in the
44  *    documentation and/or other materials provided with the distribution.
45  * 3. Neither the name of the University nor the names of its contributors
46  *    may be used to endorse or promote products derived from this software
47  *    without specific prior written permission.
48  *
49  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
50  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
51  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
52  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
53  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
54  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
55  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
56  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
57  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
58  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
59  * SUCH DAMAGE.
60  *
61  *      @(#)udp_var.h   8.1 (Berkeley) 6/10/93
62  */
63
64 #include "opt_inet.h"
65 #include "opt_inet6.h"
66
67 #include <sys/param.h>
68 #include <sys/malloc.h>
69 #include <sys/mbuf.h>
70 #include <sys/protosw.h>
71 #include <sys/socket.h>
72 #include <sys/socketvar.h>
73 #include <sys/sysctl.h>
74 #include <sys/errno.h>
75 #include <sys/stat.h>
76 #include <sys/systm.h>
77 #include <sys/proc.h>
78 #include <sys/priv.h>
79 #include <sys/syslog.h>
80
81 #include <net/if.h>
82 #include <net/route.h>
83 #include <net/if_types.h>
84
85 #include <netinet/in.h>
86 #include <netinet/in_var.h>
87 #include <netinet/in_systm.h>
88 #include <netinet/ip.h>
89 #include <netinet/ip_var.h>
90 #include <netinet/in_pcb.h>
91 #include <netinet/udp.h>
92 #include <netinet/udp_var.h>
93 #include <netinet/ip6.h>
94 #include <netinet6/ip6_var.h>
95 #include <netinet6/in6_pcb.h>
96 #include <netinet6/udp6_var.h>
97 #include <netinet/icmp6.h>
98 #include <netinet6/ip6protosw.h>
99
100 #include <net/net_osdep.h>
101
102 /*
103  * UDP protocol inplementation.
104  * Per RFC 768, August, 1980.
105  */
106
107 #define in6pcb          inpcb
108 #define udp6stat        udp_stat
109 #define udp6s_opackets  udps_opackets
110
111 int
112 udp6_output(struct in6pcb *in6p, struct mbuf *m, struct sockaddr *addr6,
113             struct mbuf *control, struct thread *td)
114 {
115         u_int32_t ulen = m->m_pkthdr.len;
116         u_int32_t plen = sizeof(struct udphdr) + ulen;
117         struct ip6_hdr *ip6;
118         struct udphdr *udp6;
119         struct in6_addr *laddr, *faddr;
120         u_short fport;
121         int error = 0;
122         struct ip6_pktopts opt, *stickyopt = in6p->in6p_outputopts;
123         int priv;
124         int hlen = sizeof(struct ip6_hdr);
125         struct sockaddr_in6 tmp;
126
127         priv = !priv_check(td, PRIV_ROOT);      /* 1 if privileged, 0 if not */
128         if (control) {
129                 if ((error = ip6_setpktoptions(control, &opt,
130                     in6p->in6p_outputopts, 
131                     IPPROTO_UDP, priv)) != 0)
132                         goto release;
133                 in6p->in6p_outputopts = &opt;
134         }
135
136         if (addr6) {
137                 /*
138                  * IPv4 version of udp_output calls in_pcbconnect in this case,
139                  * which needs splnet and affects performance.
140                  * Since we saw no essential reason for calling in_pcbconnect,
141                  * we get rid of such kind of logic, and call in6_selectsrc
142                  * and in6_pcbsetlport in order to fill in the local address
143                  * and the local port.
144                  */
145                 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)addr6;
146
147                 /* Caller should have rejected the v4-mapped address */
148                 KASSERT(!IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr),
149                     ("v4-mapped address"));
150
151                 if (sin6->sin6_port == 0) {
152                         error = EADDRNOTAVAIL;
153                         goto release;
154                 }
155
156                 if (!IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_faddr)) {
157                         /* how about ::ffff:0.0.0.0 case? */
158                         error = EISCONN;
159                         goto release;
160                 }
161                 if (!prison_remote_ip(td, addr6)) {
162                         error = EAFNOSUPPORT; /* IPv4 only jail */
163                         goto release;
164                 }
165
166                 /* protect *sin6 from overwrites */
167                 tmp = *sin6;
168                 sin6 = &tmp;
169
170                 faddr = &sin6->sin6_addr;
171                 fport = sin6->sin6_port; /* allow 0 port */
172
173                 /* KAME hack: embed scopeid */
174                 if (in6_embedscope(&sin6->sin6_addr, sin6, in6p, NULL) != 0) {
175                         error = EINVAL;
176                         goto release;
177                 }
178
179                 laddr = in6_selectsrc(sin6, in6p->in6p_outputopts,
180                                       in6p->in6p_moptions,
181                                       &in6p->in6p_route,
182                                       &in6p->in6p_laddr, &error, NULL);
183                 if (laddr == NULL) {
184                         if (error == 0)
185                                 error = EADDRNOTAVAIL;
186                         goto release;
187                 }
188                 if (in6p->in6p_lport == 0 &&
189                     (error = in6_pcbsetlport(laddr, in6p, td)) != 0)
190                         goto release;
191         } else {
192                 if (IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_faddr)) {
193                         error = ENOTCONN;
194                         goto release;
195                 }
196
197                 /* Connection to v4-mapped address should have been rejected */
198                 KASSERT(!IN6_IS_ADDR_V4MAPPED(&in6p->in6p_faddr),
199                     ("bound to v4-mapped address"));
200
201                 laddr = &in6p->in6p_laddr;
202                 faddr = &in6p->in6p_faddr;
203                 fport = in6p->in6p_fport;
204         }
205
206         /*
207          * Calculate data length and get a mbuf
208          * for UDP and IP6 headers.
209          */
210         M_PREPEND(m, hlen + sizeof(struct udphdr), M_NOWAIT);
211         if (m == NULL) {
212                 error = ENOBUFS;
213                 goto release;
214         }
215
216         /*
217          * Stuff checksum and output datagram.
218          */
219         udp6 = (struct udphdr *)(mtod(m, caddr_t) + hlen);
220         udp6->uh_sport = in6p->in6p_lport; /* lport is always set in the PCB */
221         udp6->uh_dport = fport;
222         if (plen <= 0xffff)
223                 udp6->uh_ulen = htons((u_short)plen);
224         else
225                 udp6->uh_ulen = 0;
226         udp6->uh_sum = 0;
227
228         ip6 = mtod(m, struct ip6_hdr *);
229         ip6->ip6_flow   = in6p->in6p_flowinfo & IPV6_FLOWINFO_MASK;
230         ip6->ip6_vfc    &= ~IPV6_VERSION_MASK;
231         ip6->ip6_vfc    |= IPV6_VERSION;
232 #if 0                           /* ip6_plen will be filled in ip6_output. */
233         ip6->ip6_plen   = htons((u_short)plen);
234 #endif
235         ip6->ip6_nxt    = IPPROTO_UDP;
236         ip6->ip6_hlim   = in6_selecthlim(in6p,
237                                          in6p->in6p_route.ro_rt ?
238                                          in6p->in6p_route.ro_rt->rt_ifp : NULL);
239         ip6->ip6_src    = *laddr;
240         ip6->ip6_dst    = *faddr;
241
242         if ((udp6->uh_sum = in6_cksum(m, IPPROTO_UDP,
243                         sizeof(struct ip6_hdr), plen)) == 0) {
244                 udp6->uh_sum = 0xffff;
245         }
246
247         udp6stat.udp6s_opackets++;
248         error = ip6_output(m, in6p->in6p_outputopts, &in6p->in6p_route, 0,
249             in6p->in6p_moptions, NULL, in6p);
250         goto releaseopt;
251
252 release:
253         m_freem(m);
254
255 releaseopt:
256         if (control) {
257                 ip6_clearpktopts(in6p->in6p_outputopts, -1);
258                 in6p->in6p_outputopts = stickyopt;
259                 m_freem(control);
260         }
261         return (error);
262 }