falsework 0.2.8 → 1.3.0

data/lib/falsework/templates/c-glib/src/utils.h

@@ -0,0 +1,45 @@
+#ifndef UTILS_H
+#define UTILS_H
+
+#include <errno.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/param.h>
+#include <sys/uio.h>
+#include <sys/wait.h>
+#include <unistd.h>
+#include <stdlib.h>
+#include <limits.h>
+
+#include <glib.h>
+
+/* Logging destination */
+typedef enum _MyLogDest {
+	MYLOG_CONSOLE,
+	MYLOG_FILES,
+	MYLOG_BITBUCKET
+} MyLogDest;
+
+/* Used with first(), because of its address is unique among other
+   pointers. */
+char sentinel; 
+
+gchar *text2utf8(const gchar *buf, const gchar *from);
+char *first(char *first, ...);
+gchar* chan_read(int fd, gsize *len);
+
+gboolean pr_exit_warn(const char *cmd, int status);
+
+GString* my_strstrip(GString *s);
+gboolean my_regsub(GString* s, const gchar *re, const gchar *sub);
+
+void mylog_to(MyLogDest d);
+void mylog_to_devnull(const gchar *log_domain, GLogLevelFlags log_levels,
+					  const gchar *message, gpointer user_data);
+void myerr(const gchar *format, ...);
+
+ssize_t readn(int fd, void *vptr, size_t n);
+ssize_t writen(int fd, const void *vptr, size_t n);
+
+#endif // UTILS_H

data/lib/falsework/templates/c-glib/test/#test.c

@@ -0,0 +1,48 @@
+#include "untest.h"
+
+typedef struct {
+	gchar *s;
+} <%= target_camelcase %>Fixture;
+
+void
+<%= target %>_fixture_setup(<%= target_camelcase %>Fixture *fix, gconstpointer test_file)
+{
+	// don't freak out on g_warning()
+	g_test_log_set_fatal_handler(mylog_fatal_handler, NULL);
+
+	fix->s = g_strdup("hey");
+}
+
+void
+<%= target %>_fixture_teardown(<%= target_camelcase %>Fixture *fix, gconstpointer test_file)
+{
+	g_free(fix->s);
+}
+
+void
+test_foo()
+{
+	g_test_log_set_fatal_handler(mylog_fatal_handler, NULL);
+
+	g_assert_cmpstr("zzz", ==, "zzz");
+}
+
+void
+test_bar(<%= target_camelcase %>Fixture *fix,
+		 gconstpointer test_file)
+{
+	g_assert_cmpstr("hey", ==, fix->s);
+}
+
+int
+main (int argc, char **argv)
+{
+	g_test_init(&argc, &argv, NULL);
+
+	g_test_add_func("/<%= target %>/foo", test_foo);
+	
+	g_test_add("/<%= target %>/bar", <%= target_camelcase %>Fixture, "some data",
+			   <%= target %>_fixture_setup, test_bar, <%= target %>_fixture_teardown);
+	
+	return g_test_run();
+}

data/lib/falsework/templates/c-glib/test/Makefile

@@ -0,0 +1,78 @@
+# -*- makefile -*-
+
+# All tests file names must be in test_xxx.c format. If your tests leave
+# temporal files, add them to GARBAGE variable below.
+#
+# Any xxx.c file will be compiled in xxx file. If you need compile some
+# xxx.c file before running tests, add xxx to TEST_UTILS variable below.
+#
+#
+# Targets:
+#
+# test -- run tests
+# tests -- compile tests
+# exe -- compile *.c files except tests
+
+where-am-i = $(CURDIR)/$(lastword $(MAKEFILE_LIST))
+mk_location := $(realpath $(call where-am-i))
+mk_dir := $(dir $(mk_location))
+
+GARBAGE := 
+
+gnome := glib-2.0
+
+# main source tree
+proj_src := $(mk_dir)../src
+VPATH := $(proj_src)
+
+CFLAGS := -Wall -Wno-pointer-sign -std=c99 -fPIC -pedantic \
+	-I$(proj_src) \
+	$(shell pkg-config --cflags $(gnome) ) \
+	-I/usr/local/include
+
+LDFLAGS := $(shell pkg-config --libs $(gnome) )
+
+# in this dir
+tests := $(basename $(wildcard test_*.c) )
+exe := $(filter-out $(tests),$(basename $(wildcard *.c)) )
+
+# in the source tree
+obj_srcall := $(notdir $(patsubst %.c,%.o,$(wildcard $(proj_src)/*.c)) )
+# c files with main function in them
+src_exe = $(shell ruby -e 'ARGV.each {|i| print(File.basename(i)+" ") if File.read(i) =~ /[[:space:];]*(int|void)\s+main\s*\([^)(]*\)\s*{/ }' $(proj_src)/*.c )
+# exclude $src_exe from to be compiled .o files
+obj_srcexe := $(patsubst %.c,%.o,$(src_exe)) <%= @project %>.o
+obj_src := $(filter-out $(obj_srcexe),$(obj_srcall))
+src_h := $(patsubst %.c,%.o,$(wildcard $(proj_src)/*.h))
+
+# generate test targets for glib test framework
+TEST_PROGS := $(tests)
+# execs required for tests
+TEST_UTILS := mycat
+
+.SECONDEXPANSION:
+
+.PHONY: tests exe clean
+
+all: tests
+
+tests: $(tests)
+exe: $(exe)
+
+$(tests): $$@.o $(obj_src)
+	$(CC) $^ -o $@ $(CFLAGS) $(LDFLAGS)
+
+$(obj_src): $(src_h)
+
+$(exe): $$@.o $(obj_src)
+	$(CC) $^ -o $@ $(CFLAGS) $(LDFLAGS)
+
+include $(mk_dir)/Makefile.test.mk
+
+clean:
+	rm -rf *.core $(tests) $(tests:=.o) \
+		$(exe) $(exe:=.o) $(obj_src) $(GARBAGE)
+
+print-%:
+	@echo $* = $($*)
+	@echo $*\'s origin is $(origin $*)

data/lib/falsework/templates/c-glib/test/Makefile.test.mk

@@ -0,0 +1,72 @@
+# -*- makefile -*-
+
+GARBAGE += test-report.xml full-report.html full-report.xml
+
+GTESTER = gtester
+GTESTER_REPORT = gtester-report
+
+# initialize variables for unconditional += appending
+EXTRA_DIST +=
+TEST_PROGS +=
+
+### testing rules
+
+# test: run all tests in cwd and subdirs
+test: $(TEST_UTILS) $(tests) test-nonrecursive
+	@ for subdir in $(SUBDIRS) . ; do \
+		test "$$subdir" = "." -o "$$subdir" = "po" || \
+		( cd $$subdir && $(MAKE) $(AM_MAKEFLAGS) $@ ) || exit $? ; \
+	done
+
+# test-nonrecursive: run tests only in cwd
+test-nonrecursive: ${TEST_PROGS}
+	@test -z "${TEST_PROGS}" || MALLOC_CHECK_=2 MALLOC_PERTURB_=$$(($${RANDOM:-256} % 256)) ${GTESTER} --verbose ${TEST_PROGS}
+
+# test-report: run tests in subdirs and generate report
+# perf-report: run tests in subdirs with -m perf and generate report
+# full-report: like test-report: with -m perf and -m slow
+test-report perf-report full-report:	${TEST_PROGS}
+	@test -z "${TEST_PROGS}" || { \
+	  case $@ in \
+	  test-report) test_options="-k";; \
+	  perf-report) test_options="-k -m=perf";; \
+	  full-report) test_options="-k -m=perf -m=slow";; \
+	  esac ; \
+	  if test -z "$$GTESTER_LOGDIR" ; then	\
+	    ${GTESTER} --verbose $$test_options -o test-report.xml ${TEST_PROGS} ; \
+	  elif test -n "${TEST_PROGS}" ; then \
+	    ${GTESTER} --verbose $$test_options -o `mktemp "$$GTESTER_LOGDIR/log-XXXXXX"` ${TEST_PROGS} ; \
+	  fi ; \
+	}
+	@ ignore_logdir=true ; \
+	  if test -z "$$GTESTER_LOGDIR" ; then \
+	    GTESTER_LOGDIR=`mktemp -d "\`pwd\`/.testlogs-XXXXXX"`; export GTESTER_LOGDIR ; \
+	    ignore_logdir=false ; \
+	  fi ; \
+	  if test -d "$(top_srcdir)/.git" ; then \
+	    REVISION=`git describe` ; \
+	  else \
+	    REVISION=$(VERSION) ; \
+	  fi ; \
+	  for subdir in $(SUBDIRS) . ; do \
+	    test "$$subdir" = "." -o "$$subdir" = "po" || \
+	    ( cd $$subdir && $(MAKE) $(AM_MAKEFLAGS) $@ ) || exit $? ; \
+	  done ; \
+	  $$ignore_logdir || { \
+	    echo '<?xml version="1.0"?>'              > $@.xml ; \
+	    echo '<report-collection>'               >> $@.xml ; \
+	    echo '<info>'                            >> $@.xml ; \
+	    echo '  <package>$(PACKAGE)</package>'   >> $@.xml ; \
+	    echo '  <version>$(VERSION)</version>'   >> $@.xml ; \
+	    echo "  <revision>$$REVISION</revision>" >> $@.xml ; \
+	    echo '</info>'                           >> $@.xml ; \
+	    for lf in `ls -L "$$GTESTER_LOGDIR"/.` ; do \
+	      sed '1,1s/^<?xml\b[^>?]*?>//' <"$$GTESTER_LOGDIR"/"$$lf" >> $@.xml ; \
+	    done ; \
+	    echo >> $@.xml ; \
+	    echo '</report-collection>' >> $@.xml ; \
+	    rm -rf "$$GTESTER_LOGDIR"/ ; \
+	    ${GTESTER_REPORT} --version 2>/dev/null 1>&2 ; test "$$?" != 0 || ${GTESTER_REPORT} $@.xml >$@.html ; \
+	  }
+
+.PHONY: test test-report perf-report full-report test-nonrecursive

data/lib/falsework/templates/c-glib/test/mycat.c

@@ -0,0 +1,8 @@
+#include "<%= @project %>.h"
+
+int main()
+{
+	char *s = chan_read(fileno(stdin), NULL);
+	fputs(s, stdout);
+	return 0;
+}

data/lib/falsework/templates/c-glib/test/test_utils.c

@@ -0,0 +1,134 @@
+#include "untest.h"
+
+void test_text2utf8()
+{
+	char *ru_utf8 = "\u0430\u0439\u043D\u044D\u043D\u044D";
+	char *ru_1251 = "\xE0\xE9\xED\xFD\xED\xFD";
+
+	char *r = text2utf8(ru_1251, "windows-1251");
+	g_assert(strcmp(r, ru_utf8) == 0);
+	g_free(r);
+
+	r = text2utf8(ru_utf8, "UTF-8");
+	g_assert(strcmp(r, ru_utf8) == 0);
+	g_free(r);
+
+	g_assert_cmpstr(ru_1251, ==, text2utf8(ru_1251, NULL));
+	g_assert_cmpstr(NULL, ==, text2utf8(NULL, "windows-1251"));
+	g_assert_cmpstr(NULL, ==, text2utf8(NULL, NULL));
+}
+
+void
+test_my_strstrip()
+{
+	GString *s = g_string_new("");
+
+	g_assert(!my_strstrip(NULL));
+	
+	char *t1[] = { "q", "\t  q\t", "\t\n\n  q\t\n\r", NULL };
+	char **p;
+	for (p = t1; *p; ++p) {
+		g_string_assign(s, *p);
+		my_strstrip(s);
+		g_assert_cmpstr(s->str, ==, "q");
+		g_assert_cmpint(s->len, ==, strlen("q"));
+	}
+
+	char *t2[] = { "", "\t  \t", " ", NULL };
+	for (p = t2; *p; ++p) {
+		g_string_assign(s, *p);
+		my_strstrip(s);
+		g_assert_cmpstr(s->str, ==, "");
+		g_assert_cmpint(s->len, ==, 0);
+	}
+
+	g_string_assign(s, "This is\na text & only text.");
+	my_strstrip(s);
+	g_assert_cmpstr("This is a text & only text.", ==, s->str);
+		
+	g_string_free(s, TRUE);
+}
+
+void
+test_first()
+{
+	char *q = NULL;
+	char *w = NULL;
+	char *e = "zzz";
+	char *r = NULL;
+
+	g_assert(first(q, w, e, r, &sentinel) == e);
+	g_assert(first(r, e, w, q, &sentinel) == e); // reverse
+	g_assert(first(e, &sentinel) == e);
+	g_assert(first(e, q, w, r, &sentinel) == e);
+	g_assert(first(q, w, r, e, &sentinel) == e);
+	g_assert(first(q, w, r, &sentinel) == NULL);
+	g_assert(first(q, &sentinel) == NULL);
+	g_assert(first(NULL, &sentinel) == NULL);
+	g_assert(first(NULL, NULL, &sentinel) == NULL);
+}
+
+void
+test_chan_read()
+{
+	struct Cmd {
+		char *c;
+		gsize bytes;
+		char *md5;
+	} cmd[] = {
+		{ "./mycat < semis/text/empty.txt", 0, "d41d8cd98f00b204e9800998ecf8427e" },
+		{ "./mycat < Makefile.test.mk", 2753, "f25fbc27b05cf7a33b6d01eb5a0bedb9" },
+		// delete this line if you don't have wordnet installed
+		{ "./mycat < /usr/local/share/WordNet/data.noun", 15300280, "a51f8a16db5be01db3ae95367469c6c7" },
+		{ NULL, -1, NULL }
+	};
+	
+	struct Cmd *p;
+	for (p = cmd; p->c; ++p) {
+		FILE* f = popen(p->c, "r");
+		g_assert(f);
+			
+		char buf[p->bytes];
+		gsize bytes = readn(fileno(f), buf, p->bytes);
+		pclose(f);
+
+		g_assert_cmpint(p->bytes, ==, bytes);
+		gchar *md5 = g_compute_checksum_for_string(G_CHECKSUM_MD5, buf, p->bytes);
+		g_assert_cmpstr(p->md5, ==, md5);
+		g_free(md5);
+	}
+}
+
+void
+test_mylog_set()
+{
+	mylog_to(MYLOG_BITBUCKET);
+	if (g_test_trap_fork(0, G_TEST_TRAP_SILENCE_STDERR)) {
+		g_message("so you say you like logs");
+		exit(0); // successful test run
+    }
+	g_test_trap_assert_passed();
+	g_test_trap_assert_stderr(NULL);
+
+	mylog_to(MYLOG_CONSOLE);
+	if (g_test_trap_fork(0, G_TEST_TRAP_SILENCE_STDERR)) {
+		g_message("so you say you like logs");
+		exit(0); // successful test run
+    }
+	g_test_trap_assert_passed();
+	g_test_trap_assert_stderr("*so you say you like logs*");
+}
+
+int
+main (int argc, char **argv)
+{
+	g_test_init (&argc, &argv, NULL);
+
+	g_test_add_func("/utils/text2utf8", test_text2utf8);
+	g_test_add_func("/utils/my_strstrip", test_my_strstrip);
+	g_test_add_func("/utils/first", test_first);
+	g_test_add_func("/utils/chan_read", test_chan_read);
+	g_test_add_func("/utils/mylog_set", test_mylog_set);
+	
+	return g_test_run();
+}

data/lib/falsework/templates/ruby-naive/#config.yaml

@@ -0,0 +1,15 @@
+---
+:exe:
+- :src: 'bin/%%@project%%'
+  :dest: 'bin/%s'
+  :mode_int: 0744
+
+:doc:
+- :src: 'doc/#doc.rdoc'
+  :dest: 'doc/%s.rdoc'
+  :mode_int: null
+
+:test:
+- :src: 'test/test_%%@project%%.rb'
+  :dest: 'test/test_%s.rb'
+  :mode_int: null

data/lib/falsework/templates/ruby-naive/Gemfile

@@ -0,0 +1,4 @@
+source "http://rubygems.org"
+
+gem "open4", "~>1.2.0"
+gem "git", "~>1.2.5"

data/lib/falsework/templates/{naive/doc/README.rdoc.erb → ruby-naive/README.rdoc}

@@ -1,6 +1,6 @@
 =Name
 
-<%= @project %>-- [TODO: write a summary here.]
+<%= @classy %>--[TODO: write a summary here.]
 
 
 ==Synopsis
@@ -51,6 +51,6 @@ gemdir`/gems/<%= @project %>-x.y.z/etc/</tt> directory for samples.
 
 ==Examples
 
- % ri <%= @project.capitalize %>
+ % ri <%= @camelcase %>
  % <%= @project %> --config-dirs
  % <%= @project %> -V

data/lib/falsework/templates/{naive/Rakefile.erb → ruby-naive/Rakefile}

@@ -9,7 +9,7 @@ gem 'rdoc'
 require 'rdoc/task'
 
 require_relative 'lib/<%= @project %>/meta'
-include <%= @project.capitalize %>
+include <%= @camelcase %>
 
 require_relative 'test/rake_git'