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