udp.c@ 59143

Last change on this file since 59143 was 59143, checked in by vboxsync, 9 years ago

NAT: Start rewriting host resolver to clean up the code to be able to
add reverse lookups eventually. Name compression (label pointers) are
supported in replies. Code for user-defined mapping is left as is for
now.

Oops, this file was accidentally lost from r104722.

Property svn:eol-style set to native
Property svn:keywords set to Author Date Id Revision

File size: 20.6 KB

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

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

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

Download in other formats: