|
Packit |
fd8b60 |
/* wconfig.c */
|
|
Packit |
fd8b60 |
/*
|
|
Packit |
fd8b60 |
* Copyright 1995,1996,1997,1998 by the Massachusetts Institute of Technology.
|
|
Packit |
fd8b60 |
* All Rights Reserved.
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* Export of this software from the United States of America may
|
|
Packit |
fd8b60 |
* require a specific license from the United States Government.
|
|
Packit |
fd8b60 |
* It is the responsibility of any person or organization contemplating
|
|
Packit |
fd8b60 |
* export to obtain such a license before exporting.
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
|
|
Packit |
fd8b60 |
* distribute this software and its documentation for any purpose and
|
|
Packit |
fd8b60 |
* without fee is hereby granted, provided that the above copyright
|
|
Packit |
fd8b60 |
* notice appear in all copies and that both that copyright notice and
|
|
Packit |
fd8b60 |
* this permission notice appear in supporting documentation, and that
|
|
Packit |
fd8b60 |
* the name of M.I.T. not be used in advertising or publicity pertaining
|
|
Packit |
fd8b60 |
* to distribution of the software without specific, written prior
|
|
Packit |
fd8b60 |
* permission. Furthermore if you modify this software you must label
|
|
Packit |
fd8b60 |
* your software as modified software and not distribute it in such a
|
|
Packit |
fd8b60 |
* fashion that it might be confused with the original M.I.T. software.
|
|
Packit |
fd8b60 |
* M.I.T. makes no representations about the suitability of
|
|
Packit |
fd8b60 |
* this software for any purpose. It is provided "as is" without express
|
|
Packit |
fd8b60 |
* or implied warranty.
|
|
Packit |
fd8b60 |
*/
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/*
|
|
Packit |
fd8b60 |
* Program to take the place of the configure shell script under DOS.
|
|
Packit |
fd8b60 |
* The makefile.in files are constructed in such a way that all this
|
|
Packit |
fd8b60 |
* program needs to do is uncomment lines beginning ##DOS by removing the
|
|
Packit |
fd8b60 |
* first 5 characters of the line. This will allow lines like:
|
|
Packit |
fd8b60 |
* ##DOS!include win-pre.in to become: !include win-pre.in
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* We also turn any line beginning with '@' into a blank line.
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* If a config directory is specified, then the output will be start with
|
|
Packit |
fd8b60 |
* config\pre.in, then the filtered stdin text, and will end with
|
|
Packit |
fd8b60 |
* config\post.in.
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* Syntax: wconfig [options] [config_directory] <input_file >output_file
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
*/
|
|
Packit |
fd8b60 |
#include <stdio.h>
|
|
Packit |
fd8b60 |
#include <stdlib.h>
|
|
Packit |
fd8b60 |
#include <string.h>
|
|
Packit |
fd8b60 |
#include <ctype.h>
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
static int copy_file (char *path, char *fname);
|
|
Packit |
fd8b60 |
void add_ignore_list(char *str);
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
int mit_specific = 0;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
char *win16_flag = "WIN16##";
|
|
Packit |
fd8b60 |
char *win32_flag = "WIN32##";
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
int main(int argc, char *argv[])
|
|
Packit |
fd8b60 |
{
|
|
Packit |
fd8b60 |
char *ignore_str = "--ignore=";
|
|
Packit |
fd8b60 |
int ignore_len;
|
|
Packit |
fd8b60 |
char *cp, *tmp;
|
|
Packit |
fd8b60 |
char *win_flag;
|
|
Packit |
fd8b60 |
char wflags[1024];
|
|
Packit |
fd8b60 |
size_t wlen, alen;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
#ifdef _WIN32
|
|
Packit |
fd8b60 |
win_flag = win32_flag;
|
|
Packit |
fd8b60 |
#else
|
|
Packit |
fd8b60 |
win_flag = "UNIX##";
|
|
Packit |
fd8b60 |
#endif
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
wlen = 0;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
ignore_len = strlen(ignore_str);
|
|
Packit |
fd8b60 |
argc--; argv++;
|
|
Packit |
fd8b60 |
while (*argv && *argv[0] == '-') {
|
|
Packit |
fd8b60 |
alen = strlen(*argv);
|
|
Packit |
fd8b60 |
if (wlen + 1 + alen > sizeof (wflags) - 1) {
|
|
Packit |
fd8b60 |
fprintf (stderr,
|
|
Packit |
fd8b60 |
"wconfig: argument list too long (internal limit %lu)",
|
|
Packit |
fd8b60 |
(unsigned long) sizeof (wflags));
|
|
Packit |
fd8b60 |
exit (1);
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
if (wlen > 0)
|
|
Packit |
fd8b60 |
wflags[wlen++] = ' ';
|
|
Packit |
fd8b60 |
memcpy(&wflags[wlen], *argv, alen);
|
|
Packit |
fd8b60 |
wlen += alen;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (!strcmp(*argv, "--mit")) {
|
|
Packit |
fd8b60 |
mit_specific = 1;
|
|
Packit |
fd8b60 |
argc--; argv++;
|
|
Packit |
fd8b60 |
continue;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
if (!strcmp(*argv, "--win16")) {
|
|
Packit |
fd8b60 |
win_flag = win16_flag;
|
|
Packit |
fd8b60 |
argc--; argv++;
|
|
Packit |
fd8b60 |
continue;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
if (!strcmp(*argv, "--win32")) {
|
|
Packit |
fd8b60 |
win_flag = win32_flag;
|
|
Packit |
fd8b60 |
argc--; argv++;
|
|
Packit |
fd8b60 |
continue;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
if (!strncmp(*argv, "--enable-", 9)) {
|
|
Packit |
fd8b60 |
tmp = malloc(alen - ignore_len + 3);
|
|
Packit |
fd8b60 |
if (!tmp) {
|
|
Packit |
fd8b60 |
fprintf(stderr,
|
|
Packit |
fd8b60 |
"wconfig: malloc failed!\n");
|
|
Packit |
fd8b60 |
exit(1);
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
memcpy(tmp, *argv + ignore_len, alen - ignore_len);
|
|
Packit |
fd8b60 |
memcpy(tmp + alen - ignore_len, "##", 3);
|
|
Packit |
fd8b60 |
for (cp = tmp; *cp; cp++) {
|
|
Packit |
fd8b60 |
if (islower(*cp))
|
|
Packit |
fd8b60 |
*cp = toupper(*cp);
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
add_ignore_list(tmp);
|
|
Packit |
fd8b60 |
argc--; argv++;
|
|
Packit |
fd8b60 |
continue;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
if (!strncmp(*argv, ignore_str, ignore_len)) {
|
|
Packit |
fd8b60 |
add_ignore_list((*argv)+ignore_len);
|
|
Packit |
fd8b60 |
argc--; argv++;
|
|
Packit |
fd8b60 |
continue;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
fprintf(stderr, "Invalid option: %s\n", *argv);
|
|
Packit |
fd8b60 |
exit(1);
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
wflags[wlen] = '\0';
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (win_flag)
|
|
Packit |
fd8b60 |
add_ignore_list(win_flag);
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (mit_specific)
|
|
Packit |
fd8b60 |
add_ignore_list("MIT##");
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (wflags[0] && (argc > 0))
|
|
Packit |
fd8b60 |
printf("WCONFIG_FLAGS=%s\n", wflags);
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (argc > 0)
|
|
Packit |
fd8b60 |
copy_file (*argv, "win-pre.in");
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
copy_file("", "-");
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (argc > 0)
|
|
Packit |
fd8b60 |
copy_file (*argv, "win-post.in");
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
return 0;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
char *ignore_list[64] = {
|
|
Packit |
fd8b60 |
"DOS##",
|
|
Packit |
fd8b60 |
"DOS",
|
|
Packit |
fd8b60 |
};
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/*
|
|
Packit |
fd8b60 |
* Add a new item to the ignore list
|
|
Packit |
fd8b60 |
*/
|
|
Packit |
fd8b60 |
void add_ignore_list(char *str)
|
|
Packit |
fd8b60 |
{
|
|
Packit |
fd8b60 |
char **cpp;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
for (cpp = ignore_list; *cpp; cpp++)
|
|
Packit |
fd8b60 |
;
|
|
Packit |
fd8b60 |
*cpp = str;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/*
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* Copy_file
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* Copies file 'path\fname' to stdout.
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
*/
|
|
Packit |
fd8b60 |
static int
|
|
Packit |
fd8b60 |
copy_file (char *path, char *fname)
|
|
Packit |
fd8b60 |
{
|
|
Packit |
fd8b60 |
FILE *fin;
|
|
Packit |
fd8b60 |
char buf[1024];
|
|
Packit |
fd8b60 |
char **cpp, *ptr;
|
|
Packit |
fd8b60 |
size_t len, plen, flen;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (strcmp(fname, "-") == 0) {
|
|
Packit |
fd8b60 |
fin = stdin;
|
|
Packit |
fd8b60 |
} else {
|
|
Packit |
fd8b60 |
plen = strlen(path);
|
|
Packit |
fd8b60 |
flen = strlen(fname);
|
|
Packit |
fd8b60 |
if (plen + 1 + flen > sizeof(buf) - 1) {
|
|
Packit |
fd8b60 |
fprintf(stderr, "Name %s or %s too long", path, fname);
|
|
Packit |
fd8b60 |
return 1;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
memcpy(buf, path, plen);
|
|
Packit |
fd8b60 |
#ifdef _WIN32
|
|
Packit |
fd8b60 |
buf[plen] = '\\';
|
|
Packit |
fd8b60 |
#else
|
|
Packit |
fd8b60 |
buf[plen] = '/';
|
|
Packit |
fd8b60 |
#endif
|
|
Packit |
fd8b60 |
memcpy(buf + plen + 1, fname, flen);
|
|
Packit |
fd8b60 |
buf[plen + 1 + flen] = '\0';
|
|
Packit |
fd8b60 |
fin = fopen (buf, "r"); /* File to read */
|
|
Packit |
fd8b60 |
if (fin == NULL) {
|
|
Packit |
fd8b60 |
fprintf(stderr, "wconfig: Can't open file %s\n", buf);
|
|
Packit |
fd8b60 |
return 1;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
while (fgets (buf, sizeof(buf), fin) != NULL) { /* Copy file over */
|
|
Packit |
fd8b60 |
if (buf[0] == '@') {
|
|
Packit |
fd8b60 |
fputs("\n", stdout);
|
|
Packit |
fd8b60 |
continue;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
if (buf[0] != '#' || buf[1] != '#') {
|
|
Packit |
fd8b60 |
fputs(buf, stdout);
|
|
Packit |
fd8b60 |
continue;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
ptr = buf;
|
|
Packit |
fd8b60 |
for (cpp = ignore_list; *cpp; cpp++) {
|
|
Packit |
fd8b60 |
len = strlen(*cpp);
|
|
Packit |
fd8b60 |
if (memcmp (*cpp, buf+2, len) == 0) {
|
|
Packit |
fd8b60 |
ptr += 2+len;
|
|
Packit |
fd8b60 |
break;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
fputs(ptr, stdout);
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
fclose (fin);
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
return 0;
|
|
Packit |
fd8b60 |
}
|