bin/tests/name_test.c

	name_test.c revision 4bc30f45a225947a298f706a8522c9d30915d137
/*
 * 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 <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;

    argc--;
    argv++;

    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);
            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[0]) == 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);
            result = dns_name_fromtext(&compname, &source,
                           dns_rootname, 0,
                           &target);
            if (result != 0) {
                fprintf(stderr,
                    "dns_name_fromtext() failed: %d\n",
                    result);
                exit(1);
            }
            comp = &compname;
        }
    } else
        comp = NULL;

    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);
#ifndef QUIET
            print_wirename(&r);
            printf("%u labels, %u bytes.\n",
                   dns_name_countlabels(&name),
                   r.length);
#endif
        } 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);
#ifndef QUIET
                printf("%u bytes.\n", source.used);
#endif
            } else
                printf("%s\n", dns_result_totext(result));
        }

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

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

    return (0);
}