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