1
/* $Id: genmacro.c 2084 2008-05-09 07:08:17Z peter $
3
* C version of NASM's macros.pl
5
* Copyright (C) 2004-2008 Peter Johnson
7
* Redistribution and use in source and binary forms, with or without
8
* modification, are permitted provided that the following conditions
10
* 1. Redistributions of source code must retain the above copyright
11
* notice, this list of conditions and the following disclaimer.
12
* 2. Redistributions in binary form must reproduce the above copyright
13
* notice, this list of conditions and the following disclaimer in the
14
* documentation and/or other materials provided with the distribution.
16
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND OTHER CONTRIBUTORS ``AS IS''
17
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR OTHER CONTRIBUTORS BE
20
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26
* POSSIBILITY OF SUCH DAMAGE.
35
main(int argc, char *argv[])
48
fprintf(stderr, "Usage: %s <out> <var> <file> [<file> ...]\n", argv[0]);
52
out = fopen(argv[1], "wt");
55
fprintf(stderr, "Could not open `%s'.\n", argv[1]);
59
str = malloc(MAXLINE);
61
fprintf(out, "/* This file auto-generated from standard.mac by genmacro.c"
62
" - don't edit it */\n\n#include <stddef.h>\n\n"
63
"static const char *%s[] = {\n", argv[2]);
65
for (i=3; i<argc; i++) {
66
in = fopen(argv[i], "rt");
68
fprintf(stderr, "Could not open `%s'.\n", argv[i]);
76
while (fgets(str, MAXLINE, in)) {
82
/* check for unterminated quotes and delete comments */
84
while ((charp = strpbrk(charp, "'\";"))) {
85
if (charp[0] == ';') {
89
if ((charp = strchr(charp+1, charp[0])) == NULL) {
90
fprintf(stderr, "%s:%d: error: unterminated quote\n",
99
/* strip off leading and trailing whitespace */
100
while (*strp == ' ' || *strp == '\t')
103
while (len > 0 && (strp[len-1] == ' ' || strp[len-1] == '\t' ||
104
strp[len-1] == '\n')) {
109
/* skip blank lines */
113
/* output as string to output file */
115
while (*strp != '\0') {
116
if (*strp == '\\' || *strp == '"')
121
fprintf(out, "\",\n");
128
fprintf(out, " NULL\n};\n");