1 files changed, 23 insertions, 0 deletions
diff --git a/src/libs6dns/s6dns_analyze_record_strings.c b/src/libs6dns/s6dns_analyze_record_strings.c
new file mode 100644
index 0000000..c2aa15a
--- /dev/null
+++ b/src/libs6dns/s6dns_analyze_record_strings.c
@@ -0,0 +1,23 @@
+/* ISC license. */
+
+#include <errno.h>
+#include <skalibs/error.h>
+#include <skalibs/stralloc.h>
+#include <skalibs/genwrite.h>
+#include <skalibs/skamisc.h>
+#include <s6-dns/s6dns-message.h>
+#include <s6-dns/s6dns-analyze.h>
+
+int s6dns_analyze_record_strings (genwrite_t *gp, s6dns_message_rr_t const *rr, char const *packet, unsigned int packetlen, unsigned int start)
+{
+  stralloc sa = STRALLOC_ZERO ;
+  char buf[rr->rdlength] ;
+  unsigned int pos = start ;
+  register int r = s6dns_message_get_strings(buf, rr->rdlength, packet, packetlen, &pos) ;
+  if (r < 0) return 0 ;
+  if (rr->rdlength != pos - start) return (errno = EPROTO, 0) ;
+  if (!string_quote(&sa, buf, r)) return 0 ;
+  r = (*gp->put)(gp->target, sa.s, sa.len) >= 0 ;
+  stralloc_free(&sa) ;
+  return r ;
+}