c version of wine's 'make_ctests' script

svn path=/trunk/; revision=14020

reactos/tools/make_ctests.c

@@ -0,0 +1,132 @@
+/* make_ctests.c
+
+ * This program is a port of wine project's make_ctests script
+
+# Script to generate a C file containing a list of tests
+#
+# Copyright 2002 Alexandre Julliard
+# Copyright 2002 Dimitrie O. Paun
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library 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
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+
+# ***** Keep in sync with tools/winapi/msvcmaker:_generate_testlist_c *****
+*/
+
+#include <stdio.h>
+#include <stdlib.h>
+
+const char* header =
+	"/* Automatically generated file; DO NOT EDIT!! */\n"
+	"\n"
+	"/* stdarg.h is needed for Winelib */\n"
+	"#include <stdarg.h>\n"
+	"#include <stdio.h>\n"
+	"#include <stdlib.h>\n"
+	"#include \"windef.h\"\n"
+	"#include \"winbase.h\"\n"
+	"\n";
+
+const char* middle =
+	"\n"
+	"struct test\n"
+	"{\n"
+	"    const char *name;\n"
+	"    void (*func)(void);\n"
+	"};\n"
+	"\n"
+	"static const struct test winetest_testlist[] =\n"
+	"{\n";
+
+const char* end =
+	"    { 0, 0 }\n"
+	"};\n"
+	"\n"
+	"#define WINETEST_WANT_MAIN\n"
+	"#include \"wine/test.h\"\n"
+	"\n";
+
+char*
+basename ( const char* filename )
+{
+	const char *p, *p2;
+	char *out;
+	size_t out_len;
+
+	if ( filename == NULL )
+	{
+		fprintf ( stderr, "basename() called with null filename\n" );
+		return NULL;
+	}
+	p = strrchr ( filename, '/' );
+	if ( !p )
+		p = filename;
+	else
+		++p;
+
+	/* look for backslashes, too... */
+	p2 = strrchr ( filename, '\\' );
+	if ( p2 > p )
+		p = p2 + 1;
+
+	/* find extension... */
+	p2 = strrchr ( filename, '.' );
+	if ( !p2 )
+		p2 = p + strlen(p);
+
+	/* malloc a copy */
+	out_len = p2-p;
+	out = malloc ( out_len+1 );
+	if ( out == NULL )
+	{
+		fprintf ( stderr, "malloc() failed\n" );
+		return NULL;
+	}
+	memmove ( out, p, out_len );
+	out[out_len] = '\0';
+	return out;
+}
+
+int
+main ( int argc, const char** argv )
+{
+	size_t i;
+
+	printf ( "%s", header );
+
+	for ( i = 1; i < argc; i++ )
+	{
+		char* test = basename(argv[i]);
+		if ( test == NULL )
+			return 255;
+		printf ( "extern void func_%s(void);\n", test );
+		free ( test );
+	}
+
+	printf ( "%s", middle );
+
+	for ( i = 1; i < argc; i++ )
+	{
+		char* test = basename(argv[i]);
+		if ( test == NULL )
+			return 255;
+		printf ( "    { \"%s\", func_%s },\n", test, test );
+		free ( test );
+	}
+
+	printf ( "%s", end );
+
+	return 0;
+}