/* wconfig.c */

/*

 * Copyright 1995,1996,1997,1998 by the Massachusetts Institute of Technology.

 * All Rights Reserved.

 *

 * Export of this software from the United States of America may

 *   require a specific license from the United States Government.

 *   It is the responsibility of any person or organization contemplating

 *   export to obtain such a license before exporting.

 *

 * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and

 * distribute this software and its documentation for any purpose and

 * without fee is hereby granted, provided that the above copyright

 * notice appear in all copies and that both that copyright notice and

 * this permission notice appear in supporting documentation, and that

 * the name of M.I.T. not be used in advertising or publicity pertaining

 * to distribution of the software without specific, written prior

 * permission.  Furthermore if you modify this software you must label

 * your software as modified software and not distribute it in such a

 * fashion that it might be confused with the original M.I.T. software.

 * M.I.T. makes no representations about the suitability of

 * this software for any purpose.  It is provided "as is" without express

 * or implied warranty.

 */

/*

 * Program to take the place of the configure shell script under DOS.

 * The makefile.in files are constructed in such a way that all this

 * program needs to do is uncomment lines beginning ##DOS by removing the

 * first 5 characters of the line.  This will allow lines like:

 * ##DOS!include win-pre.in to become: !include win-pre.in

 *

 * We also turn any line beginning with '@' into a blank line.

 *

 * If a config directory is specified, then the output will be start with

 * config\pre.in, then the filtered stdin text, and will end with

 * config\post.in.

 *

 * Syntax: wconfig [options] [config_directory] <input_file >output_file

 *

 */

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <ctype.h>

static int copy_file (char *path, char *fname);

void add_ignore_list(char *str);

int mit_specific = 0;

char *win16_flag = "WIN16##";

char *win32_flag = "WIN32##";

int main(int argc, char *argv[])

{

	char *ignore_str = "--ignore=";

	int ignore_len;

	char *cp, *tmp;

	char *win_flag;

	char wflags[1024];

	size_t wlen, alen;

#ifdef _WIN32

	win_flag = win32_flag;

#else

	win_flag = "UNIX##";

#endif

	wlen = 0;

	ignore_len = strlen(ignore_str);

	argc--; argv++;

	while (*argv && *argv[0] == '-') {

		alen = strlen(*argv);

		if (wlen + 1 + alen > sizeof (wflags) - 1) {

			fprintf (stderr,

				 "wconfig: argument list too long (internal limit %lu)",

				 (unsigned long) sizeof (wflags));

			exit (1);

		}

		if (wlen > 0)

			wflags[wlen++] = ' ';

		memcpy(&wflags[wlen], *argv, alen);

		wlen += alen;

		if (!strcmp(*argv, "--mit")) {

			mit_specific = 1;

			argc--; argv++;

			continue;

		}

		if (!strcmp(*argv, "--win16")) {

			win_flag = win16_flag;

			argc--; argv++;

			continue;

		}

		if (!strcmp(*argv, "--win32")) {

			win_flag = win32_flag;

			argc--; argv++;

			continue;

		}

		if (!strncmp(*argv, "--enable-", 9)) {

			tmp = malloc(alen - ignore_len + 3);

			if (!tmp) {

				fprintf(stderr,

					"wconfig: malloc failed!\n");

				exit(1);

			}

			memcpy(tmp, *argv + ignore_len, alen - ignore_len);

			memcpy(tmp + alen - ignore_len, "##", 3);

			for (cp = tmp; *cp; cp++) {

				if (islower(*cp))

					*cp = toupper(*cp);

			}

			add_ignore_list(tmp);

			argc--; argv++;

			continue;

		}

		if (!strncmp(*argv, ignore_str, ignore_len)) {

			add_ignore_list((*argv)+ignore_len);

			argc--; argv++;

			continue;

		}

		fprintf(stderr, "Invalid option: %s\n", *argv);

		exit(1);

	}

	wflags[wlen] = '\0';

	if (win_flag)

		add_ignore_list(win_flag);

	if (mit_specific)

		add_ignore_list("MIT##");

	if (wflags[0] && (argc > 0))

		printf("WCONFIG_FLAGS=%s\n", wflags);

	if (argc > 0)

		copy_file (*argv, "win-pre.in");

	copy_file("", "-");

	if (argc > 0)

		copy_file (*argv, "win-post.in");

	return 0;

}

char *ignore_list[64] = {

	"DOS##",

	"DOS",

	};

/*

 * Add a new item to the ignore list

 */

void add_ignore_list(char *str)

{

	char **cpp;

	for (cpp = ignore_list; *cpp; cpp++)

		;

	*cpp = str;

}

/*

 *

 * Copy_file

 *

 * Copies file 'path\fname' to stdout.

 *

 */

static int

copy_file (char *path, char *fname)

{

    FILE *fin;

    char buf[1024];

    char **cpp, *ptr;

    size_t len, plen, flen;

    if (strcmp(fname, "-") == 0) {

	    fin = stdin;

    } else {

	    plen = strlen(path);

	    flen = strlen(fname);

	    if (plen + 1 + flen > sizeof(buf) - 1) {

		    fprintf(stderr, "Name %s or %s too long", path, fname);

		    return 1;

	    }

	    memcpy(buf, path, plen);

#ifdef _WIN32

	    buf[plen] = '\\';

#else

	    buf[plen] = '/';

#endif

	    memcpy(buf + plen + 1, fname, flen);

	    buf[plen + 1 + flen] = '\0';

	    fin = fopen (buf, "r");                     /* File to read */

	    if (fin == NULL) {

		    fprintf(stderr, "wconfig: Can't open file %s\n", buf);

		    return 1;

	    }

    }

    while (fgets (buf, sizeof(buf), fin) != NULL) { /* Copy file over */

	    if (buf[0] == '@') {

		    fputs("\n", stdout);

		    continue;

	    }

	    if (buf[0] != '#' || buf[1] != '#') {

		    fputs(buf, stdout);

		    continue;

	    }

	    ptr = buf;

	    for (cpp = ignore_list; *cpp; cpp++) {

		    len = strlen(*cpp);

		    if (memcmp (*cpp, buf+2, len) == 0) {

			    ptr += 2+len;

			    break;

		    }

	    }

	    fputs(ptr, stdout);

    }

    fclose (fin);

    return 0;

}