config.c 19.7 KB
Newer Older
1
/*
Mark Andrews's avatar
Mark Andrews committed
2
 * Copyright (C) 2004-2006  Internet Systems Consortium, Inc. ("ISC")
Mark Andrews's avatar
Mark Andrews committed
3
 * Copyright (C) 2001-2003  Internet Software Consortium.
4
5
6
7
8
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
Mark Andrews's avatar
Mark Andrews committed
9
10
11
12
13
14
15
 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
 * AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
 * PERFORMANCE OF THIS SOFTWARE.
16
17
 */

18
/* $Id: config.c,v 1.75 2006/06/04 23:17:06 marka Exp $ */
19
20

/*! \file */
Brian Wellington's avatar
Brian Wellington committed
21
22

#include <config.h>
23
24
25
26
27
28
29

#include <stdlib.h>
#include <string.h>

#include <isc/buffer.h>
#include <isc/log.h>
#include <isc/mem.h>
30
#include <isc/parseint.h>
31
32
33
34
35
#include <isc/region.h>
#include <isc/result.h>
#include <isc/sockaddr.h>
#include <isc/util.h>

36
#include <isccfg/namedconf.h>
37
38
39
40

#include <dns/fixedname.h>
#include <dns/name.h>
#include <dns/rdataclass.h>
41
#include <dns/rdatatype.h>
Brian Wellington's avatar
Brian Wellington committed
42
#include <dns/tsig.h>
43
44
45
46
47
#include <dns/zone.h>

#include <named/config.h>
#include <named/globals.h>

48
/*% default configuration */
49
50
static char defaultconf[] = "\
options {\n\
51
52
53
#	blackhole {none;};\n"
#ifndef WIN32
"	coresize default;\n\
54
	datasize default;\n\
55
56
57
58
	files default;\n\
	stacksize default;\n"
#endif
"	deallocate-on-exit true;\n\
59
60
61
62
#	directory <none>\n\
	dump-file \"named_dump.db\";\n\
	fake-iquery no;\n\
	has-old-clients false;\n\
63
	heartbeat-interval 60;\n\
64
	host-statistics no;\n\
65
	interface-interval 60;\n\
66
67
	listen-on {any;};\n\
	listen-on-v6 {none;};\n\
68
	match-mapped-addresses no;\n\
69
70
	memstatistics-file \"named.memstats\";\n\
	multiple-cnames no;\n\
71
#	named-xfer <obsolete>;\n\
72
73
#	pid-file \"" NS_LOCALSTATEDIR "/named.pid\"; /* or /lwresd.pid */\n\
	port 53;\n\
74
	recursing-file \"named.recursing\";\n\
75
76
"
#ifdef PATH_RANDOMDEV
77
78
"\
	random-device \"" PATH_RANDOMDEV "\";\n\
79
80
"
#endif
81
82
"\
	recursive-clients 1000;\n\
83
	rrset-order {type NS order random; order cyclic; };\n\
84
	serial-queries 20;\n\
85
	serial-query-rate 20;\n\
86
	server-id none;\n\
87
	statistics-file \"named.stats\";\n\
88
	statistics-interval 60;\n\
89
	tcp-clients 100;\n\
Michael Graff's avatar
Michael Graff committed
90
	tcp-listen-queue 3;\n\
91
92
93
94
95
96
97
98
99
#	tkey-dhkey <none>\n\
#	tkey-gssapi-credential <none>\n\
#	tkey-domain <none>\n\
	transfers-per-ns 2;\n\
	transfers-in 10;\n\
	transfers-out 10;\n\
	treat-cr-as-space true;\n\
	use-id-pool true;\n\
	use-ixfr true;\n\
100
	edns-udp-size 4096;\n\
101
	max-udp-size 4096;\n\
102
103
104
105
\n\
	/* view */\n\
	allow-notify {none;};\n\
	allow-update-forwarding {none;};\n\
106
107
	allow-query-cache { localnets; localhost; };\n\
	allow-recursion { localnets; localhost; };\n\
108
#	allow-v6-synthesis <obsolete>;\n\
109
110
111
#	sortlist <none>\n\
#	topology <none>\n\
	auth-nxdomain false;\n\
Bob Halley's avatar
Bob Halley committed
112
	minimal-responses false;\n\
113
114
115
116
117
118
119
120
121
122
123
	recursion true;\n\
	provide-ixfr true;\n\
	request-ixfr true;\n\
	fetch-glue no;\n\
	rfc2308-type1 no;\n\
	additional-from-auth true;\n\
	additional-from-cache true;\n\
	query-source address *;\n\
	query-source-v6 address *;\n\
	notify-source *;\n\
	notify-source-v6 *;\n\
124
	cleaning-interval 60;\n\
125
126
127
128
129
130
	min-roots 2;\n\
	lame-ttl 600;\n\
	max-ncache-ttl 10800; /* 3 hours */\n\
	max-cache-ttl 604800; /* 1 week */\n\
	transfer-format many-answers;\n\
	max-cache-size 0;\n\
131
132
	check-names master fail;\n\
	check-names slave warn;\n\
133
	check-names response ignore;\n\
134
	check-mx warn;\n\
135
	acache-enable no;\n\
136
137
	acache-cleaning-interval 60;\n\
	max-acache-size 0;\n\
138
139
	dnssec-enable yes;\n\
	dnssec-validation no; /* Make yes for 9.5. */ \n\
140
	dnssec-accept-expired no;\n\
141
142
	clients-per-query 10;\n\
	max-clients-per-query 100;\n\
143
	zero-no-soa-ttl-cache no;\n\
Mark Andrews's avatar
Mark Andrews committed
144
145
146
"

"	/* zone */\n\
147
148
149
150
	allow-query {any;};\n\
	allow-transfer {any;};\n\
	notify yes;\n\
#	also-notify <none>\n\
151
	notify-delay 5;\n\
152
153
154
155
156
157
158
	dialup no;\n\
#	forward <none>\n\
#	forwarders <none>\n\
	maintain-ixfr-base no;\n\
#	max-ixfr-log-size <obsolete>\n\
	transfer-source *;\n\
	transfer-source-v6 *;\n\
159
	alt-transfer-source *;\n\
160
	alt-transfer-source-v6 *;\n\
161
162
163
164
	max-transfer-time-in 120;\n\
	max-transfer-time-out 120;\n\
	max-transfer-idle-in 60;\n\
	max-transfer-idle-out 60;\n\
165
166
167
168
	max-retry-time 1209600; /* 2 weeks */\n\
	min-retry-time 500;\n\
	max-refresh-time 2419200; /* 4 weeks */\n\
	min-refresh-time 300;\n\
169
	multi-master no;\n\
170
171
	sig-validity-interval 30; /* days */\n\
	zone-statistics false;\n\
172
	max-journal-size unlimited;\n\
173
	ixfr-from-differences false;\n\
174
	check-wildcard yes;\n\
175
176
	check-sibling yes;\n\
	check-integrity yes;\n\
177
178
	check-mx-cname warn;\n\
	check-srv-cname warn;\n\
179
	zero-no-soa-ttl yes;\n\
180
	update-check-ksk yes;\n\
181
	try-tcp-refresh yes; /* BIND 8 compat */\n\
182
};\n\
Mark Andrews's avatar
Mark Andrews committed
183
184
185
"

"#\n\
186
187
#  Zones in the \"_bind\" view are NOT counted is the count of zones.\n\
#\n\
188
189
view \"_bind\" chaos {\n\
	recursion no;\n\
190
	notify no;\n\
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
\n\
	zone \"version.bind\" chaos {\n\
		type master;\n\
		database \"_builtin version\";\n\
	};\n\
\n\
	zone \"hostname.bind\" chaos {\n\
		type master;\n\
		database \"_builtin hostname\";\n\
	};\n\
\n\
	zone \"authors.bind\" chaos {\n\
		type master;\n\
		database \"_builtin authors\";\n\
	};\n\
206
207
208
209
	zone \"id.server\" chaos {\n\
		type master;\n\
		database \"_builtin id\";\n\
	};\n\
210
};\n\
211
";
212
213
214
215
216
217
218
219
220
221
222

isc_result_t
ns_config_parsedefaults(cfg_parser_t *parser, cfg_obj_t **conf) {
	isc_buffer_t b;

	isc_buffer_init(&b, defaultconf, sizeof(defaultconf) - 1);
	isc_buffer_add(&b, sizeof(defaultconf) - 1);
	return (cfg_parse_buffer(parser, &b, &cfg_type_namedconf, conf));
}

isc_result_t
223
ns_config_get(const cfg_obj_t **maps, const char *name, const cfg_obj_t **obj) {
224
225
	int i;

226
	for (i = 0;; i++) {
227
228
229
230
231
232
233
		if (maps[i] == NULL)
			return (ISC_R_NOTFOUND);
		if (cfg_map_get(maps[i], name, obj) == ISC_R_SUCCESS)
			return (ISC_R_SUCCESS);
	}
}

234
isc_result_t
235
236
237
238
239
240
241
ns_checknames_get(const cfg_obj_t **maps, const char *which,
		  const cfg_obj_t **obj)
{
	const cfg_listelt_t *element;
	const cfg_obj_t *checknames;
	const cfg_obj_t *type;
	const cfg_obj_t *value;
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
	int i;

	for (i = 0;; i++) {
		if (maps[i] == NULL)
			return (ISC_R_NOTFOUND);
		checknames = NULL;
		if (cfg_map_get(maps[i], "check-names", &checknames) == ISC_R_SUCCESS) {
			/*
			 * Zone map entry is not a list.
			 */
			if (checknames != NULL && !cfg_obj_islist(checknames)) {
				*obj = checknames;
				return (ISC_R_SUCCESS);
			}
			for (element = cfg_list_first(checknames);
			     element != NULL;
			     element = cfg_list_next(element)) {
				value = cfg_listelt_value(element);
				type = cfg_tuple_get(value, "type");
				if (strcasecmp(cfg_obj_asstring(type), which) == 0) {
					*obj = cfg_tuple_get(value, "mode");
					return (ISC_R_SUCCESS);
				}
			}

		}
	}
}

271
int
272
273
ns_config_listcount(const cfg_obj_t *list) {
	const cfg_listelt_t *e;
274
275
276
277
278
279
280
281
282
	int i = 0;

	for (e = cfg_list_first(list); e != NULL; e = cfg_list_next(e))
		i++;

	return (i);
}

isc_result_t
283
ns_config_getclass(const cfg_obj_t *classobj, dns_rdataclass_t defclass,
284
		   dns_rdataclass_t *classp) {
285
	isc_textregion_t r;
286
	isc_result_t result;
287
288

	if (!cfg_obj_isstring(classobj)) {
289
		*classp = defclass;
290
291
		return (ISC_R_SUCCESS);
	}
292
293
	DE_CONST(cfg_obj_asstring(classobj), r.base);
	r.length = strlen(r.base);
294
295
296
	result = dns_rdataclass_fromtext(classp, &r);
	if (result != ISC_R_SUCCESS)
		cfg_obj_log(classobj, ns_g_lctx, ISC_LOG_ERROR,
297
			    "unknown class '%s'", r.base);
298
	return (result);
299
300
}

301
isc_result_t
302
ns_config_gettype(const cfg_obj_t *typeobj, dns_rdatatype_t deftype,
303
304
305
306
307
308
309
310
		   dns_rdatatype_t *typep) {
	isc_textregion_t r;
	isc_result_t result;

	if (!cfg_obj_isstring(typeobj)) {
		*typep = deftype;
		return (ISC_R_SUCCESS);
	}
311
312
	DE_CONST(cfg_obj_asstring(typeobj), r.base);
	r.length = strlen(r.base);
313
314
315
	result = dns_rdatatype_fromtext(typep, &r);
	if (result != ISC_R_SUCCESS)
		cfg_obj_log(typeobj, ns_g_lctx, ISC_LOG_ERROR,
316
			    "unknown type '%s'", r.base);
317
318
319
	return (result);
}

320
dns_zonetype_t
321
ns_config_getzonetype(const cfg_obj_t *zonetypeobj) {
322
	dns_zonetype_t ztype = dns_zone_none;
323
	const char *str;
324
325

	str = cfg_obj_asstring(zonetypeobj);
326
	if (strcasecmp(str, "master") == 0)
327
		ztype = dns_zone_master;
328
	else if (strcasecmp(str, "slave") == 0)
329
		ztype = dns_zone_slave;
330
	else if (strcasecmp(str, "stub") == 0)
331
332
333
334
335
336
337
		ztype = dns_zone_stub;
	else
		INSIST(0);
	return (ztype);
}

isc_result_t
338
ns_config_getiplist(const cfg_obj_t *config, const cfg_obj_t *list,
339
340
341
342
		    in_port_t defport, isc_mem_t *mctx,
		    isc_sockaddr_t **addrsp, isc_uint32_t *countp)
{
	int count, i = 0;
343
344
345
	const cfg_obj_t *addrlist;
	const cfg_obj_t *portobj;
	const cfg_listelt_t *element;
346
347
348
349
350
	isc_sockaddr_t *addrs;
	in_port_t port;
	isc_result_t result;

	INSIST(addrsp != NULL && *addrsp == NULL);
351
	INSIST(countp != NULL);
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403

	addrlist = cfg_tuple_get(list, "addresses");
	count = ns_config_listcount(addrlist);

	portobj = cfg_tuple_get(list, "port");
	if (cfg_obj_isuint32(portobj)) {
		isc_uint32_t val = cfg_obj_asuint32(portobj);
		if (val > ISC_UINT16_MAX) {
			cfg_obj_log(portobj, ns_g_lctx, ISC_LOG_ERROR,
				    "port '%u' out of range", val);
			return (ISC_R_RANGE);
		}
		port = (in_port_t) val;
	} else if (defport != 0)
		port = defport;
	else {
		result = ns_config_getport(config, &port);
		if (result != ISC_R_SUCCESS)
			return (result);
	}

	addrs = isc_mem_get(mctx, count * sizeof(isc_sockaddr_t));
	if (addrs == NULL)
		return (ISC_R_NOMEMORY);

	for (element = cfg_list_first(addrlist);
	     element != NULL;
	     element = cfg_list_next(element), i++)
	{
		INSIST(i < count);
		addrs[i] = *cfg_obj_assockaddr(cfg_listelt_value(element));
		if (isc_sockaddr_getport(&addrs[i]) == 0)
			isc_sockaddr_setport(&addrs[i], port);
	}
	INSIST(i == count);

	*addrsp = addrs;
	*countp = count;

	return (ISC_R_SUCCESS);
}

void
ns_config_putiplist(isc_mem_t *mctx, isc_sockaddr_t **addrsp,
		    isc_uint32_t count)
{
	INSIST(addrsp != NULL && *addrsp != NULL);

	isc_mem_put(mctx, *addrsp, count * sizeof(isc_sockaddr_t));
	*addrsp = NULL;
}

404
static isc_result_t
405
406
407
get_masters_def(const cfg_obj_t *cctx, const char *name,
	        const cfg_obj_t **ret)
{
408
	isc_result_t result;
409
410
	const cfg_obj_t *masters = NULL;
	const cfg_listelt_t *elt;
411
412
413
414
415
416
417

	result = cfg_map_get(cctx, "masters", &masters);
	if (result != ISC_R_SUCCESS)
		return (result);
	for (elt = cfg_list_first(masters);
	     elt != NULL;
	     elt = cfg_list_next(elt)) {
418
		const cfg_obj_t *list;
419
420
421
422
423
424
425
426
427
428
429
430
431
		const char *listname;

		list = cfg_listelt_value(elt);
		listname = cfg_obj_asstring(cfg_tuple_get(list, "name"));

		if (strcasecmp(listname, name) == 0) {
			*ret = list;
			return (ISC_R_SUCCESS);
		}
	}
	return (ISC_R_NOTFOUND);
}

432
isc_result_t
433
434
435
ns_config_getipandkeylist(const cfg_obj_t *config, const cfg_obj_t *list,
			  isc_mem_t *mctx, isc_sockaddr_t **addrsp,
			  dns_name_t ***keysp, isc_uint32_t *countp)
436
{
437
438
439
	isc_uint32_t addrcount = 0, keycount = 0, i = 0;
	isc_uint32_t listcount = 0, l = 0, j;
	isc_uint32_t stackcount = 0, pushed = 0;
440
	isc_result_t result;
441
442
443
	const cfg_listelt_t *element;
	const cfg_obj_t *addrlist;
	const cfg_obj_t *portobj;
444
445
446
447
	in_port_t port;
	dns_fixedname_t fname;
	isc_sockaddr_t *addrs = NULL;
	dns_name_t **keys = NULL;
Mark Andrews's avatar
Mark Andrews committed
448
	struct { const char *name; } *lists = NULL;
449
	struct {
450
		const cfg_listelt_t *element;
451
452
		in_port_t port;
	} *stack = NULL;
453

454
455
456
	REQUIRE(addrsp != NULL && *addrsp == NULL);
	REQUIRE(keysp != NULL && *keysp == NULL);
	REQUIRE(countp != NULL);
457

458
 newlist:
459
460
461
462
463
464
465
	addrlist = cfg_tuple_get(list, "addresses");
	portobj = cfg_tuple_get(list, "port");
	if (cfg_obj_isuint32(portobj)) {
		isc_uint32_t val = cfg_obj_asuint32(portobj);
		if (val > ISC_UINT16_MAX) {
			cfg_obj_log(portobj, ns_g_lctx, ISC_LOG_ERROR,
				    "port '%u' out of range", val);
466
467
			result = ISC_R_RANGE;
			goto cleanup;
468
469
470
471
472
		}
		port = (in_port_t) val;
	} else {
		result = ns_config_getport(config, &port);
		if (result != ISC_R_SUCCESS)
473
			goto cleanup;
474
475
476
477
	}

	result = ISC_R_NOMEMORY;

478
479
480
	element = cfg_list_first(addrlist);
 resume:
	for ( ;
481
	     element != NULL;
482
	     element = cfg_list_next(element))
483
	{
484
485
		const cfg_obj_t *addr;
		const cfg_obj_t *key;
486
		const char *keystr;
487
488
		isc_buffer_t b;

489
490
		addr = cfg_tuple_get(cfg_listelt_value(element),
				     "masterselement");
491
492
		key = cfg_tuple_get(cfg_listelt_value(element), "key");

493
		if (!cfg_obj_issockaddr(addr)) {
494
			const char *listname = cfg_obj_asstring(addr);
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
			isc_result_t tresult;

			/* Grow lists? */
			if (listcount == l) {
				void * new;
				isc_uint32_t newlen = listcount + 16;
				size_t newsize, oldsize;

				newsize = newlen * sizeof(*lists);
				oldsize = listcount * sizeof(*lists);
				new = isc_mem_get(mctx, newsize);
				if (new == NULL)
					goto cleanup;
				if (listcount != 0) {
					memcpy(new, lists, oldsize);
					isc_mem_put(mctx, lists, oldsize);
				}
				lists = new;
				listcount = newlen;
			}
			/* Seen? */
			for (j = 0; j < l; j++)
Mark Andrews's avatar
Mark Andrews committed
517
				if (strcasecmp(lists[j].name, listname) == 0)
518
519
520
521
522
523
524
525
526
527
528
529
530
					break;
			if (j < l)
				continue;
			tresult = get_masters_def(config, listname, &list);
			if (tresult == ISC_R_NOTFOUND) {
				cfg_obj_log(addr, ns_g_lctx, ISC_LOG_ERROR,
                                    "masters \"%s\" not found", listname);

				result = tresult;
				goto cleanup;
			}
			if (tresult != ISC_R_SUCCESS)
				goto cleanup;
Mark Andrews's avatar
Mark Andrews committed
531
			lists[l++].name = listname;
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
			/* Grow stack? */
			if (stackcount == pushed) {
				void * new;
				isc_uint32_t newlen = stackcount + 16;
				size_t newsize, oldsize;

				newsize = newlen * sizeof(*stack);
				oldsize = stackcount * sizeof(*stack);
				new = isc_mem_get(mctx, newsize);
				if (new == NULL)
					goto cleanup;
				if (stackcount != 0) {
					memcpy(new, stack, oldsize);
					isc_mem_put(mctx, stack, oldsize);
				}
				stack = new;
				stackcount = newlen;
			}
			/*
			 * We want to resume processing this list on the
			 * next element.
			 */
			stack[pushed].element = cfg_list_next(element);
			stack[pushed].port = port;
			pushed++;
			goto newlist;
		}

		if (i == addrcount) {
			void * new;
			isc_uint32_t newlen = addrcount + 16;
			size_t newsize, oldsize;

			newsize = newlen * sizeof(isc_sockaddr_t);
			oldsize = addrcount * sizeof(isc_sockaddr_t);
			new = isc_mem_get(mctx, newsize);
			if (new == NULL)
				goto cleanup;
			if (addrcount != 0) {
				memcpy(new, addrs, oldsize);
				isc_mem_put(mctx, addrs, oldsize);
			}
			addrs = new;
			addrcount = newlen;

			newsize = newlen * sizeof(dns_name_t *);
			oldsize = keycount * sizeof(dns_name_t *);
			new = isc_mem_get(mctx, newsize);
			if (new == NULL)
				goto cleanup;
			if (keycount != 0) {
583
584
				memcpy(new, keys, oldsize);
				isc_mem_put(mctx, keys, oldsize);
585
586
587
588
589
			}
			keys = new;
			keycount = newlen;
		}

590
591
592
593
		addrs[i] = *cfg_obj_assockaddr(addr);
		if (isc_sockaddr_getport(&addrs[i]) == 0)
			isc_sockaddr_setport(&addrs[i], port);
		keys[i] = NULL;
594
595
		if (!cfg_obj_isstring(key)) {
			i++;
596
			continue;
597
		}
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
		keys[i] = isc_mem_get(mctx, sizeof(dns_name_t));
		if (keys[i] == NULL)
			goto cleanup;
		dns_name_init(keys[i], NULL);
		
		keystr = cfg_obj_asstring(key);
		isc_buffer_init(&b, keystr, strlen(keystr));
		isc_buffer_add(&b, strlen(keystr));
		dns_fixedname_init(&fname);
		result = dns_name_fromtext(dns_fixedname_name(&fname), &b,
					   dns_rootname, ISC_FALSE, NULL);
		if (result != ISC_R_SUCCESS)
			goto cleanup;
		result = dns_name_dup(dns_fixedname_name(&fname), mctx,
				      keys[i]);
		if (result != ISC_R_SUCCESS)
			goto cleanup;
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
		i++;
	}
	if (pushed != 0) {
		pushed--;
		element = stack[pushed].element;
		port = stack[pushed].port;
		goto resume;
	}
	if (i < addrcount) {
		void * new;
		size_t newsize, oldsize;

		newsize = i * sizeof(isc_sockaddr_t);
		oldsize = addrcount * sizeof(isc_sockaddr_t);
		if (i != 0) {
			new = isc_mem_get(mctx, newsize);
			if (new == NULL)
				goto cleanup;
			memcpy(new, addrs, newsize);
		} else
			new = NULL;
636
		isc_mem_put(mctx, addrs, oldsize);
637
638
639
640
641
642
643
644
645
646
647
648
		addrs = new;
		addrcount = i;

		newsize = i * sizeof(dns_name_t *);
		oldsize = keycount * sizeof(dns_name_t *);
		if (i != 0) {
			new = isc_mem_get(mctx, newsize);
			if (new == NULL)
				goto cleanup;
			memcpy(new, keys,  newsize);
		} else
			new = NULL;
649
		isc_mem_put(mctx, keys, oldsize);
650
651
		keys = new;
		keycount = i;
652
	}
653
654
655
656
657
658
659

	if (lists != NULL)
		isc_mem_put(mctx, lists, listcount * sizeof(*lists));
	if (stack != NULL)
		isc_mem_put(mctx, stack, stackcount * sizeof(*stack));
	
	INSIST(keycount == addrcount);
660
661
662

	*addrsp = addrs;
	*keysp = keys;
663
	*countp = addrcount;
664
665
666
667
668

	return (ISC_R_SUCCESS);

 cleanup:
	if (addrs != NULL)
669
		isc_mem_put(mctx, addrs, addrcount * sizeof(isc_sockaddr_t));
670
	if (keys != NULL) {
671
		for (j = 0; j <= i; j++) {
672
673
674
675
676
677
			if (keys[j] == NULL)
				continue;
			if (dns_name_dynamic(keys[j]))
				dns_name_free(keys[j], mctx);
			isc_mem_put(mctx, keys[j], sizeof(dns_name_t));
		}
678
		isc_mem_put(mctx, keys, keycount * sizeof(dns_name_t *));
679
	}
680
681
682
683
	if (lists != NULL)
		isc_mem_put(mctx, lists, listcount * sizeof(*lists));
	if (stack != NULL)
		isc_mem_put(mctx, stack, stackcount * sizeof(*stack));
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
	return (result);
}

void
ns_config_putipandkeylist(isc_mem_t *mctx, isc_sockaddr_t **addrsp,
			  dns_name_t ***keysp, isc_uint32_t count)
{
	unsigned int i;
	dns_name_t **keys = *keysp;

	INSIST(addrsp != NULL && *addrsp != NULL);

	isc_mem_put(mctx, *addrsp, count * sizeof(isc_sockaddr_t));
	for (i = 0; i < count; i++) {
		if (keys[i] == NULL)
			continue;
		if (dns_name_dynamic(keys[i]))
			dns_name_free(keys[i], mctx);
		isc_mem_put(mctx, keys[i], sizeof(dns_name_t));
	}
	isc_mem_put(mctx, *keysp, count * sizeof(dns_name_t *));
	*addrsp = NULL;
	*keysp = NULL;
}

isc_result_t
710
711
712
713
ns_config_getport(const cfg_obj_t *config, in_port_t *portp) {
	const cfg_obj_t *maps[3];
	const cfg_obj_t *options = NULL;
	const cfg_obj_t *portobj = NULL;
714
715
716
	isc_result_t result;
	int i;

717
	(void)cfg_map_get(config, "options", &options);
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
	i = 0;
	if (options != NULL)
		maps[i++] = options;
	maps[i++] = ns_g_defaults;
	maps[i] = NULL;

	result = ns_config_get(maps, "port", &portobj);
	INSIST(result == ISC_R_SUCCESS);
	if (cfg_obj_asuint32(portobj) >= ISC_UINT16_MAX) {
		cfg_obj_log(portobj, ns_g_lctx, ISC_LOG_ERROR,
			    "port '%u' out of range",
			    cfg_obj_asuint32(portobj));
		return (ISC_R_RANGE);
	}
	*portp = (in_port_t)cfg_obj_asuint32(portobj);
	return (ISC_R_SUCCESS);
}
Brian Wellington's avatar
Brian Wellington committed
735

736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
struct keyalgorithms {
	const char *str;
	enum { hmacnone, hmacmd5, hmacsha1, hmacsha224,
	       hmacsha256, hmacsha384, hmacsha512 } hmac;
	isc_uint16_t size;
} algorithms[] = {
	{ "hmac-md5", hmacmd5, 128 },
	{ "hmac-md5.sig-alg.reg.int", hmacmd5, 0 },
	{ "hmac-md5.sig-alg.reg.int.", hmacmd5, 0 },
	{ "hmac-sha1", hmacsha1, 160 },
	{ "hmac-sha224", hmacsha224, 224 },
	{ "hmac-sha256", hmacsha256, 256 },
	{ "hmac-sha384", hmacsha384, 384 },
	{ "hmac-sha512", hmacsha512, 512 },
	{  NULL, hmacnone, 0 }
};

Brian Wellington's avatar
Brian Wellington committed
753
isc_result_t
754
755
ns_config_getkeyalgorithm(const char *str, dns_name_t **name,
			  isc_uint16_t *digestbits)
Brian Wellington's avatar
Brian Wellington committed
756
{
757
758
759
760
761
762
763
764
765
766
767
	int i;
	size_t len = 0;
	isc_uint16_t bits;
	isc_result_t result;

	for (i = 0; algorithms[i].str != NULL; i++) {
		len = strlen(algorithms[i].str);
		if (strncasecmp(algorithms[i].str, str, len) == 0 &&
		    (str[len] == '\0' ||
		     (algorithms[i].size != 0 && str[len] == '-')))
			break;
Brian Wellington's avatar
Brian Wellington committed
768
	}
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
	if (algorithms[i].str == NULL)
		return (ISC_R_NOTFOUND);
	if (str[len] == '-') {
		result = isc_parse_uint16(&bits, str + len + 1, 10);
		if (result != ISC_R_SUCCESS)
			return (result);
		if (bits > algorithms[i].size)
			return (ISC_R_RANGE);
	} else if (algorithms[i].size == 0)
		bits = 128;
	else
		bits = algorithms[i].size;

	if (name != NULL) {
		switch (algorithms[i].hmac) {
		case hmacmd5: *name = dns_tsig_hmacmd5_name; break;
		case hmacsha1: *name = dns_tsig_hmacsha1_name; break;
		case hmacsha224: *name = dns_tsig_hmacsha224_name; break;
		case hmacsha256: *name = dns_tsig_hmacsha256_name; break;
		case hmacsha384: *name = dns_tsig_hmacsha384_name; break;
		case hmacsha512: *name = dns_tsig_hmacsha512_name; break;
		default:
			INSIST(0);
		}
	}
	if (digestbits != NULL)
		*digestbits = bits;
	return (ISC_R_SUCCESS);
Brian Wellington's avatar
Brian Wellington committed
797
}