1/* 2 * Copyright (C) 2009, 2012-2014 Internet Systems Consortium, Inc. ("ISC") 3 * 4 * Permission to use, copy, modify, and/or distribute this software for any 5 * purpose with or without fee is hereby granted, provided that the above 6 * copyright notice and this permission notice appear in all copies. 7 * 8 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH 9 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY 10 * AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT, 11 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM 12 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE 13 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR 14 * PERFORMANCE OF THIS SOFTWARE. 15 */ 16 17/* $Id: sample.c,v 1.5 2009/09/29 15:06:07 fdupont Exp $ */ 18 19#include <config.h> 20 21#include <sys/types.h> 22#include <sys/socket.h> 23 24#include <netinet/in.h> 25 26#include <arpa/inet.h> 27 28#include <unistd.h> 29#include <stdio.h> 30#include <stdlib.h> 31#include <string.h> 32#include <netdb.h> 33 34#include <isc/base64.h> 35#include <isc/buffer.h> 36#include <isc/lib.h> 37#include <isc/mem.h> 38#include <isc/sockaddr.h> 39#include <isc/util.h> 40 41#include <dns/client.h> 42#include <dns/fixedname.h> 43#include <dns/keyvalues.h> 44#include <dns/lib.h> 45#include <dns/name.h> 46#include <dns/rdata.h> 47#include <dns/rdataset.h> 48#include <dns/rdatastruct.h> 49#include <dns/rdatatype.h> 50#include <dns/result.h> 51#include <dns/secalg.h> 52 53#include <dst/dst.h> 54 55static char *algname; 56 57static isc_result_t 58printdata(dns_rdataset_t *rdataset, dns_name_t *owner) { 59 isc_buffer_t target; 60 isc_result_t result; 61 isc_region_t r; 62 char t[4096]; 63 64 if (!dns_rdataset_isassociated(rdataset)) { 65 printf("[WARN: empty]\n"); 66 return (ISC_R_SUCCESS); 67 } 68 69 isc_buffer_init(&target, t, sizeof(t)); 70 71 result = dns_rdataset_totext(rdataset, owner, ISC_FALSE, ISC_FALSE, 72 &target); 73 if (result != ISC_R_SUCCESS) 74 return (result); 75 isc_buffer_usedregion(&target, &r); 76 printf("%.*s", (int)r.length, (char *)r.base); 77 78 return (ISC_R_SUCCESS); 79} 80 81ISC_PLATFORM_NORETURN_PRE static void 82usage(void) ISC_PLATFORM_NORETURN_POST; 83 84static void 85usage(void) { 86 fprintf(stderr, "sample [-t RRtype] " 87 "[[-a algorithm] [-e] -k keyname -K keystring] " 88 "[-s domain:serveraddr_for_domain ] " 89 "server_address hostname\n"); 90 91 exit(1); 92} 93 94static void 95set_key(dns_client_t *client, char *keynamestr, char *keystr, 96 isc_boolean_t is_sep, isc_mem_t **mctxp) 97{ 98 isc_result_t result; 99 dns_fixedname_t fkeyname; 100 size_t namelen; 101 dns_name_t *keyname; 102 dns_rdata_dnskey_t keystruct; 103 unsigned char keydata[4096]; 104 isc_buffer_t keydatabuf; 105 unsigned char rrdata[4096]; 106 isc_buffer_t rrdatabuf; 107 isc_buffer_t b; 108 isc_textregion_t tr; 109 isc_region_t r; 110 dns_secalg_t alg; 111 112 result = isc_mem_create(0, 0, mctxp); 113 if (result != ISC_R_SUCCESS) { 114 fprintf(stderr, "failed to crate mctx\n"); 115 exit(1); 116 } 117 118 if (algname != NULL) { 119 tr.base = algname; 120 tr.length = strlen(algname); 121 result = dns_secalg_fromtext(&alg, &tr); 122 if (result != ISC_R_SUCCESS) { 123 fprintf(stderr, "failed to identify the algorithm\n"); 124 exit(1); 125 } 126 } else 127 alg = DNS_KEYALG_RSASHA1; 128 129 keystruct.common.rdclass = dns_rdataclass_in; 130 keystruct.common.rdtype = dns_rdatatype_dnskey; 131 keystruct.flags = DNS_KEYOWNER_ZONE; /* fixed */ 132 if (is_sep) 133 keystruct.flags |= DNS_KEYFLAG_KSK; 134 keystruct.protocol = DNS_KEYPROTO_DNSSEC; /* fixed */ 135 keystruct.algorithm = alg; 136 137 isc_buffer_init(&keydatabuf, keydata, sizeof(keydata)); 138 isc_buffer_init(&rrdatabuf, rrdata, sizeof(rrdata)); 139 result = isc_base64_decodestring(keystr, &keydatabuf); 140 if (result != ISC_R_SUCCESS) { 141 fprintf(stderr, "base64 decode failed\n"); 142 exit(1); 143 } 144 isc_buffer_usedregion(&keydatabuf, &r); 145 keystruct.datalen = r.length; 146 keystruct.data = r.base; 147 148 result = dns_rdata_fromstruct(NULL, keystruct.common.rdclass, 149 keystruct.common.rdtype, 150 &keystruct, &rrdatabuf); 151 if (result != ISC_R_SUCCESS) { 152 fprintf(stderr, "failed to construct key rdata\n"); 153 exit(1); 154 } 155 namelen = strlen(keynamestr); 156 isc_buffer_init(&b, keynamestr, namelen); 157 isc_buffer_add(&b, namelen); 158 dns_fixedname_init(&fkeyname); 159 keyname = dns_fixedname_name(&fkeyname); 160 result = dns_name_fromtext(keyname, &b, dns_rootname, 0, NULL); 161 if (result != ISC_R_SUCCESS) { 162 fprintf(stderr, "failed to construct key name\n"); 163 exit(1); 164 } 165 result = dns_client_addtrustedkey(client, dns_rdataclass_in, 166 keyname, &rrdatabuf); 167 if (result != ISC_R_SUCCESS) { 168 fprintf(stderr, "failed to add key for %s\n", 169 keynamestr); 170 exit(1); 171 } 172} 173 174static void 175addserver(dns_client_t *client, const char *addrstr, const char *port, 176 const char *namespace) 177{ 178 struct addrinfo hints, *res; 179 int gai_error; 180 isc_sockaddr_t sa; 181 isc_sockaddrlist_t servers; 182 isc_result_t result; 183 size_t namelen; 184 isc_buffer_t b; 185 dns_fixedname_t fname; 186 dns_name_t *name = NULL; 187 188 memset(&hints, 0, sizeof(hints)); 189 hints.ai_family = AF_UNSPEC; 190 hints.ai_socktype = SOCK_DGRAM; 191 hints.ai_protocol = IPPROTO_UDP; 192 hints.ai_flags = AI_NUMERICHOST; 193 gai_error = getaddrinfo(addrstr, port, &hints, &res); 194 if (gai_error != 0) { 195 fprintf(stderr, "getaddrinfo failed: %s\n", 196 gai_strerror(gai_error)); 197 exit(1); 198 } 199 INSIST(res->ai_addrlen <= sizeof(sa.type)); 200 memmove(&sa.type, res->ai_addr, res->ai_addrlen); 201 sa.length = res->ai_addrlen; 202 freeaddrinfo(res); 203 ISC_LINK_INIT(&sa, link); 204 ISC_LIST_INIT(servers); 205 ISC_LIST_APPEND(servers, &sa, link); 206 207 if (namespace != NULL) { 208 namelen = strlen(namespace); 209 isc_buffer_constinit(&b, namespace, namelen); 210 isc_buffer_add(&b, namelen); 211 dns_fixedname_init(&fname); 212 name = dns_fixedname_name(&fname); 213 result = dns_name_fromtext(name, &b, dns_rootname, 0, NULL); 214 if (result != ISC_R_SUCCESS) { 215 fprintf(stderr, "failed to convert qname: %d\n", 216 result); 217 exit(1); 218 } 219 } 220 221 result = dns_client_setservers(client, dns_rdataclass_in, name, 222 &servers); 223 if (result != ISC_R_SUCCESS) { 224 fprintf(stderr, "set server failed: %d\n", result); 225 exit(1); 226 } 227} 228 229int 230main(int argc, char *argv[]) { 231 int ch; 232 isc_textregion_t tr; 233 char *altserver = NULL; 234 char *altserveraddr = NULL; 235 char *altservername = NULL; 236 dns_client_t *client = NULL; 237 char *keynamestr = NULL; 238 char *keystr = NULL; 239 isc_result_t result; 240 isc_buffer_t b; 241 dns_fixedname_t qname0; 242 size_t namelen; 243 dns_name_t *qname, *name; 244 dns_rdatatype_t type = dns_rdatatype_a; 245 dns_rdataset_t *rdataset; 246 dns_namelist_t namelist; 247 isc_mem_t *keymctx = NULL; 248 unsigned int clientopt, resopt; 249 isc_boolean_t is_sep = ISC_FALSE; 250 const char *port = "53"; 251 252 while ((ch = getopt(argc, argv, "a:es:t:k:K:p:")) != -1) { 253 switch (ch) { 254 case 't': 255 tr.base = optarg; 256 tr.length = strlen(optarg); 257 result = dns_rdatatype_fromtext(&type, &tr); 258 if (result != ISC_R_SUCCESS) { 259 fprintf(stderr, 260 "invalid RRtype: %s\n", optarg); 261 exit(1); 262 } 263 break; 264 case 'a': 265 algname = optarg; 266 break; 267 case 'e': 268 is_sep = ISC_TRUE; 269 break; 270 case 's': 271 if (altserver != NULL) { 272 fprintf(stderr, "alternate server " 273 "already defined: %s\n", 274 altserver); 275 exit(1); 276 } 277 altserver = optarg; 278 break; 279 case 'k': 280 keynamestr = optarg; 281 break; 282 case 'K': 283 keystr = optarg; 284 break; 285 case 'p': 286 port = optarg; 287 break; 288 default: 289 usage(); 290 } 291 } 292 293 argc -= optind; 294 argv += optind; 295 if (argc < 2) 296 usage(); 297 298 if (altserver != NULL) { 299 char *cp; 300 301 cp = strchr(altserver, ':'); 302 if (cp == NULL) { 303 fprintf(stderr, "invalid alternate server: %s\n", 304 altserver); 305 exit(1); 306 } 307 *cp = '\0'; 308 altservername = altserver; 309 altserveraddr = cp + 1; 310 } 311 312 isc_lib_register(); 313 result = dns_lib_init(); 314 if (result != ISC_R_SUCCESS) { 315 fprintf(stderr, "dns_lib_init failed: %d\n", result); 316 exit(1); 317 } 318 319 clientopt = 0; 320 result = dns_client_create(&client, clientopt); 321 if (result != ISC_R_SUCCESS) { 322 fprintf(stderr, "dns_client_create failed: %d\n", result); 323 exit(1); 324 } 325 326 /* Set the nameserver */ 327 addserver(client, argv[0], port, NULL); 328 329 /* Set the alternate nameserver (when specified) */ 330 if (altserver != NULL) 331 addserver(client, altserveraddr, port, altservername); 332 333 /* Install DNSSEC key (if given) */ 334 if (keynamestr != NULL) { 335 if (keystr == NULL) { 336 fprintf(stderr, 337 "key string is missing " 338 "while key name is provided\n"); 339 exit(1); 340 } 341 set_key(client, keynamestr, keystr, is_sep, &keymctx); 342 } 343 344 /* Construct qname */ 345 namelen = strlen(argv[1]); 346 isc_buffer_init(&b, argv[1], namelen); 347 isc_buffer_add(&b, namelen); 348 dns_fixedname_init(&qname0); 349 qname = dns_fixedname_name(&qname0); 350 result = dns_name_fromtext(qname, &b, dns_rootname, 0, NULL); 351 if (result != ISC_R_SUCCESS) 352 fprintf(stderr, "failed to convert qname: %d\n", result); 353 354 /* Perform resolution */ 355 resopt = 0; 356 if (keynamestr == NULL) 357 resopt |= DNS_CLIENTRESOPT_NODNSSEC; 358 ISC_LIST_INIT(namelist); 359 result = dns_client_resolve(client, qname, dns_rdataclass_in, type, 360 resopt, &namelist); 361 if (result != ISC_R_SUCCESS) { 362 fprintf(stderr, 363 "resolution failed: %s\n", dns_result_totext(result)); 364 } 365 for (name = ISC_LIST_HEAD(namelist); name != NULL; 366 name = ISC_LIST_NEXT(name, link)) { 367 for (rdataset = ISC_LIST_HEAD(name->list); 368 rdataset != NULL; 369 rdataset = ISC_LIST_NEXT(rdataset, link)) { 370 if (printdata(rdataset, name) != ISC_R_SUCCESS) 371 fprintf(stderr, "print data failed\n"); 372 } 373 } 374 375 dns_client_freeresanswer(client, &namelist); 376 377 /* Cleanup */ 378 dns_client_destroy(&client); 379 if (keynamestr != NULL) 380 isc_mem_destroy(&keymctx); 381 dns_lib_shutdown(); 382 383 return (0); 384} 385