tools/make_ctests.c

   1 /*
   2  * Generate a C file containing a list of tests
   3  *
   4  * Copyright 2002, 2005 Alexandre Julliard
   5  * Copyright 2002 Dimitrie O. Paun
   6  * Copyright 2005 Royce Mitchell III for the ReactOS Project
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2.1 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with this library; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21  *
  22  ****** Keep in sync with tools/winapi/msvcmaker:_generate_testlist_c *****
  23  */
  24
  25 #include "config.h"
  26
  27 #include <stdarg.h>
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30 #include <string.h>
  31 #ifdef HAVE_UNISTD_H
  32 #include <unistd.h>
  33 #endif
  34
  35 static const char *output_file;
  36
  37 static void fatal_error( const char *msg, ... )
  38 {
  39     va_list valist;
  40     va_start( valist, msg );
  41     fprintf( stderr, "make_ctests: " );
  42     vfprintf( stderr, msg, valist );
  43     va_end( valist );
  44     if (output_file) unlink( output_file );
  45     exit(1);
  46 }
  47
  48 static void fatal_perror( const char *msg, ... )
  49 {
  50     va_list valist;
  51     va_start( valist, msg );
  52     fprintf( stderr, "make_ctests: " );
  53     vfprintf( stderr, msg, valist );
  54     perror( " " );
  55     va_end( valist );
  56     exit(1);
  57 }
  58
  59 static void *xmalloc( size_t size )
  60 {
  61     void *res = malloc (size ? size : 1);
  62     if (!res) fatal_error( "virtual memory exhausted.\n" );
  63     return res;
  64 }
  65
  66 static char* basename( const char* filename )
  67 {
  68     const char *p, *p2;
  69     char *out;
  70     size_t out_len;
  71
  72     p = strrchr ( filename, '/' );
  73     if ( !p )
  74         p = filename;
  75     else
  76         ++p;
  77
  78     /* look for backslashes, too... */
  79     p2 = strrchr ( p, '\\' );
  80     if ( p2 ) p = p2 + 1;
  81
  82     /* find extension... */
  83     p2 = strrchr ( p, '.' );
  84     if ( !p2 )
  85         p2 = p + strlen(p);
  86
  87     /* malloc a copy */
  88     out_len = p2-p;
  89     out = xmalloc ( out_len+1 );
  90     memcpy ( out, p, out_len );
  91     out[out_len] = '\0';
  92     return out;
  93 }
  94
  95 int main( int argc, const char** argv )
  96 {
  97     int i, count = 0;
  98     FILE *out = stdout;
  99     char **tests = xmalloc( argc * sizeof(*tests) );
 100
 101     for (i = 1; i < argc; i++)
 102     {
 103         if (!strcmp( argv[i], "-o" ) && i < argc-1)
 104         {
 105             output_file = argv[++i];
 106             continue;
 107         }
 108         tests[count++] = basename( argv[i] );
 109     }
 110
 111     if (output_file)
 112     {
 113         if (!(out = fopen( output_file, "w" )))
 114             fatal_perror( "cannot create %s", output_file );
 115     }
 116
 117     fprintf( out,
 118              "/* Automatically generated file; DO NOT EDIT!! */\n"
 119              "\n"
 120              "#include <windows.h>\n\n"
 121              "#define STANDALONE\n"
 122              "#include \"wine/test.h\"\n\n" );
 123
 124     for (i = 0; i < count; i++) fprintf( out, "extern void func_%s(void);\n", tests[i] );
 125
 126     fprintf( out,
 127              "\n"
 128              "const struct test winetest_testlist[] =\n"
 129              "{\n" );
 130
 131     for (i = 0; i < count; i++) fprintf( out, "    { \"%s\", func_%s },\n", tests[i], tests[i] );
 132
 133     fprintf( out,
 134              "    { 0, 0 }\n"
 135              "};\n" );
 136
 137     if (output_file && fclose( out ))
 138         fatal_perror( "error writing to %s", output_file );
 139
 140     return 0;
 141 }