lib/libedit/makelist

   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 #       LSC: Needed by MINIX's ASH, so do not hide those
 205 -e)
 206         echo "$FILES" | tr ' ' '\012' | $AWK '
 207         BEGIN {
 208             printf("/* Automatically generated file, do not edit */\n");
 209             printf("#define protected /* LSC: see makelist static*/\n");
 210             printf("#define SCCSID\n");
 211         }
 212         {
 213             printf("#include \"%s\"\n", $1);
 214         }'
 215         ;;
 216
 217 #       generate man page fragment from various .c files
 218 #
 219 -m)
 220     cat $FILES | $AWK '
 221         BEGIN {
 222             printf(".\\\" Section automatically generated with makelist\n");
 223             printf(".Bl -tag -width 4n\n");
 224         }
 225         /\(\):/ {
 226             pr = substr($2, 1, 2);
 227             if (pr == "vi" || pr == "em" || pr == "ed") {
 228                 name = substr($2, 1, length($2) - 3);
 229                 fname = "";
 230                 for (i = 1; i <= length(name); i++) {
 231                     s = substr(name, i, 1);
 232                     if (s == "_")
 233                         s = "-";
 234                     fname = fname s;
 235                 }
 236
 237                 printf(".It Ic %s\n", fname);
 238                 ok = 1;
 239             }
 240         }
 241         /^ \*/ {
 242             if (ok) {
 243                 for (i = 2; i < NF; i++)
 244                     printf("%s ", $i);
 245                 printf("%s.\n", $i);
 246                 ok = 0;
 247             }
 248         }
 249         END {
 250             printf(".El\n");
 251             printf(".\\\" End of section automatically generated with makelist\n");
 252         }'
 253         ;;
 254
 255 *)
 256     echo $USAGE 1>&2
 257     exit 1
 258     ;;
 259
 260 esac