2 * Copyright (C) 2004-2013 Internet Systems Consortium, Inc. ("ISC")
3 * Copyright (C) 1998-2003 Internet Software Consortium.
5 * Permission to use, copy, modify, and/or distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
9 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
10 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
11 * AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
12 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
13 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
14 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
15 * PERFORMANCE OF THIS SOFTWARE.
23 #include <isc/base64.h>
27 #include <isc/parseint.h>
28 #include <isc/print.h>
29 #include <isc/string.h>
30 #include <isc/stdlib.h>
33 #include <dns/callbacks.h>
35 #include <dns/compress.h>
36 #include <dns/enumtype.h>
37 #include <dns/keyflags.h>
38 #include <dns/keyvalues.h>
39 #include <dns/message.h>
40 #include <dns/rcode.h>
41 #include <dns/rdata.h>
42 #include <dns/rdataclass.h>
43 #include <dns/rdatastruct.h>
44 #include <dns/rdatatype.h>
45 #include <dns/result.h>
46 #include <dns/secalg.h>
47 #include <dns/secproto.h>
53 isc_result_t _r = (x); \
54 if (_r != ISC_R_SUCCESS) \
60 isc_result_t _r = (x); \
61 if (_r != ISC_R_SUCCESS) { \
62 isc_lex_ungettoken(lexer, &token); \
67 #define DNS_AS_STR(t) ((t).value.as_textregion.base)
69 #define ARGS_FROMTEXT int rdclass, dns_rdatatype_t type, \
70 isc_lex_t *lexer, dns_name_t *origin, \
71 unsigned int options, isc_buffer_t *target, \
72 dns_rdatacallbacks_t *callbacks
74 #define ARGS_TOTEXT dns_rdata_t *rdata, dns_rdata_textctx_t *tctx, \
77 #define ARGS_FROMWIRE int rdclass, dns_rdatatype_t type, \
78 isc_buffer_t *source, dns_decompress_t *dctx, \
79 unsigned int options, isc_buffer_t *target
81 #define ARGS_TOWIRE dns_rdata_t *rdata, dns_compress_t *cctx, \
84 #define ARGS_COMPARE const dns_rdata_t *rdata1, const dns_rdata_t *rdata2
86 #define ARGS_FROMSTRUCT int rdclass, dns_rdatatype_t type, \
87 void *source, isc_buffer_t *target
89 #define ARGS_TOSTRUCT dns_rdata_t *rdata, void *target, isc_mem_t *mctx
91 #define ARGS_FREESTRUCT void *source
93 #define ARGS_ADDLDATA dns_rdata_t *rdata, dns_additionaldatafunc_t add, \
96 #define ARGS_DIGEST dns_rdata_t *rdata, dns_digestfunc_t digest, void *arg
98 #define ARGS_CHECKOWNER dns_name_t *name, dns_rdataclass_t rdclass, \
99 dns_rdatatype_t type, isc_boolean_t wildcard
101 #define ARGS_CHECKNAMES dns_rdata_t *rdata, dns_name_t *owner, dns_name_t *bad
105 * Context structure for the totext_ functions.
106 * Contains formatting options for rdata-to-text
109 typedef struct dns_rdata_textctx {
110 dns_name_t *origin; /*%< Current origin, or NULL. */
111 unsigned int flags; /*%< DNS_STYLEFLAG_* */
112 unsigned int width; /*%< Width of rdata column. */
113 const char *linebreak; /*%< Line break string. */
114 } dns_rdata_textctx_t;
117 txt_totext(isc_region_t *source, isc_buffer_t *target);
120 txt_fromtext(isc_textregion_t *source, isc_buffer_t *target);
123 txt_fromwire(isc_buffer_t *source, isc_buffer_t *target);
126 multitxt_totext(isc_region_t *source, isc_buffer_t *target);
129 multitxt_fromtext(isc_textregion_t *source, isc_buffer_t *target);
132 multitxt_fromwire(isc_buffer_t *source, isc_buffer_t *target);
135 name_prefix(dns_name_t *name, dns_name_t *origin, dns_name_t *target);
138 name_length(dns_name_t *name);
141 str_totext(const char *source, isc_buffer_t *target);
144 inet_totext(int af, isc_region_t *src, isc_buffer_t *target);
147 buffer_empty(isc_buffer_t *source);
150 buffer_fromregion(isc_buffer_t *buffer, isc_region_t *region);
153 uint32_tobuffer(isc_uint32_t, isc_buffer_t *target);
156 uint16_tobuffer(isc_uint32_t, isc_buffer_t *target);
159 uint8_tobuffer(isc_uint32_t, isc_buffer_t *target);
162 name_tobuffer(dns_name_t *name, isc_buffer_t *target);
165 uint32_fromregion(isc_region_t *region);
168 uint16_fromregion(isc_region_t *region);
171 uint8_fromregion(isc_region_t *region);
174 uint8_consume_fromregion(isc_region_t *region);
177 mem_tobuffer(isc_buffer_t *target, void *base, unsigned int length);
180 hexvalue(char value);
183 decvalue(char value);
186 btoa_totext(unsigned char *inbuf, int inbuflen, isc_buffer_t *target);
189 atob_tobuffer(isc_lex_t *lexer, isc_buffer_t *target);
192 default_fromtext_callback(dns_rdatacallbacks_t *callbacks, const char *, ...)
193 ISC_FORMAT_PRINTF(2, 3);
196 fromtext_error(void (*callback)(dns_rdatacallbacks_t *, const char *, ...),
197 dns_rdatacallbacks_t *callbacks, const char *name,
198 unsigned long line, isc_token_t *token, isc_result_t result);
201 fromtext_warneof(isc_lex_t *lexer, dns_rdatacallbacks_t *callbacks);
204 rdata_totext(dns_rdata_t *rdata, dns_rdata_textctx_t *tctx,
205 isc_buffer_t *target);
208 warn_badname(dns_name_t *name, isc_lex_t *lexer,
209 dns_rdatacallbacks_t *callbacks);
212 warn_badmx(isc_token_t *token, isc_lex_t *lexer,
213 dns_rdatacallbacks_t *callbacks);
216 uint16_consume_fromregion(isc_region_t *region);
219 unknown_totext(dns_rdata_t *rdata, dns_rdata_textctx_t *tctx,
220 isc_buffer_t *target);
224 /*% IPv6 Address Size */
225 #define NS_LOCATORSZ 8
228 * convert presentation level address to network order binary form.
230 * 1 if `src' is a valid [RFC1884 2.2] address, else 0.
232 * (1) does not touch `dst' unless it's returning 1.
235 locator_pton(const char *src, unsigned char *dst) {
236 static const char xdigits_l[] = "0123456789abcdef",
237 xdigits_u[] = "0123456789ABCDEF";
238 unsigned char tmp[NS_LOCATORSZ];
239 unsigned char *tp = tmp, *endp;
241 int ch, seen_xdigits;
244 memset(tp, '\0', NS_LOCATORSZ);
245 endp = tp + NS_LOCATORSZ;
248 while ((ch = *src++) != '\0') {
251 pch = strchr((xdigits = xdigits_l), ch);
253 pch = strchr((xdigits = xdigits_u), ch);
256 val |= (pch - xdigits);
257 if (++seen_xdigits > 4)
264 if (tp + NS_INT16SZ > endp)
266 *tp++ = (unsigned char) (val >> 8) & 0xff;
267 *tp++ = (unsigned char) val & 0xff;
275 if (tp + NS_INT16SZ > endp)
277 *tp++ = (unsigned char) (val >> 8) & 0xff;
278 *tp++ = (unsigned char) val & 0xff;
282 memcpy(dst, tmp, NS_LOCATORSZ);
287 getquad(const void *src, struct in_addr *dst,
288 isc_lex_t *lexer, dns_rdatacallbacks_t *callbacks)
293 result = inet_aton(src, dst);
294 if (result == 1 && callbacks != NULL &&
295 inet_pton(AF_INET, src, &tmp) != 1) {
296 const char *name = isc_lex_getsourcename(lexer);
299 (*callbacks->warn)(callbacks, "%s:%lu: \"%s\" "
300 "is not a decimal dotted quad", name,
301 isc_lex_getsourceline(lexer), src);
306 static inline isc_result_t
307 name_duporclone(dns_name_t *source, isc_mem_t *mctx, dns_name_t *target) {
310 return (dns_name_dup(source, mctx, target));
311 dns_name_clone(source, target);
312 return (ISC_R_SUCCESS);
316 mem_maybedup(isc_mem_t *mctx, void *source, size_t length) {
321 new = isc_mem_allocate(mctx, length);
323 memcpy(new, source, length);
328 static const char hexdigits[] = "0123456789abcdef";
329 static const char decdigits[] = "0123456789";
334 #define RESERVED 0x0002
341 dns_rdata_init(dns_rdata_t *rdata) {
343 REQUIRE(rdata != NULL);
350 ISC_LINK_INIT(rdata, link);
351 /* ISC_LIST_INIT(rdata->list); */
355 dns_rdata_reset(dns_rdata_t *rdata) {
357 REQUIRE(rdata != NULL);
359 REQUIRE(!ISC_LINK_LINKED(rdata, link));
360 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
374 dns_rdata_clone(const dns_rdata_t *src, dns_rdata_t *target) {
376 REQUIRE(src != NULL);
377 REQUIRE(target != NULL);
379 REQUIRE(DNS_RDATA_INITIALIZED(target));
381 REQUIRE(DNS_RDATA_VALIDFLAGS(src));
382 REQUIRE(DNS_RDATA_VALIDFLAGS(target));
384 target->data = src->data;
385 target->length = src->length;
386 target->rdclass = src->rdclass;
387 target->type = src->type;
388 target->flags = src->flags;
397 dns_rdata_compare(const dns_rdata_t *rdata1, const dns_rdata_t *rdata2) {
399 isc_boolean_t use_default = ISC_FALSE;
401 REQUIRE(rdata1 != NULL);
402 REQUIRE(rdata2 != NULL);
403 REQUIRE(rdata1->length == 0 || rdata1->data != NULL);
404 REQUIRE(rdata2->length == 0 || rdata2->data != NULL);
405 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata1));
406 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata2));
408 if (rdata1->rdclass != rdata2->rdclass)
409 return (rdata1->rdclass < rdata2->rdclass ? -1 : 1);
411 if (rdata1->type != rdata2->type)
412 return (rdata1->type < rdata2->type ? -1 : 1);
420 dns_rdata_toregion(rdata1, &r1);
421 dns_rdata_toregion(rdata2, &r2);
422 result = isc_region_compare(&r1, &r2);
428 dns_rdata_casecompare(const dns_rdata_t *rdata1, const dns_rdata_t *rdata2) {
430 isc_boolean_t use_default = ISC_FALSE;
432 REQUIRE(rdata1 != NULL);
433 REQUIRE(rdata2 != NULL);
434 REQUIRE(rdata1->length == 0 || rdata1->data != NULL);
435 REQUIRE(rdata2->length == 0 || rdata2->data != NULL);
436 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata1));
437 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata2));
439 if (rdata1->rdclass != rdata2->rdclass)
440 return (rdata1->rdclass < rdata2->rdclass ? -1 : 1);
442 if (rdata1->type != rdata2->type)
443 return (rdata1->type < rdata2->type ? -1 : 1);
451 dns_rdata_toregion(rdata1, &r1);
452 dns_rdata_toregion(rdata2, &r2);
453 result = isc_region_compare(&r1, &r2);
463 dns_rdata_fromregion(dns_rdata_t *rdata, dns_rdataclass_t rdclass,
464 dns_rdatatype_t type, isc_region_t *r)
467 REQUIRE(rdata != NULL);
468 REQUIRE(DNS_RDATA_INITIALIZED(rdata));
471 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
473 rdata->data = r->base;
474 rdata->length = r->length;
475 rdata->rdclass = rdclass;
481 dns_rdata_toregion(const dns_rdata_t *rdata, isc_region_t *r) {
483 REQUIRE(rdata != NULL);
485 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
487 r->base = rdata->data;
488 r->length = rdata->length;
492 dns_rdata_fromwire(dns_rdata_t *rdata, dns_rdataclass_t rdclass,
493 dns_rdatatype_t type, isc_buffer_t *source,
494 dns_decompress_t *dctx, unsigned int options,
495 isc_buffer_t *target)
497 isc_result_t result = ISC_R_NOTIMPLEMENTED;
501 isc_boolean_t use_default = ISC_FALSE;
502 isc_uint32_t activelength;
505 REQUIRE(dctx != NULL);
507 REQUIRE(DNS_RDATA_INITIALIZED(rdata));
508 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
510 REQUIRE(source != NULL);
511 REQUIRE(target != NULL);
514 return (DNS_R_FORMERR);
519 activelength = isc_buffer_activelength(source);
520 INSIST(activelength < 65536);
525 if (activelength > isc_buffer_availablelength(target))
526 result = ISC_R_NOSPACE;
528 isc_buffer_putmem(target, isc_buffer_current(source),
530 isc_buffer_forward(source, activelength);
531 result = ISC_R_SUCCESS;
536 * Reject any rdata that expands out to more than DNS_RDATA_MAXLENGTH
537 * as we cannot transmit it.
539 length = isc_buffer_usedlength(target) - isc_buffer_usedlength(&st);
540 if (result == ISC_R_SUCCESS && length > DNS_RDATA_MAXLENGTH)
541 result = DNS_R_FORMERR;
544 * We should have consumed all of our buffer.
546 if (result == ISC_R_SUCCESS && !buffer_empty(source))
547 result = DNS_R_EXTRADATA;
549 if (rdata != NULL && result == ISC_R_SUCCESS) {
550 region.base = isc_buffer_used(&st);
551 region.length = length;
552 dns_rdata_fromregion(rdata, rdclass, type, ®ion);
555 if (result != ISC_R_SUCCESS) {
563 dns_rdata_towire(dns_rdata_t *rdata, dns_compress_t *cctx,
564 isc_buffer_t *target)
566 isc_result_t result = ISC_R_NOTIMPLEMENTED;
567 isc_boolean_t use_default = ISC_FALSE;
571 REQUIRE(rdata != NULL);
572 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
575 * Some DynDNS meta-RRs have empty rdata.
577 if ((rdata->flags & DNS_RDATA_UPDATE) != 0) {
578 INSIST(rdata->length == 0);
579 return (ISC_R_SUCCESS);
587 isc_buffer_availableregion(target, &tr);
588 if (tr.length < rdata->length)
589 return (ISC_R_NOSPACE);
590 memcpy(tr.base, rdata->data, rdata->length);
591 isc_buffer_add(target, rdata->length);
592 return (ISC_R_SUCCESS);
594 if (result != ISC_R_SUCCESS) {
596 INSIST(target->used < 65536);
597 dns_compress_rollback(cctx, (isc_uint16_t)target->used);
603 * If the binary data in 'src' is valid uncompressed wire format
604 * rdata of class 'rdclass' and type 'type', return ISC_R_SUCCESS
605 * and copy the validated rdata to 'dest'. Otherwise return an error.
608 rdata_validate(isc_buffer_t *src, isc_buffer_t *dest, dns_rdataclass_t rdclass,
609 dns_rdatatype_t type)
611 dns_decompress_t dctx;
614 dns_decompress_init(&dctx, -1, DNS_DECOMPRESS_NONE);
615 isc_buffer_setactive(src, isc_buffer_usedlength(src));
616 result = dns_rdata_fromwire(NULL, rdclass, type, src, &dctx, 0, dest);
617 dns_decompress_invalidate(&dctx);
623 unknown_fromtext(dns_rdataclass_t rdclass, dns_rdatatype_t type,
624 isc_lex_t *lexer, isc_mem_t *mctx, isc_buffer_t *target)
627 isc_buffer_t *buf = NULL;
630 if (type == 0 || dns_rdatatype_ismeta(type))
631 return (DNS_R_METATYPE);
633 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_number,
635 if (token.value.as_ulong > 65535U)
636 return (ISC_R_RANGE);
637 result = isc_buffer_allocate(mctx, &buf, token.value.as_ulong);
638 if (result != ISC_R_SUCCESS)
641 result = isc_hex_tobuffer(lexer, buf,
642 (unsigned int)token.value.as_ulong);
643 if (result != ISC_R_SUCCESS)
645 if (isc_buffer_usedlength(buf) != token.value.as_ulong) {
646 result = ISC_R_UNEXPECTEDEND;
650 if (dns_rdatatype_isknown(type)) {
651 result = rdata_validate(buf, target, rdclass, type);
654 isc_buffer_usedregion(buf, &r);
655 result = isc_buffer_copyregion(target, &r);
657 if (result != ISC_R_SUCCESS)
660 isc_buffer_free(&buf);
661 return (ISC_R_SUCCESS);
664 isc_buffer_free(&buf);
669 dns_rdata_fromtext(dns_rdata_t *rdata, dns_rdataclass_t rdclass,
670 dns_rdatatype_t type, isc_lex_t *lexer,
671 dns_name_t *origin, unsigned int options, isc_mem_t *mctx,
672 isc_buffer_t *target, dns_rdatacallbacks_t *callbacks)
674 isc_result_t result = ISC_R_NOTIMPLEMENTED;
678 unsigned int lexoptions = ISC_LEXOPT_EOL | ISC_LEXOPT_EOF |
679 ISC_LEXOPT_DNSMULTILINE | ISC_LEXOPT_ESCAPE;
682 void (*callback)(dns_rdatacallbacks_t *, const char *, ...);
683 isc_result_t tresult;
685 isc_boolean_t unknown;
687 REQUIRE(origin == NULL || dns_name_isabsolute(origin) == ISC_TRUE);
689 REQUIRE(DNS_RDATA_INITIALIZED(rdata));
690 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
692 if (callbacks != NULL) {
693 REQUIRE(callbacks->warn != NULL);
694 REQUIRE(callbacks->error != NULL);
699 if (callbacks != NULL)
700 callback = callbacks->error;
702 callback = default_fromtext_callback;
704 result = isc_lex_getmastertoken(lexer, &token, isc_tokentype_qstring,
706 if (result != ISC_R_SUCCESS) {
707 name = isc_lex_getsourcename(lexer);
708 line = isc_lex_getsourceline(lexer);
709 fromtext_error(callback, callbacks, name, line, NULL, result);
714 if (token.type == isc_tokentype_string &&
715 strcmp(DNS_AS_STR(token), "\\#") == 0) {
717 * If this is a TXT record '\#' could be a escaped '#'.
718 * Look to see if the next token is a number and if so
719 * treat it as a unknown record format.
721 if (type == dns_rdatatype_txt) {
722 result = isc_lex_getmastertoken(lexer, &token,
723 isc_tokentype_number,
725 if (result == ISC_R_SUCCESS)
726 isc_lex_ungettoken(lexer, &token);
729 if (result == ISC_R_SUCCESS) {
731 result = unknown_fromtext(rdclass, type, lexer,
734 options |= DNS_RDATA_UNKNOWNESCAPE;
736 isc_lex_ungettoken(lexer, &token);
742 * Consume to end of line / file.
743 * If not at end of line initially set error code.
744 * Call callback via fromtext_error once if there was an error.
747 name = isc_lex_getsourcename(lexer);
748 line = isc_lex_getsourceline(lexer);
749 tresult = isc_lex_gettoken(lexer, lexoptions, &token);
750 if (tresult != ISC_R_SUCCESS) {
751 if (result == ISC_R_SUCCESS)
753 if (callback != NULL)
754 fromtext_error(callback, callbacks, name,
757 } else if (token.type != isc_tokentype_eol &&
758 token.type != isc_tokentype_eof) {
759 if (result == ISC_R_SUCCESS)
760 result = DNS_R_EXTRATOKEN;
761 if (callback != NULL) {
762 fromtext_error(callback, callbacks, name,
763 line, &token, result);
766 } else if (result != ISC_R_SUCCESS && callback != NULL) {
767 fromtext_error(callback, callbacks, name, line,
771 if (token.type == isc_tokentype_eof)
772 fromtext_warneof(lexer, callbacks);
777 length = isc_buffer_usedlength(target) - isc_buffer_usedlength(&st);
778 if (result == ISC_R_SUCCESS && length > DNS_RDATA_MAXLENGTH)
779 result = ISC_R_NOSPACE;
781 if (rdata != NULL && result == ISC_R_SUCCESS) {
782 region.base = isc_buffer_used(&st);
783 region.length = length;
784 dns_rdata_fromregion(rdata, rdclass, type, ®ion);
786 if (result != ISC_R_SUCCESS) {
793 unknown_totext(dns_rdata_t *rdata, dns_rdata_textctx_t *tctx,
794 isc_buffer_t *target)
797 char buf[sizeof("65535")];
800 strlcpy(buf, "\\# ", sizeof(buf));
801 result = str_totext(buf, target);
802 if (result != ISC_R_SUCCESS)
805 dns_rdata_toregion(rdata, &sr);
806 INSIST(sr.length < 65536);
807 snprintf(buf, sizeof(buf), "%u", sr.length);
808 result = str_totext(buf, target);
809 if (result != ISC_R_SUCCESS)
812 if (sr.length != 0U) {
813 if ((tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0)
814 result = str_totext(" ( ", target);
816 result = str_totext(" ", target);
818 if (result != ISC_R_SUCCESS)
821 if (tctx->width == 0) /* No splitting */
822 result = isc_hex_totext(&sr, 0, "", target);
824 result = isc_hex_totext(&sr, tctx->width - 2,
827 if (result == ISC_R_SUCCESS &&
828 (tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0)
829 result = str_totext(" )", target);
835 rdata_totext(dns_rdata_t *rdata, dns_rdata_textctx_t *tctx,
836 isc_buffer_t *target)
838 isc_result_t result = ISC_R_NOTIMPLEMENTED;
839 isc_boolean_t use_default = ISC_FALSE;
841 REQUIRE(rdata != NULL);
842 REQUIRE(tctx->origin == NULL ||
843 dns_name_isabsolute(tctx->origin) == ISC_TRUE);
846 * Some DynDNS meta-RRs have empty rdata.
848 if ((rdata->flags & DNS_RDATA_UPDATE) != 0) {
849 INSIST(rdata->length == 0);
850 return (ISC_R_SUCCESS);
856 result = unknown_totext(rdata, tctx, target);
862 dns_rdata_totext(dns_rdata_t *rdata, dns_name_t *origin, isc_buffer_t *target)
864 dns_rdata_textctx_t tctx;
866 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
869 * Set up formatting options for single-line output.
871 tctx.origin = origin;
874 tctx.linebreak = " ";
875 return (rdata_totext(rdata, &tctx, target));
879 dns_rdata_tofmttext(dns_rdata_t *rdata, dns_name_t *origin,
880 unsigned int flags, unsigned int width,
881 const char *linebreak, isc_buffer_t *target)
883 dns_rdata_textctx_t tctx;
885 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
888 * Set up formatting options for formatted output.
890 tctx.origin = origin;
892 if ((flags & DNS_STYLEFLAG_MULTILINE) != 0) {
894 tctx.linebreak = linebreak;
896 tctx.width = 60; /* Used for hex word length only. */
897 tctx.linebreak = " ";
899 return (rdata_totext(rdata, &tctx, target));
903 dns_rdata_fromstruct(dns_rdata_t *rdata, dns_rdataclass_t rdclass,
904 dns_rdatatype_t type, void *source,
905 isc_buffer_t *target)
907 isc_result_t result = ISC_R_NOTIMPLEMENTED;
910 isc_boolean_t use_default = ISC_FALSE;
913 REQUIRE(source != NULL);
915 REQUIRE(DNS_RDATA_INITIALIZED(rdata));
916 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
926 length = isc_buffer_usedlength(target) - isc_buffer_usedlength(&st);
927 if (result == ISC_R_SUCCESS && length > DNS_RDATA_MAXLENGTH)
928 result = ISC_R_NOSPACE;
930 if (rdata != NULL && result == ISC_R_SUCCESS) {
931 region.base = isc_buffer_used(&st);
932 region.length = length;
933 dns_rdata_fromregion(rdata, rdclass, type, ®ion);
935 if (result != ISC_R_SUCCESS)
941 dns_rdata_tostruct(dns_rdata_t *rdata, void *target, isc_mem_t *mctx) {
942 isc_result_t result = ISC_R_NOTIMPLEMENTED;
943 isc_boolean_t use_default = ISC_FALSE;
945 REQUIRE(rdata != NULL);
946 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
957 dns_rdata_freestruct(void *source) {
958 dns_rdatacommon_t *common = source;
959 REQUIRE(source != NULL);
965 dns_rdata_additionaldata(dns_rdata_t *rdata, dns_additionaldatafunc_t add,
968 isc_result_t result = ISC_R_NOTIMPLEMENTED;
969 isc_boolean_t use_default = ISC_FALSE;
972 * Call 'add' for each name and type from 'rdata' which is subject to
973 * additional section processing.
976 REQUIRE(rdata != NULL);
977 REQUIRE(add != NULL);
978 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
982 /* No additional processing for unknown types */
984 result = ISC_R_SUCCESS;
990 dns_rdata_digest(dns_rdata_t *rdata, dns_digestfunc_t digest, void *arg) {
991 isc_result_t result = ISC_R_NOTIMPLEMENTED;
992 isc_boolean_t use_default = ISC_FALSE;
996 * Send 'rdata' in DNSSEC canonical form to 'digest'.
999 REQUIRE(rdata != NULL);
1000 REQUIRE(digest != NULL);
1001 REQUIRE(DNS_RDATA_VALIDFLAGS(rdata));
1006 dns_rdata_toregion(rdata, &r);
1007 result = (digest)(arg, &r);
1014 dns_rdata_checkowner(dns_name_t *name, dns_rdataclass_t rdclass,
1015 dns_rdatatype_t type, isc_boolean_t wildcard)
1017 isc_boolean_t result;
1024 dns_rdata_checknames(dns_rdata_t *rdata, dns_name_t *owner, dns_name_t *bad)
1026 isc_boolean_t result;
1033 dns_rdatatype_attributes(dns_rdatatype_t type)
1035 RDATATYPE_ATTRIBUTE_SW
1036 if (type >= (dns_rdatatype_t)128 && type < (dns_rdatatype_t)255)
1037 return (DNS_RDATATYPEATTR_UNKNOWN | DNS_RDATATYPEATTR_META);
1038 return (DNS_RDATATYPEATTR_UNKNOWN);
1042 dns_rdatatype_fromtext(dns_rdatatype_t *typep, isc_textregion_t *source) {
1050 return (DNS_R_UNKNOWN);
1052 a = tolower((unsigned char)source->base[0]);
1053 b = tolower((unsigned char)source->base[n - 1]);
1055 hash = ((a + n) * b) % 256;
1058 * This switch block is inlined via \#define, and will use "return"
1059 * to return a result to the caller if it is a valid (known)
1062 RDATATYPE_FROMTEXT_SW(hash, source->base, n, typep);
1064 if (source->length > 4 && source->length < (4 + sizeof("65000")) &&
1065 strncasecmp("type", source->base, 4) == 0) {
1066 char buf[sizeof("65000")];
1070 strncpy(buf, source->base + 4, source->length - 4);
1071 buf[source->length - 4] = '\0';
1072 val = strtoul(buf, &endp, 10);
1073 if (*endp == '\0' && val <= 0xffff) {
1074 *typep = (dns_rdatatype_t)val;
1075 return (ISC_R_SUCCESS);
1079 return (DNS_R_UNKNOWN);
1083 dns_rdatatype_totext(dns_rdatatype_t type, isc_buffer_t *target) {
1084 char buf[sizeof("TYPE65535")];
1087 snprintf(buf, sizeof(buf), "TYPE%u", type);
1088 return (str_totext(buf, target));
1092 dns_rdatatype_format(dns_rdatatype_t rdtype,
1093 char *array, unsigned int size)
1095 isc_result_t result;
1101 isc_buffer_init(&buf, array, size);
1102 result = dns_rdatatype_totext(rdtype, &buf);
1106 if (result == ISC_R_SUCCESS) {
1107 if (isc_buffer_availablelength(&buf) >= 1)
1108 isc_buffer_putuint8(&buf, 0);
1110 result = ISC_R_NOSPACE;
1112 if (result != ISC_R_SUCCESS)
1113 strlcpy(array, "<unknown>", size);
1121 name_length(dns_name_t *name) {
1122 return (name->length);
1126 txt_totext(isc_region_t *source, isc_buffer_t *target) {
1131 isc_region_t region;
1133 isc_buffer_availableregion(target, ®ion);
1135 tp = (char *)region.base;
1140 REQUIRE(n + 1 <= source->length);
1143 return (ISC_R_NOSPACE);
1147 if (*sp < 0x20 || *sp >= 0x7f) {
1149 return (ISC_R_NOSPACE);
1151 *tp++ = 0x30 + ((*sp / 100) % 10);
1152 *tp++ = 0x30 + ((*sp / 10) % 10);
1153 *tp++ = 0x30 + (*sp % 10);
1158 /* double quote, semi-colon, backslash */
1159 if (*sp == 0x22 || *sp == 0x3b || *sp == 0x5c) {
1161 return (ISC_R_NOSPACE);
1166 return (ISC_R_NOSPACE);
1171 return (ISC_R_NOSPACE);
1174 isc_buffer_add(target, tp - (char *)region.base);
1175 isc_region_consume(source, *source->base + 1);
1176 return (ISC_R_SUCCESS);
1180 txt_fromtext(isc_textregion_t *source, isc_buffer_t *target) {
1181 isc_region_t tregion;
1182 isc_boolean_t escape;
1183 unsigned int n, nrem;
1189 isc_buffer_availableregion(target, &tregion);
1193 nrem = tregion.length;
1196 return (ISC_R_NOSPACE);
1203 * Maximum text string length.
1209 if (escape && (d = decvalue((char)c)) != -1) {
1212 return (DNS_R_SYNTAX);
1214 if ((d = decvalue(*s++)) != -1)
1217 return (DNS_R_SYNTAX);
1219 return (DNS_R_SYNTAX);
1221 if ((d = decvalue(*s++)) != -1)
1224 return (DNS_R_SYNTAX);
1226 return (DNS_R_SYNTAX);
1227 } else if (!escape && c == '\\') {
1233 return ((tregion.length <= 256U) ?
1234 ISC_R_NOSPACE : DNS_R_SYNTAX);
1239 return (DNS_R_SYNTAX);
1240 *tregion.base = t - tregion.base - 1;
1241 isc_buffer_add(target, *tregion.base + 1);
1242 return (ISC_R_SUCCESS);
1246 txt_fromwire(isc_buffer_t *source, isc_buffer_t *target) {
1248 isc_region_t sregion;
1249 isc_region_t tregion;
1251 isc_buffer_activeregion(source, &sregion);
1252 if (sregion.length == 0)
1253 return(ISC_R_UNEXPECTEDEND);
1254 n = *sregion.base + 1;
1255 if (n > sregion.length)
1256 return (ISC_R_UNEXPECTEDEND);
1258 isc_buffer_availableregion(target, &tregion);
1259 if (n > tregion.length)
1260 return (ISC_R_NOSPACE);
1262 if (tregion.base != sregion.base)
1263 memcpy(tregion.base, sregion.base, n);
1264 isc_buffer_forward(source, n);
1265 isc_buffer_add(target, n);
1266 return (ISC_R_SUCCESS);
1270 multitxt_totext(isc_region_t *source, isc_buffer_t *target) {
1275 isc_region_t region;
1277 isc_buffer_availableregion(target, ®ion);
1279 tp = (char *)region.base;
1283 return (ISC_R_NOSPACE);
1289 REQUIRE(n0 + 1 <= source->length);
1292 if (*sp < 0x20 || *sp >= 0x7f) {
1294 return (ISC_R_NOSPACE);
1296 *tp++ = 0x30 + ((*sp / 100) % 10);
1297 *tp++ = 0x30 + ((*sp / 10) % 10);
1298 *tp++ = 0x30 + (*sp % 10);
1303 /* double quote, semi-colon, backslash */
1304 if (*sp == 0x22 || *sp == 0x3b || *sp == 0x5c) {
1306 return (ISC_R_NOSPACE);
1311 return (ISC_R_NOSPACE);
1315 isc_region_consume(source, n0 + 1);
1316 } while (source->length != 0);
1318 return (ISC_R_NOSPACE);
1321 isc_buffer_add(target, tp - (char *)region.base);
1322 return (ISC_R_SUCCESS);
1326 multitxt_fromtext(isc_textregion_t *source, isc_buffer_t *target) {
1327 isc_region_t tregion;
1328 isc_boolean_t escape;
1329 unsigned int n, nrem;
1331 unsigned char *t0, *t;
1340 isc_buffer_availableregion(target, &tregion);
1342 nrem = tregion.length;
1344 return (ISC_R_NOSPACE);
1349 /* 255 byte character-string slice */
1355 if (escape && (d = decvalue((char)c)) != -1) {
1358 return (DNS_R_SYNTAX);
1360 if ((d = decvalue(*s++)) != -1)
1363 return (DNS_R_SYNTAX);
1365 return (DNS_R_SYNTAX);
1367 if ((d = decvalue(*s++)) != -1)
1370 return (DNS_R_SYNTAX);
1372 return (DNS_R_SYNTAX);
1373 } else if (!escape && c == '\\') {
1384 return (DNS_R_SYNTAX);
1386 isc_buffer_add(target, *t0 + 1);
1388 return (ISC_R_SUCCESS);
1392 multitxt_fromwire(isc_buffer_t *source, isc_buffer_t *target) {
1394 isc_region_t sregion;
1395 isc_region_t tregion;
1397 isc_buffer_activeregion(source, &sregion);
1398 if (sregion.length == 0)
1399 return(ISC_R_UNEXPECTEDEND);
1403 return (DNS_R_SYNTAX);
1404 n = *sregion.base + 1;
1405 if (n > sregion.length)
1406 return (ISC_R_UNEXPECTEDEND);
1408 isc_buffer_availableregion(target, &tregion);
1409 if (n > tregion.length)
1410 return (ISC_R_NOSPACE);
1412 memcpy(tregion.base, sregion.base, n);
1413 isc_buffer_forward(source, n);
1414 isc_buffer_add(target, n);
1415 isc_buffer_activeregion(source, &sregion);
1416 } while (sregion.length != 0);
1417 return (ISC_R_SUCCESS);
1420 static isc_boolean_t
1421 name_prefix(dns_name_t *name, dns_name_t *origin, dns_name_t *target) {
1427 if (dns_name_compare(origin, dns_rootname) == 0)
1430 if (!dns_name_issubdomain(name, origin))
1433 l1 = dns_name_countlabels(name);
1434 l2 = dns_name_countlabels(origin);
1439 /* Master files should be case preserving. */
1440 dns_name_getlabelsequence(name, l1 - l2, l2, target);
1441 if (!dns_name_caseequal(origin, target))
1444 dns_name_getlabelsequence(name, 0, l1 - l2, target);
1453 str_totext(const char *source, isc_buffer_t *target) {
1455 isc_region_t region;
1457 isc_buffer_availableregion(target, ®ion);
1460 if (l > region.length)
1461 return (ISC_R_NOSPACE);
1463 memcpy(region.base, source, l);
1464 isc_buffer_add(target, l);
1465 return (ISC_R_SUCCESS);
1469 inet_totext(int af, isc_region_t *src, isc_buffer_t *target) {
1472 /* Note - inet_ntop doesn't do size checking on its input. */
1473 if (inet_ntop(af, src->base, tmpbuf, sizeof(tmpbuf)) == NULL)
1474 return (ISC_R_NOSPACE);
1475 if (strlen(tmpbuf) > isc_buffer_availablelength(target))
1476 return (ISC_R_NOSPACE);
1477 isc_buffer_putstr(target, tmpbuf);
1478 return (ISC_R_SUCCESS);
1481 static isc_boolean_t
1482 buffer_empty(isc_buffer_t *source) {
1483 return((source->current == source->active) ? ISC_TRUE : ISC_FALSE);
1487 buffer_fromregion(isc_buffer_t *buffer, isc_region_t *region) {
1488 isc_buffer_init(buffer, region->base, region->length);
1489 isc_buffer_add(buffer, region->length);
1490 isc_buffer_setactive(buffer, region->length);
1494 uint32_tobuffer(isc_uint32_t value, isc_buffer_t *target) {
1495 isc_region_t region;
1497 isc_buffer_availableregion(target, ®ion);
1498 if (region.length < 4)
1499 return (ISC_R_NOSPACE);
1500 isc_buffer_putuint32(target, value);
1501 return (ISC_R_SUCCESS);
1505 uint16_tobuffer(isc_uint32_t value, isc_buffer_t *target) {
1506 isc_region_t region;
1509 return (ISC_R_RANGE);
1510 isc_buffer_availableregion(target, ®ion);
1511 if (region.length < 2)
1512 return (ISC_R_NOSPACE);
1513 isc_buffer_putuint16(target, (isc_uint16_t)value);
1514 return (ISC_R_SUCCESS);
1518 uint8_tobuffer(isc_uint32_t value, isc_buffer_t *target) {
1519 isc_region_t region;
1522 return (ISC_R_RANGE);
1523 isc_buffer_availableregion(target, ®ion);
1524 if (region.length < 1)
1525 return (ISC_R_NOSPACE);
1526 isc_buffer_putuint8(target, (isc_uint8_t)value);
1527 return (ISC_R_SUCCESS);
1531 name_tobuffer(dns_name_t *name, isc_buffer_t *target) {
1533 dns_name_toregion(name, &r);
1534 return (isc_buffer_copyregion(target, &r));
1538 uint32_fromregion(isc_region_t *region) {
1541 REQUIRE(region->length >= 4);
1542 value = region->base[0] << 24;
1543 value |= region->base[1] << 16;
1544 value |= region->base[2] << 8;
1545 value |= region->base[3];
1550 uint16_consume_fromregion(isc_region_t *region) {
1551 isc_uint16_t r = uint16_fromregion(region);
1553 isc_region_consume(region, 2);
1558 uint16_fromregion(isc_region_t *region) {
1560 REQUIRE(region->length >= 2);
1562 return ((region->base[0] << 8) | region->base[1]);
1566 uint8_fromregion(isc_region_t *region) {
1568 REQUIRE(region->length >= 1);
1570 return (region->base[0]);
1574 uint8_consume_fromregion(isc_region_t *region) {
1575 isc_uint8_t r = uint8_fromregion(region);
1577 isc_region_consume(region, 1);
1582 mem_tobuffer(isc_buffer_t *target, void *base, unsigned int length) {
1585 isc_buffer_availableregion(target, &tr);
1586 if (length > tr.length)
1587 return (ISC_R_NOSPACE);
1588 if (tr.base != base)
1589 memcpy(tr.base, base, length);
1590 isc_buffer_add(target, length);
1591 return (ISC_R_SUCCESS);
1595 hexvalue(char value) {
1599 c = (unsigned char)value;
1605 if ((s = strchr(hexdigits, c)) == NULL)
1607 return (s - hexdigits);
1611 decvalue(char value) {
1615 * isascii() is valid for full range of int values, no need to
1618 if (!isascii(value))
1620 if ((s = strchr(decdigits, value)) == NULL)
1622 return (s - decdigits);
1625 static const char atob_digits[86] =
1626 "!\"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`" \
1627 "abcdefghijklmnopqrstu";
1629 * Subroutines to convert between 8 bit binary bytes and printable ASCII.
1630 * Computes the number of bytes, and three kinds of simple checksums.
1631 * Incoming bytes are collected into 32-bit words, then printed in base 85:
1632 * exp(85,5) > exp(2,32)
1633 * The ASCII characters used are between '!' and 'u';
1634 * 'z' encodes 32-bit zero; 'x' is used to mark the end of encoded data.
1636 * Originally by Paul Rutter (philabs!per) and Joe Orost (petsd!joe) for
1637 * the atob/btoa programs, released with the compress program, in mod.sources.
1638 * Modified by Mike Schwartz 8/19/86 for use in BIND.
1639 * Modified to be re-entrant 3/2/99.
1651 #define Ceor state->Ceor
1652 #define Csum state->Csum
1653 #define Crot state->Crot
1654 #define word state->word
1655 #define bcount state->bcount
1657 #define times85(x) ((((((x<<2)+x)<<2)+x)<<2)+x)
1659 static isc_result_t byte_atob(int c, isc_buffer_t *target,
1660 struct state *state);
1661 static isc_result_t putbyte(int c, isc_buffer_t *, struct state *state);
1662 static isc_result_t byte_btoa(int c, isc_buffer_t *, struct state *state);
1665 * Decode ASCII-encoded byte c into binary representation and
1666 * place into *bufp, advancing bufp.
1669 byte_atob(int c, isc_buffer_t *target, struct state *state) {
1673 return(DNS_R_SYNTAX);
1675 RETERR(putbyte(0, target, state));
1676 RETERR(putbyte(0, target, state));
1677 RETERR(putbyte(0, target, state));
1678 RETERR(putbyte(0, target, state));
1680 } else if ((s = strchr(atob_digits, c)) != NULL) {
1682 word = s - atob_digits;
1684 } else if (bcount < 4) {
1685 word = times85(word);
1686 word += s - atob_digits;
1689 word = times85(word);
1690 word += s - atob_digits;
1691 RETERR(putbyte((word >> 24) & 0xff, target, state));
1692 RETERR(putbyte((word >> 16) & 0xff, target, state));
1693 RETERR(putbyte((word >> 8) & 0xff, target, state));
1694 RETERR(putbyte(word & 0xff, target, state));
1699 return(DNS_R_SYNTAX);
1700 return(ISC_R_SUCCESS);
1704 * Compute checksum info and place c into target.
1707 putbyte(int c, isc_buffer_t *target, struct state *state) {
1713 if ((Crot & 0x80000000)) {
1720 isc_buffer_availableregion(target, &tr);
1722 return (ISC_R_NOSPACE);
1724 isc_buffer_add(target, 1);
1725 return (ISC_R_SUCCESS);
1729 * Read the ASCII-encoded data from inbuf, of length inbuflen, and convert
1730 * it into T_UNSPEC (binary data) in outbuf, not to exceed outbuflen bytes;
1731 * outbuflen must be divisible by 4. (Note: this is because outbuf is filled
1732 * in 4 bytes at a time. If the actual data doesn't end on an even 4-byte
1733 * boundary, there will be no problem...it will be padded with 0 bytes, and
1734 * numbytes will indicate the correct number of bytes. The main point is
1735 * that since the buffer is filled in 4 bytes at a time, even if there is
1736 * not a full 4 bytes of data at the end, there has to be room to 0-pad the
1737 * data, so the buffer must be of size divisible by 4). Place the number of
1738 * output bytes in numbytes, and return a failure/success status.
1742 atob_tobuffer(isc_lex_t *lexer, isc_buffer_t *target) {
1743 long oeor, osum, orot;
1744 struct state statebuf, *state= &statebuf;
1749 Ceor = Csum = Crot = word = bcount = 0;
1751 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
1753 while (token.value.as_textregion.length != 0) {
1754 if ((c = token.value.as_textregion.base[0]) == 'x') {
1757 RETERR(byte_atob(c, target, state));
1758 isc_textregion_consume(&token.value.as_textregion, 1);
1764 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_number,
1766 if ((token.value.as_ulong % 4) != 0U)
1767 isc_buffer_subtract(target, 4 - (token.value.as_ulong % 4));
1772 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
1774 oeor = strtol(DNS_AS_STR(token), &e, 16);
1776 return (DNS_R_SYNTAX);
1781 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
1783 osum = strtol(DNS_AS_STR(token), &e, 16);
1785 return (DNS_R_SYNTAX);
1790 RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
1792 orot = strtol(DNS_AS_STR(token), &e, 16);
1794 return (DNS_R_SYNTAX);
1796 if ((oeor != Ceor) || (osum != Csum) || (orot != Crot))
1797 return(DNS_R_BADCKSUM);
1798 return (ISC_R_SUCCESS);
1802 * Encode binary byte c into ASCII representation and place into *bufp,
1806 byte_btoa(int c, isc_buffer_t *target, struct state *state) {
1809 isc_buffer_availableregion(target, &tr);
1813 if ((Crot & 0x80000000)) {
1826 return (ISC_R_NOSPACE);
1828 isc_buffer_add(target, 1);
1830 register int tmp = 0;
1831 register isc_int32_t tmpword = word;
1835 * Because some don't support u_long.
1838 tmpword -= (isc_int32_t)(85 * 85 * 85 * 85 * 32);
1842 tmpword -= (isc_int32_t)(85 * 85 * 85 * 85 * 32);
1845 return (ISC_R_NOSPACE);
1846 tr.base[0] = atob_digits[(tmpword /
1847 (isc_int32_t)(85 * 85 * 85 * 85))
1849 tmpword %= (isc_int32_t)(85 * 85 * 85 * 85);
1850 tr.base[1] = atob_digits[tmpword / (85 * 85 * 85)];
1851 tmpword %= (85 * 85 * 85);
1852 tr.base[2] = atob_digits[tmpword / (85 * 85)];
1853 tmpword %= (85 * 85);
1854 tr.base[3] = atob_digits[tmpword / 85];
1856 tr.base[4] = atob_digits[tmpword];
1857 isc_buffer_add(target, 5);
1863 return (ISC_R_SUCCESS);
1868 * Encode the binary data from inbuf, of length inbuflen, into a
1869 * target. Return success/failure status
1872 btoa_totext(unsigned char *inbuf, int inbuflen, isc_buffer_t *target) {
1874 struct state statebuf, *state = &statebuf;
1875 char buf[sizeof("x 2000000000 ffffffff ffffffff ffffffff")];
1877 Ceor = Csum = Crot = word = bcount = 0;
1878 for (inc = 0; inc < inbuflen; inbuf++, inc++)
1879 RETERR(byte_btoa(*inbuf, target, state));
1882 RETERR(byte_btoa(0, target, state));
1885 * Put byte count and checksum information at end of buffer,
1888 snprintf(buf, sizeof(buf), "x %d %x %x %x", inbuflen, Ceor, Csum, Crot);
1889 return (str_totext(buf, target));
1894 default_fromtext_callback(dns_rdatacallbacks_t *callbacks, const char *fmt,
1902 vfprintf(stderr, fmt, ap);
1904 fprintf(stderr, "\n");
1908 fromtext_warneof(isc_lex_t *lexer, dns_rdatacallbacks_t *callbacks) {
1909 if (isc_lex_isfile(lexer) && callbacks != NULL) {
1910 const char *name = isc_lex_getsourcename(lexer);
1913 (*callbacks->warn)(callbacks,
1914 "%s:%lu: file does not end with newline",
1915 name, isc_lex_getsourceline(lexer));
1920 warn_badmx(isc_token_t *token, isc_lex_t *lexer,
1921 dns_rdatacallbacks_t *callbacks)
1926 if (lexer != NULL) {
1927 file = isc_lex_getsourcename(lexer);
1928 line = isc_lex_getsourceline(lexer);
1929 (*callbacks->warn)(callbacks, "%s:%u: warning: '%s': %s",
1930 file, line, DNS_AS_STR(*token),
1931 dns_result_totext(DNS_R_MXISADDRESS));
1936 warn_badname(dns_name_t *name, isc_lex_t *lexer,
1937 dns_rdatacallbacks_t *callbacks)
1941 char namebuf[DNS_NAME_FORMATSIZE];
1943 if (lexer != NULL) {
1944 file = isc_lex_getsourcename(lexer);
1945 line = isc_lex_getsourceline(lexer);
1946 dns_name_format(name, namebuf, sizeof(namebuf));
1947 (*callbacks->warn)(callbacks, "%s:%u: warning: %s: %s",
1948 file, line, namebuf,
1949 dns_result_totext(DNS_R_BADNAME));
1954 fromtext_error(void (*callback)(dns_rdatacallbacks_t *, const char *, ...),
1955 dns_rdatacallbacks_t *callbacks, const char *name,
1956 unsigned long line, isc_token_t *token, isc_result_t result)
1961 if (token != NULL) {
1962 switch (token->type) {
1963 case isc_tokentype_eol:
1964 (*callback)(callbacks, "%s: %s:%lu: near eol: %s",
1965 "dns_rdata_fromtext", name, line,
1966 dns_result_totext(result));
1968 case isc_tokentype_eof:
1969 (*callback)(callbacks, "%s: %s:%lu: near eof: %s",
1970 "dns_rdata_fromtext", name, line,
1971 dns_result_totext(result));
1973 case isc_tokentype_number:
1974 (*callback)(callbacks, "%s: %s:%lu: near %lu: %s",
1975 "dns_rdata_fromtext", name, line,
1976 token->value.as_ulong,
1977 dns_result_totext(result));
1979 case isc_tokentype_string:
1980 case isc_tokentype_qstring:
1981 (*callback)(callbacks, "%s: %s:%lu: near '%s': %s",
1982 "dns_rdata_fromtext", name, line,
1984 dns_result_totext(result));
1987 (*callback)(callbacks, "%s: %s:%lu: %s",
1988 "dns_rdata_fromtext", name, line,
1989 dns_result_totext(result));
1993 (*callback)(callbacks, "dns_rdata_fromtext: %s:%lu: %s",
1994 name, line, dns_result_totext(result));
1999 dns_rdata_covers(dns_rdata_t *rdata) {
2000 if (rdata->type == 46)
2001 return (covers_rrsig(rdata));
2002 return (covers_sig(rdata));
2006 dns_rdatatype_ismeta(dns_rdatatype_t type) {
2007 if ((dns_rdatatype_attributes(type) & DNS_RDATATYPEATTR_META) != 0)
2013 dns_rdatatype_issingleton(dns_rdatatype_t type) {
2014 if ((dns_rdatatype_attributes(type) & DNS_RDATATYPEATTR_SINGLETON)
2021 dns_rdatatype_notquestion(dns_rdatatype_t type) {
2022 if ((dns_rdatatype_attributes(type) & DNS_RDATATYPEATTR_NOTQUESTION)
2029 dns_rdatatype_questiononly(dns_rdatatype_t type) {
2030 if ((dns_rdatatype_attributes(type) & DNS_RDATATYPEATTR_QUESTIONONLY)
2037 dns_rdatatype_atparent(dns_rdatatype_t type) {
2038 if ((dns_rdatatype_attributes(type) & DNS_RDATATYPEATTR_ATPARENT) != 0)
2044 dns_rdataclass_ismeta(dns_rdataclass_t rdclass) {
2046 if (rdclass == dns_rdataclass_reserved0
2047 || rdclass == dns_rdataclass_none
2048 || rdclass == dns_rdataclass_any)
2051 return (ISC_FALSE); /* Assume it is not a meta class. */
2055 dns_rdatatype_isdnssec(dns_rdatatype_t type) {
2056 if ((dns_rdatatype_attributes(type) & DNS_RDATATYPEATTR_DNSSEC) != 0)
2062 dns_rdatatype_iszonecutauth(dns_rdatatype_t type) {
2063 if ((dns_rdatatype_attributes(type)
2064 & (DNS_RDATATYPEATTR_DNSSEC | DNS_RDATATYPEATTR_ZONECUTAUTH))
2071 dns_rdatatype_isknown(dns_rdatatype_t type) {
2072 if ((dns_rdatatype_attributes(type) & DNS_RDATATYPEATTR_UNKNOWN)
2079 dns_rdata_exists(dns_rdata_t *rdata, dns_rdatatype_t type) {
2081 REQUIRE(rdata != NULL);
2082 REQUIRE(DNS_RDATA_INITIALIZED(rdata));
2086 rdata->flags = DNS_RDATA_UPDATE;
2088 rdata->rdclass = dns_rdataclass_any;
2092 dns_rdata_notexist(dns_rdata_t *rdata, dns_rdatatype_t type) {
2094 REQUIRE(rdata != NULL);
2095 REQUIRE(DNS_RDATA_INITIALIZED(rdata));
2099 rdata->flags = DNS_RDATA_UPDATE;
2101 rdata->rdclass = dns_rdataclass_none;
2105 dns_rdata_deleterrset(dns_rdata_t *rdata, dns_rdatatype_t type) {
2107 REQUIRE(rdata != NULL);
2108 REQUIRE(DNS_RDATA_INITIALIZED(rdata));
2112 rdata->flags = DNS_RDATA_UPDATE;
2114 rdata->rdclass = dns_rdataclass_any;
2118 dns_rdata_makedelete(dns_rdata_t *rdata) {
2119 REQUIRE(rdata != NULL);
2121 rdata->rdclass = dns_rdataclass_none;
2125 dns_rdata_updateop(dns_rdata_t *rdata, dns_section_t section) {
2127 REQUIRE(rdata != NULL);
2128 REQUIRE(DNS_RDATA_INITIALIZED(rdata));
2131 case DNS_SECTION_PREREQUISITE:
2132 switch (rdata->rdclass) {
2133 case dns_rdataclass_none:
2134 switch (rdata->type) {
2135 case dns_rdatatype_any:
2136 return ("domain doesn't exist");
2138 return ("rrset doesn't exist");
2140 case dns_rdataclass_any:
2141 switch (rdata->type) {
2142 case dns_rdatatype_any:
2143 return ("domain exists");
2145 return ("rrset exists (value independent)");
2148 return ("rrset exists (value dependent)");
2150 case DNS_SECTION_UPDATE:
2151 switch (rdata->rdclass) {
2152 case dns_rdataclass_none:
2154 case dns_rdataclass_any:
2155 switch (rdata->type) {
2156 case dns_rdatatype_any:
2157 return ("delete all rrsets");
2159 return ("delete rrset");