mirror of
https://github.com/reactos/wine.git
synced 2024-12-05 18:27:13 +00:00
1564 lines
49 KiB
C
1564 lines
49 KiB
C
/*
|
|
* Generate include file dependencies
|
|
*
|
|
* Copyright 1996 Alexandre Julliard
|
|
*
|
|
* 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include "config.h"
|
|
#define NO_LIBWINE_PORT
|
|
#include "wine/port.h"
|
|
|
|
#include <assert.h>
|
|
#include <ctype.h>
|
|
#include <errno.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <stdarg.h>
|
|
#include <string.h>
|
|
#ifdef HAVE_UNISTD_H
|
|
# include <unistd.h>
|
|
#endif
|
|
#include "wine/list.h"
|
|
|
|
/* Max first-level includes per file */
|
|
#define MAX_INCLUDES 200
|
|
|
|
struct incl_file
|
|
{
|
|
struct list entry;
|
|
char *name;
|
|
char *filename;
|
|
char *sourcename; /* source file name for generated headers */
|
|
struct incl_file *included_by; /* file that included this one */
|
|
int included_line; /* line where this file was included */
|
|
unsigned int flags; /* flags (see below) */
|
|
struct incl_file *owner;
|
|
struct incl_file *files[MAX_INCLUDES];
|
|
};
|
|
|
|
#define FLAG_SYSTEM 0x0001 /* is it a system include (#include <name>) */
|
|
#define FLAG_IDL_PROXY 0x0002 /* generates a proxy (_p.c) file */
|
|
#define FLAG_IDL_CLIENT 0x0004 /* generates a client (_c.c) file */
|
|
#define FLAG_IDL_SERVER 0x0008 /* generates a server (_s.c) file */
|
|
#define FLAG_IDL_IDENT 0x0010 /* generates an ident (_i.c) file */
|
|
#define FLAG_IDL_REGISTER 0x0020 /* generates a registration (_r.res) file */
|
|
#define FLAG_IDL_TYPELIB 0x0040 /* generates a typelib (.tlb) file */
|
|
#define FLAG_IDL_HEADER 0x0080 /* generates a header (.h) file */
|
|
#define FLAG_RC_PO 0x0100 /* rc file contains translations */
|
|
#define FLAG_C_IMPLIB 0x0200 /* file is part of an import library */
|
|
|
|
static const struct
|
|
{
|
|
unsigned int flag;
|
|
const char *ext;
|
|
const char *widl_arg;
|
|
} idl_outputs[] =
|
|
{
|
|
{ FLAG_IDL_TYPELIB, ".tlb", "$(TARGETFLAGS) $(IDLFLAGS) -t" },
|
|
{ FLAG_IDL_TYPELIB, "_t.res", "$(TARGETFLAGS) $(IDLFLAGS) -t" },
|
|
{ FLAG_IDL_CLIENT, "_c.c", "$(IDLFLAGS) -c" },
|
|
{ FLAG_IDL_IDENT, "_i.c", "$(IDLFLAGS) -u" },
|
|
{ FLAG_IDL_PROXY, "_p.c", "$(IDLFLAGS) -p" },
|
|
{ FLAG_IDL_SERVER, "_s.c", "$(IDLFLAGS) -s" },
|
|
{ FLAG_IDL_REGISTER, "_r.res", "$(IDLFLAGS) -r" },
|
|
{ FLAG_IDL_HEADER, ".h", "$(IDLFLAGS) -h" },
|
|
};
|
|
|
|
static struct list sources = LIST_INIT(sources);
|
|
static struct list includes = LIST_INIT(includes);
|
|
|
|
struct strarray
|
|
{
|
|
unsigned int count; /* strings in use */
|
|
unsigned int size; /* total allocated size */
|
|
const char **str;
|
|
};
|
|
|
|
static struct strarray paths;
|
|
static struct strarray object_extensions;
|
|
|
|
static const char *src_dir;
|
|
static const char *top_src_dir;
|
|
static const char *top_obj_dir;
|
|
static const char *parent_dir;
|
|
static const char *OutputFileName = "Makefile";
|
|
static const char *Separator = "### Dependencies";
|
|
static const char *input_file_name;
|
|
static int relative_dir_mode;
|
|
static int input_line;
|
|
static FILE *output_file;
|
|
|
|
static const char Usage[] =
|
|
"Usage: makedep [options] [files]\n"
|
|
"Options:\n"
|
|
" -Idir Search for include files in directory 'dir'\n"
|
|
" -Cdir Search for source files in directory 'dir'\n"
|
|
" -Sdir Set the top source directory\n"
|
|
" -Tdir Set the top object directory\n"
|
|
" -Pdir Set the parent source directory\n"
|
|
" -R from to Compute the relative path between two directories\n"
|
|
" -fxxx Store output in file 'xxx' (default: Makefile)\n"
|
|
" -sxxx Use 'xxx' as separator (default: \"### Dependencies\")\n";
|
|
|
|
|
|
#ifndef __GNUC__
|
|
#define __attribute__(x)
|
|
#endif
|
|
|
|
static void fatal_error( const char *msg, ... ) __attribute__ ((__format__ (__printf__, 1, 2)));
|
|
static void fatal_perror( const char *msg, ... ) __attribute__ ((__format__ (__printf__, 1, 2)));
|
|
static int output( const char *format, ... ) __attribute__ ((__format__ (__printf__, 1, 2)));
|
|
static char *strmake( const char* fmt, ... ) __attribute__ ((__format__ (__printf__, 1, 2)));
|
|
|
|
/*******************************************************************
|
|
* fatal_error
|
|
*/
|
|
static void fatal_error( const char *msg, ... )
|
|
{
|
|
va_list valist;
|
|
va_start( valist, msg );
|
|
if (input_file_name)
|
|
{
|
|
fprintf( stderr, "%s:", input_file_name );
|
|
if (input_line) fprintf( stderr, "%d:", input_line );
|
|
fprintf( stderr, " error: " );
|
|
}
|
|
else fprintf( stderr, "makedep: error: " );
|
|
vfprintf( stderr, msg, valist );
|
|
va_end( valist );
|
|
exit(1);
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* fatal_perror
|
|
*/
|
|
static void fatal_perror( const char *msg, ... )
|
|
{
|
|
va_list valist;
|
|
va_start( valist, msg );
|
|
if (input_file_name)
|
|
{
|
|
fprintf( stderr, "%s:", input_file_name );
|
|
if (input_line) fprintf( stderr, "%d:", input_line );
|
|
fprintf( stderr, " error: " );
|
|
}
|
|
else fprintf( stderr, "makedep: error: " );
|
|
vfprintf( stderr, msg, valist );
|
|
perror( " " );
|
|
va_end( valist );
|
|
exit(1);
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* xmalloc
|
|
*/
|
|
static void *xmalloc( size_t size )
|
|
{
|
|
void *res;
|
|
if (!(res = malloc (size ? size : 1)))
|
|
fatal_error( "Virtual memory exhausted.\n" );
|
|
return res;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* xrealloc
|
|
*/
|
|
static void *xrealloc (void *ptr, size_t size)
|
|
{
|
|
void *res;
|
|
assert( size );
|
|
if (!(res = realloc( ptr, size )))
|
|
fatal_error( "Virtual memory exhausted.\n" );
|
|
return res;
|
|
}
|
|
|
|
/*******************************************************************
|
|
* xstrdup
|
|
*/
|
|
static char *xstrdup( const char *str )
|
|
{
|
|
char *res = strdup( str );
|
|
if (!res) fatal_error( "Virtual memory exhausted.\n" );
|
|
return res;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* strmake
|
|
*/
|
|
static char *strmake( const char* fmt, ... )
|
|
{
|
|
int n;
|
|
size_t size = 100;
|
|
va_list ap;
|
|
|
|
for (;;)
|
|
{
|
|
char *p = xmalloc (size);
|
|
va_start(ap, fmt);
|
|
n = vsnprintf (p, size, fmt, ap);
|
|
va_end(ap);
|
|
if (n == -1) size *= 2;
|
|
else if ((size_t)n >= size) size = n + 1;
|
|
else return p;
|
|
free(p);
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* strendswith
|
|
*/
|
|
static int strendswith( const char* str, const char* end )
|
|
{
|
|
int l = strlen(str);
|
|
int m = strlen(end);
|
|
|
|
return l >= m && strcmp(str + l - m, end) == 0;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* output
|
|
*/
|
|
static int output( const char *format, ... )
|
|
{
|
|
int ret;
|
|
va_list valist;
|
|
|
|
va_start( valist, format );
|
|
ret = vfprintf( output_file, format, valist );
|
|
va_end( valist );
|
|
if (ret < 0) fatal_perror( "output" );
|
|
return ret;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* strarray_init
|
|
*/
|
|
static void strarray_init( struct strarray *array )
|
|
{
|
|
array->count = 0;
|
|
array->size = 0;
|
|
array->str = NULL;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* strarray_add
|
|
*/
|
|
static void strarray_add( struct strarray *array, const char *str )
|
|
{
|
|
if (array->count == array->size)
|
|
{
|
|
if (array->size) array->size *= 2;
|
|
else array->size = 16;
|
|
array->str = xrealloc( array->str, sizeof(array->str[0]) * array->size );
|
|
}
|
|
array->str[array->count++] = str;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* strarray_insert
|
|
*/
|
|
static void strarray_insert( struct strarray *array, unsigned int pos, const char *str )
|
|
{
|
|
unsigned int i;
|
|
|
|
strarray_add( array, NULL );
|
|
for (i = array->count - 1; i > pos; i--) array->str[i] = array->str[i - 1];
|
|
array->str[pos] = str;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* output_filename
|
|
*/
|
|
static void output_filename( const char *name, int *column )
|
|
{
|
|
if (*column + strlen(name) + 1 > 100)
|
|
{
|
|
output( " \\\n" );
|
|
*column = 0;
|
|
}
|
|
*column += output( " %s", name );
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* get_extension
|
|
*/
|
|
static char *get_extension( char *filename )
|
|
{
|
|
char *ext = strrchr( filename, '.' );
|
|
if (ext && strchr( ext, '/' )) ext = NULL;
|
|
return ext;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* replace_extension
|
|
*/
|
|
static char *replace_extension( const char *name, unsigned int old_len, const char *new_ext )
|
|
{
|
|
char *ret = xmalloc( strlen( name ) + strlen( new_ext ) + 1 );
|
|
strcpy( ret, name );
|
|
strcpy( ret + strlen( ret ) - old_len, new_ext );
|
|
return ret;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* get_relative_path
|
|
*
|
|
* Determine where the destination path is located relative to the 'from' path.
|
|
*/
|
|
static char *get_relative_path( const char *from, const char *dest )
|
|
{
|
|
const char *start;
|
|
char *ret, *p;
|
|
unsigned int dotdots = 0;
|
|
|
|
/* a path of "." is equivalent to an empty path */
|
|
if (!strcmp( from, "." )) from = "";
|
|
|
|
for (;;)
|
|
{
|
|
while (*from == '/') from++;
|
|
while (*dest == '/') dest++;
|
|
start = dest; /* save start of next path element */
|
|
if (!*from) break;
|
|
|
|
while (*from && *from != '/' && *from == *dest) { from++; dest++; }
|
|
if ((!*from || *from == '/') && (!*dest || *dest == '/')) continue;
|
|
|
|
/* count remaining elements in 'from' */
|
|
do
|
|
{
|
|
dotdots++;
|
|
while (*from && *from != '/') from++;
|
|
while (*from == '/') from++;
|
|
}
|
|
while (*from);
|
|
break;
|
|
}
|
|
|
|
if (!start[0] && !dotdots) return NULL; /* empty path */
|
|
|
|
ret = xmalloc( 3 * dotdots + strlen( start ) + 1 );
|
|
for (p = ret; dotdots; dotdots--, p += 3) memcpy( p, "../", 3 );
|
|
|
|
if (start[0]) strcpy( p, start );
|
|
else p[-1] = 0; /* remove trailing slash */
|
|
return ret;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* get_line
|
|
*/
|
|
static char *get_line( FILE *file )
|
|
{
|
|
static char *buffer;
|
|
static unsigned int size;
|
|
|
|
if (!size)
|
|
{
|
|
size = 1024;
|
|
buffer = xmalloc( size );
|
|
}
|
|
if (!fgets( buffer, size, file )) return NULL;
|
|
input_line++;
|
|
|
|
for (;;)
|
|
{
|
|
char *p = buffer + strlen(buffer);
|
|
/* if line is larger than buffer, resize buffer */
|
|
while (p == buffer + size - 1 && p[-1] != '\n')
|
|
{
|
|
buffer = xrealloc( buffer, size * 2 );
|
|
if (!fgets( buffer + size - 1, size + 1, file )) break;
|
|
p = buffer + strlen(buffer);
|
|
size *= 2;
|
|
}
|
|
if (p > buffer && p[-1] == '\n')
|
|
{
|
|
*(--p) = 0;
|
|
if (p > buffer && p[-1] == '\r') *(--p) = 0;
|
|
if (p > buffer && p[-1] == '\\')
|
|
{
|
|
*(--p) = 0;
|
|
/* line ends in backslash, read continuation line */
|
|
if (!fgets( p, size - (p - buffer), file )) return buffer;
|
|
input_line++;
|
|
continue;
|
|
}
|
|
}
|
|
return buffer;
|
|
}
|
|
}
|
|
|
|
/*******************************************************************
|
|
* find_src_file
|
|
*/
|
|
static struct incl_file *find_src_file( const char *name )
|
|
{
|
|
struct incl_file *file;
|
|
|
|
LIST_FOR_EACH_ENTRY( file, &sources, struct incl_file, entry )
|
|
if (!strcmp( name, file->name )) return file;
|
|
return NULL;
|
|
}
|
|
|
|
/*******************************************************************
|
|
* find_include_file
|
|
*/
|
|
static struct incl_file *find_include_file( const char *name )
|
|
{
|
|
struct incl_file *file;
|
|
|
|
LIST_FOR_EACH_ENTRY( file, &includes, struct incl_file, entry )
|
|
if (!strcmp( name, file->name )) return file;
|
|
return NULL;
|
|
}
|
|
|
|
/*******************************************************************
|
|
* add_include
|
|
*
|
|
* Add an include file if it doesn't already exists.
|
|
*/
|
|
static struct incl_file *add_include( struct incl_file *pFile, const char *name, int system )
|
|
{
|
|
struct incl_file *include;
|
|
char *ext;
|
|
int pos;
|
|
|
|
for (pos = 0; pos < MAX_INCLUDES; pos++) if (!pFile->files[pos]) break;
|
|
if (pos >= MAX_INCLUDES)
|
|
fatal_error( "too many included files, please fix MAX_INCLUDES\n" );
|
|
|
|
/* enforce some rules for the Wine tree */
|
|
|
|
if (!memcmp( name, "../", 3 ))
|
|
fatal_error( "#include directive with relative path not allowed\n" );
|
|
|
|
if (!strcmp( name, "config.h" ))
|
|
{
|
|
if ((ext = strrchr( pFile->filename, '.' )) && !strcmp( ext, ".h" ))
|
|
fatal_error( "config.h must not be included by a header file\n" );
|
|
if (pos)
|
|
fatal_error( "config.h must be included before anything else\n" );
|
|
}
|
|
else if (!strcmp( name, "wine/port.h" ))
|
|
{
|
|
if ((ext = strrchr( pFile->filename, '.' )) && !strcmp( ext, ".h" ))
|
|
fatal_error( "wine/port.h must not be included by a header file\n" );
|
|
if (!pos) fatal_error( "config.h must be included before wine/port.h\n" );
|
|
if (pos > 1)
|
|
fatal_error( "wine/port.h must be included before everything except config.h\n" );
|
|
if (strcmp( pFile->files[0]->name, "config.h" ))
|
|
fatal_error( "config.h must be included before wine/port.h\n" );
|
|
}
|
|
|
|
LIST_FOR_EACH_ENTRY( include, &includes, struct incl_file, entry )
|
|
if (!strcmp( name, include->name )) goto found;
|
|
|
|
include = xmalloc( sizeof(*include) );
|
|
memset( include, 0, sizeof(*include) );
|
|
include->name = xstrdup(name);
|
|
include->included_by = pFile;
|
|
include->included_line = input_line;
|
|
if (system) include->flags |= FLAG_SYSTEM;
|
|
list_add_tail( &includes, &include->entry );
|
|
found:
|
|
pFile->files[pos] = include;
|
|
return include;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* open_src_file
|
|
*/
|
|
static FILE *open_src_file( struct incl_file *pFile )
|
|
{
|
|
FILE *file;
|
|
|
|
/* first try name as is */
|
|
if ((file = fopen( pFile->name, "r" )))
|
|
{
|
|
pFile->filename = xstrdup( pFile->name );
|
|
return file;
|
|
}
|
|
/* now try in source dir */
|
|
if (src_dir)
|
|
{
|
|
pFile->filename = strmake( "%s/%s", src_dir, pFile->name );
|
|
file = fopen( pFile->filename, "r" );
|
|
}
|
|
/* now try parent dir */
|
|
if (!file && parent_dir)
|
|
{
|
|
if (src_dir)
|
|
pFile->filename = strmake( "%s/%s/%s", src_dir, parent_dir, pFile->name );
|
|
else
|
|
pFile->filename = strmake( "%s/%s", parent_dir, pFile->name );
|
|
if ((file = fopen( pFile->filename, "r" ))) return file;
|
|
file = fopen( pFile->filename, "r" );
|
|
}
|
|
if (!file) fatal_perror( "open %s", pFile->name );
|
|
return file;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* open_include_file
|
|
*/
|
|
static FILE *open_include_file( struct incl_file *pFile )
|
|
{
|
|
FILE *file = NULL;
|
|
char *filename, *p;
|
|
unsigned int i;
|
|
|
|
errno = ENOENT;
|
|
|
|
/* check for generated bison header */
|
|
|
|
if (strendswith( pFile->name, ".tab.h" ))
|
|
{
|
|
filename = replace_extension( pFile->name, 6, ".y" );
|
|
if (src_dir) filename = strmake( "%s/%s", src_dir, filename );
|
|
|
|
if ((file = fopen( filename, "r" )))
|
|
{
|
|
pFile->sourcename = filename;
|
|
pFile->filename = xstrdup( pFile->name );
|
|
/* don't bother to parse it */
|
|
fclose( file );
|
|
return NULL;
|
|
}
|
|
free( filename );
|
|
}
|
|
|
|
/* check for corresponding idl file in source dir */
|
|
|
|
if (strendswith( pFile->name, ".h" ))
|
|
{
|
|
filename = replace_extension( pFile->name, 2, ".idl" );
|
|
if (src_dir) filename = strmake( "%s/%s", src_dir, filename );
|
|
|
|
if ((file = fopen( filename, "r" )))
|
|
{
|
|
pFile->sourcename = filename;
|
|
pFile->filename = xstrdup( pFile->name );
|
|
return file;
|
|
}
|
|
free( filename );
|
|
}
|
|
|
|
/* first try name as is */
|
|
if ((file = fopen( pFile->name, "r" )))
|
|
{
|
|
pFile->filename = xstrdup( pFile->name );
|
|
return file;
|
|
}
|
|
|
|
/* now try in source dir */
|
|
if (src_dir)
|
|
{
|
|
filename = strmake( "%s/%s", src_dir, pFile->name );
|
|
if ((file = fopen( filename, "r" ))) goto found;
|
|
free( filename );
|
|
}
|
|
|
|
/* now try in parent source dir */
|
|
if (parent_dir)
|
|
{
|
|
if (src_dir)
|
|
filename = strmake( "%s/%s/%s", src_dir, parent_dir, pFile->name );
|
|
else
|
|
filename = strmake( "%s/%s", parent_dir, pFile->name );
|
|
if ((file = fopen( filename, "r" ))) goto found;
|
|
free( filename );
|
|
}
|
|
|
|
/* check for corresponding idl file in global includes */
|
|
|
|
if (strendswith( pFile->name, ".h" ))
|
|
{
|
|
filename = replace_extension( pFile->name, 2, ".idl" );
|
|
if (top_src_dir)
|
|
filename = strmake( "%s/include/%s", top_src_dir, filename );
|
|
else if (top_obj_dir)
|
|
filename = strmake( "%s/include/%s", top_obj_dir, filename );
|
|
else
|
|
filename = NULL;
|
|
|
|
if (filename && (file = fopen( filename, "r" )))
|
|
{
|
|
pFile->sourcename = filename;
|
|
pFile->filename = strmake( "%s/include/%s", top_obj_dir, pFile->name );
|
|
return file;
|
|
}
|
|
free( filename );
|
|
}
|
|
|
|
/* check for corresponding .x file in global includes */
|
|
|
|
if (strendswith( pFile->name, "tmpl.h" ))
|
|
{
|
|
filename = replace_extension( pFile->name, 2, ".x" );
|
|
if (top_src_dir)
|
|
filename = strmake( "%s/include/%s", top_src_dir, filename );
|
|
else if (top_obj_dir)
|
|
filename = strmake( "%s/include/%s", top_obj_dir, filename );
|
|
else
|
|
filename = NULL;
|
|
|
|
if (filename && (file = fopen( filename, "r" )))
|
|
{
|
|
pFile->sourcename = filename;
|
|
pFile->filename = strmake( "%s/include/%s", top_obj_dir, pFile->name );
|
|
return file;
|
|
}
|
|
free( filename );
|
|
}
|
|
|
|
/* now search in include paths */
|
|
for (i = 0; i < paths.count; i++)
|
|
{
|
|
if (paths.str[i][0] == '/')
|
|
{
|
|
/* ignore absolute paths that don't point into the source dir */
|
|
if (!top_src_dir) continue;
|
|
if (strncmp( paths.str[i], top_src_dir, strlen(top_src_dir) )) continue;
|
|
if (paths.str[i][strlen(top_src_dir)] != '/') continue;
|
|
}
|
|
filename = strmake( "%s/%s", paths.str[i], pFile->name );
|
|
if ((file = fopen( filename, "r" ))) goto found;
|
|
free( filename );
|
|
}
|
|
if (pFile->flags & FLAG_SYSTEM) return NULL; /* ignore system files we cannot find */
|
|
|
|
/* try in src file directory */
|
|
if ((p = strrchr(pFile->included_by->filename, '/')))
|
|
{
|
|
int l = p - pFile->included_by->filename + 1;
|
|
filename = xmalloc(l + strlen(pFile->name) + 1);
|
|
memcpy( filename, pFile->included_by->filename, l );
|
|
strcpy( filename + l, pFile->name );
|
|
if ((file = fopen( filename, "r" ))) goto found;
|
|
free( filename );
|
|
}
|
|
|
|
fprintf( stderr, "%s:%d: error: ", pFile->included_by->filename, pFile->included_line );
|
|
perror( pFile->name );
|
|
pFile = pFile->included_by;
|
|
while (pFile && pFile->included_by)
|
|
{
|
|
const char *parent = pFile->included_by->sourcename;
|
|
if (!parent) parent = pFile->included_by->name;
|
|
fprintf( stderr, "%s:%d: note: %s was first included here\n",
|
|
parent, pFile->included_line, pFile->name );
|
|
pFile = pFile->included_by;
|
|
}
|
|
exit(1);
|
|
|
|
found:
|
|
pFile->filename = filename;
|
|
return file;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* parse_include_directive
|
|
*/
|
|
static void parse_include_directive( struct incl_file *source, char *str )
|
|
{
|
|
char quote, *include, *p = str;
|
|
|
|
while (*p && isspace(*p)) p++;
|
|
if (*p != '\"' && *p != '<' ) return;
|
|
quote = *p++;
|
|
if (quote == '<') quote = '>';
|
|
include = p;
|
|
while (*p && (*p != quote)) p++;
|
|
if (!*p) fatal_error( "malformed include directive '%s'\n", str );
|
|
*p = 0;
|
|
add_include( source, include, (quote == '>') );
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* parse_pragma_directive
|
|
*/
|
|
static void parse_pragma_directive( struct incl_file *source, char *str )
|
|
{
|
|
char *flag, *p = str;
|
|
|
|
if (!isspace( *p )) return;
|
|
while (*p && isspace(*p)) p++;
|
|
p = strtok( p, " \t" );
|
|
if (strcmp( p, "makedep" )) return;
|
|
|
|
while ((flag = strtok( NULL, " \t" )))
|
|
{
|
|
if (!strcmp( flag, "depend" ))
|
|
{
|
|
while ((p = strtok( NULL, " \t" ))) add_include( source, p, 0 );
|
|
return;
|
|
}
|
|
if (strendswith( source->name, ".idl" ))
|
|
{
|
|
if (!strcmp( flag, "header" )) source->flags |= FLAG_IDL_HEADER;
|
|
else if (!strcmp( flag, "proxy" )) source->flags |= FLAG_IDL_PROXY;
|
|
else if (!strcmp( flag, "client" )) source->flags |= FLAG_IDL_CLIENT;
|
|
else if (!strcmp( flag, "server" )) source->flags |= FLAG_IDL_SERVER;
|
|
else if (!strcmp( flag, "ident" )) source->flags |= FLAG_IDL_IDENT;
|
|
else if (!strcmp( flag, "typelib" )) source->flags |= FLAG_IDL_TYPELIB;
|
|
else if (!strcmp( flag, "register" )) source->flags |= FLAG_IDL_REGISTER;
|
|
}
|
|
else if (strendswith( source->name, ".rc" ))
|
|
{
|
|
if (!strcmp( flag, "po" )) source->flags |= FLAG_RC_PO;
|
|
}
|
|
else if (!strcmp( flag, "implib" )) source->flags |= FLAG_C_IMPLIB;
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* parse_cpp_directive
|
|
*/
|
|
static void parse_cpp_directive( struct incl_file *source, char *str )
|
|
{
|
|
while (*str && isspace(*str)) str++;
|
|
if (*str++ != '#') return;
|
|
while (*str && isspace(*str)) str++;
|
|
|
|
if (!strncmp( str, "include", 7 ))
|
|
parse_include_directive( source, str + 7 );
|
|
else if (!strncmp( str, "import", 6 ) && strendswith( source->name, ".m" ))
|
|
parse_include_directive( source, str + 6 );
|
|
else if (!strncmp( str, "pragma", 6 ))
|
|
parse_pragma_directive( source, str + 6 );
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* parse_idl_file
|
|
*
|
|
* If for_h_file is non-zero, it means we are not interested in the idl file
|
|
* itself, but only in the contents of the .h file that will be generated from it.
|
|
*/
|
|
static void parse_idl_file( struct incl_file *pFile, FILE *file, int for_h_file )
|
|
{
|
|
char *buffer, *include;
|
|
|
|
input_line = 0;
|
|
if (for_h_file)
|
|
{
|
|
/* generated .h file always includes these */
|
|
add_include( pFile, "rpc.h", 1 );
|
|
add_include( pFile, "rpcndr.h", 1 );
|
|
}
|
|
|
|
while ((buffer = get_line( file )))
|
|
{
|
|
char quote;
|
|
char *p = buffer;
|
|
while (*p && isspace(*p)) p++;
|
|
|
|
if (!strncmp( p, "import", 6 ))
|
|
{
|
|
p += 6;
|
|
while (*p && isspace(*p)) p++;
|
|
if (*p != '"') continue;
|
|
include = ++p;
|
|
while (*p && (*p != '"')) p++;
|
|
if (!*p) fatal_error( "malformed import directive\n" );
|
|
*p = 0;
|
|
if (for_h_file && strendswith( include, ".idl" )) strcpy( p - 4, ".h" );
|
|
add_include( pFile, include, 0 );
|
|
continue;
|
|
}
|
|
|
|
if (for_h_file) /* only check for #include inside cpp_quote */
|
|
{
|
|
if (strncmp( p, "cpp_quote", 9 )) continue;
|
|
p += 9;
|
|
while (*p && isspace(*p)) p++;
|
|
if (*p++ != '(') continue;
|
|
while (*p && isspace(*p)) p++;
|
|
if (*p++ != '"') continue;
|
|
if (*p++ != '#') continue;
|
|
while (*p && isspace(*p)) p++;
|
|
if (strncmp( p, "include", 7 )) continue;
|
|
p += 7;
|
|
while (*p && isspace(*p)) p++;
|
|
if (*p == '\\' && p[1] == '"')
|
|
{
|
|
p += 2;
|
|
quote = '"';
|
|
}
|
|
else
|
|
{
|
|
if (*p++ != '<' ) continue;
|
|
quote = '>';
|
|
}
|
|
include = p;
|
|
while (*p && (*p != quote)) p++;
|
|
if (!*p || (quote == '"' && p[-1] != '\\'))
|
|
fatal_error( "malformed #include directive inside cpp_quote\n" );
|
|
if (quote == '"') p--; /* remove backslash */
|
|
*p = 0;
|
|
add_include( pFile, include, (quote == '>') );
|
|
continue;
|
|
}
|
|
|
|
parse_cpp_directive( pFile, p );
|
|
}
|
|
}
|
|
|
|
/*******************************************************************
|
|
* parse_c_file
|
|
*/
|
|
static void parse_c_file( struct incl_file *pFile, FILE *file )
|
|
{
|
|
char *buffer;
|
|
|
|
input_line = 0;
|
|
while ((buffer = get_line( file )))
|
|
{
|
|
parse_cpp_directive( pFile, buffer );
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* parse_rc_file
|
|
*/
|
|
static void parse_rc_file( struct incl_file *pFile, FILE *file )
|
|
{
|
|
char *buffer, *include;
|
|
|
|
input_line = 0;
|
|
while ((buffer = get_line( file )))
|
|
{
|
|
char quote;
|
|
char *p = buffer;
|
|
while (*p && isspace(*p)) p++;
|
|
|
|
if (p[0] == '/' && p[1] == '*') /* check for magic makedep comment */
|
|
{
|
|
p += 2;
|
|
while (*p && isspace(*p)) p++;
|
|
if (strncmp( p, "@makedep:", 9 )) continue;
|
|
p += 9;
|
|
while (*p && isspace(*p)) p++;
|
|
quote = '"';
|
|
if (*p == quote)
|
|
{
|
|
include = ++p;
|
|
while (*p && *p != quote) p++;
|
|
}
|
|
else
|
|
{
|
|
include = p;
|
|
while (*p && !isspace(*p) && *p != '*') p++;
|
|
}
|
|
if (!*p)
|
|
fatal_error( "malformed makedep comment\n" );
|
|
*p = 0;
|
|
add_include( pFile, include, (quote == '>') );
|
|
continue;
|
|
}
|
|
|
|
parse_cpp_directive( pFile, buffer );
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* parse_man_page
|
|
*/
|
|
static void parse_man_page( struct incl_file *source, FILE *file )
|
|
{
|
|
char *p, *buffer;
|
|
|
|
/* make sure it gets rebuilt when the version changes */
|
|
add_include( source, "config.h", 1 );
|
|
|
|
input_line = 0;
|
|
while ((buffer = get_line( file )))
|
|
{
|
|
if (strncmp( buffer, ".TH", 3 )) continue;
|
|
if (!(p = strtok( buffer, " \t" ))) continue; /* .TH */
|
|
if (!(p = strtok( NULL, " \t" ))) continue; /* program name */
|
|
if (!(p = strtok( NULL, " \t" ))) continue; /* man section */
|
|
source->sourcename = xstrdup( p ); /* abuse source name to store section */
|
|
return;
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* parse_generated_idl
|
|
*/
|
|
static void parse_generated_idl( struct incl_file *source )
|
|
{
|
|
char *header = replace_extension( source->name, 4, ".h" );
|
|
|
|
source->filename = xstrdup( source->name );
|
|
|
|
if (strendswith( source->name, "_c.c" ))
|
|
{
|
|
add_include( source, header, 0 );
|
|
}
|
|
else if (strendswith( source->name, "_i.c" ))
|
|
{
|
|
add_include( source, "rpc.h", 1 );
|
|
add_include( source, "rpcndr.h", 1 );
|
|
add_include( source, "guiddef.h", 1 );
|
|
}
|
|
else if (strendswith( source->name, "_p.c" ))
|
|
{
|
|
add_include( source, "objbase.h", 1 );
|
|
add_include( source, "rpcproxy.h", 1 );
|
|
add_include( source, "wine/exception.h", 1 );
|
|
add_include( source, header, 0 );
|
|
}
|
|
else if (strendswith( source->name, "_s.c" ))
|
|
{
|
|
add_include( source, "wine/exception.h", 1 );
|
|
add_include( source, header, 0 );
|
|
}
|
|
|
|
free( header );
|
|
}
|
|
|
|
/*******************************************************************
|
|
* is_generated_idl
|
|
*/
|
|
static int is_generated_idl( struct incl_file *source )
|
|
{
|
|
return (strendswith( source->name, "_c.c" ) ||
|
|
strendswith( source->name, "_i.c" ) ||
|
|
strendswith( source->name, "_p.c" ) ||
|
|
strendswith( source->name, "_s.c" ));
|
|
}
|
|
|
|
/*******************************************************************
|
|
* parse_file
|
|
*/
|
|
static void parse_file( struct incl_file *source, int src )
|
|
{
|
|
FILE *file;
|
|
|
|
/* don't try to open certain types of files */
|
|
if (strendswith( source->name, ".tlb" ) ||
|
|
strendswith( source->name, ".x" ))
|
|
{
|
|
source->filename = xstrdup( source->name );
|
|
return;
|
|
}
|
|
|
|
file = src ? open_src_file( source ) : open_include_file( source );
|
|
if (!file) return;
|
|
input_file_name = source->filename;
|
|
|
|
if (source->sourcename && strendswith( source->sourcename, ".idl" ))
|
|
parse_idl_file( source, file, 1 );
|
|
else if (strendswith( source->filename, ".idl" ))
|
|
parse_idl_file( source, file, 0 );
|
|
else if (strendswith( source->filename, ".c" ) ||
|
|
strendswith( source->filename, ".m" ) ||
|
|
strendswith( source->filename, ".h" ) ||
|
|
strendswith( source->filename, ".l" ) ||
|
|
strendswith( source->filename, ".y" ))
|
|
parse_c_file( source, file );
|
|
else if (strendswith( source->filename, ".rc" ))
|
|
parse_rc_file( source, file );
|
|
else if (strendswith( source->filename, ".man.in" ))
|
|
parse_man_page( source, file );
|
|
fclose(file);
|
|
input_file_name = NULL;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* add_src_file
|
|
*
|
|
* Add a source file to the list.
|
|
*/
|
|
static struct incl_file *add_src_file( const char *name )
|
|
{
|
|
struct incl_file *file;
|
|
|
|
if ((file = find_src_file( name ))) return file; /* we already have it */
|
|
file = xmalloc( sizeof(*file) );
|
|
memset( file, 0, sizeof(*file) );
|
|
file->name = xstrdup(name);
|
|
list_add_tail( &sources, &file->entry );
|
|
|
|
/* special cases for generated files */
|
|
|
|
if (is_generated_idl( file ))
|
|
{
|
|
parse_generated_idl( file );
|
|
return file;
|
|
}
|
|
|
|
if (!strcmp( file->name, "dlldata.o" ))
|
|
{
|
|
file->filename = xstrdup( "dlldata.c" );
|
|
add_include( file, "objbase.h", 1 );
|
|
add_include( file, "rpcproxy.h", 1 );
|
|
return file;
|
|
}
|
|
|
|
if (!strcmp( file->name, "testlist.o" ))
|
|
{
|
|
file->filename = xstrdup( "testlist.c" );
|
|
add_include( file, "wine/test.h", 1 );
|
|
return file;
|
|
}
|
|
|
|
if (strendswith( file->name, ".o" ))
|
|
{
|
|
/* default to .c for unknown extra object files */
|
|
file->filename = replace_extension( file->name, 2, ".c" );
|
|
return file;
|
|
}
|
|
|
|
if (strendswith( file->name, ".tlb" ) ||
|
|
strendswith( file->name, ".res" ) ||
|
|
strendswith( file->name, ".pot" ) ||
|
|
strendswith( file->name, ".x" ))
|
|
{
|
|
file->filename = xstrdup( file->name );
|
|
return file;
|
|
}
|
|
|
|
parse_file( file, 1 );
|
|
return file;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* add_generated_sources
|
|
*/
|
|
static void add_generated_sources(void)
|
|
{
|
|
unsigned int i;
|
|
struct incl_file *source, *next;
|
|
|
|
LIST_FOR_EACH_ENTRY_SAFE( source, next, &sources, struct incl_file, entry )
|
|
{
|
|
if (!source->flags) continue;
|
|
for (i = 0; i < sizeof(idl_outputs) / sizeof(idl_outputs[0]); i++)
|
|
{
|
|
if (!(source->flags & idl_outputs[i].flag)) continue;
|
|
if (!strendswith( idl_outputs[i].ext, ".c" )) continue;
|
|
add_src_file( replace_extension( source->name, 4, idl_outputs[i].ext ));
|
|
}
|
|
if (source->flags & FLAG_IDL_PROXY) add_src_file( "dlldata.o" );
|
|
}
|
|
|
|
LIST_FOR_EACH_ENTRY_SAFE( source, next, &sources, struct incl_file, entry )
|
|
{
|
|
if (strendswith( source->name, "_c.c" ) ||
|
|
strendswith( source->name, "_i.c" ) ||
|
|
strendswith( source->name, "_p.c" ) ||
|
|
strendswith( source->name, "_s.c" ) ||
|
|
strendswith( source->name, ".tlb" ))
|
|
{
|
|
char *idl = replace_extension( source->name, 4, ".idl" );
|
|
struct incl_file *file = add_src_file( idl );
|
|
if (strendswith( source->name, "_c.c" )) file->flags |= FLAG_IDL_CLIENT;
|
|
else if (strendswith( source->name, "_i.c" )) file->flags |= FLAG_IDL_IDENT;
|
|
else if (strendswith( source->name, "_p.c" )) file->flags |= FLAG_IDL_PROXY;
|
|
else if (strendswith( source->name, "_s.c" )) file->flags |= FLAG_IDL_SERVER;
|
|
else if (strendswith( source->name, ".tlb" )) file->flags |= FLAG_IDL_TYPELIB;
|
|
continue;
|
|
}
|
|
if (strendswith( source->name, "_r.res" ) ||
|
|
strendswith( source->name, "_t.res" ))
|
|
{
|
|
char *idl = replace_extension( source->name, 6, ".idl" );
|
|
struct incl_file *file = add_src_file( idl );
|
|
if (strendswith( source->name, "_r.res" )) file->flags |= FLAG_IDL_REGISTER;
|
|
else if (strendswith( source->name, "_t.res" )) file->flags |= FLAG_IDL_TYPELIB;
|
|
continue;
|
|
}
|
|
if (strendswith( source->name, ".pot" ))
|
|
{
|
|
char *rc = replace_extension( source->name, 4, ".rc" );
|
|
struct incl_file *file = add_src_file( rc );
|
|
file->flags |= FLAG_RC_PO;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* output_include
|
|
*/
|
|
static void output_include( struct incl_file *pFile, struct incl_file *owner, int *column )
|
|
{
|
|
int i;
|
|
|
|
if (pFile->owner == owner) return;
|
|
if (!pFile->filename) return;
|
|
pFile->owner = owner;
|
|
output_filename( pFile->filename, column );
|
|
for (i = 0; i < MAX_INCLUDES; i++)
|
|
if (pFile->files[i]) output_include( pFile->files[i], owner, column );
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* output_sources
|
|
*/
|
|
static void output_sources(void)
|
|
{
|
|
struct incl_file *source;
|
|
struct strarray clean_files, subdirs;
|
|
int i, column, po_srcs = 0, mc_srcs = 0;
|
|
int is_test = find_src_file( "testlist.o" ) != NULL;
|
|
|
|
strarray_init( &clean_files );
|
|
strarray_init( &subdirs );
|
|
|
|
column = output( "includes = -I." );
|
|
if (src_dir) output_filename( strmake( "-I%s", src_dir ), &column );
|
|
if (parent_dir)
|
|
{
|
|
if (src_dir) output_filename( strmake( "-I%s/%s", src_dir, parent_dir ), &column );
|
|
else output_filename( strmake( "-I%s", parent_dir ), &column );
|
|
}
|
|
for (i = 0; i < paths.count; i++) output_filename( strmake( "-I%s", paths.str[i] ), &column );
|
|
output( "\n" );
|
|
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
{
|
|
char *obj = xstrdup( source->name );
|
|
char *ext = get_extension( obj );
|
|
|
|
if (!ext) fatal_error( "unsupported file type %s\n", source->name );
|
|
*ext++ = 0;
|
|
column = 0;
|
|
|
|
if (!strcmp( ext, "y" )) /* yacc file */
|
|
{
|
|
/* add source file dependency for parallel makes */
|
|
char *header = strmake( "%s.tab.h", obj );
|
|
|
|
if (find_include_file( header ))
|
|
{
|
|
output( "%s.tab.h: %s\n", obj, source->filename );
|
|
output( "\t$(BISON) $(BISONFLAGS) -p %s_ -o %s.tab.c -d %s\n",
|
|
obj, obj, source->filename );
|
|
output( "%s.tab.c: %s %s\n", obj, source->filename, header );
|
|
strarray_add( &clean_files, strmake( "%s.tab.h", obj ));
|
|
}
|
|
else output( "%s.tab.c: %s\n", obj, source->filename );
|
|
|
|
output( "\t$(BISON) $(BISONFLAGS) -p %s_ -o $@ %s\n", obj, source->filename );
|
|
output( "%s.tab.o: %s.tab.c\n", obj, obj );
|
|
output( "\t$(CC) -c $(includes) $(ALLCFLAGS) -o $@ %s.tab.c\n", obj );
|
|
strarray_add( &clean_files, strmake( "%s.tab.c", obj ));
|
|
strarray_add( &clean_files, strmake( "%s.tab.o", obj ));
|
|
column += output( "%s.tab.o:", obj );
|
|
free( header );
|
|
}
|
|
else if (!strcmp( ext, "l" )) /* lex file */
|
|
{
|
|
output( "%s.yy.c: %s\n", obj, source->filename );
|
|
output( "\t$(FLEX) $(LEXFLAGS) -o$@ %s\n", source->filename );
|
|
output( "%s.yy.o: %s.yy.c\n", obj, obj );
|
|
output( "\t$(CC) -c $(includes) $(ALLCFLAGS) -o $@ %s.yy.c\n", obj );
|
|
strarray_add( &clean_files, strmake( "%s.yy.c", obj ));
|
|
strarray_add( &clean_files, strmake( "%s.yy.o", obj ));
|
|
column += output( "%s.yy.o:", obj );
|
|
}
|
|
else if (!strcmp( ext, "rc" )) /* resource file */
|
|
{
|
|
if (source->flags & FLAG_RC_PO)
|
|
{
|
|
output( "%s.res: $(WRC) $(ALL_MO_FILES) %s\n", obj, source->filename );
|
|
output( "\t$(WRC) $(includes) $(RCFLAGS) -o $@ %s\n", source->filename );
|
|
column += output( "%s.res rsrc.pot:", obj );
|
|
po_srcs++;
|
|
}
|
|
else
|
|
{
|
|
output( "%s.res: $(WRC) %s\n", obj, source->filename );
|
|
output( "\t$(WRC) $(includes) $(RCFLAGS) -o $@ %s\n", source->filename );
|
|
column += output( "%s.res:", obj );
|
|
}
|
|
strarray_add( &clean_files, strmake( "%s.res", obj ));
|
|
}
|
|
else if (!strcmp( ext, "mc" )) /* message file */
|
|
{
|
|
output( "%s.res: $(WMC) $(ALL_MO_FILES) %s\n", obj, source->filename );
|
|
output( "\t$(WMC) -U -O res $(PORCFLAGS) -o $@ %s\n", source->filename );
|
|
strarray_add( &clean_files, strmake( "%s.res", obj ));
|
|
mc_srcs++;
|
|
column += output( "msg.pot %s.res:", obj );
|
|
}
|
|
else if (!strcmp( ext, "idl" )) /* IDL file */
|
|
{
|
|
char *targets[8];
|
|
unsigned int i, nb_targets = 0;
|
|
|
|
if (!source->flags || find_include_file( strmake( "%s.h", obj )))
|
|
source->flags |= FLAG_IDL_HEADER;
|
|
|
|
for (i = 0; i < sizeof(idl_outputs) / sizeof(idl_outputs[0]); i++)
|
|
{
|
|
if (!(source->flags & idl_outputs[i].flag)) continue;
|
|
output( "%s%s: $(WIDL)\n", obj, idl_outputs[i].ext );
|
|
output( "\t$(WIDL) $(includes) %s -o $@ %s\n", idl_outputs[i].widl_arg, source->filename );
|
|
targets[nb_targets++] = strmake( "%s%s", obj, idl_outputs[i].ext );
|
|
}
|
|
for (i = 0; i < nb_targets; i++)
|
|
{
|
|
column += output( "%s%c", targets[i], i < nb_targets - 1 ? ' ' : ':' );
|
|
strarray_add( &clean_files, targets[i] );
|
|
}
|
|
column += output( " %s", source->filename );
|
|
}
|
|
else if (!strcmp( ext, "in" )) /* man page */
|
|
{
|
|
if (strendswith( obj, ".man" ) && source->sourcename)
|
|
{
|
|
char *dir, *dest = replace_extension( obj, 4, "" );
|
|
char *lang = strchr( dest, '.' );
|
|
if (lang)
|
|
{
|
|
*lang++ = 0;
|
|
dir = strmake( "$(DESTDIR)$(mandir)/%s/man%s", lang, source->sourcename );
|
|
}
|
|
else dir = strmake( "$(DESTDIR)$(mandir)/man%s", source->sourcename );
|
|
output( "install-man-pages:: %s %s\n", obj, dir );
|
|
output( "\t$(INSTALL_DATA) %s %s/%s.%s\n",
|
|
obj, dir, dest, source->sourcename );
|
|
output( "uninstall::\n" );
|
|
output( "\t$(RM) %s/%s.%s\n",
|
|
dir, dest, source->sourcename );
|
|
free( dest );
|
|
strarray_add( &subdirs, dir );
|
|
}
|
|
strarray_add( &clean_files, xstrdup(obj) );
|
|
output( "%s: %s\n", obj, source->filename );
|
|
output( "\t$(SED_CMD) %s >$@ || ($(RM) $@ && false)\n", source->filename );
|
|
column += output( "%s:", obj );
|
|
}
|
|
else if (!strcmp( ext, "tlb" ) || !strcmp( ext, "res" ) || !strcmp( ext, "pot" ))
|
|
{
|
|
continue; /* nothing to do for typelib files */
|
|
}
|
|
else
|
|
{
|
|
for (i = 0; i < object_extensions.count; i++)
|
|
{
|
|
strarray_add( &clean_files, strmake( "%s.%s", obj, object_extensions.str[i] ));
|
|
output( "%s.%s: %s\n", obj, object_extensions.str[i], source->filename );
|
|
if (strstr( object_extensions.str[i], "cross" ))
|
|
output( "\t$(CROSSCC) -c $(includes) $(ALLCROSSCFLAGS) -o $@ %s\n", source->filename );
|
|
else
|
|
output( "\t$(CC) -c $(includes) $(ALLCFLAGS) -o $@ %s\n", source->filename );
|
|
}
|
|
if (source->flags & FLAG_C_IMPLIB)
|
|
{
|
|
strarray_add( &clean_files, strmake( "%s.cross.o", obj ));
|
|
output( "%s.cross.o: %s\n", obj, source->filename );
|
|
output( "\t$(CROSSCC) -c $(includes) $(ALLCROSSCFLAGS) -o $@ %s\n", source->filename );
|
|
}
|
|
if (is_test && !strcmp( ext, "c" ) && !is_generated_idl( source ))
|
|
{
|
|
output( "%s.ok:\n", obj );
|
|
output( "\t$(RUNTEST) $(RUNTESTFLAGS) %s && touch $@\n", obj );
|
|
}
|
|
for (i = 0; i < object_extensions.count; i++)
|
|
column += output( "%s.%s ", obj, object_extensions.str[i] );
|
|
if (source->flags & FLAG_C_IMPLIB) column += output( "%s.cross.o", obj );
|
|
column += output( ":" );
|
|
}
|
|
free( obj );
|
|
|
|
for (i = 0; i < MAX_INCLUDES; i++)
|
|
if (source->files[i]) output_include( source->files[i], source, &column );
|
|
output( "\n" );
|
|
}
|
|
|
|
/* rules for files that depend on multiple sources */
|
|
|
|
if (po_srcs)
|
|
{
|
|
column = output( "rsrc.pot: $(WRC)" );
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
if (source->flags & FLAG_RC_PO) output_filename( source->filename, &column );
|
|
output( "\n" );
|
|
column = output( "\t$(WRC) $(includes) $(RCFLAGS) -O pot -o $@" );
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
if (source->flags & FLAG_RC_PO) output_filename( source->filename, &column );
|
|
output( "\n" );
|
|
strarray_add( &clean_files, "rsrc.pot" );
|
|
}
|
|
|
|
if (mc_srcs)
|
|
{
|
|
column = output( "msg.pot: $(WMC)" );
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
if (strendswith( source->name, ".mc" )) output_filename( source->filename, &column );
|
|
output( "\n" );
|
|
column = output( "\t$(WMC) -O pot -o $@" );
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
if (strendswith( source->name, ".mc" )) output_filename( source->filename, &column );
|
|
output( "\n" );
|
|
strarray_add( &clean_files, "msg.pot" );
|
|
}
|
|
|
|
if (find_src_file( "dlldata.o" ))
|
|
{
|
|
output( "dlldata.c: $(WIDL) Makefile.in\n" );
|
|
column = output( "\t$(WIDL) --dlldata-only -o $@" );
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
if (source->flags & FLAG_IDL_PROXY) output_filename( source->filename, &column );
|
|
output( "\n" );
|
|
strarray_add( &clean_files, "dlldata.c" );
|
|
}
|
|
|
|
if (is_test)
|
|
{
|
|
output( "testlist.c: $(MAKECTESTS) Makefile.in\n" );
|
|
column = output( "\t$(MAKECTESTS) -o $@" );
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
if (strendswith( source->name, ".c" ) && !is_generated_idl( source ))
|
|
output_filename( source->name, &column );
|
|
output( "\n" );
|
|
column = output( "check test:" );
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
if (strendswith( source->name, ".c" ) && !is_generated_idl( source ))
|
|
output_filename( replace_extension( source->name, 2, ".ok" ), &column );
|
|
output( "\n" );
|
|
output( "clean testclean::\n" );
|
|
column = output( "\t$(RM)" );
|
|
LIST_FOR_EACH_ENTRY( source, &sources, struct incl_file, entry )
|
|
if (strendswith( source->name, ".c" ) && !is_generated_idl( source ))
|
|
output_filename( replace_extension( source->name, 2, ".ok" ), &column );
|
|
output( "\n" );
|
|
strarray_add( &clean_files, "testlist.c" );
|
|
}
|
|
|
|
if (clean_files.count)
|
|
{
|
|
output( "clean::\n" );
|
|
column = output( "\t$(RM)" );
|
|
for (i = 0; i < clean_files.count; i++) output_filename( clean_files.str[i], &column );
|
|
output( "\n" );
|
|
}
|
|
|
|
if (subdirs.count)
|
|
{
|
|
for (i = column = 0; i < subdirs.count; i++) output_filename( subdirs.str[i], &column );
|
|
output( ":\n" );
|
|
output( "\t$(MKDIR_P) -m 755 $@\n" );
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* create_temp_file
|
|
*/
|
|
static FILE *create_temp_file( char **tmp_name )
|
|
{
|
|
char *name = xmalloc( strlen(OutputFileName) + 13 );
|
|
unsigned int i, id = getpid();
|
|
int fd;
|
|
FILE *ret = NULL;
|
|
|
|
for (i = 0; i < 100; i++)
|
|
{
|
|
sprintf( name, "%s.tmp%08x", OutputFileName, id );
|
|
if ((fd = open( name, O_RDWR | O_CREAT | O_EXCL, 0666 )) != -1)
|
|
{
|
|
ret = fdopen( fd, "w" );
|
|
break;
|
|
}
|
|
if (errno != EEXIST) break;
|
|
id += 7777;
|
|
}
|
|
if (!ret) fatal_error( "failed to create output file for '%s'\n", OutputFileName );
|
|
*tmp_name = name;
|
|
return ret;
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* output_dependencies
|
|
*/
|
|
static void output_dependencies(void)
|
|
{
|
|
char *tmp_name = NULL;
|
|
|
|
if (Separator && ((output_file = fopen( OutputFileName, "r" ))))
|
|
{
|
|
char buffer[1024];
|
|
FILE *tmp_file = create_temp_file( &tmp_name );
|
|
int found = 0;
|
|
|
|
while (fgets( buffer, sizeof(buffer), output_file ) && !found)
|
|
{
|
|
if (fwrite( buffer, 1, strlen(buffer), tmp_file ) != strlen(buffer))
|
|
fatal_error( "failed to write to %s\n", tmp_name );
|
|
found = !strncmp( buffer, Separator, strlen(Separator) );
|
|
}
|
|
fclose( output_file );
|
|
output_file = tmp_file;
|
|
if (!found && list_head(&sources)) output( "\n%s\n", Separator );
|
|
}
|
|
else
|
|
{
|
|
if (!(output_file = fopen( OutputFileName, Separator ? "a" : "w" )))
|
|
fatal_perror( "%s", OutputFileName );
|
|
}
|
|
|
|
output_sources();
|
|
|
|
fclose( output_file );
|
|
output_file = NULL;
|
|
|
|
if (tmp_name)
|
|
{
|
|
int ret = rename( tmp_name, OutputFileName );
|
|
if (ret == -1 && errno == EEXIST)
|
|
{
|
|
/* rename doesn't overwrite on windows */
|
|
unlink( OutputFileName );
|
|
ret = rename( tmp_name, OutputFileName );
|
|
}
|
|
if (ret == -1)
|
|
{
|
|
unlink( tmp_name );
|
|
fatal_error( "failed to rename output file to '%s'\n", OutputFileName );
|
|
}
|
|
free( tmp_name );
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* parse_option
|
|
*/
|
|
static void parse_option( const char *opt )
|
|
{
|
|
switch(opt[1])
|
|
{
|
|
case 'I':
|
|
if (opt[2]) strarray_add( &paths, xstrdup( opt + 2 ));
|
|
break;
|
|
case 'C':
|
|
src_dir = opt + 2;
|
|
break;
|
|
case 'S':
|
|
top_src_dir = opt + 2;
|
|
break;
|
|
case 'T':
|
|
top_obj_dir = opt + 2;
|
|
break;
|
|
case 'P':
|
|
parent_dir = opt + 2;
|
|
break;
|
|
case 'f':
|
|
if (opt[2]) OutputFileName = opt + 2;
|
|
break;
|
|
case 'R':
|
|
relative_dir_mode = 1;
|
|
break;
|
|
case 's':
|
|
if (opt[2]) Separator = opt + 2;
|
|
else Separator = NULL;
|
|
break;
|
|
case 'x':
|
|
if (opt[2]) strarray_add( &object_extensions, xstrdup( opt + 2 ));
|
|
break;
|
|
default:
|
|
fprintf( stderr, "Unknown option '%s'\n%s", opt, Usage );
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* main
|
|
*/
|
|
int main( int argc, char *argv[] )
|
|
{
|
|
struct incl_file *pFile;
|
|
int i, j;
|
|
|
|
i = 1;
|
|
while (i < argc)
|
|
{
|
|
if (argv[i][0] == '-')
|
|
{
|
|
parse_option( argv[i] );
|
|
for (j = i; j < argc; j++) argv[j] = argv[j+1];
|
|
argc--;
|
|
}
|
|
else i++;
|
|
}
|
|
|
|
if (relative_dir_mode)
|
|
{
|
|
char *relpath;
|
|
|
|
if (argc != 3)
|
|
{
|
|
fprintf( stderr, "Option -r needs two directories\n%s", Usage );
|
|
exit( 1 );
|
|
}
|
|
relpath = get_relative_path( argv[1], argv[2] );
|
|
printf( "%s\n", relpath ? relpath : "." );
|
|
exit( 0 );
|
|
}
|
|
|
|
/* ignore redundant source paths */
|
|
if (src_dir && !strcmp( src_dir, "." )) src_dir = NULL;
|
|
if (top_src_dir && top_obj_dir && !strcmp( top_src_dir, top_obj_dir )) top_src_dir = NULL;
|
|
|
|
if (top_src_dir) strarray_insert( &paths, 0, strmake( "%s/include", top_src_dir ));
|
|
if (top_obj_dir) strarray_insert( &paths, 0, strmake( "%s/include", top_obj_dir ));
|
|
|
|
/* set the default extension list for object files */
|
|
if (!object_extensions.count) strarray_add( &object_extensions, "o" );
|
|
|
|
for (i = 1; i < argc; i++) add_src_file( argv[i] );
|
|
add_generated_sources();
|
|
|
|
LIST_FOR_EACH_ENTRY( pFile, &includes, struct incl_file, entry ) parse_file( pFile, 0 );
|
|
output_dependencies();
|
|
return 0;
|
|
}
|