makelist revision 1.13 1 #!/bin/sh -
2 # $NetBSD: makelist,v 1.13 2009/12/30 22:37:40 christos Exp $
3 #
4 # Copyright (c) 1992, 1993
5 # The Regents of the University of California. All rights reserved.
6 #
7 # This code is derived from software contributed to Berkeley by
8 # Christos Zoulas of Cornell University.
9 #
10 # Redistribution and use in source and binary forms, with or without
11 # modification, are permitted provided that the following conditions
12 # are met:
13 # 1. Redistributions of source code must retain the above copyright
14 # notice, this list of conditions and the following disclaimer.
15 # 2. Redistributions in binary form must reproduce the above copyright
16 # notice, this list of conditions and the following disclaimer in the
17 # documentation and/or other materials provided with the distribution.
18 # 3. Neither the name of the University nor the names of its contributors
19 # may be used to endorse or promote products derived from this software
20 # without specific prior written permission.
21 #
22 # THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 # ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 # SUCH DAMAGE.
33 #
34 # @(#)makelist 5.3 (Berkeley) 6/4/93
35
36 # makelist.sh: Automatically generate header files...
37
38 AWK=awk
39 USAGE="Usage: $0 -t <def>|-h|-e|-fc|-fh|-bc|-bh|-m <filenames>"
40
41 if [ "x$1" = "x" ]
42 then
43 echo $USAGE 1>&2
44 exit 1
45 fi
46
47 FLAG="$1"
48 shift
49
50 FILES="$@"
51
52 case $FLAG in
53
54 # generate foo.h file from foo.c
55 #
56 -t)
57 cat << _EOF
58 #define ${FILES}
59 #include "tokenizer.c"
60 _EOF
61 ;;
62
63 -h)
64 set - `echo $FILES | sed -e 's/\\./_/g'`
65 hdr="_h_$(basename $1)"
66 cat $FILES | $AWK '
67 BEGIN {
68 printf("/* Automatically generated file, do not edit */\n");
69 printf("#ifndef %s\n#define %s\n", "'$hdr'", "'$hdr'");
70 }
71 /\(\):/ {
72 pr = substr($2, 1, 2);
73 if (pr == "vi" || pr == "em" || pr == "ed") {
74 name = substr($2, 1, length($2) - 3);
75 #
76 # XXX: need a space between name and prototype so that -fc and -fh
77 # parsing is much easier
78 #
79 printf("protected el_action_t\t%s (EditLine *, wint_t);\n", name);
80 }
81 }
82 END {
83 printf("#endif /* %s */\n", "'$hdr'");
84 }'
85 ;;
86
87 # generate help.c from various .c files
88 #
89 -bc)
90 cat $FILES | $AWK '
91 BEGIN {
92 printf("/* Automatically generated file, do not edit */\n");
93 printf("#include \"config.h\"\n#include \"el.h\"\n");
94 printf("#include \"chartype.h\"\n");
95 printf("private const struct el_bindings_t el_func_help[] = {\n");
96 low = "abcdefghijklmnopqrstuvwxyz_";
97 high = "ABCDEFGHIJKLMNOPQRSTUVWXYZ_";
98 for (i = 1; i <= length(low); i++)
99 tr[substr(low, i, 1)] = substr(high, i, 1);
100 }
101 /\(\):/ {
102 pr = substr($2, 1, 2);
103 if (pr == "vi" || pr == "em" || pr == "ed") {
104 name = substr($2, 1, length($2) - 3);
105 uname = "";
106 fname = "";
107 for (i = 1; i <= length(name); i++) {
108 s = substr(name, i, 1);
109 uname = uname tr[s];
110 if (s == "_")
111 s = "-";
112 fname = fname s;
113 }
114
115 printf(" { %-30.30s %-30.30s\n","STR(\"" fname "\"),", uname ",");
116 ok = 1;
117 }
118 }
119 /^ \*/ {
120 if (ok) {
121 printf(" STR(\"");
122 for (i = 2; i < NF; i++)
123 printf("%s ", $i);
124 printf("%s\") },\n", $i);
125 ok = 0;
126 }
127 }
128 END {
129 printf("};\n");
130 printf("\nprotected const el_bindings_t* help__get()");
131 printf("{ return el_func_help; }\n");
132 }'
133 ;;
134
135 # generate help.h from various .c files
136 #
137 -bh)
138 $AWK '
139 BEGIN {
140 printf("/* Automatically generated file, do not edit */\n");
141 printf("#ifndef _h_help_c\n#define _h_help_c\n");
142 printf("protected const el_bindings_t *help__get(void);\n");
143 printf("#endif /* _h_help_c */\n");
144 }' /dev/null
145 ;;
146
147 # generate fcns.h from various .h files
148 #
149 -fh)
150 cat $FILES | $AWK '/el_action_t/ { print $3 }' | \
151 sort | tr '[:lower:]' '[:upper:]' | $AWK '
152 BEGIN {
153 printf("/* Automatically generated file, do not edit */\n");
154 printf("#ifndef _h_fcns_c\n#define _h_fcns_c\n");
155 count = 0;
156 }
157 {
158 printf("#define\t%-30.30s\t%3d\n", $1, count++);
159 }
160 END {
161 printf("#define\t%-30.30s\t%3d\n", "EL_NUM_FCNS", count);
162
163 printf("typedef el_action_t (*el_func_t)(EditLine *, wint_t);");
164 printf("\nprotected const el_func_t* func__get(void);\n");
165 printf("#endif /* _h_fcns_c */\n");
166 }'
167 ;;
168
169 # generate fcns.c from various .h files
170 #
171 -fc)
172 cat $FILES | $AWK '/el_action_t/ { print $3 }' | sort | $AWK '
173 BEGIN {
174 printf("/* Automatically generated file, do not edit */\n");
175 printf("#include \"config.h\"\n#include \"el.h\"\n");
176 printf("private const el_func_t el_func[] = {");
177 maxlen = 80;
178 needn = 1;
179 len = 0;
180 }
181 {
182 clen = 25 + 2;
183 len += clen;
184 if (len >= maxlen)
185 needn = 1;
186 if (needn) {
187 printf("\n ");
188 needn = 0;
189 len = 4 + clen;
190 }
191 s = $1 ",";
192 printf("%-26.26s ", s);
193 }
194 END {
195 printf("\n};\n");
196 printf("\nprotected const el_func_t* func__get() { return el_func; }\n");
197 }'
198 ;;
199
200 # generate editline.c from various .c files
201 #
202 -e)
203 echo "$FILES" | tr ' ' '\012' | $AWK '
204 BEGIN {
205 printf("/* Automatically generated file, do not edit */\n");
206 printf("#define protected static\n");
207 printf("#define SCCSID\n");
208 }
209 {
210 printf("#include \"%s\"\n", $1);
211 }'
212 ;;
213
214 # generate man page fragment from various .c files
215 #
216 -m)
217 cat $FILES | $AWK '
218 BEGIN {
219 printf(".\\\" Section automatically generated with makelist\n");
220 printf(".Bl -tag -width 4n\n");
221 }
222 /\(\):/ {
223 pr = substr($2, 1, 2);
224 if (pr == "vi" || pr == "em" || pr == "ed") {
225 name = substr($2, 1, length($2) - 3);
226 fname = "";
227 for (i = 1; i <= length(name); i++) {
228 s = substr(name, i, 1);
229 if (s == "_")
230 s = "-";
231 fname = fname s;
232 }
233
234 printf(".It Ic %s\n", fname);
235 ok = 1;
236 }
237 }
238 /^ \*/ {
239 if (ok) {
240 for (i = 2; i < NF; i++)
241 printf("%s ", $i);
242 printf("%s.\n", $i);
243 ok = 0;
244 }
245 }
246 END {
247 printf(".El\n");
248 printf(".\\\" End of section automatically generated with makelist\n");
249 }'
250 ;;
251
252 *)
253 echo $USAGE 1>&2
254 exit 1
255 ;;
256
257 esac
258