OpenDNSSEC-signer  2.1.3
rrset.c
Go to the documentation of this file.
1 /*
2  * Copyright (c) 2009 NLNet Labs. All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  * notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  * notice, this list of conditions and the following disclaimer in the
11  * documentation and/or other materials provided with the distribution.
12  *
13  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
14  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
15  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
17  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
19  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
20  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
21  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
22  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
23  * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24  *
25  */
26 
32 #include "config.h"
33 #include "file.h"
34 #include "hsm.h"
35 #include "log.h"
36 #include "util.h"
37 #include "compat.h"
38 #include "signer/rrset.h"
39 #include "signer/zone.h"
40 
41 static const char* rrset_str = "rrset";
42 
47 void
48 log_rr(ldns_rr* rr, const char* pre, int level)
49 {
50  char* str = NULL;
51  size_t i = 0;
52 
53  if (ods_log_get_level() < level) {
54  return;
55  }
56  str = ldns_rr2str(rr);
57  if (!str) {
58  ods_log_error("[%s] %s: Error converting RR to string", rrset_str,
59  pre?pre:"");
60  return;
61  }
62  str[(strlen(str))-1] = '\0';
63  /* replace tabs with white space */
64  for (i=0; i < strlen(str); i++) {
65  if (str[i] == '\t') {
66  str[i] = ' ';
67  }
68  }
69  if (level == LOG_EMERG) {
70  ods_fatal_exit("[%s] %s: %s", rrset_str, pre?pre:"", str);
71  } else if (level == LOG_ALERT) {
72  ods_log_alert("[%s] %s: %s", rrset_str, pre?pre:"", str);
73  } else if (level == LOG_CRIT) {
74  ods_log_crit("[%s] %s: %s", rrset_str, pre?pre:"", str);
75  } else if (level == LOG_ERR) {
76  ods_log_error("[%s] %s: %s", rrset_str, pre?pre:"", str);
77  } else if (level == LOG_WARNING) {
78  ods_log_warning("[%s] %s: %s", rrset_str, pre?pre:"", str);
79  } else if (level == LOG_NOTICE) {
80  ods_log_info("[%s] %s: %s", rrset_str, pre?pre:"", str);
81  } else if (level == LOG_INFO) {
82  ods_log_verbose("[%s] %s: %s", rrset_str, pre?pre:"", str);
83  } else if (level == LOG_DEBUG) {
84  ods_log_debug("[%s] %s: %s", rrset_str, pre?pre:"", str);
85  } else if (level == LOG_DEEEBUG) {
86  ods_log_deeebug("[%s] %s: %s", rrset_str, pre?pre:"", str);
87  } else {
88  ods_log_deeebug("[%s] %s: %s", rrset_str, pre?pre:"", str);
89  }
90  free((void*)str);
91 }
92 
93 
98 void
99 log_rrset(ldns_rdf* dname, ldns_rr_type type, const char* pre, int level)
100 {
101  char* str = NULL;
102  size_t i = 0;
103 
104  if (ods_log_get_level() < level) {
105  return;
106  }
107  str = ldns_rdf2str(dname);
108  if (!str) {
109  return;
110  }
111  str[(strlen(str))-1] = '\0';
112  /* replace tabs with white space */
113  for (i=0; i < strlen(str); i++) {
114  if (str[i] == '\t') {
115  str[i] = ' ';
116  }
117  }
118  if (level == LOG_EMERG) {
119  ods_fatal_exit("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
120  rrset_type2str(type));
121  } else if (level == LOG_ALERT) {
122  ods_log_alert("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
123  rrset_type2str(type));
124  } else if (level == LOG_CRIT) {
125  ods_log_crit("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
126  rrset_type2str(type));
127  } else if (level == LOG_ERR) {
128  ods_log_error("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
129  rrset_type2str(type));
130  } else if (level == LOG_WARNING) {
131  ods_log_warning("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
132  rrset_type2str(type));
133  } else if (level == LOG_NOTICE) {
134  ods_log_info("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
135  rrset_type2str(type));
136  } else if (level == LOG_INFO) {
137  ods_log_verbose("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
138  rrset_type2str(type));
139  } else if (level == LOG_DEBUG) {
140  ods_log_debug("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
141  rrset_type2str(type));
142  } else if (level == LOG_DEEEBUG) {
143  ods_log_deeebug("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
144  rrset_type2str(type));
145  } else {
146  ods_log_deeebug("[%s] %s: <%s,%s>", rrset_str, pre?pre:"", str,
147  rrset_type2str(type));
148  }
149  free((void*)str);
150 }
151 
152 
157 const char*
158 rrset_type2str(ldns_rr_type type)
159 {
160  if (type == LDNS_RR_TYPE_IXFR) {
161  return "IXFR";
162  } else if (type == LDNS_RR_TYPE_AXFR) {
163  return "AXFR";
164  } else if (type == LDNS_RR_TYPE_MAILB) {
165  return "MAILB";
166  } else if (type == LDNS_RR_TYPE_MAILA) {
167  return "MAILA";
168  } else if (type == LDNS_RR_TYPE_ANY) {
169  return "ANY";
170  } else {
171  const ldns_rr_descriptor* descriptor = ldns_rr_descript(type);
172  if (descriptor && descriptor->_name) {
173  return descriptor->_name;
174  }
175  }
176  return "TYPE???";
177 }
178 
179 static int
180 memberdestroy(void* dummy, void* member)
181 {
182  rrsig_type* sig = (rrsig_type*) member;
183  (void)dummy;
184  free((void*) sig->key_locator);
185  sig->key_locator = NULL;
186  /* The rrs may still be in use by IXFRs so cannot do ldns_rr_free(sig->rr); */
187  ldns_rr_free(sig->rr);
188  sig->owner = NULL;
189  sig->rr = NULL;
190  return 0;
191 }
192 
193 
198 rrset_type*
199 rrset_create(zone_type* zone, ldns_rr_type type)
200 {
201  rrset_type* rrset = NULL;
202  if (!type || !zone) {
203  return NULL;
204  }
205  CHECKALLOC(rrset = (rrset_type*) malloc(sizeof(rrset_type)));
206  if (!rrset) {
207  ods_log_error("[%s] unable to create RRset %u: allocator_alloc() "
208  "failed", rrset_str, (unsigned) type);
209  return NULL;
210  }
211  rrset->next = NULL;
212  rrset->rrs = NULL;
213  rrset->domain = NULL;
214  rrset->zone = zone;
215  rrset->rrtype = type;
216  rrset->rr_count = 0;
217  collection_create_array(&rrset->rrsigs, sizeof(rrsig_type), rrset->zone->rrstore);
218  rrset->needs_signing = 0;
219  return rrset;
220 }
221 
222 collection_class
224 {
225  collection_class klass;
226  collection_class_allocated(&klass, NULL, memberdestroy);
227  return klass;
228 }
229 
230 
235 rr_type*
236 rrset_lookup_rr(rrset_type* rrset, ldns_rr* rr)
237 {
238  ldns_status lstatus = LDNS_STATUS_OK;
239  int cmp = 0;
240  size_t i = 0;
241 
242  if (!rrset || !rr || rrset->rr_count <= 0) {
243  return NULL;
244  }
245  for (i=0; i < rrset->rr_count; i++) {
246  lstatus = util_dnssec_rrs_compare(rrset->rrs[i].rr, rr, &cmp);
247  if (lstatus != LDNS_STATUS_OK) {
248  ods_log_error("[%s] unable to lookup RR: compare failed (%s)",
249  rrset_str, ldns_get_errorstr_by_id(lstatus));
250  return NULL;
251  }
252  if (!cmp) { /* equal */
253  return &rrset->rrs[i];
254  }
255  }
256  return NULL;
257 }
258 
262 uint32_t
263 rrset_lookup_ttl(rrset_type* rrset, uint32_t default_ttl)
264 {
265  for (int i = 0; i < rrset->rr_count; i++) {
266  if (!rrset->rrs[i].is_added) continue;
267  return ldns_rr_ttl(rrset->rrs[i].rr);
268  }
269  return default_ttl;
270 }
271 
272 
277 size_t
279 {
280  size_t i = 0;
281  size_t count = 0;
282  if (!rrset) {
283  return 0;
284  }
285  for (i=0; i < rrset->rr_count; i++) {
286  if (rrset->rrs[i].is_added) {
287  count++;
288  }
289  }
290  return count;
291 }
292 
293 
298 rr_type*
299 rrset_add_rr(rrset_type* rrset, ldns_rr* rr)
300 {
301  rr_type* rrs_old = NULL;
302 
303  ods_log_assert(rrset);
304  ods_log_assert(rr);
305  ods_log_assert(rrset->rrtype == ldns_rr_get_type(rr));
306 
307  rrs_old = rrset->rrs;
308  CHECKALLOC(rrset->rrs = (rr_type*) malloc((rrset->rr_count + 1) * sizeof(rr_type)));
309  if (!rrset->rrs) {
310  ods_fatal_exit("[%s] fatal unable to add RR: allocator_alloc() failed",
311  rrset_str);
312  }
313  if (rrs_old) {
314  memcpy(rrset->rrs, rrs_old, (rrset->rr_count) * sizeof(rr_type));
315  }
316  free(rrs_old);
317  rrset->rr_count++;
318  rrset->rrs[rrset->rr_count - 1].owner = rrset->domain;
319  rrset->rrs[rrset->rr_count - 1].rr = rr;
320  rrset->rrs[rrset->rr_count - 1].exists = 0;
321  rrset->rrs[rrset->rr_count - 1].is_added = 1;
322  rrset->rrs[rrset->rr_count - 1].is_removed = 0;
323  rrset->needs_signing = 1;
324  log_rr(rr, "+RR", LOG_DEEEBUG);
325  return &rrset->rrs[rrset->rr_count -1];
326 }
327 
328 
333 void
334 rrset_del_rr(rrset_type* rrset, uint16_t rrnum)
335 {
336  rr_type* rrs_orig = NULL;
337 
338  ods_log_assert(rrset);
339  ods_log_assert(rrnum < rrset->rr_count);
340 
341  log_rr(rrset->rrs[rrnum].rr, "-RR", LOG_DEEEBUG);
342  rrset->rrs[rrnum].owner = NULL; /* who owns owner? */
343  ldns_rr_free(rrset->rrs[rrnum].rr);
344  while (rrnum < rrset->rr_count-1) {
345  rrset->rrs[rrnum] = rrset->rrs[rrnum+1];
346  rrnum++;
347  }
348  memset(&rrset->rrs[rrset->rr_count-1], 0, sizeof(rr_type));
349  rrs_orig = rrset->rrs;
350  CHECKALLOC(rrset->rrs = (rr_type*) malloc((rrset->rr_count - 1) * sizeof(rr_type)));
351  if(!rrset->rrs) {
352  ods_fatal_exit("[%s] fatal unable to delete RR: allocator_alloc() failed",
353  rrset_str);
354  }
355  memcpy(rrset->rrs, rrs_orig, (rrset->rr_count -1) * sizeof(rr_type));
356  free(rrs_orig);
357  rrset->rr_count--;
358  rrset->needs_signing = 1;
359 }
360 
365 void
366 rrset_diff(rrset_type* rrset, unsigned is_ixfr, unsigned more_coming)
367 {
368  zone_type* zone = NULL;
369  uint16_t i = 0;
370  uint8_t del_sigs = 0;
371  if (!rrset) {
372  return;
373  }
374  zone = (zone_type*) rrset->zone;
375  /* CAUTION: both iterator and condition (implicit) are changed
376  * within the loop. */
377  for (i=0; i < rrset->rr_count; i++) {
378  if (rrset->rrs[i].is_added) {
379  if (!rrset->rrs[i].exists) {
380  /* ixfr +RR */
381  if (zone->db->is_initialized) {
382  pthread_mutex_lock(&zone->ixfr->ixfr_lock);
383  ixfr_add_rr(zone->ixfr, rrset->rrs[i].rr);
384  pthread_mutex_unlock(&zone->ixfr->ixfr_lock);
385  }
386  del_sigs = 1;
387  }
388  rrset->rrs[i].exists = 1;
389  if ((rrset->rrtype == LDNS_RR_TYPE_DNSKEY) && more_coming) {
390  continue;
391  }
392  rrset->rrs[i].is_added = 0;
393  } else if (!is_ixfr || rrset->rrs[i].is_removed) {
394  if (rrset->rrs[i].exists && zone->db->is_initialized) {
395  /* ixfr -RR */
396  pthread_mutex_lock(&zone->ixfr->ixfr_lock);
397  ixfr_del_rr(zone->ixfr, rrset->rrs[i].rr);
398  pthread_mutex_unlock(&zone->ixfr->ixfr_lock);
399  }
400  rrset->rrs[i].exists = 0;
401  rrset_del_rr(rrset, i);
402  del_sigs = 1;
403  i--;
404  }
405  }
406  if (del_sigs) {
407  rrset_drop_rrsigs(zone, rrset);
408  }
409 }
410 
415 void
417 {
418  rrsig_type* rrsig;
419  while((rrsig = collection_iterator(rrset->rrsigs))) {
420  /* ixfr -RRSIG */
421  if (zone->db->is_initialized) {
422  pthread_mutex_lock(&zone->ixfr->ixfr_lock);
423  ixfr_del_rr(zone->ixfr, rrsig->rr);
424  pthread_mutex_unlock(&zone->ixfr->ixfr_lock);
425  }
426  collection_del_cursor(rrset->rrsigs);
427  }
428 }
429 
434 void
435 rrset_add_rrsig(rrset_type* rrset, ldns_rr* rr,
436  const char* locator, uint32_t flags)
437 {
438  rrsig_type rrsig;
439  ods_log_assert(rrset);
440  ods_log_assert(rr);
441  ods_log_assert(ldns_rr_get_type(rr) == LDNS_RR_TYPE_RRSIG);
442  rrsig.owner = rrset->domain;
443  rrsig.rr = rr;
444  rrsig.key_locator = locator;
445  rrsig.key_flags = flags;
446  collection_add(rrset->rrsigs, &rrsig);
447 }
448 
453 static uint32_t
454 rrset_recycle(rrset_type* rrset, time_t signtime, ldns_rr_type dstatus,
455  ldns_rr_type delegpt)
456 {
457  uint32_t refresh = 0;
458  uint32_t expiration = 0;
459  uint32_t inception = 0;
460  uint32_t reusedsigs = 0;
461  unsigned drop_sig = 0;
462  key_type* key = NULL;
463  zone_type* zone = NULL;
464  rrsig_type* rrsig;
465 
466  if (!rrset) {
467  return 0;
468  }
469  zone = (zone_type*) rrset->zone;
470  /* Calculate the Refresh Window = Signing time + Refresh */
471  if (zone->signconf && zone->signconf->sig_refresh_interval) {
472  refresh = (uint32_t) (signtime +
473  duration2time(zone->signconf->sig_refresh_interval));
474  }
475  /* Check every signature if it matches the recycling logic. */
476  while((rrsig = collection_iterator(rrset->rrsigs))) {
477  drop_sig = 0;
478  /* 0. Skip delegation, glue and occluded RRsets */
479  if (dstatus != LDNS_RR_TYPE_SOA || (delegpt != LDNS_RR_TYPE_SOA &&
480  rrset->rrtype != LDNS_RR_TYPE_DS)) {
481  drop_sig = 1;
482  goto recycle_drop_sig;
483  }
484  ods_log_assert(dstatus == LDNS_RR_TYPE_SOA ||
485  (delegpt == LDNS_RR_TYPE_SOA || rrset->rrtype == LDNS_RR_TYPE_DS));
486  /* 1. If the RRset has changed, drop all signatures */
487  /* 2. If Refresh is disabled, drop all signatures */
488  if (rrset->needs_signing || refresh <= (uint32_t) signtime) {
489  drop_sig = 1;
490  goto recycle_drop_sig;
491  }
492  /* 3. Expiration - Refresh has passed */
493  expiration = ldns_rdf2native_int32(
494  ldns_rr_rrsig_expiration(rrsig->rr));
495  if (expiration < refresh) {
496  drop_sig = 1;
497  goto recycle_drop_sig;
498  }
499  /* 4. Inception has not yet passed */
500  inception = ldns_rdf2native_int32(
501  ldns_rr_rrsig_inception(rrsig->rr));
502  if (inception > (uint32_t) signtime) {
503  drop_sig = 1;
504  goto recycle_drop_sig;
505  }
506  /* 5. Corresponding key is dead (key is locator+flags) */
508  rrsig->key_locator);
509  if (!key || key->flags != rrsig->key_flags) {
510  drop_sig = 1;
511  }
512 
513 recycle_drop_sig:
514  if (drop_sig) {
515  /* A rule mismatched, refresh signature */
516  /* ixfr -RRSIG */
517  if (zone->db->is_initialized) {
518  pthread_mutex_lock(&zone->ixfr->ixfr_lock);
519  ixfr_del_rr(zone->ixfr, rrsig->rr);
520  pthread_mutex_unlock(&zone->ixfr->ixfr_lock);
521  }
522  collection_del_cursor(rrset->rrsigs);
523  } else {
524  /* All rules ok, recycle signature */
525  reusedsigs += 1;
526  }
527  }
528  return reusedsigs;
529 }
530 
531 
536 static int
537 rrset_sigalgo(rrset_type* rrset, uint8_t algorithm)
538 {
539  rrsig_type* rrsig;
540  int match = 0;
541  if (rrset) {
542  while((rrsig = collection_iterator(rrset->rrsigs))) {
543  if (algorithm == ldns_rdf2native_int8(ldns_rr_rrsig_algorithm(rrsig->rr))) {
544  match = 1;
545  }
546  }
547  }
548  return match;
549 }
550 
551 
556 static int
557 rrset_sigalgo_count(rrset_type* rrset, uint8_t algorithm)
558 {
559  rrsig_type* rrsig;
560  int match = 0;
561  if (!rrset) return 0;
562  while((rrsig = collection_iterator(rrset->rrsigs))) {
563  if (algorithm == ldns_rdf2native_int8(ldns_rr_rrsig_algorithm(rrsig->rr))) {
564  match++;
565  }
566  }
567  return match;
568 }
569 
574 static int
575 rrset_siglocator(rrset_type* rrset, const char* locator)
576 {
577  rrsig_type* rrsig;
578  int match = 0;
579  if (rrset) {
580  while ((rrsig = collection_iterator(rrset->rrsigs))) {
581  if (!ods_strcmp(locator, rrsig->key_locator)) {
582  match = 1;
583  }
584  }
585  }
586  return match;
587 }
588 
589 
594 static ldns_rr_list*
595 rrset2rrlist(rrset_type* rrset)
596 {
597  ldns_rr_list* rr_list = NULL;
598  int ret = 0;
599  size_t i = 0;
600  rr_list = ldns_rr_list_new();
601  for (i=0; i < rrset->rr_count; i++) {
602  if (!rrset->rrs[i].exists) {
603  log_rr(rrset->rrs[i].rr, "RR does not exist", LOG_WARNING);
604  continue;
605  }
606  ret = (int) ldns_rr_list_push_rr(rr_list, rrset->rrs[i].rr);
607  if (!ret) {
608  ldns_rr_list_free(rr_list);
609  return NULL;
610  }
611  if (rrset->rrtype == LDNS_RR_TYPE_CNAME ||
612  rrset->rrtype == LDNS_RR_TYPE_DNAME) {
613  /* singleton types */
614  return rr_list;
615  }
616  }
617  ldns_rr_list_sort(rr_list);
618  return rr_list;
619 }
620 
621 
626 static void
627 rrset_sigvalid_period(signconf_type* sc, ldns_rr_type rrtype, time_t signtime,
628  time_t* inception, time_t* expiration)
629 {
630  time_t jitter = 0;
631  time_t offset = 0;
632  time_t validity = 0;
633  time_t random_jitter = 0;
634  if (!sc || !rrtype || !signtime) {
635  return;
636  }
637  jitter = duration2time(sc->sig_jitter);
638  if (jitter) {
639  random_jitter = ods_rand(jitter*2);
640  }
641  offset = duration2time(sc->sig_inception_offset);
642  switch (rrtype) {
643  case LDNS_RR_TYPE_NSEC:
644  case LDNS_RR_TYPE_NSEC3:
645  validity = duration2time(sc->sig_validity_denial);
646  break;
647  case LDNS_RR_TYPE_DNSKEY:
648  if (sc->sig_validity_keyset != NULL && duration2time(sc->sig_validity_keyset) > 0) {
649  validity = duration2time(sc->sig_validity_keyset);
650  } else {
651  validity = duration2time(sc->sig_validity_default);
652  }
653  break;
654  default:
655  validity = duration2time(sc->sig_validity_default);
656  }
657  *inception = signtime - offset;
658  *expiration = (signtime + validity + random_jitter) - jitter;
659 }
660 
661 
666 ods_status
667 rrset_sign(hsm_ctx_t* ctx, rrset_type* rrset, time_t signtime)
668 {
669  ods_status status;
670  zone_type* zone = NULL;
671  uint32_t newsigs = 0;
672  uint32_t reusedsigs = 0;
673  ldns_rr* rrsig = NULL;
674  ldns_rr_list* rr_list = NULL;
675  ldns_rr_list* rr_list_clone = NULL;
676  const char* locator = NULL;
677  time_t inception = 0;
678  time_t expiration = 0;
679  size_t i = 0, j;
680  domain_type* domain = NULL;
681  ldns_rr_type dstatus = LDNS_RR_TYPE_FIRST;
682  ldns_rr_type delegpt = LDNS_RR_TYPE_FIRST;
683  uint8_t algorithm = 0;
684  int sigcount, keycount;
685 
686  ods_log_assert(ctx);
687  ods_log_assert(rrset);
688  zone = (zone_type*) rrset->zone;
689  ods_log_assert(zone);
690  ods_log_assert(zone->signconf);
691  /* Recycle signatures */
692  if (rrset->rrtype == LDNS_RR_TYPE_NSEC ||
693  rrset->rrtype == LDNS_RR_TYPE_NSEC3) {
694  dstatus = LDNS_RR_TYPE_SOA;
695  delegpt = LDNS_RR_TYPE_SOA;
696  } else {
697  domain = (domain_type*) rrset->domain;
698  dstatus = domain_is_occluded(domain);
699  delegpt = domain_is_delegpt(domain);
700  }
701  reusedsigs = rrset_recycle(rrset, signtime, dstatus, delegpt);
702  rrset->needs_signing = 0;
703 
704  ods_log_assert(rrset->rrs);
705  ods_log_assert(rrset->rrs[0].rr);
706 
707  /* Skip delegation, glue and occluded RRsets */
708  if (dstatus != LDNS_RR_TYPE_SOA) {
709  log_rrset(ldns_rr_owner(rrset->rrs[0].rr), rrset->rrtype,
710  "skip signing occluded RRset", LOG_DEEEBUG);
711  return ODS_STATUS_OK;
712  }
713  if (delegpt != LDNS_RR_TYPE_SOA && rrset->rrtype != LDNS_RR_TYPE_DS) {
714  log_rrset(ldns_rr_owner(rrset->rrs[0].rr), rrset->rrtype,
715  "skip signing delegation RRset", LOG_DEEEBUG);
716  return ODS_STATUS_OK;
717  }
718 
719  log_rrset(ldns_rr_owner(rrset->rrs[0].rr), rrset->rrtype,
720  "sign RRset", LOG_DEEEBUG);
721  ods_log_assert(dstatus == LDNS_RR_TYPE_SOA ||
722  (delegpt == LDNS_RR_TYPE_SOA || rrset->rrtype == LDNS_RR_TYPE_DS));
723  /* Transmogrify rrset */
724  rr_list = rrset2rrlist(rrset);
725  if (ldns_rr_list_rr_count(rr_list) <= 0) {
726  /* Empty RRset, no signatures needed */
727  ldns_rr_list_free(rr_list);
728  return ODS_STATUS_OK;
729  }
730  /* Use rr_list_clone for signing, keep the original rr_list untouched for case preservation */
731  rr_list_clone = ldns_rr_list_clone(rr_list);
732 
733  /* Further in the code the ORIG_TTL field for the signature will be set
734  * to the TTL of the first RR in the list. We must make sure all RR's
735  * have the same TTL when signing. We do not need to publish these TTLs.
736  * We find the smallest TTL as other software seems to do this.
737  **/
738  uint32_t min_ttl = ldns_rr_ttl(ldns_rr_list_rr(rr_list_clone, 0));
739  for (i = 1; i < ldns_rr_list_rr_count(rr_list_clone); i++) {
740  uint32_t rr_ttl = ldns_rr_ttl(ldns_rr_list_rr(rr_list_clone, i));
741  if (rr_ttl < min_ttl) min_ttl = rr_ttl;
742  }
743  for (i = 0; i < ldns_rr_list_rr_count(rr_list_clone); i++) {
744  ldns_rr_set_ttl(ldns_rr_list_rr(rr_list_clone, i), min_ttl);
745  }
746 
747  /* Calculate signature validity */
748  rrset_sigvalid_period(zone->signconf, rrset->rrtype, signtime,
749  &inception, &expiration);
750  /* Walk keys */
751  for (i=0; i < zone->signconf->keys->count; i++) {
752  /* If not ZSK don't sign other RRsets */
753  if (!zone->signconf->keys->keys[i].zsk &&
754  rrset->rrtype != LDNS_RR_TYPE_DNSKEY) {
755  continue;
756  }
757  /* If not KSK don't sign DNSKEY RRset */
758  if (!zone->signconf->keys->keys[i].ksk &&
759  rrset->rrtype == LDNS_RR_TYPE_DNSKEY) {
760  continue;
761  }
762  /* Additional rules for signatures */
763  if (rrset_siglocator(rrset, zone->signconf->keys->keys[i].locator)) {
764  continue;
765  }
766 
770  keycount = 0;
771  if (algorithm != zone->signconf->keys->keys[i].algorithm) {
772  algorithm = zone->signconf->keys->keys[i].algorithm;
773  for (j = 0; j < zone->signconf->keys->count; j++) {
774  if (zone->signconf->keys->keys[j].algorithm == algorithm &&
775  zone->signconf->keys->keys[j].zsk) /* is active */
776  {
777  keycount++;
778  }
779  }
780  }
781  sigcount = rrset_sigalgo_count(rrset, algorithm);
782  if (rrset->rrtype != LDNS_RR_TYPE_DNSKEY && sigcount >= keycount)
783  continue;
784 
785  /* If key has no locator, and should be pre-signed dnskey RR, skip */
786  if (zone->signconf->keys->keys[i].ksk && zone->signconf->keys->keys[i].locator == NULL) {
787  continue;
788  }
789 
790  /* Sign the RRset with this key */
791  ods_log_deeebug("[%s] signing RRset[%i] with key %s", rrset_str,
792  rrset->rrtype, zone->signconf->keys->keys[i].locator);
793  rrsig = lhsm_sign(ctx, rr_list_clone, &zone->signconf->keys->keys[i],
794  zone->apex, inception, expiration);
795  if (!rrsig) {
796  ods_log_crit("[%s] unable to sign RRset[%i]: lhsm_sign() failed",
797  rrset_str, rrset->rrtype);
798  ldns_rr_list_free(rr_list);
799  ldns_rr_list_free(rr_list_clone);
800  return ODS_STATUS_HSM_ERR;
801  }
802  /* Add signature */
803  locator = strdup(zone->signconf->keys->keys[i].locator);
804  rrset_add_rrsig(rrset, rrsig, locator,
805  zone->signconf->keys->keys[i].flags);
806  newsigs++;
807  /* ixfr +RRSIG */
808  if (zone->db->is_initialized) {
809  pthread_mutex_lock(&zone->ixfr->ixfr_lock);
810  ixfr_add_rr(zone->ixfr, rrsig);
811  pthread_mutex_unlock(&zone->ixfr->ixfr_lock);
812  }
813  }
814  if(rrset->rrtype == LDNS_RR_TYPE_DNSKEY && zone->signconf->dnskey_signature) {
815  for(i=0; zone->signconf->dnskey_signature[i]; i++) {
816  rrsig = NULL;
817  if ((status = rrset_getliteralrr(&rrsig, zone->signconf->dnskey_signature[i], duration2time(zone->signconf->dnskey_ttl), zone->apex)) != ODS_STATUS_OK) {
818  ods_log_error("[%s] unable to publish dnskeys for zone %s: "
819  "error decoding literal dnskey", rrset_str, zone->name);
820  ldns_rr_list_deep_free(rr_list_clone);
821  return status;
822  }
823  /* Add signature */
824  rrset_add_rrsig(rrset, rrsig, NULL, 0);
825  newsigs++;
826  /* ixfr +RRSIG */
827  if (zone->db->is_initialized) {
828  pthread_mutex_lock(&zone->ixfr->ixfr_lock);
829  ixfr_add_rr(zone->ixfr, rrsig);
830  pthread_mutex_unlock(&zone->ixfr->ixfr_lock);
831  }
832  }
833  }
834  /* RRset signing completed */
835  ldns_rr_list_free(rr_list);
836  ldns_rr_list_deep_free(rr_list_clone);
837  pthread_mutex_lock(&zone->stats->stats_lock);
838  if (rrset->rrtype == LDNS_RR_TYPE_SOA) {
839  zone->stats->sig_soa_count += newsigs;
840  }
841  zone->stats->sig_count += newsigs;
842  zone->stats->sig_reuse += reusedsigs;
843  pthread_mutex_unlock(&zone->stats->stats_lock);
844  return ODS_STATUS_OK;
845 }
846 
847 ods_status
848 rrset_getliteralrr(ldns_rr** dnskey, const char *resourcerecord, uint32_t ttl, ldns_rdf* apex)
849 {
850  uint8_t dnskeystring[4096];
851  ldns_status ldnsstatus;
852  int len;
853  if ((len = b64_pton(resourcerecord, dnskeystring, sizeof (dnskeystring) - 2)) < 0) {
854  return ODS_STATUS_PARSE_ERR;
855  }
856  dnskeystring[len] = '\0';
857  if ((ldnsstatus = ldns_rr_new_frm_str(dnskey, (const char*) dnskeystring, ttl, apex, NULL)) != LDNS_STATUS_OK) {
858  return ODS_STATUS_PARSE_ERR;
859  }
860  return ODS_STATUS_OK;
861 }
862 
867 void
868 rrset_print(FILE* fd, rrset_type* rrset, int skip_rrsigs,
869  ods_status* status)
870 {
871  rrsig_type* rrsig;
872  uint16_t i = 0;
873  ods_status result = ODS_STATUS_OK;
874 
875  if (!rrset || !fd) {
876  ods_log_crit("[%s] unable to print RRset: rrset or fd missing",
877  rrset_str);
878  if (status) {
879  *status = ODS_STATUS_ASSERT_ERR;
880  }
881  } else {
882  for (i=0; i < rrset->rr_count; i++) {
883  if (rrset->rrs[i].exists) {
884  result = util_rr_print(fd, rrset->rrs[i].rr);
885  if (rrset->rrtype == LDNS_RR_TYPE_CNAME ||
886  rrset->rrtype == LDNS_RR_TYPE_DNAME) {
887  /* singleton types */
888  break;
889  }
890  if (result != ODS_STATUS_OK) {
891  zone_type* zone = (zone_type*) rrset->zone;
892  log_rrset(ldns_rr_owner(rrset->rrs[i].rr), rrset->rrtype,
893  "error printing RRset", LOG_CRIT);
894  zone->adoutbound->error = 1;
895  break;
896  }
897  }
898  }
899  if (! skip_rrsigs) {
900  result = ODS_STATUS_OK;
901  while((rrsig = collection_iterator(rrset->rrsigs))) {
902  if (result == ODS_STATUS_OK) {
903  result = util_rr_print(fd, rrsig->rr);
904  if (result != ODS_STATUS_OK) {
905  zone_type* zone = rrset->zone;
906  log_rrset(ldns_rr_owner(rrset->rrs[i].rr), rrset->rrtype,
907  "error printing RRset", LOG_CRIT);
908  zone->adoutbound->error = 1;
909  }
910  }
911  }
912  }
913  if (status) {
914  *status = result;
915  }
916  }
917 }
918 
919 
924 void
926 {
927  uint16_t i = 0;
928  if (!rrset) {
929  return;
930  }
931  rrset_cleanup(rrset->next);
932  rrset->next = NULL;
933  rrset->domain = NULL;
934  for (i=0; i < rrset->rr_count; i++) {
935  ldns_rr_free(rrset->rrs[i].rr);
936  rrset->rrs[i].owner = NULL;
937  }
938  collection_destroy(&rrset->rrsigs);
939  free(rrset->rrs);
940  free(rrset);
941 }
942 
947 void
948 rrset_backup2(FILE* fd, rrset_type* rrset)
949 {
950  rrsig_type* rrsig;
951  char* str = NULL;
952  if (!rrset || !fd) {
953  return;
954  }
955  while((rrsig = collection_iterator(rrset->rrsigs))) {
956  if ((str = ldns_rr2str(rrsig->rr))) {
957  fprintf(fd, "%.*s; {locator %s flags %u}\n", (int)strlen(str)-1, str,
958  rrsig->key_locator, rrsig->key_flags);
959  free(str);
960  }
961  }
962 }
rr_type * rrset_lookup_rr(rrset_type *rrset, ldns_rr *rr)
Definition: rrset.c:236
pthread_mutex_t ixfr_lock
Definition: ixfr.h:64
duration_type * sig_inception_offset
Definition: signconf.h:52
int zsk
Definition: keys.h:59
uint32_t rrset_lookup_ttl(rrset_type *rrset, uint32_t default_ttl)
Definition: rrset.c:263
size_t rr_count
Definition: rrset.h:65
void rrset_cleanup(rrset_type *rrset)
Definition: rrset.c:925
key_type * keylist_lookup_by_locator(keylist_type *kl, const char *locator)
Definition: keys.c:73
void rrset_add_rrsig(rrset_type *rrset, ldns_rr *rr, const char *locator, uint32_t flags)
Definition: rrset.c:435
const char * rrset_type2str(ldns_rr_type type)
Definition: rrset.c:158
uint32_t key_flags
Definition: rrset.h:48
ods_status rrset_getliteralrr(ldns_rr **dnskey, const char *resourcerecord, uint32_t ttl, ldns_rdf *apex)
Definition: rrset.c:848
keylist_type * keys
Definition: signconf.h:64
duration_type * sig_validity_default
Definition: signconf.h:48
collection_t rrsigs
Definition: rrset.h:66
ldns_rr * lhsm_sign(hsm_ctx_t *ctx, ldns_rr_list *rrset, key_type *key_id, ldns_rdf *owner, time_t inception, time_t expiration)
Definition: hsm.c:138
size_t rrset_count_rr_is_added(rrset_type *rrset)
Definition: rrset.c:278
void ixfr_add_rr(ixfr_type *ixfr, ldns_rr *rr)
Definition: ixfr.c:107
duration_type * sig_validity_denial
Definition: signconf.h:49
void ixfr_del_rr(ixfr_type *ixfr, ldns_rr *rr)
Definition: ixfr.c:132
unsigned error
Definition: adapter.h:63
collection_class rrset_store_initialize()
Definition: rrset.c:223
void rrset_drop_rrsigs(zone_type *zone, rrset_type *rrset)
Definition: rrset.c:416
rr_type * rrset_add_rr(rrset_type *rrset, ldns_rr *rr)
Definition: rrset.c:299
ldns_rr_type rrtype
Definition: rrset.h:63
rrset_type * next
Definition: rrset.h:60
adapter_type * adoutbound
Definition: zone.h:75
void log_rr(ldns_rr *rr, const char *pre, int level)
Definition: rrset.c:48
unsigned exists
Definition: rrset.h:54
duration_type * sig_refresh_interval
Definition: signconf.h:47
namedb_type * db
Definition: zone.h:79
unsigned is_removed
Definition: rrset.h:56
duration_type * sig_validity_keyset
Definition: signconf.h:50
void log_rrset(ldns_rdf *dname, ldns_rr_type type, const char *pre, int level)
Definition: rrset.c:99
ixfr_type * ixfr
Definition: zone.h:80
const char * locator
Definition: keys.h:53
unsigned needs_signing
Definition: rrset.h:67
unsigned is_initialized
Definition: namedb.h:57
key_type * keys
Definition: keys.h:68
const char ** dnskey_signature
Definition: signconf.h:63
ldns_rr_type domain_is_delegpt(domain_type *domain)
Definition: domain.c:344
ldns_rr * rr
Definition: rrset.h:45
signconf_type * signconf
Definition: zone.h:77
ldns_rr_type domain_is_occluded(domain_type *domain)
Definition: domain.c:369
domain_type * owner
Definition: rrset.h:46
uint32_t sig_reuse
Definition: stats.h:58
const char * key_locator
Definition: rrset.h:47
domain_type * owner
Definition: rrset.h:53
void rrset_backup2(FILE *fd, rrset_type *rrset)
Definition: rrset.c:948
void rrset_del_rr(rrset_type *rrset, uint16_t rrnum)
Definition: rrset.c:334
domain_type * domain
Definition: rrset.h:62
ldns_rr * rr
Definition: rrset.h:52
collection_class rrstore
Definition: zone.h:89
size_t count
Definition: keys.h:69
duration_type * dnskey_ttl
Definition: signconf.h:62
const char * name
Definition: zone.h:69
uint32_t sig_soa_count
Definition: stats.h:57
int ksk
Definition: keys.h:58
uint8_t algorithm
Definition: keys.h:55
duration_type * sig_jitter
Definition: signconf.h:51
ods_status rrset_sign(hsm_ctx_t *ctx, rrset_type *rrset, time_t signtime)
Definition: rrset.c:667
uint32_t sig_count
Definition: stats.h:56
void rrset_diff(rrset_type *rrset, unsigned is_ixfr, unsigned more_coming)
Definition: rrset.c:366
pthread_mutex_t stats_lock
Definition: stats.h:63
rrset_type * rrset_create(zone_type *zone, ldns_rr_type type)
Definition: rrset.c:199
uint32_t flags
Definition: keys.h:56
unsigned is_added
Definition: rrset.h:55
ldns_rdf * apex
Definition: zone.h:61
void rrset_print(FILE *fd, rrset_type *rrset, int skip_rrsigs, ods_status *status)
Definition: rrset.c:868
stats_type * stats
Definition: zone.h:85
rr_type * rrs
Definition: rrset.h:64
zone_type * zone
Definition: rrset.h:61