#include <config.h>

#include <isc/file.h>

#include <isc/mutex.h>

#include <isc/print.h>

#include <isc/random.h>

#include <isc/ratelimiter.h>

#include <isc/refcount.h>

#include <isc/rwlock.h>

#include <isc/serial.h>

#include <isc/string.h>

#include <isc/taskpool.h>

#include <isc/timer.h>

#include <isc/util.h>

#include <isc/xml.h>

#include <dns/acache.h>

#include <dns/acl.h>

#include <dns/adb.h>

#include <dns/callbacks.h>

#include <dns/db.h>

#include <dns/dbiterator.h>

#include <dns/events.h>

#include <dns/journal.h>

#include <dns/log.h>

#include <dns/master.h>

#include <dns/masterdump.h>

#include <dns/message.h>

#include <dns/name.h>

#include <dns/peer.h>

#include <dns/rcode.h>

#include <dns/rdataclass.h>

#include <dns/rdatalist.h>

#include <dns/rdataset.h>

#include <dns/rdatastruct.h>

#include <dns/rdatatype.h>

#include <dns/request.h>

#include <dns/resolver.h>

#include <dns/result.h>

#include <dns/stats.h>

#include <dns/ssu.h>

#include <dns/tsig.h>

#include <dns/xfrin.h>

#include <dns/zone.h>

#define ZONE_MAGIC ISC_MAGIC('Z', 'O', 'N', 'E')

#define DNS_ZONE_VALID(zone) ISC_MAGIC_VALID(zone, ZONE_MAGIC)

#define NOTIFY_MAGIC ISC_MAGIC('N', 't', 'f', 'y')

#define DNS_NOTIFY_VALID(notify) ISC_MAGIC_VALID(notify, NOTIFY_MAGIC)

#define STUB_MAGIC ISC_MAGIC('S', 't', 'u', 'b')

#define DNS_STUB_VALID(stub) ISC_MAGIC_VALID(stub, STUB_MAGIC)

#define ZONEMGR_MAGIC ISC_MAGIC('Z', 'm', 'g', 'r')

#define DNS_ZONEMGR_VALID(stub) ISC_MAGIC_VALID(stub, ZONEMGR_MAGIC)

#define LOAD_MAGIC ISC_MAGIC('L', 'o', 'a', 'd')

#define DNS_LOAD_VALID(load) ISC_MAGIC_VALID(load, LOAD_MAGIC)

#define FORWARD_MAGIC ISC_MAGIC('F', 'o', 'r', 'w')

#define DNS_FORWARD_VALID(load) ISC_MAGIC_VALID(load, FORWARD_MAGIC)

#define IO_MAGIC ISC_MAGIC('Z', 'm', 'I', 'O')

#define DNS_IO_VALID(load) ISC_MAGIC_VALID(load, IO_MAGIC)

#define RANGE(a, min, max) \

(((a) < (min)) ? (min) : ((a) < (max) ? (a) : (max)))

#define DNS_DEFAULT_IDLEIN 3600 /*%< 1 hour */

#define DNS_DEFAULT_IDLEOUT 3600 /*%< 1 hour */

#define MAX_XFER_TIME (2*3600) /*%< Documented default is 2 hours */

#ifndef DNS_MAX_EXPIRE

#define DNS_MAX_EXPIRE 14515200 /*%< 24 weeks */

#endif

#ifndef DNS_DUMP_DELAY

#define DNS_DUMP_DELAY 900 /*%< 15 minutes */

#endif

typedef struct dns_notify dns_notify_t;

typedef struct dns_stub dns_stub_t;

typedef struct dns_load dns_load_t;

typedef struct dns_forward dns_forward_t;

typedef struct dns_io dns_io_t;

typedef ISC_LIST(dns_io_t) dns_iolist_t;

#define DNS_ZONE_CHECKLOCK

#ifdef DNS_ZONE_CHECKLOCK

#define LOCK_ZONE(z) \

do { LOCK(&(z)->lock); \

INSIST((z)->locked == ISC_FALSE); \

(z)->locked = ISC_TRUE; \

} while (0)

#define UNLOCK_ZONE(z) \

do { (z)->locked = ISC_FALSE; UNLOCK(&(z)->lock); } while (0)

#define LOCKED_ZONE(z) ((z)->locked)

#else

#define LOCK_ZONE(z) LOCK(&(z)->lock)

#define UNLOCK_ZONE(z) UNLOCK(&(z)->lock)

#define LOCKED_ZONE(z) ISC_TRUE

#endif

#ifdef ISC_RWLOCK_USEATOMIC

#define ZONEDB_INITLOCK(l) isc_rwlock_init((l), 0, 0)

#define ZONEDB_DESTROYLOCK(l) isc_rwlock_destroy(l)

#define ZONEDB_LOCK(l, t) RWLOCK((l), (t))

#define ZONEDB_UNLOCK(l, t) RWUNLOCK((l), (t))

#else

#define ZONEDB_INITLOCK(l) isc_mutex_init(l)

#define ZONEDB_DESTROYLOCK(l) DESTROYLOCK(l)

#define ZONEDB_LOCK(l, t) LOCK(l)

#define ZONEDB_UNLOCK(l, t) UNLOCK(l)

#endif

struct dns_zone {

/* Unlocked */

unsigned int magic;

isc_mutex_t lock;

#ifdef DNS_ZONE_CHECKLOCK

isc_boolean_t locked;

#endif

isc_mem_t *mctx;

isc_refcount_t erefs;

#ifdef ISC_RWLOCK_USEATOMIC

isc_rwlock_t dblock;

#else

isc_mutex_t dblock;

#endif

dns_db_t *db; /* Locked by dblock */

/* Locked */

dns_zonemgr_t *zmgr;

ISC_LINK(dns_zone_t) link; /* Used by zmgr. */

isc_timer_t *timer;

unsigned int irefs;

dns_name_t origin;

char *masterfile;

dns_masterformat_t masterformat;

char *journal;

isc_int32_t journalsize;

dns_rdataclass_t rdclass;

dns_zonetype_t type;

unsigned int flags;

unsigned int options;

unsigned int db_argc;

char **db_argv;

isc_time_t expiretime;

isc_time_t refreshtime;

isc_time_t dumptime;

isc_time_t loadtime;

isc_time_t notifytime;

isc_uint32_t serial;

isc_uint32_t refresh;

isc_uint32_t retry;

isc_uint32_t expire;

isc_uint32_t minimum;

char *keydirectory;

isc_uint32_t maxrefresh;

isc_uint32_t minrefresh;

isc_uint32_t maxretry;

isc_uint32_t minretry;

isc_sockaddr_t *masters;

dns_name_t **masterkeynames;

isc_boolean_t *mastersok;

unsigned int masterscnt;

unsigned int curmaster;

isc_sockaddr_t masteraddr;

dns_notifytype_t notifytype;

isc_sockaddr_t *notify;

unsigned int notifycnt;

isc_sockaddr_t notifyfrom;

isc_task_t *task;

isc_sockaddr_t notifysrc4;

isc_sockaddr_t notifysrc6;

isc_sockaddr_t xfrsource4;

isc_sockaddr_t xfrsource6;

isc_sockaddr_t altxfrsource4;

isc_sockaddr_t altxfrsource6;

isc_sockaddr_t sourceaddr;

dns_xfrin_ctx_t *xfr; /* task locked */

dns_tsigkey_t *tsigkey; /* key used for xfr */

/* Access Control Lists */

dns_acl_t *update_acl;

dns_acl_t *forward_acl;

dns_acl_t *notify_acl;

dns_acl_t *query_acl;

dns_acl_t *xfr_acl;

isc_boolean_t update_disabled;

isc_boolean_t zero_no_soa_ttl;

dns_severity_t check_names;

ISC_LIST(dns_notify_t) notifies;

dns_request_t *request;

dns_loadctx_t *lctx;

dns_io_t *readio;

dns_dumpctx_t *dctx;

dns_io_t *writeio;

isc_uint32_t maxxfrin;

isc_uint32_t maxxfrout;

isc_uint32_t idlein;

isc_uint32_t idleout;

isc_event_t ctlevent;

dns_ssutable_t *ssutable;

isc_uint32_t sigvalidityinterval;

dns_view_t *view;

dns_acache_t *acache;

dns_checkmxfunc_t checkmx;

dns_checksrvfunc_t checksrv;

dns_checknsfunc_t checkns;

/*%

ISC_LINK(dns_zone_t) statelink;

dns_zonelist_t *statelist;

/*%

isc_uint64_t *counters;

isc_uint32_t notifydelay;

dns_isselffunc_t isself;

void *isselfarg;

char * strnamerd;

char * strname;

char * strrdclass;

char * strviewname;

};

#define DNS_ZONE_FLAG(z,f) (ISC_TF(((z)->flags & (f)) != 0))

#define DNS_ZONE_SETFLAG(z,f) do { \

INSIST(LOCKED_ZONE(z)); \

(z)->flags |= (f); \

} while (0)

#define DNS_ZONE_CLRFLAG(z,f) do { \

INSIST(LOCKED_ZONE(z)); \

(z)->flags &= ~(f); \

} while (0)

/* XXX MPA these may need to go back into zone.h */

#define DNS_ZONEFLG_REFRESH 0x00000001U /*%< refresh check in progress */

#define DNS_ZONEFLG_NEEDDUMP 0x00000002U /*%< zone need consolidation */

#define DNS_ZONEFLG_USEVC 0x00000004U /*%< use tcp for refresh query */

#define DNS_ZONEFLG_DUMPING 0x00000008U /*%< a dump is in progress */

#define DNS_ZONEFLG_HASINCLUDE 0x00000010U /*%< $INCLUDE in zone file */

#define DNS_ZONEFLG_LOADED 0x00000020U /*%< database has loaded */

#define DNS_ZONEFLG_EXITING 0x00000040U /*%< zone is being destroyed */

#define DNS_ZONEFLG_EXPIRED 0x00000080U /*%< zone has expired */

#define DNS_ZONEFLG_NEEDREFRESH 0x00000100U /*%< refresh check needed */

#define DNS_ZONEFLG_UPTODATE 0x00000200U /*%< zone contents are

#define DNS_ZONEFLG_NEEDNOTIFY 0x00000400U /*%< need to send out notify

#define DNS_ZONEFLG_DIFFONRELOAD 0x00000800U /*%< generate a journal diff on

#define DNS_ZONEFLG_NOMASTERS 0x00001000U /*%< an attempt to refresh a

#define DNS_ZONEFLG_LOADING 0x00002000U /*%< load from disk in progress*/

#define DNS_ZONEFLG_HAVETIMERS 0x00004000U /*%< timer values have been set

#define DNS_ZONEFLG_FORCEXFER 0x00008000U /*%< Force a zone xfer */

#define DNS_ZONEFLG_NOREFRESH 0x00010000U

#define DNS_ZONEFLG_DIALNOTIFY 0x00020000U

#define DNS_ZONEFLG_DIALREFRESH 0x00040000U

#define DNS_ZONEFLG_SHUTDOWN 0x00080000U

#define DNS_ZONEFLAG_NOIXFR 0x00100000U /*%< IXFR failed, force AXFR */

#define DNS_ZONEFLG_FLUSH 0x00200000U

#define DNS_ZONEFLG_NOEDNS 0x00400000U

#define DNS_ZONEFLG_USEALTXFRSRC 0x00800000U

#define DNS_ZONEFLG_SOABEFOREAXFR 0x01000000U

#define DNS_ZONE_OPTION(z,o) (((z)->options & (o)) != 0)

#define DNS_ZONELOADFLAG_NOSTAT 0x00000001U /* Do not stat() master files */

#define UNREACH_CHACHE_SIZE 10U

#define UNREACH_HOLD_TIME 600 /* 10 minutes */

struct dns_unreachable {

isc_sockaddr_t remote;

isc_sockaddr_t local;

isc_uint32_t expire;

isc_uint32_t last;

};

struct dns_zonemgr {

unsigned int magic;

isc_mem_t * mctx;

int refs; /* Locked by rwlock */

isc_taskmgr_t * taskmgr;

isc_timermgr_t * timermgr;

isc_socketmgr_t * socketmgr;

isc_taskpool_t * zonetasks;

isc_task_t * task;

isc_ratelimiter_t * rl;

isc_rwlock_t rwlock;

isc_mutex_t iolock;

/* Locked by rwlock. */

dns_zonelist_t zones;

dns_zonelist_t waiting_for_xfrin;

dns_zonelist_t xfrin_in_progress;

/* Configuration data. */

isc_uint32_t transfersin;

isc_uint32_t transfersperns;

unsigned int serialqueryrate;

/* Locked by iolock */

isc_uint32_t iolimit;

isc_uint32_t ioactive;

dns_iolist_t high;

dns_iolist_t low;

/* Locked by rwlock. */

/* LRU cache */

struct dns_unreachable unreachable[UNREACH_CHACHE_SIZE];

};

struct dns_notify {

unsigned int magic;

unsigned int flags;

isc_mem_t *mctx;

dns_zone_t *zone;

dns_adbfind_t *find;

dns_request_t *request;

dns_name_t ns;

isc_sockaddr_t dst;

ISC_LINK(dns_notify_t) link;

};

#define DNS_NOTIFY_NOSOA 0x0001U

struct dns_stub {

unsigned int magic;

isc_mem_t *mctx;

dns_zone_t *zone;

dns_db_t *db;

dns_dbversion_t *version;

};

struct dns_load {

unsigned int magic;

isc_mem_t *mctx;

dns_zone_t *zone;

dns_db_t *db;

isc_time_t loadtime;

dns_rdatacallbacks_t callbacks;

};

struct dns_forward {

unsigned int magic;

isc_mem_t *mctx;

dns_zone_t *zone;

isc_buffer_t *msgbuf;

dns_request_t *request;

isc_uint32_t which;

isc_sockaddr_t addr;

dns_updatecallback_t callback;

void *callback_arg;

};

struct dns_io {

unsigned int magic;

dns_zonemgr_t *zmgr;

isc_boolean_t high;

isc_task_t *task;

ISC_LINK(dns_io_t) link;

isc_event_t *event;

};

#define SEND_BUFFER_SIZE 2048

static void zone_settimer(dns_zone_t *, isc_time_t *);

static void cancel_refresh(dns_zone_t *);

static void zone_debuglog(dns_zone_t *zone, const char *, int debuglevel,

const char *msg, ...) ISC_FORMAT_PRINTF(4, 5);

static void notify_log(dns_zone_t *zone, int level, const char *fmt, ...)

ISC_FORMAT_PRINTF(3, 4);

static void queue_xfrin(dns_zone_t *zone);

static void zone_unload(dns_zone_t *zone);

static void zone_expire(dns_zone_t *zone);

static void zone_iattach(dns_zone_t *source, dns_zone_t **target);

static void zone_idetach(dns_zone_t **zonep);

static isc_result_t zone_replacedb(dns_zone_t *zone, dns_db_t *db,

isc_boolean_t dump);

static inline void zone_attachdb(dns_zone_t *zone, dns_db_t *db);

static inline void zone_detachdb(dns_zone_t *zone);

static isc_result_t default_journal(dns_zone_t *zone);

static void zone_xfrdone(dns_zone_t *zone, isc_result_t result);

static isc_result_t zone_postload(dns_zone_t *zone, dns_db_t *db,

isc_time_t loadtime, isc_result_t result);

static void zone_needdump(dns_zone_t *zone, unsigned int delay);

static void zone_shutdown(isc_task_t *, isc_event_t *);

static void zone_loaddone(void *arg, isc_result_t result);

static isc_result_t zone_startload(dns_db_t *db, dns_zone_t *zone,

isc_time_t loadtime);

static void zone_namerd_tostr(dns_zone_t *zone, char *buf, size_t length);

static void zone_name_tostr(dns_zone_t *zone, char *buf, size_t length);

static void zone_rdclass_tostr(dns_zone_t *zone, char *buf, size_t length);

static void zone_viewname_tostr(dns_zone_t *zone, char *buf, size_t length);

#if 0

static void dns_zonemgr_dbdestroyed(isc_task_t *task, isc_event_t *event);

#endif

static void refresh_callback(isc_task_t *, isc_event_t *);

static void stub_callback(isc_task_t *, isc_event_t *);

static void queue_soa_query(dns_zone_t *zone);

static void soa_query(isc_task_t *, isc_event_t *);

static void ns_query(dns_zone_t *zone, dns_rdataset_t *soardataset,

dns_stub_t *stub);

static int message_count(dns_message_t *msg, dns_section_t section,

dns_rdatatype_t type);

static void notify_cancel(dns_zone_t *zone);

static void notify_find_address(dns_notify_t *notify);

static void notify_send(dns_notify_t *notify);

static isc_result_t notify_createmessage(dns_zone_t *zone,

unsigned int flags,

dns_message_t **messagep);

static void notify_done(isc_task_t *task, isc_event_t *event);

static void notify_send_toaddr(isc_task_t *task, isc_event_t *event);

static isc_result_t zone_dump(dns_zone_t *, isc_boolean_t);

static void got_transfer_quota(isc_task_t *task, isc_event_t *event);

static isc_result_t zmgr_start_xfrin_ifquota(dns_zonemgr_t *zmgr,

dns_zone_t *zone);

static void zmgr_resume_xfrs(dns_zonemgr_t *zmgr, isc_boolean_t multi);

static void zonemgr_free(dns_zonemgr_t *zmgr);

static isc_result_t zonemgr_getio(dns_zonemgr_t *zmgr, isc_boolean_t high,

isc_task_t *task, isc_taskaction_t action,

void *arg, dns_io_t **iop);

static void zonemgr_putio(dns_io_t **iop);

static void zonemgr_cancelio(dns_io_t *io);

static isc_result_t

zone_get_from_db(dns_zone_t *zone, dns_db_t *db, unsigned int *nscount,

unsigned int *soacount, isc_uint32_t *serial,

isc_uint32_t *refresh, isc_uint32_t *retry,

isc_uint32_t *expire, isc_uint32_t *minimum,

unsigned int *errors);

static void zone_freedbargs(dns_zone_t *zone);

static void forward_callback(isc_task_t *task, isc_event_t *event);

static void zone_saveunique(dns_zone_t *zone, const char *path,

const char *templat);

static void zone_maintenance(dns_zone_t *zone);

static void zone_notify(dns_zone_t *zone, isc_time_t *now);

static void dump_done(void *arg, isc_result_t result);

static isc_boolean_t dns_zonemgr_unreachable(dns_zonemgr_t *zmgr,

isc_sockaddr_t *remote,

isc_sockaddr_t *local,

isc_time_t *now);

#define ENTER zone_debuglog(zone, me, 1, "enter")

static const unsigned int dbargc_default = 1;

static const char *dbargv_default[] = { "rbt" };

#define DNS_ZONE_JITTER_ADD(a, b, c) \

do { \

isc_interval_t _i; \

isc_uint32_t _j; \

_j = isc_random_jitter((b), (b)/4); \

isc_interval_set(&_i, _j, 0); \

if (isc_time_add((a), &_i, (c)) != ISC_R_SUCCESS) { \

dns_zone_log(zone, ISC_LOG_WARNING, \

"epoch approaching: upgrade required: " \

"now + %s failed", #b); \

isc_interval_set(&_i, _j/2, 0); \

(void)isc_time_add((a), &_i, (c)); \

} \

} while (0)

#define DNS_ZONE_TIME_ADD(a, b, c) \

do { \

isc_interval_t _i; \

isc_interval_set(&_i, (b), 0); \

if (isc_time_add((a), &_i, (c)) != ISC_R_SUCCESS) { \

dns_zone_log(zone, ISC_LOG_WARNING, \

"epoch approaching: upgrade required: " \

"now + %s failed", #b); \

isc_interval_set(&_i, (b)/2, 0); \

(void)isc_time_add((a), &_i, (c)); \

} \

} while (0)

dns_zone_create(dns_zone_t **zonep, isc_mem_t *mctx) {

isc_result_t result;

dns_zone_t *zone;

isc_time_t now;

REQUIRE(zonep != NULL && *zonep == NULL);

REQUIRE(mctx != NULL);

TIME_NOW(&now);

zone = isc_mem_get(mctx, sizeof(*zone));

if (zone == NULL)

return (ISC_R_NOMEMORY);

zone->mctx = NULL;

isc_mem_attach(mctx, &zone->mctx);

result = isc_mutex_init(&zone->lock);

if (result != ISC_R_SUCCESS)

goto free_zone;

result = ZONEDB_INITLOCK(&zone->dblock);

if (result != ISC_R_SUCCESS)

goto free_mutex;

/* XXX MPA check that all elements are initialised */

#ifdef DNS_ZONE_CHECKLOCK

zone->locked = ISC_FALSE;

#endif

zone->db = NULL;

zone->zmgr = NULL;

ISC_LINK_INIT(zone, link);

result = isc_refcount_init(&zone->erefs, 1); /* Implicit attach. */

if (result != ISC_R_SUCCESS)

goto free_dblock;

zone->irefs = 0;

dns_name_init(&zone->origin, NULL);

zone->strnamerd = NULL;

zone->strname = NULL;

zone->strrdclass = NULL;

zone->strviewname = NULL;

zone->masterfile = NULL;

zone->masterformat = dns_masterformat_none;

zone->keydirectory = NULL;

zone->journalsize = -1;

zone->journal = NULL;

zone->rdclass = dns_rdataclass_none;

zone->type = dns_zone_none;

zone->flags = 0;

zone->options = 0;

zone->db_argc = 0;

zone->db_argv = NULL;

isc_time_settoepoch(&zone->expiretime);

isc_time_settoepoch(&zone->refreshtime);

isc_time_settoepoch(&zone->dumptime);

isc_time_settoepoch(&zone->loadtime);

zone->notifytime = now;

zone->serial = 0;

zone->refresh = DNS_ZONE_DEFAULTREFRESH;

zone->retry = DNS_ZONE_DEFAULTRETRY;

zone->expire = 0;

zone->minimum = 0;

zone->maxrefresh = DNS_ZONE_MAXREFRESH;

zone->minrefresh = DNS_ZONE_MINREFRESH;

zone->maxretry = DNS_ZONE_MAXRETRY;

zone->minretry = DNS_ZONE_MINRETRY;

zone->masters = NULL;

zone->masterkeynames = NULL;

zone->mastersok = NULL;

zone->masterscnt = 0;

zone->curmaster = 0;

zone->notify = NULL;

zone->notifytype = dns_notifytype_yes;

zone->notifycnt = 0;

zone->task = NULL;

zone->update_acl = NULL;

zone->forward_acl = NULL;

zone->notify_acl = NULL;

zone->query_acl = NULL;

zone->xfr_acl = NULL;

zone->update_disabled = ISC_FALSE;

zone->zero_no_soa_ttl = ISC_TRUE;

zone->check_names = dns_severity_ignore;

zone->request = NULL;

zone->lctx = NULL;

zone->readio = NULL;

zone->dctx = NULL;

zone->writeio = NULL;

zone->timer = NULL;

zone->idlein = DNS_DEFAULT_IDLEIN;

zone->idleout = DNS_DEFAULT_IDLEOUT;

ISC_LIST_INIT(zone->notifies);

isc_sockaddr_any(&zone->notifysrc4);

isc_sockaddr_any6(&zone->notifysrc6);

isc_sockaddr_any(&zone->xfrsource4);

isc_sockaddr_any6(&zone->xfrsource6);

isc_sockaddr_any(&zone->altxfrsource4);

isc_sockaddr_any6(&zone->altxfrsource6);

zone->xfr = NULL;

zone->tsigkey = NULL;

zone->maxxfrin = MAX_XFER_TIME;

zone->maxxfrout = MAX_XFER_TIME;

zone->ssutable = NULL;

zone->sigvalidityinterval = 30 * 24 * 3600;

zone->view = NULL;

zone->acache = NULL;

zone->checkmx = NULL;

zone->checksrv = NULL;

zone->checkns = NULL;

ISC_LINK_INIT(zone, statelink);

zone->statelist = NULL;

zone->counters = NULL;

zone->notifydelay = 5;

zone->isself = NULL;

zone->isselfarg = NULL;

zone->magic = ZONE_MAGIC;

/* Must be after magic is set. */

result = dns_zone_setdbtype(zone, dbargc_default, dbargv_default);

if (result != ISC_R_SUCCESS)

goto free_erefs;

ISC_EVENT_INIT(&zone->ctlevent, sizeof(zone->ctlevent), 0, NULL,

DNS_EVENT_ZONECONTROL, zone_shutdown, zone, zone,

NULL, NULL);

*zonep = zone;

return (ISC_R_SUCCESS);

free_erefs:

isc_refcount_decrement(&zone->erefs, NULL);

isc_refcount_destroy(&zone->erefs);

free_dblock:

ZONEDB_DESTROYLOCK(&zone->dblock);

free_mutex:

DESTROYLOCK(&zone->lock);

free_zone:

isc_mem_putanddetach(&zone->mctx, zone, sizeof(*zone));

return (result);

}

static void

zone_free(dns_zone_t *zone) {

isc_mem_t *mctx = NULL;

REQUIRE(DNS_ZONE_VALID(zone));

REQUIRE(isc_refcount_current(&zone->erefs) == 0);

REQUIRE(zone->irefs == 0);

REQUIRE(!LOCKED_ZONE(zone));

REQUIRE(zone->timer == NULL);

/*

if (zone->request != NULL)

dns_request_destroy(&zone->request); /* XXXMPA */

INSIST(zone->readio == NULL);

INSIST(zone->statelist == NULL);

INSIST(zone->writeio == NULL);

if (zone->task != NULL)

isc_task_detach(&zone->task);

if (zone->zmgr != NULL)

dns_zonemgr_releasezone(zone->zmgr, zone);

/* Unmanaged objects */

if (zone->masterfile != NULL)

isc_mem_free(zone->mctx, zone->masterfile);

zone->masterfile = NULL;

if (zone->keydirectory != NULL)

isc_mem_free(zone->mctx, zone->keydirectory);

zone->keydirectory = NULL;

zone->journalsize = -1;

if (zone->journal != NULL)

isc_mem_free(zone->mctx, zone->journal);

zone->journal = NULL;

if (zone->counters != NULL)

dns_stats_freecounters(zone->mctx, &zone->counters);

if (zone->db != NULL)

zone_detachdb(zone);

if (zone->acache != NULL)

dns_acache_detach(&zone->acache);

zone_freedbargs(zone);

RUNTIME_CHECK(dns_zone_setmasterswithkeys(zone, NULL, NULL, 0)

== ISC_R_SUCCESS);

RUNTIME_CHECK(dns_zone_setalsonotify(zone, NULL, 0)

== ISC_R_SUCCESS);

zone->check_names = dns_severity_ignore;

if (zone->update_acl != NULL)

dns_acl_detach(&zone->update_acl);

if (zone->forward_acl != NULL)

dns_acl_detach(&zone->forward_acl);

if (zone->notify_acl != NULL)

dns_acl_detach(&zone->notify_acl);

if (zone->query_acl != NULL)

dns_acl_detach(&zone->query_acl);

if (zone->xfr_acl != NULL)

dns_acl_detach(&zone->xfr_acl);

if (dns_name_dynamic(&zone->origin))

dns_name_free(&zone->origin, zone->mctx);

if (zone->strnamerd != NULL)

isc_mem_free(zone->mctx, zone->strnamerd);

if (zone->strname != NULL)

isc_mem_free(zone->mctx, zone->strname);

if (zone->strrdclass != NULL)

isc_mem_free(zone->mctx, zone->strrdclass);

if (zone->strviewname != NULL)

isc_mem_free(zone->mctx, zone->strviewname);

if (zone->ssutable != NULL)

dns_ssutable_detach(&zone->ssutable);

/* last stuff */

ZONEDB_DESTROYLOCK(&zone->dblock);

DESTROYLOCK(&zone->lock);

isc_refcount_destroy(&zone->erefs);

zone->magic = 0;

mctx = zone->mctx;

isc_mem_put(mctx, zone, sizeof(*zone));

isc_mem_detach(&mctx);

}

dns_zone_setclass(dns_zone_t *zone, dns_rdataclass_t rdclass) {

char namebuf[1024];

REQUIRE(DNS_ZONE_VALID(zone));

REQUIRE(rdclass != dns_rdataclass_none);

/*

LOCK_ZONE(zone);

REQUIRE(zone->rdclass == dns_rdataclass_none ||

zone->rdclass == rdclass);

zone->rdclass = rdclass;

if (zone->strnamerd != NULL)

isc_mem_free(zone->mctx, zone->strnamerd);

if (zone->strrdclass != NULL)

isc_mem_free(zone->mctx, zone->strrdclass);

zone_namerd_tostr(zone, namebuf, sizeof namebuf);

zone->strnamerd = isc_mem_strdup(zone->mctx, namebuf);

zone_rdclass_tostr(zone, namebuf, sizeof namebuf);

zone->strrdclass = isc_mem_strdup(zone->mctx, namebuf);

UNLOCK_ZONE(zone);

}

dns_zone_getclass(dns_zone_t *zone){

REQUIRE(DNS_ZONE_VALID(zone));

return (zone->rdclass);

}

dns_zone_setnotifytype(dns_zone_t *zone, dns_notifytype_t notifytype) {

REQUIRE(DNS_ZONE_VALID(zone));

LOCK_ZONE(zone);

zone->notifytype = notifytype;

UNLOCK_ZONE(zone);

}

dns_zone_settype(dns_zone_t *zone, dns_zonetype_t type) {

REQUIRE(DNS_ZONE_VALID(zone));

REQUIRE(type != dns_zone_none);

/*

LOCK_ZONE(zone);

REQUIRE(zone->type == dns_zone_none || zone->type == type);

zone->type = type;

UNLOCK_ZONE(zone);

}

static void

zone_freedbargs(dns_zone_t *zone) {

unsigned int i;

/* Free the old database argument list. */

if (zone->db_argv != NULL) {

for (i = 0; i < zone->db_argc; i++)

isc_mem_free(zone->mctx, zone->db_argv[i]);

isc_mem_put(zone->mctx, zone->db_argv,

zone->db_argc * sizeof(*zone->db_argv));

}

zone->db_argc = 0;

zone->db_argv = NULL;

}

dns_zone_getdbtype(dns_zone_t *zone, char ***argv, isc_mem_t *mctx) {

size_t size = 0;

unsigned int i;

isc_result_t result = ISC_R_SUCCESS;

void *mem;

char **tmp, *tmp2;

REQUIRE(DNS_ZONE_VALID(zone));

REQUIRE(argv != NULL && *argv == NULL);

LOCK_ZONE(zone);

size = (zone->db_argc + 1) * sizeof(char *);

for (i = 0; i < zone->db_argc; i++)

size += strlen(zone->db_argv[i]) + 1;

mem = isc_mem_allocate(mctx, size);

if (mem != NULL) {

tmp = mem;

tmp2 = mem;

tmp2 += (zone->db_argc + 1) * sizeof(char *);

for (i = 0; i < zone->db_argc; i++) {

*tmp++ = tmp2;

strcpy(tmp2, zone->db_argv[i]);

tmp2 += strlen(tmp2) + 1;

}

*tmp = NULL;

} else

result = ISC_R_NOMEMORY;

UNLOCK_ZONE(zone);

*argv = mem;

return (result);

}

dns_zone_setdbtype(dns_zone_t *zone,

unsigned int dbargc, const char * const *dbargv) {

isc_result_t result = ISC_R_SUCCESS;

char **new = NULL;

unsigned int i;

REQUIRE(DNS_ZONE_VALID(zone));

REQUIRE(dbargc >= 1);

REQUIRE(dbargv != NULL);

LOCK_ZONE(zone);

/* Set up a new database argument list. */

new = isc_mem_get(zone->mctx, dbargc * sizeof(*new));

if (new == NULL)

goto nomem;

for (i = 0; i < dbargc; i++)

new[i] = NULL;

for (i = 0; i < dbargc; i++) {

new[i] = isc_mem_strdup(zone->mctx, dbargv[i]);

if (new[i] == NULL)

goto nomem;

}

/* Free the old list. */

zone_freedbargs(zone);

zone->db_argc = dbargc;

zone->db_argv = new;

result = ISC_R_SUCCESS;

goto unlock;

nomem:

if (new != NULL) {

for (i = 0; i < dbargc; i++)

if (new[i] != NULL)

isc_mem_free(zone->mctx, new[i]);

isc_mem_put(zone->mctx, new, dbargc * sizeof(*new));

}

result = ISC_R_NOMEMORY;

unlock:

UNLOCK_ZONE(zone);

return (result);

}

dns_zone_setview(dns_zone_t *zone, dns_view_t *view) {

char namebuf[1024];

REQUIRE(DNS_ZONE_VALID(zone));

LOCK_ZONE(zone);

if (zone->view != NULL)

dns_view_weakdetach(&zone->view);

dns_view_weakattach(view, &zone->view);

if (zone->strviewname != NULL)

isc_mem_free(zone->mctx, zone->strviewname);

if (zone->strnamerd != NULL)

isc_mem_free(zone->mctx, zone->strnamerd);

zone_namerd_tostr(zone, namebuf, sizeof namebuf);

zone->strnamerd = isc_mem_strdup(zone->mctx, namebuf);

zone_viewname_tostr(zone, namebuf, sizeof namebuf);

zone->strviewname = isc_mem_strdup(zone->mctx, namebuf);

UNLOCK_ZONE(zone);

}

dns_view_t *

dns_zone_getview(dns_zone_t *zone) {

REQUIRE(DNS_ZONE_VALID(zone));

return (zone->view);

}

dns_zone_setorigin(dns_zone_t *zone, const dns_name_t *origin) {

isc_result_t result;

char namebuf[1024];

REQUIRE(DNS_ZONE_VALID(zone));

REQUIRE(origin != NULL);

LOCK_ZONE(zone);

if (dns_name_dynamic(&zone->origin)) {

dns_name_free(&zone->origin, zone->mctx);

dns_name_init(&zone->origin, NULL);

}

result = dns_name_dup(origin, zone->mctx, &zone->origin);

if (zone->strnamerd != NULL)

isc_mem_free(zone->mctx, zone->strnamerd);

if (zone->strname != NULL)

isc_mem_free(zone->mctx, zone->strname);

zone_namerd_tostr(zone, namebuf, sizeof namebuf);

zone->strnamerd = isc_mem_strdup(zone->mctx, namebuf);

zone_name_tostr(zone, namebuf, sizeof namebuf);

zone->strname = isc_mem_strdup(zone->mctx, namebuf);

UNLOCK_ZONE(zone);

return (result);

}

dns_zone_setacache(dns_zone_t *zone, dns_acache_t *acache) {

REQUIRE(DNS_ZONE_VALID(zone));

REQUIRE(acache != NULL);

LOCK_ZONE(zone);

if (zone->acache != NULL)

dns_acache_detach(&zone->acache);

dns_acache_attach(acache, &zone->acache);

ZONEDB_LOCK(&zone->dblock, isc_rwlocktype_read);

if (zone->db != NULL) {

isc_result_t result;

/*

result = dns_acache_setdb(acache, zone->db);

if (result != ISC_R_SUCCESS && result != ISC_R_EXISTS) {

UNEXPECTED_ERROR(__FILE__, __LINE__,

"dns_acache_setdb() failed: %s",

isc_result_totext(result));

}

}

ZONEDB_UNLOCK(&zone->dblock, isc_rwlocktype_read);

UNLOCK_ZONE(zone);

}

static isc_result_t

dns_zone_setstring(dns_zone_t *zone, char **field, const char *value) {

char *copy;

if (value != NULL) {

copy = isc_mem_strdup(zone->mctx, value);

if (copy == NULL)

return (ISC_R_NOMEMORY);

} else {

copy = NULL;

}

if (*field != NULL)

isc_mem_free(zone->mctx, *field);

*field = copy;

return (ISC_R_SUCCESS);

}

dns_zone_setfile(dns_zone_t *zone, const char *file) {

return (dns_zone_setfile2(zone, file, dns_masterformat_text));

}

dns_zone_setfile2(dns_zone_t *zone, const char *file,

dns_masterformat_t format) {

isc_result_t result = ISC_R_SUCCESS;

REQUIRE(DNS_ZONE_VALID(zone));

LOCK_ZONE(zone);

result = dns_zone_setstring(zone, &zone->masterfile, file);

if (result == ISC_R_SUCCESS) {

zone->masterformat = format;

result = default_journal(zone);

}

UNLOCK_ZONE(zone);

return (result);

}

const char *

dns_zone_getfile(dns_zone_t *zone) {

REQUIRE(DNS_ZONE_VALID(zone));

return (zone->masterfile);

}

static isc_result_t

default_journal(dns_zone_t *zone) {

isc_result_t result;

char *journal;

REQUIRE(DNS_ZONE_VALID(zone));

REQUIRE(LOCKED_ZONE(zone));

if (zone->masterfile != NULL) {

/* Calculate string length including '\0'. */

int len = strlen(zone->masterfile) + sizeof(".jnl");

journal = isc_mem_allocate(zone->mctx, len);

if (journal == NULL)

return (ISC_R_NOMEMORY);

strcpy(journal, zone->masterfile);

strcat(journal, ".jnl");

} else {

journal = NULL;

}

result = dns_zone_setstring(zone, &zone->journal, journal);

if (journal != NULL)

isc_mem_free(zone->mctx, journal);

return (result);

}

dns_zone_setjournal(dns_zone_t *zone, const char *journal) {

isc_result_t result = ISC_R_SUCCESS;

REQUIRE(DNS_ZONE_VALID(zone));

LOCK_ZONE(zone);

result = dns_zone_setstring(zone, &zone->journal, journal);

UNLOCK_ZONE(zone);

return (result);

}

char *

dns_zone_getjournal(dns_zone_t *zone) {

REQUIRE(DNS_ZONE_VALID(zone));

return (zone->journal);

}

static isc_boolean_t

zone_isdynamic(dns_zone_t *zone) {

REQUIRE(DNS_ZONE_VALID(zone));

return (ISC_TF(zone->type == dns_zone_slave ||

zone->type == dns_zone_stub ||

(!zone->update_disabled && zone->ssutable != NULL) ||

(!zone->update_disabled && zone->update_acl != NULL &&

! (zone->update_acl->length == 1 &&

zone->update_acl->elements[0].negative == ISC_TRUE

&&

zone->update_acl->elements[0].type ==

dns_aclelementtype_any))));

}

static isc_result_t

zone_load(dns_zone_t *zone, unsigned int flags) {

isc_result_t result;

isc_time_t now;

isc_time_t loadtime, filetime;

dns_db_t *db = NULL;

REQUIRE(DNS_ZONE_VALID(zone));

LOCK_ZONE(zone);

TIME_NOW(&now);

INSIST(zone->type != dns_zone_none);

if (DNS_ZONE_FLAG(zone, DNS_ZONEFLG_LOADING)) {

result = ISC_R_SUCCESS;

goto cleanup;

}

if (zone->db != NULL && zone->masterfile == NULL) {

/*

result = ISC_R_SUCCESS;

goto cleanup;

}

if (zone->db != NULL && zone_isdynamic(zone)) {

/*

if (zone->type == dns_zone_master)

result = DNS_R_DYNAMIC;

else

result = ISC_R_SUCCESS;

goto cleanup;

}

/*

TIME_NOW(&loadtime);

/*

if (zone->masterfile != NULL) {

/*

if (!isc_time_isepoch(&zone->loadtime) &&

(flags & DNS_ZONELOADFLAG_NOSTAT) != 0) {

result = ISC_R_SUCCESS;

goto cleanup;

}

result = isc_file_getmodtime(zone->masterfile, &filetime);

if (result == ISC_R_SUCCESS) {

if (!DNS_ZONE_FLAG(zone, DNS_ZONEFLG_HASINCLUDE) &&

isc_time_compare(&filetime, &zone->loadtime) <= 0) {

dns_zone_log(zone, ISC_LOG_DEBUG(1),

"skipping load: master file "

"older than last load");

result = DNS_R_UPTODATE;

goto cleanup;

}

loadtime = filetime;

}

}

INSIST(zone->db_argc >= 1);

/*

if (zone->type == dns_zone_master &&

strcmp(zone->db_argv[0], "_builtin") == 0 &&

DNS_ZONE_FLAG(zone, DNS_ZONEFLG_LOADED)) {

result = ISC_R_SUCCESS;

goto cleanup;

}

if ((zone->type == dns_zone_slave || zone->type == dns_zone_stub) &&

(strcmp(zone->db_argv[0], "rbt") == 0 ||

strcmp(zone->db_argv[0], "rbt64") == 0)) {

if (zone->masterfile == NULL ||

!isc_file_exists(zone->masterfile)) {

if (zone->masterfile != NULL) {

dns_zone_log(zone, ISC_LOG_DEBUG(1),

"no master file");

}

zone->refreshtime = now;

if (zone->task != NULL)

zone_settimer(zone, &now);

result = ISC_R_SUCCESS;

goto cleanup;

}

}

dns_zone_log(zone, ISC_LOG_DEBUG(1), "starting load");

result = dns_db_create(zone->mctx, zone->db_argv[0],

&zone->origin, (zone->type == dns_zone_stub) ?

dns_dbtype_stub : dns_dbtype_zone,

zone->rdclass,

zone->db_argc - 1, zone->db_argv + 1,

&db);

if (result != ISC_R_SUCCESS) {

dns_zone_log(zone, ISC_LOG_ERROR,

"loading zone: creating database: %s",

isc_result_totext(result));

goto cleanup;

}

dns_db_settask(db, zone->task);

if (! dns_db_ispersistent(db)) {

if (zone->masterfile != NULL) {

result = zone_startload(db, zone, loadtime);

} else {

result = DNS_R_NOMASTERFILE;

if (zone->type == dns_zone_master) {

dns_zone_log(zone, ISC_LOG_ERROR,

"loading zone: "

"no master file configured");

goto cleanup;

}

dns_zone_log(zone, ISC_LOG_INFO, "loading zone: "

"no master file configured: continuing");

}

}

if (result == DNS_R_CONTINUE) {

DNS_ZONE_SETFLAG(zone, DNS_ZONEFLG_LOADING);

goto cleanup;

}

result = zone_postload(zone, db, loadtime, result);

cleanup:

UNLOCK_ZONE(zone);

if (db != NULL)

dns_db_detach(&db);

return (result);

}

dns_zone_load(dns_zone_t *zone) {

return (zone_load(zone, 0));

}

dns_zone_loadnew(dns_zone_t *zone) {

return (zone_load(zone, DNS_ZONELOADFLAG_NOSTAT));

}

static void

zone_gotreadhandle(isc_task_t *task, isc_event_t *event) {

dns_load_t *load = event->ev_arg;

isc_result_t result = ISC_R_SUCCESS;

unsigned int options;

REQUIRE(DNS_LOAD_VALID(load));

if ((event->ev_attributes & ISC_EVENTATTR_CANCELED) != 0)

result = ISC_R_CANCELED;

isc_event_free(&event);

if (result == ISC_R_CANCELED)

goto fail;

options = DNS_MASTER_ZONE;

if (load->zone->type == dns_zone_slave)

options |= DNS_MASTER_SLAVE;

if (DNS_ZONE_OPTION(load->zone, DNS_ZONEOPT_CHECKNS))

options |= DNS_MASTER_CHECKNS;

if (DNS_ZONE_OPTION(load->zone, DNS_ZONEOPT_FATALNS))

options |= DNS_MASTER_FATALNS;

if (DNS_ZONE_OPTION(load->zone, DNS_ZONEOPT_CHECKNAMES))

options |= DNS_MASTER_CHECKNAMES;

if (DNS_ZONE_OPTION(load->zone, DNS_ZONEOPT_CHECKNAMESFAIL))

options |= DNS_MASTER_CHECKNAMESFAIL;

if (DNS_ZONE_OPTION(load->zone, DNS_ZONEOPT_CHECKMX))

options |= DNS_MASTER_CHECKMX;

if (DNS_ZONE_OPTION(load->zone, DNS_ZONEOPT_CHECKMXFAIL))

options |= DNS_MASTER_CHECKMXFAIL;

if (DNS_ZONE_OPTION(load->zone, DNS_ZONEOPT_CHECKWILDCARD))

options |= DNS_MASTER_CHECKWILDCARD;

result = dns_master_loadfileinc2(load->zone->masterfile,

dns_db_origin(load->db),

dns_db_origin(load->db),

load->zone->rdclass,

options,

&load->callbacks, task,

zone_loaddone, load,

&load->zone->lctx, load->zone->mctx,

load->zone->masterformat);

if (result != ISC_R_SUCCESS && result != DNS_R_CONTINUE &&

result != DNS_R_SEENINCLUDE)

goto fail;

return;

fail:

zone_loaddone(load, result);

}

static void

zone_gotwritehandle(isc_task_t *task, isc_event_t *event) {

const char me[] = "zone_gotwritehandle";

dns_zone_t *zone = event->ev_arg;

isc_result_t result = ISC_R_SUCCESS;

dns_dbversion_t *version = NULL;

REQUIRE(DNS_ZONE_VALID(zone));

INSIST(task == zone->task);

ENTER;

if ((event->ev_attributes & ISC_EVENTATTR_CANCELED) != 0)

result = ISC_R_CANCELED;

isc_event_free(&event);

if (result == ISC_R_CANCELED)

goto fail;

LOCK_ZONE(zone);

ZONEDB_LOCK(&zone->dblock, isc_rwlocktype_read);

dns_db_currentversion(zone->db, &version);

result = dns_master_dumpinc2(zone->mctx, zone->db, version,

&dns_master_style_default,

zone->masterfile, zone->task, dump_done,

zone, &zone->dctx, zone->masterformat);

dns_db_closeversion(zone->db, &version, ISC_FALSE);

ZONEDB_UNLOCK(&zone->dblock, isc_rwlocktype_read);

UNLOCK_ZONE(zone);

if (result != DNS_R_CONTINUE)

goto fail;

return;

fail:

dump_done(zone, result);

}

static isc_result_t

zone_startload(dns_db_t *db, dns_zone_t *zone, isc_time_t loadtime) {

dns_load_t *load;

isc_result_t result;

isc_result_t tresult;

unsigned int options;

options = DNS_MASTER_ZONE;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_MANYERRORS))

options |= DNS_MASTER_MANYERRORS;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_CHECKNS))

options |= DNS_MASTER_CHECKNS;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_FATALNS))

options |= DNS_MASTER_FATALNS;

if (zone->type == dns_zone_slave)

options |= DNS_MASTER_SLAVE;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_CHECKNAMES))

options |= DNS_MASTER_CHECKNAMES;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_CHECKNAMESFAIL))

options |= DNS_MASTER_CHECKNAMESFAIL;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_CHECKMX))

options |= DNS_MASTER_CHECKMX;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_CHECKMXFAIL))

options |= DNS_MASTER_CHECKMXFAIL;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_CHECKWILDCARD))

options |= DNS_MASTER_CHECKWILDCARD;

if (zone->zmgr != NULL && zone->db != NULL && zone->task != NULL) {

load = isc_mem_get(zone->mctx, sizeof(*load));

if (load == NULL)

return (ISC_R_NOMEMORY);

load->mctx = NULL;

load->zone = NULL;

load->db = NULL;

load->loadtime = loadtime;

load->magic = LOAD_MAGIC;

isc_mem_attach(zone->mctx, &load->mctx);

zone_iattach(zone, &load->zone);

dns_db_attach(db, &load->db);

dns_rdatacallbacks_init(&load->callbacks);

result = dns_db_beginload(db, &load->callbacks.add,

&load->callbacks.add_private);

if (result != ISC_R_SUCCESS)

goto cleanup;

result = zonemgr_getio(zone->zmgr, ISC_TRUE, zone->task,

zone_gotreadhandle, load,

&zone->readio);

if (result != ISC_R_SUCCESS) {

/*

(void)dns_db_endload(load->db,

&load->callbacks.add_private);

goto cleanup;

} else

result = DNS_R_CONTINUE;

} else {

dns_rdatacallbacks_t callbacks;

dns_rdatacallbacks_init(&callbacks);

result = dns_db_beginload(db, &callbacks.add,

&callbacks.add_private);

if (result != ISC_R_SUCCESS)

return (result);

result = dns_master_loadfile2(zone->masterfile, &zone->origin,

&zone->origin, zone->rdclass,

options, &callbacks, zone->mctx,

zone->masterformat);

tresult = dns_db_endload(db, &callbacks.add_private);

if (result == ISC_R_SUCCESS)

result = tresult;

}

return (result);

cleanup:

load->magic = 0;

dns_db_detach(&load->db);

zone_idetach(&load->zone);

isc_mem_detach(&load->mctx);

isc_mem_put(zone->mctx, load, sizeof(*load));

return (result);

}

static isc_boolean_t

zone_check_mx(dns_zone_t *zone, dns_db_t *db, dns_name_t *name,

dns_name_t *owner)

{

isc_result_t result;

char ownerbuf[DNS_NAME_FORMATSIZE];

char namebuf[DNS_NAME_FORMATSIZE];

char altbuf[DNS_NAME_FORMATSIZE];

dns_fixedname_t fixed;

dns_name_t *foundname;

int level;

/*

if (!dns_name_issubdomain(name, &zone->origin)) {

if (zone->checkmx != NULL)

return ((zone->checkmx)(zone, name, owner));

return (ISC_TRUE);

}

if (zone->type == dns_zone_master)

level = ISC_LOG_ERROR;

else

level = ISC_LOG_WARNING;

dns_fixedname_init(&fixed);

foundname = dns_fixedname_name(&fixed);

result = dns_db_find(db, name, NULL, dns_rdatatype_a,

0, 0, NULL, foundname, NULL, NULL);

if (result == ISC_R_SUCCESS)

return (ISC_TRUE);

if (result == DNS_R_NXRRSET) {

result = dns_db_find(db, name, NULL, dns_rdatatype_aaaa,

0, 0, NULL, foundname, NULL, NULL);

if (result == ISC_R_SUCCESS)

return (ISC_TRUE);

}

dns_name_format(owner, ownerbuf, sizeof ownerbuf);

dns_name_format(name, namebuf, sizeof namebuf);

if (result == DNS_R_NXRRSET || result == DNS_R_NXDOMAIN ||

result == DNS_R_EMPTYNAME) {

dns_zone_log(zone, level,

"%s/MX '%s' has no address records (A or AAAA)",

ownerbuf, namebuf);

/* XXX950 make fatal for 9.5.0. */

return (ISC_TRUE);

}

if (result == DNS_R_CNAME) {

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_WARNMXCNAME) ||

DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IGNOREMXCNAME))

level = ISC_LOG_WARNING;

if (!DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IGNOREMXCNAME))

dns_zone_log(zone, level,

"%s/MX '%s' is a CNAME (illegal)",

ownerbuf, namebuf);

return ((level == ISC_LOG_WARNING) ? ISC_TRUE : ISC_FALSE);

}

if (result == DNS_R_DNAME) {

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_WARNMXCNAME) ||

DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IGNOREMXCNAME))

level = ISC_LOG_WARNING;

if (!DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IGNOREMXCNAME)) {

dns_name_format(foundname, altbuf, sizeof altbuf);

dns_zone_log(zone, level, "%s/MX '%s' is below a DNAME"

" '%s' (illegal)", ownerbuf, namebuf,

altbuf);

}

return ((level == ISC_LOG_WARNING) ? ISC_TRUE : ISC_FALSE);

}

if (zone->checkmx != NULL && result == DNS_R_DELEGATION)

return ((zone->checkmx)(zone, name, owner));

return (ISC_TRUE);

}

static isc_boolean_t

zone_check_srv(dns_zone_t *zone, dns_db_t *db, dns_name_t *name,

dns_name_t *owner)

{

isc_result_t result;

char ownerbuf[DNS_NAME_FORMATSIZE];

char namebuf[DNS_NAME_FORMATSIZE];

char altbuf[DNS_NAME_FORMATSIZE];

dns_fixedname_t fixed;

dns_name_t *foundname;

int level;

/*

if (dns_name_equal(name, dns_rootname))

return (ISC_TRUE);

/*

if (!dns_name_issubdomain(name, &zone->origin)) {

if (zone->checksrv != NULL)

return ((zone->checksrv)(zone, name, owner));

return (ISC_TRUE);

}

if (zone->type == dns_zone_master)

level = ISC_LOG_ERROR;

else

level = ISC_LOG_WARNING;

dns_fixedname_init(&fixed);

foundname = dns_fixedname_name(&fixed);

result = dns_db_find(db, name, NULL, dns_rdatatype_a,

0, 0, NULL, foundname, NULL, NULL);

if (result == ISC_R_SUCCESS)

return (ISC_TRUE);

if (result == DNS_R_NXRRSET) {

result = dns_db_find(db, name, NULL, dns_rdatatype_aaaa,

0, 0, NULL, foundname, NULL, NULL);

if (result == ISC_R_SUCCESS)

return (ISC_TRUE);

}

dns_name_format(owner, ownerbuf, sizeof ownerbuf);

dns_name_format(name, namebuf, sizeof namebuf);

if (result == DNS_R_NXRRSET || result == DNS_R_NXDOMAIN ||

result == DNS_R_EMPTYNAME) {

dns_zone_log(zone, level,

"%s/SRV '%s' has no address records (A or AAAA)",

ownerbuf, namebuf);

/* XXX950 make fatal for 9.5.0. */

return (ISC_TRUE);

}

if (result == DNS_R_CNAME) {

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_WARNSRVCNAME) ||

DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IGNORESRVCNAME))

level = ISC_LOG_WARNING;

if (!DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IGNORESRVCNAME))

dns_zone_log(zone, level,

"%s/SRV '%s' is a CNAME (illegal)",

ownerbuf, namebuf);

return ((level == ISC_LOG_WARNING) ? ISC_TRUE : ISC_FALSE);

}

if (result == DNS_R_DNAME) {

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_WARNSRVCNAME) ||

DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IGNORESRVCNAME))

level = ISC_LOG_WARNING;

if (!DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IGNORESRVCNAME)) {

dns_name_format(foundname, altbuf, sizeof altbuf);

dns_zone_log(zone, level, "%s/SRV '%s' is below a "

"DNAME '%s' (illegal)", ownerbuf, namebuf,

altbuf);

}

return ((level == ISC_LOG_WARNING) ? ISC_TRUE : ISC_FALSE);

}

if (zone->checksrv != NULL && result == DNS_R_DELEGATION)

return ((zone->checksrv)(zone, name, owner));

return (ISC_TRUE);

}

static isc_boolean_t

zone_check_glue(dns_zone_t *zone, dns_db_t *db, dns_name_t *name,

dns_name_t *owner)

{

isc_boolean_t answer = ISC_TRUE;

isc_result_t result, tresult;

char ownerbuf[DNS_NAME_FORMATSIZE];

char namebuf[DNS_NAME_FORMATSIZE];

char altbuf[DNS_NAME_FORMATSIZE];

dns_fixedname_t fixed;

dns_name_t *foundname;

dns_rdataset_t a;

dns_rdataset_t aaaa;

int level;

/*

if (!dns_name_issubdomain(name, &zone->origin)) {

if (zone->checkns != NULL)

return ((zone->checkns)(zone, name, owner, NULL, NULL));

return (ISC_TRUE);

}

if (zone->type == dns_zone_master)

level = ISC_LOG_ERROR;

else

level = ISC_LOG_WARNING;

dns_fixedname_init(&fixed);

foundname = dns_fixedname_name(&fixed);

dns_rdataset_init(&a);

dns_rdataset_init(&aaaa);

result = dns_db_find(db, name, NULL, dns_rdatatype_a,

DNS_DBFIND_GLUEOK, 0, NULL,

foundname, &a, NULL);

if (result == ISC_R_SUCCESS) {

dns_rdataset_disassociate(&a);

return (ISC_TRUE);

} else if (result == DNS_R_DELEGATION)

dns_rdataset_disassociate(&a);

if (result == DNS_R_NXRRSET || result == DNS_R_DELEGATION ||

result == DNS_R_GLUE) {

tresult = dns_db_find(db, name, NULL, dns_rdatatype_aaaa,

DNS_DBFIND_GLUEOK, 0, NULL,

foundname, &aaaa, NULL);

if (tresult == ISC_R_SUCCESS) {

dns_rdataset_disassociate(&aaaa);

return (ISC_TRUE);

}

if (tresult == DNS_R_DELEGATION)

dns_rdataset_disassociate(&aaaa);

if (result == DNS_R_GLUE || tresult == DNS_R_GLUE) {

/*

if (zone->checkns != NULL)

answer = (zone->checkns)(zone, name, owner,

&a, &aaaa);

if (dns_rdataset_isassociated(&a))

dns_rdataset_disassociate(&a);

if (dns_rdataset_isassociated(&aaaa))

dns_rdataset_disassociate(&aaaa);

return (answer);

}

} else

tresult = result;

dns_name_format(owner, ownerbuf, sizeof ownerbuf);

dns_name_format(name, namebuf, sizeof namebuf);

if (result == DNS_R_NXRRSET || result == DNS_R_NXDOMAIN ||

result == DNS_R_EMPTYNAME || result == DNS_R_DELEGATION) {

const char *what;

if (dns_name_issubdomain(name, owner))

what = "REQUIRED GLUE ";

else if (result == DNS_R_DELEGATION)

what = "SIBLING GLUE ";

else

what = "";

if (result != DNS_R_DELEGATION ||

DNS_ZONE_OPTION(zone, DNS_ZONEOPT_CHECKSIBLING)) {

dns_zone_log(zone, level, "%s/NS '%s' has no %s"

"address records (A or AAAA)",

ownerbuf, namebuf, what);

/*

if (result == DNS_R_DELEGATION && zone->checkns != NULL)

(void)(zone->checkns)(zone, name, owner,

&a, &aaaa);

/* XXX950 make fatal for 9.5.0. */

/* answer = ISC_FALSE; */

}

} else if (result == DNS_R_CNAME) {

dns_zone_log(zone, level, "%s/NS '%s' is a CNAME (illegal)",

ownerbuf, namebuf);

/* XXX950 make fatal for 9.5.0. */

/* answer = ISC_FALSE; */

} else if (result == DNS_R_DNAME) {

dns_name_format(foundname, altbuf, sizeof altbuf);

dns_zone_log(zone, level,

"%s/NS '%s' is below a DNAME '%s' (illegal)",

ownerbuf, namebuf, altbuf);

/* XXX950 make fatal for 9.5.0. */

/* answer = ISC_FALSE; */

}

if (dns_rdataset_isassociated(&a))

dns_rdataset_disassociate(&a);

if (dns_rdataset_isassociated(&aaaa))

dns_rdataset_disassociate(&aaaa);

return (answer);

}

static isc_boolean_t

integrity_checks(dns_zone_t *zone, dns_db_t *db) {

dns_dbiterator_t *dbiterator = NULL;

dns_dbnode_t *node = NULL;

dns_rdataset_t rdataset;

dns_fixedname_t fixed;

dns_fixedname_t fixedbottom;

dns_rdata_mx_t mx;

dns_rdata_ns_t ns;

dns_rdata_in_srv_t srv;

dns_rdata_t rdata;

dns_name_t *name;

dns_name_t *bottom;

isc_result_t result;

isc_boolean_t ok = ISC_TRUE;

dns_fixedname_init(&fixed);

name = dns_fixedname_name(&fixed);

dns_fixedname_init(&fixedbottom);

bottom = dns_fixedname_name(&fixedbottom);

dns_rdataset_init(&rdataset);

dns_rdata_init(&rdata);

result = dns_db_createiterator(db, ISC_FALSE, &dbiterator);

if (result != ISC_R_SUCCESS)

return (ISC_TRUE);

result = dns_dbiterator_first(dbiterator);

while (result == ISC_R_SUCCESS) {

result = dns_dbiterator_current(dbiterator, &node, name);

if (result != ISC_R_SUCCESS)

goto cleanup;

/*

if (!dns_name_issubdomain(name, &zone->origin) ||

(dns_name_countlabels(bottom) > 0 &&

dns_name_issubdomain(name, bottom)))

goto next;

/*

if (dns_name_equal(name, &zone->origin))

goto checkmx;

result = dns_db_findrdataset(db, node, NULL, dns_rdatatype_ns,

0, 0, &rdataset, NULL);

if (result != ISC_R_SUCCESS)

goto checkmx;

/*

dns_name_copy(name, bottom, NULL);

result = dns_rdataset_first(&rdataset);

while (result == ISC_R_SUCCESS) {

dns_rdataset_current(&rdataset, &rdata);

result = dns_rdata_tostruct(&rdata, &ns, NULL);

RUNTIME_CHECK(result == ISC_R_SUCCESS);

if (!zone_check_glue(zone, db, &ns.name, name))

ok = ISC_FALSE;

dns_rdata_reset(&rdata);

result = dns_rdataset_next(&rdataset);

}

dns_rdataset_disassociate(&rdataset);

checkmx:

result = dns_db_findrdataset(db, node, NULL, dns_rdatatype_mx,

0, 0, &rdataset, NULL);

if (result != ISC_R_SUCCESS)

goto checksrv;

result = dns_rdataset_first(&rdataset);

while (result == ISC_R_SUCCESS) {

dns_rdataset_current(&rdataset, &rdata);

result = dns_rdata_tostruct(&rdata, &mx, NULL);

RUNTIME_CHECK(result == ISC_R_SUCCESS);

if (!zone_check_mx(zone, db, &mx.mx, name))

ok = ISC_FALSE;

dns_rdata_reset(&rdata);

result = dns_rdataset_next(&rdataset);

}

dns_rdataset_disassociate(&rdataset);

checksrv:

if (zone->rdclass != dns_rdataclass_in)

goto next;

result = dns_db_findrdataset(db, node, NULL, dns_rdatatype_srv,

0, 0, &rdataset, NULL);

if (result != ISC_R_SUCCESS)

goto next;

result = dns_rdataset_first(&rdataset);

while (result == ISC_R_SUCCESS) {

dns_rdataset_current(&rdataset, &rdata);

result = dns_rdata_tostruct(&rdata, &srv, NULL);

RUNTIME_CHECK(result == ISC_R_SUCCESS);

if (!zone_check_srv(zone, db, &srv.target, name))

ok = ISC_FALSE;

dns_rdata_reset(&rdata);

result = dns_rdataset_next(&rdataset);

}

dns_rdataset_disassociate(&rdataset);

next:

dns_db_detachnode(db, &node);

result = dns_dbiterator_next(dbiterator);

}

cleanup:

if (node != NULL)

dns_db_detachnode(db, &node);

dns_dbiterator_destroy(&dbiterator);

return (ok);

}

static void

zone_check_dnskeys(dns_zone_t *zone, dns_db_t *db) {

dns_dbnode_t *node = NULL;

dns_dbversion_t *version = NULL;

dns_rdata_dnskey_t dnskey;

dns_rdata_t rdata = DNS_RDATA_INIT;

dns_rdataset_t rdataset;

isc_result_t result;

isc_boolean_t logit, foundrsa = ISC_FALSE, foundmd5 = ISC_FALSE;

const char *algorithm;

result = dns_db_findnode(db, &zone->origin, ISC_FALSE, &node);

if (result != ISC_R_SUCCESS)

goto cleanup;

dns_db_currentversion(db, &version);

dns_rdataset_init(&rdataset);

result = dns_db_findrdataset(db, node, version, dns_rdatatype_dnskey,

dns_rdatatype_none, 0, &rdataset, NULL);

if (result != ISC_R_SUCCESS)

goto cleanup;

for (result = dns_rdataset_first(&rdataset);

result == ISC_R_SUCCESS;

result = dns_rdataset_next(&rdataset))

{

dns_rdataset_current(&rdataset, &rdata);

result = dns_rdata_tostruct(&rdata, &dnskey, NULL);

INSIST(result == ISC_R_SUCCESS);

if ((dnskey.algorithm == DST_ALG_RSASHA1 ||

dnskey.algorithm == DST_ALG_RSAMD5) &&

dnskey.datalen > 1 && dnskey.data[0] == 1 &&

dnskey.data[1] == 3)

{

if (dnskey.algorithm == DST_ALG_RSASHA1) {

logit = !foundrsa;

foundrsa = ISC_TRUE;

algorithm = "RSASHA1";

} else {

logit = !foundmd5;

foundmd5 = ISC_TRUE;

algorithm = "RSAMD5";

}

if (logit)

dns_zone_log(zone, ISC_LOG_WARNING,

"weak %s (%u) key found "

"(exponent=3)", algorithm,

dnskey.algorithm);

if (foundrsa && foundmd5)

break;

}

dns_rdata_reset(&rdata);

}

dns_rdataset_disassociate(&rdataset);

cleanup:

if (node != NULL)

dns_db_detachnode(db, &node);

if (version != NULL)

dns_db_closeversion(db, &version, ISC_FALSE);

}

static isc_result_t

zone_postload(dns_zone_t *zone, dns_db_t *db, isc_time_t loadtime,

isc_result_t result)

{

unsigned int soacount = 0;

unsigned int nscount = 0;

unsigned int errors = 0;

isc_uint32_t serial, refresh, retry, expire, minimum;

isc_time_t now;

isc_boolean_t needdump = ISC_FALSE;

isc_boolean_t hasinclude = DNS_ZONE_FLAG(zone, DNS_ZONEFLG_HASINCLUDE);

TIME_NOW(&now);

/*

if (result != ISC_R_SUCCESS && result != DNS_R_SEENINCLUDE) {

if (zone->type == dns_zone_slave ||

zone->type == dns_zone_stub) {

if (result == ISC_R_FILENOTFOUND)

dns_zone_log(zone, ISC_LOG_DEBUG(1),

"no master file");

else if (result != DNS_R_NOMASTERFILE)

dns_zone_log(zone, ISC_LOG_ERROR,

"loading from master file %s "

"failed: %s",

zone->masterfile,

dns_result_totext(result));

} else

dns_zone_log(zone, ISC_LOG_ERROR,

"loading from master file %s failed: %s",

zone->masterfile,

dns_result_totext(result));

goto cleanup;

}

dns_zone_log(zone, ISC_LOG_DEBUG(2),

"number of nodes in database: %u",

dns_db_nodecount(db));

if (result == DNS_R_SEENINCLUDE)

DNS_ZONE_SETFLAG(zone, DNS_ZONEFLG_HASINCLUDE);

else

DNS_ZONE_CLRFLAG(zone, DNS_ZONEFLG_HASINCLUDE);

/*

if (zone->journal != NULL &&

! DNS_ZONE_OPTION(zone, DNS_ZONEOPT_NOMERGE) &&

! DNS_ZONE_FLAG(zone, DNS_ZONEFLG_LOADED))

{

result = dns_journal_rollforward(zone->mctx, db,

zone->journal);

if (result != ISC_R_SUCCESS && result != ISC_R_NOTFOUND &&

result != DNS_R_UPTODATE && result != DNS_R_NOJOURNAL &&

result != ISC_R_RANGE) {

dns_zone_log(zone, ISC_LOG_ERROR,

"journal rollforward failed: %s",

dns_result_totext(result));

goto cleanup;

}

if (result == ISC_R_NOTFOUND || result == ISC_R_RANGE) {

dns_zone_log(zone, ISC_LOG_ERROR,

"journal rollforward failed: "

"journal out of sync with zone");

goto cleanup;

}

dns_zone_log(zone, ISC_LOG_DEBUG(1),

"journal rollforward completed "

"successfully: %s",

dns_result_totext(result));

if (result == ISC_R_SUCCESS)

needdump = ISC_TRUE;

}

zone->loadtime = loadtime;

dns_zone_log(zone, ISC_LOG_DEBUG(1), "loaded");

/*

INSIST(db != NULL);

result = zone_get_from_db(zone, db, &nscount, &soacount, &serial,

&refresh, &retry, &expire, &minimum,

&errors);

if (result != ISC_R_SUCCESS) {

dns_zone_log(zone, ISC_LOG_ERROR,

"could not find NS and/or SOA records");

}

/*

switch (zone->type) {

case dns_zone_master:

case dns_zone_slave:

case dns_zone_stub:

if (soacount != 1) {

dns_zone_log(zone, ISC_LOG_ERROR,

"has %d SOA records", soacount);

result = DNS_R_BADZONE;

}

if (nscount == 0) {

dns_zone_log(zone, ISC_LOG_ERROR,

"has no NS records");

result = DNS_R_BADZONE;

}

if (result != ISC_R_SUCCESS)

goto cleanup;

if (zone->type == dns_zone_master && errors != 0) {

result = DNS_R_BADZONE;

goto cleanup;

}

if (zone->type == dns_zone_master &&

DNS_ZONE_OPTION(zone, DNS_ZONEOPT_CHECKINTEGRITY) &&

!integrity_checks(zone, db)) {

result = DNS_R_BADZONE;

goto cleanup;

}

if (zone->db != NULL) {

/*

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_IXFRFROMDIFFS) &&

!isc_serial_gt(serial, zone->serial)) {

isc_uint32_t serialmin, serialmax;

INSIST(zone->type == dns_zone_master);

serialmin = (zone->serial + 1) & 0xffffffffU;

serialmax = (zone->serial + 0x7fffffffU) &

0xffffffffU;

dns_zone_log(zone, ISC_LOG_ERROR,

"ixfr-from-differences: "

"new serial (%u) out of range "

"[%u - %u]", serial, serialmin,

serialmax);

result = DNS_R_BADZONE;

goto cleanup;

} else if (!isc_serial_ge(serial, zone->serial))

dns_zone_log(zone, ISC_LOG_ERROR,

"zone serial has gone backwards");

else if (serial == zone->serial && !hasinclude)

dns_zone_log(zone, ISC_LOG_ERROR,

"zone serial unchanged. "

"zone may fail to transfer "

"to slaves.");

}

zone->serial = serial;

zone->refresh = RANGE(refresh,

zone->minrefresh, zone->maxrefresh);

zone->retry = RANGE(retry,

zone->minretry, zone->maxretry);

zone->expire = RANGE(expire, zone->refresh + zone->retry,

DNS_MAX_EXPIRE);

zone->minimum = minimum;

DNS_ZONE_SETFLAG(zone, DNS_ZONEFLG_HAVETIMERS);

if (zone->type == dns_zone_slave ||

zone->type == dns_zone_stub) {

isc_time_t t;

isc_uint32_t delay;

result = isc_file_getmodtime(zone->journal, &t);

if (result != ISC_R_SUCCESS)

result = isc_file_getmodtime(zone->masterfile,

&t);

if (result == ISC_R_SUCCESS)

DNS_ZONE_TIME_ADD(&t, zone->expire,

&zone->expiretime);

else

DNS_ZONE_TIME_ADD(&now, zone->retry,

&zone->expiretime);

delay = isc_random_jitter(zone->retry,

(zone->retry * 3) / 4);

DNS_ZONE_TIME_ADD(&now, delay, &zone->refreshtime);

if (isc_time_compare(&zone->refreshtime,

&zone->expiretime) >= 0)

zone->refreshtime = now;

}

break;

default:

UNEXPECTED_ERROR(__FILE__, __LINE__,

"unexpected zone type %d", zone->type);

result = ISC_R_UNEXPECTED;

goto cleanup;

}

/*

if (zone->type == dns_zone_master)

zone_check_dnskeys(zone, db);

#if 0

/* destroy notification example. */

{

isc_event_t *e = isc_event_allocate(zone->mctx, NULL,

DNS_EVENT_DBDESTROYED,

dns_zonemgr_dbdestroyed,

zone,

sizeof(isc_event_t));

dns_db_ondestroy(db, zone->task, &e);

}

#endif

ZONEDB_LOCK(&zone->dblock, isc_rwlocktype_write);

if (zone->db != NULL) {

result = zone_replacedb(zone, db, ISC_FALSE);

ZONEDB_UNLOCK(&zone->dblock, isc_rwlocktype_write);

if (result != ISC_R_SUCCESS)

goto cleanup;

} else {

zone_attachdb(zone, db);

ZONEDB_UNLOCK(&zone->dblock, isc_rwlocktype_write);

DNS_ZONE_SETFLAG(zone,

DNS_ZONEFLG_LOADED|DNS_ZONEFLG_NEEDNOTIFY);

}

result = ISC_R_SUCCESS;

if (needdump)

zone_needdump(zone, DNS_DUMP_DELAY);

if (zone->task != NULL)

zone_settimer(zone, &now);

if (! dns_db_ispersistent(db))

dns_zone_log(zone, ISC_LOG_INFO, "loaded serial %u%s",

zone->serial,

dns_db_issecure(db) ? " (signed)" : "");

return (result);

cleanup:

if (zone->type == dns_zone_slave ||

zone->type == dns_zone_stub) {

if (zone->journal != NULL)

zone_saveunique(zone, zone->journal, "jn-XXXXXXXX");

if (zone->masterfile != NULL)

zone_saveunique(zone, zone->masterfile, "db-XXXXXXXX");

/* Mark the zone for immediate refresh. */

zone->refreshtime = now;

if (zone->task != NULL)

zone_settimer(zone, &now);

result = ISC_R_SUCCESS;

}

return (result);

}

static isc_boolean_t

exit_check(dns_zone_t *zone) {

REQUIRE(LOCKED_ZONE(zone));

if (DNS_ZONE_FLAG(zone, DNS_ZONEFLG_SHUTDOWN) &&

zone->irefs == 0)

{

/*

INSIST(isc_refcount_current(&zone->erefs) == 0);

return (ISC_TRUE);

}

return (ISC_FALSE);

}

static isc_boolean_t

zone_check_ns(dns_zone_t *zone, dns_db_t *db, dns_name_t *name) {

isc_result_t result;

char namebuf[DNS_NAME_FORMATSIZE];

char altbuf[DNS_NAME_FORMATSIZE];

dns_fixedname_t fixed;

dns_name_t *foundname;

int level;

if (DNS_ZONE_OPTION(zone, DNS_ZONEOPT_NOCHECKNS))

return (ISC_TRUE);

if (zone->type == dns_zone_master)

level = ISC_LOG_ERROR;

else

level = ISC_LOG_WARNING;

dns_fixedname_init(&fixed);

foundname = dns_fixedname_name(&fixed);

result = dns_db_find(db, name, NULL, dns_rdatatype_a,

0, 0, NULL, foundname, NULL, NULL);

if (result == ISC_R_SUCCESS)

return (ISC_TRUE);

if (result == DNS_R_NXRRSET) {

result = dns_db_find(db, name, NULL, dns_rdatatype_aaaa,

0, 0, NULL, foundname, NULL, NULL);

if (result == ISC_R_SUCCESS)

return (ISC_TRUE);

}

dns_name_format(name, namebuf, sizeof namebuf);

if (result == DNS_R_NXRRSET || result == DNS_R_NXDOMAIN ||

result == DNS_R_EMPTYNAME) {

dns_zone_log(zone, level,

"NS '%s' has no address records (A or AAAA)",

namebuf);

/* XXX950 Make fatal ISC_FALSE for 9.5.0. */

return (ISC_TRUE);

}

if (result == DNS_R_CNAME) {

dns_zone_log(zone, level, "NS '%s' is a CNAME (illegal)",

namebuf);

/* XXX950 Make fatal ISC_FALSE for 9.5.0. */

return (ISC_TRUE);

}

if (result == DNS_R_DNAME) {

dns_name_format(foundname, altbuf, sizeof altbuf);

dns_zone_log(zone, level,

"NS '%s' is below a DNAME '%s' (illegal)",

namebuf, altbuf);

/* XXX950 Make fatal ISC_FALSE for 9.5.0. */

return (ISC_TRUE);

}

return (ISC_TRUE);

}

static isc_result_t

zone_count_ns_rr(dns_zone_t *zone, dns_db_t *db, dns_dbnode_t *node,

dns_dbversion_t *version, unsigned int *nscount,

unsigned int *errors)

{

isc_result_t result;

unsigned int count = 0;

unsigned int ecount = 0;

dns_rdataset_t rdataset;

dns_rdata_t rdata;

dns_rdata_ns_t ns;

dns_rdataset_init(&rdataset);

result = dns_db_findrdataset(db, node, version, dns_rdatatype_ns,

dns_rdatatype_none, 0, &rdataset, NULL);

if (result == ISC_R_NOTFOUND)

goto success;

if (result != ISC_R_SUCCESS)

goto invalidate_rdataset;

result = dns_rdataset_first(&rdataset);

while (result == ISC_R_SUCCESS) {

if (errors != NULL && zone->rdclass == dns_rdataclass_in &&

(zone->type == dns_zone_master ||

zone->type == dns_zone_slave)) {

dns_rdata_init(&rdata);

dns_rdataset_current(&rdataset, &rdata);

result = dns_rdata_tostruct(&rdata, &ns, NULL);

RUNTIME_CHECK(result == ISC_R_SUCCESS);

if (dns_name_issubdomain(&ns.name, &zone->origin) &&

!zone_check_ns(zone, db, &ns.name))

ecount++;

}

count++;

result = dns_rdataset_next(&rdataset);

}

dns_rdataset_disassociate(&rdataset);

success:

if (nscount != NULL)

*nscount = count;

if (errors != NULL)

*errors = ecount;

result = ISC_R_SUCCESS;

invalidate_rdataset:

dns_rdataset_invalidate(&rdataset);

return (result);

}

static isc_result_t

zone_load_soa_rr(dns_db_t *db, dns_dbnode_t *node, dns_dbversion_t *version,

unsigned int *soacount,

isc_uint32_t *serial, isc_uint32_t *refresh,

isc_uint32_t *retry, isc_uint32_t *expire,

isc_uint32_t *minimum)

{

isc_result_t result;

unsigned int count;

dns_rdataset_t rdataset;

dns_rdata_t rdata = DNS_RDATA_INIT;

dns_rdata_soa_t soa;

dns_rdataset_init(&rdataset);

result = dns_db_findrdataset(db, node, version, dns_rdatatype_soa,

dns_rdatatype_none, 0, &rdataset, NULL);

if (result == ISC_R_NOTFOUND) {