1#!/bin/sh - 2# $NetBSD: makelist,v 1.26 2016/04/11 00:22:48 christos 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 38AWK=awk 39USAGE="Usage: $0 -n|-h|-e|-fc|-fh|-bc|-bh|-m <filenames>" 40 41if [ "x$1" = "x" ] 42then 43 echo $USAGE 1>&2 44 exit 1 45fi 46 47FLAG="$1" 48shift 49 50FILES="$@" 51 52case $FLAG in 53 54# generate foo.h file from foo.c 55# 56-n) 57 cat << _EOF 58#include "config.h" 59#define NARROWCHAR 60#include "${FILES}" 61_EOF 62 ;; 63 64-h) 65 set - `echo $FILES | sed -e 's/\\./_/g'` 66 hdr="_h_`basename $1`" 67 cat $FILES | $AWK ' 68 BEGIN { 69 printf("/* Automatically generated file, do not edit */\n"); 70 printf("#ifndef %s\n#define %s\n", "'$hdr'", "'$hdr'"); 71 } 72 /\(\):/ { 73 pr = substr($2, 1, 2); 74 if (pr == "vi" || pr == "em" || pr == "ed") { 75 name = substr($2, 1, length($2) - 3); 76# 77# XXX: need a space between name and prototype so that -fc and -fh 78# parsing is much easier 79# 80 printf("protected el_action_t\t%s (EditLine *, wint_t);\n", 81 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 \"help.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","L\"" fname "\",", uname ","); 118 ok = 1; 119 } 120 } 121 /^ \*/ { 122 if (ok) { 123 printf(" L\""); 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 *, wint_t);"); 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("#include \"common.h\"\n"); 179 printf("#include \"emacs.h\"\n"); 180 printf("#include \"vi.h\"\n"); 181 printf("private const el_func_t el_func[] = {"); 182 maxlen = 80; 183 needn = 1; 184 len = 0; 185 } 186 { 187 clen = 25 + 2; 188 len += clen; 189 if (len >= maxlen) 190 needn = 1; 191 if (needn) { 192 printf("\n "); 193 needn = 0; 194 len = 4 + clen; 195 } 196 s = $1 ","; 197 printf("%-26.26s ", s); 198 } 199 END { 200 printf("\n};\n"); 201 printf("\nprotected const el_func_t* func__get(void) { return el_func; }\n"); 202 }' 203 ;; 204 205# generate editline.c from various .c files 206# 207-e) 208 echo "$FILES" | tr ' ' '\012' | $AWK ' 209 BEGIN { 210 printf("/* Automatically generated file, do not edit */\n"); 211 printf("#define protected static\n"); 212 printf("#define SCCSID\n"); 213 } 214 { 215 printf("#include \"%s\"\n", $1); 216 }' 217 ;; 218 219# generate man page fragment from various .c files 220# 221-m) 222 cat $FILES | $AWK ' 223 BEGIN { 224 printf(".\\\" Section automatically generated with makelist\n"); 225 printf(".Bl -tag -width 4n\n"); 226 } 227 /\(\):/ { 228 pr = substr($2, 1, 2); 229 if (pr == "vi" || pr == "em" || pr == "ed") { 230 name = substr($2, 1, length($2) - 3); 231 fname = ""; 232 for (i = 1; i <= length(name); i++) { 233 s = substr(name, i, 1); 234 if (s == "_") 235 s = "-"; 236 fname = fname s; 237 } 238 239 printf(".It Ic %s\n", fname); 240 ok = 1; 241 } 242 } 243 /^ \*/ { 244 if (ok) { 245 for (i = 2; i < NF; i++) 246 printf("%s ", $i); 247 printf("%s.\n", $i); 248 ok = 0; 249 } 250 } 251 END { 252 printf(".El\n"); 253 printf(".\\\" End of section automatically generated with makelist\n"); 254 }' 255 ;; 256 257*) 258 echo $USAGE 1>&2 259 exit 1 260 ;; 261 262esac 263