Start adding tests for the filters.

[apps/pfixtools.git] / postlicyd / tst-filters.c

diff --git a/postlicyd/tst-filters.c b/postlicyd/tst-filters.c
new file mode 100644 (file)
index 0000000..df17397
--- /dev/null
+++ b/postlicyd/tst-filters.c
@@ -0,0 +1,151 @@
+/******************************************************************************/
+/*          pfixtools: a collection of postfix related tools                  */
+/*          ~~~~~~~~~                                                         */
+/*  ________________________________________________________________________  */
+/*                                                                            */
+/*  Redistribution and use in source and binary forms, with or without        */
+/*  modification, are permitted provided that the following conditions        */
+/*  are met:                                                                  */
+/*                                                                            */
+/*  1. Redistributions of source code must retain the above copyright         */
+/*     notice, this list of conditions and the following disclaimer.          */
+/*  2. Redistributions in binary form must reproduce the above copyright      */
+/*     notice, this list of conditions and the following disclaimer in the    */
+/*     documentation and/or other materials provided with the distribution.   */
+/*  3. The names of its contributors may not be used to endorse or promote    */
+/*     products derived from this software without specific prior written     */
+/*     permission.                                                            */
+/*                                                                            */
+/*  THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND   */
+/*  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE     */
+/*  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR        */
+/*  PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS    */
+/*  BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR    */
+/*  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF      */
+/*  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS  */
+/*  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN   */
+/*  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)   */
+/*  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF    */
+/*  THE POSSIBILITY OF SUCH DAMAGE.                                           */
+/******************************************************************************/
+
+/*
+ * Copyright © 2008 Florent Bruneau
+ */
+
+#include "str.h"
+#include "config.h"
+#include "file.h"
+#include <dirent.h>
+
+#define DAEMON_NAME "tst-filters"
+
+DECLARE_MAIN
+
+static bool run_testcase(const config_t *config, const char *basepath,
+                         const char *filename)
+{
+    char buff[BUFSIZ];
+    char path[FILENAME_MAX];
+    char *end;
+
+    snprintf(path, FILENAME_MAX, "%s%s", basepath, filename);
+    {
+        file_map_t map;
+        if (!file_map_open(&map, path, false)) {
+            return false;
+        }
+        if (map.end - map.map >= BUFSIZ) {
+            syslog(LOG_ERR, "File too large for a testcase: %s", path);
+            return false;
+        }
+        memcpy(buff, map.map, map.end - map.map);
+        end = buff + (map.end - map.map);
+        *end = '\0';
+        file_map_close(&map);
+    }
+
+    query_t query;
+    const char *eol = strstr(buff, "\n\n") + 2;
+    if (!query_parse(&query, buff)) {
+        syslog(LOG_ERR, "Cannot parse query from file %s", path);
+        return false;
+    }
+
+    bool ok = true;
+    while (eol < end) {
+        char *neol = memchr(eol, '\n', end - eol);
+        if (neol == NULL) {
+            neol = end;
+        }
+        *neol = '\0';
+        char *sep = memchr(eol, '=', neol - eol);
+        if (sep == NULL) {
+            eol = neol + 1;
+            syslog(LOG_ERR, "missing separator");
+            continue;
+        }
+        *sep = '\0';
+
+        int pos = filter_find_with_name(&config->filters, eol);
+        if (pos == -1) {
+            syslog(LOG_ERR, "Unknown filter %s", eol);
+            eol = neol + 1;
+            continue;
+        }
+        ++sep;
+        filter_result_t result = hook_tokenize(sep, neol - sep);
+        if (result == HTK_UNKNOWN) {
+            syslog(LOG_ERR, "Unknown filter result %.*s", neol - sep, sep);
+            eol = neol + 1;
+            continue;
+        }
+        filter_t *filter = array_ptr(config->filters, pos);
+
+        bool test = filter_test(filter, &query, result);
+        printf("  filter %s: %s\n", filter->name, test ? "SUCCESS" : "FAILED");
+        ok = ok && test;
+        eol = neol + 1;
+    }
+    return ok;
+}
+
+int main(int argc, char *argv[])
+{
+    char basepath[FILENAME_MAX];
+    char path[FILENAME_MAX];
+    char *p;
+
+    p = strrchr(argv[0], '/');
+    if (p == NULL) {
+        p = argv[0];
+    } else {
+        ++p;
+    }
+
+    snprintf(basepath, FILENAME_MAX, "%.*sdata/", p - argv[0], argv[0]);
+    snprintf(path, FILENAME_MAX, "%s/test.conf", basepath);
+
+    config_t *config = config_read(path);
+    if (config == NULL) {
+        return 1;
+    }
+
+    DIR *dir = opendir(basepath);
+    if (dir == NULL) {
+        UNIXERR("opendir");
+        return 1;
+    }
+
+    struct dirent *ent;
+    while ((ent = readdir(dir)) != NULL) {
+        if (strncmp("testcase_", ent->d_name, 9) == 0) {
+            printf("Running %s:\n", ent->d_name);
+            printf("%s\n",
+                   run_testcase(config, basepath, ent->d_name) ? "SUCCESS" : "FAILED");
+        }
+    }
+    closedir(dir);
+
+    return 0;
+}