[ViewVC] Diff of: cvs/gvpe/src/vpn

Comparing gvpe/src/vpn_dns.C (file contents):
Revision 1.28 by pcg, Sun Mar 13 12:33:34 2005 UTC vs.
Revision 1.52 by root, Sun Mar 6 21:01:37 2011 UTC

…		…
1	/*	1	/*
2	vpn_dns.C -- handle the dns tunnel part of the protocol.	2	vpn_dns.C -- handle the dns tunnel part of the protocol.
3	Copyright (C) 2003-2005 Marc Lehmann <gvpe@schmorp.de>	3	Copyright (C) 2003-2011 Marc Lehmann <gvpe@schmorp.de>
4		4
5	This file is part of GVPE.	5	This file is part of GVPE.
6		6
7	GVPE is free software; you can redistribute it and/or modify	7	GVPE is free software; you can redistribute it and/or modify it
8	it under the terms of the GNU General Public License as published by	8	under the terms of the GNU General Public License as published by the
9	the Free Software Foundation; either version 2 of the License, or	9	Free Software Foundation; either version 3 of the License, or (at your
10	(at your option) any later version.	10	option) any later version.
11		11
12	This program is distributed in the hope that it will be useful,	12	This program is distributed in the hope that it will be useful, but
13	but WITHOUT ANY WARRANTY; without even the implied warranty of	13	WITHOUT ANY WARRANTY; without even the implied warranty of
14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
15	GNU General Public License for more details.	15	Public License for more details.
16		16
17	You should have received a copy of the GNU General Public License	17	You should have received a copy of the GNU General Public License along
18	along with gvpe; if not, write to the Free Software	18	with this program; if not, see <http://www.gnu.org/licenses/>.
19	Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA	19
		20	Additional permission under GNU GPL version 3 section 7
		21
		22	If you modify this Program, or any covered work, by linking or
		23	combining it with the OpenSSL project's OpenSSL library (or a modified
		24	version of that library), containing parts covered by the terms of the
		25	OpenSSL or SSLeay licenses, the licensors of this Program grant you
		26	additional permission to convey the resulting work. Corresponding
		27	Source for a non-source form of such a combination shall include the
		28	source code for the parts of OpenSSL used as well as that of the
		29	covered work.
20	*/	30	*/
		31
		32	// TODO: EDNS0 option to increase dns mtu?
		33	// TODO: re-write dns packet parsing/creation using a safe mem-buffer
		34	// to ensure no buffer overflows or similar problems.
21		35
22	#include "config.h"	36	#include "config.h"
23		37
24	#if ENABLE_DNS	38	#if ENABLE_DNS
25		39
38	#include <unistd.h>	52	#include <unistd.h>
39	#include <fcntl.h>	53	#include <fcntl.h>
40		54
41	#include <map>	55	#include <map>
42		56
		57	#include <cstdio> /* bug in libgmp: gmp.h relies on cstdio being included */
43	#include <gmp.h>	58	#include <gmp.h>
44		59
45	#include "netcompat.h"	60	#include "netcompat.h"
46		61
47	#include "vpn.h"	62	#include "vpn.h"
48		63
49	#define MIN_POLL_INTERVAL .02 // how often to poll minimally when the server has data	64	#define MIN_POLL_INTERVAL 0.025 // poll at most this often when no data received
50	#define MAX_POLL_INTERVAL 6. // how often to poll minimally when the server has no data	65	#define MAX_POLL_INTERVAL 1. // how often to poll minimally when the server has no data
51	#define ACTIVITY_INTERVAL 5.
52		66
53	#define INITIAL_TIMEOUT 0.1 // retry timeouts	67	#define INITIAL_TIMEOUT 0.1 // retry timeouts
54	#define INITIAL_SYN_TIMEOUT 10. // retry timeout for initial syn	68	#define INITIAL_SYN_TIMEOUT 2. // retry timeout for initial syn
55		69
56	#define MIN_SEND_INTERVAL 0.01 // wait at least this time between sending requests
57	#define MAX_SEND_INTERVAL 2. // optimistic?	70	#define MAX_SEND_INTERVAL 5. // optimistic?
58		71
59	#define LATENCY_FACTOR 0.5 // RTT * LATENCY_FACTOR == sending rate
60	#define MAX_OUTSTANDING 100 // max. outstanding requests
61	#define MAX_WINDOW 1000 // max. for MAX_OUTSTANDING, and backlog	72	#define MAX_WINDOW 1000 // max. for MAX_OUTSTANDING, and backlog
62	#define MAX_BACKLOG (100*1024) // size of gvpe protocol backlog (bytes), must be > MAXSIZE	73	#define MAX_BACKLOG (64*1024) // size of gvpe protocol backlog (bytes), must be > MAXSIZE
63		74
64	#define MAX_DOMAIN_SIZE 240 // 255 is legal limit, but bind doesn't compress well	75	#define MAX_DOMAIN_SIZE 240 // 255 is legal limit, but bind doesn't compress well
65	// 240 leaves about 4 bytes of server reply data	76	// 240 leaves about 4 bytes of server reply data
66	// every two request bytes less give room for one reply byte	77	// every request byte less give room for two reply bytes
67		78
68	#define SEQNO_MASK 0x3fff	79	#define SEQNO_MASK 0x3fff
69	#define SEQNO_EQ(a,b) ( 0 == ( ((a) ^ (b)) & SEQNO_MASK) )	80	#define SEQNO_EQ(a,b) ( 0 == ( ((a) ^ (b)) & SEQNO_MASK) )
70		81
71	#define MAX_LBL_SIZE 63	82	#define MAX_LBL_SIZE 63
72	#define MAX_PKT_SIZE 512	83	#define MAX_PKT_SIZE 512
73		84
74	#define RR_TYPE_A 1	85	#define RR_TYPE_A 1
75	#define RR_TYPE_NULL 10	86	#define RR_TYPE_NULL 10
76	#define RR_TYPE_TXT 16	87	#define RR_TYPE_TXT 16
		88	#define RR_TYPE_AAAA 28
77	#define RR_TYPE_ANY 255	89	#define RR_TYPE_ANY 255
78		90
79	#define RR_CLASS_IN 1	91	#define RR_CLASS_IN 1
80		92
81	#define CMD_IP_1 207	93	#define CMD_IP_1 207
82	#define CMD_IP_2 46	94	#define CMD_IP_2 46
83	#define CMD_IP_3 236	95	#define CMD_IP_3 236
84	#define CMD_IP_RST 29	96
85	#define CMD_IP_SYN 113	97	#define CMD_IP_RST 29 // some error, reset and retry
86	#define CMD_IP_REJ 32	98	#define CMD_IP_REJ 32 // do not want you
		99	#define CMD_IP_SYN 113 // connection established
		100	#define CMD_IP_CSE 213 // connection established, but likely case mismatch
		101
		102	static bool
		103	is_uc (char c)
		104	{
		105	return 'A' <= c && c <= 'Z';
		106	}
		107
		108	static bool
		109	is_lc (char c)
		110	{
		111	return 'a' <= c && c <= 'z';
		112	}
87		113
88	// works for cmaps up to 255 (not 256!)	114	// works for cmaps up to 255 (not 256!)
89	struct charmap	115	struct charmap
90	{	116	{
91	enum { INVALID = (u8)255 };	117	enum { INVALID = (u8)255 };
…		…
105	memset (enc, (char) 0, 256);	131	memset (enc, (char) 0, 256);
106	memset (dec, (char)INVALID, 256);	132	memset (dec, (char)INVALID, 256);
107		133
108	for (size = 0; cmap [size]; size++)	134	for (size = 0; cmap [size]; size++)
109	{	135	{
		136	char c = cmap [size];
		137
110	enc [size] = cmap [size];	138	enc [size] = c;
111	dec [(u8)enc [size]] = size;	139	dec [(u8)c] = size;
		140
		141	// allow lowercase/uppercase aliases if possible
		142	if (is_uc (c) && dec [c + ('a' - 'A')] == INVALID) dec [c + ('a' - 'A')] = size;
		143	if (is_lc (c) && dec [c - ('a' - 'A')] == INVALID) dec [c - ('a' - 'A')] = size;
112	}	144	}
113		145
114	assert (size < 256);	146	assert (size < 256);
115	}	147	}
116		148
…		…
123	{	155	{
124	charmap cmap;	156	charmap cmap;
125	unsigned int enc_len [MAX_DEC_LEN];	157	unsigned int enc_len [MAX_DEC_LEN];
126	unsigned int dec_len [MAX_ENC_LEN];	158	unsigned int dec_len [MAX_ENC_LEN];
127		159
128	unsigned int encode_len (unsigned int len);	160	unsigned int encode_len (unsigned int len) const;
129	unsigned int decode_len (unsigned int len);	161	unsigned int decode_len (unsigned int len) const;
130		162
131	unsigned int encode (char dst, u8 src, unsigned int len);	163	unsigned int encode (char dst, u8 src, unsigned int len) const;
132	unsigned int decode (u8 dst, char src, unsigned int len);	164	unsigned int decode (u8 dst, char src, unsigned int len) const;
133		165
134	basecoder (const char *cmap);	166	basecoder (const char *cmap);
135	};	167	};
136		168
137	basecoder::basecoder (const char *cmap)	169	basecoder::basecoder (const char *cmap)
…		…
156	enc_len [len] = n;	188	enc_len [len] = n;
157	dec_len [n] = len;	189	dec_len [n] = len;
158	}	190	}
159	}	191	}
160		192
		193	unsigned int
161	unsigned int basecoder::encode_len (unsigned int len)	194	basecoder::encode_len (unsigned int len) const
162	{	195	{
163	return enc_len [len];	196	return enc_len [len];
164	}	197	}
165		198
		199	unsigned int
166	unsigned int basecoder::decode_len (unsigned int len)	200	basecoder::decode_len (unsigned int len) const
167	{	201	{
168	while (len && !dec_len [len])	202	while (len && !dec_len [len])
169	--len;	203	--len;
170		204
171	return dec_len [len];	205	return dec_len [len];
172	}	206	}
173		207
		208	unsigned int
174	unsigned int basecoder::encode (char dst, u8 src, unsigned int len)	209	basecoder::encode (char dst, u8 src, unsigned int len) const
175	{	210	{
176	if (!len \|\| len > MAX_DEC_LEN)	211	if (!len \|\| len > MAX_DEC_LEN)
177	return 0;	212	return 0;
178		213
179	int elen = encode_len (len);	214	int elen = encode_len (len);
…		…
198	*dst++ = cmap.encode [dst_ [i]];	233	*dst++ = cmap.encode [dst_ [i]];
199		234
200	return elen;	235	return elen;
201	}	236	}
202		237
		238	unsigned int
203	unsigned int basecoder::decode (u8 dst, char src, unsigned int len)	239	basecoder::decode (u8 dst, char src, unsigned int len) const
204	{	240	{
205	if (!len \|\| len > MAX_ENC_LEN)	241	if (!len \|\| len > MAX_ENC_LEN)
206	return 0;	242	return 0;
207		243
208	u8 src_ [MAX_ENC_LEN];	244	u8 src_ [MAX_ENC_LEN];
…		…
257	}	293	}
258	abort ();	294	abort ();
259	}	295	}
260	#endif	296	#endif
261		297
262	//static basecoder cdc64 ("_dDpPhHzZrR06QqMmjJkKBb34TtSsvVlL81xXaAeEFf92WwGgYyoO57UucCNniI-");
263	//static basecoder cdc63 ("_dDpPhHzZrR06QqMmjJkKBb34TtSsvVlL81xXaAeEFf92WwGgYyoO57UucCNniI");
264	static basecoder cdc62 ("dDpPhHzZrR06QqMmjJkKBb34TtSsvVlL81xXaAeEFf92WwGgYyoO57UucCNniI");	298	static basecoder cdc62 ("dDpPhHzZrR06QqMmjJkKBb34TtSsvVlL81xXaAeEFf92WwGgYyoO57UucCNniI"); // a-zA-Z0-9
265	//static basecoder cdc36 ("dphzr06qmjkb34tsvl81xaef92wgyo57ucni"); // unused as of yet	299	static basecoder cdc36 ("dPhZr06QmJkB34tSvL81xAeF92wGyO57uCnI"); // a-z0-9 for case-changers
266	static basecoder cdc26 ("dPhZrQmJkBtSvLxAeFwGyO");	300	static basecoder cdc26 ("dPhZrQmJkBtSvLxAeFwGyOuCnI"); // a-z
267		301
268	/////////////////////////////////////////////////////////////////////////////	302	/////////////////////////////////////////////////////////////////////////////
269		303
270	#define HDRSIZE 6	304	#define HDRSIZE 5
271		305
		306	inline void
272	inline void encode_header (char *data, int clientid, int seqno, int retry = 0)	307	encode_header (char *data, int clientid, int seqno, int retry = 0)
273	{	308	{
		309	assert (clientid < 256);
		310
274	seqno &= SEQNO_MASK;	311	seqno &= SEQNO_MASK;
275		312
276	u8 hdr[3] = {	313	u8 hdr[3] = {
		314	seqno,
		315	(seqno >> 8) \| (retry << 6),
277	clientid,	316	clientid,
278	(seqno >> 8) \| (retry << 6),
279	seqno,
280	};	317	};
281		318
282	assert (clientid < 256);
283
284	cdc26.encode (data, hdr, 3);	319	cdc36.encode (data, hdr, 3);
285	}	320	}
286		321
		322	inline void
287	inline void decode_header (char *data, int &clientid, int &seqno)	323	decode_header (char *data, int &clientid, int &seqno)
288	{	324	{
289	u8 hdr[3];	325	u8 hdr[3];
290		326
291	cdc26.decode (hdr, data, HDRSIZE);	327	cdc36.decode (hdr, data, HDRSIZE);
292		328
293	clientid = hdr[0];	329	clientid = hdr[2];
294	seqno = ((hdr[1] << 8) \| hdr[2]) & SEQNO_MASK;	330	seqno = ((hdr[1] << 8) \| hdr[0]) & SEQNO_MASK;
295	}	331	}
296		332
297	/////////////////////////////////////////////////////////////////////////////	333	/////////////////////////////////////////////////////////////////////////////
298		334
299	struct byte_stream	335	struct byte_stream
…		…
325	byte_stream::~byte_stream ()	361	byte_stream::~byte_stream ()
326	{	362	{
327	delete data;	363	delete data;
328	}	364	}
329		365
		366	void
330	void byte_stream::remove (int count)	367	byte_stream::remove (int count)
331	{	368	{
332	if (count > fill)	369	if (count > fill)
333	assert (count <= fill);	370	assert (count <= fill);
334		371
335	memmove (data, data + count, fill -= count);	372	memmove (data, data + count, fill -= count);
336	}	373	}
337		374
		375	bool
338	bool byte_stream::put (u8 *data, unsigned int datalen)	376	byte_stream::put (u8 *data, unsigned int datalen)
339	{	377	{
340	if (maxsize - fill < datalen)	378	if (maxsize - fill < datalen)
341	return false;	379	return false;
342		380
343	memcpy (this->data + fill, data, datalen); fill += datalen;	381	memcpy (this->data + fill, data, datalen); fill += datalen;
344		382
345	return true;	383	return true;
346	}	384	}
347		385
		386	bool
348	bool byte_stream::put (vpn_packet *pkt)	387	byte_stream::put (vpn_packet *pkt)
349	{	388	{
350	if (maxsize - fill < pkt->len + 2)	389	if (maxsize - fill < pkt->len + 2)
351	return false;	390	return false;
352		391
353	data [fill++] = pkt->len >> 8;	392	data [fill++] = pkt->len >> 8;
…		…
409		448
410	struct dns_cfg	449	struct dns_cfg
411	{	450	{
412	static int next_uid;	451	static int next_uid;
413		452
414	u8 id1, id2, id3, id4;	453	u8 chksum;
		454	u8 rrtype;
		455	u16 uid; // to make request unique
415		456
416	u8 version;	457	u8 version;
417	u8 flags;	458	u8 flags;
418	u8 rrtype;	459	u16 max_size;
		460
		461	u8 id1, id2, id3, id4;
		462
		463	u16 client;
419	u8 def_ttl;	464	u8 def_ttl;
		465	u8 r0;
420		466
421	u16 client;	467	u8 syn_cdc; // cdc en/decoder for syn (A?) requests
422	u16 uid; // to make request unique	468	u8 hdr_cdc; // cdc en/decoder for regular request headers
		469	u8 req_cdc; // cdc en/decoder for regular (ANY?) request data
		470	u8 rep_cdc; // cdc en/decoder for regular (TXT) replies, 0 == 8 bit encoding
423		471
424	u16 max_size;
425	u8 seq_cdc;
426	u8 req_cdc;
427
428	u8 rep_cdc;
429	u8 r2, r3, r4;	472	u8 r1, r2, r3, r4;
430
431	u8 r5, r6, r7, r8;
432		473
433	void reset (int clientid);	474	void reset (int clientid);
434	bool valid ();	475	bool valid ();
		476	u8 get_chksum ();
435	};	477	};
436		478
437	int dns_cfg::next_uid;	479	int dns_cfg::next_uid;
438		480
		481	void
439	void dns_cfg::reset (int clientid)	482	dns_cfg::reset (int clientid)
440	{	483	{
		484	// this ID must result in some mixed-case characters in cdc26-encoding
441	id1 = 'G';	485	id1 = 'G';
442	id2 = 'V';	486	id2 = 'V';
443	id3 = 'P';	487	id3 = 'P';
444	id4 = 'E';	488	id4 = 'E';
445		489
446	version = 1;	490	version = 2;
447		491
448	rrtype = RR_TYPE_TXT;	492	rrtype = RR_TYPE_TXT;
449	flags = 0;	493	flags = 0;
450	def_ttl = 0;	494	def_ttl = 0;
451	seq_cdc = 26;	495	syn_cdc = 26;
452	req_cdc = 62;	496	hdr_cdc = 36;
		497	req_cdc = conf.dns_case_preserving ? 62 : 36;
453	rep_cdc = 0;	498	rep_cdc = 0;
454	max_size = htons (MAX_PKT_SIZE);	499	max_size = htons (MAX_PKT_SIZE);
455	client = htons (clientid);	500	client = htons (clientid);
456	uid = next_uid++;	501	uid = ++next_uid;
457		502
458	r2 = r3 = r4 = 0;	503	r0 = r1 = r2 = r3 = r4 = 0;
459	r4 = r5 = r6 = r7 = 0;
460	}
461		504
		505	chksum = get_chksum ();
		506	}
		507
		508	// simple but not trivial chksum
		509	u8
		510	dns_cfg::get_chksum ()
		511	{
		512	unsigned int sum = 0xff00; // only 16 bits required
		513
		514	u8 old_chksum = chksum;
		515	chksum = 0;
		516
		517	for (unsigned int i = 0; i < sizeof (*this); ++i)
		518	sum += ((u8 )this)[i] (i + 1);
		519
		520	chksum = old_chksum;
		521
		522	return sum + (sum >> 8);
		523	}
		524
		525	bool
462	bool dns_cfg::valid ()	526	dns_cfg::valid ()
463	{	527	{
		528	// although the protocol itself allows for some configurability,
		529	// only the following encoding/decoding settings are implemented.
464	return id1 == 'G'	530	return id1 == 'G'
465	&& id2 == 'V'	531	&& id2 == 'V'
466	&& id3 == 'P'	532	&& id3 == 'P'
467	&& id4 == 'E'	533	&& id4 == 'E'
		534	&& version == 2
468	&& seq_cdc == 26	535	&& syn_cdc == 26
469	&& req_cdc == 62	536	&& hdr_cdc == 36
		537	&& (req_cdc == 36 \|\| req_cdc == 62)
470	&& rep_cdc == 0	538	&& rep_cdc == 0
471	&& version == 1;	539	&& chksum == get_chksum ();
472	}	540	}
473		541
474	struct dns_packet : net_packet	542	struct dns_packet : net_packet
475	{	543	{
476	u16 id;	544	u16 id;
…		…
480	u8 data [MAXSIZE - 6 * 2];	548	u8 data [MAXSIZE - 6 * 2];
481		549
482	int decode_label (char *data, int size, int &offs);	550	int decode_label (char *data, int size, int &offs);
483	};	551	};
484		552
		553	int
485	int dns_packet::decode_label (char *data, int size, int &offs)	554	dns_packet::decode_label (char *data, int size, int &offs)
486	{	555	{
487	char *orig = data;	556	char *orig = data;
488		557
489	memset (data, 0, size);	558	memset (data, 0, size);
490		559
…		…
516	return data - orig;	585	return data - orig;
517	}	586	}
518		587
519	/////////////////////////////////////////////////////////////////////////////	588	/////////////////////////////////////////////////////////////////////////////
520		589
		590	static
		591	u16 next_id ()
		592	{
521	static u16 dns_id = 0; // TODO: should be per-vpn	593	static u16 dns_id = 0; // TODO: should be per-vpn
522		594
523	static u16 next_id ()
524	{
525	if (!dns_id)	595	if (!dns_id)
526	dns_id = time (0);	596	dns_id = time (0);
527		597
528	// the simplest lsfr with periodicity 65535 i could find	598	// the simplest lsfr with periodicity 65535 i could find
529	dns_id = (dns_id << 1)	599	dns_id = (dns_id << 1)
…		…
544	struct vpn *vpn;	614	struct vpn *vpn;
545		615
546	dns_cfg cfg;	616	dns_cfg cfg;
547		617
548	bool established;	618	bool established;
		619	const basecoder *cdc;
549		620
550	tstamp last_received;	621	tstamp last_received;
551	tstamp last_sent;	622	tstamp last_sent;
552	double min_latency;	623	double min_latency;
553	double poll_interval, send_interval;	624	double poll_interval, send_interval;
554		625
555	vector<dns_rcv *> rcvpq;	626	vector<dns_rcv *> rcvpq;
556		627
557	byte_stream rcvdq; int rcvseq;	628	byte_stream rcvdq; int rcvseq; int repseq;
558	byte_stream snddq; int sndseq;	629	byte_stream snddq; int sndseq;
559		630
560	void time_cb (time_watcher &w); time_watcher tw;	631	inline void time_cb (ev::timer &w, int revents); ev::timer tw;
561	void receive_rep (dns_rcv *r);	632	void receive_rep (dns_rcv *r);
		633
		634	void reset (); // quite like tcp RST
		635	void set_cfg (); // to be called after any cfg changes
562		636
563	dns_connection (connection *c);	637	dns_connection (connection *c);
564	~dns_connection ();	638	~dns_connection ();
565	};	639	};
566		640
…		…
584	: dns (dns)	658	: dns (dns)
585	{	659	{
586	timeout = 0;	660	timeout = 0;
587	retry = 0;	661	retry = 0;
588	seqno = 0;	662	seqno = 0;
589	sent = NOW;	663	sent = ev_now ();
590	stdhdr = false;	664	stdhdr = false;
591		665
592	pkt = new dns_packet;	666	pkt = new dns_packet;
593		667
594	pkt->id = next_id ();	668	pkt->id = next_id ();
…		…
597	dns_snd::~dns_snd ()	671	dns_snd::~dns_snd ()
598	{	672	{
599	delete pkt;	673	delete pkt;
600	}	674	}
601		675
		676	static void
602	static void append_domain (dns_packet &pkt, int &offs, const char *domain)	677	append_domain (dns_packet &pkt, int &offs, const char *domain)
603	{	678	{
604	// add tunnel domain	679	// add tunnel domain
605	for (;;)	680	for (;;)
606	{	681	{
607	const char *end = strchr (domain, '.');	682	const char *end = strchr (domain, '.');
…		…
620		695
621	domain = end + 1;	696	domain = end + 1;
622	}	697	}
623	}	698	}
624		699
		700	void
625	void dns_snd::gen_stream_req (int seqno, byte_stream &stream)	701	dns_snd::gen_stream_req (int seqno, byte_stream &stream)
626	{	702	{
627	stdhdr = true;	703	stdhdr = true;
628	this->seqno = seqno;	704	this->seqno = seqno;
629		705
630	timeout = NOW + INITIAL_TIMEOUT;	706	timeout = ev_now () + INITIAL_TIMEOUT;
631		707
632	pkt->flags = htons (DEFAULT_CLIENT_FLAGS);	708	pkt->flags = htons (DEFAULT_CLIENT_FLAGS);
633	pkt->qdcount = htons (1);	709	pkt->qdcount = htons (1);
634		710
635	int offs = 6*2;	711	int offs = 6*2;
…		…
638	// so we need to have space for 2*MAX_DOMAIN_SIZE + header + extra	714	// so we need to have space for 2*MAX_DOMAIN_SIZE + header + extra
639		715
640	char enc[256], *encp = enc;	716	char enc[256], *encp = enc;
641	encode_header (enc, THISNODE->id, seqno);	717	encode_header (enc, THISNODE->id, seqno);
642		718
643	int datalen = cdc62.decode_len (dlen - (dlen + MAX_LBL_SIZE - 1) / MAX_LBL_SIZE - HDRSIZE);	719	int datalen = dns->cdc->decode_len (dlen - (dlen + MAX_LBL_SIZE - 1) / MAX_LBL_SIZE - HDRSIZE);
644		720
645	if (datalen > stream.size ())	721	if (datalen > stream.size ())
646	datalen = stream.size ();	722	datalen = stream.size ();
647		723
648	int enclen = cdc62.encode (enc + HDRSIZE, stream.begin (), datalen) + HDRSIZE;	724	int enclen = dns->cdc->encode (enc + HDRSIZE, stream.begin (), datalen) + HDRSIZE;
649	stream.remove (datalen);	725	stream.remove (datalen);
650		726
651	while (enclen)	727	while (enclen)
652	{	728	{
653	int lbllen = enclen < MAX_LBL_SIZE ? enclen : MAX_LBL_SIZE;	729	int lbllen = enclen < MAX_LBL_SIZE ? enclen : MAX_LBL_SIZE;
…		…
668	(pkt)[offs++] = RR_CLASS_IN >> 8; (pkt)[offs++] = RR_CLASS_IN;	744	(pkt)[offs++] = RR_CLASS_IN >> 8; (pkt)[offs++] = RR_CLASS_IN;
669		745
670	pkt->len = offs;	746	pkt->len = offs;
671	}	747	}
672		748
		749	void
673	void dns_snd::gen_syn_req ()	750	dns_snd::gen_syn_req ()
674	{	751	{
675	timeout = NOW + INITIAL_SYN_TIMEOUT;	752	timeout = ev_now () + INITIAL_SYN_TIMEOUT;
676		753
677	pkt->flags = htons (DEFAULT_CLIENT_FLAGS);	754	pkt->flags = htons (DEFAULT_CLIENT_FLAGS);
678	pkt->qdcount = htons (1);	755	pkt->qdcount = htons (1);
679		756
680	int offs = 6 * 2;	757	int offs = 6 * 2;
…		…
719	/////////////////////////////////////////////////////////////////////////////	796	/////////////////////////////////////////////////////////////////////////////
720		797
721	dns_connection::dns_connection (connection *c)	798	dns_connection::dns_connection (connection *c)
722	: c (c)	799	: c (c)
723	, rcvdq (MAX_BACKLOG * 2)	800	, rcvdq (MAX_BACKLOG * 2)
724	, snddq (MAX_BACKLOG * 2)	801	, snddq (MAX_BACKLOG)
725	, tw (this, &dns_connection::time_cb)
726	{	802	{
		803	tw.set<dns_connection, &dns_connection::time_cb> (this);
		804
727	vpn = c->vpn;	805	vpn = c->vpn;
728		806
		807	reset ();
		808	}
		809
		810	dns_connection::~dns_connection ()
		811	{
		812	reset ();
		813	}
		814
		815	void
		816	dns_connection::reset ()
		817	{
		818	while (!rcvpq.empty ())
		819	{
		820	delete rcvpq.back ();
		821	rcvpq.pop_back ();
		822	}
		823
		824	for (int i = vpn->dns_sndpq.size (); i--; )
		825	if (vpn->dns_sndpq [i]->dns == this)
		826	{
		827	vpn->dns_sndpq [i] = vpn->dns_sndpq.back ();
		828	vpn->dns_sndpq.pop_back ();
		829	}
		830
729	established = false;	831	established = false;
730		832
731	rcvseq = sndseq = 0;	833	rcvseq = repseq = sndseq = 0;
732		834
733	last_sent = last_received = 0;	835	last_sent = 0;
734	poll_interval = MIN_POLL_INTERVAL;	836	poll_interval = 0.5; // starting here
735	send_interval = 0.5; // starting rate	837	send_interval = 0.5; // starting rate
736	min_latency = INITIAL_TIMEOUT;	838	min_latency = INITIAL_TIMEOUT;
737	}	839	}
738		840
739	dns_connection::~dns_connection ()	841	void
		842	dns_connection::set_cfg ()
740	{	843	{
741	for (vector<dns_rcv *>::iterator i = rcvpq.begin ();	844	cdc = cfg.req_cdc == 36 ? &cdc36 : &cdc62;
742	i != rcvpq.end ();
743	++i)
744	delete *i;
745	}	845	}
746		846
		847	void
747	void dns_connection::receive_rep (dns_rcv *r)	848	dns_connection::receive_rep (dns_rcv *r)
748	{	849	{
749	if (r->datalen)	850	if (r->datalen)
750	{	851	poll_interval = max (poll_interval * (1. / 1.2), MIN_POLL_INTERVAL);
751	last_received = NOW;
752	tw.trigger ();
753
754	poll_interval = send_interval;
755	}
756	else	852	else
757	{	853	poll_interval = min (poll_interval * 1.1, MAX_POLL_INTERVAL);
758	poll_interval *= 1.5;
759
760	if (poll_interval > MAX_POLL_INTERVAL)
761	poll_interval = MAX_POLL_INTERVAL;
762	}
763		854
764	rcvpq.push_back (r);	855	rcvpq.push_back (r);
765		856
766	redo:	857	redo:
767		858
768	// find next packet	859	// find next packet
769	for (vector<dns_rcv *>::iterator i = rcvpq.end (); i-- != rcvpq.begin (); )	860	for (vector<dns_rcv *>::iterator i = rcvpq.end (); i-- != rcvpq.begin (); )
770	if (SEQNO_EQ (rcvseq, (*i)->seqno))	861	if (SEQNO_EQ (rcvseq, (*i)->seqno))
771	{	862	{
		863	//printf ("seqno eq %x %x\n", rcvseq, (*i)->seqno);//D
772	// enter the packet into our input stream	864	// enter the packet into our input stream
773	r = *i;	865	r = *i;
774		866
775	// remove the oldest packet, look forward, as it's oldest first	867	// remove the oldest packet, look forward, as it's oldest first
776	for (vector<dns_rcv *>::iterator j = rcvpq.begin (); j != rcvpq.end (); ++j)	868	for (vector<dns_rcv *>::iterator j = rcvpq.begin (); j != rcvpq.end (); ++j)
777	if (SEQNO_EQ ((*j)->seqno, rcvseq - MAX_WINDOW))	869	if (SEQNO_EQ ((*j)->seqno, rcvseq - MAX_WINDOW))
778	{	870	{
		871	//printf ("seqno RR %x %x\n", (*j)->seqno, rcvseq - MAX_WINDOW);//D
779	delete *j;	872	delete *j;
780	rcvpq.erase (j);	873	rcvpq.erase (j);
781	break;	874	break;
782	}	875	}
783		876
784	rcvseq = (rcvseq + 1) & SEQNO_MASK;	877	rcvseq = (rcvseq + 1) & SEQNO_MASK;
785		878
786	if (!rcvdq.put (r->data, r->datalen))	879	if (!rcvdq.put (r->data, r->datalen))
787	{	880	{
		881	// MUST never overflow, can be caused by data corruption, TODO
788	slog (L_ERR, "DNS: !rcvdq.put (r->data, r->datalen)");	882	slog (L_CRIT, "DNS: !rcvdq.put (r->data, r->datalen)");
789	abort (); // MUST never overflow, can be caused by data corruption, TODO	883	reset ();
		884	return;
790	}	885	}
791		886
792	while (vpn_packet *pkt = rcvdq.get ())	887	while (vpn_packet *pkt = rcvdq.get ())
793	{	888	{
794	sockinfo si;	889	sockinfo si;
795	si.host = 0x01010101; si.port = htons (c->conf->id); si.prot = PROT_DNSv4;	890	si.host = htonl (c->conf->id); si.port = 0; si.prot = PROT_DNSv4;
796		891
797	vpn->recv_vpn_packet (pkt, si);	892	vpn->recv_vpn_packet (pkt, si);
798
799	delete pkt;	893	delete pkt;
800	}	894	}
801		895
802	// check for further packets	896	// check for further packets
803	goto redo;	897	goto redo;
…		…
846	{	940	{
847	// correct class, domain: parse	941	// correct class, domain: parse
848	int client, seqno;	942	int client, seqno;
849	decode_header (qname, client, seqno);	943	decode_header (qname, client, seqno);
850		944
851	u8 data[MAXSIZE];
852	int datalen = cdc62.decode (data, qname + HDRSIZE, qlen - (dlen + 1 + HDRSIZE));
853
854	if (0 < client && client <= conns.size ())	945	if (0 < client && client <= conns.size ())
855	{	946	{
856	connection *c = conns [client - 1];	947	connection *c = conns [client - 1];
857	dns_connection *dns = c->dns;	948	dns_connection *dns = c->dns;
858	dns_rcv *rcv;	949	dns_rcv *rcv;
859	bool in_seq;
860		950
861	if (dns)	951	if (dns)
862	{	952	{
		953	u8 data[MAXSIZE];
		954	int datalen = dns->cdc->decode (data, qname + HDRSIZE, qlen - (dlen + 1 + HDRSIZE));
		955
863	for (vector<dns_rcv *>::iterator i = dns->rcvpq.end (); i-- != dns->rcvpq.begin (); )	956	for (vector<dns_rcv *>::iterator i = dns->rcvpq.end (); i-- != dns->rcvpq.begin (); )
864	if (SEQNO_EQ ((*i)->seqno, seqno))	957	if (SEQNO_EQ ((*i)->seqno, seqno))
865	{	958	{
866	// already seen that request: simply reply with the cached reply	959	// already seen that request: simply reply with the cached reply
867	dns_rcv r = i;	960	dns_rcv r = i;
…		…
875	memcpy (pkt.at (0), r->pkt->at (0), offs = r->pkt->len);	968	memcpy (pkt.at (0), r->pkt->at (0), offs = r->pkt->len);
876		969
877	goto duplicate_request;	970	goto duplicate_request;
878	}	971	}
879		972
880	in_seq = dns->rcvseq == seqno;
881
882	// new packet, queue	973	// new packet, queue
883	rcv = new dns_rcv (seqno, data, datalen);	974	rcv = new dns_rcv (seqno, data, datalen);
884	dns->receive_rep (rcv);	975	dns->receive_rep (rcv);
885	}	976	}
886		977
…		…
903	dlen -= qlen;	994	dlen -= qlen;
904		995
905	// only put data into in-order sequence packets, if	996	// only put data into in-order sequence packets, if
906	// we receive out-of-order packets we generate empty	997	// we receive out-of-order packets we generate empty
907	// replies	998	// replies
908	while (dlen > 1 && !dns->snddq.empty () && in_seq)	999	//printf ("%d - %d & %x (=%d) < %d\n", seqno, dns->repseq, SEQNO_MASK, (seqno - dns->repseq) & SEQNO_MASK, MAX_WINDOW);//D
		1000	if (((seqno - dns->repseq) & SEQNO_MASK) <= MAX_WINDOW)
909	{	1001	{
		1002	dns->repseq = seqno;
		1003
		1004	while (dlen > 1 && !dns->snddq.empty ())
		1005	{
910	int txtlen = dlen <= 255 ? dlen - 1 : 255;	1006	int txtlen = dlen <= 255 ? dlen - 1 : 255;
911		1007
912	if (txtlen > dns->snddq.size ())	1008	if (txtlen > dns->snddq.size ())
913	txtlen = dns->snddq.size ();	1009	txtlen = dns->snddq.size ();
914		1010
915	pkt[offs++] = txtlen;	1011	pkt[offs++] = txtlen;
916	memcpy (pkt.at (offs), dns->snddq.begin (), txtlen);	1012	memcpy (pkt.at (offs), dns->snddq.begin (), txtlen);
917	offs += txtlen;	1013	offs += txtlen;
918	dns->snddq.remove (txtlen);	1014	dns->snddq.remove (txtlen);
919		1015
920	dlen -= txtlen + 1;	1016	dlen -= txtlen + 1;
		1017	}
921	}	1018	}
922		1019
923	// avoid empty TXT rdata	1020	// avoid completely empty TXT rdata
924	if (offs == rdlen_offs)	1021	if (offs == rdlen_offs)
925	pkt[offs++] = 0;	1022	pkt[offs++] = 0;
926		1023
927	slog (L_NOISE, "DNS: snddq %d", dns->snddq.size ());	1024	slog (L_NOISE, "DNS: snddq %d", dns->snddq.size ());
928	}	1025	}
…		…
964	pkt [offs++] = RR_CLASS_IN >> 8; pkt [offs++] = RR_CLASS_IN; // class	1061	pkt [offs++] = RR_CLASS_IN >> 8; pkt [offs++] = RR_CLASS_IN; // class
965	pkt [offs++] = 0; pkt [offs++] = 0;	1062	pkt [offs++] = 0; pkt [offs++] = 0;
966	pkt [offs++] = 0; pkt [offs++] = cfg.def_ttl; // TTL	1063	pkt [offs++] = 0; pkt [offs++] = cfg.def_ttl; // TTL
967	pkt [offs++] = 0; pkt [offs++] = 4; // rdlength	1064	pkt [offs++] = 0; pkt [offs++] = 4; // rdlength
968		1065
969	slog (L_INFO, _("DNS: client %d connects"), client);
970
971	pkt [offs++] = CMD_IP_1; pkt [offs++] = CMD_IP_2; pkt [offs++] = CMD_IP_3;	1066	pkt [offs++] = CMD_IP_1; pkt [offs++] = CMD_IP_2; pkt [offs++] = CMD_IP_3;
972	pkt [offs++] = CMD_IP_REJ;	1067	pkt [offs++] = CMD_IP_REJ;
973		1068
974	if (0 < client && client <= conns.size ())	1069	if (0 < client && client <= conns.size ())
975	{	1070	{
976	connection *c = conns [client - 1];	1071	connection *c = conns [client - 1];
977		1072
978	if (cfg.valid ())	1073	if (cfg.valid ())
979	{	1074	{
980	pkt [offs - 1] = CMD_IP_SYN;	1075	slog (L_INFO, _("DNS: client %d connects (version %d, req_cdc %d)"), client, cfg.version, cfg.req_cdc);
		1076
		1077	// check for any encoding mismatches - hints at a case problem
		1078	char qname2 [MAX_ENC_LEN];
		1079	cdc26.encode (qname2, (u8 *)&cfg, sizeof (dns_cfg));
981		1080
982	delete c->dns;	1081	delete c->dns;
		1082
		1083	pkt [offs - 1] = memcmp (qname, qname2, cdc26.encode_len (sizeof (dns_cfg)))
		1084	? CMD_IP_CSE : CMD_IP_SYN;
		1085
983	c->dns = new dns_connection (c);	1086	c->dns = new dns_connection (c);
984	c->dns->cfg = cfg;	1087	c->dns->cfg = cfg;
		1088	c->dns->set_cfg ();
985	}	1089	}
986	}	1090	}
987	}	1091	}
988	}	1092	}
989		1093
…		…
1008	{	1112	{
1009	dns_connection dns = (i)->dns;	1113	dns_connection dns = (i)->dns;
1010	connection *c = dns->c;	1114	connection *c = dns->c;
1011	int seqno = (*i)->seqno;	1115	int seqno = (*i)->seqno;
1012	u8 data[MAXSIZE], *datap = data;	1116	u8 data[MAXSIZE], *datap = data;
		1117	//printf ("rcv pkt %x\n", seqno);//D
1013		1118
1014	if ((*i)->retry)	1119	if ((*i)->retry)
1015	{	1120	{
1016	dns->send_interval *= 1.01;	1121	dns->send_interval *= 1.01;
1017	if (dns->send_interval > MAX_SEND_INTERVAL)	1122	if (dns->send_interval > MAX_SEND_INTERVAL)
…		…
1022	#if 0	1127	#if 0
1023	dns->send_interval *= 0.999;	1128	dns->send_interval *= 0.999;
1024	#endif	1129	#endif
1025	// the latency surely puts an upper bound on	1130	// the latency surely puts an upper bound on
1026	// the minimum send interval	1131	// the minimum send interval
1027	double latency = NOW - (*i)->sent;	1132	double latency = ev_now () - (*i)->sent;
1028		1133
1029	if (latency < dns->min_latency)	1134	if (latency < dns->min_latency)
1030	dns->min_latency = latency;	1135	dns->min_latency = latency;
1031		1136
1032	if (dns->send_interval > dns->min_latency * LATENCY_FACTOR)	1137	if (dns->send_interval > dns->min_latency * conf.dns_overlap_factor)
1033	dns->send_interval = dns->min_latency * LATENCY_FACTOR;	1138	dns->send_interval = dns->min_latency * conf.dns_overlap_factor;
1034		1139
1035	if (dns->send_interval < MIN_SEND_INTERVAL)	1140	if (dns->send_interval < conf.dns_send_interval)
1036	dns->send_interval = MIN_SEND_INTERVAL;	1141	dns->send_interval = conf.dns_send_interval;
1037	}	1142	}
1038		1143
1039	delete *i;	1144	delete *i;
1040	dns_sndpq.erase (i);	1145	dns_sndpq.erase (i);
1041		1146
…		…
1059	ttl \|= pkt [offs++] << 16;	1164	ttl \|= pkt [offs++] << 16;
1060	ttl \|= pkt [offs++] << 8;	1165	ttl \|= pkt [offs++] << 8;
1061	ttl \|= pkt [offs++];	1166	ttl \|= pkt [offs++];
1062	u16 rdlen = pkt [offs++] << 8; rdlen \|= pkt [offs++];	1167	u16 rdlen = pkt [offs++] << 8; rdlen \|= pkt [offs++];
1063		1168
1064	if (qtype == RR_TYPE_NULL \|\| qtype == RR_TYPE_TXT)	1169	if (qtype == RR_TYPE_NULL \|\| qtype == RR_TYPE_TXT \|\| qtype == dns->cfg.rrtype)
1065	{	1170	{
1066	if (rdlen <= MAXSIZE - offs)	1171	if (rdlen <= MAXSIZE - offs)
1067	{	1172	{
1068	// decode bytes, finally	1173	// decode bytes, finally
1069		1174
…		…
1095	{	1200	{
1096	slog (L_TRACE, _("DNS: got tunnel meta command %02x"), ip [3]);	1201	slog (L_TRACE, _("DNS: got tunnel meta command %02x"), ip [3]);
1097		1202
1098	if (ip [3] == CMD_IP_RST)	1203	if (ip [3] == CMD_IP_RST)
1099	{	1204	{
1100	slog (L_DEBUG, _("DNS: got tunnel RST request"));	1205	slog (L_DEBUG, _("DNS: got tunnel RST request."));
1101		1206
1102	delete dns; c->dns = 0;	1207	dns->reset ();
1103
1104	return;	1208	return;
1105	}	1209	}
1106	else if (ip [3] == CMD_IP_SYN)	1210	else if (ip [3] == CMD_IP_SYN)
1107	{	1211	{
1108	slog (L_DEBUG, _("DNS: got tunnel SYN reply, server likes us."));	1212	slog (L_DEBUG, _("DNS: got tunnel SYN reply, server likes us."));
1109	dns->established = true;	1213	dns->established = true;
1110	}	1214	}
		1215	else if (ip [3] == CMD_IP_CSE)
		1216	{
		1217	if (conf.dns_case_preserving)
		1218	{
		1219	slog (L_INFO, _("DNS: got tunnel CSE reply, globally downgrading to case-insensitive protocol."));
		1220	conf.dns_case_preserving = false;
		1221	dns->reset ();
		1222	return;
		1223	}
		1224	else
		1225	{
		1226	slog (L_DEBUG, _("DNS: got tunnel CSE reply, server likes us."));
		1227	dns->established = true;
		1228	}
		1229	}
1111	else if (ip [3] == CMD_IP_REJ)	1230	else if (ip [3] == CMD_IP_REJ)
1112	{	1231	{
1113	slog (L_DEBUG, _("DNS: got tunnel REJ reply, server does not like us, aborting."));	1232	slog (L_ERR, _("DNS: got tunnel REJ reply, server does not like us."));
1114	abort ();	1233	dns->tw.start (60.);
1115	}	1234	}
1116	else	1235	else
		1236	{
1117	slog (L_INFO, _("DNS: got unknown meta command %02x"), ip [3]);	1237	slog (L_INFO, _("DNS: got unknown meta command %02x"), ip [3]);
		1238	dns->tw.start (60.);
		1239	}
1118	}	1240	}
1119	else	1241	else
1120	slog (L_INFO, _("DNS: got spurious a record %d.%d.%d.%d"),	1242	slog (L_INFO, _("DNS: got spurious a record %d.%d.%d.%d"),
1121	ip [0], ip [1], ip [2], ip [3]);	1243	ip [0], ip [1], ip [2], ip [3]);
1122		1244
…		…
1146	break;	1268	break;
1147	}	1269	}
1148	}	1270	}
1149		1271
1150	void	1272	void
1151	vpn::dnsv4_ev (io_watcher &w, short revents)	1273	vpn::dnsv4_ev (ev::io &w, int revents)
1152	{	1274	{
1153	if (revents & EVENT_READ)	1275	if (revents & EV_READ)
1154	{	1276	{
1155	dns_packet *pkt = new dns_packet;	1277	dns_packet *pkt = new dns_packet;
1156	struct sockaddr_in sa;	1278	struct sockaddr_in sa;
1157	socklen_t sa_len = sizeof (sa);	1279	socklen_t sa_len = sizeof (sa);
1158		1280
…		…
1174	}	1296	}
1175		1297
1176	bool	1298	bool
1177	vpn::send_dnsv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)	1299	vpn::send_dnsv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
1178	{	1300	{
1179	int client = ntohs (si.port);	1301	int client = ntohl (si.host);
1180		1302
1181	assert (0 < client && client <= conns.size ());	1303	assert (0 < client && client <= conns.size ());
1182		1304
1183	connection *c = conns [client - 1];	1305	connection *c = conns [client - 1];
1184		1306
1185	if (!c->dns)	1307	if (!c->dns)
1186	c->dns = new dns_connection (c);	1308	c->dns = new dns_connection (c);
1187		1309
1188	if (!c->dns->snddq.put (pkt))	1310	if (c->dns->snddq.put (pkt))
1189	return false;	1311	{
		1312	min_it (c->dns->poll_interval, 0.25);
		1313	c->dns->tw ();
		1314	}
1190		1315
1191	c->dns->tw.trigger ();	1316	// always return true even if the buffer overflows
1192
1193	return true;	1317	return true;
1194	}	1318	}
1195		1319
1196	void	1320	void
1197	connection::dnsv4_reset_connection ()	1321	dns_connection::time_cb (ev::timer &w, int revents)
1198	{
1199	//delete dns; dns = 0; //TODO
1200	}
1201
1202	#define NEXT(w) do { if (next > (w)) next = w; } while (0)
1203
1204	void
1205	dns_connection::time_cb (time_watcher &w)
1206	{	1322	{
1207	// servers have to be polled	1323	// servers have to be polled
1208	if (THISNODE->dns_port)	1324	if (THISNODE->dns_port)
1209	return;	1325	return;
1210		1326
1211	// check for timeouts and (re)transmit	1327	// check for timeouts and (re)transmit
1212	tstamp next = NOW + poll_interval;	1328	tstamp next = 86400 * 365;
1213	dns_snd *send = 0;	1329	dns_snd *send = 0;
1214		1330
1215	for (vector<dns_snd *>::iterator i = vpn->dns_sndpq.begin ();	1331	for (vector<dns_snd *>::iterator i = vpn->dns_sndpq.begin ();
1216	i != vpn->dns_sndpq.end ();	1332	i != vpn->dns_sndpq.end ();
1217	++i)	1333	++i)
1218	{	1334	{
1219	dns_snd r = i;	1335	dns_snd r = i;
1220		1336
1221	if (r->timeout <= NOW)	1337	if (r->timeout <= ev_now ())
1222	{	1338	{
1223	if (!send)	1339	if (!send)
1224	{	1340	{
1225	send = r;	1341	send = r;
1226		1342
1227	r->retry++;	1343	r->retry++;
1228	r->timeout = NOW + (r->retry * min_latency * 8.);	1344	r->timeout = ev_now () + r->retry * min_latency * conf.dns_timeout_factor;
		1345	//printf ("RETRY %x (%d, %f)\n", r->seqno, r->retry, r->timeout - ev_now ());//D
1229		1346
1230	// the following code changes the query section a bit, forcing	1347	// the following code changes the query section a bit, forcing
1231	// the forwarder to generate a new request	1348	// the forwarder to generate a new request
1232	if (r->stdhdr)	1349	if (r->stdhdr)
1233	{
1234	//printf ("reencoded header for ID %d retry %d:%d:%d (%p)\n", htons (r->pkt->id), THISNODE->id, r->seqno, r->retry);
1235	//encode_header ((char )r->pkt->at (6 2 + 1), THISNODE->id, r->seqno, r->retry);	1350	encode_header ((char )r->pkt->at (6 2 + 1), THISNODE->id, r->seqno, r->retry);
1236	}
1237	}	1351	}
1238	}	1352	}
1239	else	1353	else
1240	NEXT (r->timeout);	1354	min_it (next, r->timeout - ev_now ());
1241	}	1355	}
1242		1356
1243	if (!send)	1357	if (!send)
1244	{	1358	{
1245	if (last_sent + send_interval <= NOW)	1359	// generate a new packet, if wise
		1360
		1361	if (!established)
1246	{	1362	{
1247	// generate a new packet, if wise	1363	if (vpn->dns_sndpq.empty ())
1248
1249	if (!established)
1250	{	1364	{
1251	if (vpn->dns_sndpq.empty ())
1252	{
1253	send = new dns_snd (this);	1365	send = new dns_snd (this);
1254		1366
1255	cfg.reset (THISNODE->id);	1367	cfg.reset (THISNODE->id);
		1368	set_cfg ();
1256	send->gen_syn_req ();	1369	send->gen_syn_req ();
1257	}
1258	}	1370	}
1259	else if (vpn->dns_sndpq.size () < MAX_OUTSTANDING	1371	}
		1372	else if (vpn->dns_sndpq.size () < conf.dns_max_outstanding
1260	&& !SEQNO_EQ (rcvseq, sndseq - (MAX_WINDOW - 1)))	1373	&& !SEQNO_EQ (rcvseq, sndseq - (MAX_WINDOW - 1)))
		1374	{
		1375	if (last_sent + send_interval <= ev_now ())
1261	{	1376	{
1262	//printf ("sending data request etc.\n"); //D	1377	//printf ("sending data request etc.\n"); //D
1263	if (!snddq.empty () \|\| last_received + 1. > NOW)	1378	if (!snddq.empty ())
1264	{
1265	poll_interval = send_interval;
1266	NEXT (NOW + send_interval);	1379	min_it (next, send_interval);
1267	}
1268		1380
1269	send = new dns_snd (this);	1381	send = new dns_snd (this);
1270	send->gen_stream_req (sndseq, snddq);	1382	send->gen_stream_req (sndseq, snddq);
1271	send->timeout = NOW + min_latency * 8.;	1383	send->timeout = ev_now () + min_latency * conf.dns_timeout_factor;
		1384	//printf ("SEND %x (%f)\n", send->seqno, send->timeout - ev_now (), min_latency, conf.dns_timeout_factor);//D
1272		1385
1273	sndseq = (sndseq + 1) & SEQNO_MASK;	1386	sndseq = (sndseq + 1) & SEQNO_MASK;
1274	}	1387	}
1275		1388	else
1276	if (send)	1389	min_it (next, last_sent + send_interval - ev_now ());
1277	vpn->dns_sndpq.push_back (send);
1278	}	1390	}
1279	else	1391
1280	NEXT (last_sent + send_interval);	1392	if (send)
		1393	vpn->dns_sndpq.push_back (send);
1281	}	1394	}
1282		1395
1283	if (send)	1396	if (send)
1284	{	1397	{
1285	last_sent = NOW;	1398	last_sent = ev_now ();
1286	sendto (vpn->dnsv4_fd,	1399	sendto (vpn->dnsv4_fd,
1287	send->pkt->at (0), send->pkt->len, 0,	1400	send->pkt->at (0), send->pkt->len, 0,
1288	vpn->dns_forwarder.sav4 (), vpn->dns_forwarder.salenv4 ());	1401	vpn->dns_forwarder.sav4 (), vpn->dns_forwarder.salenv4 ());
1289	}	1402	}
1290		1403
		1404	min_it (next, last_sent + max (poll_interval, send_interval) - ev_now ());
		1405
1291	slog (L_NOISE, "DNS: pi %f si %f N %f (%d:%d %d)",	1406	slog (L_NOISE, "DNS: pi %f si %f N %f (%d:%d %d)",
1292	poll_interval, send_interval, next - NOW,	1407	poll_interval, send_interval, next - ev_now (),
1293	vpn->dns_sndpq.size (), snddq.size (),	1408	vpn->dns_sndpq.size (), snddq.size (),
1294	rcvpq.size ());	1409	rcvpq.size ());
1295		1410
1296	// TODO: no idea when this happens, but when next < NOW, we have a problem
1297	if (next < NOW + 0.0001)
1298	next = NOW + 0.1;
1299
1300	w.start (next);	1411	w.start (next);
1301	}	1412	}
1302		1413
1303	#endif	1414	#endif
1304		1415

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing gvpe/src/vpn_dns.C (file contents): Revision 1.28 by pcg, Sun Mar 13 12:33:34 2005 UTC vs. Revision 1.52 by root, Sun Mar 6 21:01:37 2011 UTC

Diff Legend

Comparing gvpe/src/vpn_dns.C (file contents):
Revision 1.28 by pcg, Sun Mar 13 12:33:34 2005 UTC vs.
Revision 1.52 by root, Sun Mar 6 21:01:37 2011 UTC