2 This file is part of systemd.
4 Copyright 2014 Lennart Poettering
6 systemd is free software; you can redistribute it and/or modify it
7 under the terms of the GNU Lesser General Public License as published by
8 the Free Software Foundation; either version 2.1 of the License, or
9 (at your option) any later version.
11 systemd is distributed in the hope that it will be useful, but
12 WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public License
17 along with systemd; If not, see <http://www.gnu.org/licenses/>.
22 #include "alloc-util.h"
23 #include "dns-domain.h"
26 #include "hexdecoct.h"
27 #include "resolved-dns-dnssec.h"
28 #include "resolved-dns-packet.h"
29 #include "resolved-dns-rr.h"
30 #include "string-table.h"
31 #include "string-util.h"
33 #include "terminal-util.h"
35 DnsResourceKey
* dns_resource_key_new(uint16_t class, uint16_t type
, const char *name
) {
42 k
= malloc0(sizeof(DnsResourceKey
) + l
+ 1);
50 strcpy((char*) k
+ sizeof(DnsResourceKey
), name
);
55 DnsResourceKey
* dns_resource_key_new_redirect(const DnsResourceKey
*key
, const DnsResourceRecord
*cname
) {
61 assert(IN_SET(cname
->key
->type
, DNS_TYPE_CNAME
, DNS_TYPE_DNAME
));
63 if (cname
->key
->type
== DNS_TYPE_CNAME
)
64 return dns_resource_key_new(key
->class, key
->type
, cname
->cname
.name
);
67 char *destination
= NULL
;
69 r
= dns_name_change_suffix(DNS_RESOURCE_KEY_NAME(key
), DNS_RESOURCE_KEY_NAME(cname
->key
), cname
->dname
.name
, &destination
);
73 return dns_resource_key_ref((DnsResourceKey
*) key
);
75 k
= dns_resource_key_new_consume(key
->class, key
->type
, destination
);
85 int dns_resource_key_new_append_suffix(DnsResourceKey
**ret
, DnsResourceKey
*key
, char *name
) {
86 DnsResourceKey
*new_key
;
94 if (dns_name_is_root(name
)) {
95 *ret
= dns_resource_key_ref(key
);
99 r
= dns_name_concat(DNS_RESOURCE_KEY_NAME(key
), name
, &joined
);
103 new_key
= dns_resource_key_new_consume(key
->class, key
->type
, joined
);
113 DnsResourceKey
* dns_resource_key_new_consume(uint16_t class, uint16_t type
, char *name
) {
118 k
= new0(DnsResourceKey
, 1);
130 DnsResourceKey
* dns_resource_key_ref(DnsResourceKey
*k
) {
135 /* Static/const keys created with DNS_RESOURCE_KEY_CONST will
136 * set this to -1, they should not be reffed/unreffed */
137 assert(k
->n_ref
!= (unsigned) -1);
139 assert(k
->n_ref
> 0);
145 DnsResourceKey
* dns_resource_key_unref(DnsResourceKey
*k
) {
149 assert(k
->n_ref
!= (unsigned) -1);
150 assert(k
->n_ref
> 0);
161 bool dns_resource_key_is_address(const DnsResourceKey
*key
) {
164 /* Check if this is an A or AAAA resource key */
166 return key
->class == DNS_CLASS_IN
&& IN_SET(key
->type
, DNS_TYPE_A
, DNS_TYPE_AAAA
);
169 int dns_resource_key_equal(const DnsResourceKey
*a
, const DnsResourceKey
*b
) {
175 r
= dns_name_equal(DNS_RESOURCE_KEY_NAME(a
), DNS_RESOURCE_KEY_NAME(b
));
179 if (a
->class != b
->class)
182 if (a
->type
!= b
->type
)
188 int dns_resource_key_match_rr(const DnsResourceKey
*key
, DnsResourceRecord
*rr
, const char *search_domain
) {
197 /* Checks if an rr matches the specified key. If a search
198 * domain is specified, it will also be checked if the key
199 * with the search domain suffixed might match the RR. */
201 if (rr
->key
->class != key
->class && key
->class != DNS_CLASS_ANY
)
204 if (rr
->key
->type
!= key
->type
&& key
->type
!= DNS_TYPE_ANY
)
207 r
= dns_name_equal(DNS_RESOURCE_KEY_NAME(rr
->key
), DNS_RESOURCE_KEY_NAME(key
));
212 _cleanup_free_
char *joined
= NULL
;
214 r
= dns_name_concat(DNS_RESOURCE_KEY_NAME(key
), search_domain
, &joined
);
218 return dns_name_equal(DNS_RESOURCE_KEY_NAME(rr
->key
), joined
);
224 int dns_resource_key_match_cname_or_dname(const DnsResourceKey
*key
, const DnsResourceKey
*cname
, const char *search_domain
) {
230 if (cname
->class != key
->class && key
->class != DNS_CLASS_ANY
)
233 if (cname
->type
== DNS_TYPE_CNAME
)
234 r
= dns_name_equal(DNS_RESOURCE_KEY_NAME(key
), DNS_RESOURCE_KEY_NAME(cname
));
235 else if (cname
->type
== DNS_TYPE_DNAME
)
236 r
= dns_name_endswith(DNS_RESOURCE_KEY_NAME(key
), DNS_RESOURCE_KEY_NAME(cname
));
244 _cleanup_free_
char *joined
= NULL
;
246 r
= dns_name_concat(DNS_RESOURCE_KEY_NAME(key
), search_domain
, &joined
);
250 if (cname
->type
== DNS_TYPE_CNAME
)
251 return dns_name_equal(joined
, DNS_RESOURCE_KEY_NAME(cname
));
252 else if (cname
->type
== DNS_TYPE_DNAME
)
253 return dns_name_endswith(joined
, DNS_RESOURCE_KEY_NAME(cname
));
259 int dns_resource_key_match_soa(const DnsResourceKey
*key
, const DnsResourceKey
*soa
) {
263 /* Checks whether 'soa' is a SOA record for the specified key. */
265 if (soa
->class != key
->class)
268 if (soa
->type
!= DNS_TYPE_SOA
)
271 return dns_name_endswith(DNS_RESOURCE_KEY_NAME(key
), DNS_RESOURCE_KEY_NAME(soa
));
274 static void dns_resource_key_hash_func(const void *i
, struct siphash
*state
) {
275 const DnsResourceKey
*k
= i
;
279 dns_name_hash_func(DNS_RESOURCE_KEY_NAME(k
), state
);
280 siphash24_compress(&k
->class, sizeof(k
->class), state
);
281 siphash24_compress(&k
->type
, sizeof(k
->type
), state
);
284 static int dns_resource_key_compare_func(const void *a
, const void *b
) {
285 const DnsResourceKey
*x
= a
, *y
= b
;
288 ret
= dns_name_compare_func(DNS_RESOURCE_KEY_NAME(x
), DNS_RESOURCE_KEY_NAME(y
));
292 if (x
->type
< y
->type
)
294 if (x
->type
> y
->type
)
297 if (x
->class < y
->class)
299 if (x
->class > y
->class)
305 const struct hash_ops dns_resource_key_hash_ops
= {
306 .hash
= dns_resource_key_hash_func
,
307 .compare
= dns_resource_key_compare_func
310 int dns_resource_key_to_string(const DnsResourceKey
*key
, char **ret
) {
311 char cbuf
[strlen("CLASS") + DECIMAL_STR_MAX(uint16_t)], tbuf
[strlen("TYPE") + DECIMAL_STR_MAX(uint16_t)];
312 const char *c
, *t
, *n
;
315 /* If we cannot convert the CLASS/TYPE into a known string,
316 use the format recommended by RFC 3597, Section 5. */
318 c
= dns_class_to_string(key
->class);
320 sprintf(cbuf
, "CLASS%u", key
->class);
324 t
= dns_type_to_string(key
->type
);
326 sprintf(tbuf
, "TYPE%u", key
->type
);
330 n
= DNS_RESOURCE_KEY_NAME(key
);
331 if (asprintf(&s
, "%s%s %s %-5s", n
, endswith(n
, ".") ? "" : ".", c
, t
) < 0)
338 bool dns_resource_key_reduce(DnsResourceKey
**a
, DnsResourceKey
**b
) {
342 /* Try to replace one RR key by another if they are identical, thus saving a bit of memory. Note that we do
343 * this only for RR keys, not for RRs themselves, as they carry a lot of additional metadata (where they come
344 * from, validity data, and suchlike), and cannot be replaced so easily by other RRs that have the same
345 * superficial data. */
352 /* We refuse merging const keys */
353 if ((*a
)->n_ref
== (unsigned) -1)
355 if ((*b
)->n_ref
== (unsigned) -1)
358 /* Already the same? */
362 /* Are they really identical? */
363 if (dns_resource_key_equal(*a
, *b
) <= 0)
366 /* Keep the one which already has more references. */
367 if ((*a
)->n_ref
> (*b
)->n_ref
) {
368 dns_resource_key_unref(*b
);
369 *b
= dns_resource_key_ref(*a
);
371 dns_resource_key_unref(*a
);
372 *a
= dns_resource_key_ref(*b
);
378 DnsResourceRecord
* dns_resource_record_new(DnsResourceKey
*key
) {
379 DnsResourceRecord
*rr
;
381 rr
= new0(DnsResourceRecord
, 1);
386 rr
->key
= dns_resource_key_ref(key
);
387 rr
->expiry
= USEC_INFINITY
;
388 rr
->n_skip_labels_signer
= rr
->n_skip_labels_source
= (unsigned) -1;
393 DnsResourceRecord
* dns_resource_record_new_full(uint16_t class, uint16_t type
, const char *name
) {
394 _cleanup_(dns_resource_key_unrefp
) DnsResourceKey
*key
= NULL
;
396 key
= dns_resource_key_new(class, type
, name
);
400 return dns_resource_record_new(key
);
403 DnsResourceRecord
* dns_resource_record_ref(DnsResourceRecord
*rr
) {
407 assert(rr
->n_ref
> 0);
413 DnsResourceRecord
* dns_resource_record_unref(DnsResourceRecord
*rr
) {
417 assert(rr
->n_ref
> 0);
425 switch(rr
->key
->type
) {
445 dns_txt_item_free_all(rr
->txt
.items
);
454 free(rr
->mx
.exchange
);
462 free(rr
->sshfp
.fingerprint
);
465 case DNS_TYPE_DNSKEY
:
466 free(rr
->dnskey
.key
);
470 free(rr
->rrsig
.signer
);
471 free(rr
->rrsig
.signature
);
475 free(rr
->nsec
.next_domain_name
);
476 bitmap_free(rr
->nsec
.types
);
480 free(rr
->nsec3
.next_hashed_name
);
481 free(rr
->nsec3
.salt
);
482 bitmap_free(rr
->nsec3
.types
);
499 case DNS_TYPE_OPENPGPKEY
:
501 free(rr
->generic
.data
);
504 free(rr
->wire_format
);
505 dns_resource_key_unref(rr
->key
);
514 int dns_resource_record_new_reverse(DnsResourceRecord
**ret
, int family
, const union in_addr_union
*address
, const char *hostname
) {
515 _cleanup_(dns_resource_key_unrefp
) DnsResourceKey
*key
= NULL
;
516 _cleanup_(dns_resource_record_unrefp
) DnsResourceRecord
*rr
= NULL
;
517 _cleanup_free_
char *ptr
= NULL
;
524 r
= dns_name_reverse(family
, address
, &ptr
);
528 key
= dns_resource_key_new_consume(DNS_CLASS_IN
, DNS_TYPE_PTR
, ptr
);
534 rr
= dns_resource_record_new(key
);
538 rr
->ptr
.name
= strdup(hostname
);
548 int dns_resource_record_new_address(DnsResourceRecord
**ret
, int family
, const union in_addr_union
*address
, const char *name
) {
549 DnsResourceRecord
*rr
;
555 if (family
== AF_INET
) {
557 rr
= dns_resource_record_new_full(DNS_CLASS_IN
, DNS_TYPE_A
, name
);
561 rr
->a
.in_addr
= address
->in
;
563 } else if (family
== AF_INET6
) {
565 rr
= dns_resource_record_new_full(DNS_CLASS_IN
, DNS_TYPE_AAAA
, name
);
569 rr
->aaaa
.in6_addr
= address
->in6
;
571 return -EAFNOSUPPORT
;
578 #define FIELD_EQUAL(a, b, field) \
579 ((a).field ## _size == (b).field ## _size && \
580 memcmp((a).field, (b).field, (a).field ## _size) == 0)
582 int dns_resource_record_equal(const DnsResourceRecord
*a
, const DnsResourceRecord
*b
) {
591 r
= dns_resource_key_equal(a
->key
, b
->key
);
595 if (a
->unparseable
!= b
->unparseable
)
598 switch (a
->unparseable
? _DNS_TYPE_INVALID
: a
->key
->type
) {
601 r
= dns_name_equal(a
->srv
.name
, b
->srv
.name
);
605 return a
->srv
.priority
== b
->srv
.priority
&&
606 a
->srv
.weight
== b
->srv
.weight
&&
607 a
->srv
.port
== b
->srv
.port
;
613 return dns_name_equal(a
->ptr
.name
, b
->ptr
.name
);
616 return strcaseeq(a
->hinfo
.cpu
, b
->hinfo
.cpu
) &&
617 strcaseeq(a
->hinfo
.os
, b
->hinfo
.os
);
619 case DNS_TYPE_SPF
: /* exactly the same as TXT */
621 return dns_txt_item_equal(a
->txt
.items
, b
->txt
.items
);
624 return memcmp(&a
->a
.in_addr
, &b
->a
.in_addr
, sizeof(struct in_addr
)) == 0;
627 return memcmp(&a
->aaaa
.in6_addr
, &b
->aaaa
.in6_addr
, sizeof(struct in6_addr
)) == 0;
630 r
= dns_name_equal(a
->soa
.mname
, b
->soa
.mname
);
633 r
= dns_name_equal(a
->soa
.rname
, b
->soa
.rname
);
637 return a
->soa
.serial
== b
->soa
.serial
&&
638 a
->soa
.refresh
== b
->soa
.refresh
&&
639 a
->soa
.retry
== b
->soa
.retry
&&
640 a
->soa
.expire
== b
->soa
.expire
&&
641 a
->soa
.minimum
== b
->soa
.minimum
;
644 if (a
->mx
.priority
!= b
->mx
.priority
)
647 return dns_name_equal(a
->mx
.exchange
, b
->mx
.exchange
);
650 assert(a
->loc
.version
== b
->loc
.version
);
652 return a
->loc
.size
== b
->loc
.size
&&
653 a
->loc
.horiz_pre
== b
->loc
.horiz_pre
&&
654 a
->loc
.vert_pre
== b
->loc
.vert_pre
&&
655 a
->loc
.latitude
== b
->loc
.latitude
&&
656 a
->loc
.longitude
== b
->loc
.longitude
&&
657 a
->loc
.altitude
== b
->loc
.altitude
;
660 return a
->ds
.key_tag
== b
->ds
.key_tag
&&
661 a
->ds
.algorithm
== b
->ds
.algorithm
&&
662 a
->ds
.digest_type
== b
->ds
.digest_type
&&
663 FIELD_EQUAL(a
->ds
, b
->ds
, digest
);
666 return a
->sshfp
.algorithm
== b
->sshfp
.algorithm
&&
667 a
->sshfp
.fptype
== b
->sshfp
.fptype
&&
668 FIELD_EQUAL(a
->sshfp
, b
->sshfp
, fingerprint
);
670 case DNS_TYPE_DNSKEY
:
671 return a
->dnskey
.flags
== b
->dnskey
.flags
&&
672 a
->dnskey
.protocol
== b
->dnskey
.protocol
&&
673 a
->dnskey
.algorithm
== b
->dnskey
.algorithm
&&
674 FIELD_EQUAL(a
->dnskey
, b
->dnskey
, key
);
677 /* do the fast comparisons first */
678 return a
->rrsig
.type_covered
== b
->rrsig
.type_covered
&&
679 a
->rrsig
.algorithm
== b
->rrsig
.algorithm
&&
680 a
->rrsig
.labels
== b
->rrsig
.labels
&&
681 a
->rrsig
.original_ttl
== b
->rrsig
.original_ttl
&&
682 a
->rrsig
.expiration
== b
->rrsig
.expiration
&&
683 a
->rrsig
.inception
== b
->rrsig
.inception
&&
684 a
->rrsig
.key_tag
== b
->rrsig
.key_tag
&&
685 FIELD_EQUAL(a
->rrsig
, b
->rrsig
, signature
) &&
686 dns_name_equal(a
->rrsig
.signer
, b
->rrsig
.signer
);
689 return dns_name_equal(a
->nsec
.next_domain_name
, b
->nsec
.next_domain_name
) &&
690 bitmap_equal(a
->nsec
.types
, b
->nsec
.types
);
693 return a
->nsec3
.algorithm
== b
->nsec3
.algorithm
&&
694 a
->nsec3
.flags
== b
->nsec3
.flags
&&
695 a
->nsec3
.iterations
== b
->nsec3
.iterations
&&
696 FIELD_EQUAL(a
->nsec3
, b
->nsec3
, salt
) &&
697 FIELD_EQUAL(a
->nsec3
, b
->nsec3
, next_hashed_name
) &&
698 bitmap_equal(a
->nsec3
.types
, b
->nsec3
.types
);
701 return a
->tlsa
.cert_usage
== b
->tlsa
.cert_usage
&&
702 a
->tlsa
.selector
== b
->tlsa
.selector
&&
703 a
->tlsa
.matching_type
== b
->tlsa
.matching_type
&&
704 FIELD_EQUAL(a
->tlsa
, b
->tlsa
, data
);
707 return a
->caa
.flags
== b
->caa
.flags
&&
708 streq(a
->caa
.tag
, b
->caa
.tag
) &&
709 FIELD_EQUAL(a
->caa
, b
->caa
, value
);
711 case DNS_TYPE_OPENPGPKEY
:
713 return FIELD_EQUAL(a
->generic
, b
->generic
, data
);
717 static char* format_location(uint32_t latitude
, uint32_t longitude
, uint32_t altitude
,
718 uint8_t size
, uint8_t horiz_pre
, uint8_t vert_pre
) {
720 char NS
= latitude
>= 1U<<31 ? 'N' : 'S';
721 char EW
= longitude
>= 1U<<31 ? 'E' : 'W';
723 int lat
= latitude
>= 1U<<31 ? (int) (latitude
- (1U<<31)) : (int) ((1U<<31) - latitude
);
724 int lon
= longitude
>= 1U<<31 ? (int) (longitude
- (1U<<31)) : (int) ((1U<<31) - longitude
);
725 double alt
= altitude
>= 10000000u ? altitude
- 10000000u : -(double)(10000000u - altitude
);
726 double siz
= (size
>> 4) * exp10((double) (size
& 0xF));
727 double hor
= (horiz_pre
>> 4) * exp10((double) (horiz_pre
& 0xF));
728 double ver
= (vert_pre
>> 4) * exp10((double) (vert_pre
& 0xF));
730 if (asprintf(&s
, "%d %d %.3f %c %d %d %.3f %c %.2fm %.2fm %.2fm %.2fm",
733 (lat
% 60000) / 1000.,
737 (lon
% 60000) / 1000.,
748 static int format_timestamp_dns(char *buf
, size_t l
, time_t sec
) {
752 assert(l
> strlen("YYYYMMDDHHmmSS"));
754 if (!gmtime_r(&sec
, &tm
))
757 if (strftime(buf
, l
, "%Y%m%d%H%M%S", &tm
) <= 0)
763 static char *format_types(Bitmap
*types
) {
764 _cleanup_strv_free_
char **strv
= NULL
;
765 _cleanup_free_
char *str
= NULL
;
770 BITMAP_FOREACH(type
, types
, i
) {
771 if (dns_type_to_string(type
)) {
772 r
= strv_extend(&strv
, dns_type_to_string(type
));
778 r
= asprintf(&t
, "TYPE%u", type
);
782 r
= strv_consume(&strv
, t
);
788 str
= strv_join(strv
, " ");
792 return strjoin("( ", str
, " )", NULL
);
795 static char *format_txt(DnsTxtItem
*first
) {
800 LIST_FOREACH(items
, i
, first
)
801 c
+= i
->length
* 4 + 3;
803 p
= s
= new(char, c
);
807 LIST_FOREACH(items
, i
, first
) {
815 for (j
= 0; j
< i
->length
; j
++) {
816 if (i
->data
[j
] < ' ' || i
->data
[j
] == '"' || i
->data
[j
] >= 127) {
818 *(p
++) = '0' + (i
->data
[j
] / 100);
819 *(p
++) = '0' + ((i
->data
[j
] / 10) % 10);
820 *(p
++) = '0' + (i
->data
[j
] % 10);
832 const char *dns_resource_record_to_string(DnsResourceRecord
*rr
) {
833 _cleanup_free_
char *k
= NULL
, *t
= NULL
;
840 return rr
->to_string
;
842 r
= dns_resource_key_to_string(rr
->key
, &k
);
846 switch (rr
->unparseable
? _DNS_TYPE_INVALID
: rr
->key
->type
) {
849 r
= asprintf(&s
, "%s %u %u %u %s",
854 strna(rr
->srv
.name
));
863 s
= strjoin(k
, " ", rr
->ptr
.name
, NULL
);
870 s
= strjoin(k
, " ", rr
->hinfo
.cpu
, " ", rr
->hinfo
.os
, NULL
);
875 case DNS_TYPE_SPF
: /* exactly the same as TXT */
877 t
= format_txt(rr
->txt
.items
);
881 s
= strjoin(k
, " ", t
, NULL
);
887 _cleanup_free_
char *x
= NULL
;
889 r
= in_addr_to_string(AF_INET
, (const union in_addr_union
*) &rr
->a
.in_addr
, &x
);
893 s
= strjoin(k
, " ", x
, NULL
);
900 r
= in_addr_to_string(AF_INET6
, (const union in_addr_union
*) &rr
->aaaa
.in6_addr
, &t
);
904 s
= strjoin(k
, " ", t
, NULL
);
910 r
= asprintf(&s
, "%s %s %s %u %u %u %u %u",
912 strna(rr
->soa
.mname
),
913 strna(rr
->soa
.rname
),
924 r
= asprintf(&s
, "%s %u %s",
933 assert(rr
->loc
.version
== 0);
935 t
= format_location(rr
->loc
.latitude
,
944 s
= strjoin(k
, " ", t
, NULL
);
950 t
= hexmem(rr
->ds
.digest
, rr
->ds
.digest_size
);
954 r
= asprintf(&s
, "%s %u %u %u %s",
965 t
= hexmem(rr
->sshfp
.fingerprint
, rr
->sshfp
.fingerprint_size
);
969 r
= asprintf(&s
, "%s %u %u %s",
978 case DNS_TYPE_DNSKEY
: {
979 _cleanup_free_
char *alg
= NULL
;
984 key_tag
= dnssec_keytag(rr
, true);
986 r
= dnssec_algorithm_to_string_alloc(rr
->dnskey
.algorithm
, &alg
);
990 r
= asprintf(&s
, "%s %u %u %s %n",
999 r
= base64_append(&s
, n
,
1000 rr
->dnskey
.key
, rr
->dnskey
.key_size
,
1005 r
= asprintf(&ss
, "%s\n"
1006 " -- Flags:%s%s%s\n"
1009 rr
->dnskey
.flags
& DNSKEY_FLAG_SEP
? " SEP" : "",
1010 rr
->dnskey
.flags
& DNSKEY_FLAG_REVOKE
? " REVOKE" : "",
1011 rr
->dnskey
.flags
& DNSKEY_FLAG_ZONE_KEY
? " ZONE_KEY" : "",
1021 case DNS_TYPE_RRSIG
: {
1022 _cleanup_free_
char *alg
= NULL
;
1023 char expiration
[strlen("YYYYMMDDHHmmSS") + 1], inception
[strlen("YYYYMMDDHHmmSS") + 1];
1027 type
= dns_type_to_string(rr
->rrsig
.type_covered
);
1029 r
= dnssec_algorithm_to_string_alloc(rr
->rrsig
.algorithm
, &alg
);
1033 r
= format_timestamp_dns(expiration
, sizeof(expiration
), rr
->rrsig
.expiration
);
1037 r
= format_timestamp_dns(inception
, sizeof(inception
), rr
->rrsig
.inception
);
1042 * http://tools.ietf.org/html/rfc3597#section-5 */
1044 r
= asprintf(&s
, "%s %s%.*u %s %u %u %s %s %u %s %n",
1047 type
? 0 : 1, type
? 0u : (unsigned) rr
->rrsig
.type_covered
,
1050 rr
->rrsig
.original_ttl
,
1059 r
= base64_append(&s
, n
,
1060 rr
->rrsig
.signature
, rr
->rrsig
.signature_size
,
1069 t
= format_types(rr
->nsec
.types
);
1073 r
= asprintf(&s
, "%s %s %s",
1075 rr
->nsec
.next_domain_name
,
1081 case DNS_TYPE_NSEC3
: {
1082 _cleanup_free_
char *salt
= NULL
, *hash
= NULL
;
1084 if (rr
->nsec3
.salt_size
> 0) {
1085 salt
= hexmem(rr
->nsec3
.salt
, rr
->nsec3
.salt_size
);
1090 hash
= base32hexmem(rr
->nsec3
.next_hashed_name
, rr
->nsec3
.next_hashed_name_size
, false);
1094 t
= format_types(rr
->nsec3
.types
);
1098 r
= asprintf(&s
, "%s %"PRIu8
" %"PRIu8
" %"PRIu16
" %s %s %s",
1100 rr
->nsec3
.algorithm
,
1102 rr
->nsec3
.iterations
,
1103 rr
->nsec3
.salt_size
> 0 ? salt
: "-",
1112 case DNS_TYPE_TLSA
: {
1113 const char *cert_usage
, *selector
, *matching_type
;
1117 cert_usage
= tlsa_cert_usage_to_string(rr
->tlsa
.cert_usage
);
1118 selector
= tlsa_selector_to_string(rr
->tlsa
.selector
);
1119 matching_type
= tlsa_matching_type_to_string(rr
->tlsa
.matching_type
);
1121 r
= asprintf(&s
, "%s %u %u %u %n",
1123 rr
->tlsa
.cert_usage
,
1125 rr
->tlsa
.matching_type
,
1130 r
= base64_append(&s
, n
,
1131 rr
->tlsa
.data
, rr
->tlsa
.data_size
,
1136 r
= asprintf(&ss
, "%s\n"
1137 " -- Cert. usage: %s\n"
1138 " -- Selector: %s\n"
1139 " -- Matching type: %s",
1152 case DNS_TYPE_CAA
: {
1153 _cleanup_free_
char *value
;
1155 value
= octescape(rr
->caa
.value
, rr
->caa
.value_size
);
1159 r
= asprintf(&s
, "%s %u %s \"%s\"%s%s%s%.0u",
1164 rr
->caa
.flags
? "\n -- Flags:" : "",
1165 rr
->caa
.flags
& CAA_FLAG_CRITICAL
? " critical" : "",
1166 rr
->caa
.flags
& ~CAA_FLAG_CRITICAL
? " " : "",
1167 rr
->caa
.flags
& ~CAA_FLAG_CRITICAL
);
1174 case DNS_TYPE_OPENPGPKEY
: {
1177 r
= asprintf(&s
, "%s %n",
1183 r
= base64_append(&s
, n
,
1184 rr
->generic
.data
, rr
->generic
.data_size
,
1192 t
= hexmem(rr
->generic
.data
, rr
->generic
.data_size
);
1196 /* Format as documented in RFC 3597, Section 5 */
1197 r
= asprintf(&s
, "%s \\# %zu %s", k
, rr
->generic
.data_size
, t
);
1207 ssize_t
dns_resource_record_payload(DnsResourceRecord
*rr
, void **out
) {
1211 switch(rr
->unparseable
? _DNS_TYPE_INVALID
: rr
->key
->type
) {
1215 case DNS_TYPE_CNAME
:
1216 case DNS_TYPE_DNAME
:
1217 case DNS_TYPE_HINFO
:
1226 case DNS_TYPE_SSHFP
:
1227 case DNS_TYPE_DNSKEY
:
1228 case DNS_TYPE_RRSIG
:
1230 case DNS_TYPE_NSEC3
:
1234 *out
= rr
->tlsa
.data
;
1235 return rr
->tlsa
.data_size
;
1238 case DNS_TYPE_OPENPGPKEY
:
1240 *out
= rr
->generic
.data
;
1241 return rr
->generic
.data_size
;
1245 int dns_resource_record_to_wire_format(DnsResourceRecord
*rr
, bool canonical
) {
1247 DnsPacket packet
= {
1249 .protocol
= DNS_PROTOCOL_DNS
,
1251 .refuse_compression
= true,
1252 .canonical_form
= canonical
,
1260 /* Generates the RR in wire-format, optionally in the
1261 * canonical form as discussed in the DNSSEC RFC 4034, Section
1262 * 6.2. We allocate a throw-away DnsPacket object on the stack
1263 * here, because we need some book-keeping for memory
1264 * management, and can reuse the DnsPacket serializer, that
1265 * can generate the canonical form, too, but also knows label
1266 * compression and suchlike. */
1268 if (rr
->wire_format
&& rr
->wire_format_canonical
== canonical
)
1271 r
= dns_packet_append_rr(&packet
, rr
, &start
, &rds
);
1276 assert(packet
._data
);
1278 free(rr
->wire_format
);
1279 rr
->wire_format
= packet
._data
;
1280 rr
->wire_format_size
= packet
.size
;
1281 rr
->wire_format_rdata_offset
= rds
;
1282 rr
->wire_format_canonical
= canonical
;
1284 packet
._data
= NULL
;
1285 dns_packet_unref(&packet
);
1290 int dns_resource_record_signer(DnsResourceRecord
*rr
, const char **ret
) {
1297 /* Returns the RRset's signer, if it is known. */
1299 if (rr
->n_skip_labels_signer
== (unsigned) -1)
1302 n
= DNS_RESOURCE_KEY_NAME(rr
->key
);
1303 r
= dns_name_skip(n
, rr
->n_skip_labels_signer
, &n
);
1313 int dns_resource_record_source(DnsResourceRecord
*rr
, const char **ret
) {
1320 /* Returns the RRset's synthesizing source, if it is known. */
1322 if (rr
->n_skip_labels_source
== (unsigned) -1)
1325 n
= DNS_RESOURCE_KEY_NAME(rr
->key
);
1326 r
= dns_name_skip(n
, rr
->n_skip_labels_source
, &n
);
1336 int dns_resource_record_is_signer(DnsResourceRecord
*rr
, const char *zone
) {
1342 r
= dns_resource_record_signer(rr
, &signer
);
1346 return dns_name_equal(zone
, signer
);
1349 int dns_resource_record_is_synthetic(DnsResourceRecord
*rr
) {
1354 /* Returns > 0 if the RR is generated from a wildcard, and is not the asterisk name itself */
1356 if (rr
->n_skip_labels_source
== (unsigned) -1)
1359 if (rr
->n_skip_labels_source
== 0)
1362 if (rr
->n_skip_labels_source
> 1)
1365 r
= dns_name_startswith(DNS_RESOURCE_KEY_NAME(rr
->key
), "*");
1372 void dns_resource_record_hash_func(const void *i
, struct siphash
*state
) {
1373 const DnsResourceRecord
*rr
= i
;
1377 dns_resource_key_hash_func(rr
->key
, state
);
1379 switch (rr
->unparseable
? _DNS_TYPE_INVALID
: rr
->key
->type
) {
1382 siphash24_compress(&rr
->srv
.priority
, sizeof(rr
->srv
.priority
), state
);
1383 siphash24_compress(&rr
->srv
.weight
, sizeof(rr
->srv
.weight
), state
);
1384 siphash24_compress(&rr
->srv
.port
, sizeof(rr
->srv
.port
), state
);
1385 dns_name_hash_func(rr
->srv
.name
, state
);
1390 case DNS_TYPE_CNAME
:
1391 case DNS_TYPE_DNAME
:
1392 dns_name_hash_func(rr
->ptr
.name
, state
);
1395 case DNS_TYPE_HINFO
:
1396 string_hash_func(rr
->hinfo
.cpu
, state
);
1397 string_hash_func(rr
->hinfo
.os
, state
);
1401 case DNS_TYPE_SPF
: {
1404 LIST_FOREACH(items
, j
, rr
->txt
.items
) {
1405 siphash24_compress(j
->data
, j
->length
, state
);
1407 /* Add an extra NUL byte, so that "a" followed by "b" doesn't result in the same hash as "ab"
1408 * followed by "". */
1409 siphash24_compress_byte(0, state
);
1415 siphash24_compress(&rr
->a
.in_addr
, sizeof(rr
->a
.in_addr
), state
);
1419 siphash24_compress(&rr
->aaaa
.in6_addr
, sizeof(rr
->aaaa
.in6_addr
), state
);
1423 dns_name_hash_func(rr
->soa
.mname
, state
);
1424 dns_name_hash_func(rr
->soa
.rname
, state
);
1425 siphash24_compress(&rr
->soa
.serial
, sizeof(rr
->soa
.serial
), state
);
1426 siphash24_compress(&rr
->soa
.refresh
, sizeof(rr
->soa
.refresh
), state
);
1427 siphash24_compress(&rr
->soa
.retry
, sizeof(rr
->soa
.retry
), state
);
1428 siphash24_compress(&rr
->soa
.expire
, sizeof(rr
->soa
.expire
), state
);
1429 siphash24_compress(&rr
->soa
.minimum
, sizeof(rr
->soa
.minimum
), state
);
1433 siphash24_compress(&rr
->mx
.priority
, sizeof(rr
->mx
.priority
), state
);
1434 dns_name_hash_func(rr
->mx
.exchange
, state
);
1438 siphash24_compress(&rr
->loc
.version
, sizeof(rr
->loc
.version
), state
);
1439 siphash24_compress(&rr
->loc
.size
, sizeof(rr
->loc
.size
), state
);
1440 siphash24_compress(&rr
->loc
.horiz_pre
, sizeof(rr
->loc
.horiz_pre
), state
);
1441 siphash24_compress(&rr
->loc
.vert_pre
, sizeof(rr
->loc
.vert_pre
), state
);
1442 siphash24_compress(&rr
->loc
.latitude
, sizeof(rr
->loc
.latitude
), state
);
1443 siphash24_compress(&rr
->loc
.longitude
, sizeof(rr
->loc
.longitude
), state
);
1444 siphash24_compress(&rr
->loc
.altitude
, sizeof(rr
->loc
.altitude
), state
);
1447 case DNS_TYPE_SSHFP
:
1448 siphash24_compress(&rr
->sshfp
.algorithm
, sizeof(rr
->sshfp
.algorithm
), state
);
1449 siphash24_compress(&rr
->sshfp
.fptype
, sizeof(rr
->sshfp
.fptype
), state
);
1450 siphash24_compress(rr
->sshfp
.fingerprint
, rr
->sshfp
.fingerprint_size
, state
);
1453 case DNS_TYPE_DNSKEY
:
1454 siphash24_compress(&rr
->dnskey
.flags
, sizeof(rr
->dnskey
.flags
), state
);
1455 siphash24_compress(&rr
->dnskey
.protocol
, sizeof(rr
->dnskey
.protocol
), state
);
1456 siphash24_compress(&rr
->dnskey
.algorithm
, sizeof(rr
->dnskey
.algorithm
), state
);
1457 siphash24_compress(rr
->dnskey
.key
, rr
->dnskey
.key_size
, state
);
1460 case DNS_TYPE_RRSIG
:
1461 siphash24_compress(&rr
->rrsig
.type_covered
, sizeof(rr
->rrsig
.type_covered
), state
);
1462 siphash24_compress(&rr
->rrsig
.algorithm
, sizeof(rr
->rrsig
.algorithm
), state
);
1463 siphash24_compress(&rr
->rrsig
.labels
, sizeof(rr
->rrsig
.labels
), state
);
1464 siphash24_compress(&rr
->rrsig
.original_ttl
, sizeof(rr
->rrsig
.original_ttl
), state
);
1465 siphash24_compress(&rr
->rrsig
.expiration
, sizeof(rr
->rrsig
.expiration
), state
);
1466 siphash24_compress(&rr
->rrsig
.inception
, sizeof(rr
->rrsig
.inception
), state
);
1467 siphash24_compress(&rr
->rrsig
.key_tag
, sizeof(rr
->rrsig
.key_tag
), state
);
1468 dns_name_hash_func(rr
->rrsig
.signer
, state
);
1469 siphash24_compress(rr
->rrsig
.signature
, rr
->rrsig
.signature_size
, state
);
1473 dns_name_hash_func(rr
->nsec
.next_domain_name
, state
);
1474 /* FIXME: we leave out the type bitmap here. Hash
1475 * would be better if we'd take it into account
1480 siphash24_compress(&rr
->ds
.key_tag
, sizeof(rr
->ds
.key_tag
), state
);
1481 siphash24_compress(&rr
->ds
.algorithm
, sizeof(rr
->ds
.algorithm
), state
);
1482 siphash24_compress(&rr
->ds
.digest_type
, sizeof(rr
->ds
.digest_type
), state
);
1483 siphash24_compress(rr
->ds
.digest
, rr
->ds
.digest_size
, state
);
1486 case DNS_TYPE_NSEC3
:
1487 siphash24_compress(&rr
->nsec3
.algorithm
, sizeof(rr
->nsec3
.algorithm
), state
);
1488 siphash24_compress(&rr
->nsec3
.flags
, sizeof(rr
->nsec3
.flags
), state
);
1489 siphash24_compress(&rr
->nsec3
.iterations
, sizeof(rr
->nsec3
.iterations
), state
);
1490 siphash24_compress(rr
->nsec3
.salt
, rr
->nsec3
.salt_size
, state
);
1491 siphash24_compress(rr
->nsec3
.next_hashed_name
, rr
->nsec3
.next_hashed_name_size
, state
);
1492 /* FIXME: We leave the bitmaps out */
1496 siphash24_compress(&rr
->tlsa
.cert_usage
, sizeof(rr
->tlsa
.cert_usage
), state
);
1497 siphash24_compress(&rr
->tlsa
.selector
, sizeof(rr
->tlsa
.selector
), state
);
1498 siphash24_compress(&rr
->tlsa
.matching_type
, sizeof(rr
->tlsa
.matching_type
), state
);
1499 siphash24_compress(rr
->tlsa
.data
, rr
->tlsa
.data_size
, state
);
1503 siphash24_compress(&rr
->caa
.flags
, sizeof(rr
->caa
.flags
), state
);
1504 string_hash_func(rr
->caa
.tag
, state
);
1505 siphash24_compress(rr
->caa
.value
, rr
->caa
.value_size
, state
);
1508 case DNS_TYPE_OPENPGPKEY
:
1510 siphash24_compress(rr
->generic
.data
, rr
->generic
.data_size
, state
);
1515 static int dns_resource_record_compare_func(const void *a
, const void *b
) {
1516 const DnsResourceRecord
*x
= a
, *y
= b
;
1519 ret
= dns_resource_key_compare_func(x
->key
, y
->key
);
1523 if (dns_resource_record_equal(x
, y
))
1526 /* This is a bit dirty, we don't implement proper ordering, but
1527 * the hashtable doesn't need ordering anyway, hence we don't
1529 return x
< y
? -1 : 1;
1532 const struct hash_ops dns_resource_record_hash_ops
= {
1533 .hash
= dns_resource_record_hash_func
,
1534 .compare
= dns_resource_record_compare_func
,
1537 DnsTxtItem
*dns_txt_item_free_all(DnsTxtItem
*i
) {
1546 return dns_txt_item_free_all(n
);
1549 bool dns_txt_item_equal(DnsTxtItem
*a
, DnsTxtItem
*b
) {
1560 if (a
->length
!= b
->length
)
1563 if (memcmp(a
->data
, b
->data
, a
->length
) != 0)
1566 return dns_txt_item_equal(a
->items_next
, b
->items_next
);
1569 static const char* const dnssec_algorithm_table
[_DNSSEC_ALGORITHM_MAX_DEFINED
] = {
1570 /* Mnemonics as listed on https://www.iana.org/assignments/dns-sec-alg-numbers/dns-sec-alg-numbers.xhtml */
1571 [DNSSEC_ALGORITHM_RSAMD5
] = "RSAMD5",
1572 [DNSSEC_ALGORITHM_DH
] = "DH",
1573 [DNSSEC_ALGORITHM_DSA
] = "DSA",
1574 [DNSSEC_ALGORITHM_ECC
] = "ECC",
1575 [DNSSEC_ALGORITHM_RSASHA1
] = "RSASHA1",
1576 [DNSSEC_ALGORITHM_DSA_NSEC3_SHA1
] = "DSA-NSEC3-SHA1",
1577 [DNSSEC_ALGORITHM_RSASHA1_NSEC3_SHA1
] = "RSASHA1-NSEC3-SHA1",
1578 [DNSSEC_ALGORITHM_RSASHA256
] = "RSASHA256",
1579 [DNSSEC_ALGORITHM_RSASHA512
] = "RSASHA512",
1580 [DNSSEC_ALGORITHM_ECC_GOST
] = "ECC-GOST",
1581 [DNSSEC_ALGORITHM_ECDSAP256SHA256
] = "ECDSAP256SHA256",
1582 [DNSSEC_ALGORITHM_ECDSAP384SHA384
] = "ECDSAP384SHA384",
1583 [DNSSEC_ALGORITHM_INDIRECT
] = "INDIRECT",
1584 [DNSSEC_ALGORITHM_PRIVATEDNS
] = "PRIVATEDNS",
1585 [DNSSEC_ALGORITHM_PRIVATEOID
] = "PRIVATEOID",
1587 DEFINE_STRING_TABLE_LOOKUP_WITH_FALLBACK(dnssec_algorithm
, int, 255);
1589 static const char* const dnssec_digest_table
[_DNSSEC_DIGEST_MAX_DEFINED
] = {
1590 /* Names as listed on https://www.iana.org/assignments/ds-rr-types/ds-rr-types.xhtml */
1591 [DNSSEC_DIGEST_SHA1
] = "SHA-1",
1592 [DNSSEC_DIGEST_SHA256
] = "SHA-256",
1593 [DNSSEC_DIGEST_GOST_R_34_11_94
] = "GOST_R_34.11-94",
1594 [DNSSEC_DIGEST_SHA384
] = "SHA-384",
1596 DEFINE_STRING_TABLE_LOOKUP_WITH_FALLBACK(dnssec_digest
, int, 255);