From e763c3ef1485404585b923365f93314aab4e8dd6 Mon Sep 17 00:00:00 2001
From: Laurent Bercot <ska-skaware@skarnet.org>
Date: Sun, 30 May 2021 09:19:26 +0000
Subject:  Start work on bearssl server-side sni

---
 src/sbearssl/sbearssl_sni_policy_vtable.c | 71 +++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)
 create mode 100644 src/sbearssl/sbearssl_sni_policy_vtable.c

(limited to 'src/sbearssl/sbearssl_sni_policy_vtable.c')

diff --git a/src/sbearssl/sbearssl_sni_policy_vtable.c b/src/sbearssl/sbearssl_sni_policy_vtable.c
new file mode 100644
index 0000000..3b39055
--- /dev/null
+++ b/src/sbearssl/sbearssl_sni_policy_vtable.c
@@ -0,0 +1,71 @@
+/* ISC license. */
+
+#include <bearssl.h>
+
+#include <s6-networking/sbearssl.h>
+
+#define INSTANCE(c) ((sbearssl_x509_small_context *)(c))
+
+static void start_chain (br_x509_class const **c, char const *server_name)
+{
+  sbearssl_x509_small_context *ctx = INSTANCE(c) ;
+  ctx->minimal.vtable->start_chain(&ctx->minimal.vtable, server_name) ;
+
+  ctx->i = 0 ;
+}
+
+static void start_cert (br_x509_class const **c, uint32_t len)
+{
+  sbearssl_x509_small_context *ctx = INSTANCE(c) ;
+  ctx->minimal.vtable->start_cert(&ctx->minimal.vtable, len) ;
+
+  if (!ctx->i) br_sha256_init(&ctx->hashctx) ;
+}
+
+static void append (br_x509_class const **c, unsigned char const *s, size_t len)
+{
+  sbearssl_x509_small_context *ctx = INSTANCE(c) ;
+  ctx->minimal.vtable->append(&ctx->minimal.vtable, s, len) ;
+
+  if (!ctx->i) br_sha256_update(&ctx->hashctx, s, len) ;
+}
+
+static void end_cert (br_x509_class const **c)
+{
+  sbearssl_x509_small_context *ctx = INSTANCE(c) ;
+  ctx->minimal.vtable->end_cert(&ctx->minimal.vtable) ;
+
+  if (!ctx->i) br_sha256_out(&ctx->hashctx, ctx->eehash) ;
+  ctx->i++ ;
+}
+
+static unsigned int end_chain (br_x509_class const **c)
+{
+  sbearssl_x509_small_context *ctx = INSTANCE(c) ;
+  unsigned int r = ctx->minimal.vtable->end_chain(&ctx->minimal.vtable) ;
+  if (!r)
+  {
+    uint8_t mask = 1 ;
+    for (unsigned int i = 0 ; i < 6 ; i++, mask <<= 1)
+      if (ctx->elts[i].status)
+        *ctx->eltstatus |= ctx->elts[i].status < 0 ? 128 : mask ;
+  }
+  return r ;
+}
+
+static br_x509_pkey const *get_pkey(br_x509_class const *const *c, unsigned int *usages)
+{
+  sbearssl_x509_small_context *ctx = INSTANCE(c) ;
+  return ctx->minimal.vtable->get_pkey(&ctx->minimal.vtable, usages) ;
+}
+
+br_x509_class const sbearssl_x509_small_vtable =
+{
+  .context_size = sizeof(sbearssl_x509_small_context),
+  .start_chain = &start_chain,
+  .start_cert = &start_cert,
+  .append = &append,
+  .end_cert = &end_cert,
+  .end_chain = &end_chain,
+  .get_pkey = &get_pkey,
+} ;
-- 
cgit v1.3.1