makelist revision 1.1 1 #!/bin/sh -
2 #
3 # Copyright (c) 1992, 1993
4 # The Regents of the University of California. All rights reserved.
5 #
6 # This code is derived from software contributed to Berkeley by
7 # Christos Zoulas of Cornell University.
8 #
9 # Redistribution and use in source and binary forms, with or without
10 # modification, are permitted provided that the following conditions
11 # are met:
12 # 1. Redistributions of source code must retain the above copyright
13 # notice, this list of conditions and the following disclaimer.
14 # 2. Redistributions in binary form must reproduce the above copyright
15 # notice, this list of conditions and the following disclaimer in the
16 # documentation and/or other materials provided with the distribution.
17 # 3. All advertising materials mentioning features or use of this software
18 # must display the following acknowledgement:
19 # This product includes software developed by the University of
20 # California, Berkeley and its contributors.
21 # 4. Neither the name of the University nor the names of its contributors
22 # may be used to endorse or promote products derived from this software
23 # without specific prior written permission.
24 #
25 # THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 # ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 # SUCH DAMAGE.
36 #
37 # @(#)makelist 5.3 (Berkeley) 6/4/93
38
39 # makelist.sh: Automatically generate header files...
40
41 AWK=/usr/bin/awk
42 USAGE="Usage: $0 -h|-e|-fc|-fh|-bc|-bh <filenames>"
43
44 if [ "x$1" = "x" ]
45 then
46 echo $USAGE 1>&2
47 exit 1
48 fi
49
50 FLAG="$1"
51 shift
52
53 FILES="$@"
54
55 case $FLAG in
56 -h)
57 OIFS="$IFS"
58 IFS=".$IFS"
59 set - $FILES
60 IFS="$OIFS"
61 hdr="_h_`basename $1`_$2"
62 cat $FILES | $AWK '
63 BEGIN {
64 printf("/* Automatically generated file, do not edit */\n");
65 printf("#ifndef %s\n#define %s\n", "'$hdr'", "'$hdr'");
66 }
67 /\(\):/ {
68 pr = substr($2, 1, 2);
69 if (pr == "vi" || pr == "em" || pr == "ed") {
70 name = substr($2, 1, length($2) - 3);
71 printf("protected el_action_t\t%-25.25s __P((EditLine *, int));\n", name);
72 }
73 }
74 END {
75 printf("#endif /* %s */\n", "'$hdr'");
76 }';;
77 -bc)
78 cat $FILES | $AWK '
79 BEGIN {
80 printf("/* Automatically generated file, do not edit */\n");
81 printf("#include \"sys.h\"\n#include \"el.h\"\n");
82 printf("private struct el_bindings_t el_func_help[] = {\n");
83 low = "abcdefghijklmnopqrstuvwxyz_";
84 high = "ABCDEFGHIJKLMNOPQRSTUVWXYZ_";
85 for (i = 1; i <= length(low); i++)
86 tr[substr(low, i, 1)] = substr(high, i, 1);
87 }
88 /\(\):/ {
89 pr = substr($2, 1, 2);
90 if (pr == "vi" || pr == "em" || pr == "ed") {
91 name = substr($2, 1, length($2) - 3);
92 uname = "";
93 fname = "";
94 for (i = 1; i <= length(name); i++) {
95 s = substr(name, i, 1);
96 uname = uname tr[s];
97 if (s == "_")
98 s = "-";
99 fname = fname s;
100 }
101
102 printf(" { %-30.30s %-30.30s\n","\"" fname "\",", uname ",");
103 ok = 1;
104 }
105 }
106 /^ \*/ {
107 if (ok) {
108 printf(" \"");
109 for (i = 2; i < NF; i++)
110 printf("%s ", $i);
111 printf("%s\" },\n", $i);
112 ok = 0;
113 }
114 }
115 END {
116 printf(" { NULL, 0, NULL }\n");
117 printf("};\n");
118 printf("\nprotected el_bindings_t* help__get()");
119 printf("{ return el_func_help; }\n");
120 }';;
121 -bh)
122 $AWK '
123 BEGIN {
124 printf("/* Automatically generated file, do not edit */\n");
125 printf("#ifndef _h_help_c\n#define _h_help_c\n");
126 printf("protected el_bindings_t *help__get\t__P((void));\n");
127 printf("#endif /* _h_help_c */\n");
128 }' /dev/null;;
129 -fh)
130 cat $FILES | $AWK '/el_action_t/ { print $3 }' | \
131 sort | tr '[a-z]' '[A-Z]' | $AWK '
132 BEGIN {
133 printf("/* Automatically generated file, do not edit */\n");
134 printf("#ifndef _h_fcns_c\n#define _h_fcns_c\n");
135 count = 0;
136 }
137 {
138 printf("#define\t%-30.30s\t%3d\n", $1, count++);
139 }
140 END {
141 printf("#define\t%-30.30s\t%3d\n", "EL_NUM_FCNS", count);
142
143 printf("typedef el_action_t (*el_func_t) __P((EditLine *, int));");
144 printf("\nprotected el_func_t* func__get __P((void));\n");
145 printf("#endif /* _h_fcns_c */\n");
146 }';;
147 -fc)
148 cat $FILES | $AWK '/el_action_t/ { print $3 }' | sort | $AWK '
149 BEGIN {
150 printf("/* Automatically generated file, do not edit */\n");
151 printf("#include \"sys.h\"\n#include \"el.h\"\n");
152 printf("private el_func_t el_func[] = {");
153 maxlen = 80;
154 needn = 1;
155 len = 0;
156 }
157 {
158 clen = 25 + 2;
159 len += clen;
160 if (len >= maxlen)
161 needn = 1;
162 if (needn) {
163 printf("\n ");
164 needn = 0;
165 len = 4 + clen;
166 }
167 s = $1 ",";
168 printf("%-26.26s ", s);
169 }
170 END {
171 printf("\n};\n");
172 printf("\nprotected el_func_t* func__get() { return el_func; }\n");
173 }';;
174 -e)
175 echo "$FILES" | tr ' ' '\012' | $AWK '
176 BEGIN {
177 printf("/* Automatically generated file, do not edit */\n");
178 printf("#define protected static\n");
179 printf("#define SCCSID\n");
180 }
181 {
182 printf("#include \"%s\"\n", $1);
183 }';;
184 *)
185 echo $USAGE 1>&2
186 exit 1;;
187 esac
188