From 416ef5e2bf59bb2e45066a1d5d91ac677c0f48e5 Mon Sep 17 00:00:00 2001
From: Laurent Bercot <ska-skaware@skarnet.org>
Date: Wed, 10 Dec 2014 03:05:47 +0000
Subject: Initial commit

---
 src/libs6dns/s6dns_message_header_pack.c | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 src/libs6dns/s6dns_message_header_pack.c

(limited to 'src/libs6dns/s6dns_message_header_pack.c')

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) ;
+}
-- 
cgit v1.3.1