udp.c@ 61198

Last change on this file since 61198 was 61198, checked in by vboxsync, 9 years ago
NAT: Include hygiene for "ctl.h"
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 20.7 KB

Line
1	/* $Id: udp.c 61198 2016-05-25 16:55:32Z vboxsync $ */
2	/** @file
3	* NAT - UDP protocol.
4	*/
5
6	/*
7	* Copyright (C) 2006-2015 Oracle Corporation
8	*
9	* This file is part of VirtualBox Open Source Edition (OSE), as
10	* available from http://www.virtualbox.org. This file is free software;
11	* you can redistribute it and/or modify it under the terms of the GNU
12	* General Public License (GPL) as published by the Free Software
13	* Foundation, in version 2 as it comes in the "COPYING" file of the
14	* VirtualBox OSE distribution. VirtualBox OSE is distributed in the
15	* hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
16	*/
17
18	/*
19	* This code is based on:
20	*
21	* Copyright (c) 1982, 1986, 1988, 1990, 1993
22	* The Regents of the University of California. All rights reserved.
23	*
24	* Redistribution and use in source and binary forms, with or without
25	* modification, are permitted provided that the following conditions
26	* are met:
27	* 1. Redistributions of source code must retain the above copyright
28	* notice, this list of conditions and the following disclaimer.
29	* 2. Redistributions in binary form must reproduce the above copyright
30	* notice, this list of conditions and the following disclaimer in the
31	* documentation and/or other materials provided with the distribution.
32	* 3. All advertising materials mentioning features or use of this software
33	* must display the following acknowledgement:
34	* This product includes software developed by the University of
35	* California, Berkeley and its contributors.
36	* 4. Neither the name of the University nor the names of its contributors
37	* may be used to endorse or promote products derived from this software
38	* without specific prior written permission.
39	*
40	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
41	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
44	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
50	* SUCH DAMAGE.
51	*
52	* @(#)udp_usrreq.c 8.4 (Berkeley) 1/21/94
53	* udp_usrreq.c,v 1.4 1994/10/02 17:48:45 phk Exp
54	*/
55
56	/*
57	* Changes and additions relating to SLiRP
58	* Copyright (c) 1995 Danny Gasparovski.
59	*
60	* Please read the file COPYRIGHT for the
61	* terms and conditions of the copyright.
62	*/
63
64	#include <slirp.h>
65	#include "ip_icmp.h"
66
67
68	/*
69	* UDP protocol implementation.
70	* Per RFC 768, August, 1980.
71	*/
72	#define udpcksum 1
73
74	void
75	udp_init(PNATState pData)
76	{
77	udp_last_so = &udb;
78	udb.so_next = udb.so_prev = &udb;
79	}
80
81	/* m->m_data points at ip packet header
82	* m->m_len length ip packet
83	* ip->ip_len length data (IPDU)
84	*/
85	void
86	udp_input(PNATState pData, register struct mbuf *m, int iphlen)
87	{
88	register struct ip *ip;
89	register struct udphdr *uh;
90	int len;
91	struct ip save_ip;
92	struct socket *so;
93	int ret;
94	int ttl, tos;
95
96	LogFlowFunc(("ENTER: m = %p, iphlen = %d\n", m, iphlen));
97	ip = mtod(m, struct ip *);
98	Log2(("%RTnaipv4 iphlen = %d\n", ip->ip_dst, iphlen));
99
100	udpstat.udps_ipackets++;
101
102	/*
103	* Strip IP options, if any; should skip this,
104	* make available to user, and use on returned packets,
105	* but we don't yet have a way to check the checksum
106	* with options still present.
107	*/
108	if (iphlen > sizeof(struct ip))
109	{
110	ip_stripoptions(m, (struct mbuf *)0);
111	iphlen = sizeof(struct ip);
112	}
113
114	/*
115	* Get IP and UDP header together in first mbuf.
116	*/
117	ip = mtod(m, struct ip *);
118	uh = (struct udphdr *)((caddr_t)ip + iphlen);
119
120	/*
121	* Make mbuf data length reflect UDP length.
122	* If not enough data to reflect UDP length, drop.
123	*/
124	len = RT_N2H_U16((u_int16_t)uh->uh_ulen);
125	Assert((ip->ip_len + iphlen == m_length(m, NULL)));
126
127	if (ip->ip_len != len)
128	{
129	if (len > ip->ip_len)
130	{
131	udpstat.udps_badlen++;
132	Log3(("NAT: IP(id: %hd) has bad size\n", ip->ip_id));
133	goto bad_free_mbuf;
134	}
135	m_adj(m, len - ip->ip_len);
136	ip->ip_len = len;
137	}
138
139	/*
140	* Save a copy of the IP header in case we want restore it
141	* for sending an ICMP error message in response.
142	*/
143	save_ip = *ip;
144	save_ip.ip_len+= iphlen; /* tcp_input subtracts this */
145
146	/*
147	* Checksum extended UDP header and data.
148	*/
149	if (udpcksum && uh->uh_sum)
150	{
151	memset(((struct ipovly *)ip)->ih_x1, 0, 9);
152	((struct ipovly *)ip)->ih_len = uh->uh_ulen;
153	#if 0
154	/* keep uh_sum for ICMP reply */
155	uh->uh_sum = cksum(m, len + sizeof (struct ip));
156	if (uh->uh_sum)
157	{
158
159	#endif
160	if (cksum(m, len + iphlen))
161	{
162	udpstat.udps_badsum++;
163	Log3(("NAT: IP(id: %hd) has bad (udp) cksum\n", ip->ip_id));
164	goto bad_free_mbuf;
165	}
166	}
167	#if 0
168	}
169	#endif
170
171	/*
172	* handle DHCP/BOOTP
173	*/
174	if (uh->uh_dport == RT_H2N_U16_C(BOOTP_SERVER))
175	{
176	bootp_input(pData, m);
177	goto done_free_mbuf;
178	}
179
180	LogFunc(("uh src: %RTnaipv4:%d, dst: %RTnaipv4:%d\n",
181	ip->ip_src.s_addr, RT_N2H_U16(uh->uh_sport),
182	ip->ip_dst.s_addr, RT_N2H_U16(uh->uh_dport)));
183
184	/*
185	* handle DNS host resolver without creating a socket
186	*/
187	if ( pData->fUseHostResolver
188	&& uh->uh_dport == RT_H2N_U16_C(53)
189	&& CTL_CHECK(ip->ip_dst.s_addr, CTL_DNS))
190	{
191	struct sockaddr_in dst, src;
192
193	src.sin_addr.s_addr = ip->ip_dst.s_addr;
194	src.sin_port = uh->uh_dport;
195	dst.sin_addr.s_addr = ip->ip_src.s_addr;
196	dst.sin_port = uh->uh_sport;
197
198	m_adj(m, sizeof(struct udpiphdr));
199
200	m = hostresolver(pData, m, ip->ip_src.s_addr, uh->uh_sport);
201	if (m == NULL)
202	goto done_free_mbuf;
203
204	slirpMbufTagService(pData, m, CTL_DNS);
205
206	udp_output2(pData, NULL, m, &src, &dst, IPTOS_LOWDELAY);
207	LogFlowFuncLeave();
208	return;
209	}
210
211	/*
212	* handle TFTP
213	*/
214	if ( uh->uh_dport == RT_H2N_U16_C(TFTP_SERVER)
215	&& CTL_CHECK(ip->ip_dst.s_addr, CTL_TFTP))
216	{
217	if (pData->pvTftpSessions)
218	slirpTftpInput(pData, m);
219	goto done_free_mbuf;
220	}
221
222	/*
223	* XXX: DNS proxy currently relies on the fact that each socket
224	* only serves one request.
225	*/
226	if ( pData->fUseDnsProxy
227	&& CTL_CHECK(ip->ip_dst.s_addr, CTL_DNS)
228	&& (uh->uh_dport == RT_H2N_U16_C(53)))
229	{
230	so = NULL;
231	goto new_socket;
232	}
233
234	/*
235	* Locate pcb for datagram.
236	*/
237	so = udp_last_so;
238	if ( so->so_lport != uh->uh_sport
239	\|\| so->so_laddr.s_addr != ip->ip_src.s_addr)
240	{
241	struct socket *tmp;
242
243	for (tmp = udb.so_next; tmp != &udb; tmp = tmp->so_next)
244	{
245	if ( tmp->so_lport == uh->uh_sport
246	&& tmp->so_laddr.s_addr == ip->ip_src.s_addr)
247	{
248	so = tmp;
249	break;
250	}
251	}
252	if (tmp == &udb)
253	so = NULL;
254	else
255	{
256	udpstat.udpps_pcbcachemiss++;
257	udp_last_so = so;
258	}
259	}
260
261	new_socket:
262	if (so == NULL)
263	{
264	/*
265	* If there's no socket for this packet,
266	* create one
267	*/
268	if ((so = socreate()) == NULL)
269	{
270	Log2(("NAT: IP(id: %hd) failed to create socket\n", ip->ip_id));
271	goto bad_free_mbuf;
272	}
273	if (udp_attach(pData, so) <= 0)
274	{
275	Log2(("NAT: IP(id: %hd) udp_attach errno = %d (%s)\n",
276	ip->ip_id, errno, strerror(errno)));
277	sofree(pData, so);
278	goto bad_free_mbuf;
279	}
280
281	/*
282	* Setup fields
283	*/
284	/* udp_last_so = so; */
285	so->so_laddr = ip->ip_src;
286	so->so_lport = uh->uh_sport;
287
288	so->so_iptos = ip->ip_tos;
289
290	/*
291	* XXXXX Here, check if it's in udpexec_list,
292	* and if it is, do the fork_exec() etc.
293	*/
294	}
295
296	so->so_faddr = ip->ip_dst; /* XXX */
297	so->so_fport = uh->uh_dport; /* XXX */
298	Assert(so->so_type == IPPROTO_UDP);
299
300	/*
301	* DNS proxy
302	*/
303	if ( pData->fUseDnsProxy
304	&& CTL_CHECK(ip->ip_dst.s_addr, CTL_DNS)
305	&& (uh->uh_dport == RT_H2N_U16_C(53)))
306	{
307	dnsproxy_query(pData, so, m, iphlen);
308	goto done_free_mbuf;
309	}
310
311	iphlen += sizeof(struct udphdr);
312	m->m_len -= iphlen;
313	m->m_data += iphlen;
314
315	ttl = ip->ip_ttl = save_ip.ip_ttl;
316	if (ttl != so->so_sottl) {
317	ret = setsockopt(so->s, IPPROTO_IP, IP_TTL,
318	(char *)&ttl, sizeof(ttl));
319	if (RT_LIKELY(ret == 0))
320	so->so_sottl = ttl;
321	}
322
323	tos = save_ip.ip_tos;
324	if (tos != so->so_sotos) {
325	ret = setsockopt(so->s, IPPROTO_IP, IP_TOS,
326	(char *)&tos, sizeof(tos));
327	if (RT_LIKELY(ret == 0))
328	so->so_sotos = tos;
329	}
330
331	{
332	/*
333	* Different OSes have different socket options for DF. We
334	* can't use IP_HDRINCL here as it's only valid for SOCK_RAW.
335	*/
336	# define USE_DF_OPTION(_Optname) \
337	const int dfopt = _Optname; \
338	const char * const dfoptname = #_Optname;
339	#if defined(IP_MTU_DISCOVER)
340	USE_DF_OPTION(IP_MTU_DISCOVER);
341	#elif defined(IP_DONTFRAG) /* Solaris 11+, FreeBSD */
342	USE_DF_OPTION(IP_DONTFRAG);
343	#elif defined(IP_DONTFRAGMENT) /* Windows */
344	USE_DF_OPTION(IP_DONTFRAGMENT);
345	#else
346	USE_DF_OPTION(0);
347	#endif
348	if (dfopt) {
349	int df = (save_ip.ip_off & IP_DF) != 0;
350	#if defined(IP_MTU_DISCOVER)
351	df = df ? IP_PMTUDISC_DO : IP_PMTUDISC_DONT;
352	#endif
353	if (df != so->so_sodf) {
354	ret = setsockopt(so->s, IPPROTO_IP, dfopt,
355	(char *)&df, sizeof(df));
356	if (RT_LIKELY(ret == 0))
357	so->so_sodf = df;
358	}
359	}
360	}
361
362	if ( sosendto(pData, so, m) == -1
363	&& ( !soIgnorableErrorCode(errno)
364	&& errno != ENOTCONN))
365	{
366	m->m_len += iphlen;
367	m->m_data -= iphlen;
368	*ip = save_ip;
369	Log2(("NAT: UDP tx errno = %d (%s) on sent to %RTnaipv4\n",
370	errno, strerror(errno), ip->ip_dst));
371	icmp_error(pData, m, ICMP_UNREACH, ICMP_UNREACH_NET, 0, strerror(errno));
372	so->so_m = NULL;
373	LogFlowFuncLeave();
374	return;
375	}
376
377	if (so->so_m)
378	m_freem(pData, so->so_m); /* used for ICMP if error on sorecvfrom */
379
380	/* restore the orig mbuf packet */
381	m->m_len += iphlen;
382	m->m_data -= iphlen;
383	*ip = save_ip;
384	so->so_m = m; /* ICMP backup */
385	LogFlowFuncLeave();
386	return;
387
388	bad_free_mbuf:
389	Log2(("NAT: UDP(id: %hd) datagram to %RTnaipv4 with size(%d) claimed as bad\n",
390	ip->ip_id, &ip->ip_dst, ip->ip_len));
391
392	done_free_mbuf:
393	/* some services like bootp(built-in), dns(buildt-in) and dhcp don't need sockets
394	* and create new m'buffers to send them to guest, so we'll free their incomming
395	* buffers here.
396	*/
397	if (m != NULL)
398	m_freem(pData, m);
399	LogFlowFuncLeave();
400	return;
401	}
402
403	/**
404	* Output a UDP packet.
405	*
406	* @note This function will finally free m!
407	*/
408	int udp_output2(PNATState pData, struct socket so, struct mbuf m,
409	struct sockaddr_in saddr, struct sockaddr_in daddr,
410	int iptos)
411	{
412	register struct udpiphdr *ui;
413	int error;
414	int mlen = 0;
415
416	LogFlowFunc(("ENTER: so = %R[natsock], m = %p, saddr = %RTnaipv4, daddr = %RTnaipv4\n",
417	so, m, saddr->sin_addr.s_addr, daddr->sin_addr.s_addr));
418
419	/* in case of built-in service so might be NULL */
420	if (so) Assert(so->so_type == IPPROTO_UDP);
421
422	/*
423	* Adjust for header
424	*/
425	m->m_data -= sizeof(struct udpiphdr);
426	m->m_len += sizeof(struct udpiphdr);
427	mlen = m_length(m, NULL);
428
429	/*
430	* Fill in mbuf with extended UDP header
431	* and addresses and length put into network format.
432	*/
433	ui = mtod(m, struct udpiphdr *);
434	memset(ui->ui_x1, 0, 9);
435	ui->ui_pr = IPPROTO_UDP;
436	ui->ui_len = RT_H2N_U16(mlen - sizeof(struct ip));
437	/* XXXXX Check for from-one-location sockets, or from-any-location sockets */
438	ui->ui_src = saddr->sin_addr;
439	ui->ui_dst = daddr->sin_addr;
440	ui->ui_sport = saddr->sin_port;
441	ui->ui_dport = daddr->sin_port;
442	ui->ui_ulen = ui->ui_len;
443
444	/*
445	* Stuff checksum and output datagram.
446	*/
447	ui->ui_sum = 0;
448	if (udpcksum)
449	{
450	if ((ui->ui_sum = cksum(m, /* sizeof (struct udpiphdr) + */ mlen)) == 0)
451	ui->ui_sum = 0xffff;
452	}
453	((struct ip *)ui)->ip_len = mlen;
454	((struct ip *)ui)->ip_ttl = ip_defttl;
455	((struct ip *)ui)->ip_tos = iptos;
456
457	udpstat.udps_opackets++;
458
459	error = ip_output(pData, so, m);
460
461	return error;
462	}
463
464	/**
465	* @note This function will free m!
466	*/
467	int udp_output(PNATState pData, struct socket so, struct mbuf m,
468	struct sockaddr_in *addr)
469	{
470	struct sockaddr_in saddr, daddr;
471	#ifdef VBOX_WITH_NAT_UDP_SOCKET_CLONE
472	struct socket *pSocketClone = NULL;
473	#endif
474	Assert(so->so_type == IPPROTO_UDP);
475	LogFlowFunc(("ENTER: so = %R[natsock], m = %p, saddr = %RTnaipv4\n",
476	so, (long)m, addr->sin_addr.s_addr));
477
478	if (so->so_laddr.s_addr == INADDR_ANY)
479	{
480	if (pData->guest_addr_guess.s_addr != INADDR_ANY)
481	{
482	LogRel2(("NAT: port-forward: using %RTnaipv4 for %R[natsock]\n",
483	pData->guest_addr_guess.s_addr, so));
484	so->so_laddr = pData->guest_addr_guess;
485	}
486	else
487	{
488	LogRel2(("NAT: port-forward: guest address unknown for %R[natsock]\n", so));
489	m_freem(pData, m);
490	return 0;
491	}
492	}
493
494	saddr = *addr;
495	if ((so->so_faddr.s_addr & RT_H2N_U32(pData->netmask)) == pData->special_addr.s_addr)
496	{
497	saddr.sin_addr.s_addr = so->so_faddr.s_addr;
498	if (slirpIsWideCasting(pData, so->so_faddr.s_addr))
499	{
500	/**
501	* We haven't got real firewall but have got its submodule libalias.
502	*/
503	m->m_flags \|= M_SKIP_FIREWALL;
504	/**
505	* udp/137 port is Name Service in NetBIOS protocol. for some reasons Windows guest rejects
506	* accept data from non-aliased server.
507	*/
508	if ( (so->so_fport == so->so_lport)
509	&& (so->so_fport == RT_H2N_U16(137)))
510	saddr.sin_addr.s_addr = alias_addr.s_addr;
511	else
512	saddr.sin_addr.s_addr = addr->sin_addr.s_addr;
513	/* we shouldn't override initial socket */
514	#ifdef VBOX_WITH_NAT_UDP_SOCKET_CLONE
515	if (so->so_cCloneCounter)
516	pSocketClone = soLookUpClonedUDPSocket(pData, so, addr->sin_addr.s_addr);
517	if (!pSocketClone)
518	pSocketClone = soCloneUDPSocketWithForegnAddr(pData, false, so, addr->sin_addr.s_addr);
519	Assert((pSocketClone));
520	so = pSocketClone;
521	#else
522	so->so_faddr.s_addr = addr->sin_addr.s_addr;
523	#endif
524	}
525	}
526
527	/* Any UDP packet to the loopback address must be translated to be from
528	* the forwarding address, i.e. 10.0.2.2. */
529	if ( (saddr.sin_addr.s_addr & RT_H2N_U32_C(IN_CLASSA_NET))
530	== RT_H2N_U32_C(INADDR_LOOPBACK & IN_CLASSA_NET))
531	saddr.sin_addr.s_addr = alias_addr.s_addr;
532
533	daddr.sin_addr = so->so_laddr;
534	daddr.sin_port = so->so_lport;
535
536	return udp_output2(pData, so, m, &saddr, &daddr, so->so_iptos);
537	}
538
539	int
540	udp_attach(PNATState pData, struct socket *so)
541	{
542	struct sockaddr_in *addr;
543	struct sockaddr sa_addr;
544	socklen_t socklen = sizeof(struct sockaddr);
545	int status;
546	int opt = 1;
547
548	/* We attaching some olready attched socket ??? */
549	Assert(so->so_type == 0);
550	if ((so->s = socket(AF_INET, SOCK_DGRAM, 0)) == -1)
551	goto error;
552	so->so_sottl = 0;
553	so->so_sotos = 0;
554	so->so_sodf = -1;
555	/*
556	* Here, we bind() the socket. Although not really needed
557	* (sendto() on an unbound socket will bind it), it's done
558	* here so that emulation of ytalk etc. don't have to do it
559	*/
560	memset(&sa_addr, 0, sizeof(struct sockaddr));
561	addr = (struct sockaddr_in *)&sa_addr;
562	#ifdef RT_OS_DARWIN
563	addr->sin_len = sizeof(struct sockaddr_in);
564	#endif
565	addr->sin_family = AF_INET;
566	addr->sin_addr.s_addr = pData->bindIP.s_addr;
567	fd_nonblock(so->s);
568	if (bind(so->s, &sa_addr, sizeof(struct sockaddr_in)) < 0)
569	{
570	int lasterrno = errno;
571	closesocket(so->s);
572	so->s = -1;
573	#ifdef RT_OS_WINDOWS
574	WSASetLastError(lasterrno);
575	#else
576	errno = lasterrno;
577	#endif
578	goto error;
579	}
580	/* success, insert in queue */
581	so->so_expire = curtime + SO_EXPIRE;
582	/* enable broadcast for later use */
583	setsockopt(so->s, SOL_SOCKET, SO_BROADCAST, (const char *)&opt, sizeof(opt));
584	status = getsockname(so->s, &sa_addr, &socklen);
585	Assert(status == 0 && sa_addr.sa_family == AF_INET);
586	so->so_hlport = ((struct sockaddr_in *)&sa_addr)->sin_port;
587	so->so_hladdr.s_addr = ((struct sockaddr_in *)&sa_addr)->sin_addr.s_addr;
588
589	SOCKET_LOCK_CREATE(so);
590	QSOCKET_LOCK(udb);
591	insque(pData, so, &udb);
592	NSOCK_INC();
593	QSOCKET_UNLOCK(udb);
594	so->so_type = IPPROTO_UDP;
595	return so->s;
596	error:
597	Log2(("NAT: can't create datagramm socket\n"));
598	return -1;
599	}
600
601	void
602	udp_detach(PNATState pData, struct socket *so)
603	{
604	if (so != &pData->icmp_socket)
605	{
606	Assert(so->so_type == IPPROTO_UDP);
607	QSOCKET_LOCK(udb);
608	SOCKET_LOCK(so);
609	QSOCKET_UNLOCK(udb);
610	#ifdef VBOX_WITH_NAT_UDP_SOCKET_CLONE
611	if (so->so_cloneOf)
612	so->so_cloneOf->so_cCloneCounter--;
613	else if (so->so_cCloneCounter > 0)
614	{
615	/* we can't close socket yet */
616	SOCKET_UNLOCK(so);
617	return;
618	}
619	#endif
620	closesocket(so->s);
621	sofree(pData, so);
622	SOCKET_UNLOCK(so);
623	}
624	}
625
626	struct socket *
627	udp_listen(PNATState pData, u_int32_t bind_addr, u_int port, u_int32_t laddr, u_int lport, int flags)
628	{
629	struct sockaddr_in addr;
630	struct socket *so;
631	socklen_t addrlen = sizeof(struct sockaddr_in);
632	int opt = 1;
633	LogFlowFunc(("ENTER: bind_addr:%RTnaipv4, port:%d, laddr:%RTnaipv4, lport:%d, flags:%x\n",
634	bind_addr, RT_N2H_U16(port), laddr, RT_N2H_U16(lport), flags));
635
636	if ((so = socreate()) == NULL)
637	{
638	LogFlowFunc(("LEAVE: NULL\n"));
639	return NULL;
640	}
641
642	so->s = socket(AF_INET, SOCK_DGRAM, 0);
643	if (so->s == -1)
644	{
645	LogRel(("NAT: can't create datagram socket\n"));
646	RTMemFree(so);
647	LogFlowFunc(("LEAVE: NULL\n"));
648	return NULL;
649	}
650	so->so_expire = curtime + SO_EXPIRE;
651	so->so_type = IPPROTO_UDP;
652	fd_nonblock(so->s);
653	so->so_sottl = 0;
654	so->so_sotos = 0;
655	so->so_sodf = -1;
656	SOCKET_LOCK_CREATE(so);
657	QSOCKET_LOCK(udb);
658	insque(pData, so, &udb);
659	NSOCK_INC();
660	QSOCKET_UNLOCK(udb);
661
662	memset(&addr, 0, sizeof(addr));
663	#ifdef RT_OS_DARWIN
664	addr.sin_len = sizeof(addr);
665	#endif
666	addr.sin_family = AF_INET;
667	addr.sin_addr.s_addr = bind_addr;
668	addr.sin_port = port;
669
670	if (bind(so->s,(struct sockaddr *)&addr, addrlen) < 0)
671	{
672	LogRel(("NAT: udp bind to %RTnaipv4:%d failed, error %d\n",
673	addr.sin_addr, RT_N2H_U16(port), errno));
674	udp_detach(pData, so);
675	LogFlowFunc(("LEAVE: NULL\n"));
676	return NULL;
677	}
678	setsockopt(so->s, SOL_SOCKET, SO_REUSEADDR,(char *)&opt, sizeof(int));
679	/* setsockopt(so->s, SOL_SOCKET, SO_OOBINLINE,(char )&opt, sizeof(int)); /
680
681	getsockname(so->s,(struct sockaddr *)&addr,&addrlen);
682	so->so_hladdr = addr.sin_addr;
683	so->so_hlport = addr.sin_port;
684
685	/* XXX: wtf are we setting so_faddr/so_fport here? */
686	so->so_fport = addr.sin_port;
687	/* The original check was completely broken, as the commented out
688	* if statement was always true (INADDR_ANY=0). */
689	/* if (addr.sin_addr.s_addr == 0 \|\| addr.sin_addr.s_addr == loopback_addr.s_addr) */
690	/* @todo: vvl - alias_addr should be set (if required)
691	* later by liabalias module.
692	*/
693	if (1 == 0) /* always use the else part */
694	so->so_faddr = alias_addr;
695	else
696	so->so_faddr = addr.sin_addr;
697
698	so->so_lport = lport;
699	so->so_laddr.s_addr = laddr;
700	if (flags != SS_FACCEPTONCE)
701	so->so_expire = 0;
702
703	so->so_state = SS_ISFCONNECTED;
704
705	LogFlowFunc(("LEAVE: %R[natsock]\n", so));
706	return so;
707	}

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/Devices/Network/slirp/udp.c@ 61198

Download in other formats: