* guile: beginnings of some unit tests

2012-07-12 21:19:59 +03:00
parent 8107dd29d7
commit 9bddf2f0b9
4 changed files with 305 additions and 6 deletions
--- a/guile/tests/test-mu-guile.c
+++ b/guile/tests/test-mu-guile.c
@ -0,0 +1,144 @@
+/* -*- mode: c; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*-
+**
+** Copyright (C) 2012 Dirk-Jan C. Binnema <djcb@djcbsoftware.nl>
+**
+** This program 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, or (at your option) any
+** later version.
+**
+** This program 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 this program; if not, write to the Free Software Foundation,
+** Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+**
+*/
+
+#if HAVE_CONFIG_H
+#include "config.h"
+#endif /*HAVE_CONFIG_H*/
+
+#include <glib.h>
+#include <glib/gstdio.h>
+
+#include "../mu-query.h"
+
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+
+#include "test-mu-common.h"
+#include "mu-store.h"
+
+
+/* tests for the command line interface, uses testdir2 */
+
+static gchar*
+fill_database (void)
+{
+	gchar *cmdline, *tmpdir;
+	GError *err;
+
+	tmpdir = test_mu_common_get_random_tmpdir();
+	cmdline = g_strdup_printf ("%s index --muhome=%s --maildir=%s"
+				   " --quiet",
+				   MU_PROGRAM,
+				   tmpdir, MU_TESTMAILDIR2);
+	if (g_test_verbose())
+		g_print ("%s\n", cmdline);
+
+	err  = NULL;
+	if (!g_spawn_command_line_sync (cmdline, NULL, NULL,
+					NULL, &err)) {
+		g_printerr ("Error: %s\n", err ? err->message : "?");
+		g_assert (0);
+	}
+
+	g_free (cmdline);
+	return tmpdir;
+}
+
+
+static void
+test_something (const char *what)
+{
+	char *dir, *cmdline, *output, *erroutput;
+	gint result;
+
+	dir = fill_database ();
+	cmdline = g_strdup_printf (
+		"%s -q -L %s -e main %s/test-mu-guile.scm --muhome=%s --test=%s",
+		GUILE_BINARY,
+		MU_GUILE_MODULE_PATH,
+		ABS_SRCDIR,
+		dir,
+		what);
+
+	if (g_test_verbose ())
+		g_print ("cmdline: %s\n", cmdline);
+
+	output = erroutput = NULL;
+	g_assert (g_spawn_command_line_sync (cmdline,
+					     &output, &erroutput,
+					     &result, NULL));
+	g_assert (result == 0);
+
+	if (g_test_verbose ()) {
+		if (output)
+			g_print ("stdout: %s\n", output);
+		if (erroutput)
+			g_print ("stderr: %s\n", erroutput);
+	}
+
+	g_free (output);
+	g_free (erroutput);
+	g_free (dir);
+	g_free (cmdline);
+}
+
+static void
+test_mu_guile_queries (void)
+{
+	test_something ("queries");
+}
+
+static void
+test_mu_guile_messages (void)
+{
+	test_something ("message");
+}
+
+static void
+test_mu_guile_stats (void)
+{
+	test_something ("stats");
+}
+
+
+int
+main (int argc, char *argv[])
+{
+	int rv;
+	g_test_init (&argc, &argv, NULL);
+
+	if (!set_en_us_utf8_locale())
+		return 0; /* don't error out... */
+
+	g_test_add_func ("/guile/queries",  test_mu_guile_queries);
+	g_test_add_func ("/guile/message",  test_mu_guile_messages);
+	g_test_add_func ("/guile/stats",    test_mu_guile_stats);
+
+
+	g_log_set_handler (NULL,
+			   G_LOG_LEVEL_MASK | G_LOG_LEVEL_WARNING|
+			   G_LOG_FLAG_FATAL| G_LOG_FLAG_RECURSION,
+			   (GLogFunc)black_hole, NULL);
+
+	rv = g_test_run ();
+
+	return rv;
+}