David Lawrence
40f53fa8d9
own CVS tree will help minimize CVS conflicts. Maybe not. Blame Graff for getting me to trim all trailing whitespace.
389 lines
7.2 KiB
C
389 lines
7.2 KiB
C
/*
|
|
* Copyright (C) 1999, 2000 Internet Software Consortium.
|
|
*
|
|
* 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.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM
|
|
* DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL
|
|
* INTERNET SOFTWARE CONSORTIUM 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.
|
|
*/
|
|
|
|
/* $Id: conflsn.c,v 1.18 2000/08/01 01:23:24 tale Exp $ */
|
|
|
|
#include <config.h>
|
|
|
|
#include <isc/mem.h>
|
|
#include <isc/util.h>
|
|
|
|
#include <dns/conflsn.h>
|
|
#include <dns/log.h>
|
|
|
|
#include "confpvt.h"
|
|
|
|
isc_result_t
|
|
dns_c_lstnon_new(isc_mem_t *mem, dns_c_lstnon_t **listen) {
|
|
dns_c_lstnon_t *ll;
|
|
isc_result_t result;
|
|
|
|
REQUIRE(listen != NULL);
|
|
|
|
*listen = NULL;
|
|
|
|
ll = isc_mem_get(mem, sizeof *ll);
|
|
ll->mem = mem;
|
|
ll->port = 0;
|
|
ll->magic = DNS_C_LISTEN_MAGIC;
|
|
|
|
result = dns_c_ipmatchlist_new(mem, &ll->iml);
|
|
if (result != ISC_R_SUCCESS) {
|
|
isc_mem_put(mem, ll, sizeof *ll);
|
|
return (result);
|
|
}
|
|
|
|
ISC_LINK_INIT(ll, next);
|
|
|
|
*listen = ll;
|
|
|
|
return (ISC_R_SUCCESS);
|
|
}
|
|
|
|
isc_result_t
|
|
dns_c_lstnon_delete(dns_c_lstnon_t **listen) {
|
|
dns_c_lstnon_t *lo;
|
|
isc_result_t r;
|
|
|
|
REQUIRE(listen != NULL);
|
|
REQUIRE(DNS_C_LISTEN_VALID(*listen));
|
|
|
|
lo = *listen;
|
|
|
|
if (lo->iml != NULL) {
|
|
r = dns_c_ipmatchlist_detach(&lo->iml);
|
|
} else {
|
|
r = ISC_R_SUCCESS;
|
|
}
|
|
|
|
lo->magic = 0;
|
|
isc_mem_put(lo->mem, lo, sizeof *lo);
|
|
|
|
*listen = NULL;
|
|
|
|
return (r);
|
|
}
|
|
|
|
isc_result_t
|
|
dns_c_lstnon_setiml(dns_c_lstnon_t *listen,
|
|
dns_c_ipmatchlist_t *iml, isc_boolean_t deepcopy)
|
|
{
|
|
isc_result_t result;
|
|
|
|
REQUIRE(DNS_C_LISTEN_VALID(listen));
|
|
REQUIRE(DNS_C_IPMLIST_VALID(iml));
|
|
|
|
if (listen->iml != NULL) {
|
|
result = dns_c_ipmatchlist_detach(&listen->iml);
|
|
if (result != ISC_R_SUCCESS) {
|
|
return (result);
|
|
}
|
|
} else {
|
|
result = ISC_R_SUCCESS;
|
|
}
|
|
|
|
|
|
if (deepcopy) {
|
|
result = dns_c_ipmatchlist_copy(listen->mem,
|
|
&listen->iml, iml);
|
|
} else {
|
|
listen->iml = iml;
|
|
}
|
|
|
|
return (result);
|
|
}
|
|
|
|
isc_result_t
|
|
dns_c_lstnlist_new(isc_mem_t *mem, dns_c_lstnlist_t **llist) {
|
|
dns_c_lstnlist_t *ll;
|
|
|
|
REQUIRE(llist != NULL);
|
|
|
|
*llist = NULL;
|
|
|
|
ll = isc_mem_get(mem, sizeof *ll);
|
|
if (ll == NULL) {
|
|
/* XXXJAB logwrite */
|
|
return (ISC_R_NOMEMORY);
|
|
}
|
|
|
|
ll->mem = mem;
|
|
ll->magic = DNS_C_LLIST_MAGIC;
|
|
ISC_LIST_INIT(ll->elements);
|
|
|
|
*llist = ll;
|
|
|
|
return (ISC_R_SUCCESS);
|
|
}
|
|
|
|
isc_result_t
|
|
dns_c_lstnlist_delete(dns_c_lstnlist_t **llist) {
|
|
dns_c_lstnlist_t *ll;
|
|
dns_c_lstnon_t *lo, *lotmp;
|
|
isc_result_t r;
|
|
|
|
REQUIRE(llist != NULL);
|
|
REQUIRE(DNS_C_LISTENLIST_VALID(*llist));
|
|
|
|
ll = *llist;
|
|
|
|
lo = ISC_LIST_HEAD(ll->elements);
|
|
while (lo != NULL) {
|
|
lotmp = ISC_LIST_NEXT(lo, next);
|
|
ISC_LIST_UNLINK(ll->elements, lo, next);
|
|
r = dns_c_lstnon_delete(&lo);
|
|
if (r != ISC_R_SUCCESS) {
|
|
return (r);
|
|
}
|
|
|
|
lo = lotmp;
|
|
}
|
|
|
|
ll->magic = 0;
|
|
isc_mem_put(ll->mem, ll, sizeof *ll);
|
|
|
|
*llist = NULL;
|
|
|
|
return (ISC_R_SUCCESS);
|
|
}
|
|
|
|
isc_result_t
|
|
dns_c_lstnlist_print(FILE *fp, int indent, dns_c_lstnlist_t *ll,
|
|
in_port_t default_port)
|
|
{
|
|
dns_c_lstnon_t *lo;
|
|
|
|
REQUIRE(DNS_C_LISTENLIST_VALID(ll));
|
|
|
|
lo = ISC_LIST_HEAD(ll->elements);
|
|
while (lo != NULL) {
|
|
dns_c_printtabs(fp, indent);
|
|
dns_c_lstnon_print(fp, indent, lo, default_port);
|
|
lo = ISC_LIST_NEXT(lo, next);
|
|
fprintf(fp, "\n");
|
|
}
|
|
|
|
return (ISC_R_SUCCESS);
|
|
}
|
|
|
|
isc_result_t
|
|
dns_c_lstnlistv6_print(FILE *fp, int indent, dns_c_lstnlist_t *ll,
|
|
in_port_t default_port)
|
|
{
|
|
dns_c_lstnon_t *lo;
|
|
|
|
REQUIRE(DNS_C_LISTENLIST_VALID(ll));
|
|
|
|
lo = ISC_LIST_HEAD(ll->elements);
|
|
while (lo != NULL) {
|
|
dns_c_printtabs(fp, indent);
|
|
dns_c_lstnonv6_print(fp, indent, lo, default_port);
|
|
lo = ISC_LIST_NEXT(lo, next);
|
|
fprintf(fp, "\n");
|
|
}
|
|
|
|
return (ISC_R_SUCCESS);
|
|
}
|
|
|
|
isc_result_t
|
|
dns_c_lstnon_print(FILE *fp, int indent, dns_c_lstnon_t *lo,
|
|
in_port_t default_port) {
|
|
REQUIRE(lo != NULL);
|
|
REQUIRE(DNS_C_LISTEN_VALID(lo));
|
|
|
|
fprintf(fp, "listen-on ");
|
|
if (lo->port != default_port) {
|
|
fprintf(fp, "port %d ", lo->port);
|
|
}
|
|
|
|
dns_c_ipmatchlist_print(fp, indent + 1, lo->iml);
|
|
fprintf(fp, ";\n");
|
|
|
|
return (ISC_R_SUCCESS);
|
|
}
|
|
|
|
|
|
isc_result_t
|
|
dns_c_lstnonv6_print(FILE *fp, int indent, dns_c_lstnon_t *lo,
|
|
in_port_t default_port) {
|
|
REQUIRE(lo != NULL);
|
|
REQUIRE(DNS_C_LISTEN_VALID(lo));
|
|
|
|
fprintf(fp, "listen-on-v6 ");
|
|
if (lo->port != default_port) {
|
|
fprintf(fp, "port %d ", lo->port);
|
|
}
|
|
|
|
dns_c_ipmatchlist_print(fp, indent + 1, lo->iml);
|
|
fprintf(fp, ";\n");
|
|
|
|
return (ISC_R_SUCCESS);
|
|
}
|
|
|
|
|
|
#if 0
|
|
|
|
static isc_boolean_t
|
|
checklisten_element(dns_c_ipmatchelement_t *element)
|
|
{
|
|
int pf;
|
|
isc_boolean_t ok = ISC_FALSE;
|
|
|
|
switch (element->type) {
|
|
case dns_c_ipmatch_pattern:
|
|
pf = isc_sockaddr_pf(&element->u.direct.address);
|
|
ok = ISC_TF(pf == AF_INET);
|
|
break;
|
|
|
|
case dns_c_ipmatch_key:
|
|
case dns_c_ipmatch_localhost:
|
|
case dns_c_ipmatch_localnets:
|
|
ok = ISC_FALSE;
|
|
break;
|
|
|
|
case dns_c_ipmatch_any:
|
|
case dns_c_ipmatch_none:
|
|
ok = ISC_TRUE;
|
|
break;
|
|
|
|
case dns_c_ipmatch_indirect:
|
|
/* XXX shouldn't be reached */
|
|
break;
|
|
|
|
case dns_c_ipmatch_acl:
|
|
/* XXX handle this. */
|
|
break;
|
|
}
|
|
|
|
return (ok);
|
|
}
|
|
|
|
static isc_boolean_t
|
|
checkv6listen_element(dns_c_ipmatchelement_t *element)
|
|
{
|
|
int pf;
|
|
isc_boolean_t ok = ISC_FALSE;
|
|
|
|
switch (element->type) {
|
|
case dns_c_ipmatch_pattern:
|
|
pf = isc_sockaddr_pf(&element->u.direct.address);
|
|
|
|
ok = ISC_TF(pf == AF_INET6);
|
|
break;
|
|
|
|
case dns_c_ipmatch_key:
|
|
case dns_c_ipmatch_localhost:
|
|
case dns_c_ipmatch_localnets:
|
|
ok = ISC_FALSE;
|
|
break;
|
|
|
|
case dns_c_ipmatch_any:
|
|
case dns_c_ipmatch_none:
|
|
ok = ISC_TRUE;
|
|
break;
|
|
|
|
case dns_c_ipmatch_indirect:
|
|
/* XXX shouldn't be reached */
|
|
break;
|
|
|
|
case dns_c_ipmatch_acl:
|
|
/* XXX handle this. */
|
|
break;
|
|
}
|
|
|
|
return (ok);
|
|
}
|
|
|
|
#endif
|
|
|
|
/*
|
|
* Post confirguation load validation of list-on lists.
|
|
*/
|
|
isc_result_t
|
|
dns_c_lstnlist_validate(dns_c_lstnlist_t *ll)
|
|
{
|
|
#if 0
|
|
|
|
dns_c_lstnon_t *lo;
|
|
isc_boolean_t checkval;
|
|
|
|
REQUIRE(DNS_C_LISTENLIST_VALID(ll));
|
|
|
|
lo = ISC_LIST_HEAD(ll->elements);
|
|
while (lo != NULL) {
|
|
checkval = dns_c_ipmatchlist_walk(lo->iml,
|
|
checklisten_element);
|
|
if (!checkval) {
|
|
isc_log_write(dns_lctx,DNS_LOGCATEGORY_CONFIG,
|
|
DNS_LOGMODULE_CONFIG, ISC_LOG_ERROR,
|
|
"listen-on must have IPv4 "
|
|
"addresses only.");
|
|
return (ISC_R_FAILURE);
|
|
}
|
|
|
|
lo = ISC_LIST_NEXT(lo, next);
|
|
}
|
|
|
|
return (ISC_R_SUCCESS);
|
|
|
|
#else
|
|
|
|
UNUSED(ll);
|
|
return (ISC_R_SUCCESS);
|
|
|
|
#endif
|
|
}
|
|
|
|
|
|
isc_result_t
|
|
dns_c_lstnlistv6_validate(dns_c_lstnlist_t *ll)
|
|
{
|
|
#if 0
|
|
|
|
dns_c_lstnon_t *lo;
|
|
isc_boolean_t checkval;
|
|
|
|
REQUIRE(DNS_C_LISTENLIST_VALID(ll));
|
|
|
|
lo = ISC_LIST_HEAD(ll->elements);
|
|
while (lo != NULL) {
|
|
checkval = dns_c_ipmatchlist_walk(lo->iml,
|
|
checkv6listen_element);
|
|
if (!checkval) {
|
|
isc_log_write(dns_lctx,DNS_LOGCATEGORY_CONFIG,
|
|
DNS_LOGMODULE_CONFIG, ISC_LOG_ERROR,
|
|
"listen-on-v6 must have IPv6 "
|
|
"addresses only.");
|
|
return (ISC_R_FAILURE);
|
|
}
|
|
|
|
lo = ISC_LIST_NEXT(lo, next);
|
|
}
|
|
|
|
return (ISC_R_SUCCESS);
|
|
|
|
#else
|
|
|
|
UNUSED(ll);
|
|
return (ISC_R_SUCCESS);
|
|
|
|
#endif
|
|
}
|
|
|
|
|
|
|