lib/libedit/makelist

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