Home | History | Annotate | Line # | Download | only in libedit
makelist revision 1.18
      1 #!/bin/sh -
      2 #	$NetBSD: makelist,v 1.18 2012/03/21 05:34:54 matt 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 -n|-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 -n)
     57     cat << _EOF
     58 #include "config.h"
     59 #undef WIDECHAR
     60 #define NARROWCHAR
     61 #include "${FILES}"
     62 _EOF
     63     ;;
     64     
     65 -h)
     66     set - `echo $FILES | sed -e 's/\\./_/g'`
     67     hdr="_h_`basename $1`"
     68     cat $FILES | $AWK '
     69 	BEGIN {
     70 	    printf("/* Automatically generated file, do not edit */\n");
     71 	    printf("#ifndef %s\n#define %s\n", "'$hdr'", "'$hdr'");
     72 	}
     73 	/\(\):/ {
     74 	    pr = substr($2, 1, 2);
     75 	    if (pr == "vi" || pr == "em" || pr == "ed") {
     76 		name = substr($2, 1, length($2) - 3);
     77 #
     78 # XXX:	need a space between name and prototype so that -fc and -fh
     79 #	parsing is much easier
     80 #
     81 		printf("protected el_action_t\t%s (EditLine *, Int);\n", name);
     82 	    }
     83 	}
     84 	END {
     85 	    printf("#endif /* %s */\n", "'$hdr'");
     86 	}'
     87 	;;
     88 
     89 #	generate help.c from various .c files
     90 #
     91 -bc)
     92     cat $FILES | $AWK '
     93 	BEGIN {
     94 	    printf("/* Automatically generated file, do not edit */\n");
     95 	    printf("#include \"config.h\"\n#include \"el.h\"\n");
     96 	    printf("#include \"chartype.h\"\n");
     97 	    printf("private const struct el_bindings_t el_func_help[] = {\n");
     98 	    low = "abcdefghijklmnopqrstuvwxyz_";
     99 	    high = "ABCDEFGHIJKLMNOPQRSTUVWXYZ_";
    100 	    for (i = 1; i <= length(low); i++)
    101 		tr[substr(low, i, 1)] = substr(high, i, 1);
    102 	}
    103 	/\(\):/ {
    104 	    pr = substr($2, 1, 2);
    105 	    if (pr == "vi" || pr == "em" || pr == "ed") {
    106 		name = substr($2, 1, length($2) - 3);
    107 		uname = "";
    108 		fname = "";
    109 		for (i = 1; i <= length(name); i++) {
    110 		    s = substr(name, i, 1);
    111 		    uname = uname tr[s];
    112 		    if (s == "_")
    113 			s = "-";
    114 		    fname = fname s;
    115 		}
    116 
    117 		printf("    { %-30.30s %-30.30s\n","STR(\"" fname "\"),", uname ",");
    118 		ok = 1;
    119 	    }
    120 	}
    121 	/^ \*/ {
    122 	    if (ok) {
    123 		printf("      STR(\"");
    124 		for (i = 2; i < NF; i++)
    125 		    printf("%s ", $i);
    126 		printf("%s\") },\n", $i);
    127 		ok = 0;
    128 	    }
    129 	}
    130 	END {
    131 	    printf("};\n");
    132 	    printf("\nprotected const el_bindings_t* help__get(void)");
    133 	    printf("{ return el_func_help; }\n");
    134 	}'
    135 	;;
    136 
    137 #	generate help.h from various .c files
    138 #
    139 -bh)
    140     $AWK '
    141 	BEGIN {
    142 	    printf("/* Automatically generated file, do not edit */\n");
    143 	    printf("#ifndef _h_help_c\n#define _h_help_c\n");
    144 	    printf("protected const el_bindings_t *help__get(void);\n");
    145 	    printf("#endif /* _h_help_c */\n");
    146 	}' /dev/null
    147 	;;
    148 
    149 #	generate fcns.h from various .h files
    150 #
    151 -fh)
    152     cat $FILES | $AWK '/el_action_t/ { print $3 }' | \
    153     sort | tr '[:lower:]' '[:upper:]' | $AWK '
    154 	BEGIN {
    155 	    printf("/* Automatically generated file, do not edit */\n");
    156 	    printf("#ifndef _h_fcns_c\n#define _h_fcns_c\n");
    157 	    count = 0;
    158 	}
    159 	{
    160 	    printf("#define\t%-30.30s\t%3d\n", $1, count++);
    161 	}
    162 	END {
    163 	    printf("#define\t%-30.30s\t%3d\n", "EL_NUM_FCNS", count);
    164 
    165 	    printf("typedef el_action_t (*el_func_t)(EditLine *, Int);");
    166 	    printf("\nprotected const el_func_t* func__get(void);\n");
    167 	    printf("#endif /* _h_fcns_c */\n");
    168 	}'
    169 	;;
    170 
    171 #	generate fcns.c from various .h files
    172 #
    173 -fc)
    174     cat $FILES | $AWK '/el_action_t/ { print $3 }' | sort | $AWK '
    175 	BEGIN {
    176 	    printf("/* Automatically generated file, do not edit */\n");
    177 	    printf("#include \"config.h\"\n#include \"el.h\"\n");
    178 	    printf("private const el_func_t el_func[] = {");
    179 	    maxlen = 80;
    180 	    needn = 1;
    181 	    len = 0;
    182 	}
    183 	{
    184 	    clen = 25 + 2;
    185 	    len += clen;
    186 	    if (len >= maxlen)
    187 		needn = 1;
    188 	    if (needn) {
    189 		printf("\n    ");
    190 		needn = 0;
    191 		len = 4 + clen;
    192 	    }
    193 	    s = $1 ",";
    194 	    printf("%-26.26s ", s);
    195 	}
    196 	END {
    197 	    printf("\n};\n");
    198 	    printf("\nprotected const el_func_t* func__get(void) { return el_func; }\n");
    199 	}'
    200 	;;
    201 
    202 #	generate editline.c from various .c files
    203 #
    204 -e)
    205 	echo "$FILES" | tr ' ' '\012' | $AWK '
    206 	BEGIN {
    207 	    printf("/* Automatically generated file, do not edit */\n");
    208 	    printf("#define protected static\n");
    209 	    printf("#define SCCSID\n");
    210 	}
    211 	{
    212 	    printf("#include \"%s\"\n", $1);
    213 	}'
    214 	;;
    215 
    216 #	generate man page fragment from various .c files
    217 #
    218 -m)
    219     cat $FILES | $AWK '
    220 	BEGIN {
    221 	    printf(".\\\" Section automatically generated with makelist\n");
    222 	    printf(".Bl -tag -width 4n\n");
    223 	}
    224 	/\(\):/ {
    225 	    pr = substr($2, 1, 2);
    226 	    if (pr == "vi" || pr == "em" || pr == "ed") {
    227 		name = substr($2, 1, length($2) - 3);
    228 		fname = "";
    229 		for (i = 1; i <= length(name); i++) {
    230 		    s = substr(name, i, 1);
    231 		    if (s == "_")
    232 			s = "-";
    233 		    fname = fname s;
    234 		}
    235 
    236 		printf(".It Ic %s\n", fname);
    237 		ok = 1;
    238 	    }
    239 	}
    240 	/^ \*/ {
    241 	    if (ok) {
    242 		for (i = 2; i < NF; i++)
    243 		    printf("%s ", $i);
    244 		printf("%s.\n", $i);
    245 		ok = 0;
    246 	    }
    247 	}
    248 	END {
    249 	    printf(".El\n");
    250 	    printf(".\\\" End of section automatically generated with makelist\n");
    251 	}'
    252 	;;
    253 
    254 *)
    255     echo $USAGE 1>&2
    256     exit 1
    257     ;;
    258 
    259 esac
    260