1 files changed, 12 insertions, 0 deletions
diff --git a/src/libs6dns/s6dns_message_header_pack.c b/src/libs6dns/s6dns_message_header_pack.c
new file mode 100644
index 0000000..99ffa8a
--- /dev/null
+++ b/src/libs6dns/s6dns_message_header_pack.c
@@ -0,0 +1,12 @@
+/* ISC license. */
+
+#include <skalibs/uint16.h>
+#include <s6-dns/s6dns-message.h>
+
+void s6dns_message_header_pack (char *s, s6dns_message_header_t const *h)
+{
+  uint16_pack_big(s, h->id) ;
+  s[2] = (h->qr << 7) | (h->opcode << 3) | (h->aa << 2) | (h->tc << 1) | h->rd ;
+  s[3] = (h->z << 4) | h->rcode ;
+  s6dns_message_counts_pack(s+4, &h->counts) ;
+}