/* $NetBSD: dnssec-dsfromkey.c,v 1.5.4.2 2024/02/29 12:28:14 martin Exp $ */ /* * Copyright (C) Internet Systems Consortium, Inc. ("ISC") * * SPDX-License-Identifier: MPL-2.0 * * This Source Code Form is subject to the terms of the Mozilla Public * License, v. 2.0. If a copy of the MPL was not distributed with this * file, you can obtain one at https://mozilla.org/MPL/2.0/. * * See the COPYRIGHT file distributed with this work for additional * information regarding copyright ownership. */ /*! \file */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "dnssectool.h" const char *program = "dnssec-dsfromkey"; static dns_rdataclass_t rdclass; static dns_fixedname_t fixed; static dns_name_t *name = NULL; static isc_mem_t *mctx = NULL; static uint32_t ttl; static bool emitttl = false; static isc_result_t initname(char *setname) { isc_result_t result; isc_buffer_t buf; name = dns_fixedname_initname(&fixed); isc_buffer_init(&buf, setname, strlen(setname)); isc_buffer_add(&buf, strlen(setname)); result = dns_name_fromtext(name, &buf, dns_rootname, 0, NULL); return (result); } static void db_load_from_stream(dns_db_t *db, FILE *fp) { isc_result_t result; dns_rdatacallbacks_t callbacks; dns_rdatacallbacks_init(&callbacks); result = dns_db_beginload(db, &callbacks); if (result != ISC_R_SUCCESS) { fatal("dns_db_beginload failed: %s", isc_result_totext(result)); } result = dns_master_loadstream(fp, name, name, rdclass, 0, &callbacks, mctx); if (result != ISC_R_SUCCESS) { fatal("can't load from input: %s", isc_result_totext(result)); } result = dns_db_endload(db, &callbacks); if (result != ISC_R_SUCCESS) { fatal("dns_db_endload failed: %s", isc_result_totext(result)); } } static isc_result_t loadset(const char *filename, dns_rdataset_t *rdataset) { isc_result_t result; dns_db_t *db = NULL; dns_dbnode_t *node = NULL; char setname[DNS_NAME_FORMATSIZE]; dns_name_format(name, setname, sizeof(setname)); result = dns_db_create(mctx, "rbt", name, dns_dbtype_zone, rdclass, 0, NULL, &db); if (result != ISC_R_SUCCESS) { fatal("can't create database"); } if (strcmp(filename, "-") == 0) { db_load_from_stream(db, stdin); filename = "input"; } else { result = dns_db_load(db, filename, dns_masterformat_text, 0); if (result != ISC_R_SUCCESS && result != DNS_R_SEENINCLUDE) { fatal("can't load %s: %s", filename, isc_result_totext(result)); } } result = dns_db_findnode(db, name, false, &node); if (result != ISC_R_SUCCESS) { fatal("can't find %s node in %s", setname, filename); } result = dns_db_findrdataset(db, node, NULL, dns_rdatatype_dnskey, 0, 0, rdataset, NULL); if (result == ISC_R_NOTFOUND) { fatal("no DNSKEY RR for %s in %s", setname, filename); } else if (result != ISC_R_SUCCESS) { fatal("dns_db_findrdataset"); } if (node != NULL) { dns_db_detachnode(db, &node); } if (db != NULL) { dns_db_detach(&db); } return (result); } static isc_result_t loadkeyset(char *dirname, dns_rdataset_t *rdataset) { isc_result_t result; char filename[PATH_MAX + 1]; isc_buffer_t buf; dns_rdataset_init(rdataset); isc_buffer_init(&buf, filename, sizeof(filename)); if (dirname != NULL) { /* allow room for a trailing slash */ if (strlen(dirname) >= isc_buffer_availablelength(&buf)) { return (ISC_R_NOSPACE); } isc_buffer_putstr(&buf, dirname); if (dirname[strlen(dirname) - 1] != '/') { isc_buffer_putstr(&buf, "/"); } } if (isc_buffer_availablelength(&buf) < 7) { return (ISC_R_NOSPACE); } isc_buffer_putstr(&buf, "keyset-"); result = dns_name_tofilenametext(name, false, &buf); check_result(result, "dns_name_tofilenametext()"); if (isc_buffer_availablelength(&buf) == 0) { return (ISC_R_NOSPACE); } isc_buffer_putuint8(&buf, 0); return (loadset(filename, rdataset)); } static void loadkey(char *filename, unsigned char *key_buf, unsigned int key_buf_size, dns_rdata_t *rdata) { isc_result_t result; dst_key_t *key = NULL; isc_buffer_t keyb; isc_region_t r; dns_rdata_init(rdata); isc_buffer_init(&keyb, key_buf, key_buf_size); result = dst_key_fromnamedfile(filename, NULL, DST_TYPE_PUBLIC, mctx, &key); if (result != ISC_R_SUCCESS) { fatal("can't load %s.key: %s", filename, isc_result_totext(result)); } if (verbose > 2) { char keystr[DST_KEY_FORMATSIZE]; dst_key_format(key, keystr, sizeof(keystr)); fprintf(stderr, "%s: %s\n", program, keystr); } result = dst_key_todns(key, &keyb); if (result != ISC_R_SUCCESS) { fatal("can't decode key"); } isc_buffer_usedregion(&keyb, &r); dns_rdata_fromregion(rdata, dst_key_class(key), dns_rdatatype_dnskey, &r); rdclass = dst_key_class(key); name = dns_fixedname_initname(&fixed); dns_name_copy(dst_key_name(key), name); dst_key_free(&key); } static void logkey(dns_rdata_t *rdata) { isc_result_t result; dst_key_t *key = NULL; isc_buffer_t buf; char keystr[DST_KEY_FORMATSIZE]; isc_buffer_init(&buf, rdata->data, rdata->length); isc_buffer_add(&buf, rdata->length); result = dst_key_fromdns(name, rdclass, &buf, mctx, &key); if (result != ISC_R_SUCCESS) { return; } dst_key_format(key, keystr, sizeof(keystr)); fprintf(stderr, "%s: %s\n", program, keystr); dst_key_free(&key); } static void emit(dns_dsdigest_t dt, bool showall, bool cds, dns_rdata_t *rdata) { isc_result_t result; unsigned char buf[DNS_DS_BUFFERSIZE]; char text_buf[DST_KEY_MAXTEXTSIZE]; char name_buf[DNS_NAME_MAXWIRE]; char class_buf[10]; isc_buffer_t textb, nameb, classb; isc_region_t r; dns_rdata_t ds; dns_rdata_dnskey_t dnskey; isc_buffer_init(&textb, text_buf, sizeof(text_buf)); isc_buffer_init(&nameb, name_buf, sizeof(name_buf)); isc_buffer_init(&classb, class_buf, sizeof(class_buf)); dns_rdata_init(&ds); result = dns_rdata_tostruct(rdata, &dnskey, NULL); if (result != ISC_R_SUCCESS) { fatal("can't convert DNSKEY"); } if ((dnskey.flags & DNS_KEYFLAG_REVOKE) != 0) { return; } if ((dnskey.flags & DNS_KEYFLAG_KSK) == 0 && !showall) { return; } result = dns_ds_buildrdata(name, rdata, dt, buf, &ds); if (result != ISC_R_SUCCESS) { fatal("can't build record"); } result = dns_name_totext(name, false, &nameb); if (result != ISC_R_SUCCESS) { fatal("can't print name"); } result = dns_rdata_tofmttext(&ds, (dns_name_t *)NULL, 0, 0, 0, "", &textb); if (result != ISC_R_SUCCESS) { fatal("can't print rdata"); } result = dns_rdataclass_totext(rdclass, &classb); if (result != ISC_R_SUCCESS) { fatal("can't print class"); } isc_buffer_usedregion(&nameb, &r); printf("%.*s ", (int)r.length, r.base); if (emitttl) { printf("%u ", ttl); } isc_buffer_usedregion(&classb, &r); printf("%.*s", (int)r.length, r.base); if (cds) { printf(" CDS "); } else { printf(" DS "); } isc_buffer_usedregion(&textb, &r); printf("%.*s\n", (int)r.length, r.base); } static void emits(bool showall, bool cds, dns_rdata_t *rdata) { unsigned i, n; n = sizeof(dtype) / sizeof(dtype[0]); for (i = 0; i < n; i++) { if (dtype[i] != 0) { emit(dtype[i], showall, cds, rdata); } } } noreturn static void usage(void); static void usage(void) { fprintf(stderr, "Usage:\n"); fprintf(stderr, " %s [options] keyfile\n\n", program); fprintf(stderr, " %s [options] -f zonefile [zonename]\n\n", program); fprintf(stderr, " %s [options] -s dnsname\n\n", program); fprintf(stderr, " %s [-h|-V]\n\n", program); fprintf(stderr, "Version: %s\n", PACKAGE_VERSION); fprintf(stderr, "Options:\n" " -1: digest algorithm SHA-1\n" " -2: digest algorithm SHA-256\n" " -a algorithm: digest algorithm (SHA-1, SHA-256 or " "SHA-384)\n" " -A: include all keys in DS set, not just KSKs (-f " "only)\n" " -c class: rdata class for DS set (default IN) (-f " "or -s only)\n" " -C: print CDS records\n" " -f zonefile: read keys from a zone file\n" " -h: print help information\n" " -K directory: where to find key or keyset files\n" " -s: read keys from keyset- file\n" " -T: TTL of output records (omitted by default)\n" " -v level: verbosity\n" " -V: print version information\n"); fprintf(stderr, "Output: DS or CDS RRs\n"); exit(-1); } int main(int argc, char **argv) { char *classname = NULL; char *filename = NULL, *dir = NULL, *namestr; char *endp, *arg1; int ch; bool cds = false; bool usekeyset = false; bool showall = false; isc_result_t result; isc_log_t *log = NULL; dns_rdataset_t rdataset; dns_rdata_t rdata; dns_rdata_init(&rdata); if (argc == 1) { usage(); } isc_mem_create(&mctx); isc_commandline_errprint = false; #define OPTIONS "12Aa:Cc:d:Ff:K:l:sT:v:hV" while ((ch = isc_commandline_parse(argc, argv, OPTIONS)) != -1) { switch (ch) { case '1': add_dtype(DNS_DSDIGEST_SHA1); break; case '2': add_dtype(DNS_DSDIGEST_SHA256); break; case 'A': showall = true; break; case 'a': add_dtype(strtodsdigest(isc_commandline_argument)); break; case 'C': cds = true; break; case 'c': classname = isc_commandline_argument; break; case 'd': fprintf(stderr, "%s: the -d option is deprecated; " "use -K\n", program); /* fall through */ case 'K': dir = isc_commandline_argument; if (strlen(dir) == 0U) { fatal("directory must be non-empty string"); } break; case 'f': filename = isc_commandline_argument; break; case 'l': fatal("-l option (DLV lookaside) is obsolete"); break; case 's': usekeyset = true; break; case 'T': emitttl = true; ttl = strtottl(isc_commandline_argument); break; case 'v': verbose = strtol(isc_commandline_argument, &endp, 0); if (*endp != '\0') { fatal("-v must be followed by a number"); } break; case 'F': /* Reserved for FIPS mode */ FALLTHROUGH; case '?': if (isc_commandline_option != '?') { fprintf(stderr, "%s: invalid argument -%c\n", program, isc_commandline_option); } FALLTHROUGH; case 'h': /* Does not return. */ usage(); case 'V': /* Does not return. */ version(program); default: fprintf(stderr, "%s: unhandled option -%c\n", program, isc_commandline_option); exit(1); } } rdclass = strtoclass(classname); if (usekeyset && filename != NULL) { fatal("cannot use both -s and -f"); } /* When not using -f, -A is implicit */ if (filename == NULL) { showall = true; } /* Default digest type if none specified. */ if (dtype[0] == 0) { dtype[0] = DNS_DSDIGEST_SHA256; } /* * Use local variable arg1 so that clang can correctly analyse * reachable paths rather than 'argc < isc_commandline_index + 1'. */ arg1 = argv[isc_commandline_index]; if (arg1 == NULL && filename == NULL) { fatal("the key file name was not specified"); } if (arg1 != NULL && argv[isc_commandline_index + 1] != NULL) { fatal("extraneous arguments"); } result = dst_lib_init(mctx, NULL); if (result != ISC_R_SUCCESS) { fatal("could not initialize dst: %s", isc_result_totext(result)); } setup_logging(mctx, &log); dns_rdataset_init(&rdataset); if (usekeyset || filename != NULL) { if (arg1 == NULL) { /* using file name as the zone name */ namestr = filename; } else { namestr = arg1; } result = initname(namestr); if (result != ISC_R_SUCCESS) { fatal("could not initialize name %s", namestr); } if (usekeyset) { result = loadkeyset(dir, &rdataset); } else { INSIST(filename != NULL); result = loadset(filename, &rdataset); } if (result != ISC_R_SUCCESS) { fatal("could not load DNSKEY set: %s\n", isc_result_totext(result)); } for (result = dns_rdataset_first(&rdataset); result == ISC_R_SUCCESS; result = dns_rdataset_next(&rdataset)) { dns_rdata_init(&rdata); dns_rdataset_current(&rdataset, &rdata); if (verbose > 2) { logkey(&rdata); } emits(showall, cds, &rdata); } } else { unsigned char key_buf[DST_KEY_MAXSIZE]; loadkey(arg1, key_buf, DST_KEY_MAXSIZE, &rdata); emits(showall, cds, &rdata); } if (dns_rdataset_isassociated(&rdataset)) { dns_rdataset_disassociate(&rdataset); } cleanup_logging(&log); dst_lib_destroy(); if (verbose > 10) { isc_mem_stats(mctx, stdout); } isc_mem_destroy(&mctx); fflush(stdout); if (ferror(stdout)) { fprintf(stderr, "write error\n"); return (1); } else { return (0); } }