bind9/bin/tests/name_test.c

/*
 * Copyright (C) 1998, 1999  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.
 */

#include <config.h>

#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#include <isc/assertions.h>
#include <isc/boolean.h>
#include <isc/region.h>

#include <dns/types.h>
#include <dns/result.h>
#include <dns/name.h>

static void
print_wirename(isc_region_t *name) {
	unsigned char *ccurr, *cend;
		
	ccurr = name->base;
	cend = ccurr + name->length;
	while (ccurr != cend)
		printf("%02x ", *ccurr++);
	printf("\n");
}

int
main(int argc, char *argv[]) {
	char s[1000];
	unsigned char b[255];
	unsigned char o[255];
	unsigned char c[255];
	dns_result_t result;
	dns_name_t name, oname, compname;
	isc_buffer_t source, target;
	isc_region_t r;
	dns_name_t *origin, *comp;
	isc_boolean_t downcase = ISC_FALSE;
	size_t len;
	dns_offsets_t offsets, compoffsets;
	isc_boolean_t quiet = ISC_FALSE;
	int ch;

	while ((ch = getopt(argc, argv, "q")) != -1) {
		switch (ch) {
		case 'q':
			quiet = ISC_TRUE;
			break;
		}
	}

	argc -= optind;
	argv += optind;

	if (argc > 0) {
		if (strcasecmp("none", argv[0]) == 0)
			origin = NULL;
		else {
			len = strlen(argv[0]);
			isc_buffer_init(&source, argv[0], len,
					ISC_BUFFERTYPE_TEXT);
			isc_buffer_add(&source, len);
			isc_buffer_init(&target, o, 255,
					ISC_BUFFERTYPE_BINARY);
			dns_name_init(&oname, NULL);
			result = dns_name_fromtext(&oname, &source,
						   dns_rootname, 0,
						   &target);
			if (result != 0) {
				fprintf(stderr,
					"dns_name_fromtext() failed: %d\n",
					result);
				exit(1);
			}
			origin = &oname;
		}
	} else
		origin = dns_rootname;

	if (argc > 1) {
		if (strcasecmp("none", argv[1]) == 0)
			comp = NULL;
		else {
			len = strlen(argv[1]);
			isc_buffer_init(&source, argv[1], len,
					ISC_BUFFERTYPE_TEXT);
			isc_buffer_add(&source, len);
			isc_buffer_init(&target, c, 255,
					ISC_BUFFERTYPE_BINARY);
			dns_name_init(&compname, compoffsets);
			result = dns_name_fromtext(&compname, &source,
						   origin, 0,
						   &target);
			if (result != 0) {
				fprintf(stderr,
					"dns_name_fromtext() failed: %d\n",
					result);
				exit(1);
			}
			comp = &compname;
		}
	} else
		comp = NULL;

	dns_name_init(&name, offsets);
	while (gets(s) != NULL) {
		len = strlen(s);
		isc_buffer_init(&source, s, len, ISC_BUFFERTYPE_TEXT);
		isc_buffer_add(&source, len);
		isc_buffer_init(&target, b, 255, ISC_BUFFERTYPE_BINARY);
		result = dns_name_fromtext(&name, &source, origin, downcase,
					   &target);
		if (result == DNS_R_SUCCESS) {
			dns_name_toregion(&name, &r);
			if (!quiet) {
				print_wirename(&r);
				printf("%u labels, %u bytes.\n",
				       dns_name_countlabels(&name),
				       r.length);
			}
		} else
			printf("%s\n", dns_result_totext(result));

		if (result == DNS_R_SUCCESS) {
			isc_buffer_init(&source, s, sizeof s,
					ISC_BUFFERTYPE_TEXT);
			result = dns_name_totext(&name, 0, &source);
			if (result == DNS_R_SUCCESS) {
				isc_buffer_used(&source, &r);
				printf("%.*s\n", (int)r.length, r.base);
				if (!quiet) {
					printf("%u bytes.\n", source.used);
				}
			} else
				printf("%s\n", dns_result_totext(result));
		}

		if (comp != NULL) {
			int i;
			isc_boolean_t b;

			i = dns_name_compare(&name, comp);
			b = dns_name_issubdomain(&name, comp);
			if (!quiet) {
				if (i < 0)
					printf("<, ");
				else if (i > 0)
					printf(">, ");
				else
					printf("=, ");
				if (!b)
					printf("not ");
				printf("subdomain\n");
			} else {
				if (!b)
					printf("not subdomain\n");
			}
		}
	}
	
	return (0);
}