Initial start for NewIfc

Basically, the intent is to do a modern (for C) interface which
allows reproducing the look and feel of uifc but without hurting
as much.

The intent is to support a tree of objects, each of which have
an attribute get/set function as their main interface.

Various callbacks will be supported for various object types, and
positioning will be relative to the "child area" of the parent.

The SyncTERM main screen is expected to look something like:
root
+--frame (dialing directory)
|  +--list
+--frame (settings)
|  +--list
+--textinput (comment)

Internally, the code is wildly type-unsafe, but there's an
auto-generated API (which is the only thing exported) that is
type-safe.

This also introduces the CuTest C test suite as an experiment.

src/cutest/AllTests.c

+#include <stdio.h>
+
+#include "CuTest.h"
+
+CuSuite* CuGetSuite();
+CuSuite* CuStringGetSuite();
+
+void RunAllTests(void)
+{
+	CuString *output = CuStringNew();
+	CuSuite* suite = CuSuiteNew();
+
+	CuSuiteAddSuite(suite, CuGetSuite());
+	CuSuiteAddSuite(suite, CuStringGetSuite());
+
+	CuSuiteRun(suite);
+	CuSuiteSummary(suite, output);
+	CuSuiteDetails(suite, output);
+	printf("%s\n", output->buffer);
+}
+
+int main(void)
+{
+	RunAllTests();
+}

src/cutest/CuTest.c

+#include <assert.h>
+#include <setjmp.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <math.h>
+
+#include "CuTest.h"
+
+/*-------------------------------------------------------------------------*
+ * CuStr
+ *-------------------------------------------------------------------------*/
+
+char* CuStrAlloc(int size)
+{
+	char* newStr = (char*) malloc( sizeof(char) * (size) );
+	return newStr;
+}
+
+char* CuStrCopy(const char* old)
+{
+	int len = strlen(old);
+	char* newStr = CuStrAlloc(len + 1);
+	strcpy(newStr, old);
+	return newStr;
+}
+
+/*-------------------------------------------------------------------------*
+ * CuString
+ *-------------------------------------------------------------------------*/
+
+void CuStringInit(CuString* str)
+{
+	str->length = 0;
+	str->size = STRING_MAX;
+	str->buffer = (char*) malloc(sizeof(char) * str->size);
+	str->buffer[0] = '\0';
+}
+
+CuString* CuStringNew(void)
+{
+	CuString* str = (CuString*) malloc(sizeof(CuString));
+	str->length = 0;
+	str->size = STRING_MAX;
+	str->buffer = (char*) malloc(sizeof(char) * str->size);
+	str->buffer[0] = '\0';
+	return str;
+}
+
+void CuStringDelete(CuString *str)
+{
+        if (!str) return;
+        free(str->buffer);
+        free(str);
+}
+
+void CuStringResize(CuString* str, int newSize)
+{
+	str->buffer = (char*) realloc(str->buffer, sizeof(char) * newSize);
+	str->size = newSize;
+}
+
+void CuStringAppend(CuString* str, const char* text)
+{
+	int length;
+
+	if (text == NULL) {
+		text = "NULL";
+	}
+
+	length = strlen(text);
+	if (str->length + length + 1 >= str->size)
+		CuStringResize(str, str->length + length + 1 + STRING_INC);
+	str->length += length;
+	strcat(str->buffer, text);
+}
+
+void CuStringAppendChar(CuString* str, char ch)
+{
+	char text[2];
+	text[0] = ch;
+	text[1] = '\0';
+	CuStringAppend(str, text);
+}
+
+void CuStringAppendFormat(CuString* str, const char* format, ...)
+{
+	va_list argp;
+	char buf[HUGE_STRING_LEN];
+	va_start(argp, format);
+	vsprintf(buf, format, argp);
+	va_end(argp);
+	CuStringAppend(str, buf);
+}
+
+void CuStringInsert(CuString* str, const char* text, int pos)
+{
+	int length = strlen(text);
+	if (pos > str->length)
+		pos = str->length;
+	if (str->length + length + 1 >= str->size)
+		CuStringResize(str, str->length + length + 1 + STRING_INC);
+	memmove(str->buffer + pos + length, str->buffer + pos, (str->length - pos) + 1);
+	str->length += length;
+	memcpy(str->buffer + pos, text, length);
+}
+
+/*-------------------------------------------------------------------------*
+ * CuTest
+ *-------------------------------------------------------------------------*/
+
+void CuTestInit(CuTest* t, const char* name, TestFunction function)
+{
+	t->name = CuStrCopy(name);
+	t->failed = 0;
+	t->ran = 0;
+	t->message = NULL;
+	t->function = function;
+	t->jumpBuf = NULL;
+}
+
+CuTest* CuTestNew(const char* name, TestFunction function)
+{
+	CuTest* tc = CU_ALLOC(CuTest);
+	CuTestInit(tc, name, function);
+	return tc;
+}
+
+void CuTestDelete(CuTest *t)
+{
+        if (!t) return;
+        free(t->name);
+        free(t);
+}
+
+void CuTestRun(CuTest* tc)
+{
+	jmp_buf buf;
+	tc->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		tc->ran = 1;
+		(tc->function)(tc);
+	}
+	tc->jumpBuf = 0;
+}
+
+static void CuFailInternal(CuTest* tc, const char* file, int line, CuString* string)
+{
+	char buf[HUGE_STRING_LEN];
+
+	sprintf(buf, "%s:%d: ", file, line);
+	CuStringInsert(string, buf, 0);
+
+	tc->failed = 1;
+	tc->message = string->buffer;
+	if (tc->jumpBuf != 0) longjmp(*(tc->jumpBuf), 0);
+}
+
+void CuFail_Line(CuTest* tc, const char* file, int line, const char* message2, const char* message)
+{
+	CuString string;
+
+	CuStringInit(&string);
+	if (message2 != NULL) 
+	{
+		CuStringAppend(&string, message2);
+		CuStringAppend(&string, ": ");
+	}
+	CuStringAppend(&string, message);
+	CuFailInternal(tc, file, line, &string);
+}
+
+void CuAssert_Line(CuTest* tc, const char* file, int line, const char* message, int condition)
+{
+	if (condition) return;
+	CuFail_Line(tc, file, line, NULL, message);
+}
+
+void CuAssertStrEquals_LineMsg(CuTest* tc, const char* file, int line, const char* message, 
+	const char* expected, const char* actual)
+{
+	CuString string;
+	if ((expected == NULL && actual == NULL) ||
+	    (expected != NULL && actual != NULL &&
+	     strcmp(expected, actual) == 0))
+	{
+		return;
+	}
+
+	CuStringInit(&string);
+	if (message != NULL) 
+	{
+		CuStringAppend(&string, message);
+		CuStringAppend(&string, ": ");
+	}
+	CuStringAppend(&string, "expected <");
+	CuStringAppend(&string, expected);
+	CuStringAppend(&string, "> but was <");
+	CuStringAppend(&string, actual);
+	CuStringAppend(&string, ">");
+	CuFailInternal(tc, file, line, &string);
+}
+
+void CuAssertIntEquals_LineMsg(CuTest* tc, const char* file, int line, const char* message, 
+	int expected, int actual)
+{
+	char buf[STRING_MAX];
+	if (expected == actual) return;
+	sprintf(buf, "expected <%d> but was <%d>", expected, actual);
+	CuFail_Line(tc, file, line, message, buf);
+}
+
+void CuAssertDblEquals_LineMsg(CuTest* tc, const char* file, int line, const char* message, 
+	double expected, double actual, double delta)
+{
+	char buf[STRING_MAX];
+	if (fabs(expected - actual) <= delta) return;
+	sprintf(buf, "expected <%f> but was <%f>", expected, actual); 
+
+	CuFail_Line(tc, file, line, message, buf);
+}
+
+void CuAssertPtrEquals_LineMsg(CuTest* tc, const char* file, int line, const char* message, 
+	void* expected, void* actual)
+{
+	char buf[STRING_MAX];
+	if (expected == actual) return;
+	sprintf(buf, "expected pointer <0x%p> but was <0x%p>", expected, actual);
+	CuFail_Line(tc, file, line, message, buf);
+}
+
+
+/*-------------------------------------------------------------------------*
+ * CuSuite
+ *-------------------------------------------------------------------------*/
+
+void CuSuiteInit(CuSuite* testSuite)
+{
+	testSuite->count = 0;
+	testSuite->failCount = 0;
+        memset(testSuite->list, 0, sizeof(testSuite->list));
+}
+
+CuSuite* CuSuiteNew(void)
+{
+	CuSuite* testSuite = CU_ALLOC(CuSuite);
+	CuSuiteInit(testSuite);
+	return testSuite;
+}
+
+void CuSuiteDelete(CuSuite *testSuite)
+{
+        unsigned int n;
+        for (n=0; n < MAX_TEST_CASES; n++)
+        {
+                if (testSuite->list[n])
+                {
+                        CuTestDelete(testSuite->list[n]);
+                }
+        }
+        free(testSuite);
+
+}
+
+void CuSuiteAdd(CuSuite* testSuite, CuTest *testCase)
+{
+	assert(testSuite->count < MAX_TEST_CASES);
+	testSuite->list[testSuite->count] = testCase;
+	testSuite->count++;
+}
+
+void CuSuiteAddSuite(CuSuite* testSuite, CuSuite* testSuite2)
+{
+	int i;
+	for (i = 0 ; i < testSuite2->count ; ++i)
+	{
+		CuTest* testCase = testSuite2->list[i];
+		CuSuiteAdd(testSuite, testCase);
+	}
+}
+
+void CuSuiteRun(CuSuite* testSuite)
+{
+	int i;
+	for (i = 0 ; i < testSuite->count ; ++i)
+	{
+		CuTest* testCase = testSuite->list[i];
+		CuTestRun(testCase);
+		if (testCase->failed) { testSuite->failCount += 1; }
+	}
+}
+
+void CuSuiteSummary(CuSuite* testSuite, CuString* summary)
+{
+	int i;
+	for (i = 0 ; i < testSuite->count ; ++i)
+	{
+		CuTest* testCase = testSuite->list[i];
+		CuStringAppend(summary, testCase->failed ? "F" : ".");
+	}
+	CuStringAppend(summary, "\n\n");
+}
+
+void CuSuiteDetails(CuSuite* testSuite, CuString* details)
+{
+	int i;
+	int failCount = 0;
+
+	if (testSuite->failCount == 0)
+	{
+		int passCount = testSuite->count - testSuite->failCount;
+		const char* testWord = passCount == 1 ? "test" : "tests";
+		CuStringAppendFormat(details, "OK (%d %s)\n", passCount, testWord);
+	}
+	else
+	{
+		if (testSuite->failCount == 1)
+			CuStringAppend(details, "There was 1 failure:\n");
+		else
+			CuStringAppendFormat(details, "There were %d failures:\n", testSuite->failCount);
+
+		for (i = 0 ; i < testSuite->count ; ++i)
+		{
+			CuTest* testCase = testSuite->list[i];
+			if (testCase->failed)
+			{
+				failCount++;
+				CuStringAppendFormat(details, "%d) %s: %s\n",
+					failCount, testCase->name, testCase->message);
+			}
+		}
+		CuStringAppend(details, "\n!!!FAILURES!!!\n");
+
+		CuStringAppendFormat(details, "Runs: %d ",   testSuite->count);
+		CuStringAppendFormat(details, "Passes: %d ", testSuite->count - testSuite->failCount);
+		CuStringAppendFormat(details, "Fails: %d\n",  testSuite->failCount);
+	}
+}

src/cutest/CuTest.h

+#ifndef CU_TEST_H
+#define CU_TEST_H
+
+#include <setjmp.h>
+#include <stdarg.h>
+
+#define CUTEST_VERSION  "CuTest 1.5"
+
+/* CuString */
+
+char* CuStrAlloc(int size);
+char* CuStrCopy(const char* old);
+
+#define CU_ALLOC(TYPE)		((TYPE*) malloc(sizeof(TYPE)))
+
+#define HUGE_STRING_LEN	8192
+#define STRING_MAX		256
+#define STRING_INC		256
+
+typedef struct
+{
+	int length;
+	int size;
+	char* buffer;
+} CuString;
+
+void CuStringInit(CuString* str);
+CuString* CuStringNew(void);
+void CuStringRead(CuString* str, const char* path);
+void CuStringAppend(CuString* str, const char* text);
+void CuStringAppendChar(CuString* str, char ch);
+void CuStringAppendFormat(CuString* str, const char* format, ...);
+void CuStringInsert(CuString* str, const char* text, int pos);
+void CuStringResize(CuString* str, int newSize);
+void CuStringDelete(CuString* str);
+
+/* CuTest */
+
+typedef struct CuTest CuTest;
+
+typedef void (*TestFunction)(CuTest *);
+
+struct CuTest
+{
+	char* name;
+	TestFunction function;
+	int failed;
+	int ran;
+	const char* message;
+	jmp_buf *jumpBuf;
+};
+
+void CuTestInit(CuTest* t, const char* name, TestFunction function);
+CuTest* CuTestNew(const char* name, TestFunction function);
+void CuTestRun(CuTest* tc);
+void CuTestDelete(CuTest *t);
+
+/* Internal versions of assert functions -- use the public versions */
+void CuFail_Line(CuTest* tc, const char* file, int line, const char* message2, const char* message);
+void CuAssert_Line(CuTest* tc, const char* file, int line, const char* message, int condition);
+void CuAssertStrEquals_LineMsg(CuTest* tc, 
+	const char* file, int line, const char* message, 
+	const char* expected, const char* actual);
+void CuAssertIntEquals_LineMsg(CuTest* tc, 
+	const char* file, int line, const char* message, 
+	int expected, int actual);
+void CuAssertDblEquals_LineMsg(CuTest* tc, 
+	const char* file, int line, const char* message, 
+	double expected, double actual, double delta);
+void CuAssertPtrEquals_LineMsg(CuTest* tc, 
+	const char* file, int line, const char* message, 
+	void* expected, void* actual);
+
+/* public assert functions */
+
+#define CuFail(tc, ms)                        CuFail_Line(  (tc), __FILE__, __LINE__, NULL, (ms))
+#define CuAssert(tc, ms, cond)                CuAssert_Line((tc), __FILE__, __LINE__, (ms), (cond))
+#define CuAssertTrue(tc, cond)                CuAssert_Line((tc), __FILE__, __LINE__, "assert failed", (cond))
+
+#define CuAssertStrEquals(tc,ex,ac)           CuAssertStrEquals_LineMsg((tc),__FILE__,__LINE__,NULL,(ex),(ac))
+#define CuAssertStrEquals_Msg(tc,ms,ex,ac)    CuAssertStrEquals_LineMsg((tc),__FILE__,__LINE__,(ms),(ex),(ac))
+#define CuAssertIntEquals(tc,ex,ac)           CuAssertIntEquals_LineMsg((tc),__FILE__,__LINE__,NULL,(ex),(ac))
+#define CuAssertIntEquals_Msg(tc,ms,ex,ac)    CuAssertIntEquals_LineMsg((tc),__FILE__,__LINE__,(ms),(ex),(ac))
+#define CuAssertDblEquals(tc,ex,ac,dl)        CuAssertDblEquals_LineMsg((tc),__FILE__,__LINE__,NULL,(ex),(ac),(dl))
+#define CuAssertDblEquals_Msg(tc,ms,ex,ac,dl) CuAssertDblEquals_LineMsg((tc),__FILE__,__LINE__,(ms),(ex),(ac),(dl))
+#define CuAssertPtrEquals(tc,ex,ac)           CuAssertPtrEquals_LineMsg((tc),__FILE__,__LINE__,NULL,(ex),(ac))
+#define CuAssertPtrEquals_Msg(tc,ms,ex,ac)    CuAssertPtrEquals_LineMsg((tc),__FILE__,__LINE__,(ms),(ex),(ac))
+
+#define CuAssertPtrNotNull(tc,p)        CuAssert_Line((tc),__FILE__,__LINE__,"null pointer unexpected",(p != NULL))
+#define CuAssertPtrNotNullMsg(tc,msg,p) CuAssert_Line((tc),__FILE__,__LINE__,(msg),(p != NULL))
+
+/* CuSuite */
+
+#define MAX_TEST_CASES	1024
+
+#define SUITE_ADD_TEST(SUITE,TEST)	CuSuiteAdd(SUITE, CuTestNew(#TEST, TEST))
+
+typedef struct
+{
+	int count;
+	CuTest* list[MAX_TEST_CASES];
+	int failCount;
+
+} CuSuite;
+
+
+void CuSuiteInit(CuSuite* testSuite);
+CuSuite* CuSuiteNew(void);
+void CuSuiteDelete(CuSuite *testSuite);
+void CuSuiteAdd(CuSuite* testSuite, CuTest *testCase);
+void CuSuiteAddSuite(CuSuite* testSuite, CuSuite* testSuite2);
+void CuSuiteRun(CuSuite* testSuite);
+void CuSuiteSummary(CuSuite* testSuite, CuString* summary);
+void CuSuiteDetails(CuSuite* testSuite, CuString* details);
+
+#endif /* CU_TEST_H */

src/cutest/CuTestTest.c

+#include <assert.h>
+#include <setjmp.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+
+#include "CuTest.h"
+
+/*-------------------------------------------------------------------------*
+ * Helper functions
+ *-------------------------------------------------------------------------*/
+
+#define CompareAsserts(tc, message, expected, actual)  X_CompareAsserts((tc), __FILE__, __LINE__, (message), (expected), (actual))
+
+static void X_CompareAsserts(CuTest* tc, const char *file, int line, const char* message, const char* expected, const char* actual)
+{
+	int mismatch;
+	if (expected == NULL || actual == NULL) {
+		mismatch = (expected != NULL || actual != NULL);
+	} else {
+		const char *front = __FILE__ ":";
+		const size_t frontLen = strlen(front);
+		const size_t expectedLen = strlen(expected);
+
+		const char *matchStr = actual;
+
+		mismatch = (strncmp(matchStr, front, frontLen) != 0);
+		if (!mismatch) {
+			matchStr = strchr(matchStr + frontLen, ':');
+			mismatch |= (matchStr == NULL || strncmp(matchStr, ": ", 2));
+			if (!mismatch) {
+				matchStr += 2;
+				mismatch |= (strncmp(matchStr, expected, expectedLen) != 0);
+			}
+		}
+	}
+
+	CuAssert_Line(tc, file, line, message, !mismatch);
+}
+
+/*-------------------------------------------------------------------------*
+ * CuString Test
+ *-------------------------------------------------------------------------*/
+
+void TestCuStringNew(CuTest* tc)
+{
+	CuString* str = CuStringNew();
+	CuAssertTrue(tc, 0 == str->length);
+	CuAssertTrue(tc, 0 != str->size);
+	CuAssertStrEquals(tc, "", str->buffer);
+}
+
+
+void TestCuStringAppend(CuTest* tc)
+{
+	CuString* str = CuStringNew();
+	CuStringAppend(str, "hello");
+	CuAssertIntEquals(tc, 5, str->length);
+	CuAssertStrEquals(tc, "hello", str->buffer);
+	CuStringAppend(str, " world");
+	CuAssertIntEquals(tc, 11, str->length);
+	CuAssertStrEquals(tc, "hello world", str->buffer);
+}
+
+
+void TestCuStringAppendNULL(CuTest* tc)
+{
+	CuString* str = CuStringNew();
+	CuStringAppend(str, NULL);
+	CuAssertIntEquals(tc, 4, str->length);
+	CuAssertStrEquals(tc, "NULL", str->buffer);
+}
+
+
+void TestCuStringAppendChar(CuTest* tc)
+{
+	CuString* str = CuStringNew();
+	CuStringAppendChar(str, 'a');
+	CuStringAppendChar(str, 'b');
+	CuStringAppendChar(str, 'c');
+	CuStringAppendChar(str, 'd');
+	CuAssertIntEquals(tc, 4, str->length);
+	CuAssertStrEquals(tc, "abcd", str->buffer);
+}
+
+
+void TestCuStringInserts(CuTest* tc)
+{
+	CuString* str = CuStringNew();
+	CuStringAppend(str, "world");
+	CuAssertIntEquals(tc, 5, str->length);
+	CuAssertStrEquals(tc, "world", str->buffer);
+	CuStringInsert(str, "hell", 0);
+	CuAssertIntEquals(tc, 9, str->length);
+	CuAssertStrEquals(tc, "hellworld", str->buffer);
+	CuStringInsert(str, "o ", 4);
+	CuAssertIntEquals(tc, 11, str->length);
+	CuAssertStrEquals(tc, "hello world", str->buffer);
+	CuStringInsert(str, "!", 11);
+	CuAssertIntEquals(tc, 12, str->length);
+	CuAssertStrEquals(tc, "hello world!", str->buffer);
+}
+
+
+void TestCuStringResizes(CuTest* tc)
+{
+	CuString* str = CuStringNew();
+	int i;
+	for(i = 0 ; i < STRING_MAX ; ++i)
+	{
+		CuStringAppend(str, "aa");
+	}
+	CuAssertTrue(tc, STRING_MAX * 2 == str->length);
+	CuAssertTrue(tc, STRING_MAX * 2 <= str->size);
+}
+
+CuSuite* CuStringGetSuite(void)
+{
+	CuSuite* suite = CuSuiteNew();
+
+	SUITE_ADD_TEST(suite, TestCuStringNew);
+	SUITE_ADD_TEST(suite, TestCuStringAppend);
+	SUITE_ADD_TEST(suite, TestCuStringAppendNULL);
+	SUITE_ADD_TEST(suite, TestCuStringAppendChar);
+	SUITE_ADD_TEST(suite, TestCuStringInserts);
+	SUITE_ADD_TEST(suite, TestCuStringResizes);
+
+	return suite;
+}
+
+/*-------------------------------------------------------------------------*
+ * CuTest Test
+ *-------------------------------------------------------------------------*/
+
+void TestPasses(CuTest* tc)
+{
+	CuAssert(tc, "test should pass", 1 == 0 + 1);
+}
+
+void zTestFails(CuTest* tc)
+{
+	CuAssert(tc, "test should fail", 1 == 1 + 1);
+}
+
+
+void TestCuTestNew(CuTest* tc)
+{
+	CuTest* tc2 = CuTestNew("MyTest", TestPasses);
+	CuAssertStrEquals(tc, "MyTest", tc2->name);
+	CuAssertTrue(tc, !tc2->failed);
+	CuAssertTrue(tc, tc2->message == NULL);
+	CuAssertTrue(tc, tc2->function == TestPasses);
+	CuAssertTrue(tc, tc2->ran == 0);
+	CuAssertTrue(tc, tc2->jumpBuf == NULL);
+}
+
+
+void TestCuTestInit(CuTest *tc)
+{
+	CuTest tc2;
+	CuTestInit(&tc2, "MyTest", TestPasses);
+	CuAssertStrEquals(tc, "MyTest", tc2.name);
+	CuAssertTrue(tc, !tc2.failed);
+	CuAssertTrue(tc, tc2.message == NULL);
+	CuAssertTrue(tc, tc2.function == TestPasses);
+	CuAssertTrue(tc, tc2.ran == 0);
+	CuAssertTrue(tc, tc2.jumpBuf == NULL);
+}
+
+void TestCuAssert(CuTest* tc)
+{
+	CuTest tc2;
+	CuTestInit(&tc2, "MyTest", TestPasses);
+
+	CuAssert(&tc2, "test 1", 5 == 4 + 1);
+	CuAssertTrue(tc, !tc2.failed);
+	CuAssertTrue(tc, tc2.message == NULL);
+
+	CuAssert(&tc2, "test 2", 0);
+	CuAssertTrue(tc, tc2.failed);
+	CompareAsserts(tc, "CuAssert didn't fail", "test 2", tc2.message);
+
+	CuAssert(&tc2, "test 3", 1);
+	CuAssertTrue(tc, tc2.failed);
+	CompareAsserts(tc, "CuAssert didn't fail", "test 2", tc2.message);
+
+	CuAssert(&tc2, "test 4", 0);
+	CuAssertTrue(tc, tc2.failed);
+	CompareAsserts(tc, "CuAssert didn't fail", "test 4", tc2.message);
+
+}
+
+void TestCuAssertPtrEquals_Success(CuTest* tc)
+{
+	CuTest tc2;
+	int x;
+
+	CuTestInit(&tc2, "MyTest", TestPasses);
+
+	/* test success case */
+	CuAssertPtrEquals(&tc2, &x, &x);
+	CuAssertTrue(tc, ! tc2.failed);
+	CuAssertTrue(tc, NULL == tc2.message);
+}
+
+void TestCuAssertPtrEquals_Failure(CuTest* tc)
+{
+	CuTest tc2;
+	int x;
+	int* nullPtr = NULL;
+	char expected_message[STRING_MAX];
+
+	CuTestInit(&tc2, "MyTest", TestPasses);
+
+	/* test failing case */
+	sprintf(expected_message, "expected pointer <0x%p> but was <0x%p>", nullPtr, &x);
+	CuAssertPtrEquals(&tc2, NULL, &x);
+	CuAssertTrue(tc, tc2.failed);
+	CompareAsserts(tc, "CuAssertPtrEquals failed", expected_message, tc2.message);
+}
+
+void TestCuAssertPtrNotNull_Success(CuTest* tc)
+{
+	CuTest tc2;
+	int x;
+
+	CuTestInit(&tc2, "MyTest", TestPasses);
+
+	/* test success case */
+	CuAssertPtrNotNull(&tc2, &x);
+	CuAssertTrue(tc, ! tc2.failed);
+	CuAssertTrue(tc, NULL == tc2.message);
+}
+
+void TestCuAssertPtrNotNull_Failure(CuTest* tc)
+{
+	CuTest tc2;
+
+	CuTestInit(&tc2, "MyTest", TestPasses);
+
+	/* test failing case */
+	CuAssertPtrNotNull(&tc2, NULL);
+	CuAssertTrue(tc, tc2.failed);
+	CompareAsserts(tc, "CuAssertPtrNotNull failed", "null pointer unexpected", tc2.message);
+}
+
+void TestCuTestRun(CuTest* tc)
+{
+	CuTest tc2;
+	CuTestInit(&tc2, "MyTest", zTestFails);
+	CuTestRun(&tc2);
+
+	CuAssertStrEquals(tc, "MyTest", tc2.name);
+	CuAssertTrue(tc, tc2.failed);
+	CuAssertTrue(tc, tc2.ran);
+	CompareAsserts(tc, "TestRun failed", "test should fail", tc2.message);
+}
+
+/*-------------------------------------------------------------------------*
+ * CuSuite Test
+ *-------------------------------------------------------------------------*/
+
+void TestCuSuiteInit(CuTest* tc)
+{
+	CuSuite ts;
+	CuSuiteInit(&ts);
+	CuAssertTrue(tc, ts.count == 0);
+	CuAssertTrue(tc, ts.failCount == 0);
+}
+
+void TestCuSuiteNew(CuTest* tc)
+{
+	CuSuite* ts = CuSuiteNew();
+	CuAssertTrue(tc, ts->count == 0);
+	CuAssertTrue(tc, ts->failCount == 0);
+}
+
+void TestCuSuiteAddTest(CuTest* tc)
+{
+	CuSuite ts;
+	CuTest tc2;
+
+	CuSuiteInit(&ts);
+	CuTestInit(&tc2, "MyTest", zTestFails);
+
+	CuSuiteAdd(&ts, &tc2);
+	CuAssertTrue(tc, ts.count == 1);
+
+	CuAssertStrEquals(tc, "MyTest", ts.list[0]->name);
+}
+
+void TestCuSuiteAddSuite(CuTest* tc)
+{
+	CuSuite* ts1 = CuSuiteNew();
+	CuSuite* ts2 = CuSuiteNew();
+
+	CuSuiteAdd(ts1, CuTestNew("TestFails1", zTestFails));
+	CuSuiteAdd(ts1, CuTestNew("TestFails2", zTestFails));
+
+	CuSuiteAdd(ts2, CuTestNew("TestFails3", zTestFails));
+	CuSuiteAdd(ts2, CuTestNew("TestFails4", zTestFails));
+
+	CuSuiteAddSuite(ts1, ts2);
+	CuAssertIntEquals(tc, 4, ts1->count);
+
+	CuAssertStrEquals(tc, "TestFails1", ts1->list[0]->name);
+	CuAssertStrEquals(tc, "TestFails2", ts1->list[1]->name);
+	CuAssertStrEquals(tc, "TestFails3", ts1->list[2]->name);
+	CuAssertStrEquals(tc, "TestFails4", ts1->list[3]->name);
+}
+
+void TestCuSuiteRun(CuTest* tc)
+{
+	CuSuite ts;
+	CuTest tc1, tc2, tc3, tc4;
+
+	CuSuiteInit(&ts);
+	CuTestInit(&tc1, "TestPasses", TestPasses);
+	CuTestInit(&tc2, "TestPasses", TestPasses);
+	CuTestInit(&tc3, "TestFails",  zTestFails);
+	CuTestInit(&tc4, "TestFails",  zTestFails);
+
+	CuSuiteAdd(&ts, &tc1);
+	CuSuiteAdd(&ts, &tc2);
+	CuSuiteAdd(&ts, &tc3);
+	CuSuiteAdd(&ts, &tc4);
+	CuAssertTrue(tc, ts.count == 4);
+
+	CuSuiteRun(&ts);
+	CuAssertTrue(tc, ts.count - ts.failCount == 2);
+	CuAssertTrue(tc, ts.failCount == 2);
+}
+
+void TestCuSuiteSummary(CuTest* tc)
+{
+	CuSuite ts;
+	CuTest tc1, tc2;
+	CuString summary;
+
+	CuSuiteInit(&ts);
+	CuTestInit(&tc1, "TestPasses", TestPasses);
+	CuTestInit(&tc2, "TestFails",  zTestFails);
+	CuStringInit(&summary);
+
+	CuSuiteAdd(&ts, &tc1);
+	CuSuiteAdd(&ts, &tc2);
+	CuSuiteRun(&ts);
+
+	CuSuiteSummary(&ts, &summary);
+
+	CuAssertTrue(tc, ts.count == 2);
+	CuAssertTrue(tc, ts.failCount == 1);
+	CuAssertStrEquals(tc, ".F\n\n", summary.buffer);
+}
+
+
+void TestCuSuiteDetails_SingleFail(CuTest* tc)
+{
+	CuSuite ts;
+	CuTest tc1, tc2;
+	CuString details;
+	const char* front;
+	const char* back;
+
+	CuSuiteInit(&ts);
+	CuTestInit(&tc1, "TestPasses", TestPasses);
+	CuTestInit(&tc2, "TestFails",  zTestFails);
+	CuStringInit(&details);
+
+	CuSuiteAdd(&ts, &tc1);
+	CuSuiteAdd(&ts, &tc2);
+	CuSuiteRun(&ts);
+
+	CuSuiteDetails(&ts, &details);
+
+	CuAssertTrue(tc, ts.count == 2);
+	CuAssertTrue(tc, ts.failCount == 1);
+
+	front = "There was 1 failure:\n"
+		"1) TestFails: ";
+	back =  "test should fail\n"
+		"\n!!!FAILURES!!!\n"
+		"Runs: 2 Passes: 1 Fails: 1\n";
+
+	CuAssertStrEquals(tc, back, details.buffer + strlen(details.buffer) - strlen(back));
+	details.buffer[strlen(front)] = 0;
+	CuAssertStrEquals(tc, front, details.buffer);
+}
+
+
+void TestCuSuiteDetails_SinglePass(CuTest* tc)
+{
+	CuSuite ts;
+	CuTest tc1;
+	CuString details;
+	const char* expected;
+
+	CuSuiteInit(&ts);
+	CuTestInit(&tc1, "TestPasses", TestPasses);
+	CuStringInit(&details);
+
+	CuSuiteAdd(&ts, &tc1);
+	CuSuiteRun(&ts);
+
+	CuSuiteDetails(&ts, &details);
+
+	CuAssertTrue(tc, ts.count == 1);
+	CuAssertTrue(tc, ts.failCount == 0);
+
+	expected =
+		"OK (1 test)\n";
+
+	CuAssertStrEquals(tc, expected, details.buffer);
+}
+
+void TestCuSuiteDetails_MultiplePasses(CuTest* tc)
+{
+	CuSuite ts;
+	CuTest tc1, tc2;
+	CuString details;
+	const char* expected;
+
+	CuSuiteInit(&ts);
+	CuTestInit(&tc1, "TestPasses", TestPasses);
+	CuTestInit(&tc2, "TestPasses", TestPasses);
+	CuStringInit(&details);
+
+	CuSuiteAdd(&ts, &tc1);
+	CuSuiteAdd(&ts, &tc2);
+	CuSuiteRun(&ts);
+
+	CuSuiteDetails(&ts, &details);
+
+	CuAssertTrue(tc, ts.count == 2);
+	CuAssertTrue(tc, ts.failCount == 0);
+
+	expected =
+		"OK (2 tests)\n";
+
+	CuAssertStrEquals(tc, expected, details.buffer);
+}
+
+void TestCuSuiteDetails_MultipleFails(CuTest* tc)
+{
+	CuSuite ts;
+	CuTest tc1, tc2;
+	CuString details;
+	const char* front;
+	const char* mid;
+	const char* back;
+
+	CuSuiteInit(&ts);
+	CuTestInit(&tc1, "TestFails1", zTestFails);
+	CuTestInit(&tc2, "TestFails2", zTestFails);
+	CuStringInit(&details);
+
+	CuSuiteAdd(&ts, &tc1);
+	CuSuiteAdd(&ts, &tc2);
+	CuSuiteRun(&ts);
+
+	CuSuiteDetails(&ts, &details);
+
+	CuAssertTrue(tc, ts.count == 2);
+	CuAssertTrue(tc, ts.failCount == 2);
+
+	front =
+		"There were 2 failures:\n"
+		"1) TestFails1: ";
+	mid =   "test should fail\n"
+		"2) TestFails2: ";
+	back =  "test should fail\n"
+		"\n!!!FAILURES!!!\n"
+		"Runs: 2 Passes: 0 Fails: 2\n";
+
+	CuAssertStrEquals(tc, back, details.buffer + strlen(details.buffer) - strlen(back));
+	CuAssert(tc, "Couldn't find middle", strstr(details.buffer, mid) != NULL);
+	details.buffer[strlen(front)] = 0;
+	CuAssertStrEquals(tc, front, details.buffer);
+}
+
+
+/*-------------------------------------------------------------------------*
+ * Misc Test
+ *-------------------------------------------------------------------------*/
+
+void TestCuStrCopy(CuTest* tc)
+{
+	const char* old = "hello world";
+	const char* newStr = CuStrCopy(old);
+	CuAssert(tc, "old is new", strcmp(old, newStr) == 0);
+}
+
+
+void TestCuStringAppendFormat(CuTest* tc)
+{
+	int i;
+	char* text = CuStrAlloc(301);		/* long string */
+	CuString* str = CuStringNew();
+	for (i = 0 ; i < 300 ; ++i)
+		text[i] = 'a';
+	text[300] = '\0';
+	CuStringAppendFormat(str, "%s", text);
+
+	/* buffer limit raised to HUGE_STRING_LEN so no overflow */
+
+	CuAssert(tc, "length of str->buffer is 300", 300 == strlen(str->buffer));
+}
+
+void TestFail(CuTest* tc)
+{
+	jmp_buf buf;
+	int pointReached = 0;
+	CuTest* tc2 = CuTestNew("TestFails", zTestFails);
+	tc2->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		CuFail(tc2, "hello world");
+		pointReached = 1;
+	}
+	CuAssert(tc, "point was not reached", pointReached == 0);
+}
+
+void TestAssertStrEquals(CuTest* tc)
+{
+	jmp_buf buf;
+	CuTest *tc2 = CuTestNew("TestAssertStrEquals", zTestFails);
+
+	const char* expected = "expected <hello> but was <world>";
+	const char *expectedMsg = "some text: expected <hello> but was <world>";
+
+	tc2->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		CuAssertStrEquals(tc2, "hello", "world");
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals failed", expected, tc2->message);
+	if (setjmp(buf) == 0)
+	{
+		CuAssertStrEquals_Msg(tc2, "some text", "hello", "world");
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals failed", expectedMsg, tc2->message);
+}
+
+void TestAssertStrEquals_NULL(CuTest* tc)
+{
+	jmp_buf buf;
+	CuTest *tc2 = CuTestNew("TestAssertStrEquals_NULL", zTestFails);
+
+	tc2->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		CuAssertStrEquals(tc2, NULL, NULL);
+	}
+	CuAssertTrue(tc, !tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals_NULL failed", NULL, tc2->message);
+	if (setjmp(buf) == 0)
+	{
+		CuAssertStrEquals_Msg(tc2, "some text", NULL, NULL);
+	}
+	CuAssertTrue(tc, !tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals_NULL failed", NULL, tc2->message);
+}
+
+void TestAssertStrEquals_FailNULLStr(CuTest* tc)
+{
+	jmp_buf buf;
+	CuTest *tc2 = CuTestNew("TestAssertStrEquals_FailNULLStr", zTestFails);
+
+	const char* expected = "expected <hello> but was <NULL>";
+	const char *expectedMsg = "some text: expected <hello> but was <NULL>";
+
+	tc2->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		CuAssertStrEquals(tc2, "hello", NULL);
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals_FailNULLStr failed", expected, tc2->message);
+	if (setjmp(buf) == 0)
+	{
+		CuAssertStrEquals_Msg(tc2, "some text", "hello", NULL);
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals_FailNULLStr failed", expectedMsg, tc2->message);
+}
+
+void TestAssertStrEquals_FailStrNULL(CuTest* tc)
+{
+	jmp_buf buf;
+	CuTest *tc2 = CuTestNew("TestAssertStrEquals_FailStrNULL", zTestFails);
+
+	const char* expected = "expected <NULL> but was <hello>";
+	const char *expectedMsg = "some text: expected <NULL> but was <hello>";
+
+	tc2->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		CuAssertStrEquals(tc2, NULL, "hello");
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals_FailStrNULL failed", expected, tc2->message);
+	if (setjmp(buf) == 0)
+	{
+		CuAssertStrEquals_Msg(tc2, "some text", NULL, "hello");
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals_FailStrNULL failed", expectedMsg, tc2->message);
+}
+
+void TestAssertIntEquals(CuTest* tc)
+{
+	jmp_buf buf;
+	CuTest *tc2 = CuTestNew("TestAssertIntEquals", zTestFails);
+	const char* expected = "expected <42> but was <32>";
+	const char* expectedMsg = "some text: expected <42> but was <32>";
+	tc2->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		CuAssertIntEquals(tc2, 42, 32);
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertIntEquals failed", expected, tc2->message);
+	if (setjmp(buf) == 0)
+	{
+		CuAssertIntEquals_Msg(tc2, "some text", 42, 32);
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertStrEquals failed", expectedMsg, tc2->message);
+}
+
+void TestAssertDblEquals(CuTest* tc)
+{
+	jmp_buf buf;
+	double x = 3.33;
+	double y = 10.0 / 3.0;
+	CuTest *tc2 = CuTestNew("TestAssertDblEquals", zTestFails);
+	char expected[STRING_MAX];
+	char expectedMsg[STRING_MAX];
+	sprintf(expected, "expected <%lf> but was <%lf>", x, y);
+	sprintf(expectedMsg, "some text: expected <%lf> but was <%lf>", x, y);
+
+	CuTestInit(tc2, "TestAssertDblEquals", TestPasses);
+
+	CuAssertDblEquals(tc2, x, x, 0.0);
+	CuAssertTrue(tc, ! tc2->failed);
+	CuAssertTrue(tc, NULL == tc2->message);
+
+	CuAssertDblEquals(tc2, x, y, 0.01);
+	CuAssertTrue(tc, ! tc2->failed);
+	CuAssertTrue(tc, NULL == tc2->message);
+
+	tc2->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		CuAssertDblEquals(tc2, x, y, 0.001);
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertDblEquals failed", expected, tc2->message);
+	tc2->jumpBuf = &buf;
+	if (setjmp(buf) == 0)
+	{
+		CuAssertDblEquals_Msg(tc2, "some text", x, y, 0.001);
+	}
+	CuAssertTrue(tc, tc2->failed);
+	CompareAsserts(tc, "CuAssertDblEquals failed", expectedMsg, tc2->message);
+}
+
+/*-------------------------------------------------------------------------*
+ * main
+ *-------------------------------------------------------------------------*/
+
+CuSuite* CuGetSuite(void)
+{
+	CuSuite* suite = CuSuiteNew();
+
+	SUITE_ADD_TEST(suite, TestCuStringAppendFormat);
+	SUITE_ADD_TEST(suite, TestCuStrCopy);
+	SUITE_ADD_TEST(suite, TestFail);
+	SUITE_ADD_TEST(suite, TestAssertStrEquals);
+	SUITE_ADD_TEST(suite, TestAssertStrEquals_NULL);
+	SUITE_ADD_TEST(suite, TestAssertStrEquals_FailStrNULL);
+	SUITE_ADD_TEST(suite, TestAssertStrEquals_FailNULLStr);
+	SUITE_ADD_TEST(suite, TestAssertIntEquals);
+	SUITE_ADD_TEST(suite, TestAssertDblEquals);
+
+	SUITE_ADD_TEST(suite, TestCuTestNew);
+	SUITE_ADD_TEST(suite, TestCuTestInit);
+	SUITE_ADD_TEST(suite, TestCuAssert);
+	SUITE_ADD_TEST(suite, TestCuAssertPtrEquals_Success);
+	SUITE_ADD_TEST(suite, TestCuAssertPtrEquals_Failure);
+	SUITE_ADD_TEST(suite, TestCuAssertPtrNotNull_Success);
+	SUITE_ADD_TEST(suite, TestCuAssertPtrNotNull_Failure);
+	SUITE_ADD_TEST(suite, TestCuTestRun);
+
+	SUITE_ADD_TEST(suite, TestCuSuiteInit);
+	SUITE_ADD_TEST(suite, TestCuSuiteNew);
+	SUITE_ADD_TEST(suite, TestCuSuiteAddTest);
+	SUITE_ADD_TEST(suite, TestCuSuiteAddSuite);
+	SUITE_ADD_TEST(suite, TestCuSuiteRun);
+	SUITE_ADD_TEST(suite, TestCuSuiteSummary);
+	SUITE_ADD_TEST(suite, TestCuSuiteDetails_SingleFail);
+	SUITE_ADD_TEST(suite, TestCuSuiteDetails_SinglePass);
+	SUITE_ADD_TEST(suite, TestCuSuiteDetails_MultiplePasses);
+	SUITE_ADD_TEST(suite, TestCuSuiteDetails_MultipleFails);
+
+	return suite;
+}

src/cutest/README.txt

+HOW TO USE
+
+You can use CuTest to create unit tests to drive your development
+in the style of Extreme Programming. You can also add unit tests to
+existing code to ensure that it works as you suspect.
+
+Your unit tests are an investment. They let you to change your
+code and add new features confidently without worrying about
+accidentally breaking earlier features.
+
+
+LICENSING
+
+For details on licensing see license.txt.
+
+
+GETTING STARTED
+
+To add unit testing to your C code the only files you need are
+CuTest.c and CuTest.h. 
+
+CuTestTest.c and AllTests.c have been included to provide an
+example of how to write unit tests and then how to aggregate them
+into suites and into a single AllTests.c file. Suites allow you
+to put group tests into logical sets. AllTests.c combines all the
+suites and runs them. 
+
+You should not have to look inside CuTest.c. Looking in
+CuTestTest.c and AllTests.c (for example usage) should be
+sufficient. 
+
+After downloading the sources, run your compiler to create an
+executable called AllTests.exe. For example, if you are using
+Windows with the cl.exe compiler you would type: 
+
+    cl.exe AllTests.c CuTest.c CuTestTest.c
+    AllTests.exe
+
+This will run all the unit tests associated with CuTest and print
+the output on the console. You can replace cl.exe with gcc or
+your favorite compiler in the command above.
+
+
+DETAILED EXAMPLE
+
+Here is a more detailed example. We will work through a simple
+test first exercise. The goal is to create a library of string
+utilities. First, lets write a function that converts a
+null-terminated string to all upper case.
+
+Ensure that CuTest.c and CuTest.h are accessible from your C
+project. Next, create a file called StrUtil.c with these
+contents:
+
+    #include "CuTest.h"
+    
+    char* StrToUpper(char* str) {
+        return str;
+    }
+    
+    void TestStrToUpper(CuTest *tc) {
+        char* input = strdup("hello world");
+        char* actual = StrToUpper(input);
+        char* expected = "HELLO WORLD";
+        CuAssertStrEquals(tc, expected, actual);
+    }
+   
+    CuSuite* StrUtilGetSuite() {
+        CuSuite* suite = CuSuiteNew();
+        SUITE_ADD_TEST(suite, TestStrToUpper);
+        return suite;
+    }
+    
+Create another file called AllTests.c with these contents:
+
+    #include "CuTest.h"
+    
+    CuSuite* StrUtilGetSuite();
+    
+    void RunAllTests(void) {
+        CuString *output = CuStringNew();
+        CuSuite* suite = CuSuiteNew();
+        
+        CuSuiteAddSuite(suite, StrUtilGetSuite());
+    
+        CuSuiteRun(suite);
+        CuSuiteSummary(suite, output);
+        CuSuiteDetails(suite, output);
+        printf("%s\n", output->buffer);
+    }
+    
+    int main(void) {
+        RunAllTests();
+    }
+
+Then type this on the command line:
+
+    gcc AllTests.c CuTest.c StrUtil.c
+
+to compile. You can replace gcc with your favorite compiler.
+CuTest should be portable enough to handle all Windows and Unix
+compilers. Then to run the tests type:
+
+    a.out
+
+This will print an error because we haven't implemented the
+StrToUpper function correctly. We are just returning the string
+without changing it to upper case. 
+
+    char* StrToUpper(char* str) {
+        return str;
+    }
+
+Rewrite this as follows:
+
+    char* StrToUpper(char* str) {
+        char* p;
+        for (p = str ; *p ; ++p) *p = toupper(*p);
+        return str;
+    }
+
+Recompile and run the tests again. The test should pass this
+time.
+
+
+WHAT TO DO NEXT
+
+At this point you might want to write more tests for the
+StrToUpper function. Here are some ideas:
+
+TestStrToUpper_EmptyString :  pass in ""
+TestStrToUpper_UpperCase   :  pass in "HELLO WORLD"
+TestStrToUpper_MixedCase   :  pass in "HELLO world"
+TestStrToUpper_Numbers     :  pass in "1234 hello"
+
+As you write each one of these tests add it to StrUtilGetSuite
+function. If you don't the tests won't be run. Later as you write
+other functions and write tests for them be sure to include those
+in StrUtilGetSuite also. The StrUtilGetSuite function should
+include all the tests in StrUtil.c
+
+Over time you will create another file called FunkyStuff.c
+containing other functions unrelated to StrUtil. Follow the same
+pattern. Create a FunkyStuffGetSuite function in FunkyStuff.c.
+And add FunkyStuffGetSuite to AllTests.c.
+
+The framework is designed in the way it is so that it is easy to
+organize a lot of tests.
+
+THE BIG PICTURE
+
+Each individual test corresponds to a CuTest. These are grouped
+to form a CuSuite. CuSuites can hold CuTests or other CuSuites.
+AllTests.c collects all the CuSuites in the program into a single
+CuSuite which it then runs as a single CuSuite.
+
+The project is open source so feel free to take a peek under the
+hood at the CuTest.c file to see how it works. CuTestTest.c
+contains tests for CuTest.c. So CuTest tests itself.
+
+Since AllTests.c has a main() you will need to exclude this when
+you are building your product. Here is a nicer way to do this if
+you want to avoid messing with multiple builds. Remove the main()
+in AllTests.c. Note that it just calls RunAllTests(). Instead
+we'll call this directly from the main program.
+
+Now in the main() of the actual program check to see if the
+command line option "--test" was passed. If it was then I call
+RunAllTests() from AllTests.c. Otherwise run the real program.
+
+Shipping the tests with the code can be useful. If you customers
+complain about a problem you can ask them to run the unit tests
+and send you the output. This can help you to quickly isolate the
+piece of your system that is malfunctioning in the customer's
+environment. 
+
+CuTest offers a rich set of CuAssert functions. Here is a list:
+
+void CuAssert(CuTest* tc, char* message, int condition);
+void CuAssertTrue(CuTest* tc, int condition);
+void CuAssertStrEquals(CuTest* tc, char* expected, char* actual);
+void CuAssertIntEquals(CuTest* tc, int expected, int actual);
+void CuAssertPtrEquals(CuTest* tc, void* expected, void* actual);
+void CuAssertPtrNotNull(CuTest* tc, void* pointer);
+
+The project is open source and so you can add other more powerful
+asserts to make your tests easier to write and more concise.
+Please feel free to send me changes you make so that I can
+incorporate them into future releases.
+
+If you see any errors in this document please contact me at
+asimjalis@peakprogramming.com.
+
+
+AUTOMATING TEST SUITE GENERATION
+
+make-tests.sh will grep through all the .c files in the current
+directory and generate the code to run all the tests contained in
+them. Using this script you don't have to worry about writing
+AllTests.c or dealing with any of the other suite code.
+
+
+CREDITS
+
+These people have contributed useful code changes to the CuTest project.
+Thanks!
+
+- [02.23.2003] Dave Glowacki <dglo@hyde.ssec.wisc.edu>
+- [04.17.2009] Tobias Lippert <herrmarder@googlemail.com>
+- [11.13.2009] Eli Bendersky <eliben@gmail.com>
+- [12.14.2009] Andrew Brown <abrown@datasci.com>

src/cutest/index.html

+<html>
+
+<link href="style.css" rel="stylesheet" type="text/css">
+
+<head>
+<title>CuTest: The Cutest C Unit Testing Framework</title>
+</head>
+
+<BODY>
+
+<script type="text/javascript"><!--
+google_ad_client = "pub-6301376840682363";
+google_ad_width = 728;
+google_ad_height = 90;
+google_ad_format = "728x90_as";
+google_ad_channel ="3703387138";
+google_color_border = "CCCCCC";
+google_color_bg = "FFFFFF";
+google_color_link = "000000";
+google_color_url = "666666";
+google_color_text = "333333";
+//--></script>
+<script type="text/javascript"
+  src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
+</script>
+
+<br>
+<br>
+<HR>
+<FONT SIZE="-1">
+[ 
+  <A HREF="http://sourceforge.net/project/showfiles.php?group_id=52240">Download Now</A>
+| <A HREF="http://sourceforge.net/project/stats/?group_id=52240&ugn=cutest">Download Statistics</A>
+| <A HREF="http://sourceforge.net/cvs/?group_id=52240">Browse Source</A>
+| <A HREF="http://sourceforge.net/projects/cutest">SourceForge</A>
+| <A HREF="http://asimjalis.blogspot.com">Blog</A>
+| <A HREF="mailto:asimjalis(nospam)gmail.com">asimjalis(nospam)gmail.com</A>
+]
+</FONT>
+<HR>
+
+
+<H1>CuTest: C Unit Testing Framework</H1>
+
+
+<h2>Overview</h2>
+
+CuTest is a unit testing library for the C language. It can be
+used to do Extreme Programming and Test-First Development in the
+C language. It's a fun and cute library that will make your
+programming fun and productive.
+
+<h2>Benefits</h2>
+
+<ul>
+
+<li> Lower Defects. The tests ensure that your code keeps working
+as you make small changes in it.  
+
+<li> Faster Debugging. The tests tell you which subroutine is
+broken.  You avoid spending hours trying to figure out what's
+broken.
+
+<li> Development Speed. You trust your old code and can keep
+adding to it without worrying about bad interactions. If there is
+a bad interaction the tests will catch it.
+
+<li> Permanent Bug Fixes. If every time a bug is reported you
+write a quick test, you will guarantee that the bug never
+reappears again.
+
+<li> Fun. As your bug count drops you will begin to enjoy
+programming like you've never done before. Running the tests
+every few minutes and seeing them pass feels good.
+
+</ul>
+
+<h2> Features </h2>
+
+<ul>
+
+<li> Small. Consists of a single .c and .h file.
+
+<li> Easy to Deploy. Just drop the two files into your source
+tree.
+
+<li> Highly Portable. Works with all major compilers on Windows
+(Microsoft, Borland), Linux, Unix, PalmOS. 
+
+<li> Open Source. You can extend it to add more functionality.
+The source can be invaluable if you are trying to trace a test
+failure.
+
+<li> Cuteness. Of all the testing frameworks CuTest has the
+cutest name :-)
+
+</ul>
+
+
+<h2>Licensing</h2>
+
+CuTest is distributed under the <a
+href="http://www.opensource.org/licenses/zlib-license.html">zlib/libpng
+license</a>. See license.txt in the distribution for text of license.  The
+intent of the license is to: 
+
+<ul>
+
+<li> Keep the license as simple as possible
+<li> Encourage the use of CuTest in both free and commercial applications and libraries
+<li> Keep the source code together 
+<li> Give credit to the CuTest contributors for their work
+
+</ul>
+
+If you find CuTest useful we would like to hear about it. 
+
+
+<h2>Getting Started</h2>
+
+<p> For a detailed tutorial see README in the distribution.  This shows you how
+to organize your tests and how to autogenerate the AllTests.c file from your
+source files.
+
+<p> To add unit testing to your C code the only files you need
+are CuTest.c and CuTest.h. 
+
+<p> CuTestTest.c and AllTests.c have been included to provide an
+example of how to write unit tests and then how to aggregate them
+into suites and into a single AllTests.c file. Suites allow you
+to put unit tests for different parts of your code in different
+files. AllTests.c combines all the suites and runs them. 
+
+<p> You should not have to look inside CuTest.c.  Looking in
+CuTestTest.c (for example usage) should be sufficient.
+  
+<p> After downloading the sources, run your compiler to create an
+executable called AllTests.exe. For example, if you are using
+Windows you would type:
+
+<PRE CLASS="CONSOLE">
+cl AllTests.c CuTest.c CuTestTest.c
+AllTests.exe
+</PRE>
+
+<p> This will run all the unit tests associated with CuTest and
+print the output on the console.
+
+<p> For more details on how to use the library look at the README file included
+with the distribution. 
+
+<h2>Contribute</h2>
+
+<p> We hope you CuTest saves you time and helps you produce high quality
+software.
+
+<p> If you find CuTest useful, let us know. Tell us what platform you are using
+it on (Windows, Linux, etc), and what kinds of applications you are using it
+with.
+
+<p> If you would like to contribute documentation or tutorials to this project
+please send e-mail. 
+
+<br>
+<br>
+
+<hr>
+<font size="-1">
+Copyright &copy; 2002-2003, Asim Jalis (<a
+href="mailto:asimjalis(nospam)gmail.com">asimjalis(nospam)gmail.com</a>).
+All rights reserved.
+</font>
+
+<SCRIPT language="JavaScript">
+<!--
+   var re = /\(nospam\)/ig;
+   var str;
+
+   for(i = 0;i < document.links.length;i++) 
+   {
+      str = "" + document.links(i).href;
+      if(str.search(re) != -1)
+         document.links(i).href = str.replace(re, "@");
+
+      str = "" + document.links(i).innerHTML;
+      if(str.search(re) != -1)
+         document.links(i).innerHTML = str.replace(re, "@");
+   }
+-->
+</SCRIPT>
+
+<p>
+<a href="http://sourceforge.net"><img src="http://sourceforge.net/sflogo.php?group_id=52240&type=1" width="88" height="31" border="0" alt="SourceForge.net Logo"></a>
+
+</BODY>
+</HTML>

src/cutest/license.txt

+NOTE
+
+The license is based on the zlib/libpng license. For more details see
+http://www.opensource.org/licenses/zlib-license.html. The intent of the
+license is to: 
+
+- keep the license as simple as possible
+- encourage the use of CuTest in both free and commercial applications
+  and libraries
+- keep the source code together 
+- give credit to the CuTest contributors for their work
+
+If you ship CuTest in source form with your source distribution, the
+following license document must be included with it in unaltered form.
+If you find CuTest useful we would like to hear about it. 
+
+LICENSE
+
+Copyright (c) 2003 Asim Jalis
+
+This software is provided 'as-is', without any express or implied
+warranty. In no event will the authors be held liable for any damages
+arising from the use of this software.
+
+Permission is granted to anyone to use this software for any purpose,
+including commercial applications, and to alter it and redistribute it
+freely, subject to the following restrictions:
+
+1. The origin of this software must not be misrepresented; you must not
+claim that you wrote the original software. If you use this software in
+a product, an acknowledgment in the product documentation would be
+appreciated but is not required.
+
+2. Altered source versions must be plainly marked as such, and must not
+be misrepresented as being the original software.
+
+3. This notice may not be removed or altered from any source
+distribution.

src/cutest/make-tests.sh

+#!/usr/bin/env bash
+
+# Auto generate single AllTests file for CuTest.
+# Searches through all *.c files in the current directory.
+# Prints to stdout.
+# Author: Asim Jalis
+# Date: 01/08/2003
+
+if test $# -eq 0 ; then FILES=*.c ; else FILES=$* ; fi
+
+echo '
+
+/* This is auto-generated code. Edit at your own peril. */
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "CuTest.h"
+
+'
+
+cat $FILES | grep '^void Test' | 
+    sed -e 's/(.*$//' \
+        -e 's/$/(CuTest*);/' \
+        -e 's/^/extern /'
+
+echo \
+'
+
+void RunAllTests(void) 
+{
+    CuString *output = CuStringNew();
+    CuSuite* suite = CuSuiteNew();
+
+'
+cat $FILES | grep '^void Test' | 
+    sed -e 's/^void //' \
+        -e 's/(.*$//' \
+        -e 's/^/    SUITE_ADD_TEST(suite, /' \
+        -e 's/$/);/'
+
+echo \
+'
+    CuSuiteRun(suite);
+    CuSuiteSummary(suite, output);
+    CuSuiteDetails(suite, output);
+    printf("%s\n", output->buffer);
+    CuStringDelete(output);
+    CuSuiteDelete(suite);
+}
+
+int main(void)
+{
+    RunAllTests();
+}
+'

src/cutest/style.css

+BODY { 
+	font-family: "Verdana,Arial,sans-serif";
+	font-size: 10pt;
+}
+PRE.LIST {
+	background: #CFD9FF;
+	border: 1ex solid #AAAAE6;
+	padding: 1ex;
+}
+
+PRE.SNIP {
+	background: #CFD9FF;
+	padding: 1ex;
+}
+
+PRE.CONSOLE {
+	color: #CCCCCC;
+	background: #000000;
+	font-family: "Courier New,Courier";
+	padding: 1ex;
+}

src/newifc/GNUmakefile

+CFLAGS += -I../xpdev -I../cutest -pthread
+CFLAGS += -DHAS_STDINT_H
+CFLAGS += -DHAS_INTTYPES_H
+LIBS += -lpthread
+
+VPATH = ../cutest:../xpdev
+
+ifdef TESTS
+CFLAGS += -DBUILD_TESTS
+all: runtest
+
+test: alltests.o CuTest.o root_window.o threadwrap.o
+	cc ${LDFLAGS} ${CFLAGS} $^ -o $@ ${LIBS}
+
+runtest: test
+	./test
+else
+all: libnewifc.a
+endif
+
+newifc.c: genapi
+	./genapi
+
+newifc.h: newifc.c
+
+root_window.o: newifc.h
+
+newifc.o: newifc.c internal_macros.h root_window.c
+
+libnewifc.a: libnewifc.a(newifc.o)
+	ranlib $@
+	strip --strip-unneeded $@
+
+clean:
+	rm -f *.o genapi test newifc_internal.h new_ifc.h new_ifc.c libnewifc.a newifc.c newifc.h

src/newifc/alltests.c

+#include <stdio.h>
+
+#include "CuTest.h"
+
+CuSuite* root_window_get_test_suite();
+
+void RunAllTests(void) {
+	CuString *output = CuStringNew();
+	CuSuite* suite = CuSuiteNew();
+
+	CuSuiteAddSuite(suite, root_window_get_test_suite());
+
+	CuSuiteRun(suite);
+	CuSuiteSummary(suite, output);
+	CuSuiteDetails(suite, output);
+	printf("%s\n", output->buffer);
+}
+
+int
+main(int argc, char **argv) {
+	RunAllTests();
+	return 0;
+}

src/newifc/genapi.c

+#include <fcntl.h>
+#include <stdio.h>
+#include <stdlib.h>
+
+enum ni_type {
+	ni_bool,
+	ni_uint32,
+	ni_string,
+};
+
+struct objtype_info {
+	const char *name;
+	int needs_parent;
+};
+
+const struct objtype_info
+objtypes[] = {
+	{"root_window", 0},
+};
+
+enum attribute_impl {
+	attr_impl_global,
+	attr_impl_object,
+	attr_impl_root,
+};
+
+struct attribute_info {
+	const char *name;
+	const char *type;
+	enum attribute_impl impl;
+	int read_only;
+};
+
+const struct attribute_info
+attributes[] = {
+	{"height", "uint16_t", attr_impl_global, 0},
+	{"locked", "bool", attr_impl_root, 0},
+	{"locked_by_me", "bool", attr_impl_root, 1},
+	{"show_help", "bool", attr_impl_object, 0},
+	{"show_title", "bool", attr_impl_object, 0},
+	{"title", "const char *", attr_impl_object, 0},
+	{"transparent", "bool", attr_impl_object, 0},
+	{"width", "uint16_t", attr_impl_global, 0},
+};
+
+struct error_info {
+	const char *name;
+};
+
+const struct error_info
+error_inf[] = {
+	{"error_none"},
+	{"error_allocation_failure"},
+	{"error_out_of_range"},
+	{"error_not_implemented"},
+	{"error_lock_failed"},
+	{"error_needs_parent"},
+};
+
+int
+main(int argc, char **argv)
+{
+	FILE *header;
+	FILE *internal_header;
+	FILE *c_code;
+	size_t nitems;
+	size_t i;
+
+	header = fopen("newifc.h", "wb");
+	if (header == NULL) {
+		perror("Opening header");
+		return EXIT_FAILURE;
+	}
+
+	fputs("/*\n"
+	      " * This code is autogeneraged by genapi\n"
+	      " */\n\n", header);
+
+	fputs("#ifndef NEWIFC_H\n"
+	      "#define NEWIFC_H\n\n", header);
+
+	fputs("#include \"gen_defs.h\"\n\n", header);
+
+	fputs("typedef struct newifc_api *NewIfcObj;\n\n", header);
+
+	fputs("enum NewIfc_error {\n", header);
+	nitems = sizeof(error_inf) / sizeof(error_inf[0]);
+	for (i = 0; i < nitems; i++) {
+		fprintf(header, "\tNewIfc_%s,\n", error_inf[i].name);
+	}
+	fputs("};\n\n", header);
+
+	fputs("enum NewIfc_object {\n", header);
+	nitems = sizeof(objtypes) / sizeof(objtypes[0]);
+	for (i = 0; i < nitems; i++) {
+		fprintf(header, "\tNewIfc_%s,\n", objtypes[i].name);
+	}
+	fputs("};\n\n", header);
+
+	fputs("NewIfcObj NI_copy(NewIfcObj obj);\n", header);
+	fputs("NewIfcObj NI_create(enum NewIfc_object obj, NewIfcObj parent);\n", header);
+	fputs("enum NewIfc_error NI_error(NewIfcObj obj);\n\n", header);
+
+	nitems = sizeof(attributes) / sizeof(attributes[0]);
+	for (i = 0; i < nitems; i++) {
+		if (!attributes[i].read_only)
+			fprintf(header, "bool NI_set_%s(NewIfcObj obj, %s value);\n", attributes[i].name, attributes[i].type);
+		fprintf(header, "bool NI_get_%s(NewIfcObj obj, %s* value);\n", attributes[i].name, attributes[i].type);
+	}
+	fputs("\n#endif\n", header);
+	fclose(header);
+
+
+	internal_header = fopen("newifc_internal.h", "wb");
+	if (internal_header == NULL) {
+		perror("Opening internal header");
+		return EXIT_FAILURE;
+	}
+	fputs("/*\n"
+	      " * This code is autogeneraged by genapi\n"
+	      " */\n\n", internal_header);
+
+	fputs("#ifndef NEWIFC_INTERNAL_H\n"
+	      "#define NEWIFC_INTERNAL_H\n"
+	      "\n"
+	      "struct newifc_api {\n"
+	      "\tbool (*set)(NewIfcObj niobj, const int attr, ...);\n"
+	      "\tbool (*get)(NewIfcObj niobj, const int attr, ...);\n"
+	      "\tNewIfcObj (*copy)(NewIfcObj obj);\n"
+	      "\tNewIfcObj root;\n"
+	      "\tNewIfcObj parent;\n"
+	      "\tNewIfcObj higherpeer;\n"
+	      "\tNewIfcObj lowerpeer;\n"
+	      "\tNewIfcObj topchild;\n"
+	      "\tNewIfcObj bottomchild;\n"
+	      "\tuint16_t height;\n"
+	      "\tuint16_t width;\n"
+	      "\tenum NewIfc_object type;\n"
+	      "\tenum NewIfc_error last_error;\n"
+	      "};\n\n", internal_header);
+
+	fputs("enum NewIfc_attribute {\n", internal_header);
+	nitems = sizeof(attributes) / sizeof(attributes[0]);
+	for (i = 0; i < nitems; i++) {
+		fprintf(internal_header, "\tNewIfc_%s,\n", attributes[i].name);
+	}
+	fputs("};\n\n", internal_header);
+
+	fputs("#endif\n", internal_header);
+	fclose(internal_header);
+
+
+	c_code = fopen("newifc.c", "wb");
+	if (c_code == NULL) {
+		perror("Opening c source");
+		return EXIT_FAILURE;
+	}
+	fputs("/*\n"
+	      " * This code is autogeneraged by genapi\n"
+	      " */\n\n", c_code);
+
+	fputs("#include \"newifc.h\"\n", c_code);
+	fputs("#include \"internal_macros.h\"\n", c_code);
+	nitems = sizeof(objtypes) / sizeof(objtypes[0]);
+	for (i = 0; i < nitems; i++) {
+		fprintf(c_code, "#include \"%s.c\"\n", objtypes[i].name);
+	}
+	fputs("\n", c_code);
+
+	fputs("NewIfcObj\n"
+	      "NI_create(enum NewIfc_object obj, NewIfcObj parent) {\n"
+	      "\tNewIfcObj ret = NULL;\n"
+	      "\n"
+	      "\tswitch(obj) {\n", c_code);
+	nitems = sizeof(objtypes) / sizeof(objtypes[0]);
+	for (i = 0; i < nitems; i++) {
+		fprintf(c_code, "\t\tcase NewIfc_%s:\n", objtypes[i].name);
+		if (objtypes[i].needs_parent) {
+			fputs("\t\t\tif (parent == NULL) {\n"
+			                "\t\t\t\tbreak;\n"
+			                "\t\t\t}\n", c_code);
+		}
+		else {
+			fputs("\t\t\tif (parent != NULL) {\n"
+			                "\t\t\t\tbreak;\n"
+			                "\t\t\t}\n", c_code);
+		}
+		fprintf(c_code, "\t\t\tret = NewIFC_%s();\n"
+		                "\t\t\tif (ret == NULL) {\n"
+		                "\t\t\t\tbreak;\n"
+		                "\t\t\t}\n"
+		                "\t\t\tret->type = obj;\n"
+		                "\t\t\tbreak;\n", objtypes[i].name);
+	}
+	fputs("\t}\n"
+	      "\tif (ret) {\n"
+	      "\t\tret->parent = parent;\n"
+	      "\t\tret->higherpeer = NULL;\n"
+	      "\t\tret->topchild = NULL;\n"
+	      "\t\tret->bottomchild = NULL;\n"
+	      "\t\tif (parent) {\n"
+	      "\t\t\tret->root = parent->root;\n"
+	      "\t\t\tret->lowerpeer = parent->topchild;\n"
+	      "\t\t\tparent->topchild = ret;\n"
+	      "\t\t\tif (parent->bottomchild == NULL) {\n"
+	      "\t\t\t\tparent->bottomchild = ret;\n"
+	      "\t\t\t}\n"
+	      "\t\t}\n"
+	      "\t\telse {\n"
+	      "\t\t\tret->root = ret;\n"
+	      "\t\t\tret->lowerpeer = NULL;\n"
+	      "\t\t}\n"
+	      "\t}\n"
+	      "\treturn ret;\n"
+	      "};\n\n", c_code);
+
+	fputs("NewIfcObj\n"
+	      "NI_copy(NewIfcObj obj) {\n"
+	      "\treturn obj->copy(obj);\n"
+	      "}\n\n", c_code);
+
+	fputs("enum NewIfc_error\n"
+	      "NI_error(NewIfcObj obj)\n"
+	      "{\n"
+	      "\treturn obj->last_error;\n"
+	      "}\n\n", c_code);
+
+	nitems = sizeof(attributes) / sizeof(attributes[0]);
+	for (i = 0; i < nitems; i++) {
+		switch (attributes[i].impl) {
+			case attr_impl_object:
+				if (!attributes[i].read_only) {
+					fprintf(c_code, "bool\n"
+							"NI_set_%s(NewIfcObj obj, %s value) {\n"
+							"\tbool ret;\n"
+							"\tif (NI_set_locked(obj, true)) {\n"
+							"\t\tret = obj->set(obj, NewIfc_%s, value);\n"
+							"\t\tNI_set_locked(obj, false);\n"
+							"\t}\n"
+							"\telse\n"
+							"\t\tret = false;\n"
+							"\treturn ret;\n"
+							"}\n\n", attributes[i].name, attributes[i].type, attributes[i].name);
+				}
+
+				fprintf(c_code, "bool\n"
+						"NI_get_%s(NewIfcObj obj, %s* value) {\n"
+						"\tbool ret;\n"
+						"\tif (NI_set_locked(obj, true)) {\n"
+						"\t\tret = obj->get(obj, NewIfc_%s, value);\n"
+						"\t\tNI_set_locked(obj, false);\n"
+						"\t}\n"
+						"\telse\n"
+						"\t\tret = false;\n"
+						"\treturn ret;\n"
+						"}\n\n", attributes[i].name, attributes[i].type, attributes[i].name);
+				break;
+			case attr_impl_global:
+				if (!attributes[i].read_only) {
+					fprintf(c_code, "bool\n"
+							"NI_set_%s(NewIfcObj obj, %s value) {\n"
+							"\tbool ret;\n"
+							"\tif (NI_set_locked(obj, true)) {\n"
+							"\t\tobj->%s = value;\n"
+							"\t\tNI_set_locked(obj, false);\n"
+							"\t}\n"
+							"\telse\n"
+							"\t\tret = false;\n"
+							"\treturn ret;\n"
+							"}\n\n", attributes[i].name, attributes[i].type, attributes[i].name);
+				}
+
+				fprintf(c_code, "bool\n"
+						"NI_get_%s(NewIfcObj obj, %s* value) {\n"
+						"\tbool ret;\n"
+						"\tif (NI_set_locked(obj, true)) {\n"
+						"\t\t*value = obj->%s;\n"
+						"\t\tNI_set_locked(obj, false);\n"
+						"\t}\n"
+						"\telse\n"
+						"\t\tret = false;\n"
+						"\treturn ret;\n"
+						"}\n\n", attributes[i].name, attributes[i].type, attributes[i].name);
+				break;
+			case attr_impl_root:
+				if (!attributes[i].read_only) {
+					fprintf(c_code, "bool\n"
+							"NI_set_%s(NewIfcObj obj, %s value) {\n"
+							"\treturn obj->root->set(obj, NewIfc_%s, value);\n"
+							"}\n\n", attributes[i].name, attributes[i].type, attributes[i].name);
+				}
+
+				fprintf(c_code, "bool\n"
+						"NI_get_%s(NewIfcObj obj, %s* value) {\n"
+						"\treturn obj->root->get(obj, NewIfc_%s, value);\n"
+						"}\n\n", attributes[i].name, attributes[i].type, attributes[i].name);
+				break;
+		}
+	}
+	fclose(c_code);
+}

src/newifc/internal_macros.h

+#ifndef INTERNAL_MACROS_H
+#define INTERNAL_MACROS_H
+
+#define SET_VARS           \
+	va_list ap;         \
+	char *buf; \
+	size_t sz
+
+#define SET_BOOL(st, field) do {    \
+	st->field = va_arg(ap, int); \
+} while(0)
+
+#define SET_UINT32_T(st, field) do {     \
+	st->field = va_arg(ap, uint32_t); \
+} while(0);
+
+#define SET_UINT16_T(st, field) do {     \
+	st->field = va_arg(ap, uint16_t); \
+} while(0);
+
+#define SET_STRING(st, field, sz_field) do {                       \
+	buf = strdup(va_arg(ap, const char *));                     \
+	if (buf == NULL) {                                           \
+		st->api.last_error = NewIfc_error_allocation_failure; \
+		break;                                                 \
+	}                                                               \
+	free(st->field);                                                 \
+	st->field = buf;                                                  \
+	st->sz_field = strlen(st->field);                                  \
+} while(0)
+
+
+#define GET_VARS   \
+	va_list ap; \
+	size_t sz;   \
+
+#define GET_BOOL(st, field)     *(va_arg(ap, bool *))     = st->field
+#define GET_UINT32_T(st, field) *(va_arg(ap, uint32_t *)) = st->field;
+#define GET_UINT16_T(st, field) *(va_arg(ap, uint16_t *)) = st->field;
+#define GET_STRING(st, field)   *(va_arg(ap, char **))     = st->field;
+
+#endif

src/newifc/root_window.c

+#include <assert.h>
+#include <stdarg.h>
+#include <stdlib.h>  // malloc()/free()
+
+#include "genwrap.h"
+#include "strwrap.h"
+#include "threadwrap.h"
+
+#include "newifc.h"
+#include "newifc_internal.h"
+
+#include "internal_macros.h"
+
+#ifdef BUILD_TESTS
+#include "CuTest.h"
+#endif
+
+static const char default_title[] = "No Title Set";
+
+struct root_window {
+	struct newifc_api api;
+	char *title;
+	size_t title_sz;
+	pthread_mutex_t mtx;
+	unsigned locks;
+	unsigned transparent:1;
+	unsigned show_title:1;
+	unsigned help:1;
+};
+
+static bool
+rw_set(NewIfcObj obj, int attr, ...)
+{
+	struct root_window *rw = (struct root_window *)obj;
+	SET_VARS;
+
+	rw->api.last_error = NewIfc_error_none;
+	va_start(ap, attr);
+	switch (attr) {
+		case NewIfc_transparent:
+			SET_BOOL(rw, transparent);
+			break;
+		case NewIfc_show_title:
+			SET_BOOL(rw, show_title);
+			break;
+		case NewIfc_show_help:
+			SET_BOOL(rw, help);
+			break;
+		case NewIfc_title:
+			SET_STRING(rw, title, title_sz);
+			break;
+		case NewIfc_locked:
+			if (va_arg(ap, int)) {
+				if (pthread_mutex_lock(&rw->mtx) != 0) {
+					rw->api.last_error = NewIfc_error_lock_failed;
+					break;
+				}
+				rw->locks++;
+			}
+			else {
+				if (pthread_mutex_trylock(&rw->mtx) != 0) {
+					rw->api.last_error = NewIfc_error_lock_failed;
+					break;
+				}
+				if (rw->locks == 0) {
+					rw->api.last_error = NewIfc_error_lock_failed;
+					// TODO: Unlock failure can't be recovered and is silent... :(
+#ifndef NDEBUG
+					int lkret =
+#endif
+					pthread_mutex_unlock(&rw->mtx);
+#ifndef NDEBUG
+					assert(lkret == 0);
+#endif
+					break;
+				}
+				if (pthread_mutex_unlock(&rw->mtx) != 0) {
+					rw->api.last_error = NewIfc_error_lock_failed;
+				}
+				rw->locks--;
+				if (pthread_mutex_unlock(&rw->mtx) != 0) {
+					rw->api.last_error = NewIfc_error_lock_failed;
+				}
+			}
+			break;
+		default:
+			rw->api.last_error = NewIfc_error_not_implemented;
+			break;
+	}
+	va_end(ap);
+
+	return rw->api.last_error == NewIfc_error_none;
+}
+
+static bool
+rw_get(NewIfcObj obj, int attr, ...)
+{
+	struct root_window *rw = (struct root_window *)obj;
+	GET_VARS;
+	int lkret;
+
+	rw->api.last_error = NewIfc_error_none;
+	va_start(ap, attr);
+	switch (attr) {
+		case NewIfc_transparent:
+			GET_BOOL(rw, transparent);
+			break;
+		case NewIfc_show_title:
+			GET_BOOL(rw, show_title);
+			break;
+		case NewIfc_show_help:
+			GET_BOOL(rw, help);
+			break;
+		case NewIfc_title:
+			GET_STRING(rw, title);
+			break;
+		case NewIfc_locked:
+			if (pthread_mutex_trylock(&rw->mtx) != 0)
+				*(va_arg(ap, bool *)) = true;
+			else {
+				*(va_arg(ap, bool *)) = rw->locks > 0;
+				if (pthread_mutex_unlock(&rw->mtx) != 0) {
+					rw->api.last_error = NewIfc_error_lock_failed;
+					assert(rw->api.last_error != NewIfc_error_lock_failed);
+					break;
+				}
+			}
+			break;
+		case NewIfc_locked_by_me:
+			if ((lkret = pthread_mutex_trylock(&rw->mtx)) != 0) {
+				if (lkret != EBUSY) {
+					rw->api.last_error = NewIfc_error_lock_failed;
+					break;
+				}
+				*(va_arg(ap, bool *)) = false;
+			}
+			else {
+				*(va_arg(ap, bool *)) = rw->locks > 0;
+				if (pthread_mutex_unlock(&rw->mtx) != 0) {
+					rw->api.last_error = NewIfc_error_lock_failed;
+					assert(rw->api.last_error != NewIfc_error_lock_failed);
+				}
+			}
+			break;
+		default:
+			rw->api.last_error = NewIfc_error_not_implemented;
+			break;
+	}
+
+	return rw->api.last_error == NewIfc_error_none;
+}
+
+NewIfcObj
+rw_copy(NewIfcObj old)
+{
+	struct root_window *ret;
+
+	ret = malloc(sizeof(struct root_window));
+	memcpy(ret, old, sizeof(struct root_window));
+	ret->title = strdup(ret->title);
+
+	return (struct newifc_api *)ret;
+}
+
+NewIfcObj
+NewIFC_root_window(void)
+{
+	struct root_window *ret;
+
+	ret = malloc(sizeof(struct root_window));
+
+	if (ret) {
+		ret->api.get = rw_get;
+		ret->api.set = rw_set;
+		ret->api.copy = rw_copy;
+		ret->api.last_error = NewIfc_error_none;
+		ret->api.width = 80;
+		ret->api.height = 25;
+		ret->transparent = false;
+		ret->show_title = true;
+		ret->help = true;
+		ret->title_sz = 0;
+		ret->title = strdup(default_title);
+		ret->locks = 0;
+		if (ret->title == NULL) {
+			free(ret);
+			return NULL;
+		}
+		ret->mtx = pthread_mutex_initializer_np(true);
+	}
+	return (struct newifc_api *)ret;
+}
+
+#ifdef BUILD_TESTS
+
+void test_root_window(CuTest *ct)
+{
+	bool b;
+	uint32_t u32;
+	char *s;
+	NewIfcObj obj;
+	static const char *new_title = "New Title";
+
+	obj = NewIFC_root_window();
+	CuAssertPtrNotNull(ct, obj);
+	CuAssertPtrNotNull(ct, obj->get);
+	CuAssertPtrNotNull(ct, obj->set);
+	CuAssertPtrNotNull(ct, obj->copy);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->width == 80);
+	CuAssertTrue(ct, obj->height == 25);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_transparent, &b) && !b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_show_title, &b) && b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_show_help, &b) && b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertStrEquals(ct, (obj->get(obj, NewIfc_title, &s), s), default_title);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_locked, &b) && !b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_locked_by_me, &b) && !b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+
+	CuAssertTrue(ct, obj->set(obj, NewIfc_transparent, true));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->set(obj, NewIfc_show_title, false));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->set(obj, NewIfc_show_help, false));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->set(obj, NewIfc_title, new_title));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, !obj->set(obj, NewIfc_locked, false));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_lock_failed);
+	CuAssertTrue(ct, obj->set(obj, NewIfc_locked, true));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, !obj->set(obj, NewIfc_locked_by_me, &b));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_not_implemented);
+
+	CuAssertTrue(ct, obj->get(obj, NewIfc_transparent, &b) && b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_show_title, &b) && !b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_show_help, &b) && !b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_title, &s));
+	CuAssertStrEquals(ct, s, new_title);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_locked, &b) && b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_locked_by_me, &b) && b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, obj->set(obj, NewIfc_locked, false));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+	CuAssertTrue(ct, !obj->set(obj, NewIfc_locked, false));
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_lock_failed);
+	CuAssertTrue(ct, obj->get(obj, NewIfc_locked_by_me, &b) && !b);
+	CuAssertTrue(ct, obj->last_error == NewIfc_error_none);
+}
+
+CuSuite* root_window_get_test_suite() {
+	CuSuite* suite = CuSuiteNew();
+	SUITE_ADD_TEST(suite, test_root_window);
+	return suite;
+}
+
+#endif