]> git.ipfire.org Git - thirdparty/systemd.git/blob - src/resolve/resolved-dns-rr.c
projects / thirdparty / systemd.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
mkosi: mask isc-dhcp-server
[thirdparty/systemd.git] / src / resolve / resolved-dns-rr.c
1 /* SPDX-License-Identifier: LGPL-2.1-or-later */
2
3 #include <math.h>
4
5 #include "alloc-util.h"
6 #include "dns-domain.h"
7 #include "dns-type.h"
8 #include "escape.h"
9 #include "hexdecoct.h"
10 #include "memory-util.h"
11 #include "resolved-dns-dnssec.h"
12 #include "resolved-dns-packet.h"
13 #include "resolved-dns-rr.h"
14 #include "string-table.h"
15 #include "string-util.h"
16 #include "strv.h"
17 #include "terminal-util.h"
18 #include "unaligned.h"
19
20 DnsResourceKey* dns_resource_key_new(uint16_t class, uint16_t type, const char *name) {
21 DnsResourceKey *k;
22 size_t l;
23
24 assert(name);
25
26 l = strlen(name);
27 k = malloc0(sizeof(DnsResourceKey) + l + 1);
28 if (!k)
29 return NULL;
30
31 k->n_ref = 1;
32 k->class = class;
33 k->type = type;
34
35 strcpy((char*) k + sizeof(DnsResourceKey), name);
36
37 return k;
38 }
39
40 DnsResourceKey* dns_resource_key_new_redirect(const DnsResourceKey *key, const DnsResourceRecord *cname) {
41 int r;
42
43 assert(key);
44 assert(cname);
45
46 assert(IN_SET(cname->key->type, DNS_TYPE_CNAME, DNS_TYPE_DNAME));
47
48 if (cname->key->type == DNS_TYPE_CNAME)
49 return dns_resource_key_new(key->class, key->type, cname->cname.name);
50 else {
51 _cleanup_free_ char *destination = NULL;
52 DnsResourceKey *k;
53
54 r = dns_name_change_suffix(dns_resource_key_name(key), dns_resource_key_name(cname->key), cname->dname.name, &destination);
55 if (r < 0)
56 return NULL;
57 if (r == 0)
58 return dns_resource_key_ref((DnsResourceKey*) key);
59
60 k = dns_resource_key_new_consume(key->class, key->type, destination);
61 if (!k)
62 return NULL;
63
64 TAKE_PTR(destination);
65 return k;
66 }
67 }
68
69 int dns_resource_key_new_append_suffix(DnsResourceKey **ret, DnsResourceKey *key, char *name) {
70 DnsResourceKey *new_key;
71 char *joined;
72 int r;
73
74 assert(ret);
75 assert(key);
76 assert(name);
77
78 if (dns_name_is_root(name)) {
79 *ret = dns_resource_key_ref(key);
80 return 0;
81 }
82
83 r = dns_name_concat(dns_resource_key_name(key), name, 0, &joined);
84 if (r < 0)
85 return r;
86
87 new_key = dns_resource_key_new_consume(key->class, key->type, joined);
88 if (!new_key) {
89 free(joined);
90 return -ENOMEM;
91 }
92
93 *ret = new_key;
94 return 0;
95 }
96
97 DnsResourceKey* dns_resource_key_new_consume(uint16_t class, uint16_t type, char *name) {
98 DnsResourceKey *k;
99
100 assert(name);
101
102 k = new(DnsResourceKey, 1);
103 if (!k)
104 return NULL;
105
106 *k = (DnsResourceKey) {
107 .n_ref = 1,
108 .class = class,
109 .type = type,
110 ._name = name,
111 };
112
113 return k;
114 }
115
116 DnsResourceKey* dns_resource_key_ref(DnsResourceKey *k) {
117
118 if (!k)
119 return NULL;
120
121 /* Static/const keys created with DNS_RESOURCE_KEY_CONST will
122 * set this to -1, they should not be reffed/unreffed */
123 assert(k->n_ref != UINT_MAX);
124
125 assert(k->n_ref > 0);
126 k->n_ref++;
127
128 return k;
129 }
130
131 DnsResourceKey* dns_resource_key_unref(DnsResourceKey *k) {
132 if (!k)
133 return NULL;
134
135 assert(k->n_ref != UINT_MAX);
136 assert(k->n_ref > 0);
137
138 if (k->n_ref == 1) {
139 free(k->_name);
140 free(k);
141 } else
142 k->n_ref--;
143
144 return NULL;
145 }
146
147 const char* dns_resource_key_name(const DnsResourceKey *key) {
148 const char *name;
149
150 if (!key)
151 return NULL;
152
153 if (key->_name)
154 name = key->_name;
155 else
156 name = (char*) key + sizeof(DnsResourceKey);
157
158 if (dns_name_is_root(name))
159 return ".";
160 else
161 return name;
162 }
163
164 bool dns_resource_key_is_address(const DnsResourceKey *key) {
165 assert(key);
166
167 /* Check if this is an A or AAAA resource key */
168
169 return key->class == DNS_CLASS_IN && IN_SET(key->type, DNS_TYPE_A, DNS_TYPE_AAAA);
170 }
171
172 bool dns_resource_key_is_dnssd_ptr(const DnsResourceKey *key) {
173 assert(key);
174
175 /* Check if this is a PTR resource key used in
176 Service Instance Enumeration as described in RFC6763 p4.1. */
177
178 if (key->type != DNS_TYPE_PTR)
179 return false;
180
181 return dns_name_endswith(dns_resource_key_name(key), "_tcp.local") ||
182 dns_name_endswith(dns_resource_key_name(key), "_udp.local");
183 }
184
185 bool dns_resource_key_is_dnssd_two_label_ptr(const DnsResourceKey *key) {
186 assert(key);
187
188 /* Check if this is a PTR resource key used in Service Instance
189 * Enumeration as described in RFC6763 § 4.1, excluding selective
190 * service names described in RFC6763 § 7.1. */
191
192 if (key->type != DNS_TYPE_PTR)
193 return false;
194
195 const char *name = dns_resource_key_name(key);
196 if (dns_name_parent(&name) <= 0)
197 return false;
198
199 return dns_name_equal(name, "_tcp.local") > 0 || dns_name_equal(name, "_udp.local") > 0;
200 }
201
202 int dns_resource_key_equal(const DnsResourceKey *a, const DnsResourceKey *b) {
203 int r;
204
205 if (a == b)
206 return 1;
207
208 r = dns_name_equal(dns_resource_key_name(a), dns_resource_key_name(b));
209 if (r <= 0)
210 return r;
211
212 if (a->class != b->class)
213 return 0;
214
215 if (a->type != b->type)
216 return 0;
217
218 return 1;
219 }
220
221 int dns_resource_key_match_rr(const DnsResourceKey *key, DnsResourceRecord *rr, const char *search_domain) {
222 int r;
223
224 assert(key);
225 assert(rr);
226
227 if (key == rr->key)
228 return 1;
229
230 /* Checks if an rr matches the specified key. If a search
231 * domain is specified, it will also be checked if the key
232 * with the search domain suffixed might match the RR. */
233
234 if (rr->key->class != key->class && key->class != DNS_CLASS_ANY)
235 return 0;
236
237 if (rr->key->type != key->type && key->type != DNS_TYPE_ANY)
238 return 0;
239
240 r = dns_name_equal(dns_resource_key_name(rr->key), dns_resource_key_name(key));
241 if (r != 0)
242 return r;
243
244 if (search_domain) {
245 _cleanup_free_ char *joined = NULL;
246
247 r = dns_name_concat(dns_resource_key_name(key), search_domain, 0, &joined);
248 if (r < 0)
249 return r;
250
251 return dns_name_equal(dns_resource_key_name(rr->key), joined);
252 }
253
254 return 0;
255 }
256
257 int dns_resource_key_match_cname_or_dname(const DnsResourceKey *key, const DnsResourceKey *cname, const char *search_domain) {
258 int r;
259
260 assert(key);
261 assert(cname);
262
263 if (cname->class != key->class && key->class != DNS_CLASS_ANY)
264 return 0;
265
266 if (!dns_type_may_redirect(key->type))
267 return 0;
268
269 if (cname->type == DNS_TYPE_CNAME)
270 r = dns_name_equal(dns_resource_key_name(key), dns_resource_key_name(cname));
271 else if (cname->type == DNS_TYPE_DNAME)
272 r = dns_name_endswith(dns_resource_key_name(key), dns_resource_key_name(cname));
273 else
274 return 0;
275
276 if (r != 0)
277 return r;
278
279 if (search_domain) {
280 _cleanup_free_ char *joined = NULL;
281
282 r = dns_name_concat(dns_resource_key_name(key), search_domain, 0, &joined);
283 if (r < 0)
284 return r;
285
286 if (cname->type == DNS_TYPE_CNAME)
287 return dns_name_equal(joined, dns_resource_key_name(cname));
288 else if (cname->type == DNS_TYPE_DNAME)
289 return dns_name_endswith(joined, dns_resource_key_name(cname));
290 }
291
292 return 0;
293 }
294
295 int dns_resource_key_match_soa(const DnsResourceKey *key, const DnsResourceKey *soa) {
296 assert(soa);
297 assert(key);
298
299 /* Checks whether 'soa' is a SOA record for the specified key. */
300
301 if (soa->class != key->class)
302 return 0;
303
304 if (soa->type != DNS_TYPE_SOA)
305 return 0;
306
307 return dns_name_endswith(dns_resource_key_name(key), dns_resource_key_name(soa));
308 }
309
310 static void dns_resource_key_hash_func(const DnsResourceKey *k, struct siphash *state) {
311 assert(k);
312
313 dns_name_hash_func(dns_resource_key_name(k), state);
314 siphash24_compress_typesafe(k->class, state);
315 siphash24_compress_typesafe(k->type, state);
316 }
317
318 static int dns_resource_key_compare_func(const DnsResourceKey *x, const DnsResourceKey *y) {
319 int r;
320
321 r = dns_name_compare_func(dns_resource_key_name(x), dns_resource_key_name(y));
322 if (r != 0)
323 return r;
324
325 r = CMP(x->type, y->type);
326 if (r != 0)
327 return r;
328
329 return CMP(x->class, y->class);
330 }
331
332 DEFINE_HASH_OPS(dns_resource_key_hash_ops, DnsResourceKey, dns_resource_key_hash_func, dns_resource_key_compare_func);
333
334 char* dns_resource_key_to_string(const DnsResourceKey *key, char *buf, size_t buf_size) {
335 const char *c, *t;
336 char *ans = buf;
337
338 /* If we cannot convert the CLASS/TYPE into a known string,
339 use the format recommended by RFC 3597, Section 5. */
340
341 c = dns_class_to_string(key->class);
342 t = dns_type_to_string(key->type);
343
344 (void) snprintf(buf, buf_size, "%s %s%s%.0u %s%s%.0u",
345 dns_resource_key_name(key),
346 strempty(c), c ? "" : "CLASS", c ? 0u : key->class,
347 strempty(t), t ? "" : "TYPE", t ? 0u : key->type);
348
349 return ans;
350 }
351
352 bool dns_resource_key_reduce(DnsResourceKey **a, DnsResourceKey **b) {
353 assert(a);
354 assert(b);
355
356 /* Try to replace one RR key by another if they are identical, thus saving a bit of memory. Note that we do
357 * this only for RR keys, not for RRs themselves, as they carry a lot of additional metadata (where they come
358 * from, validity data, and suchlike), and cannot be replaced so easily by other RRs that have the same
359 * superficial data. */
360
361 if (!*a)
362 return false;
363 if (!*b)
364 return false;
365
366 /* We refuse merging const keys */
367 if ((*a)->n_ref == UINT_MAX)
368 return false;
369 if ((*b)->n_ref == UINT_MAX)
370 return false;
371
372 /* Already the same? */
373 if (*a == *b)
374 return true;
375
376 /* Are they really identical? */
377 if (dns_resource_key_equal(*a, *b) <= 0)
378 return false;
379
380 /* Keep the one which already has more references. */
381 if ((*a)->n_ref > (*b)->n_ref)
382 DNS_RESOURCE_KEY_REPLACE(*b, dns_resource_key_ref(*a));
383 else
384 DNS_RESOURCE_KEY_REPLACE(*a, dns_resource_key_ref(*b));
385
386 return true;
387 }
388
389 DnsResourceRecord* dns_resource_record_new(DnsResourceKey *key) {
390 DnsResourceRecord *rr;
391
392 rr = new(DnsResourceRecord, 1);
393 if (!rr)
394 return NULL;
395
396 *rr = (DnsResourceRecord) {
397 .n_ref = 1,
398 .key = dns_resource_key_ref(key),
399 .expiry = USEC_INFINITY,
400 .n_skip_labels_signer = UINT8_MAX,
401 .n_skip_labels_source = UINT8_MAX,
402 };
403
404 return rr;
405 }
406
407 DnsResourceRecord* dns_resource_record_new_full(uint16_t class, uint16_t type, const char *name) {
408 _cleanup_(dns_resource_key_unrefp) DnsResourceKey *key = NULL;
409
410 key = dns_resource_key_new(class, type, name);
411 if (!key)
412 return NULL;
413
414 return dns_resource_record_new(key);
415 }
416
417 static DnsResourceRecord* dns_resource_record_free(DnsResourceRecord *rr) {
418 assert(rr);
419
420 if (rr->key) {
421 switch (rr->key->type) {
422
423 case DNS_TYPE_SRV:
424 free(rr->srv.name);
425 break;
426
427 case DNS_TYPE_PTR:
428 case DNS_TYPE_NS:
429 case DNS_TYPE_CNAME:
430 case DNS_TYPE_DNAME:
431 free(rr->ptr.name);
432 break;
433
434 case DNS_TYPE_HINFO:
435 free(rr->hinfo.cpu);
436 free(rr->hinfo.os);
437 break;
438
439 case DNS_TYPE_TXT:
440 case DNS_TYPE_SPF:
441 dns_txt_item_free_all(rr->txt.items);
442 break;
443
444 case DNS_TYPE_SOA:
445 free(rr->soa.mname);
446 free(rr->soa.rname);
447 break;
448
449 case DNS_TYPE_MX:
450 free(rr->mx.exchange);
451 break;
452
453 case DNS_TYPE_DS:
454 free(rr->ds.digest);
455 break;
456
457 case DNS_TYPE_SSHFP:
458 free(rr->sshfp.fingerprint);
459 break;
460
461 case DNS_TYPE_DNSKEY:
462 free(rr->dnskey.key);
463 break;
464
465 case DNS_TYPE_RRSIG:
466 free(rr->rrsig.signer);
467 free(rr->rrsig.signature);
468 break;
469
470 case DNS_TYPE_NSEC:
471 free(rr->nsec.next_domain_name);
472 bitmap_free(rr->nsec.types);
473 break;
474
475 case DNS_TYPE_NSEC3:
476 free(rr->nsec3.next_hashed_name);
477 free(rr->nsec3.salt);
478 bitmap_free(rr->nsec3.types);
479 break;
480
481 case DNS_TYPE_LOC:
482 case DNS_TYPE_A:
483 case DNS_TYPE_AAAA:
484 break;
485
486 case DNS_TYPE_TLSA:
487 free(rr->tlsa.data);
488 break;
489
490 case DNS_TYPE_SVCB:
491 case DNS_TYPE_HTTPS:
492 free(rr->svcb.target_name);
493 dns_svc_param_free_all(rr->svcb.params);
494 break;
495
496 case DNS_TYPE_CAA:
497 free(rr->caa.tag);
498 free(rr->caa.value);
499 break;
500
501 case DNS_TYPE_NAPTR:
502 free(rr->naptr.flags);
503 free(rr->naptr.services);
504 free(rr->naptr.regexp);
505 free(rr->naptr.replacement);
506 break;
507
508 case DNS_TYPE_OPENPGPKEY:
509 default:
510 if (!rr->unparsable)
511 free(rr->generic.data);
512 }
513
514 if (rr->unparsable)
515 free(rr->generic.data);
516
517 free(rr->wire_format);
518 dns_resource_key_unref(rr->key);
519 }
520
521 free(rr->to_string);
522 return mfree(rr);
523 }
524
525 DEFINE_TRIVIAL_REF_UNREF_FUNC(DnsResourceRecord, dns_resource_record, dns_resource_record_free);
526
527 int dns_resource_record_new_reverse(DnsResourceRecord **ret, int family, const union in_addr_union *address, const char *hostname) {
528 _cleanup_(dns_resource_key_unrefp) DnsResourceKey *key = NULL;
529 _cleanup_(dns_resource_record_unrefp) DnsResourceRecord *rr = NULL;
530 _cleanup_free_ char *ptr = NULL;
531 int r;
532
533 assert(ret);
534 assert(address);
535 assert(hostname);
536
537 r = dns_name_reverse(family, address, &ptr);
538 if (r < 0)
539 return r;
540
541 key = dns_resource_key_new_consume(DNS_CLASS_IN, DNS_TYPE_PTR, ptr);
542 if (!key)
543 return -ENOMEM;
544
545 ptr = NULL;
546
547 rr = dns_resource_record_new(key);
548 if (!rr)
549 return -ENOMEM;
550
551 rr->ptr.name = strdup(hostname);
552 if (!rr->ptr.name)
553 return -ENOMEM;
554
555 *ret = TAKE_PTR(rr);
556
557 return 0;
558 }
559
560 int dns_resource_record_new_address(DnsResourceRecord **ret, int family, const union in_addr_union *address, const char *name) {
561 DnsResourceRecord *rr;
562
563 assert(ret);
564 assert(address);
565 assert(family);
566
567 if (family == AF_INET) {
568
569 rr = dns_resource_record_new_full(DNS_CLASS_IN, DNS_TYPE_A, name);
570 if (!rr)
571 return -ENOMEM;
572
573 rr->a.in_addr = address->in;
574
575 } else if (family == AF_INET6) {
576
577 rr = dns_resource_record_new_full(DNS_CLASS_IN, DNS_TYPE_AAAA, name);
578 if (!rr)
579 return -ENOMEM;
580
581 rr->aaaa.in6_addr = address->in6;
582 } else
583 return -EAFNOSUPPORT;
584
585 *ret = rr;
586
587 return 0;
588 }
589
590 #define FIELD_EQUAL(a, b, field) \
591 ((a).field ## _size == (b).field ## _size && \
592 memcmp_safe((a).field, (b).field, (a).field ## _size) == 0)
593
594 int dns_resource_record_payload_equal(const DnsResourceRecord *a, const DnsResourceRecord *b) {
595 int r;
596
597 /* Check if a and b are the same, but don't look at their keys */
598
599 if (a->unparsable != b->unparsable)
600 return 0;
601
602 switch (a->unparsable ? _DNS_TYPE_INVALID : a->key->type) {
603
604 case DNS_TYPE_SRV:
605 r = dns_name_equal(a->srv.name, b->srv.name);
606 if (r <= 0)
607 return r;
608
609 return a->srv.priority == b->srv.priority &&
610 a->srv.weight == b->srv.weight &&
611 a->srv.port == b->srv.port;
612
613 case DNS_TYPE_PTR:
614 case DNS_TYPE_NS:
615 case DNS_TYPE_CNAME:
616 case DNS_TYPE_DNAME:
617 return dns_name_equal(a->ptr.name, b->ptr.name);
618
619 case DNS_TYPE_HINFO:
620 return strcaseeq(a->hinfo.cpu, b->hinfo.cpu) &&
621 strcaseeq(a->hinfo.os, b->hinfo.os);
622
623 case DNS_TYPE_SPF: /* exactly the same as TXT */
624 case DNS_TYPE_TXT:
625 return dns_txt_item_equal(a->txt.items, b->txt.items);
626
627 case DNS_TYPE_A:
628 return memcmp(&a->a.in_addr, &b->a.in_addr, sizeof(struct in_addr)) == 0;
629
630 case DNS_TYPE_AAAA:
631 return memcmp(&a->aaaa.in6_addr, &b->aaaa.in6_addr, sizeof(struct in6_addr)) == 0;
632
633 case DNS_TYPE_SOA:
634 r = dns_name_equal(a->soa.mname, b->soa.mname);
635 if (r <= 0)
636 return r;
637 r = dns_name_equal(a->soa.rname, b->soa.rname);
638 if (r <= 0)
639 return r;
640
641 return a->soa.serial == b->soa.serial &&
642 a->soa.refresh == b->soa.refresh &&
643 a->soa.retry == b->soa.retry &&
644 a->soa.expire == b->soa.expire &&
645 a->soa.minimum == b->soa.minimum;
646
647 case DNS_TYPE_MX:
648 if (a->mx.priority != b->mx.priority)
649 return 0;
650
651 return dns_name_equal(a->mx.exchange, b->mx.exchange);
652
653 case DNS_TYPE_LOC:
654 assert(a->loc.version == b->loc.version);
655
656 return a->loc.size == b->loc.size &&
657 a->loc.horiz_pre == b->loc.horiz_pre &&
658 a->loc.vert_pre == b->loc.vert_pre &&
659 a->loc.latitude == b->loc.latitude &&
660 a->loc.longitude == b->loc.longitude &&
661 a->loc.altitude == b->loc.altitude;
662
663 case DNS_TYPE_DS:
664 return a->ds.key_tag == b->ds.key_tag &&
665 a->ds.algorithm == b->ds.algorithm &&
666 a->ds.digest_type == b->ds.digest_type &&
667 FIELD_EQUAL(a->ds, b->ds, digest);
668
669 case DNS_TYPE_SSHFP:
670 return a->sshfp.algorithm == b->sshfp.algorithm &&
671 a->sshfp.fptype == b->sshfp.fptype &&
672 FIELD_EQUAL(a->sshfp, b->sshfp, fingerprint);
673
674 case DNS_TYPE_DNSKEY:
675 return a->dnskey.flags == b->dnskey.flags &&
676 a->dnskey.protocol == b->dnskey.protocol &&
677 a->dnskey.algorithm == b->dnskey.algorithm &&
678 FIELD_EQUAL(a->dnskey, b->dnskey, key);
679
680 case DNS_TYPE_RRSIG:
681 /* do the fast comparisons first */
682 if (!(a->rrsig.type_covered == b->rrsig.type_covered &&
683 a->rrsig.algorithm == b->rrsig.algorithm &&
684 a->rrsig.labels == b->rrsig.labels &&
685 a->rrsig.original_ttl == b->rrsig.original_ttl &&
686 a->rrsig.expiration == b->rrsig.expiration &&
687 a->rrsig.inception == b->rrsig.inception &&
688 a->rrsig.key_tag == b->rrsig.key_tag &&
689 FIELD_EQUAL(a->rrsig, b->rrsig, signature)))
690 return false;
691
692 return dns_name_equal(a->rrsig.signer, b->rrsig.signer);
693
694 case DNS_TYPE_NSEC:
695 r = dns_name_equal(a->nsec.next_domain_name, b->nsec.next_domain_name);
696 if (r <= 0)
697 return r;
698
699 return bitmap_equal(a->nsec.types, b->nsec.types);
700
701 case DNS_TYPE_NSEC3:
702 return a->nsec3.algorithm == b->nsec3.algorithm &&
703 a->nsec3.flags == b->nsec3.flags &&
704 a->nsec3.iterations == b->nsec3.iterations &&
705 FIELD_EQUAL(a->nsec3, b->nsec3, salt) &&
706 FIELD_EQUAL(a->nsec3, b->nsec3, next_hashed_name) &&
707 bitmap_equal(a->nsec3.types, b->nsec3.types);
708
709 case DNS_TYPE_TLSA:
710 return a->tlsa.cert_usage == b->tlsa.cert_usage &&
711 a->tlsa.selector == b->tlsa.selector &&
712 a->tlsa.matching_type == b->tlsa.matching_type &&
713 FIELD_EQUAL(a->tlsa, b->tlsa, data);
714
715 case DNS_TYPE_SVCB:
716 case DNS_TYPE_HTTPS:
717
718 if (!(a->svcb.priority == b->svcb.priority &&
719 dns_svc_params_equal(a->svcb.params, b->svcb.params)))
720 return false;
721
722 return dns_name_equal(a->svcb.target_name, b->svcb.target_name);
723
724 case DNS_TYPE_CAA:
725 return a->caa.flags == b->caa.flags &&
726 streq(a->caa.tag, b->caa.tag) &&
727 FIELD_EQUAL(a->caa, b->caa, value);
728
729 case DNS_TYPE_NAPTR:
730 r = dns_name_equal(a->naptr.replacement, b->naptr.replacement);
731 if (r <= 0)
732 return r;
733
734 return a->naptr.order == b->naptr.order &&
735 a->naptr.preference == b->naptr.preference &&
736 streq(a->naptr.flags, b->naptr.flags) &&
737 streq(a->naptr.services, b->naptr.services) &&
738 streq(a->naptr.regexp, b->naptr.regexp);
739
740 case DNS_TYPE_OPENPGPKEY:
741 default:
742 return FIELD_EQUAL(a->generic, b->generic, data);
743 }
744 }
745
746 int dns_resource_record_equal(const DnsResourceRecord *a, const DnsResourceRecord *b) {
747 int r;
748
749 assert(a);
750 assert(b);
751
752 if (a == b)
753 return 1;
754
755 r = dns_resource_key_equal(a->key, b->key);
756 if (r <= 0)
757 return r;
758
759 return dns_resource_record_payload_equal(a, b);
760 }
761
762 static char* format_location(uint32_t latitude, uint32_t longitude, uint32_t altitude,
763 uint8_t size, uint8_t horiz_pre, uint8_t vert_pre) {
764 char *s;
765 char NS = latitude >= 1U<<31 ? 'N' : 'S';
766 char EW = longitude >= 1U<<31 ? 'E' : 'W';
767
768 int lat = latitude >= 1U<<31 ? (int) (latitude - (1U<<31)) : (int) ((1U<<31) - latitude);
769 int lon = longitude >= 1U<<31 ? (int) (longitude - (1U<<31)) : (int) ((1U<<31) - longitude);
770 double alt = altitude >= 10000000u ? altitude - 10000000u : -(double)(10000000u - altitude);
771 double siz = (size >> 4) * exp10((double) (size & 0xF));
772 double hor = (horiz_pre >> 4) * exp10((double) (horiz_pre & 0xF));
773 double ver = (vert_pre >> 4) * exp10((double) (vert_pre & 0xF));
774
775 if (asprintf(&s, "%d %d %.3f %c %d %d %.3f %c %.2fm %.2fm %.2fm %.2fm",
776 (lat / 60000 / 60),
777 (lat / 60000) % 60,
778 (lat % 60000) / 1000.,
779 NS,
780 (lon / 60000 / 60),
781 (lon / 60000) % 60,
782 (lon % 60000) / 1000.,
783 EW,
784 alt / 100.,
785 siz / 100.,
786 hor / 100.,
787 ver / 100.) < 0)
788 return NULL;
789
790 return s;
791 }
792
793 static int format_timestamp_dns(char *buf, size_t l, time_t sec) {
794 struct tm tm;
795
796 assert(buf);
797 assert(l > STRLEN("YYYYMMDDHHmmSS"));
798
799 if (!gmtime_r(&sec, &tm))
800 return -EINVAL;
801
802 if (strftime(buf, l, "%Y%m%d%H%M%S", &tm) <= 0)
803 return -EINVAL;
804
805 return 0;
806 }
807
808 static char *format_types(Bitmap *types) {
809 _cleanup_strv_free_ char **strv = NULL;
810 _cleanup_free_ char *str = NULL;
811 unsigned type;
812 int r;
813
814 BITMAP_FOREACH(type, types) {
815 if (dns_type_to_string(type)) {
816 r = strv_extend(&strv, dns_type_to_string(type));
817 if (r < 0)
818 return NULL;
819 } else {
820 char *t;
821
822 r = asprintf(&t, "TYPE%u", type);
823 if (r < 0)
824 return NULL;
825
826 r = strv_consume(&strv, t);
827 if (r < 0)
828 return NULL;
829 }
830 }
831
832 str = strv_join(strv, " ");
833 if (!str)
834 return NULL;
835
836 return strjoin("( ", str, " )");
837 }
838
839 static char *format_txt(DnsTxtItem *first) {
840 size_t c = 1;
841 char *p, *s;
842
843 LIST_FOREACH(items, i, first)
844 c += i->length * 4 + 3;
845
846 p = s = new(char, c);
847 if (!s)
848 return NULL;
849
850 LIST_FOREACH(items, i, first) {
851 if (i != first)
852 *(p++) = ' ';
853
854 *(p++) = '"';
855
856 for (size_t j = 0; j < i->length; j++) {
857 if (i->data[j] < ' ' || i->data[j] == '"' || i->data[j] >= 127) {
858 *(p++) = '\\';
859 *(p++) = '0' + (i->data[j] / 100);
860 *(p++) = '0' + ((i->data[j] / 10) % 10);
861 *(p++) = '0' + (i->data[j] % 10);
862 } else
863 *(p++) = i->data[j];
864 }
865
866 *(p++) = '"';
867 }
868
869 *p = 0;
870 return s;
871 }
872
873 static char *format_svc_param_value(DnsSvcParam *i) {
874 _cleanup_free_ char *value = NULL;
875
876 assert(i);
877
878 switch (i->key) {
879 case DNS_SVC_PARAM_KEY_ALPN: {
880 size_t offset = 0;
881 _cleanup_strv_free_ char **values_strv = NULL;
882 while (offset < i->length) {
883 size_t sz = (uint8_t) i->value[offset++];
884
885 char *alpn = cescape_length((char *)&i->value[offset], sz);
886 if (!alpn)
887 return NULL;
888
889 if (strv_push(&values_strv, alpn) < 0)
890 return NULL;
891
892 offset += sz;
893 }
894 value = strv_join(values_strv, ",");
895 if (!value)
896 return NULL;
897 break;
898
899 }
900 case DNS_SVC_PARAM_KEY_PORT: {
901 uint16_t port = unaligned_read_be16(i->value);
902 if (asprintf(&value, "%" PRIu16, port) < 0)
903 return NULL;
904 return TAKE_PTR(value);
905 }
906 case DNS_SVC_PARAM_KEY_IPV4HINT: {
907 const struct in_addr *addrs = i->value_in_addr;
908 _cleanup_strv_free_ char **values_strv = NULL;
909 for (size_t n = 0; n < i->length / sizeof (struct in_addr); n++) {
910 char *addr;
911 if (in_addr_to_string(AF_INET, (const union in_addr_union*) &addrs[n], &addr) < 0)
912 return NULL;
913 if (strv_push(&values_strv, addr) < 0)
914 return NULL;
915 }
916 return strv_join(values_strv, ",");
917 }
918 case DNS_SVC_PARAM_KEY_IPV6HINT: {
919 const struct in6_addr *addrs = i->value_in6_addr;
920 _cleanup_strv_free_ char **values_strv = NULL;
921 for (size_t n = 0; n < i->length / sizeof (struct in6_addr); n++) {
922 char *addr;
923 if (in_addr_to_string(AF_INET6, (const union in_addr_union*) &addrs[n], &addr) < 0)
924 return NULL;
925 if (strv_push(&values_strv, addr) < 0)
926 return NULL;
927 }
928 return strv_join(values_strv, ",");
929 }
930 default: {
931 value = decescape((char *)&i->value, " ,", i->length);
932 if (!value)
933 return NULL;
934 break;
935 }
936 }
937
938 char *qvalue;
939 if (asprintf(&qvalue, "\"%s\"", value) < 0)
940 return NULL;
941 return qvalue;
942 }
943
944 static char *format_svc_param(DnsSvcParam *i) {
945 const char *key = FORMAT_DNS_SVC_PARAM_KEY(i->key);
946 _cleanup_free_ char *value = NULL;
947
948 assert(i);
949
950 if (i->length == 0)
951 return strdup(key);
952
953 value = format_svc_param_value(i);
954 if (!value)
955 return NULL;
956
957 return strjoin(key, "=", value);
958 }
959
960 static char *format_svc_params(DnsSvcParam *first) {
961 _cleanup_strv_free_ char **params = NULL;
962
963 LIST_FOREACH(params, i, first) {
964 char *param = format_svc_param(i);
965 if (!param)
966 return NULL;
967 if (strv_push(&params, param) < 0)
968 return NULL;
969 }
970
971 return strv_join(params, " ");
972 }
973
974 const char *dns_resource_record_to_string(DnsResourceRecord *rr) {
975 _cleanup_free_ char *s = NULL, *t = NULL;
976 char k[DNS_RESOURCE_KEY_STRING_MAX];
977 int r;
978
979 assert(rr);
980
981 if (rr->to_string)
982 return rr->to_string;
983
984 dns_resource_key_to_string(rr->key, k, sizeof(k));
985
986 switch (rr->unparsable ? _DNS_TYPE_INVALID : rr->key->type) {
987
988 case DNS_TYPE_SRV:
989 r = asprintf(&s, "%s %u %u %u %s",
990 k,
991 rr->srv.priority,
992 rr->srv.weight,
993 rr->srv.port,
994 strna(rr->srv.name));
995 if (r < 0)
996 return NULL;
997 break;
998
999 case DNS_TYPE_PTR:
1000 case DNS_TYPE_NS:
1001 case DNS_TYPE_CNAME:
1002 case DNS_TYPE_DNAME:
1003 s = strjoin(k, " ", rr->ptr.name);
1004 if (!s)
1005 return NULL;
1006
1007 break;
1008
1009 case DNS_TYPE_HINFO:
1010 s = strjoin(k, " ", rr->hinfo.cpu, " ", rr->hinfo.os);
1011 if (!s)
1012 return NULL;
1013 break;
1014
1015 case DNS_TYPE_SPF: /* exactly the same as TXT */
1016 case DNS_TYPE_TXT:
1017 t = format_txt(rr->txt.items);
1018 if (!t)
1019 return NULL;
1020
1021 s = strjoin(k, " ", t);
1022 if (!s)
1023 return NULL;
1024 break;
1025
1026 case DNS_TYPE_A:
1027 r = in_addr_to_string(AF_INET, (const union in_addr_union*) &rr->a.in_addr, &t);
1028 if (r < 0)
1029 return NULL;
1030
1031 s = strjoin(k, " ", t);
1032 if (!s)
1033 return NULL;
1034 break;
1035
1036 case DNS_TYPE_AAAA:
1037 r = in_addr_to_string(AF_INET6, (const union in_addr_union*) &rr->aaaa.in6_addr, &t);
1038 if (r < 0)
1039 return NULL;
1040
1041 s = strjoin(k, " ", t);
1042 if (!s)
1043 return NULL;
1044 break;
1045
1046 case DNS_TYPE_SOA:
1047 r = asprintf(&s, "%s %s %s %u %u %u %u %u",
1048 k,
1049 strna(rr->soa.mname),
1050 strna(rr->soa.rname),
1051 rr->soa.serial,
1052 rr->soa.refresh,
1053 rr->soa.retry,
1054 rr->soa.expire,
1055 rr->soa.minimum);
1056 if (r < 0)
1057 return NULL;
1058 break;
1059
1060 case DNS_TYPE_MX:
1061 r = asprintf(&s, "%s %u %s",
1062 k,
1063 rr->mx.priority,
1064 rr->mx.exchange);
1065 if (r < 0)
1066 return NULL;
1067 break;
1068
1069 case DNS_TYPE_LOC:
1070 assert(rr->loc.version == 0);
1071
1072 t = format_location(rr->loc.latitude,
1073 rr->loc.longitude,
1074 rr->loc.altitude,
1075 rr->loc.size,
1076 rr->loc.horiz_pre,
1077 rr->loc.vert_pre);
1078 if (!t)
1079 return NULL;
1080
1081 s = strjoin(k, " ", t);
1082 if (!s)
1083 return NULL;
1084 break;
1085
1086 case DNS_TYPE_DS:
1087 t = hexmem(rr->ds.digest, rr->ds.digest_size);
1088 if (!t)
1089 return NULL;
1090
1091 r = asprintf(&s, "%s %u %u %u %s",
1092 k,
1093 rr->ds.key_tag,
1094 rr->ds.algorithm,
1095 rr->ds.digest_type,
1096 t);
1097 if (r < 0)
1098 return NULL;
1099 break;
1100
1101 case DNS_TYPE_SSHFP:
1102 t = hexmem(rr->sshfp.fingerprint, rr->sshfp.fingerprint_size);
1103 if (!t)
1104 return NULL;
1105
1106 r = asprintf(&s, "%s %u %u %s",
1107 k,
1108 rr->sshfp.algorithm,
1109 rr->sshfp.fptype,
1110 t);
1111 if (r < 0)
1112 return NULL;
1113 break;
1114
1115 case DNS_TYPE_DNSKEY: {
1116 _cleanup_free_ char *alg = NULL;
1117 uint16_t key_tag;
1118
1119 key_tag = dnssec_keytag(rr, true);
1120
1121 r = dnssec_algorithm_to_string_alloc(rr->dnskey.algorithm, &alg);
1122 if (r < 0)
1123 return NULL;
1124
1125 r = asprintf(&t, "%s %u %u %s",
1126 k,
1127 rr->dnskey.flags,
1128 rr->dnskey.protocol,
1129 alg);
1130 if (r < 0)
1131 return NULL;
1132
1133 r = base64_append(&t, r,
1134 rr->dnskey.key, rr->dnskey.key_size,
1135 8, columns());
1136 if (r < 0)
1137 return NULL;
1138
1139 r = asprintf(&s, "%s\n"
1140 " -- Flags:%s%s%s\n"
1141 " -- Key tag: %u",
1142 t,
1143 rr->dnskey.flags & DNSKEY_FLAG_SEP ? " SEP" : "",
1144 rr->dnskey.flags & DNSKEY_FLAG_REVOKE ? " REVOKE" : "",
1145 rr->dnskey.flags & DNSKEY_FLAG_ZONE_KEY ? " ZONE_KEY" : "",
1146 key_tag);
1147 if (r < 0)
1148 return NULL;
1149
1150 break;
1151 }
1152
1153 case DNS_TYPE_RRSIG: {
1154 _cleanup_free_ char *alg = NULL;
1155 char expiration[STRLEN("YYYYMMDDHHmmSS") + 1], inception[STRLEN("YYYYMMDDHHmmSS") + 1];
1156 const char *type;
1157
1158 type = dns_type_to_string(rr->rrsig.type_covered);
1159
1160 r = dnssec_algorithm_to_string_alloc(rr->rrsig.algorithm, &alg);
1161 if (r < 0)
1162 return NULL;
1163
1164 r = format_timestamp_dns(expiration, sizeof(expiration), rr->rrsig.expiration);
1165 if (r < 0)
1166 return NULL;
1167
1168 r = format_timestamp_dns(inception, sizeof(inception), rr->rrsig.inception);
1169 if (r < 0)
1170 return NULL;
1171
1172 /* TYPE?? follows
1173 * http://tools.ietf.org/html/rfc3597#section-5 */
1174
1175 r = asprintf(&s, "%s %s%.*u %s %u %u %s %s %u %s",
1176 k,
1177 type ?: "TYPE",
1178 type ? 0 : 1, type ? 0u : (unsigned) rr->rrsig.type_covered,
1179 alg,
1180 rr->rrsig.labels,
1181 rr->rrsig.original_ttl,
1182 expiration,
1183 inception,
1184 rr->rrsig.key_tag,
1185 rr->rrsig.signer);
1186 if (r < 0)
1187 return NULL;
1188
1189 r = base64_append(&s, r,
1190 rr->rrsig.signature, rr->rrsig.signature_size,
1191 8, columns());
1192 if (r < 0)
1193 return NULL;
1194
1195 break;
1196 }
1197
1198 case DNS_TYPE_NSEC:
1199 t = format_types(rr->nsec.types);
1200 if (!t)
1201 return NULL;
1202
1203 r = asprintf(&s, "%s %s %s",
1204 k,
1205 rr->nsec.next_domain_name,
1206 t);
1207 if (r < 0)
1208 return NULL;
1209 break;
1210
1211 case DNS_TYPE_NSEC3: {
1212 _cleanup_free_ char *salt = NULL, *hash = NULL;
1213
1214 if (rr->nsec3.salt_size > 0) {
1215 salt = hexmem(rr->nsec3.salt, rr->nsec3.salt_size);
1216 if (!salt)
1217 return NULL;
1218 }
1219
1220 hash = base32hexmem(rr->nsec3.next_hashed_name, rr->nsec3.next_hashed_name_size, false);
1221 if (!hash)
1222 return NULL;
1223
1224 t = format_types(rr->nsec3.types);
1225 if (!t)
1226 return NULL;
1227
1228 r = asprintf(&s, "%s %"PRIu8" %"PRIu8" %"PRIu16" %s %s %s",
1229 k,
1230 rr->nsec3.algorithm,
1231 rr->nsec3.flags,
1232 rr->nsec3.iterations,
1233 rr->nsec3.salt_size > 0 ? salt : "-",
1234 hash,
1235 t);
1236 if (r < 0)
1237 return NULL;
1238
1239 break;
1240 }
1241
1242 case DNS_TYPE_TLSA:
1243 t = hexmem(rr->tlsa.data, rr->tlsa.data_size);
1244 if (!t)
1245 return NULL;
1246
1247 r = asprintf(&s,
1248 "%s %u %u %u %s\n"
1249 " -- Cert. usage: %s\n"
1250 " -- Selector: %s\n"
1251 " -- Matching type: %s",
1252 k,
1253 rr->tlsa.cert_usage,
1254 rr->tlsa.selector,
1255 rr->tlsa.matching_type,
1256 t,
1257 tlsa_cert_usage_to_string(rr->tlsa.cert_usage),
1258 tlsa_selector_to_string(rr->tlsa.selector),
1259 tlsa_matching_type_to_string(rr->tlsa.matching_type));
1260 if (r < 0)
1261 return NULL;
1262
1263 break;
1264
1265 case DNS_TYPE_CAA:
1266 t = octescape(rr->caa.value, rr->caa.value_size);
1267 if (!t)
1268 return NULL;
1269
1270 r = asprintf(&s, "%s %u %s \"%s\"%s%s%s%.0u",
1271 k,
1272 rr->caa.flags,
1273 rr->caa.tag,
1274 t,
1275 rr->caa.flags ? "\n -- Flags:" : "",
1276 rr->caa.flags & CAA_FLAG_CRITICAL ? " critical" : "",
1277 rr->caa.flags & ~CAA_FLAG_CRITICAL ? " " : "",
1278 rr->caa.flags & ~CAA_FLAG_CRITICAL);
1279 if (r < 0)
1280 return NULL;
1281
1282 break;
1283
1284 case DNS_TYPE_SVCB:
1285 case DNS_TYPE_HTTPS:
1286 t = format_svc_params(rr->svcb.params);
1287 if (!t)
1288 return NULL;
1289 r = asprintf(&s, "%s %d %s %s", k, rr->svcb.priority,
1290 isempty(rr->svcb.target_name) ? "." : rr->svcb.target_name,
1291 t);
1292 if (r < 0)
1293 return NULL;
1294
1295 break;
1296
1297 case DNS_TYPE_OPENPGPKEY:
1298 r = asprintf(&s, "%s", k);
1299 if (r < 0)
1300 return NULL;
1301
1302 r = base64_append(&s, r,
1303 rr->generic.data, rr->generic.data_size,
1304 8, columns());
1305 if (r < 0)
1306 return NULL;
1307 break;
1308
1309 case DNS_TYPE_NAPTR: {
1310 _cleanup_free_ char *tt = NULL, *ttt = NULL;
1311
1312 t = octescape(rr->naptr.flags, SIZE_MAX);
1313 if (!t)
1314 return NULL;
1315
1316 tt = octescape(rr->naptr.services, SIZE_MAX);
1317 if (!tt)
1318 return NULL;
1319
1320 ttt = octescape(rr->naptr.regexp, SIZE_MAX);
1321 if (!ttt)
1322 return NULL;
1323
1324 if (asprintf(&s, "%" PRIu16 " %" PRIu16 " \"%s\" \"%s\" \"%s\" %s.",
1325 rr->naptr.order,
1326 rr->naptr.preference,
1327 t,
1328 tt,
1329 ttt,
1330 rr->naptr.replacement) < 0)
1331 return NULL;
1332 break;
1333 }
1334 default:
1335 /* Format as documented in RFC 3597, Section 5 */
1336 if (rr->generic.data_size == 0)
1337 r = asprintf(&s, "%s \\# 0", k);
1338 else {
1339 t = hexmem(rr->generic.data, rr->generic.data_size);
1340 if (!t)
1341 return NULL;
1342 r = asprintf(&s, "%s \\# %zu %s", k, rr->generic.data_size, t);
1343 }
1344 if (r < 0)
1345 return NULL;
1346 break;
1347 }
1348
1349 rr->to_string = s;
1350 return TAKE_PTR(s);
1351 }
1352
1353 ssize_t dns_resource_record_payload(DnsResourceRecord *rr, void **out) {
1354 assert(rr);
1355 assert(out);
1356
1357 switch (rr->unparsable ? _DNS_TYPE_INVALID : rr->key->type) {
1358 case DNS_TYPE_SRV:
1359 case DNS_TYPE_PTR:
1360 case DNS_TYPE_NS:
1361 case DNS_TYPE_CNAME:
1362 case DNS_TYPE_DNAME:
1363 case DNS_TYPE_HINFO:
1364 case DNS_TYPE_SPF:
1365 case DNS_TYPE_TXT:
1366 case DNS_TYPE_A:
1367 case DNS_TYPE_AAAA:
1368 case DNS_TYPE_SOA:
1369 case DNS_TYPE_MX:
1370 case DNS_TYPE_LOC:
1371 case DNS_TYPE_DS:
1372 case DNS_TYPE_DNSKEY:
1373 case DNS_TYPE_RRSIG:
1374 case DNS_TYPE_NSEC:
1375 case DNS_TYPE_NSEC3:
1376 return -EINVAL;
1377
1378 case DNS_TYPE_SSHFP:
1379 *out = rr->sshfp.fingerprint;
1380 return rr->sshfp.fingerprint_size;
1381
1382 case DNS_TYPE_TLSA:
1383 *out = rr->tlsa.data;
1384 return rr->tlsa.data_size;
1385
1386 case DNS_TYPE_OPENPGPKEY:
1387 default:
1388 *out = rr->generic.data;
1389 return rr->generic.data_size;
1390 }
1391 }
1392
1393 int dns_resource_record_to_wire_format(DnsResourceRecord *rr, bool canonical) {
1394
1395 _cleanup_(dns_packet_unref) DnsPacket packet = {
1396 .n_ref = 1,
1397 .protocol = DNS_PROTOCOL_DNS,
1398 .on_stack = true,
1399 .refuse_compression = true,
1400 .canonical_form = canonical,
1401 };
1402
1403 size_t start, rds;
1404 int r;
1405
1406 assert(rr);
1407
1408 /* Generates the RR in wire-format, optionally in the
1409 * canonical form as discussed in the DNSSEC RFC 4034, Section
1410 * 6.2. We allocate a throw-away DnsPacket object on the stack
1411 * here, because we need some book-keeping for memory
1412 * management, and can reuse the DnsPacket serializer, that
1413 * can generate the canonical form, too, but also knows label
1414 * compression and suchlike. */
1415
1416 if (rr->wire_format && rr->wire_format_canonical == canonical)
1417 return 0;
1418
1419 r = dns_packet_append_rr(&packet, rr, 0, &start, &rds);
1420 if (r < 0)
1421 return r;
1422
1423 assert(start == 0);
1424 assert(packet._data);
1425
1426 free(rr->wire_format);
1427 rr->wire_format = TAKE_PTR(packet._data);
1428 rr->wire_format_size = packet.size;
1429 rr->wire_format_rdata_offset = rds;
1430 rr->wire_format_canonical = canonical;
1431
1432 return 0;
1433 }
1434
1435 int dns_resource_record_signer(DnsResourceRecord *rr, const char **ret) {
1436 const char *n;
1437 int r;
1438
1439 assert(rr);
1440 assert(ret);
1441
1442 /* Returns the RRset's signer, if it is known. */
1443
1444 if (rr->n_skip_labels_signer == UINT8_MAX)
1445 return -ENODATA;
1446
1447 n = dns_resource_key_name(rr->key);
1448 r = dns_name_skip(n, rr->n_skip_labels_signer, &n);
1449 if (r < 0)
1450 return r;
1451 if (r == 0)
1452 return -EINVAL;
1453
1454 *ret = n;
1455 return 0;
1456 }
1457
1458 int dns_resource_record_source(DnsResourceRecord *rr, const char **ret) {
1459 const char *n;
1460 int r;
1461
1462 assert(rr);
1463 assert(ret);
1464
1465 /* Returns the RRset's synthesizing source, if it is known. */
1466
1467 if (rr->n_skip_labels_source == UINT8_MAX)
1468 return -ENODATA;
1469
1470 n = dns_resource_key_name(rr->key);
1471 r = dns_name_skip(n, rr->n_skip_labels_source, &n);
1472 if (r < 0)
1473 return r;
1474 if (r == 0)
1475 return -EINVAL;
1476
1477 *ret = n;
1478 return 0;
1479 }
1480
1481 int dns_resource_record_is_signer(DnsResourceRecord *rr, const char *zone) {
1482 const char *signer;
1483 int r;
1484
1485 assert(rr);
1486
1487 r = dns_resource_record_signer(rr, &signer);
1488 if (r < 0)
1489 return r;
1490
1491 return dns_name_equal(zone, signer);
1492 }
1493
1494 int dns_resource_record_is_synthetic(DnsResourceRecord *rr) {
1495 int r;
1496
1497 assert(rr);
1498
1499 /* Returns > 0 if the RR is generated from a wildcard, and is not the asterisk name itself */
1500
1501 if (rr->n_skip_labels_source == UINT8_MAX)
1502 return -ENODATA;
1503
1504 if (rr->n_skip_labels_source == 0)
1505 return 0;
1506
1507 if (rr->n_skip_labels_source > 1)
1508 return 1;
1509
1510 r = dns_name_startswith(dns_resource_key_name(rr->key), "*");
1511 if (r < 0)
1512 return r;
1513
1514 return !r;
1515 }
1516
1517 void dns_resource_record_hash_func(const DnsResourceRecord *rr, struct siphash *state) {
1518 assert(rr);
1519
1520 dns_resource_key_hash_func(rr->key, state);
1521
1522 switch (rr->unparsable ? _DNS_TYPE_INVALID : rr->key->type) {
1523
1524 case DNS_TYPE_SRV:
1525 siphash24_compress_typesafe(rr->srv.priority, state);
1526 siphash24_compress_typesafe(rr->srv.weight, state);
1527 siphash24_compress_typesafe(rr->srv.port, state);
1528 dns_name_hash_func(rr->srv.name, state);
1529 break;
1530
1531 case DNS_TYPE_PTR:
1532 case DNS_TYPE_NS:
1533 case DNS_TYPE_CNAME:
1534 case DNS_TYPE_DNAME:
1535 dns_name_hash_func(rr->ptr.name, state);
1536 break;
1537
1538 case DNS_TYPE_HINFO:
1539 string_hash_func(rr->hinfo.cpu, state);
1540 string_hash_func(rr->hinfo.os, state);
1541 break;
1542
1543 case DNS_TYPE_TXT:
1544 case DNS_TYPE_SPF: {
1545 LIST_FOREACH(items, j, rr->txt.items) {
1546 siphash24_compress_safe(j->data, j->length, state);
1547
1548 /* Add an extra NUL byte, so that "a" followed by "b" doesn't result in the same hash as "ab"
1549 * followed by "". */
1550 siphash24_compress_byte(0, state);
1551 }
1552 break;
1553 }
1554
1555 case DNS_TYPE_A:
1556 siphash24_compress_typesafe(rr->a.in_addr, state);
1557 break;
1558
1559 case DNS_TYPE_AAAA:
1560 siphash24_compress_typesafe(rr->aaaa.in6_addr, state);
1561 break;
1562
1563 case DNS_TYPE_SOA:
1564 dns_name_hash_func(rr->soa.mname, state);
1565 dns_name_hash_func(rr->soa.rname, state);
1566 siphash24_compress_typesafe(rr->soa.serial, state);
1567 siphash24_compress_typesafe(rr->soa.refresh, state);
1568 siphash24_compress_typesafe(rr->soa.retry, state);
1569 siphash24_compress_typesafe(rr->soa.expire, state);
1570 siphash24_compress_typesafe(rr->soa.minimum, state);
1571 break;
1572
1573 case DNS_TYPE_MX:
1574 siphash24_compress_typesafe(rr->mx.priority, state);
1575 dns_name_hash_func(rr->mx.exchange, state);
1576 break;
1577
1578 case DNS_TYPE_LOC:
1579 siphash24_compress_typesafe(rr->loc.version, state);
1580 siphash24_compress_typesafe(rr->loc.size, state);
1581 siphash24_compress_typesafe(rr->loc.horiz_pre, state);
1582 siphash24_compress_typesafe(rr->loc.vert_pre, state);
1583 siphash24_compress_typesafe(rr->loc.latitude, state);
1584 siphash24_compress_typesafe(rr->loc.longitude, state);
1585 siphash24_compress_typesafe(rr->loc.altitude, state);
1586 break;
1587
1588 case DNS_TYPE_SSHFP:
1589 siphash24_compress_typesafe(rr->sshfp.algorithm, state);
1590 siphash24_compress_typesafe(rr->sshfp.fptype, state);
1591 siphash24_compress_safe(rr->sshfp.fingerprint, rr->sshfp.fingerprint_size, state);
1592 break;
1593
1594 case DNS_TYPE_DNSKEY:
1595 siphash24_compress_typesafe(rr->dnskey.flags, state);
1596 siphash24_compress_typesafe(rr->dnskey.protocol, state);
1597 siphash24_compress_typesafe(rr->dnskey.algorithm, state);
1598 siphash24_compress_safe(rr->dnskey.key, rr->dnskey.key_size, state);
1599 break;
1600
1601 case DNS_TYPE_RRSIG:
1602 siphash24_compress_typesafe(rr->rrsig.type_covered, state);
1603 siphash24_compress_typesafe(rr->rrsig.algorithm, state);
1604 siphash24_compress_typesafe(rr->rrsig.labels, state);
1605 siphash24_compress_typesafe(rr->rrsig.original_ttl, state);
1606 siphash24_compress_typesafe(rr->rrsig.expiration, state);
1607 siphash24_compress_typesafe(rr->rrsig.inception, state);
1608 siphash24_compress_typesafe(rr->rrsig.key_tag, state);
1609 dns_name_hash_func(rr->rrsig.signer, state);
1610 siphash24_compress_safe(rr->rrsig.signature, rr->rrsig.signature_size, state);
1611 break;
1612
1613 case DNS_TYPE_NSEC:
1614 dns_name_hash_func(rr->nsec.next_domain_name, state);
1615 /* FIXME: we leave out the type bitmap here. Hash
1616 * would be better if we'd take it into account
1617 * too. */
1618 break;
1619
1620 case DNS_TYPE_DS:
1621 siphash24_compress_typesafe(rr->ds.key_tag, state);
1622 siphash24_compress_typesafe(rr->ds.algorithm, state);
1623 siphash24_compress_typesafe(rr->ds.digest_type, state);
1624 siphash24_compress_safe(rr->ds.digest, rr->ds.digest_size, state);
1625 break;
1626
1627 case DNS_TYPE_NSEC3:
1628 siphash24_compress_typesafe(rr->nsec3.algorithm, state);
1629 siphash24_compress_typesafe(rr->nsec3.flags, state);
1630 siphash24_compress_typesafe(rr->nsec3.iterations, state);
1631 siphash24_compress_safe(rr->nsec3.salt, rr->nsec3.salt_size, state);
1632 siphash24_compress_safe(rr->nsec3.next_hashed_name, rr->nsec3.next_hashed_name_size, state);
1633 /* FIXME: We leave the bitmaps out */
1634 break;
1635
1636 case DNS_TYPE_TLSA:
1637 siphash24_compress_typesafe(rr->tlsa.cert_usage, state);
1638 siphash24_compress_typesafe(rr->tlsa.selector, state);
1639 siphash24_compress_typesafe(rr->tlsa.matching_type, state);
1640 siphash24_compress_safe(rr->tlsa.data, rr->tlsa.data_size, state);
1641 break;
1642
1643 case DNS_TYPE_SVCB:
1644 case DNS_TYPE_HTTPS:
1645 dns_name_hash_func(rr->svcb.target_name, state);
1646 siphash24_compress_typesafe(rr->svcb.priority, state);
1647 LIST_FOREACH(params, j, rr->svcb.params) {
1648 siphash24_compress_typesafe(j->key, state);
1649 siphash24_compress_safe(j->value, j->length, state);
1650 }
1651 break;
1652
1653 case DNS_TYPE_CAA:
1654 siphash24_compress_typesafe(rr->caa.flags, state);
1655 string_hash_func(rr->caa.tag, state);
1656 siphash24_compress_safe(rr->caa.value, rr->caa.value_size, state);
1657 break;
1658
1659 case DNS_TYPE_NAPTR:
1660 siphash24_compress_typesafe(rr->naptr.order, state);
1661 siphash24_compress_typesafe(rr->naptr.preference, state);
1662 string_hash_func(rr->naptr.flags, state);
1663 string_hash_func(rr->naptr.services, state);
1664 string_hash_func(rr->naptr.regexp, state);
1665 dns_name_hash_func(rr->naptr.replacement, state);
1666 break;
1667
1668 case DNS_TYPE_OPENPGPKEY:
1669 default:
1670 siphash24_compress_safe(rr->generic.data, rr->generic.data_size, state);
1671 break;
1672 }
1673 }
1674
1675 int dns_resource_record_compare_func(const DnsResourceRecord *x, const DnsResourceRecord *y) {
1676 int r;
1677
1678 r = dns_resource_key_compare_func(x->key, y->key);
1679 if (r != 0)
1680 return r;
1681
1682 if (dns_resource_record_payload_equal(x, y) > 0)
1683 return 0;
1684
1685 /* We still use CMP() here, even though don't implement proper
1686 * ordering, since the hashtable doesn't need ordering anyway. */
1687 return CMP(x, y);
1688 }
1689
1690 DEFINE_HASH_OPS(dns_resource_record_hash_ops, DnsResourceRecord, dns_resource_record_hash_func, dns_resource_record_compare_func);
1691
1692 DnsResourceRecord *dns_resource_record_copy(DnsResourceRecord *rr) {
1693 _cleanup_(dns_resource_record_unrefp) DnsResourceRecord *copy = NULL;
1694 DnsResourceRecord *t;
1695
1696 assert(rr);
1697
1698 copy = dns_resource_record_new(rr->key);
1699 if (!copy)
1700 return NULL;
1701
1702 copy->ttl = rr->ttl;
1703 copy->expiry = rr->expiry;
1704 copy->n_skip_labels_signer = rr->n_skip_labels_signer;
1705 copy->n_skip_labels_source = rr->n_skip_labels_source;
1706 copy->unparsable = rr->unparsable;
1707
1708 switch (rr->unparsable ? _DNS_TYPE_INVALID : rr->key->type) {
1709
1710 case DNS_TYPE_SRV:
1711 copy->srv.priority = rr->srv.priority;
1712 copy->srv.weight = rr->srv.weight;
1713 copy->srv.port = rr->srv.port;
1714 copy->srv.name = strdup(rr->srv.name);
1715 if (!copy->srv.name)
1716 return NULL;
1717 break;
1718
1719 case DNS_TYPE_PTR:
1720 case DNS_TYPE_NS:
1721 case DNS_TYPE_CNAME:
1722 case DNS_TYPE_DNAME:
1723 copy->ptr.name = strdup(rr->ptr.name);
1724 if (!copy->ptr.name)
1725 return NULL;
1726 break;
1727
1728 case DNS_TYPE_HINFO:
1729 copy->hinfo.cpu = strdup(rr->hinfo.cpu);
1730 if (!copy->hinfo.cpu)
1731 return NULL;
1732
1733 copy->hinfo.os = strdup(rr->hinfo.os);
1734 if (!copy->hinfo.os)
1735 return NULL;
1736 break;
1737
1738 case DNS_TYPE_TXT:
1739 case DNS_TYPE_SPF:
1740 copy->txt.items = dns_txt_item_copy(rr->txt.items);
1741 if (!copy->txt.items)
1742 return NULL;
1743 break;
1744
1745 case DNS_TYPE_A:
1746 copy->a = rr->a;
1747 break;
1748
1749 case DNS_TYPE_AAAA:
1750 copy->aaaa = rr->aaaa;
1751 break;
1752
1753 case DNS_TYPE_SOA:
1754 copy->soa.mname = strdup(rr->soa.mname);
1755 if (!copy->soa.mname)
1756 return NULL;
1757 copy->soa.rname = strdup(rr->soa.rname);
1758 if (!copy->soa.rname)
1759 return NULL;
1760 copy->soa.serial = rr->soa.serial;
1761 copy->soa.refresh = rr->soa.refresh;
1762 copy->soa.retry = rr->soa.retry;
1763 copy->soa.expire = rr->soa.expire;
1764 copy->soa.minimum = rr->soa.minimum;
1765 break;
1766
1767 case DNS_TYPE_MX:
1768 copy->mx.priority = rr->mx.priority;
1769 copy->mx.exchange = strdup(rr->mx.exchange);
1770 if (!copy->mx.exchange)
1771 return NULL;
1772 break;
1773
1774 case DNS_TYPE_LOC:
1775 copy->loc = rr->loc;
1776 break;
1777
1778 case DNS_TYPE_SSHFP:
1779 copy->sshfp.algorithm = rr->sshfp.algorithm;
1780 copy->sshfp.fptype = rr->sshfp.fptype;
1781 copy->sshfp.fingerprint = memdup(rr->sshfp.fingerprint, rr->sshfp.fingerprint_size);
1782 if (!copy->sshfp.fingerprint)
1783 return NULL;
1784 copy->sshfp.fingerprint_size = rr->sshfp.fingerprint_size;
1785 break;
1786
1787 case DNS_TYPE_DNSKEY:
1788 copy->dnskey.flags = rr->dnskey.flags;
1789 copy->dnskey.protocol = rr->dnskey.protocol;
1790 copy->dnskey.algorithm = rr->dnskey.algorithm;
1791 copy->dnskey.key = memdup(rr->dnskey.key, rr->dnskey.key_size);
1792 if (!copy->dnskey.key)
1793 return NULL;
1794 copy->dnskey.key_size = rr->dnskey.key_size;
1795 break;
1796
1797 case DNS_TYPE_RRSIG:
1798 copy->rrsig.type_covered = rr->rrsig.type_covered;
1799 copy->rrsig.algorithm = rr->rrsig.algorithm;
1800 copy->rrsig.labels = rr->rrsig.labels;
1801 copy->rrsig.original_ttl = rr->rrsig.original_ttl;
1802 copy->rrsig.expiration = rr->rrsig.expiration;
1803 copy->rrsig.inception = rr->rrsig.inception;
1804 copy->rrsig.key_tag = rr->rrsig.key_tag;
1805 copy->rrsig.signer = strdup(rr->rrsig.signer);
1806 if (!copy->rrsig.signer)
1807 return NULL;
1808 copy->rrsig.signature = memdup(rr->rrsig.signature, rr->rrsig.signature_size);
1809 if (!copy->rrsig.signature)
1810 return NULL;
1811 copy->rrsig.signature_size = rr->rrsig.signature_size;
1812 break;
1813
1814 case DNS_TYPE_NSEC:
1815 copy->nsec.next_domain_name = strdup(rr->nsec.next_domain_name);
1816 if (!copy->nsec.next_domain_name)
1817 return NULL;
1818 if (rr->nsec.types) {
1819 copy->nsec.types = bitmap_copy(rr->nsec.types);
1820 if (!copy->nsec.types)
1821 return NULL;
1822 }
1823 break;
1824
1825 case DNS_TYPE_DS:
1826 copy->ds.key_tag = rr->ds.key_tag;
1827 copy->ds.algorithm = rr->ds.algorithm;
1828 copy->ds.digest_type = rr->ds.digest_type;
1829 copy->ds.digest = memdup(rr->ds.digest, rr->ds.digest_size);
1830 if (!copy->ds.digest)
1831 return NULL;
1832 copy->ds.digest_size = rr->ds.digest_size;
1833 break;
1834
1835 case DNS_TYPE_NSEC3:
1836 copy->nsec3.algorithm = rr->nsec3.algorithm;
1837 copy->nsec3.flags = rr->nsec3.flags;
1838 copy->nsec3.iterations = rr->nsec3.iterations;
1839 copy->nsec3.salt = memdup(rr->nsec3.salt, rr->nsec3.salt_size);
1840 if (!copy->nsec3.salt)
1841 return NULL;
1842 copy->nsec3.salt_size = rr->nsec3.salt_size;
1843 copy->nsec3.next_hashed_name = memdup(rr->nsec3.next_hashed_name, rr->nsec3.next_hashed_name_size);
1844 if (!copy->nsec3.next_hashed_name)
1845 return NULL;
1846 copy->nsec3.next_hashed_name_size = rr->nsec3.next_hashed_name_size;
1847 if (rr->nsec3.types) {
1848 copy->nsec3.types = bitmap_copy(rr->nsec3.types);
1849 if (!copy->nsec3.types)
1850 return NULL;
1851 }
1852 break;
1853
1854 case DNS_TYPE_TLSA:
1855 copy->tlsa.cert_usage = rr->tlsa.cert_usage;
1856 copy->tlsa.selector = rr->tlsa.selector;
1857 copy->tlsa.matching_type = rr->tlsa.matching_type;
1858 copy->tlsa.data = memdup(rr->tlsa.data, rr->tlsa.data_size);
1859 if (!copy->tlsa.data)
1860 return NULL;
1861 copy->tlsa.data_size = rr->tlsa.data_size;
1862 break;
1863
1864 case DNS_TYPE_CAA:
1865 copy->caa.flags = rr->caa.flags;
1866 copy->caa.tag = strdup(rr->caa.tag);
1867 if (!copy->caa.tag)
1868 return NULL;
1869 copy->caa.value = memdup(rr->caa.value, rr->caa.value_size);
1870 if (!copy->caa.value)
1871 return NULL;
1872 copy->caa.value_size = rr->caa.value_size;
1873 break;
1874
1875 case DNS_TYPE_SVCB:
1876 case DNS_TYPE_HTTPS:
1877 copy->svcb.priority = rr->svcb.priority;
1878 copy->svcb.target_name = strdup(rr->svcb.target_name);
1879 if (!copy->svcb.target_name)
1880 return NULL;
1881 copy->svcb.params = dns_svc_params_copy(rr->svcb.params);
1882 if (rr->svcb.params && !copy->svcb.params)
1883 return NULL;
1884 break;
1885
1886 case DNS_TYPE_NAPTR:
1887 copy->naptr.order = rr->naptr.order;
1888 copy->naptr.preference = rr->naptr.preference;
1889 copy->naptr.flags = strdup(rr->naptr.flags);
1890 if (!copy->naptr.flags)
1891 return NULL;
1892 copy->naptr.services = strdup(rr->naptr.services);
1893 if (!copy->naptr.services)
1894 return NULL;
1895 copy->naptr.regexp = strdup(rr->naptr.regexp);
1896 if (!copy->naptr.regexp)
1897 return NULL;
1898 copy->naptr.replacement = strdup(rr->naptr.replacement);
1899 if (!copy->naptr.replacement)
1900 return NULL;
1901 break;
1902
1903 case DNS_TYPE_OPT:
1904 default:
1905 copy->generic.data = memdup(rr->generic.data, rr->generic.data_size);
1906 if (!copy->generic.data)
1907 return NULL;
1908 copy->generic.data_size = rr->generic.data_size;
1909 break;
1910 }
1911
1912 t = TAKE_PTR(copy);
1913
1914 return t;
1915 }
1916
1917 int dns_resource_record_clamp_ttl(DnsResourceRecord **rr, uint32_t max_ttl) {
1918 DnsResourceRecord *old_rr, *new_rr;
1919 uint32_t new_ttl;
1920
1921 assert(rr);
1922 old_rr = *rr;
1923
1924 if (old_rr->key->type == DNS_TYPE_OPT)
1925 return -EINVAL;
1926
1927 new_ttl = MIN(old_rr->ttl, max_ttl);
1928 if (new_ttl == old_rr->ttl)
1929 return 0;
1930
1931 if (old_rr->n_ref == 1) {
1932 /* Patch in place */
1933 old_rr->ttl = new_ttl;
1934 return 1;
1935 }
1936
1937 new_rr = dns_resource_record_copy(old_rr);
1938 if (!new_rr)
1939 return -ENOMEM;
1940
1941 new_rr->ttl = new_ttl;
1942
1943 DNS_RR_REPLACE(*rr, new_rr);
1944 return 1;
1945 }
1946
1947 bool dns_resource_record_is_link_local_address(DnsResourceRecord *rr) {
1948 assert(rr);
1949
1950 if (rr->key->class != DNS_CLASS_IN)
1951 return false;
1952
1953 if (rr->key->type == DNS_TYPE_A)
1954 return in4_addr_is_link_local(&rr->a.in_addr);
1955
1956 if (rr->key->type == DNS_TYPE_AAAA)
1957 return in6_addr_is_link_local(&rr->aaaa.in6_addr);
1958
1959 return false;
1960 }
1961
1962 int dns_resource_record_get_cname_target(DnsResourceKey *key, DnsResourceRecord *cname, char **ret) {
1963 _cleanup_free_ char *d = NULL;
1964 int r;
1965
1966 assert(key);
1967 assert(cname);
1968
1969 /* Checks if the RR `cname` is a CNAME/DNAME RR that matches the specified `key`. If so, returns the
1970 * target domain. If not, returns -EUNATCH */
1971
1972 if (key->class != cname->key->class && key->class != DNS_CLASS_ANY)
1973 return -EUNATCH;
1974
1975 if (!dns_type_may_redirect(key->type)) /* This key type is not subject to CNAME/DNAME redirection?
1976 * Then let's refuse right-away */
1977 return -EUNATCH;
1978
1979 if (cname->key->type == DNS_TYPE_CNAME) {
1980 r = dns_name_equal(dns_resource_key_name(key),
1981 dns_resource_key_name(cname->key));
1982 if (r < 0)
1983 return r;
1984 if (r == 0)
1985 return -EUNATCH; /* CNAME RR key doesn't actually match the original key */
1986
1987 d = strdup(cname->cname.name);
1988 if (!d)
1989 return -ENOMEM;
1990
1991 } else if (cname->key->type == DNS_TYPE_DNAME) {
1992
1993 r = dns_name_change_suffix(
1994 dns_resource_key_name(key),
1995 dns_resource_key_name(cname->key),
1996 cname->dname.name,
1997 &d);
1998 if (r < 0)
1999 return r;
2000 if (r == 0)
2001 return -EUNATCH; /* DNAME RR key doesn't actually match the original key */
2002
2003 } else
2004 return -EUNATCH; /* Not a CNAME/DNAME RR, hence doesn't match the proposition either */
2005
2006 *ret = TAKE_PTR(d);
2007 return 0;
2008 }
2009
2010 DnsTxtItem *dns_txt_item_free_all(DnsTxtItem *first) {
2011 LIST_FOREACH(items, i, first)
2012 free(i);
2013
2014 return NULL;
2015 }
2016
2017 DnsSvcParam *dns_svc_param_free_all(DnsSvcParam *first) {
2018 LIST_FOREACH(params, i, first)
2019 free(i);
2020
2021 return NULL;
2022 }
2023
2024 bool dns_txt_item_equal(DnsTxtItem *a, DnsTxtItem *b) {
2025 DnsTxtItem *bb = b;
2026
2027 if (a == b)
2028 return true;
2029
2030 LIST_FOREACH(items, aa, a) {
2031 if (!bb)
2032 return false;
2033
2034 if (memcmp_nn(aa->data, aa->length, bb->data, bb->length) != 0)
2035 return false;
2036
2037 bb = bb->items_next;
2038 }
2039
2040 return !bb;
2041 }
2042
2043 DnsTxtItem *dns_txt_item_copy(DnsTxtItem *first) {
2044 DnsTxtItem *copy = NULL, *end = NULL;
2045
2046 LIST_FOREACH(items, i, first) {
2047 DnsTxtItem *j;
2048
2049 j = memdup(i, offsetof(DnsTxtItem, data) + i->length + 1);
2050 if (!j)
2051 return dns_txt_item_free_all(copy);
2052
2053 LIST_INSERT_AFTER(items, copy, end, j);
2054 end = j;
2055 }
2056
2057 return copy;
2058 }
2059
2060 bool dns_svc_params_equal(DnsSvcParam *a, DnsSvcParam *b) {
2061 DnsSvcParam *bb = b;
2062
2063 if (a == b)
2064 return true;
2065
2066 LIST_FOREACH(params, aa, a) {
2067 if (!bb)
2068 return false;
2069
2070 if (aa->key != bb->key)
2071 return false;
2072
2073 if (memcmp_nn(aa->value, aa->length, bb->value, bb->length) != 0)
2074 return false;
2075
2076 bb = bb->params_next;
2077 }
2078
2079 return !bb;
2080 }
2081
2082 DnsSvcParam *dns_svc_params_copy(DnsSvcParam *first) {
2083 DnsSvcParam *copy = NULL, *end = NULL;
2084
2085 LIST_FOREACH(params, i, first) {
2086 DnsSvcParam *j;
2087
2088 j = memdup(i, offsetof(DnsSvcParam, value) + i->length);
2089 if (!j)
2090 return dns_svc_param_free_all(copy);
2091
2092 LIST_INSERT_AFTER(params, copy, end, j);
2093 end = j;
2094 }
2095
2096 return copy;
2097 }
2098
2099 int dns_txt_item_new_empty(DnsTxtItem **ret) {
2100 DnsTxtItem *i;
2101
2102 assert(ret);
2103
2104 /* RFC 6763, section 6.1 suggests to treat
2105 * empty TXT RRs as equivalent to a TXT record
2106 * with a single empty string. */
2107
2108 i = malloc0(offsetof(DnsTxtItem, data) + 1); /* for safety reasons we add an extra NUL byte */
2109 if (!i)
2110 return -ENOMEM;
2111
2112 *ret = i;
2113 return 0;
2114 }
2115
2116 int dns_resource_record_new_from_raw(DnsResourceRecord **ret, const void *data, size_t size) {
2117 _cleanup_(dns_packet_unrefp) DnsPacket *p = NULL;
2118 int r;
2119
2120 r = dns_packet_new(&p, DNS_PROTOCOL_DNS, 0, DNS_PACKET_SIZE_MAX);
2121 if (r < 0)
2122 return r;
2123
2124 p->refuse_compression = true;
2125
2126 r = dns_packet_append_blob(p, data, size, NULL);
2127 if (r < 0)
2128 return r;
2129
2130 return dns_packet_read_rr(p, ret, NULL, NULL);
2131 }
2132
2133 int dns_resource_key_to_json(DnsResourceKey *key, JsonVariant **ret) {
2134 assert(key);
2135 assert(ret);
2136
2137 return json_build(ret,
2138 JSON_BUILD_OBJECT(
2139 JSON_BUILD_PAIR("class", JSON_BUILD_INTEGER(key->class)),
2140 JSON_BUILD_PAIR("type", JSON_BUILD_INTEGER(key->type)),
2141 JSON_BUILD_PAIR("name", JSON_BUILD_STRING(dns_resource_key_name(key)))));
2142 }
2143
2144 int dns_resource_key_from_json(JsonVariant *v, DnsResourceKey **ret) {
2145 _cleanup_(dns_resource_key_unrefp) DnsResourceKey *key = NULL;
2146 uint16_t type = 0, class = 0;
2147 const char *name = NULL;
2148 int r;
2149
2150 JsonDispatch dispatch_table[] = {
2151 { "class", _JSON_VARIANT_TYPE_INVALID, json_dispatch_uint16, PTR_TO_SIZE(&class), JSON_MANDATORY },
2152 { "type", _JSON_VARIANT_TYPE_INVALID, json_dispatch_uint16, PTR_TO_SIZE(&type), JSON_MANDATORY },
2153 { "name", JSON_VARIANT_STRING, json_dispatch_const_string, PTR_TO_SIZE(&name), JSON_MANDATORY },
2154 {}
2155 };
2156
2157 assert(v);
2158 assert(ret);
2159
2160 r = json_dispatch(v, dispatch_table, 0, NULL);
2161 if (r < 0)
2162 return r;
2163
2164 key = dns_resource_key_new(class, type, name);
2165 if (!key)
2166 return -ENOMEM;
2167
2168 *ret = TAKE_PTR(key);
2169 return 0;
2170 }
2171
2172 static int type_bitmap_to_json(Bitmap *b, JsonVariant **ret) {
2173 _cleanup_(json_variant_unrefp) JsonVariant *l = NULL;
2174 unsigned t;
2175 int r;
2176
2177 assert(ret);
2178
2179 BITMAP_FOREACH(t, b) {
2180 _cleanup_(json_variant_unrefp) JsonVariant *v = NULL;
2181
2182 r = json_variant_new_unsigned(&v, t);
2183 if (r < 0)
2184 return r;
2185
2186 r = json_variant_append_array(&l, v);
2187 if (r < 0)
2188 return r;
2189 }
2190
2191 if (!l)
2192 return json_variant_new_array(ret, NULL, 0);
2193
2194 *ret = TAKE_PTR(l);
2195 return 0;
2196 }
2197
2198 static int txt_to_json(DnsTxtItem *items, JsonVariant **ret) {
2199 JsonVariant **elements = NULL;
2200 size_t n = 0;
2201 int r;
2202
2203 assert(ret);
2204
2205 LIST_FOREACH(items, i, items) {
2206 if (!GREEDY_REALLOC(elements, n + 1)) {
2207 r = -ENOMEM;
2208 goto finalize;
2209 }
2210
2211 r = json_variant_new_octescape(elements + n, i->data, i->length);
2212 if (r < 0)
2213 goto finalize;
2214
2215 n++;
2216 }
2217
2218 r = json_variant_new_array(ret, elements, n);
2219
2220 finalize:
2221 json_variant_unref_many(elements, n);
2222 return r;
2223 }
2224
2225 static int svc_params_to_json(DnsSvcParam *params, JsonVariant **ret) {
2226 JsonVariant **elements = NULL;
2227 size_t n = 0;
2228 int r;
2229
2230 assert(ret);
2231
2232 LIST_FOREACH(params, i, params) {
2233 if (!GREEDY_REALLOC(elements, n + 1)) {
2234 r = -ENOMEM;
2235 goto finalize;
2236 }
2237
2238 r = json_variant_new_base64(elements + n, i->value, i->length);
2239 if (r < 0)
2240 goto finalize;
2241
2242 n++;
2243 }
2244
2245 r = json_variant_new_array(ret, elements, n);
2246 finalize:
2247 json_variant_unref_many(elements, n);
2248 return r;
2249 }
2250
2251 int dns_resource_record_to_json(DnsResourceRecord *rr, JsonVariant **ret) {
2252 _cleanup_(json_variant_unrefp) JsonVariant *k = NULL;
2253 int r;
2254
2255 assert(rr);
2256 assert(ret);
2257
2258 r = dns_resource_key_to_json(rr->key, &k);
2259 if (r < 0)
2260 return r;
2261
2262 switch (rr->unparsable ? _DNS_TYPE_INVALID : rr->key->type) {
2263
2264 case DNS_TYPE_SRV:
2265 return json_build(ret,
2266 JSON_BUILD_OBJECT(
2267 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2268 JSON_BUILD_PAIR("priority", JSON_BUILD_UNSIGNED(rr->srv.priority)),
2269 JSON_BUILD_PAIR("weight", JSON_BUILD_UNSIGNED(rr->srv.weight)),
2270 JSON_BUILD_PAIR("port", JSON_BUILD_UNSIGNED(rr->srv.port)),
2271 JSON_BUILD_PAIR("name", JSON_BUILD_STRING(rr->srv.name))));
2272
2273 case DNS_TYPE_PTR:
2274 case DNS_TYPE_NS:
2275 case DNS_TYPE_CNAME:
2276 case DNS_TYPE_DNAME:
2277 return json_build(ret,
2278 JSON_BUILD_OBJECT(
2279 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2280 JSON_BUILD_PAIR("name", JSON_BUILD_STRING(rr->ptr.name))));
2281
2282 case DNS_TYPE_HINFO:
2283 return json_build(ret,
2284 JSON_BUILD_OBJECT(
2285 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2286 JSON_BUILD_PAIR("cpu", JSON_BUILD_STRING(rr->hinfo.cpu)),
2287 JSON_BUILD_PAIR("os", JSON_BUILD_STRING(rr->hinfo.os))));
2288
2289 case DNS_TYPE_SPF:
2290 case DNS_TYPE_TXT: {
2291 _cleanup_(json_variant_unrefp) JsonVariant *l = NULL;
2292
2293 r = txt_to_json(rr->txt.items, &l);
2294 if (r < 0)
2295 return r;
2296
2297 return json_build(ret,
2298 JSON_BUILD_OBJECT(
2299 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2300 JSON_BUILD_PAIR("items", JSON_BUILD_VARIANT(l))));
2301 }
2302
2303 case DNS_TYPE_A:
2304 return json_build(ret,
2305 JSON_BUILD_OBJECT(
2306 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2307 JSON_BUILD_PAIR("address", JSON_BUILD_IN4_ADDR(&rr->a.in_addr))));
2308
2309 case DNS_TYPE_AAAA:
2310 return json_build(ret,
2311 JSON_BUILD_OBJECT(
2312 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2313 JSON_BUILD_PAIR("address", JSON_BUILD_IN6_ADDR(&rr->aaaa.in6_addr))));
2314
2315 case DNS_TYPE_SOA:
2316 return json_build(ret,
2317 JSON_BUILD_OBJECT(
2318 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2319 JSON_BUILD_PAIR("mname", JSON_BUILD_STRING(rr->soa.mname)),
2320 JSON_BUILD_PAIR("rname", JSON_BUILD_STRING(rr->soa.rname)),
2321 JSON_BUILD_PAIR("serial", JSON_BUILD_UNSIGNED(rr->soa.serial)),
2322 JSON_BUILD_PAIR("refresh", JSON_BUILD_UNSIGNED(rr->soa.refresh)),
2323 JSON_BUILD_PAIR("expire", JSON_BUILD_UNSIGNED(rr->soa.retry)),
2324 JSON_BUILD_PAIR("minimum", JSON_BUILD_UNSIGNED(rr->soa.minimum))));
2325
2326 case DNS_TYPE_MX:
2327 return json_build(ret,
2328 JSON_BUILD_OBJECT(
2329 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2330 JSON_BUILD_PAIR("priority", JSON_BUILD_UNSIGNED(rr->mx.priority)),
2331 JSON_BUILD_PAIR("exchange", JSON_BUILD_STRING(rr->mx.exchange))));
2332 case DNS_TYPE_LOC:
2333 return json_build(ret,
2334 JSON_BUILD_OBJECT(
2335 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2336 JSON_BUILD_PAIR("version", JSON_BUILD_UNSIGNED(rr->loc.version)),
2337 JSON_BUILD_PAIR("size", JSON_BUILD_UNSIGNED(rr->loc.size)),
2338 JSON_BUILD_PAIR("horiz_pre", JSON_BUILD_UNSIGNED(rr->loc.horiz_pre)),
2339 JSON_BUILD_PAIR("vert_pre", JSON_BUILD_UNSIGNED(rr->loc.vert_pre)),
2340 JSON_BUILD_PAIR("latitude", JSON_BUILD_UNSIGNED(rr->loc.latitude)),
2341 JSON_BUILD_PAIR("longitude", JSON_BUILD_UNSIGNED(rr->loc.longitude)),
2342 JSON_BUILD_PAIR("altitude", JSON_BUILD_UNSIGNED(rr->loc.altitude))));
2343
2344 case DNS_TYPE_DS:
2345 return json_build(ret,
2346 JSON_BUILD_OBJECT(
2347 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2348 JSON_BUILD_PAIR("keyTag", JSON_BUILD_UNSIGNED(rr->ds.key_tag)),
2349 JSON_BUILD_PAIR("algorithm", JSON_BUILD_UNSIGNED(rr->ds.algorithm)),
2350 JSON_BUILD_PAIR("digestType", JSON_BUILD_UNSIGNED(rr->ds.digest_type)),
2351 JSON_BUILD_PAIR("digest", JSON_BUILD_HEX(rr->ds.digest, rr->ds.digest_size))));
2352
2353 case DNS_TYPE_SSHFP:
2354 return json_build(ret,
2355 JSON_BUILD_OBJECT(
2356 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2357 JSON_BUILD_PAIR("algorithm", JSON_BUILD_UNSIGNED(rr->sshfp.algorithm)),
2358 JSON_BUILD_PAIR("fptype", JSON_BUILD_UNSIGNED(rr->sshfp.fptype)),
2359 JSON_BUILD_PAIR("fingerprint", JSON_BUILD_HEX(rr->sshfp.fingerprint, rr->sshfp.fingerprint_size))));
2360
2361 case DNS_TYPE_DNSKEY:
2362 return json_build(ret,
2363 JSON_BUILD_OBJECT(
2364 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2365 JSON_BUILD_PAIR("flags", JSON_BUILD_UNSIGNED(rr->dnskey.flags)),
2366 JSON_BUILD_PAIR("protocol", JSON_BUILD_UNSIGNED(rr->dnskey.protocol)),
2367 JSON_BUILD_PAIR("algorithm", JSON_BUILD_UNSIGNED(rr->dnskey.algorithm)),
2368 JSON_BUILD_PAIR("dnskey", JSON_BUILD_BASE64(rr->dnskey.key, rr->dnskey.key_size))));
2369
2370
2371 case DNS_TYPE_RRSIG:
2372 return json_build(ret,
2373 JSON_BUILD_OBJECT(
2374 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2375 JSON_BUILD_PAIR("signer", JSON_BUILD_STRING(rr->rrsig.signer)),
2376 JSON_BUILD_PAIR("typeCovered", JSON_BUILD_UNSIGNED(rr->rrsig.type_covered)),
2377 JSON_BUILD_PAIR("algorithm", JSON_BUILD_UNSIGNED(rr->rrsig.algorithm)),
2378 JSON_BUILD_PAIR("labels", JSON_BUILD_UNSIGNED(rr->rrsig.labels)),
2379 JSON_BUILD_PAIR("originalTtl", JSON_BUILD_UNSIGNED(rr->rrsig.original_ttl)),
2380 JSON_BUILD_PAIR("expiration", JSON_BUILD_UNSIGNED(rr->rrsig.expiration)),
2381 JSON_BUILD_PAIR("inception", JSON_BUILD_UNSIGNED(rr->rrsig.inception)),
2382 JSON_BUILD_PAIR("keyTag", JSON_BUILD_UNSIGNED(rr->rrsig.key_tag)),
2383 JSON_BUILD_PAIR("signature", JSON_BUILD_BASE64(rr->rrsig.signature, rr->rrsig.signature_size))));
2384
2385 case DNS_TYPE_NSEC: {
2386 _cleanup_(json_variant_unrefp) JsonVariant *bm = NULL;
2387
2388 r = type_bitmap_to_json(rr->nsec.types, &bm);
2389 if (r < 0)
2390 return r;
2391
2392 return json_build(ret,
2393 JSON_BUILD_OBJECT(
2394 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2395 JSON_BUILD_PAIR("nextDomain", JSON_BUILD_STRING(rr->nsec.next_domain_name)),
2396 JSON_BUILD_PAIR("types", JSON_BUILD_VARIANT(bm))));
2397 }
2398
2399 case DNS_TYPE_NSEC3: {
2400 _cleanup_(json_variant_unrefp) JsonVariant *bm = NULL;
2401
2402 r = type_bitmap_to_json(rr->nsec3.types, &bm);
2403 if (r < 0)
2404 return r;
2405
2406 return json_build(ret,
2407 JSON_BUILD_OBJECT(
2408 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2409 JSON_BUILD_PAIR("algorithm", JSON_BUILD_UNSIGNED(rr->nsec3.algorithm)),
2410 JSON_BUILD_PAIR("flags", JSON_BUILD_UNSIGNED(rr->nsec3.flags)),
2411 JSON_BUILD_PAIR("iterations", JSON_BUILD_UNSIGNED(rr->nsec3.iterations)),
2412 JSON_BUILD_PAIR("salt", JSON_BUILD_HEX(rr->nsec3.salt, rr->nsec3.salt_size)),
2413 JSON_BUILD_PAIR("hash", JSON_BUILD_BASE32HEX(rr->nsec3.next_hashed_name, rr->nsec3.next_hashed_name_size)),
2414 JSON_BUILD_PAIR("types", JSON_BUILD_VARIANT(bm))));
2415 }
2416
2417 case DNS_TYPE_TLSA:
2418 return json_build(ret,
2419 JSON_BUILD_OBJECT(
2420 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2421 JSON_BUILD_PAIR("certUsage", JSON_BUILD_UNSIGNED(rr->tlsa.cert_usage)),
2422 JSON_BUILD_PAIR("selector", JSON_BUILD_UNSIGNED(rr->tlsa.selector)),
2423 JSON_BUILD_PAIR("matchingType", JSON_BUILD_UNSIGNED(rr->tlsa.matching_type)),
2424 JSON_BUILD_PAIR("data", JSON_BUILD_HEX(rr->tlsa.data, rr->tlsa.data_size))));
2425
2426 case DNS_TYPE_SVCB:
2427 case DNS_TYPE_HTTPS: {
2428 _cleanup_(json_variant_unrefp) JsonVariant *p = NULL;
2429 r = svc_params_to_json(rr->svcb.params, &p);
2430 if (r < 0)
2431 return r;
2432
2433 return json_build(ret,
2434 JSON_BUILD_OBJECT(
2435 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2436 JSON_BUILD_PAIR("priority", JSON_BUILD_UNSIGNED(rr->svcb.priority)),
2437 JSON_BUILD_PAIR("target", JSON_BUILD_STRING(rr->svcb.target_name)),
2438 JSON_BUILD_PAIR("params", JSON_BUILD_VARIANT(p))));
2439 }
2440
2441 case DNS_TYPE_CAA:
2442 return json_build(ret,
2443 JSON_BUILD_OBJECT(
2444 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2445 JSON_BUILD_PAIR("flags", JSON_BUILD_UNSIGNED(rr->caa.flags)),
2446 JSON_BUILD_PAIR("tag", JSON_BUILD_STRING(rr->caa.tag)),
2447 JSON_BUILD_PAIR("value", JSON_BUILD_OCTESCAPE(rr->caa.value, rr->caa.value_size))));
2448
2449 case DNS_TYPE_NAPTR:
2450 return json_build(ret,
2451 JSON_BUILD_OBJECT(
2452 JSON_BUILD_PAIR("key", JSON_BUILD_VARIANT(k)),
2453 JSON_BUILD_PAIR("order", JSON_BUILD_UNSIGNED(rr->naptr.order)),
2454 JSON_BUILD_PAIR("preference", JSON_BUILD_UNSIGNED(rr->naptr.preference)),
2455 /* NB: we name this flags field here naptrFlags, because there's already another "flags" field (for example in CAA) which has a different type */
2456 JSON_BUILD_PAIR("naptrFlags", JSON_BUILD_STRING(rr->naptr.flags)),
2457 JSON_BUILD_PAIR("services", JSON_BUILD_STRING(rr->naptr.services)),
2458 JSON_BUILD_PAIR("regexp", JSON_BUILD_STRING(rr->naptr.regexp)),
2459 JSON_BUILD_PAIR("replacement", JSON_BUILD_STRING(rr->naptr.replacement))));
2460
2461 default:
2462 /* Can't provide broken-down format */
2463 *ret = NULL;
2464 return 0;
2465 }
2466 }
2467
2468 static const char* const dnssec_algorithm_table[_DNSSEC_ALGORITHM_MAX_DEFINED] = {
2469 /* Mnemonics as listed on https://www.iana.org/assignments/dns-sec-alg-numbers/dns-sec-alg-numbers.xhtml */
2470 [DNSSEC_ALGORITHM_RSAMD5] = "RSAMD5",
2471 [DNSSEC_ALGORITHM_DH] = "DH",
2472 [DNSSEC_ALGORITHM_DSA] = "DSA",
2473 [DNSSEC_ALGORITHM_ECC] = "ECC",
2474 [DNSSEC_ALGORITHM_RSASHA1] = "RSASHA1",
2475 [DNSSEC_ALGORITHM_DSA_NSEC3_SHA1] = "DSA-NSEC3-SHA1",
2476 [DNSSEC_ALGORITHM_RSASHA1_NSEC3_SHA1] = "RSASHA1-NSEC3-SHA1",
2477 [DNSSEC_ALGORITHM_RSASHA256] = "RSASHA256",
2478 [DNSSEC_ALGORITHM_RSASHA512] = "RSASHA512",
2479 [DNSSEC_ALGORITHM_ECC_GOST] = "ECC-GOST",
2480 [DNSSEC_ALGORITHM_ECDSAP256SHA256] = "ECDSAP256SHA256",
2481 [DNSSEC_ALGORITHM_ECDSAP384SHA384] = "ECDSAP384SHA384",
2482 [DNSSEC_ALGORITHM_ED25519] = "ED25519",
2483 [DNSSEC_ALGORITHM_ED448] = "ED448",
2484 [DNSSEC_ALGORITHM_INDIRECT] = "INDIRECT",
2485 [DNSSEC_ALGORITHM_PRIVATEDNS] = "PRIVATEDNS",
2486 [DNSSEC_ALGORITHM_PRIVATEOID] = "PRIVATEOID",
2487 };
2488 DEFINE_STRING_TABLE_LOOKUP_WITH_FALLBACK(dnssec_algorithm, int, 255);
2489
2490 static const char* const dnssec_digest_table[_DNSSEC_DIGEST_MAX_DEFINED] = {
2491 /* Names as listed on https://www.iana.org/assignments/ds-rr-types/ds-rr-types.xhtml */
2492 [DNSSEC_DIGEST_SHA1] = "SHA-1",
2493 [DNSSEC_DIGEST_SHA256] = "SHA-256",
2494 [DNSSEC_DIGEST_GOST_R_34_11_94] = "GOST_R_34.11-94",
2495 [DNSSEC_DIGEST_SHA384] = "SHA-384",
2496 };
2497 DEFINE_STRING_TABLE_LOOKUP_WITH_FALLBACK(dnssec_digest, int, 255);
Unnamed repository; edit this file 'description' to name the repository.