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