Add tool files.

6 files changed, 485 insertions, 0 deletions

diff --git a/tools/Makefile.am b/tools/Makefile.am
new file mode 100644
index 0000000..8f54004
--- /dev/null
+++ b/tools/Makefile.am
@@ -0,0 +1,6 @@
+EXTRA_DIST = \
+	Makefile.am.test \
+	hexify.cc \
+	test \
+	test.h \
+	testlist
diff --git a/tools/Makefile.am.test b/tools/Makefile.am.test
new file mode 100644
index 0000000..cad2627
--- /dev/null
+++ b/tools/Makefile.am.test
@@ -0,0 +1,21 @@
+Makefile.am.test: ${TEST_SOURCE_DEPS}
+	${TEST_SCRIPT_DIR}/testlist > Makefile.am.test
+	@touch Makefile.am	
+
+test: Makefile.am.test $(TESTFILES)
+	@echo "All tests done."
+
+test_clean:
+	rm -Rf lgov
+	rm -f $(TESTFILES) $(TESTLOGS)
+
+test_report:
+	lcov --directory . --capture --output-file app.info
+	genhtml -o lcov app.info
+
+test_all: test_clean test test_report
+
+TESTLOGS = `for F in ${TESTFILES}; do echo $$F.log; done`
+
+CLEANFILES = $(TESTFILES) $(TESTLOGS) Makefile.am.test *~
+
diff --git a/tools/add_file b/tools/add_file
new file mode 100755
index 0000000..d9deb50
--- /dev/null
+++ b/tools/add_file
@@ -0,0 +1,110 @@
+#!/bin/bash
+PROJECT="Munia"
+
+function allfile() {
+  WHO="`whoami`"
+
+  echo "/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */" > $1;
+  echo "/* vim: set et sw=2 ts=2: */" >> $1;
+  echo "/***************************************************************************" >> $1;
+  echo " *            $1" >> $1;
+  echo " *" >> $1 ;
+  echo " *  `date`" >> $1;
+  echo -n " *  Copyright " >> $1
+  echo -n `date +%Y | xargs` >> $1
+  if [ "$WHO" == "nemo" ];
+  then
+      echo " Jonas Suhr Christensen" >> $1;
+      echo " *  jsc@umbraculum.org" >> $1;
+  fi
+  if [ "$WHO" == "deva" ];
+  then
+      echo " Bent Bisballe Nyeng" >> $1;
+      echo " *  deva@aasimon.org" >> $1;
+  fi
+  if [ "$WHO" == "senator" ];
+  then
+      echo " Lars Bisballe Jensen" >> $1;
+      echo " *  elsenator@gmail.com" >> $1;
+  fi
+  if [ "$WHO" == "piparum" ];
+  then
+      echo " Peter Skaarup" >> $1;
+      echo " *  and piparum@piparum.dk" >> $1;
+  fi
+  echo " ****************************************************************************/" >> $1;
+  echo "" >> $1;
+  echo "/*" >> $1;
+  echo " *  This file is part of $PROJECT." >> $1;
+  echo " *" >> $1;
+  echo " *  $PROJECT is free software; you can redistribute it and/or modify" >> $1;
+  echo " *  it under the terms of the GNU General Public License as published by" >> $1;
+  echo " *  the Free Software Foundation; either version 2 of the License, or" >> $1;
+  echo " *  (at your option) any later version." >> $1;
+  echo " *" >> $1;
+  echo " *  $PROJECT is distributed in the hope that it will be useful," >> $1;
+  echo " *  but WITHOUT ANY WARRANTY; without even the implied warranty of" >> $1;
+  echo " *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the" >> $1;
+  echo " *  GNU General Public License for more details." >> $1;
+  echo " *" >> $1;
+  echo " *  You should have received a copy of the GNU General Public License" >> $1;
+  echo " *  along with $PROJECT; if not, write to the Free Software" >> $1;
+  echo " *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA." >> $1;
+  echo " */" >> $1;
+}
+
+function ccfile() {
+  local hf=`echo -n $1 | cut -d'.' -f1`.h;
+  hfile $hf;
+
+  allfile $1;
+  echo -n '#include "' >> $1;
+  echo -n $hf >> $1;
+  echo '"' >> $1;
+  echo '' >> $1;
+
+  local hn=`echo $1 | cut -d'.' -f1 | tr 'a-z.' 'A-Z_'`
+  echo "#ifdef TEST_${hn}" >> $1;
+  echo "//Additional dependency files" >> $1;
+  echo "//deps:" >> $1;
+  echo "//Required cflags (autoconf vars may be used)" >> $1;
+  echo "//cflags:" >> $1;
+  echo "//Required link options (autoconf vars may be used)" >> $1;
+  echo "//libs:" >> $1;
+  echo "#include \"test.h\"" >> $1;
+  echo "" >> $1;
+  echo "TEST_BEGIN;" >> $1;
+  echo "" >> $1;
+  echo "// TODO: Put some testcode here (see test.h for usable macros)." >> $1;
+  echo "TEST_TRUE(false, \"No tests yet!\");" >> $1;
+  echo "" >> $1;
+  echo "TEST_END;" >> $1;
+  echo "" >> $1;
+  echo "#endif/*TEST_${hn}*/" >> $1;
+}
+
+function hfile() {
+  allfile $1;
+  local hn=`echo $1 | tr 'a-z.' 'A-Z_'`
+  local pr=`echo $PROJECT | tr 'a-z.' 'A-Z_'`
+  echo "#ifndef __${pr}_${hn}__" >> $1;
+  echo "#define __${pr}_${hn}__" >> $1;
+  echo "#endif/*__${pr}_${hn}__*/" >> $1;
+}
+
+if [ "$#" = "1" ]; then
+if [ "CC" = `echo $1 | cut -d'.' -f2 | tr 'a-z' 'A-Z'` ]; then
+  ccfile $1;
+fi;
+if [ "H" = `echo $1 | cut -d'.' -f2 | tr 'a-z' 'A-Z'` ]; then
+  hfile $1;
+fi;
+else
+  echo "Usage: $0 filename";
+  echo
+  echo "Examples:";
+  echo "$0 myclass.cc      Which will produce both myclass.cc and myclass.h";
+  echo "$0 myinterface.h   Which will only produce myinterface.h";
+  echo
+  echo "NOTE: The files will be created in the current directory!";
+fi;
diff --git a/tools/test b/tools/test
new file mode 100755
index 0000000..ec54e70
--- /dev/null
+++ b/tools/test
@@ -0,0 +1,55 @@
+#!/bin/bash
+
+TEST=`echo -n $1 | cut -d'.' -f1`
+UPPER=`echo $TEST | tr 'a-z.' 'A-Z_'`
+OUTPUT=test_$TEST
+DEFINE=TEST_$UPPER
+
+SCRIPTDIR=`dirname $0`
+
+INFILE=$1
+shift
+OBJFILES=""
+for f in $TEST_DEPS
+do
+    of=`echo -n $f | cut -d'.' -f1`.o;
+    OBJFILES="$OBJFILES $of"
+done
+
+COMMON_FLAGS="-DHAVE_CONFIG_H -I$SCRIPTDIR -O0 -g -D$DEFINE $TEST_LIBS $TEST_CFLAGS"
+CLEAN="rm -f $OBJFILES"
+PRECOMPILE="g++ -c $TEST_DEPS $COMMON_FLAGS"
+COMPILE="g++ -fprofile-arcs -ftest-coverage -fno-elide-constructors -Wall -Werror $COMMON_FLAGS -o $OUTPUT $INFILE $OBJFILES"
+
+echo -e "\033[0;2mTesting $TEST:"
+echo Testing $TEST: > $OUTPUT.log
+
+echo -n "* Compiling $TEST test"
+echo Compiling $TEST test: > $OUTPUT.log
+
+echo ${CLEAN} >> $OUTPUT.log
+${CLEAN} >> ${OUTPUT}.log 2>&1
+echo ${PRECOMPILE} >> $OUTPUT.log
+${PRECOMPILE} >> ${OUTPUT}.log 2>&1
+echo ${COMPILE} >> $OUTPUT.log
+
+if ${COMPILE} >> ${OUTPUT}.log 2>&1; then
+	echo -e "\r\t\t\t\t\t\t[\033[1;32mSuccess\033[0;2m]"
+	echo "[Success]" >> $OUTPUT.log
+
+	echo -n "* Running   $TEST test"
+	echo Running $TEST test: >> $OUTPUT.log
+	if ./$OUTPUT >> $OUTPUT.log 2>&1; then
+	        echo -e "\r\t\t\t\t\t\t[\033[1;32mSuccess\033[0;2m]"
+		echo "[Success]" >> $OUTPUT.log
+	else
+		echo -e "\r\t\t\t\t\t\t[\033[1;31mFailure\033[0;2m]"
+		echo "[Failure]" >> $OUTPUT.log
+		rm -f $OUTPUT
+	fi
+else
+	echo -e "\r\t\t\t\t\t\t[\033[1;31mFailure\033[0;2m]"
+	echo "[Failure]" >> $OUTPUT.log
+fi
+
+echo
\ No newline at end of file
diff --git a/tools/test.h b/tools/test.h
new file mode 100644
index 0000000..4770a1e
--- /dev/null
+++ b/tools/test.h
@@ -0,0 +1,262 @@
+/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
+/* vim: set et sw=2 ts=2: */
+/***************************************************************************
+ *            test.h
+ *
+ *  Wed Dec 16 12:33:19 CET 2009
+ *  Copyright 2009 Bent Bisballe Nyeng
+ *  deva@aasimon.org
+ ****************************************************************************/
+
+/*
+ *  This file is part of Pracro.
+ *
+ *  Pracro 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 2 of the License, or
+ *  (at your option) any later version.
+ *
+ *  Pracro 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 Pracro; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.
+ */
+#ifndef __PRACRO_TEST_H__
+#define __PRACRO_TEST_H__
+
+#include <stdio.h>
+
+#define TEST_REPORT {                                                 \
+    fprintf(stderr, "\nTest report:\n%d tests\n%d test failed.\n",    \
+            TEST_num_tests, TEST_num_fails);                          \
+  }
+
+#define TEST_BEGIN           \
+  int main() {               \
+  int TEST_num_fails = 0;    \
+  int TEST_num_tests = 0;    \
+  {}
+
+#define TEST_END {                \
+    TEST_REPORT;                  \
+    return TEST_num_fails != 0;   \
+  } }
+
+#define TEST_OK(m) {                  \
+    fprintf(stderr, "  OK: "m"\n");   \
+  }
+
+#define TEST_FAIL(m) {                                    \
+    fprintf(stderr, "  FAIL: "m"\t\t\t<------------\n");  \
+    TEST_num_fails++;                                     \
+  }
+
+#define TEST_FATAL(m) {                                   \
+  fprintf(stderr, "FATAL: %s\t\t\t<============\n", m);   \
+  TEST_num_fails++;                                       \
+  { TEST_END; }
+
+#define TEST_MSG(fmt...) {                      \
+    fprintf(stderr, "\n");                      \
+    fprintf(stderr, fmt);                       \
+    fprintf(stderr, " (line %d)\n", __LINE__);  \
+  }
+
+#define TEST_BASE(fmt...) {      \
+    TEST_num_tests++;            \
+    TEST_MSG(fmt);               \
+  }
+
+#define TEST_TRUE(x, fmt...) {              \
+    TEST_BASE(fmt);                         \
+    if(x) { TEST_OK(#x" is true.") }        \
+    else { TEST_FAIL(#x" is not true.") }   \
+  }
+
+#define TEST_FALSE(x, fmt...) {             \
+    TEST_BASE(fmt);                         \
+    if(!x) { TEST_OK(#x" is false.") }      \
+    else { TEST_FAIL(#x" is not false.") }  \
+  }
+
+#define TEST_EQUAL(x, y, fmt...) {                     \
+    TEST_BASE(fmt);                                    \
+    if(x == y) { TEST_OK(#x" and "#y" are equal.") }   \
+    else { TEST_FAIL(#x" and "#y" are not equal.") }   \
+  }
+
+#define TEST_NOTEQUAL(x, y, fmt...) {                      \
+    TEST_BASE(fmt);                                        \
+    if(x != y) { TEST_OK(#x" and "#y" are not equal.") }   \
+    else { TEST_FAIL(#x" and "#y" are equal.") }           \
+  }
+
+#define TEST_GREATER_THAN(x, y, fmt...) {                 \
+    TEST_BASE(fmt);                                       \
+    if(x > y) { TEST_OK(#x" are greater than "#y".") }    \
+    else { TEST_FAIL(#x" are not greater than "#y".") }   \
+  }
+
+#define TEST_LESS_THAN(x, y, fmt...) {                      \
+    TEST_BASE(fmt);                                         \
+    if(x < y) { TEST_OK(#x" are less than "#y".") }         \
+    else { TEST_FAIL(#x" are not less than "#y".") }        \
+  }
+
+#define TEST_EQUAL_STR(x, y, fmt...) {                       \
+    TEST_BASE(fmt);                                          \
+    std::string __s1 = x;                                    \
+    std::string __s2 = y;                                    \
+    fprintf(stderr, "Comparing: \"%s\" == \"%s\"\n",         \
+            __s1.c_str(), __s2.c_str());                     \
+    if(__s1 == __s2) {                                       \
+      TEST_OK(#x" and "#y" are equal.");                     \
+    } else {                                                 \
+      TEST_FAIL(#x" and "#y" are not equal.");               \
+    }                                                        \
+  }
+
+#define TEST_NOTEQUAL_STR(x, y, fmt...) {                    \
+    TEST_BASE(fmt);                                          \
+    std::string __s1 = x;                                    \
+    std::string __s2 = y;                                    \
+    fprintf(stderr, "Comparing: \"%s\" != \"%s\"\n",         \
+            __s1.c_str(), __s2.c_str());                     \
+    if(__s1 != __s2) {                                       \
+      TEST_OK(#x" and "#y" not are equal.");                 \
+    } else {                                                 \
+      TEST_FAIL(#x" and "#y" are equal.");                   \
+    }                                                        \
+  }
+
+#define TEST_EQUAL_INT(x, y, fmt...) {                        \
+    TEST_BASE(fmt);                                           \
+    int i1 = x;                                               \
+    int i2 = y;                                               \
+    fprintf(stderr, "Comparing: \"%d\" == \"%d\"\n", i1, i2); \
+    if(i1 == i2) {                                            \
+      TEST_OK(#x" and "#y" are equal.");                      \
+    } else {                                                  \
+      TEST_FAIL(#x" and "#y" are not equal.");                \
+    }                                                         \
+  }
+
+#define TEST_NOTEQUAL_INT(x, y, fmt...) {                     \
+    TEST_BASE(fmt);                                           \
+    int i1 = x;                                               \
+    int i2 = y;                                               \
+    fprintf(stderr, "Comparing: \"%d\" != \"%d\"\n", i1, i2); \
+    if(i1 != i2) {                                            \
+      TEST_OK(#x" and "#y" are not equal.");                  \
+    } else {                                                  \
+      TEST_FAIL(#x" and "#y" are equal.");                    \
+    }                                                         \
+  }
+
+#define TEST_EQUAL_FLOAT(x, y, fmt...) {                      \
+    TEST_BASE(fmt);                                           \
+    double d1 = x;                                            \
+    double d2 = y;                                            \
+    fprintf(stderr, "Comparing: \"%f\" == \"%f\"\n", d1, d2); \
+    if(d1 == d2) {                                            \
+      TEST_OK(#x" and "#y" are equal.");                      \
+    } else {                                                  \
+      TEST_FAIL(#x" and "#y" are not equal.");                \
+    }                                                         \
+  }
+
+#define TEST_NOTEQUAL_FLOAT(x, y, fmt...) {                   \
+    TEST_BASE(fmt);                                           \
+    double d1 = x;                                            \
+    double d2 = y;                                            \
+    fprintf(stderr, "Comparing: \"%f\" != \"%f\"\n", d1, d2); \
+    if(d1 != d2) {                                            \
+      TEST_OK(#x" and "#y" are not equal.");                  \
+    } else {                                                  \
+      TEST_FAIL(#x" and "#y" are equal.");                    \
+    }                                                         \
+  }
+
+#define TEST_GREATER_THAN_INT(x, y, fmt...) {                  \
+    TEST_BASE(fmt);                                            \
+    int i1 = x;                                                \
+    int i2 = y;                                                \
+    fprintf(stderr, "Comparing: \"%d\" > \"%d\"\n", i1, i2);   \
+    if(i1 > i2) {                                              \
+      TEST_OK(#x" are greater than "#y".");                    \
+    } else {                                                   \
+      TEST_FAIL(#x" are not greater than "#y".");              \
+    }                                                          \
+  }
+
+#define TEST_LESS_THAN_INT(x, y, fmt...) {                         \
+    TEST_BASE(fmt);                                                \
+    int i1 = x;                                                    \
+    int i2 = y;                                                    \
+    fprintf(stderr, "Comparing: \"%d\" < \"%d\"\n", i1, i2);       \
+    if(i1 < i2) {                                                  \
+      TEST_OK(#x" are less than "#y".");                           \
+    } else {                                                       \
+      TEST_FAIL(#x" are not less than "#y".");                     \
+    }                                                              \
+  }
+
+#define TEST_GREATER_THAN_FLOAT(x, y, fmt...) {                 \
+    TEST_BASE(fmt);                                             \
+    double d1 = x;                                              \
+    double d2 = y;                                              \
+    fprintf(stderr, "Comparing: \"%f\" > \"%f\"\n", d1, d2);    \
+    if(d1 > d2) {                                               \
+      TEST_OK(#x" are greater than "#y".");                     \
+    } else {                                                    \
+      TEST_FAIL(#x" are not greater than "#y".");               \
+    }                                                           \
+  }
+
+#define TEST_LESS_THAN_FLOAT(x, y, fmt...) {                       \
+    TEST_BASE(fmt);                                                \
+    double d1 = x;                                                 \
+    double d2 = y;                                                 \
+    fprintf(stderr, "Comparing: \"%f\" < \"%f\"\n", d1, d2);       \
+    if(d1 < d2) {                                                  \
+      TEST_OK(#x" are less than "#y".");                           \
+    } else {                                                       \
+      TEST_FAIL(#x" are not less than "#y".");                     \
+    }                                                              \
+  }
+
+#define TEST_EXCEPTION(x, y, fmt...) {                        \
+    TEST_BASE(fmt);                                           \
+    try {                                                     \
+      x;                                                      \
+      TEST_FAIL("Exception "#y" was not trown.");             \
+    } catch( y &e ) {                                         \
+      TEST_OK("Exception "#y" was thrown as expected.");      \
+    }                                                         \
+  }
+
+#define TEST_NOTEXCEPTION(x, y, fmt...) {                     \
+    TEST_BASE(fmt);                                           \
+    try {                                                     \
+      x;                                                      \
+      TEST_OK("Exception "#y" was not trown as expected");    \
+    } catch( y &e ) {                                         \
+      TEST_FAIL("Exception "#y" was thrown.");                \
+    }                                                         \
+  }
+
+#define TEST_NOEXCEPTION(x, fmt...) {                         \
+    TEST_BASE(fmt);                                           \
+    try {                                                     \
+      x;                                                      \
+      TEST_OK("Exception was not trown as expected");         \
+    } catch( ... ) {                                          \
+      TEST_FAIL("Exception was thrown.");                     \
+    }                                                         \
+  }
+
+#endif/*__PRACRO_TEST_H__*/
diff --git a/tools/testlist b/tools/testlist
new file mode 100755
index 0000000..01a48e2
--- /dev/null
+++ b/tools/testlist
@@ -0,0 +1,31 @@
+#!/bin/bash
+
+SCRIPTDIR=`dirname $0`
+
+grep -l "TEST_BEGIN" *.cc > tmp
+
+echo -n "TESTFILES="
+while read LINE
+do
+		FILE=$LINE
+		NAME=`echo $FILE | cut -d'.' -f1`
+		TEST=test_$NAME
+		echo -ne "$TEST "
+done < tmp
+echo ""
+echo ""
+
+while read LINE
+do
+		FILE=$LINE
+		NAME=`echo $FILE | cut -d'.' -f1`
+		DEPS=`cat $FILE | grep "deps:" | cut -d':' -f2`
+		LIBS=`cat $FILE | grep "libs:" | cut -d':' -f2`
+		CFLAGS=`cat $FILE | grep "cflags:" | cut -d':' -f2`
+		TEST=test_$NAME
+		echo "$TEST: $FILE $DEPS"
+		echo -e "\t@TEST_DEPS=\"$DEPS\" TEST_CFLAGS=\"$CFLAGS\" TEST_LIBS=\"$LIBS\" ${SCRIPTDIR}/test $FILE"
+		echo ""
+done < tmp
+
+rm -f tmp
\ No newline at end of file