1 /*
2 *
3 * C version of NASM's macros.pl
4 *
5 * Copyright (C) 2004-2008 Peter Johnson
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
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.
15 *
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.
27 */
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <string.h>
31
32 #define MAXLINE 1024
33
34 int
main(int argc,char * argv[])35 main(int argc, char *argv[])
36 {
37 FILE *in, *out;
38 int i;
39 char *str;
40 char *strp;
41 char *charp;
42 int fline;
43 int line = 0;
44 int lindex = 0;
45 size_t len;
46
47 if (argc < 4) {
48 fprintf(stderr, "Usage: %s <out> <var> <file> [<file> ...]\n", argv[0]);
49 return EXIT_FAILURE;
50 }
51
52 out = fopen(argv[1], "wt");
53
54 if (!out) {
55 fprintf(stderr, "Could not open `%s'.\n", argv[1]);
56 return EXIT_FAILURE;
57 }
58
59 str = malloc(MAXLINE);
60
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]);
64
65 for (i=3; i<argc; i++) {
66 in = fopen(argv[i], "rt");
67 if (!in) {
68 fprintf(stderr, "Could not open `%s'.\n", argv[i]);
69 fclose(out);
70 remove(argv[1]);
71 return EXIT_FAILURE;
72 }
73
74 fline = 0;
75
76 while (fgets(str, MAXLINE, in)) {
77 line++;
78 fline++;
79
80 strp = str;
81
82 /* check for unterminated quotes and delete comments */
83 charp = strp;
84 while ((charp = strpbrk(charp, "'\";"))) {
85 if (charp[0] == ';') {
86 *charp = '\0';
87 break;
88 }
89 if ((charp = strchr(charp+1, charp[0])) == NULL) {
90 fprintf(stderr, "%s:%d: error: unterminated quote\n",
91 argv[i], fline);
92 fclose(out);
93 remove(argv[1]);
94 return EXIT_FAILURE;
95 }
96 charp++;
97 }
98
99 /* strip off leading and trailing whitespace */
100 while (*strp == ' ' || *strp == '\t')
101 strp++;
102 len = strlen(strp);
103 while (len > 0 && (strp[len-1] == ' ' || strp[len-1] == '\t' ||
104 strp[len-1] == '\n')) {
105 strp[len-1] = '\0';
106 len--;
107 }
108
109 /* skip blank lines */
110 if (len == 0)
111 continue;
112
113 /* output as string to output file */
114 fprintf(out, " \"");
115 while (*strp != '\0') {
116 if (*strp == '\\' || *strp == '"')
117 fputc('\\', out);
118 fputc(*strp, out);
119 strp++;
120 }
121 fprintf(out, "\",\n");
122 lindex++;
123 }
124
125 fclose(in);
126 }
127
128 fprintf(out, " NULL\n};\n");
129 fclose(out);
130
131 free(str);
132
133 return EXIT_SUCCESS;
134 }
135