4 files changed, 306 insertions, 0 deletions
diff --git a/tests/helpers/c/main.c b/tests/helpers/c/main.c
new file mode 100644
index 0000000..8af53a2
--- /dev/null
+++ b/tests/helpers/c/main.c
@@ -0,0 +1,172 @@
+// SPDX-License-Identifier: GPL-2.0-or-later
+/*
+ */
+
+#include <zebra.h>
+
+#include <lib/version.h>
+#include "getopt.h"
+#include "frrevent.h"
+#include "vty.h"
+#include "command.h"
+#include "memory.h"
+#include "lib_vty.h"
+
+extern void test_init(void);
+
+struct event_loop *master;
+
+struct option longopts[] = {{"daemon", no_argument, NULL, 'd'},
+			    {"config_file", required_argument, NULL, 'f'},
+			    {"help", no_argument, NULL, 'h'},
+			    {"vty_addr", required_argument, NULL, 'A'},
+			    {"vty_port", required_argument, NULL, 'P'},
+			    {"version", no_argument, NULL, 'v'},
+			    {0}};
+
+DEFUN (daemon_exit,
+       daemon_exit_cmd,
+       "daemon-exit",
+       "Make the daemon exit\n")
+{
+	exit(0);
+}
+
+static int timer_count;
+static void test_timer(struct event *thread)
+{
+	int *count = EVENT_ARG(thread);
+
+	printf("run %d of timer\n", (*count)++);
+	event_add_timer(master, test_timer, count, 5, NULL);
+}
+
+static void test_timer_init(void)
+{
+	event_add_timer(master, test_timer, &timer_count, 10, NULL);
+}
+
+static void test_vty_init(void)
+{
+	install_element(VIEW_NODE, &daemon_exit_cmd);
+}
+
+/* Help information display. */
+static void usage(char *progname, int status)
+{
+	if (status != 0)
+		fprintf(stderr, "Try `%s --help' for more information.\n",
+			progname);
+	else {
+		printf("Usage : %s [OPTION...]\n\
+Daemon which does 'slow' things.\n\n\
+-d, --daemon       Runs in daemon mode\n\
+-f, --config_file  Set configuration file name\n\
+-A, --vty_addr     Set vty's bind address\n\
+-P, --vty_port     Set vty's port number\n\
+-v, --version      Print program version\n\
+-h, --help         Display this help and exit\n\
+\n\
+Report bugs to %s\n",
+		       progname, FRR_BUG_ADDRESS);
+	}
+	exit(status);
+}
+
+
+/* main routine. */
+int main(int argc, char **argv)
+{
+	char *p;
+	char *vty_addr = NULL;
+	int vty_port = 4000;
+	int daemon_mode = 0;
+	char *progname;
+	struct event thread;
+	char *config_file = NULL;
+
+	/* Set umask before anything for security */
+	umask(0027);
+
+	/* get program name */
+	progname = ((p = strrchr(argv[0], '/')) ? ++p : argv[0]);
+
+	/* master init. */
+	master = event_master_create(NULL);
+
+	while (1) {
+		int opt;
+
+		opt = getopt_long(argc, argv, "dhf:A:P:v", longopts, 0);
+
+		if (opt == EOF)
+			break;
+
+		switch (opt) {
+		case 0:
+			break;
+		case 'f':
+			config_file = optarg;
+			break;
+		case 'd':
+			daemon_mode = 1;
+			break;
+		case 'A':
+			vty_addr = optarg;
+			break;
+		case 'P':
+			/* Deal with atoi() returning 0 on failure */
+			if (strcmp(optarg, "0") == 0) {
+				vty_port = 0;
+				break;
+			}
+			vty_port = atoi(optarg);
+			vty_port = (vty_port ? vty_port : 4000);
+			break;
+		case 'v':
+			print_version(progname);
+			exit(0);
+			break;
+		case 'h':
+			usage(progname, 0);
+			break;
+		default:
+			usage(progname, 1);
+			break;
+		}
+	}
+
+	/* Library inits. */
+	cmd_init(1);
+	vty_init(master, false);
+	lib_cmd_init();
+	nb_init(master, NULL, 0, false);
+
+	/* OSPF vty inits. */
+	test_vty_init();
+
+	/* Change to the daemon program. */
+	if (daemon_mode && daemon(0, 0) < 0) {
+		fprintf(stderr, "daemon failed: %s", strerror(errno));
+		exit(1);
+	}
+
+	/* Create VTY socket */
+	vty_serv_start(vty_addr, vty_port, "/tmp/.heavy.sock");
+
+	/* Configuration file read*/
+	if (!config_file)
+		usage(progname, 1);
+	vty_read_config(NULL, config_file, NULL);
+
+	test_timer_init();
+
+	test_init();
+
+	/* Fetch next active thread. */
+	while (event_fetch(master, &thread))
+		event_call(&thread);
+
+	/* Not reached. */
+	exit(0);
+}
diff --git a/tests/helpers/c/prng.c b/tests/helpers/c/prng.c
new file mode 100644
index 0000000..612c433
--- /dev/null
+++ b/tests/helpers/c/prng.c
@@ -0,0 +1,95 @@
+// SPDX-License-Identifier: GPL-2.0-or-later
+/*
+ * Very simple prng to allow for randomized tests with reproducable
+ * results.
+ *
+ * Copyright (C) 2012 by Open Source Routing.
+ * Copyright (C) 2012 by Internet Systems Consortium, Inc. ("ISC")
+ * Copyright (C) 2017 Christian Franke
+ *
+ * This file is part of Quagga
+ */
+
+#include <zebra.h>
+
+#include <assert.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "prng.h"
+
+struct prng {
+	uint64_t state;
+};
+
+struct prng *prng_new(unsigned long long seed)
+{
+	struct prng *rv = calloc(sizeof(*rv), 1);
+	assert(rv);
+
+	rv->state = seed;
+
+	return rv;
+}
+
+/*
+ * This implementation has originally been provided to musl libc by
+ * Szabolcs Nagy <nsz at port70 dot net> in 2013 under the terms of
+ * the MIT license.
+ * It is a simple LCG which D.E. Knuth attributes to C.E. Haynes in
+ * TAOCP Vol2 3.3.4
+ */
+int prng_rand(struct prng *prng)
+{
+	prng->state = 6364136223846793005ULL * prng->state + 1;
+	return prng->state >> 33;
+}
+
+const char *prng_fuzz(struct prng *prng, const char *string,
+		      const char *charset, unsigned int operations)
+{
+	static char buf[256];
+	unsigned int charset_len;
+	unsigned int i;
+	unsigned int offset;
+	unsigned int op;
+	unsigned int character;
+
+	assert(strlen(string) < sizeof(buf));
+
+	strncpy(buf, string, sizeof(buf));
+	charset_len = strlen(charset);
+
+	for (i = 0; i < operations; i++) {
+		offset = prng_rand(prng) % strlen(buf);
+		op = prng_rand(prng) % 3;
+
+		switch (op) {
+		case 0:
+			/* replace */
+			character = prng_rand(prng) % charset_len;
+			buf[offset] = charset[character];
+			break;
+		case 1:
+			/* remove */
+			memmove(buf + offset, buf + offset + 1,
+				strlen(buf) - offset);
+			break;
+		case 2:
+			/* insert */
+			assert(strlen(buf) + 1 < sizeof(buf));
+
+			memmove(buf + offset + 1, buf + offset,
+				strlen(buf) + 1 - offset);
+			character = prng_rand(prng) % charset_len;
+			buf[offset] = charset[character];
+			break;
+		}
+	}
+	return buf;
+}
+
+void prng_free(struct prng *prng)
+{
+	free(prng);
+}
diff --git a/tests/helpers/c/prng.h b/tests/helpers/c/prng.h
new file mode 100644
index 0000000..6b10bde
--- /dev/null
+++ b/tests/helpers/c/prng.h
@@ -0,0 +1,22 @@
+// SPDX-License-Identifier: GPL-2.0-or-later
+/*
+ * Very simple prng to allow for randomized tests with reproducable
+ * results.
+ *
+ * Copyright (C) 2012 by Open Source Routing.
+ * Copyright (C) 2012 by Internet Systems Consortium, Inc. ("ISC")
+ *
+ * This file is part of Quagga
+ */
+#ifndef _PRNG_H
+#define _PRNG_H
+
+struct prng;
+
+struct prng *prng_new(unsigned long long seed);
+int prng_rand(struct prng *);
+const char *prng_fuzz(struct prng *, const char *string, const char *charset,
+		      unsigned int operations);
+void prng_free(struct prng *);
+
+#endif
diff --git a/tests/helpers/c/tests.h b/tests/helpers/c/tests.h
new file mode 100644
index 0000000..40f17cc
--- /dev/null
+++ b/tests/helpers/c/tests.h
@@ -0,0 +1,17 @@
+// SPDX-License-Identifier: GPL-2.0-or-later
+/*
+ * Test wrappers common header file
+ *
+ * Copyright (C) 2015 by David Lamparter,
+ *                    for Open Source Routing./ NetDEF, Inc.
+ *
+ * This file is part of Quagga
+ */
+
+#ifndef _QUAGGA_TESTS_H
+#define _QUAGGA_TESTS_H
+
+extern void test_init(void);
+extern void test_init_cmd(void);
+
+#endif /* _QUAGGA_TESTS_H */