1 files changed, 162 insertions, 0 deletions
diff --git a/src/testvectors.c b/src/testvectors.c
new file mode 100644
index 0000000..3935089
--- /dev/null
+++ b/src/testvectors.c
@@ -0,0 +1,162 @@
+/*
+ *  uAnytun
+ *
+ *  uAnytun is a tiny implementation of SATP. Unlike Anytun which is a full
+ *  featured implementation uAnytun has no support for multiple connections
+ *  or synchronisation. It is a small single threaded implementation intended
+ *  to act as a client on small platforms.
+ *  The secure anycast tunneling protocol (satp) defines a protocol used
+ *  for communication between any combination of unicast and anycast
+ *  tunnel endpoints.  It has less protocol overhead than IPSec in Tunnel
+ *  mode and allows tunneling of every ETHER TYPE protocol (e.g.
+ *  ethernet, ip, arp ...). satp directly includes cryptography and
+ *  message authentication based on the methods used by SRTP.  It is
+ *  intended to deliver a generic, scaleable and secure solution for
+ *  tunneling and relaying of packets of any protocol.
+ *
+ *
+ *  Copyright (C) 2007-2017 Christian Pointner <equinox@anytun.org>
+ *
+ *  This file is part of uAnytun.
+ *
+ *  uAnytun is free software: you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation, either version 3 of the License, or
+ *  any later version.
+ *
+ *  uAnytun is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License
+ *  along with uAnytun. If not, see <http://www.gnu.org/licenses/>.
+ *
+ *  In addition, as a special exception, the copyright holders give
+ *  permission to link the code of portions of this program with the
+ *  OpenSSL library under certain conditions as described in each
+ *  individual source file, and distribute linked combinations
+ *  including the two.
+ *  You must obey the GNU General Public License in all respects
+ *  for all of the code used other than OpenSSL.  If you modify
+ *  file(s) with this exception, you may extend this exception to your
+ *  version of the file(s), but you are not obligated to do so.  If you
+ *  do not wish to do so, delete this exception statement from your
+ *  version.  If you delete this exception statement from all source
+ *  files in the program, then also delete it here.
+ */
+
+#include "datatypes.h"
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+
+#include "log.h"
+
+#include "key_derivation.h"
+#include "init_crypt.h"
+
+int main(int argc, char* argv[])
+{
+  log_init();
+  log_add_target("stdout:5");
+  log_printf(NOTICE, "just started...");
+
+  if(argc < 2) {
+    log_printf(ERROR, "usage: %s <passphrase>", argv[0]);
+    return 1;
+  }
+
+  key_derivation_t kd;
+  int ret = key_derivation_init(&kd, "aes-ctr", ROLE_LEFT, argv[1], NULL, 0, NULL, 0);
+  if(ret) {
+    return ret;
+  }
+  log_printf(NOTICE, "role: left");
+
+      /***********/
+
+  key_derivation_dir_t dir = kd_outbound;
+  satp_prf_label_t label = LABEL_ENC;
+  seq_nr_t seq_nr = 0;
+  log_printf(NOTICE, "dir: outbound");
+  log_printf(NOTICE, "label: enc");
+  log_printf(NOTICE, "seq_nr: 0x%08lX", seq_nr);
+
+  u_int8_t out[32];
+  memset(out, 0, sizeof(out));
+  ret = key_derivation_generate(&kd, dir, label, seq_nr, out, sizeof(out));
+  if(ret) {
+    return ret;
+  }
+  log_print_hex_dump(DEBUG, out, sizeof(out));
+
+      /***********/
+
+  dir = kd_inbound;
+  label = LABEL_ENC;
+  seq_nr = 1231415;
+  log_printf(NOTICE, "dir: inbound");
+  log_printf(NOTICE, "label: enc");
+  log_printf(NOTICE, "seq_nr: 0x%08lX", seq_nr);
+
+  memset(out, 0, sizeof(out));
+  ret = key_derivation_generate(&kd, dir, label, seq_nr, out, sizeof(out));
+  if(ret) {
+    return ret;
+  }
+  log_print_hex_dump(DEBUG, out, sizeof(out));
+
+      /***********/
+
+  dir = kd_inbound;
+  label = LABEL_SALT;
+  seq_nr = 1231415;
+  log_printf(NOTICE, "dir: inbound");
+  log_printf(NOTICE, "label: salt");
+  log_printf(NOTICE, "seq_nr: 0x%08lX", seq_nr);
+
+  memset(out, 0, sizeof(out));
+  ret = key_derivation_generate(&kd, dir, label, seq_nr, out, sizeof(out));
+  if(ret) {
+    return ret;
+  }
+  log_print_hex_dump(DEBUG, out, sizeof(out));
+
+      /***********/
+
+  dir = kd_inbound;
+  label = LABEL_AUTH;
+  seq_nr = 14;
+  log_printf(NOTICE, "dir: inbound");
+  log_printf(NOTICE, "label: auth");
+  log_printf(NOTICE, "seq_nr: 0x%08lX", seq_nr);
+
+  memset(out, 0, sizeof(out));
+  ret = key_derivation_generate(&kd, dir, label, seq_nr, out, sizeof(out));
+  if(ret) {
+    return ret;
+  }
+  log_print_hex_dump(DEBUG, out, sizeof(out));
+
+      /***********/
+
+  dir = kd_outbound;
+  label = LABEL_AUTH;
+  seq_nr = 12;
+  log_printf(NOTICE, "dir: outbound");
+  log_printf(NOTICE, "label: auth");
+  log_printf(NOTICE, "seq_nr: 0x%08lX", seq_nr);
+
+  memset(out, 0, sizeof(out));
+  ret = key_derivation_generate(&kd, dir, label, seq_nr, out, sizeof(out));
+  if(ret) {
+    return ret;
+  }
+  log_print_hex_dump(DEBUG, out, sizeof(out));
+
+      /***********/
+
+  return ret;
+}