nsupdate.c revision 835658d2bee884e0ac619ee4519172050dee3800
/*
* Copyright (C) 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: nsupdate.c,v 1.18 2000/06/30 18:59:21 bwelling Exp $ */
#include <config.h>
#include <isc/condition.h>
#include <isc/commandline.h>
#include <isc/sockaddr.h>
#include <dns/callbacks.h>
#include <dns/dispatch.h>
#include <dns/rdataclass.h>
#include <dns/rdatalist.h>
#include <dns/rdataset.h>
#include <dns/rdatastruct.h>
#include <dns/rdatatype.h>
#include <ctype.h>
#include <netdb.h>
#include <stdlib.h>
#include <unistd.h>
#define MXNAME 256
#define MAXCMD 1024
#define NAMEBUF 512
#define WORDLEN 512
#define PACKETSIZE 2048
#define MSGTEXT 4096
#define FIND_TIMEOUT 5
#define RESOLV_CONF "/etc/resolv.conf"
static isc_mutex_t lock;
static isc_condition_t cond;
static int nameservers;
static int ns_inuse = 0;
static unsigned int ndots = 1;
dns_request_t **request);
#define STATUS_MORE 0
#define STATUS_SEND 1
#define STATUS_QUIT 2
#define STATUS_SYNTAX 3
static void
exit(1);
}
static void
if (debugging) {
}
}
static void
if (ddebugging) {
}
}
static void
if (result != ISC_R_SUCCESS)
}
/*
* Eat characters from FP until EOL or EOF. Returns EOF or '\n'
*/
static int
int ch;
return (ch);
}
/*
* Eats white space up to next newline or non-whitespace character (of
* EOF). Returns the last character read. Comments are considered white
* space.
*/
static int
int ch;
return (ch);
}
/*
* Skip over any leading whitespace and then read in the next sequence of
* non-whitespace characters. In this context newline is not considered
* whitespace. Returns EOF on end-of-file, or the character
* that caused the reading to stop.
*/
static int
int ch;
char *p = buffer;
*p = '\0';
return (EOF);
do {
*p = '\0';
break;
return (EOF); /* Not enough space. */
*p++ = (char)ch;
} while (1);
return (ch);
}
static char *
char *s;
const char *d;
return (NULL);
break;
}
if (dc == 0)
break;
}
for (s = string; *s != '\0'; s++) {
sc = *s;
*s++ = '\0';
*stringp = s;
return (string);
}
}
}
return (string);
}
static unsigned int
int i = 0;
while (*s != 0) {
if (*s++ == '.') {
i++;
*last_was_dot = ISC_TRUE;
} else
}
return (i);
}
static void
load_resolv_conf(void) {
char word[256];
ddebug ("load_resolv_conf()");
return;
do {
break;
ddebug ("Got a nameserver line");
if (nameservers >= 3) {
break;
continue;
}
break;
continue;
}
nameservers++;
continue;
char *endp;
if (*endp != 0)
fatal("ndots is not numeric\n");
}
}
break;
else
/* XXXMWS Searchlist not supported! */
break;
continue;
}
fatal("out of memory");
nameservers++;
}
break;
} while (ISC_TRUE);
}
static void
reset_system(void) {
ddebug ("reset_system()");
/* If the update message is still around, destroy it */
else {
&updatemsg);
}
}
}
else
}
static void
setup_system(void) {
ddebug("setup_system()");
/*
* Warning: This is not particularly good randomness. We'll
* just use random() now for getting id values, but doing so
* does NOT insure that id's can't be guessed.
*
* XXX Shouldn't random() be called somewhere if this is here?
*/
result = isc_app_start();
result = isc_net_probeipv4();
/* XXXMWS There isn't any actual V6 support in the code yet */
result = isc_net_probeipv6();
if (result == ISC_R_SUCCESS)
&dispatchv4);
}
else
char *secretstr;
unsigned char *secret;
int secretlen;
char *s;
debug("Creating key...");
fatal("key option must specify keyname:secret\n");
secretstr = s + 1;
debug("namefromtext");
fatal("out of memory");
if (result != ISC_R_SUCCESS) {
printf (";; Couldn't create key from %s: %s\n",
goto SYSSETUP_FAIL;
}
debug("close");
debug("keycreate");
if (result != ISC_R_SUCCESS) {
printf (";; Couldn't create key from %s: %s\n",
}
return;
}
}
static void
int ch;
debug("parse_args");
switch (ch) {
case 'd':
break;
case 'D': /* was -dd */
break;
case 'M': /* was -dm */
break;
case 'y':
break;
case 'v':
break;
case 'k':
break;
default:
exit(1);
}
}
}
static isc_uint16_t
char *word;
unsigned int dots;
ddebug ("make_prereq()");
/*
* Read the owner name
*/
if (*word == 0) {
puts("failed to read owner name");
return (STATUS_SYNTAX);
}
rn = dns_rootname;
/*
* If this is an rrset prereq, read the class or type.
*/
if (isrrset) {
if (*word == 0) {
puts("failed to read class or type");
return (STATUS_SYNTAX);
}
if (result == ISC_R_SUCCESS) {
/*
* Now read the type.
*/
if (*word == 0) {
puts("failed to read type");
return (STATUS_SYNTAX);
}
} else {
}
} else
if (isrrset && ispositive) {
cmdline++;
if (*cmdline != 0) {
if (result != ISC_R_SUCCESS) {
return (STATUS_MORE);
}
}
}
if (ispositive) {
else
} else
return (STATUS_MORE);
}
static isc_uint16_t
evaluate_prereq(char *cmdline) {
char *word;
ddebug ("evaluate_prereq()");
if (*word == 0) {
puts ("failed to read operation code");
return (STATUS_SYNTAX);
}
} else {
return (STATUS_SYNTAX);
}
}
static isc_uint16_t
evaluate_server(char *cmdline) {
printf("The server statement is not currently implemented.\n");
return (STATUS_MORE);
}
static isc_uint16_t
evaluate_zone(char *cmdline) {
printf("The zone statement is not currently implemented.\n");
return (STATUS_MORE);
}
static isc_uint16_t
char *word;
char *endp;
unsigned int dots;
ddebug ("update_addordelete()");
/*
* Read the owner name
*/
if (*word == 0) {
puts ("failed to read owner name");
return (STATUS_SYNTAX);
}
rn = dns_rootname;
/*
* If this is an add, read the TTL and verify that it's numeric.
*/
if (!isdelete) {
if (*word == 0) {
puts ("failed to read owner ttl");
return (STATUS_SYNTAX);
}
if (*endp != 0) {
return (STATUS_SYNTAX);
}
} else
ttl = 0;
/*
* Read the class or type.
*/
if (*word == 0) {
if (isdelete) {
goto doneparsing;
} else {
puts ("failed to read class or type");
return (STATUS_SYNTAX);
}
}
if (result == ISC_R_SUCCESS) {
/*
* Now read the type.
*/
if (*word == 0) {
if (isdelete) {
goto doneparsing;
} else {
puts ("failed to read type");
return (STATUS_SYNTAX);
}
}
} else {
}
cmdline++;
if (*cmdline == 0) {
if (isdelete) {
goto doneparsing;
} else {
puts ("failed to read owner data");
return (STATUS_SYNTAX);
}
}
&callbacks);
if (result != ISC_R_SUCCESS) {
return (STATUS_MORE);
}
if (isdelete)
return (STATUS_MORE);
}
static isc_uint16_t
evaluate_update(char *cmdline) {
char *word;
ddebug ("evaluate_update()");
if (*word == 0) {
puts ("failed to read operation code");
return (STATUS_SYNTAX);
}
else {
return (STATUS_SYNTAX);
}
}
static void
show_message(void) {
ddebug ("show_message()");
if (result != ISC_R_SUCCESS) {
printf("Failed to concert message to text format.\n");
return;
}
printf("Outgoing update query:\n%.*s",
(int)isc_buffer_usedlength(&buf),
(char*)isc_buffer_base(&buf));
}
static isc_uint16_t
get_next_command(void) {
char cmdlinebuf[MAXCMD];
char *cmdline;
char *word;
ddebug ("get_next_command()");
return (STATUS_QUIT);
if (*word == 0)
return (STATUS_SEND);
return (STATUS_QUIT);
return (evaluate_prereq(cmdline));
return (evaluate_update(cmdline));
return (evaluate_server(cmdline));
return (evaluate_zone(cmdline));
return (STATUS_SEND);
show_message();
return (STATUS_MORE);
}
return (STATUS_SYNTAX);
}
static isc_boolean_t
user_interaction(void) {
ddebug ("user_interaction()");
result = get_next_command();
if (result == STATUS_SEND)
return (ISC_TRUE);
return (ISC_FALSE);
}
static void
ddebug("get_address()");
else {
fatal("Couldn't look up your server host %s. errno=%d",
port);
}
}
static void
ddebug ("updated_completed()");
printf ("; Communication with server failed: %s\n",
goto done;
}
if (debugging) {
printf ("\nReply from update query:\n%.*s\n",
(int)isc_buffer_usedlength(&buf),
(char*)isc_buffer_base(&buf));
}
done:
}
static void
send_update(void) {
char servername[MXNAME];
unsigned int options = 0;
ddebug ("send_update()");
fatal("don't have a valid zone yet.");
if (usevc)
}
static void
int pass = 0;
ddebug ("find_completed()");
if (eresult != ISC_R_SUCCESS) {
printf ("; Communication with %s failed: %s\n",
ns_inuse++;
if (ns_inuse >= nameservers)
fatal ("Couldn't talk to any default nameserver.");
return;
}
ddebug ("About to create rcvmsg");
if (debugging) {
printf ("Reply from SOA query:\n%.*s\n",
(int)isc_buffer_usedlength(&buf),
(char*)isc_buffer_base(&buf));
}
fatal("response to SOA query was unsuccessful");
if (pass == 0)
else if (pass == 1)
else
fatal("response to SOA query didn't contain an SOA");
if (result != ISC_R_SUCCESS) {
pass++;
goto lookforsoa;
}
while (result == ISC_R_SUCCESS) {
&soaset);
if (result == ISC_R_SUCCESS)
break;
}
pass++;
goto lookforsoa;
}
if (debugging) {
char namestr[1025];
}
ddebug("Duping master");
ddebug("Duping zonename");
if (debugging) {
char namestr[1025];
}
ddebug ("Out of find_completed");
send_update();
}
static void
}
static void
start_update(void) {
ddebug ("start_update()");
if (result != ISC_R_SUCCESS) {
return;
}
&soaquery);
ns_inuse = 0;
}
static void
cleanup(void) {
ddebug ("cleanup()");
ddebug("Freeing key");
}
}
}
}
}
if (is_dst_up) {
debug ("Destroy DST lib");
}
debug ("Detach from entropy");
}
ddebug("Shutting down request manager");
ddebug("Freeing the dispatcher");
ddebug("Shutting down dispatch manager");
ddebug("Ending task");
ddebug("Shutting down task manager");
ddebug("Shutting down socket manager");
ddebug("Shutting down timer manager");
ddebug("Destroying memory context");
if (isc_mem_debugging)
}
int
setup_system();
while (ISC_TRUE) {
reset_system();
if (!user_interaction())
break;
start_update();
while (busy)
}
puts ("");
ddebug ("Fell through app_run");
cleanup();
return (0);
}