Mercurial > sci
changeset 79:ad55b7035692
make: switch to GNU make
author | David Demelier <markand@malikania.fr> |
---|---|
date | Wed, 01 Feb 2023 11:03:12 +0100 |
parents | 26bbca3765dd |
children | 71cd8447e3a4 |
files | GNUmakefile INSTALL.md Makefile extern/LICENSE.libgreatest.txt extern/VERSION.libgreatest.txt extern/libgreatest/greatest.h tests/test-db.c |
diffstat | 7 files changed, 229 insertions(+), 2034 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/GNUmakefile Wed Feb 01 11:03:12 2023 +0100 @@ -0,0 +1,227 @@ +# +# GNUmakefile -- GNU Makefile for sci +# +# Copyright (c) 2021-2022 David Demelier <markand@malikania.fr> +# +# Permission to use, copy, modify, and/or distribute this software for any +# purpose with or without fee is hereby granted, provided that the above +# copyright notice and this permission notice appear in all copies. +# +# THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES +# WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF +# MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR +# ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES +# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN +# ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF +# OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. +# + +PREFIX := /usr/local +BINDIR := $(PREFIX)/bin +MANDIR := $(PREFIX)/share/man +SHAREDIR := $(PREFIX)/share +VARDIR := $(PREFIX)/var + +WITH_SCID := yes +WITH_SCICTL := yes +WITH_SCIWORKERD := yes +WITH_DEBUG := no + +LIBCURL_INCS := $(shell pkg-config --cflags libcurl) +LIBCURL_LIBS := $(shell pkg-config --libs libcurl) + +JANSSON_INCS= $(shell pkg-config --cflags jansson) +JANSSON_LIBS= $(shell pkg-config --libs jansson) + +ifeq ($(WITH_SCID),yes) + +KCGI_INCS= $(shell pkg-config --cflags kcgi) +KCGI_LIBS= $(shell pkg-config --libs kcgi) + +endif + +-include config.mk + +VERSION := 0.1.0 + +MAN7 := sci.7 +MAN8 := scictl.8 scid.8 sciworkerd.8 + +INCS := -Iextern/libsqlite \ + -Iextern/libutlist \ + -Iextern/libgreatest \ + -Iextern/libmustache4c \ + -Iextern/libduktape \ + -Ilibsci \ + -I. +DEFS := -DVARDIR=\"$(VARDIR)\" \ + -DVERSION=\"$(VERSION)\" \ + -DSHAREDIR=\"$(SHAREDIR)\" \ + -DSQLITE_THREADSAFE=0 \ + -DSQLITE_OMIT_LOAD_EXTENSION=0 \ + -DSQLITE_OMIT_DEPRECATED=0 \ + -DSQLITE_DEFAULT_FOREIGN_KEY=1 +SUBST := -e "s,@VERSION@,$(VERSION),g" + +ifeq ($(WITH_DEBUG),yes) +OPTS := -g -O0 +else +OPTS := -DNDEBUG -O3 +endif + +.SUFFIXES: +.SUFFIXES: .c .o .sql .h + +all: + +%.o: %.c + $(CC) $(INCS) $(DEFS) $(OPTS) $(CFLAGS) -MMD -c $< -o $@ + +%: %.c + $(CC) $(INCS) $(DEFS) $(OPTS) $(CFLAGS) -o $@ $< $(OBJS) $(LIBS) $(LDFLAGS) + +%.h: %.sql + ./extern/bcc/bcc -sc0 $< $< > $@ + +# {{{ libsci + +LIBSCI := libsci/libsci.a +LIBSCI_SRCS := libsci/apic.c \ + libsci/log.c \ + libsci/strlcpy.c \ + libsci/strtonum.c \ + libsci/util.c +LIBSCI_OBJS := $(LIBSCI_SRCS:.c=.o) +LIBSCI_DEPS := $(LIBSCI_SRCS:.c=.d) + +SQL_SRCS := sql/init.sql \ + sql/job-add.sql \ + sql/job-list.sql \ + sql/job-todo.sql \ + sql/jobresult-add.sql \ + sql/jobresult-list-by-job-group.sql \ + sql/jobresult-list-by-job.sql \ + sql/jobresult-list-by-worker.sql \ + sql/project-find.sql \ + sql/project-list.sql \ + sql/project-save.sql \ + sql/property-get.sql \ + sql/property-set.sql \ + sql/worker-find.sql \ + sql/worker-list.sql \ + sql/worker-save.sql +SQL_OBJS := $(SQL_SRCS:.sql=.h) + +-include $(LIBSCI_DEPS) + +$(SQL_OBJS): extern/bcc/bcc + +$(LIBSCI_OBJS): $(SQL_OBJS) + +$(LIBSCI): $(LIBSCI_OBJS) + $(AR) -rc $@ $(LIBSCI_OBJS) + +# }}} + +# {{{ scictl + +SCICTL := scictl/scictl + +ifeq ($(WITH_SCICTL),yes) + +$(SCICTL): $(LIBSCI) +$(SCICTL): private LIBS += $(LIBSCI) $(JANSSON_LIBS) $(LIBCURL_LIBS) + +all: $(SCICTL) + +endif + +# }}} + +# {{{ scid + +SCID := scid/scid +SCID_SRCS := extern/libduktape/duktape.c \ + extern/libmustache4c/mustache.c \ + extern/libsqlite/sqlite3.c \ + scid/crud.c \ + scid/db.c \ + scid/http.c \ + scid/main.c \ + scid/page-api-jobresults.c \ + scid/page-api-jobs.c \ + scid/page-api-projects.c \ + scid/page-api-todo.c \ + scid/page-api-workers.c \ + scid/page-index.c \ + scid/page-jobresults.c \ + scid/page-projects.c \ + scid/page-static.c \ + scid/page-workers.c \ + scid/pageutil.c \ + scid/theme.c +SCID_OBJS := $(SCID_SRCS:.c=.o) +SCID_DEPS := $(SCID_SRCS:.c=.d) + +ifeq ($(WITH_SCID),yes) + +-include $(SCID_DEPS) + +$(SCID): $(SCID_OBJS) $(LIBSCI) +$(SCID): private OBJS += $(SCID_OBJS) +$(SCID): private INCS += $(KCGI_INCS) +$(SCID): private LIBS += $(LIBSCI) $(KCGI_LIBS) $(JANSSON_LIBS) + +all: $(SCID) + +endif + +# }}} + +# {{{ sciworkerd + +SCIWORKERD := sciworkerd/sciworkerd +SCIWORKERD_SRCS := sciworkerd/main.c \ + sciworkerd/task.c +SCIWORKERD_OBJS := $(SCIWORKERD_SRCS:.c=.o) +SCIWORKERD_DEPS := $(SCIWORKERD_SRCS:.c=.d) + +ifeq ($(WITH_SCIWORKERD),yes) + +-include $(SCIWORKERD_DEPS) + +$(SCIWORKERD): $(SCIWORKERD_OBJS) $(LIBSCI) +$(SCIWORKERD): private OBJS += $(SCIWORKERD_OBJS) +$(SCIWORKERD): private LIBS += $(LIBSCI) $(LIBCURL_LIBS) $(JANSSON_LIBS) + +all: $(SCIWORKERD) + +endif + +# }}} + +install: + mkdir -p $(DESTDIR)$(BINDIR) + cp scid/scid sciworkerd/sciworkerd $(DESTDIR)$(BINDIR) + mkdir -p $(DESTDIR)$(MANDIR)/man7 + for m in $(MAN7); do \ + sed $(SUBST) < man/$$m > $(DESTDIR)$(MANDIR)/man7/$$m; \ + done + mkdir -p $(DESTDIR)$(MANDIR)/man8 + for m in $(MAN8); do \ + sed $(SUBST) < man/$$m > $(DESTDIR)$(MANDIR)/man8/$$m; \ + done + mkdir -p $(DESTDIR)$(SHAREDIR)/sci + cp -R themes $(DESTDIR)$(SHAREDIR)/sci + +clean: + rm -f extern/bcc/bcc tags cscope.out $(MAN7) $(MAN8) $(SQL_OBJS) + rm -f $(LIBSCI) $(LIBSCI_OBJS) $(LIBSCI_DEPS) + rm -f $(SCICTL) $(SCICTL_OBJS) $(SCICTL_DEPS) + rm -f $(SCID) $(SCID_OBJS) $(SCID_DEPS) + rm -f $(SCIWORKERD) $(SCIWORKERD_OBJS) $(SCIWORKERD_DEPS) + +doxygen: + sed $(SUBST) < doc/Doxyfile | doxygen - + +.PHONY: all clean doxygen install
--- a/INSTALL.md Tue Jan 31 22:01:36 2023 +0100 +++ b/INSTALL.md Wed Feb 01 11:03:12 2023 +0100 @@ -10,6 +10,7 @@ - [kcgi][], minimal CGI/FastCGI library for C, - [sqlite][], most used database in the world, - [jansson][], JSON library in C. +- [GNU make][]. Basic installation ------------------ @@ -25,3 +26,4 @@ [jansson]: https://github.com/akheron/jansson [kcgi]: https://kristaps.bsd.lv/kcgi [sqlite]: https://www.sqlite.org +[GNU make]: https://www.gnu.org/software/make
--- a/Makefile Tue Jan 31 22:01:36 2023 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,219 +0,0 @@ -# -# Makefile -- POSIX Makefile for sci -# -# Copyright (c) 2021-2022 David Demelier <markand@malikania.fr> -# -# Permission to use, copy, modify, and/or distribute this software for any -# purpose with or without fee is hereby granted, provided that the above -# copyright notice and this permission notice appear in all copies. -# -# THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES -# WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF -# MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR -# ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES -# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN -# ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF -# OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. -# - -.POSIX: - -CC= cc -CFLAGS= -O0 - -PREFIX= /usr/local -BINDIR= ${PREFIX}/bin -MANDIR= ${PREFIX}/share/man -SHAREDIR= ${PREFIX}/share -VARDIR= ${PREFIX}/var - -LIBCURL_INCS= `pkg-config --cflags libcurl` -LIBCURL_LIBS= `pkg-config --libs libcurl` - -JANSSON_INCS= `pkg-config --cflags jansson` -JANSSON_LIBS= `pkg-config --libs jansson` - -KCGI_INCS= `pkg-config --cflags kcgi` -KCGI_LIBS= `pkg-config --libs kcgi` - --include config.mk - -VERSION= 0.1.0 - -LIBSCI= libsci/libsci.a -LIBSCI_SRCS= libsci/apic.c \ - libsci/log.c \ - libsci/strlcpy.c \ - libsci/strtonum.c \ - libsci/util.c -LIBSCI_OBJS= ${LIBSCI_SRCS:.c=.o} -LIBSCI_DEPS= ${LIBSCI_SRCS:.c=.d} - -SQL_SRCS= sql/init.sql \ - sql/job-add.sql \ - sql/job-list.sql \ - sql/job-todo.sql \ - sql/jobresult-add.sql \ - sql/jobresult-list-by-job-group.sql \ - sql/jobresult-list-by-job.sql \ - sql/jobresult-list-by-worker.sql \ - sql/project-find.sql \ - sql/project-list.sql \ - sql/project-save.sql \ - sql/property-get.sql \ - sql/property-set.sql \ - sql/worker-find.sql \ - sql/worker-list.sql \ - sql/worker-save.sql -SQL_OBJS= ${SQL_SRCS:.sql=.h} - -SCICTL= scictl/scictl -SCICTL_SRCS= scictl/scictl.c -SCICTL_OBJS= ${SCICTL_SRCS:.c=.o} -SCICTL_DEPS= ${SCICTL_SRCS:.c=.d} - -SCID= scid/scid -SCID_SRCS= extern/libduktape/duktape.c \ - extern/libmustache4c/mustache.c \ - extern/libsqlite/sqlite3.c \ - scid/crud.c \ - scid/db.c \ - scid/http.c \ - scid/main.c \ - scid/page-api-jobresults.c \ - scid/page-api-jobs.c \ - scid/page-api-projects.c \ - scid/page-api-todo.c \ - scid/page-api-workers.c \ - scid/page-index.c \ - scid/page-jobresults.c \ - scid/page-projects.c \ - scid/page-static.c \ - scid/page-workers.c \ - scid/pageutil.c \ - scid/scid.c \ - scid/theme.c -SCID_OBJS= ${SCID_SRCS:.c=.o} -SCID_DEPS= ${SCID_SRCS:.c=.d} - -SCIWORKERD= sciworkerd/sciworkerd -SCIWORKERD_SRCS= sciworkerd/main.c \ - sciworkerd/sciworkerd.c \ - sciworkerd/task.c -SCIWORKERD_OBJS= ${SCIWORKERD_SRCS:.c=.o} -SCIWORKERD_DEPS= ${SCIWORKERD_SRCS:.c=.d} - -MAN7= sci.7 -MAN8= scictl.8 scid.8 sciworkerd.8 - -TESTS= tests/test-db.c -TESTS_OBJS= ${TESTS:.c=} -TESTS_DEPS= ${TESTS:.c=.d} - -INCS= -Iextern/libsqlite \ - -Iextern/libutlist \ - -Iextern/libgreatest \ - -Iextern/libmustache4c \ - -Iextern/libduktape \ - -Ilibsci \ - -I. -DEFS= -DVARDIR=\"${VARDIR}\" \ - -DVERSION=\"${VERSION}\" \ - -DSHAREDIR=\"${SHAREDIR}\" \ - -DSQLITE_THREADSAFE=0 \ - -DSQLITE_OMIT_LOAD_EXTENSION=0 \ - -DSQLITE_OMIT_DEPRECATED=0 \ - -DSQLITE_DEFAULT_FOREIGN_KEY=1 -SUBST= -e "s,@VERSION@,${VERSION},g" - -.SUFFIXES: -.SUFFIXES: .c .o .sql .h - -all: ${SCICTL} ${SCID} ${SCIWORKERD} - -# for unit tests. -.c: - ${CC} ${INCS} ${DEFS} ${KCGI_INCS} ${JANSSON_INCS} \ - ${CFLAGS} -MMD $< -o $@ lib/libsci.a ${JANSSON_LIBS} - -.c.o: - ${CC} ${INCS} ${DEFS} ${KCGI_INCS} ${JANSSON_INCS} \ - ${CFLAGS} -MMD -c $< -o $@ - -.sql.h: - ./extern/bcc/bcc -sc0 $< $< > $@ - --include ${LIBSCI_DEPS} ${SCICTL_DEPS} ${SCID_DEPS} ${SCIWORKERD_DEPS} ${TESTS_DEPS} - -extern/bcc/bcc: extern/bcc/bcc.c - ${CC} ${CFLAGS} -o $@ $< ${LDFLAGS} - -# {{{ libsci - -${SQL_OBJS}: extern/bcc/bcc - -${LIBSCI_OBJS}: ${SQL_OBJS} - -${LIBSCI}: ${LIBSCI_OBJS} - ${AR} -rc $@ ${LIBSCI_OBJS} - -# }}} - -# {{{ scictl - -${SCICTL_OBJS}: ${SQL_OBJS} - -${SCICTL}: ${LIBSCI} ${SCICTL_OBJS} - ${CC} ${CFLAGS} -o $@ ${SCICTL_OBJS} ${LIBSCI} ${LIBCURL_LIBS} ${JANSSON_LIBS} ${LDFLAGS} - -# }}} - -# {{{ scid - -${SCID_OBJS}: ${SQL_OBJS} - -${SCID}: ${LIBSCI} ${SCID_OBJS} - ${CC} ${CFLAGS} -o $@ ${SCID_OBJS} ${LIBSCI} ${JANSSON_LIBS} ${KCGI_LIBS} -lm ${LDFLAGS} - -# }}} - -# {{{ sciworkerd - -${SCIWORKERD_OBJS}: ${SQL_OBJS} - -${SCIWORKERD}: ${LIBSCI} ${SCIWORKERD_OBJS} - ${CC} ${CFLAGS} -o $@ ${SCIWORKERD_OBJS} ${LIBSCI} ${LIBCURL_LIBS} ${JANSSON_LIBS} ${LDFLAGS} - -# }}} - -install: - mkdir -p ${DESTDIR}${BINDIR} - cp scid/scid sciworkerd/sciworkerd ${DESTDIR}${BINDIR} - mkdir -p ${DESTDIR}${MANDIR}/man7 - for m in ${MAN7}; do \ - sed ${SUBST} < man/$$m > ${DESTDIR}${MANDIR}/man7/$$m; \ - done - mkdir -p ${DESTDIR}${MANDIR}/man8 - for m in ${MAN8}; do \ - sed ${SUBST} < man/$$m > ${DESTDIR}${MANDIR}/man8/$$m; \ - done - mkdir -p ${DESTDIR}${SHAREDIR}/sci - cp -R themes ${DESTDIR}${SHAREDIR}/sci - -clean: - rm -f extern/bcc/bcc tags cscope.out ${MAN7} ${MAN8} ${SQL_OBJS} - rm -f ${LIBSCI} ${LIBSCI_OBJS} ${LIBSCI_DEPS} - rm -f ${SCICTL} ${SCICTL_OBJS} ${SCICTL_DEPS} - rm -f ${SCID} ${SCID_OBJS} ${SCID_DEPS} - rm -f ${SCIWORKERD}${SCIWORKERD_OBJS} ${SCIWORKERD_DEPS} - rm -f ${TESTS_OBJS} ${TESTS_DEPS} - -doxygen: - sed ${SUBST} < doc/Doxyfile | doxygen - - -${TESTS_OBJS}: lib/libsci.a - -tests: lib/libsci.a ${TESTS_OBJS} - for t in ${TESTS_OBJS}; do $$t -v; done - -.PHONY: all clean doxygen install tests
--- a/extern/LICENSE.libgreatest.txt Tue Jan 31 22:01:36 2023 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,13 +0,0 @@ -Copyright (c) 2011-2018 Scott Vokes <vokes.s@gmail.com> - -Permission to use, copy, modify, and/or distribute this software for any -purpose with or without fee is hereby granted, provided that the above -copyright notice and this permission notice appear in all copies. - -THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES -WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF -MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR -ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES -WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN -ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF -OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
--- a/extern/VERSION.libgreatest.txt Tue Jan 31 22:01:36 2023 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,1 +0,0 @@ -1.4.2
--- a/extern/libgreatest/greatest.h Tue Jan 31 22:01:36 2023 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,1225 +0,0 @@ -/* - * Copyright (c) 2011-2019 Scott Vokes <vokes.s@gmail.com> - * - * Permission to use, copy, modify, and/or distribute this software for any - * purpose with or without fee is hereby granted, provided that the above - * copyright notice and this permission notice appear in all copies. - * - * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES - * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF - * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR - * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES - * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN - * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF - * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. - */ - -#ifndef GREATEST_H -#define GREATEST_H - -#if defined(__cplusplus) && !defined(GREATEST_NO_EXTERN_CPLUSPLUS) -extern "C" { -#endif - -/* 1.4.2 */ -#define GREATEST_VERSION_MAJOR 1 -#define GREATEST_VERSION_MINOR 4 -#define GREATEST_VERSION_PATCH 2 - -/* A unit testing system for C, contained in 1 file. - * It doesn't use dynamic allocation or depend on anything - * beyond ANSI C89. - * - * An up-to-date version can be found at: - * https://github.com/silentbicycle/greatest/ - */ - - -/********************************************************************* - * Minimal test runner template - *********************************************************************/ -#if 0 - -#include "greatest.h" - -TEST foo_should_foo(void) { - PASS(); -} - -static void setup_cb(void *data) { - printf("setup callback for each test case\n"); -} - -static void teardown_cb(void *data) { - printf("teardown callback for each test case\n"); -} - -SUITE(suite) { - /* Optional setup/teardown callbacks which will be run before/after - * every test case. If using a test suite, they will be cleared when - * the suite finishes. */ - SET_SETUP(setup_cb, voidp_to_callback_data); - SET_TEARDOWN(teardown_cb, voidp_to_callback_data); - - RUN_TEST(foo_should_foo); -} - -/* Add definitions that need to be in the test runner's main file. */ -GREATEST_MAIN_DEFS(); - -/* Set up, run suite(s) of tests, report pass/fail/skip stats. */ -int run_tests(void) { - GREATEST_INIT(); /* init. greatest internals */ - /* List of suites to run (if any). */ - RUN_SUITE(suite); - - /* Tests can also be run directly, without using test suites. */ - RUN_TEST(foo_should_foo); - - GREATEST_PRINT_REPORT(); /* display results */ - return greatest_all_passed(); -} - -/* main(), for a standalone command-line test runner. - * This replaces run_tests above, and adds command line option - * handling and exiting with a pass/fail status. */ -int main(int argc, char **argv) { - GREATEST_MAIN_BEGIN(); /* init & parse command-line args */ - RUN_SUITE(suite); - GREATEST_MAIN_END(); /* display results */ -} - -#endif -/*********************************************************************/ - - -#include <stdlib.h> -#include <stdio.h> -#include <string.h> -#include <ctype.h> - -/*********** - * Options * - ***********/ - -/* Default column width for non-verbose output. */ -#ifndef GREATEST_DEFAULT_WIDTH -#define GREATEST_DEFAULT_WIDTH 72 -#endif - -/* FILE *, for test logging. */ -#ifndef GREATEST_STDOUT -#define GREATEST_STDOUT stdout -#endif - -/* Remove GREATEST_ prefix from most commonly used symbols? */ -#ifndef GREATEST_USE_ABBREVS -#define GREATEST_USE_ABBREVS 1 -#endif - -/* Set to 0 to disable all use of setjmp/longjmp. */ -#ifndef GREATEST_USE_LONGJMP -#define GREATEST_USE_LONGJMP 1 -#endif - -/* Make it possible to replace fprintf with another - * function with the same interface. */ -#ifndef GREATEST_FPRINTF -#define GREATEST_FPRINTF fprintf -#endif - -#if GREATEST_USE_LONGJMP -#include <setjmp.h> -#endif - -/* Set to 0 to disable all use of time.h / clock(). */ -#ifndef GREATEST_USE_TIME -#define GREATEST_USE_TIME 1 -#endif - -#if GREATEST_USE_TIME -#include <time.h> -#endif - -/* Floating point type, for ASSERT_IN_RANGE. */ -#ifndef GREATEST_FLOAT -#define GREATEST_FLOAT double -#define GREATEST_FLOAT_FMT "%g" -#endif - -/* Size of buffer for test name + optional '_' separator and suffix */ -#ifndef GREATEST_TESTNAME_BUF_SIZE -#define GREATEST_TESTNAME_BUF_SIZE 128 -#endif - - -/********* - * Types * - *********/ - -/* Info for the current running suite. */ -typedef struct greatest_suite_info { - unsigned int tests_run; - unsigned int passed; - unsigned int failed; - unsigned int skipped; - -#if GREATEST_USE_TIME - /* timers, pre/post running suite and individual tests */ - clock_t pre_suite; - clock_t post_suite; - clock_t pre_test; - clock_t post_test; -#endif -} greatest_suite_info; - -/* Type for a suite function. */ -typedef void greatest_suite_cb(void); - -/* Types for setup/teardown callbacks. If non-NULL, these will be run - * and passed the pointer to their additional data. */ -typedef void greatest_setup_cb(void *udata); -typedef void greatest_teardown_cb(void *udata); - -/* Type for an equality comparison between two pointers of the same type. - * Should return non-0 if equal, otherwise 0. - * UDATA is a closure value, passed through from ASSERT_EQUAL_T[m]. */ -typedef int greatest_equal_cb(const void *expd, const void *got, void *udata); - -/* Type for a callback that prints a value pointed to by T. - * Return value has the same meaning as printf's. - * UDATA is a closure value, passed through from ASSERT_EQUAL_T[m]. */ -typedef int greatest_printf_cb(const void *t, void *udata); - -/* Callbacks for an arbitrary type; needed for type-specific - * comparisons via GREATEST_ASSERT_EQUAL_T[m].*/ -typedef struct greatest_type_info { - greatest_equal_cb *equal; - greatest_printf_cb *print; -} greatest_type_info; - -typedef struct greatest_memory_cmp_env { - const unsigned char *exp; - const unsigned char *got; - size_t size; -} greatest_memory_cmp_env; - -/* Callbacks for string and raw memory types. */ -extern greatest_type_info greatest_type_info_string; -extern greatest_type_info greatest_type_info_memory; - -typedef enum { - GREATEST_FLAG_FIRST_FAIL = 0x01, - GREATEST_FLAG_LIST_ONLY = 0x02, - GREATEST_FLAG_ABORT_ON_FAIL = 0x04 -} greatest_flag_t; - -/* Internal state for a PRNG, used to shuffle test order. */ -struct greatest_prng { - unsigned char random_order; /* use random ordering? */ - unsigned char initialized; /* is random ordering initialized? */ - unsigned char pad_0[6]; - unsigned long state; /* PRNG state */ - unsigned long count; /* how many tests, this pass */ - unsigned long count_ceil; /* total number of tests */ - unsigned long count_run; /* total tests run */ - unsigned long a; /* LCG multiplier */ - unsigned long c; /* LCG increment */ - unsigned long m; /* LCG modulus, based on count_ceil */ -}; - -/* Struct containing all test runner state. */ -typedef struct greatest_run_info { - unsigned char flags; - unsigned char verbosity; - unsigned char pad_0[2]; - - unsigned int tests_run; /* total test count */ - - /* currently running test suite */ - greatest_suite_info suite; - - /* overall pass/fail/skip counts */ - unsigned int passed; - unsigned int failed; - unsigned int skipped; - unsigned int assertions; - - /* info to print about the most recent failure */ - unsigned int fail_line; - unsigned int pad_1; - const char *fail_file; - const char *msg; - - /* current setup/teardown hooks and userdata */ - greatest_setup_cb *setup; - void *setup_udata; - greatest_teardown_cb *teardown; - void *teardown_udata; - - /* formatting info for ".....s...F"-style output */ - unsigned int col; - unsigned int width; - - /* only run a specific suite or test */ - const char *suite_filter; - const char *test_filter; - const char *test_exclude; - const char *name_suffix; /* print suffix with test name */ - char name_buf[GREATEST_TESTNAME_BUF_SIZE]; - - struct greatest_prng prng[2]; /* 0: suites, 1: tests */ - -#if GREATEST_USE_TIME - /* overall timers */ - clock_t begin; - clock_t end; -#endif - -#if GREATEST_USE_LONGJMP - int pad_jmp_buf; - unsigned char pad_2[4]; - jmp_buf jump_dest; -#endif -} greatest_run_info; - -struct greatest_report_t { - /* overall pass/fail/skip counts */ - unsigned int passed; - unsigned int failed; - unsigned int skipped; - unsigned int assertions; -}; - -/* Global var for the current testing context. - * Initialized by GREATEST_MAIN_DEFS(). */ -extern greatest_run_info greatest_info; - -/* Type for ASSERT_ENUM_EQ's ENUM_STR argument. */ -typedef const char *greatest_enum_str_fun(int value); - - -/********************** - * Exported functions * - **********************/ - -/* These are used internally by greatest macros. */ -int greatest_test_pre(const char *name); -void greatest_test_post(int res); -int greatest_do_assert_equal_t(const void *expd, const void *got, - greatest_type_info *type_info, void *udata); -void greatest_prng_init_first_pass(int id); -int greatest_prng_init_second_pass(int id, unsigned long seed); -void greatest_prng_step(int id); - -/* These are part of the public greatest API. */ -void GREATEST_SET_SETUP_CB(greatest_setup_cb *cb, void *udata); -void GREATEST_SET_TEARDOWN_CB(greatest_teardown_cb *cb, void *udata); -void GREATEST_INIT(void); -void GREATEST_PRINT_REPORT(void); -int greatest_all_passed(void); -void greatest_set_suite_filter(const char *filter); -void greatest_set_test_filter(const char *filter); -void greatest_set_test_exclude(const char *filter); -void greatest_stop_at_first_fail(void); -void greatest_abort_on_fail(void); -void greatest_list_only(void); -void greatest_get_report(struct greatest_report_t *report); -unsigned int greatest_get_verbosity(void); -void greatest_set_verbosity(unsigned int verbosity); -void greatest_set_flag(greatest_flag_t flag); -void greatest_set_test_suffix(const char *suffix); - - -/******************** -* Language Support * -********************/ - -/* If __VA_ARGS__ (C99) is supported, allow parametric testing -* without needing to manually manage the argument struct. */ -#if (defined(__STDC_VERSION__) && __STDC_VERSION__ >= 19901L) || \ - (defined(_MSC_VER) && _MSC_VER >= 1800) -#define GREATEST_VA_ARGS -#endif - - -/********** - * Macros * - **********/ - -/* Define a suite. (The duplication is intentional -- it eliminates - * a warning from -Wmissing-declarations.) */ -#define GREATEST_SUITE(NAME) void NAME(void); void NAME(void) - -/* Declare a suite, provided by another compilation unit. */ -#define GREATEST_SUITE_EXTERN(NAME) void NAME(void) - -/* Start defining a test function. - * The arguments are not included, to allow parametric testing. */ -#define GREATEST_TEST static enum greatest_test_res - -/* PASS/FAIL/SKIP result from a test. Used internally. */ -typedef enum greatest_test_res { - GREATEST_TEST_RES_PASS = 0, - GREATEST_TEST_RES_FAIL = -1, - GREATEST_TEST_RES_SKIP = 1 -} greatest_test_res; - -/* Run a suite. */ -#define GREATEST_RUN_SUITE(S_NAME) greatest_run_suite(S_NAME, #S_NAME) - -/* Run a test in the current suite. */ -#define GREATEST_RUN_TEST(TEST) \ - do { \ - if (greatest_test_pre(#TEST) == 1) { \ - enum greatest_test_res res = GREATEST_SAVE_CONTEXT(); \ - if (res == GREATEST_TEST_RES_PASS) { \ - res = TEST(); \ - } \ - greatest_test_post(res); \ - } \ - } while (0) - -/* Ignore a test, don't warn about it being unused. */ -#define GREATEST_IGNORE_TEST(TEST) (void)TEST - -/* Run a test in the current suite with one void * argument, - * which can be a pointer to a struct with multiple arguments. */ -#define GREATEST_RUN_TEST1(TEST, ENV) \ - do { \ - if (greatest_test_pre(#TEST) == 1) { \ - enum greatest_test_res res = GREATEST_SAVE_CONTEXT(); \ - if (res == GREATEST_TEST_RES_PASS) { \ - res = TEST(ENV); \ - } \ - greatest_test_post(res); \ - } \ - } while (0) - -#ifdef GREATEST_VA_ARGS -#define GREATEST_RUN_TESTp(TEST, ...) \ - do { \ - if (greatest_test_pre(#TEST) == 1) { \ - enum greatest_test_res res = GREATEST_SAVE_CONTEXT(); \ - if (res == GREATEST_TEST_RES_PASS) { \ - res = TEST(__VA_ARGS__); \ - } \ - greatest_test_post(res); \ - } \ - } while (0) -#endif - - -/* Check if the test runner is in verbose mode. */ -#define GREATEST_IS_VERBOSE() ((greatest_info.verbosity) > 0) -#define GREATEST_LIST_ONLY() \ - (greatest_info.flags & GREATEST_FLAG_LIST_ONLY) -#define GREATEST_FIRST_FAIL() \ - (greatest_info.flags & GREATEST_FLAG_FIRST_FAIL) -#define GREATEST_ABORT_ON_FAIL() \ - (greatest_info.flags & GREATEST_FLAG_ABORT_ON_FAIL) -#define GREATEST_FAILURE_ABORT() \ - (GREATEST_FIRST_FAIL() && \ - (greatest_info.suite.failed > 0 || greatest_info.failed > 0)) - -/* Message-less forms of tests defined below. */ -#define GREATEST_PASS() GREATEST_PASSm(NULL) -#define GREATEST_FAIL() GREATEST_FAILm(NULL) -#define GREATEST_SKIP() GREATEST_SKIPm(NULL) -#define GREATEST_ASSERT(COND) \ - GREATEST_ASSERTm(#COND, COND) -#define GREATEST_ASSERT_OR_LONGJMP(COND) \ - GREATEST_ASSERT_OR_LONGJMPm(#COND, COND) -#define GREATEST_ASSERT_FALSE(COND) \ - GREATEST_ASSERT_FALSEm(#COND, COND) -#define GREATEST_ASSERT_EQ(EXP, GOT) \ - GREATEST_ASSERT_EQm(#EXP " != " #GOT, EXP, GOT) -#define GREATEST_ASSERT_EQ_FMT(EXP, GOT, FMT) \ - GREATEST_ASSERT_EQ_FMTm(#EXP " != " #GOT, EXP, GOT, FMT) -#define GREATEST_ASSERT_IN_RANGE(EXP, GOT, TOL) \ - GREATEST_ASSERT_IN_RANGEm(#EXP " != " #GOT " +/- " #TOL, EXP, GOT, TOL) -#define GREATEST_ASSERT_EQUAL_T(EXP, GOT, TYPE_INFO, UDATA) \ - GREATEST_ASSERT_EQUAL_Tm(#EXP " != " #GOT, EXP, GOT, TYPE_INFO, UDATA) -#define GREATEST_ASSERT_STR_EQ(EXP, GOT) \ - GREATEST_ASSERT_STR_EQm(#EXP " != " #GOT, EXP, GOT) -#define GREATEST_ASSERT_STRN_EQ(EXP, GOT, SIZE) \ - GREATEST_ASSERT_STRN_EQm(#EXP " != " #GOT, EXP, GOT, SIZE) -#define GREATEST_ASSERT_MEM_EQ(EXP, GOT, SIZE) \ - GREATEST_ASSERT_MEM_EQm(#EXP " != " #GOT, EXP, GOT, SIZE) -#define GREATEST_ASSERT_ENUM_EQ(EXP, GOT, ENUM_STR) \ - GREATEST_ASSERT_ENUM_EQm(#EXP " != " #GOT, EXP, GOT, ENUM_STR) - -/* The following forms take an additional message argument first, - * to be displayed by the test runner. */ - -/* Fail if a condition is not true, with message. */ -#define GREATEST_ASSERTm(MSG, COND) \ - do { \ - greatest_info.assertions++; \ - if (!(COND)) { GREATEST_FAILm(MSG); } \ - } while (0) - -/* Fail if a condition is not true, longjmping out of test. */ -#define GREATEST_ASSERT_OR_LONGJMPm(MSG, COND) \ - do { \ - greatest_info.assertions++; \ - if (!(COND)) { GREATEST_FAIL_WITH_LONGJMPm(MSG); } \ - } while (0) - -/* Fail if a condition is not false, with message. */ -#define GREATEST_ASSERT_FALSEm(MSG, COND) \ - do { \ - greatest_info.assertions++; \ - if ((COND)) { GREATEST_FAILm(MSG); } \ - } while (0) - -/* Fail if EXP != GOT (equality comparison by ==). */ -#define GREATEST_ASSERT_EQm(MSG, EXP, GOT) \ - do { \ - greatest_info.assertions++; \ - if ((EXP) != (GOT)) { GREATEST_FAILm(MSG); } \ - } while (0) - -/* Fail if EXP != GOT (equality comparison by ==). - * Warning: FMT, EXP, and GOT will be evaluated more - * than once on failure. */ -#define GREATEST_ASSERT_EQ_FMTm(MSG, EXP, GOT, FMT) \ - do { \ - greatest_info.assertions++; \ - if ((EXP) != (GOT)) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\nExpected: "); \ - GREATEST_FPRINTF(GREATEST_STDOUT, FMT, EXP); \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n Got: "); \ - GREATEST_FPRINTF(GREATEST_STDOUT, FMT, GOT); \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n"); \ - GREATEST_FAILm(MSG); \ - } \ - } while (0) - -/* Fail if EXP is not equal to GOT, printing enum IDs. */ -#define GREATEST_ASSERT_ENUM_EQm(MSG, EXP, GOT, ENUM_STR) \ - do { \ - int greatest_EXP = (int)(EXP); \ - int greatest_GOT = (int)(GOT); \ - greatest_enum_str_fun *greatest_ENUM_STR = ENUM_STR; \ - if (greatest_EXP != greatest_GOT) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\nExpected: %s", \ - greatest_ENUM_STR(greatest_EXP)); \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n Got: %s\n", \ - greatest_ENUM_STR(greatest_GOT)); \ - GREATEST_FAILm(MSG); \ - } \ - } while (0) \ - -/* Fail if GOT not in range of EXP +|- TOL. */ -#define GREATEST_ASSERT_IN_RANGEm(MSG, EXP, GOT, TOL) \ - do { \ - GREATEST_FLOAT greatest_EXP = (EXP); \ - GREATEST_FLOAT greatest_GOT = (GOT); \ - GREATEST_FLOAT greatest_TOL = (TOL); \ - greatest_info.assertions++; \ - if ((greatest_EXP > greatest_GOT && \ - greatest_EXP - greatest_GOT > greatest_TOL) || \ - (greatest_EXP < greatest_GOT && \ - greatest_GOT - greatest_EXP > greatest_TOL)) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, \ - "\nExpected: " GREATEST_FLOAT_FMT \ - " +/- " GREATEST_FLOAT_FMT \ - "\n Got: " GREATEST_FLOAT_FMT \ - "\n", \ - greatest_EXP, greatest_TOL, greatest_GOT); \ - GREATEST_FAILm(MSG); \ - } \ - } while (0) - -/* Fail if EXP is not equal to GOT, according to strcmp. */ -#define GREATEST_ASSERT_STR_EQm(MSG, EXP, GOT) \ - do { \ - GREATEST_ASSERT_EQUAL_Tm(MSG, EXP, GOT, \ - &greatest_type_info_string, NULL); \ - } while (0) \ - -/* Fail if EXP is not equal to GOT, according to strncmp. */ -#define GREATEST_ASSERT_STRN_EQm(MSG, EXP, GOT, SIZE) \ - do { \ - size_t size = SIZE; \ - GREATEST_ASSERT_EQUAL_Tm(MSG, EXP, GOT, \ - &greatest_type_info_string, &size); \ - } while (0) \ - -/* Fail if EXP is not equal to GOT, according to memcmp. */ -#define GREATEST_ASSERT_MEM_EQm(MSG, EXP, GOT, SIZE) \ - do { \ - greatest_memory_cmp_env env; \ - env.exp = (const unsigned char *)EXP; \ - env.got = (const unsigned char *)GOT; \ - env.size = SIZE; \ - GREATEST_ASSERT_EQUAL_Tm(MSG, env.exp, env.got, \ - &greatest_type_info_memory, &env); \ - } while (0) \ - -/* Fail if EXP is not equal to GOT, according to a comparison - * callback in TYPE_INFO. If they are not equal, optionally use a - * print callback in TYPE_INFO to print them. */ -#define GREATEST_ASSERT_EQUAL_Tm(MSG, EXP, GOT, TYPE_INFO, UDATA) \ - do { \ - greatest_type_info *type_info = (TYPE_INFO); \ - greatest_info.assertions++; \ - if (!greatest_do_assert_equal_t(EXP, GOT, \ - type_info, UDATA)) { \ - if (type_info == NULL || type_info->equal == NULL) { \ - GREATEST_FAILm("type_info->equal callback missing!"); \ - } else { \ - GREATEST_FAILm(MSG); \ - } \ - } \ - } while (0) \ - -/* Pass. */ -#define GREATEST_PASSm(MSG) \ - do { \ - greatest_info.msg = MSG; \ - return GREATEST_TEST_RES_PASS; \ - } while (0) - -/* Fail. */ -#define GREATEST_FAILm(MSG) \ - do { \ - greatest_info.fail_file = __FILE__; \ - greatest_info.fail_line = __LINE__; \ - greatest_info.msg = MSG; \ - if (GREATEST_ABORT_ON_FAIL()) { abort(); } \ - return GREATEST_TEST_RES_FAIL; \ - } while (0) - -/* Optional GREATEST_FAILm variant that longjmps. */ -#if GREATEST_USE_LONGJMP -#define GREATEST_FAIL_WITH_LONGJMP() GREATEST_FAIL_WITH_LONGJMPm(NULL) -#define GREATEST_FAIL_WITH_LONGJMPm(MSG) \ - do { \ - greatest_info.fail_file = __FILE__; \ - greatest_info.fail_line = __LINE__; \ - greatest_info.msg = MSG; \ - longjmp(greatest_info.jump_dest, GREATEST_TEST_RES_FAIL); \ - } while (0) -#endif - -/* Skip the current test. */ -#define GREATEST_SKIPm(MSG) \ - do { \ - greatest_info.msg = MSG; \ - return GREATEST_TEST_RES_SKIP; \ - } while (0) - -/* Check the result of a subfunction using ASSERT, etc. */ -#define GREATEST_CHECK_CALL(RES) \ - do { \ - enum greatest_test_res greatest_RES = RES; \ - if (greatest_RES != GREATEST_TEST_RES_PASS) { \ - return greatest_RES; \ - } \ - } while (0) \ - -#if GREATEST_USE_TIME -#define GREATEST_SET_TIME(NAME) \ - NAME = clock(); \ - if (NAME == (clock_t) -1) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, \ - "clock error: %s\n", #NAME); \ - exit(EXIT_FAILURE); \ - } - -#define GREATEST_CLOCK_DIFF(C1, C2) \ - GREATEST_FPRINTF(GREATEST_STDOUT, " (%lu ticks, %.3f sec)", \ - (long unsigned int) (C2) - (long unsigned int)(C1), \ - (double)((C2) - (C1)) / (1.0 * (double)CLOCKS_PER_SEC)) -#else -#define GREATEST_SET_TIME(UNUSED) -#define GREATEST_CLOCK_DIFF(UNUSED1, UNUSED2) -#endif - -#if GREATEST_USE_LONGJMP -#define GREATEST_SAVE_CONTEXT() \ - /* setjmp returns 0 (GREATEST_TEST_RES_PASS) on first call * \ - * so the test runs, then RES_FAIL from FAIL_WITH_LONGJMP. */ \ - ((enum greatest_test_res)(setjmp(greatest_info.jump_dest))) -#else -#define GREATEST_SAVE_CONTEXT() \ - /*a no-op, since setjmp/longjmp aren't being used */ \ - GREATEST_TEST_RES_PASS -#endif - -/* Run every suite / test function run within BODY in pseudo-random - * order, seeded by SEED. (The top 3 bits of the seed are ignored.) - * - * This should be called like: - * GREATEST_SHUFFLE_TESTS(seed, { - * GREATEST_RUN_TEST(some_test); - * GREATEST_RUN_TEST(some_other_test); - * GREATEST_RUN_TEST(yet_another_test); - * }); - * - * Note that the body of the second argument will be evaluated - * multiple times. */ -#define GREATEST_SHUFFLE_SUITES(SD, BODY) GREATEST_SHUFFLE(0, SD, BODY) -#define GREATEST_SHUFFLE_TESTS(SD, BODY) GREATEST_SHUFFLE(1, SD, BODY) -#define GREATEST_SHUFFLE(ID, SD, BODY) \ - do { \ - struct greatest_prng *prng = &greatest_info.prng[ID]; \ - greatest_prng_init_first_pass(ID); \ - do { \ - prng->count = 0; \ - if (prng->initialized) { greatest_prng_step(ID); } \ - BODY; \ - if (!prng->initialized) { \ - if (!greatest_prng_init_second_pass(ID, SD)) { break; } \ - } else if (prng->count_run == prng->count_ceil) { \ - break; \ - } \ - } while (!GREATEST_FAILURE_ABORT()); \ - prng->count_run = prng->random_order = prng->initialized = 0; \ - } while(0) - -/* Include several function definitions in the main test file. */ -#define GREATEST_MAIN_DEFS() \ - \ -/* Is FILTER a subset of NAME? */ \ -static int greatest_name_match(const char *name, const char *filter, \ - int res_if_none) { \ - size_t offset = 0; \ - size_t filter_len = filter ? strlen(filter) : 0; \ - if (filter_len == 0) { return res_if_none; } /* no filter */ \ - while (name[offset] != '\0') { \ - if (name[offset] == filter[0]) { \ - if (0 == strncmp(&name[offset], filter, filter_len)) { \ - return 1; \ - } \ - } \ - offset++; \ - } \ - \ - return 0; \ -} \ - \ -static void greatest_buffer_test_name(const char *name) { \ - struct greatest_run_info *g = &greatest_info; \ - size_t len = strlen(name), size = sizeof(g->name_buf); \ - memset(g->name_buf, 0x00, size); \ - (void)strncat(g->name_buf, name, size - 1); \ - if (g->name_suffix && (len + 1 < size)) { \ - g->name_buf[len] = '_'; \ - strncat(&g->name_buf[len+1], g->name_suffix, size-(len+2)); \ - } \ -} \ - \ -/* Before running a test, check the name filtering and \ - * test shuffling state, if applicable, and then call setup hooks. */ \ -int greatest_test_pre(const char *name) { \ - struct greatest_run_info *g = &greatest_info; \ - int match; \ - greatest_buffer_test_name(name); \ - match = greatest_name_match(g->name_buf, g->test_filter, 1) && \ - !greatest_name_match(g->name_buf, g->test_exclude, 0); \ - if (GREATEST_LIST_ONLY()) { /* just listing test names */ \ - if (match) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, " %s\n", g->name_buf); \ - } \ - goto clear; \ - } \ - if (match && (!GREATEST_FIRST_FAIL() || g->suite.failed == 0)) { \ - struct greatest_prng *p = &g->prng[1]; \ - if (p->random_order) { \ - p->count++; \ - if (!p->initialized || ((p->count - 1) != p->state)) { \ - goto clear; /* don't run this test yet */ \ - } \ - } \ - GREATEST_SET_TIME(g->suite.pre_test); \ - if (g->setup) { g->setup(g->setup_udata); } \ - p->count_run++; \ - return 1; /* test should be run */ \ - } else { \ - goto clear; /* skipped */ \ - } \ -clear: \ - g->name_suffix = NULL; \ - return 0; \ -} \ - \ -static void greatest_do_pass(void) { \ - struct greatest_run_info *g = &greatest_info; \ - if (GREATEST_IS_VERBOSE()) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "PASS %s: %s", \ - g->name_buf, g->msg ? g->msg : ""); \ - } else { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "."); \ - } \ - g->suite.passed++; \ -} \ - \ -static void greatest_do_fail(void) { \ - struct greatest_run_info *g = &greatest_info; \ - if (GREATEST_IS_VERBOSE()) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, \ - "FAIL %s: %s (%s:%u)", g->name_buf, \ - g->msg ? g->msg : "", g->fail_file, g->fail_line); \ - } else { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "F"); \ - g->col++; /* add linebreak if in line of '.'s */ \ - if (g->col != 0) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n"); \ - g->col = 0; \ - } \ - GREATEST_FPRINTF(GREATEST_STDOUT, "FAIL %s: %s (%s:%u)\n", \ - g->name_buf, g->msg ? g->msg : "", \ - g->fail_file, g->fail_line); \ - } \ - g->suite.failed++; \ -} \ - \ -static void greatest_do_skip(void) { \ - struct greatest_run_info *g = &greatest_info; \ - if (GREATEST_IS_VERBOSE()) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "SKIP %s: %s", \ - g->name_buf, g->msg ? g->msg : ""); \ - } else { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "s"); \ - } \ - g->suite.skipped++; \ -} \ - \ -void greatest_test_post(int res) { \ - GREATEST_SET_TIME(greatest_info.suite.post_test); \ - if (greatest_info.teardown) { \ - void *udata = greatest_info.teardown_udata; \ - greatest_info.teardown(udata); \ - } \ - \ - if (res <= GREATEST_TEST_RES_FAIL) { \ - greatest_do_fail(); \ - } else if (res >= GREATEST_TEST_RES_SKIP) { \ - greatest_do_skip(); \ - } else if (res == GREATEST_TEST_RES_PASS) { \ - greatest_do_pass(); \ - } \ - greatest_info.name_suffix = NULL; \ - greatest_info.suite.tests_run++; \ - greatest_info.col++; \ - if (GREATEST_IS_VERBOSE()) { \ - GREATEST_CLOCK_DIFF(greatest_info.suite.pre_test, \ - greatest_info.suite.post_test); \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n"); \ - } else if (greatest_info.col % greatest_info.width == 0) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n"); \ - greatest_info.col = 0; \ - } \ - fflush(GREATEST_STDOUT); \ -} \ - \ -static void report_suite(void) { \ - if (greatest_info.suite.tests_run > 0) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, \ - "\n%u test%s - %u passed, %u failed, %u skipped", \ - greatest_info.suite.tests_run, \ - greatest_info.suite.tests_run == 1 ? "" : "s", \ - greatest_info.suite.passed, \ - greatest_info.suite.failed, \ - greatest_info.suite.skipped); \ - GREATEST_CLOCK_DIFF(greatest_info.suite.pre_suite, \ - greatest_info.suite.post_suite); \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n"); \ - } \ -} \ - \ -static void update_counts_and_reset_suite(void) { \ - greatest_info.setup = NULL; \ - greatest_info.setup_udata = NULL; \ - greatest_info.teardown = NULL; \ - greatest_info.teardown_udata = NULL; \ - greatest_info.passed += greatest_info.suite.passed; \ - greatest_info.failed += greatest_info.suite.failed; \ - greatest_info.skipped += greatest_info.suite.skipped; \ - greatest_info.tests_run += greatest_info.suite.tests_run; \ - memset(&greatest_info.suite, 0, sizeof(greatest_info.suite)); \ - greatest_info.col = 0; \ -} \ - \ -static int greatest_suite_pre(const char *suite_name) { \ - struct greatest_prng *p = &greatest_info.prng[0]; \ - if (!greatest_name_match(suite_name, greatest_info.suite_filter, 1) \ - || (GREATEST_FAILURE_ABORT())) { return 0; } \ - if (p->random_order) { \ - p->count++; \ - if (!p->initialized || ((p->count - 1) != p->state)) { \ - return 0; /* don't run this suite yet */ \ - } \ - } \ - p->count_run++; \ - update_counts_and_reset_suite(); \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n* Suite %s:\n", suite_name); \ - GREATEST_SET_TIME(greatest_info.suite.pre_suite); \ - return 1; \ -} \ - \ -static void greatest_suite_post(void) { \ - GREATEST_SET_TIME(greatest_info.suite.post_suite); \ - report_suite(); \ -} \ - \ -static void greatest_run_suite(greatest_suite_cb *suite_cb, \ - const char *suite_name) { \ - if (greatest_suite_pre(suite_name)) { \ - suite_cb(); \ - greatest_suite_post(); \ - } \ -} \ - \ -int greatest_do_assert_equal_t(const void *expd, const void *got, \ - greatest_type_info *type_info, void *udata) { \ - int eq = 0; \ - if (type_info == NULL || type_info->equal == NULL) { \ - return 0; \ - } \ - eq = type_info->equal(expd, got, udata); \ - if (!eq) { \ - if (type_info->print != NULL) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\nExpected: "); \ - (void)type_info->print(expd, udata); \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n Got: "); \ - (void)type_info->print(got, udata); \ - GREATEST_FPRINTF(GREATEST_STDOUT, "\n"); \ - } \ - } \ - return eq; \ -} \ - \ -static void greatest_usage(const char *name) { \ - GREATEST_FPRINTF(GREATEST_STDOUT, \ - "Usage: %s [-hlfav] [-s SUITE] [-t TEST] [-x EXCLUDE]\n" \ - " -h, --help print this Help\n" \ - " -l List suites and tests, then exit (dry run)\n" \ - " -f Stop runner after first failure\n" \ - " -a Abort on first failure (implies -f)\n" \ - " -v Verbose output\n" \ - " -s SUITE only run suites containing substring SUITE\n" \ - " -t TEST only run tests containing substring TEST\n" \ - " -x EXCLUDE exclude tests containing substring EXCLUDE\n", \ - name); \ -} \ - \ -static void greatest_parse_options(int argc, char **argv) { \ - int i = 0; \ - for (i = 1; i < argc; i++) { \ - if (argv[i][0] == '-') { \ - char f = argv[i][1]; \ - if ((f == 's' || f == 't' || f == 'x') && argc <= i + 1) { \ - greatest_usage(argv[0]); exit(EXIT_FAILURE); \ - } \ - switch (f) { \ - case 's': /* suite name filter */ \ - greatest_set_suite_filter(argv[i + 1]); i++; break; \ - case 't': /* test name filter */ \ - greatest_set_test_filter(argv[i + 1]); i++; break; \ - case 'x': /* test name exclusion */ \ - greatest_set_test_exclude(argv[i + 1]); i++; break; \ - case 'f': /* first fail flag */ \ - greatest_stop_at_first_fail(); break; \ - case 'a': /* abort() on fail flag */ \ - greatest_abort_on_fail(); break; \ - case 'l': /* list only (dry run) */ \ - greatest_list_only(); break; \ - case 'v': /* first fail flag */ \ - greatest_info.verbosity++; break; \ - case 'h': /* help */ \ - greatest_usage(argv[0]); exit(EXIT_SUCCESS); \ - case '-': \ - if (0 == strncmp("--help", argv[i], 6)) { \ - greatest_usage(argv[0]); exit(EXIT_SUCCESS); \ - } else if (0 == strncmp("--", argv[i], 2)) { \ - return; /* ignore following arguments */ \ - } /* fall through */ \ - default: \ - GREATEST_FPRINTF(GREATEST_STDOUT, \ - "Unknown argument '%s'\n", argv[i]); \ - greatest_usage(argv[0]); \ - exit(EXIT_FAILURE); \ - } \ - } \ - } \ -} \ - \ -int greatest_all_passed(void) { return (greatest_info.failed == 0); } \ - \ -void greatest_set_test_filter(const char *filter) { \ - greatest_info.test_filter = filter; \ -} \ - \ -void greatest_set_test_exclude(const char *filter) { \ - greatest_info.test_exclude = filter; \ -} \ - \ -void greatest_set_suite_filter(const char *filter) { \ - greatest_info.suite_filter = filter; \ -} \ - \ -void greatest_stop_at_first_fail(void) { \ - greatest_set_flag(GREATEST_FLAG_FIRST_FAIL); \ -} \ - \ -void greatest_abort_on_fail(void) { \ - greatest_set_flag(GREATEST_FLAG_ABORT_ON_FAIL); \ -} \ - \ -void greatest_list_only(void) { \ - greatest_set_flag(GREATEST_FLAG_LIST_ONLY); \ -} \ - \ -void greatest_get_report(struct greatest_report_t *report) { \ - if (report) { \ - report->passed = greatest_info.passed; \ - report->failed = greatest_info.failed; \ - report->skipped = greatest_info.skipped; \ - report->assertions = greatest_info.assertions; \ - } \ -} \ - \ -unsigned int greatest_get_verbosity(void) { \ - return greatest_info.verbosity; \ -} \ - \ -void greatest_set_verbosity(unsigned int verbosity) { \ - greatest_info.verbosity = (unsigned char)verbosity; \ -} \ - \ -void greatest_set_flag(greatest_flag_t flag) { \ - greatest_info.flags = (unsigned char)(greatest_info.flags | flag); \ -} \ - \ -void greatest_set_test_suffix(const char *suffix) { \ - greatest_info.name_suffix = suffix; \ -} \ - \ -void GREATEST_SET_SETUP_CB(greatest_setup_cb *cb, void *udata) { \ - greatest_info.setup = cb; \ - greatest_info.setup_udata = udata; \ -} \ - \ -void GREATEST_SET_TEARDOWN_CB(greatest_teardown_cb *cb, \ - void *udata) { \ - greatest_info.teardown = cb; \ - greatest_info.teardown_udata = udata; \ -} \ - \ -static int greatest_string_equal_cb(const void *expd, const void *got, \ - void *udata) { \ - size_t *size = (size_t *)udata; \ - return (size != NULL \ - ? (0 == strncmp((const char *)expd, (const char *)got, *size)) \ - : (0 == strcmp((const char *)expd, (const char *)got))); \ -} \ - \ -static int greatest_string_printf_cb(const void *t, void *udata) { \ - (void)udata; /* note: does not check \0 termination. */ \ - return GREATEST_FPRINTF(GREATEST_STDOUT, "%s", (const char *)t); \ -} \ - \ -greatest_type_info greatest_type_info_string = { \ - greatest_string_equal_cb, \ - greatest_string_printf_cb, \ -}; \ - \ -static int greatest_memory_equal_cb(const void *expd, const void *got, \ - void *udata) { \ - greatest_memory_cmp_env *env = (greatest_memory_cmp_env *)udata; \ - return (0 == memcmp(expd, got, env->size)); \ -} \ - \ -/* Hexdump raw memory, with differences highlighted */ \ -static int greatest_memory_printf_cb(const void *t, void *udata) { \ - greatest_memory_cmp_env *env = (greatest_memory_cmp_env *)udata; \ - const unsigned char *buf = (const unsigned char *)t; \ - unsigned char diff_mark = ' '; \ - FILE *out = GREATEST_STDOUT; \ - size_t i, line_i, line_len = 0; \ - int len = 0; /* format hexdump with differences highlighted */ \ - for (i = 0; i < env->size; i+= line_len) { \ - diff_mark = ' '; \ - line_len = env->size - i; \ - if (line_len > 16) { line_len = 16; } \ - for (line_i = i; line_i < i + line_len; line_i++) { \ - if (env->exp[line_i] != env->got[line_i]) diff_mark = 'X'; \ - } \ - len += GREATEST_FPRINTF(out, "\n%04x %c ", \ - (unsigned int)i, diff_mark); \ - for (line_i = i; line_i < i + line_len; line_i++) { \ - int m = env->exp[line_i] == env->got[line_i]; /* match? */ \ - len += GREATEST_FPRINTF(out, "%02x%c", \ - buf[line_i], m ? ' ' : '<'); \ - } \ - for (line_i = 0; line_i < 16 - line_len; line_i++) { \ - len += GREATEST_FPRINTF(out, " "); \ - } \ - GREATEST_FPRINTF(out, " "); \ - for (line_i = i; line_i < i + line_len; line_i++) { \ - unsigned char c = buf[line_i]; \ - len += GREATEST_FPRINTF(out, "%c", isprint(c) ? c : '.'); \ - } \ - } \ - len += GREATEST_FPRINTF(out, "\n"); \ - return len; \ -} \ - \ -void greatest_prng_init_first_pass(int id) { \ - greatest_info.prng[id].random_order = 1; \ - greatest_info.prng[id].count_run = 0; \ -} \ - \ -int greatest_prng_init_second_pass(int id, unsigned long seed) { \ - struct greatest_prng *p = &greatest_info.prng[id]; \ - if (p->count == 0) { return 0; } \ - p->count_ceil = p->count; \ - for (p->m = 1; p->m < p->count; p->m <<= 1) {} \ - p->state = seed & 0x1fffffff; /* only use lower 29 bits */ \ - p->a = 4LU * p->state; /* to avoid overflow when */ \ - p->a = (p->a ? p->a : 4) | 1; /* multiplied by 4 */ \ - p->c = 2147483647; /* and so p->c ((2 ** 31) - 1) is */ \ - p->initialized = 1; /* always relatively prime to p->a. */ \ - fprintf(stderr, "init_second_pass: a %lu, c %lu, state %lu\n", \ - p->a, p->c, p->state); \ - return 1; \ -} \ - \ -/* Step the pseudorandom number generator until its state reaches \ - * another test ID between 0 and the test count. \ - * This use a linear congruential pseudorandom number generator, \ - * with the power-of-two ceiling of the test count as the modulus, the \ - * masked seed as the multiplier, and a prime as the increment. For \ - * each generated value < the test count, run the corresponding test. \ - * This will visit all IDs 0 <= X < mod once before repeating, \ - * with a starting position chosen based on the initial seed. \ - * For details, see: Knuth, The Art of Computer Programming \ - * Volume. 2, section 3.2.1. */ \ -void greatest_prng_step(int id) { \ - struct greatest_prng *p = &greatest_info.prng[id]; \ - do { \ - p->state = ((p->a * p->state) + p->c) & (p->m - 1); \ - } while (p->state >= p->count_ceil); \ -} \ - \ -void GREATEST_INIT(void) { \ - /* Suppress unused function warning if features aren't used */ \ - (void)greatest_run_suite; \ - (void)greatest_parse_options; \ - (void)greatest_prng_step; \ - (void)greatest_prng_init_first_pass; \ - (void)greatest_prng_init_second_pass; \ - (void)greatest_set_test_suffix; \ - \ - memset(&greatest_info, 0, sizeof(greatest_info)); \ - greatest_info.width = GREATEST_DEFAULT_WIDTH; \ - GREATEST_SET_TIME(greatest_info.begin); \ -} \ - \ -/* Report passes, failures, skipped tests, the number of \ - * assertions, and the overall run time. */ \ -void GREATEST_PRINT_REPORT(void) { \ - if (!GREATEST_LIST_ONLY()) { \ - update_counts_and_reset_suite(); \ - GREATEST_SET_TIME(greatest_info.end); \ - GREATEST_FPRINTF(GREATEST_STDOUT, \ - "\nTotal: %u test%s", \ - greatest_info.tests_run, \ - greatest_info.tests_run == 1 ? "" : "s"); \ - GREATEST_CLOCK_DIFF(greatest_info.begin, \ - greatest_info.end); \ - GREATEST_FPRINTF(GREATEST_STDOUT, ", %u assertion%s\n", \ - greatest_info.assertions, \ - greatest_info.assertions == 1 ? "" : "s"); \ - GREATEST_FPRINTF(GREATEST_STDOUT, \ - "Pass: %u, fail: %u, skip: %u.\n", \ - greatest_info.passed, \ - greatest_info.failed, greatest_info.skipped); \ - } \ -} \ - \ -greatest_type_info greatest_type_info_memory = { \ - greatest_memory_equal_cb, \ - greatest_memory_printf_cb, \ -}; \ - \ -greatest_run_info greatest_info - -/* Handle command-line arguments, etc. */ -#define GREATEST_MAIN_BEGIN() \ - do { \ - GREATEST_INIT(); \ - greatest_parse_options(argc, argv); \ - } while (0) - -/* Report results, exit with exit status based on results. */ -#define GREATEST_MAIN_END() \ - do { \ - GREATEST_PRINT_REPORT(); \ - return (greatest_all_passed() ? EXIT_SUCCESS : EXIT_FAILURE); \ - } while (0) - -/* Make abbreviations without the GREATEST_ prefix for the - * most commonly used symbols. */ -#if GREATEST_USE_ABBREVS -#define TEST GREATEST_TEST -#define SUITE GREATEST_SUITE -#define SUITE_EXTERN GREATEST_SUITE_EXTERN -#define RUN_TEST GREATEST_RUN_TEST -#define RUN_TEST1 GREATEST_RUN_TEST1 -#define RUN_SUITE GREATEST_RUN_SUITE -#define IGNORE_TEST GREATEST_IGNORE_TEST -#define ASSERT GREATEST_ASSERT -#define ASSERTm GREATEST_ASSERTm -#define ASSERT_FALSE GREATEST_ASSERT_FALSE -#define ASSERT_EQ GREATEST_ASSERT_EQ -#define ASSERT_EQ_FMT GREATEST_ASSERT_EQ_FMT -#define ASSERT_IN_RANGE GREATEST_ASSERT_IN_RANGE -#define ASSERT_EQUAL_T GREATEST_ASSERT_EQUAL_T -#define ASSERT_STR_EQ GREATEST_ASSERT_STR_EQ -#define ASSERT_STRN_EQ GREATEST_ASSERT_STRN_EQ -#define ASSERT_MEM_EQ GREATEST_ASSERT_MEM_EQ -#define ASSERT_ENUM_EQ GREATEST_ASSERT_ENUM_EQ -#define ASSERT_FALSEm GREATEST_ASSERT_FALSEm -#define ASSERT_EQm GREATEST_ASSERT_EQm -#define ASSERT_EQ_FMTm GREATEST_ASSERT_EQ_FMTm -#define ASSERT_IN_RANGEm GREATEST_ASSERT_IN_RANGEm -#define ASSERT_EQUAL_Tm GREATEST_ASSERT_EQUAL_Tm -#define ASSERT_STR_EQm GREATEST_ASSERT_STR_EQm -#define ASSERT_STRN_EQm GREATEST_ASSERT_STRN_EQm -#define ASSERT_MEM_EQm GREATEST_ASSERT_MEM_EQm -#define ASSERT_ENUM_EQm GREATEST_ASSERT_ENUM_EQm -#define PASS GREATEST_PASS -#define FAIL GREATEST_FAIL -#define SKIP GREATEST_SKIP -#define PASSm GREATEST_PASSm -#define FAILm GREATEST_FAILm -#define SKIPm GREATEST_SKIPm -#define SET_SETUP GREATEST_SET_SETUP_CB -#define SET_TEARDOWN GREATEST_SET_TEARDOWN_CB -#define CHECK_CALL GREATEST_CHECK_CALL -#define SHUFFLE_TESTS GREATEST_SHUFFLE_TESTS -#define SHUFFLE_SUITES GREATEST_SHUFFLE_SUITES - -#ifdef GREATEST_VA_ARGS -#define RUN_TESTp GREATEST_RUN_TESTp -#endif - -#if GREATEST_USE_LONGJMP -#define ASSERT_OR_LONGJMP GREATEST_ASSERT_OR_LONGJMP -#define ASSERT_OR_LONGJMPm GREATEST_ASSERT_OR_LONGJMPm -#define FAIL_WITH_LONGJMP GREATEST_FAIL_WITH_LONGJMP -#define FAIL_WITH_LONGJMPm GREATEST_FAIL_WITH_LONGJMPm -#endif - -#endif /* USE_ABBREVS */ - -#if defined(__cplusplus) && !defined(GREATEST_NO_EXTERN_CPLUSPLUS) -} -#endif - -#endif
--- a/tests/test-db.c Tue Jan 31 22:01:36 2023 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,576 +0,0 @@ -/* - * test-db.c -- test database access - * - * Copyright (c) 2021-2022 David Demelier <markand@malikania.fr> - * - * Permission to use, copy, modify, and/or distribute this software for any - * purpose with or without fee is hereby granted, provided that the above - * copyright notice and this permission notice appear in all copies. - * - * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES - * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF - * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR - * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES - * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN - * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF - * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. - */ - -#include <stdio.h> -#include <string.h> -#include <err.h> - -#define GREATEST_USE_ABBREVS 0 -#include <greatest.h> - -#include "db.h" -#include "types.h" -#include "util.h" - -#define DB "test.db" - -static void -setup(void *data) -{ - (void)data; - - remove(DB); - - if (db_open(DB) < 0) - err(1, "unable to create database"); -} - -static void -teardown(void *data) -{ - (void)data; - - db_finish(); - remove(DB); -} - -GREATEST_TEST -test_projects_add(void) -{ - struct project proj = {0}; - - proj.name = "test"; - proj.desc = "Test project"; - proj.url = "example.org"; - proj.script = "#!/bin/sh exit 0"; - - GREATEST_ASSERT_EQ(db_project_add(&proj), 0); - GREATEST_ASSERT(proj.id > 0); - - GREATEST_PASS(); -} - -GREATEST_TEST -test_projects_list(void) -{ - struct project projs[] = { - { - .name = "example 1", - .desc = "Example project 1", - .url = "example.org", - .script = "#!/bin/sh exit 0" - }, - { - .name = "example 2", - .desc = "Example project 2", - .url = "example.org", - .script = "#!/bin/sh exit 0" - } - }; - struct db_ctx ctx; - - for (size_t i = 0; i < UTIL_SIZE(projs); ++i) { - GREATEST_ASSERT_EQ(db_project_add(&projs[i]), 0); - GREATEST_ASSERT(projs[i].id > 0); - } - - memset(projs, 0, sizeof (projs)); - - GREATEST_ASSERT_EQ(db_project_list(&ctx, projs, UTIL_SIZE(projs)), 2LL); - GREATEST_ASSERT(projs[0].id > 0); - GREATEST_ASSERT_STR_EQ(projs[0].name, "example 1"); - GREATEST_ASSERT_STR_EQ(projs[0].desc, "Example project 1"); - GREATEST_ASSERT_STR_EQ(projs[0].url, "example.org"); - GREATEST_ASSERT_STR_EQ(projs[0].script, "#!/bin/sh exit 0"); - GREATEST_ASSERT(projs[1].id > 0); - GREATEST_ASSERT_STR_EQ(projs[1].name, "example 2"); - GREATEST_ASSERT_STR_EQ(projs[1].desc, "Example project 2"); - GREATEST_ASSERT_STR_EQ(projs[1].url, "example.org"); - GREATEST_ASSERT_STR_EQ(projs[1].script, "#!/bin/sh exit 0"); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_TEST -test_projects_find(void) -{ - struct project projs[] = { - { - .name = "example 1", - .desc = "Example project 1", - .url = "example.org", - .script = "#!/bin/sh exit 0" - }, - { - .name = "example 2", - .desc = "Example project 2", - .url = "example.org", - .script = "#!/bin/sh exit 0" - } - }; - struct project find = { .name = "example 2" }; - struct db_ctx ctx; - - for (size_t i = 0; i < UTIL_SIZE(projs); ++i) { - GREATEST_ASSERT_EQ(db_project_add(&projs[i]), 0); - GREATEST_ASSERT(projs[i].id > 0); - } - - GREATEST_ASSERT_EQ(db_project_find(&ctx, &find), 0); - GREATEST_ASSERT_EQ(find.id, 2); - GREATEST_ASSERT_STR_EQ(find.name, "example 2"); - GREATEST_ASSERT_STR_EQ(find.desc, "Example project 2"); - GREATEST_ASSERT_STR_EQ(find.url, "example.org"); - GREATEST_ASSERT_STR_EQ(find.script, "#!/bin/sh exit 0"); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_TEST -test_projects_find_id(void) -{ - struct project projs[] = { - { - .name = "example 1", - .desc = "Example project 1", - .url = "example.org", - .script = "#!/bin/sh exit 0" - }, - { - .name = "example 2", - .desc = "Example project 2", - .url = "example.org", - .script = "#!/bin/sh exit 0" - } - }; - struct project find = { .id = 2 }; - struct db_ctx ctx; - - for (size_t i = 0; i < UTIL_SIZE(projs); ++i) { - GREATEST_ASSERT_EQ(db_project_add(&projs[i]), 0); - GREATEST_ASSERT(projs[i].id > 0); - } - - /* First generated id should start at 1. */ - GREATEST_ASSERT_EQ(db_project_find_id(&ctx, &find), 0); - GREATEST_ASSERT_EQ(find.id, 2); - GREATEST_ASSERT_STR_EQ(find.name, "example 2"); - GREATEST_ASSERT_STR_EQ(find.desc, "Example project 2"); - GREATEST_ASSERT_STR_EQ(find.url, "example.org"); - GREATEST_ASSERT_STR_EQ(find.script, "#!/bin/sh exit 0"); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_TEST -test_projects_update(void) -{ - struct project proj = { - .name = "example 1", - .desc = "Example project 1", - .url = "example.org", - .script = "#!/bin/sh exit 0" - }; - struct project find; - struct db_ctx ctx; - - GREATEST_ASSERT_EQ(db_project_add(&proj), 0); - GREATEST_ASSERT(proj.id > 0); - - /* Update name. */ - memset(&find, 0, sizeof (find)); - find.id = 1; - proj.name = "updated example 1"; - - GREATEST_ASSERT_EQ(db_project_update(&proj), 0); - GREATEST_ASSERT_EQ(db_project_find_id(&ctx, &find), 0); - GREATEST_ASSERT_STR_EQ(find.name, "updated example 1"); - GREATEST_ASSERT_STR_EQ(find.desc, "Example project 1"); - GREATEST_ASSERT_STR_EQ(find.url, "example.org"); - GREATEST_ASSERT_STR_EQ(find.script, "#!/bin/sh exit 0"); - - db_ctx_finish(&ctx); - - /* Update desc. */ - memset(&find, 0, sizeof (find)); - find.id = 1; - proj.desc = "updated Example project 1"; - - GREATEST_ASSERT_EQ(db_project_update(&proj), 0); - GREATEST_ASSERT_EQ(db_project_find_id(&ctx, &find), 0); - GREATEST_ASSERT_STR_EQ(find.name, "updated example 1"); - GREATEST_ASSERT_STR_EQ(find.desc, "updated Example project 1"); - GREATEST_ASSERT_STR_EQ(find.url, "example.org"); - GREATEST_ASSERT_STR_EQ(find.script, "#!/bin/sh exit 0"); - - db_ctx_finish(&ctx); - - /* Update url. */ - memset(&find, 0, sizeof (find)); - find.id = 1; - proj.url = "updated example.org"; - - GREATEST_ASSERT_EQ(db_project_update(&proj), 0); - GREATEST_ASSERT_EQ(db_project_find_id(&ctx, &find), 0); - GREATEST_ASSERT_STR_EQ(find.name, "updated example 1"); - GREATEST_ASSERT_STR_EQ(find.desc, "updated Example project 1"); - GREATEST_ASSERT_STR_EQ(find.url, "updated example.org"); - GREATEST_ASSERT_STR_EQ(find.script, "#!/bin/sh exit 0"); - - db_ctx_finish(&ctx); - - /* Update script. */ - memset(&find, 0, sizeof (find)); - find.id = 1; - proj.script = "#!/bin/sh exit 1"; - - GREATEST_ASSERT_EQ(db_project_update(&proj), 0); - GREATEST_ASSERT_EQ(db_project_find_id(&ctx, &find), 0); - GREATEST_ASSERT_STR_EQ(find.name, "updated example 1"); - GREATEST_ASSERT_STR_EQ(find.desc, "updated Example project 1"); - GREATEST_ASSERT_STR_EQ(find.url, "updated example.org"); - GREATEST_ASSERT_STR_EQ(find.script, "#!/bin/sh exit 1"); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_SUITE(suite_projects) -{ - GREATEST_SET_SETUP_CB(setup, NULL); - GREATEST_SET_TEARDOWN_CB(teardown, NULL); - GREATEST_RUN_TEST(test_projects_add); - GREATEST_RUN_TEST(test_projects_list); - GREATEST_RUN_TEST(test_projects_find); - GREATEST_RUN_TEST(test_projects_find_id); - GREATEST_RUN_TEST(test_projects_update); -} - -GREATEST_TEST -test_workers_add(void) -{ - struct worker wk = {0}; - - wk.name = "test"; - wk.desc = "Test worker"; - - GREATEST_ASSERT_EQ(db_worker_add(&wk), 0); - GREATEST_ASSERT(wk.id > 0); - - GREATEST_PASS(); -} - -GREATEST_TEST -test_workers_list(void) -{ - struct worker wks[] = { - { - .name = "example 1", - .desc = "Example worker 1", - }, - { - .name = "example 2", - .desc = "Example worker 2", - } - }; - struct db_ctx ctx; - - for (size_t i = 0; i < UTIL_SIZE(wks); ++i) { - GREATEST_ASSERT_EQ(db_worker_add(&wks[i]), 0); - GREATEST_ASSERT(wks[i].id > 0); - } - - memset(wks, 0, sizeof (wks)); - - GREATEST_ASSERT_EQ(db_worker_list(&ctx, wks, UTIL_SIZE(wks)), 2LL); - GREATEST_ASSERT(wks[0].id > 0); - GREATEST_ASSERT_STR_EQ(wks[0].name, "example 1"); - GREATEST_ASSERT_STR_EQ(wks[0].desc, "Example worker 1"); - GREATEST_ASSERT(wks[1].id > 0); - GREATEST_ASSERT_STR_EQ(wks[1].name, "example 2"); - GREATEST_ASSERT_STR_EQ(wks[1].desc, "Example worker 2"); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_TEST -test_workers_find(void) -{ - struct worker wks[] = { - { - .name = "example 1", - .desc = "Example worker 1", - }, - { - .name = "example 2", - .desc = "Example worker 2", - } - }; - struct worker find = { .name = "example 1" }; - struct db_ctx ctx; - - for (size_t i = 0; i < UTIL_SIZE(wks); ++i) { - GREATEST_ASSERT_EQ(db_worker_add(&wks[i]), 0); - GREATEST_ASSERT(wks[i].id > 0); - } - - GREATEST_ASSERT_EQ(db_worker_find(&ctx, &find), 0); - GREATEST_ASSERT_EQ(find.id, 1); - GREATEST_ASSERT_STR_EQ(find.name, "example 1"); - GREATEST_ASSERT_STR_EQ(find.desc, "Example worker 1"); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_TEST -test_workers_find_id(void) -{ - struct worker wks[] = { - { - .name = "example 1", - .desc = "Example worker 1", - }, - { - .name = "example 2", - .desc = "Example worker 2", - } - }; - struct worker find = { .id = 1 }; - struct db_ctx ctx; - - for (size_t i = 0; i < UTIL_SIZE(wks); ++i) { - GREATEST_ASSERT_EQ(db_worker_add(&wks[i]), 0); - GREATEST_ASSERT(wks[i].id > 0); - } - - /* First generated id should start at 1. */ - GREATEST_ASSERT_EQ(db_worker_find_id(&ctx, &find), 0); - GREATEST_ASSERT_EQ(find.id, 1); - GREATEST_ASSERT_STR_EQ(find.name, "example 1"); - GREATEST_ASSERT_STR_EQ(find.desc, "Example worker 1"); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_SUITE(suite_workers) -{ - GREATEST_SET_SETUP_CB(setup, NULL); - GREATEST_SET_TEARDOWN_CB(teardown, NULL); - GREATEST_RUN_TEST(test_workers_add); - GREATEST_RUN_TEST(test_workers_list); - GREATEST_RUN_TEST(test_workers_find); - GREATEST_RUN_TEST(test_workers_find_id); -} - -GREATEST_TEST -test_jobs_add(void) -{ - struct project proj = {0}; - struct job job = {0}; - - proj.name = "test"; - proj.desc = "Test project"; - proj.url = "example.org"; - proj.script = "#!/bin/sh exit 0"; - - GREATEST_ASSERT_EQ(db_project_add(&proj), 0); - GREATEST_ASSERT(proj.id > 0); - - job.project_id = proj.id; - job.tag = "123456"; - - GREATEST_ASSERT_EQ(db_job_add(&job), 0); - GREATEST_ASSERT(job.id > 0); - - GREATEST_PASS(); -} - -GREATEST_TEST -test_jobs_todo(void) -{ - struct project proj = {0}; - struct job job = {0}; - struct worker wk = {0}; - struct job todo[16] = {0}; - struct db_ctx ctx; - - proj.name = "test"; - proj.desc = "Test project"; - proj.url = "example.org"; - proj.script = "#!/bin/sh exit 0"; - - GREATEST_ASSERT_EQ(db_project_add(&proj), 0); - GREATEST_ASSERT(proj.id > 0); - - job.project_id = proj.id; - job.tag = "123456"; - - GREATEST_ASSERT_EQ(db_job_add(&job), 0); - GREATEST_ASSERT(job.id > 0); - - wk.name = "test"; - wk.desc = "Test worker"; - - GREATEST_ASSERT_EQ(db_worker_add(&wk), 0); - GREATEST_ASSERT(wk.id > 0); - - GREATEST_ASSERT_EQ(db_job_todo(&ctx, todo, UTIL_SIZE(todo), wk.id), 1); - GREATEST_ASSERT(todo[0].id > 0); - GREATEST_ASSERT_STR_EQ(todo[0].tag, "123456"); - GREATEST_ASSERT_EQ(todo[0].project_id, proj.id); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_SUITE(suite_jobs) -{ - GREATEST_SET_SETUP_CB(setup, NULL); - GREATEST_SET_TEARDOWN_CB(teardown, NULL); - GREATEST_RUN_TEST(test_jobs_add); - GREATEST_RUN_TEST(test_jobs_todo); -} - -GREATEST_TEST -test_jobresults_add(void) -{ - struct project projs[] = { - { - .name = "example 1", - .desc = "Example project 1", - .url = "example.org", - .script = "#!/bin/sh exit 0" - }, - { - .name = "example 2", - .desc = "Example project 2", - .url = "example.org", - .script = "#!/bin/sh exit 0" - } - }; - struct job jobs[] = { - { - .project_id = 0, /* will be project 1 */ - .tag = "123456" - }, - { - .project_id = 0, /* will be project 2 */ - .tag = "abcdef" - }, - }; - struct worker wks[] = { - { - .name = "alpine-aarch64", - .desc = "alpine-aarch64" - }, - { - .name = "alpine-armhf", - .desc = "alpine-armhf" - }, - }; - struct job todo[16] = {0}; - struct jobresult res = {0}; - struct db_ctx ctx; - - for (size_t i = 0; i < UTIL_SIZE(projs); ++i) { - GREATEST_ASSERT_EQ(db_project_add(&projs[i]), 0); - GREATEST_ASSERT(projs[i].id > 0); - } - - /* Update jobs with newly created projects. */ - jobs[0].project_id = projs[0].id; - jobs[1].project_id = projs[1].id; - - for (size_t i = 0; i < UTIL_SIZE(jobs); ++i) { - GREATEST_ASSERT_EQ(db_job_add(&jobs[i]), 0); - GREATEST_ASSERT(jobs[i].id > 0); - } - - for (size_t i = 0; i < UTIL_SIZE(wks); ++i) { - GREATEST_ASSERT_EQ(db_worker_add(&wks[i]), 0); - GREATEST_ASSERT(wks[i].id > 0); - } - - /* - * Now add a jobresult for worker alpine-aarch64 and the job "abcdef", - * this means that this worker will only have the job "123456" to do - * while the other worker will have all to do. - */ - res.job_id = jobs[1].id; - res.worker_id = wks[0].id; - res.exitcode = 0; - res.log = "Success"; - - GREATEST_ASSERT_EQ(db_jobresult_add(&res), 0); - GREATEST_ASSERT(res.id > 0); - - /* 1 job left for alpine-aarch64 -> [123456]. */ - GREATEST_ASSERT_EQ(db_job_todo(&ctx, todo, UTIL_SIZE(todo), wks[0].id), 1); - GREATEST_ASSERT(todo[0].id > 0); - GREATEST_ASSERT_STR_EQ(todo[0].tag, "123456"); - GREATEST_ASSERT_EQ(todo[0].project_id, projs[0].id); - - db_ctx_finish(&ctx); - - /* 2 jobs left for alpine-armhf -> [123456, abcdef]. */ - GREATEST_ASSERT_EQ(db_job_todo(&ctx, todo, UTIL_SIZE(todo), wks[1].id), 2); - GREATEST_ASSERT(todo[0].id > 0); - GREATEST_ASSERT_STR_EQ(todo[0].tag, "123456"); - GREATEST_ASSERT_EQ(todo[0].project_id, projs[0].id); - GREATEST_ASSERT(todo[1].id > 0); - GREATEST_ASSERT_STR_EQ(todo[1].tag, "abcdef"); - GREATEST_ASSERT_EQ(todo[1].project_id, projs[1].id); - - db_ctx_finish(&ctx); - - GREATEST_PASS(); -} - -GREATEST_SUITE(suite_jobresults) -{ - GREATEST_SET_SETUP_CB(setup, NULL); - GREATEST_SET_TEARDOWN_CB(teardown, NULL); - GREATEST_RUN_TEST(test_jobresults_add); -} - -GREATEST_MAIN_DEFS(); - -int -main(int argc, char **argv) -{ - GREATEST_MAIN_BEGIN(); - GREATEST_RUN_SUITE(suite_projects); - GREATEST_RUN_SUITE(suite_workers); - GREATEST_RUN_SUITE(suite_jobs); - GREATEST_RUN_SUITE(suite_jobresults); - GREATEST_MAIN_END(); -}