bin/sh/mkbuiltins

   1 #!/bin/sh -
   2
   3 #-
   4 # Copyright (c) 1991, 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 # Kenneth Almquist.
   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 #       @(#)mkbuiltins  8.2 (Berkeley) 5/4/95
  35
  36 temp=`mktemp -t ka`
  37 srcdir=$1
  38 havejobs=0
  39 if grep '^#define[       ]*JOBS[         ]*1' $srcdir/shell.h > /dev/null
  40 then    havejobs=1
  41 fi
  42 exec > builtins.c
  43 cat <<\!
  44 /*
  45  * This file was generated by the mkbuiltins program.
  46  */
  47
  48 #include <stdlib.h>
  49 #include "shell.h"
  50 #include "builtins.h"
  51
  52 !
  53 awk '/^[^#]/ {if('$havejobs' || $2 != "-j") \
  54     print $0}' $srcdir/builtins.def | sed 's/-j//' > $temp
  55 echo 'int (*const builtinfunc[])(int, char **) = {'
  56 awk '/^[^#]/ {  printf "\t%s,\n", $1}' $temp
  57 echo '};
  58
  59 const unsigned char builtincmd[] = {'
  60 awk '{  for (i = 2 ; i <= NF ; i++) {
  61                 if ($i == "-s") {
  62                         spc = 1;
  63                 } else if ($i == "-n") {
  64                         # Handled later for builtins.h
  65                         continue
  66                 } else {
  67                         printf "\t\"\\%03o\\%03o%s\"\n", length($i), (spc ? 128 : 0) + NR-1, $i
  68                         spc = 0;
  69                 }
  70         }}' $temp
  71 echo '};'
  72
  73 exec > builtins.h
  74 cat <<\!
  75 /*
  76  * This file was generated by the mkbuiltins program.
  77  */
  78
  79 #include <sys/cdefs.h>
  80 !
  81 tr abcdefghijklmnopqrstuvwxyz ABCDEFGHIJKLMNOPQRSTUVWXYZ < $temp |
  82         awk '{  printf "#define %s %d\n", $1, NR-1}'
  83 echo '
  84 #define BUILTIN_SPECIAL 0x80
  85
  86 extern int (*const builtinfunc[])(int, char **);
  87 extern const unsigned char builtincmd[];
  88 '
  89 awk '{  printf "int %s(int, char **);\n", $1}' $temp
  90
  91 # Build safe_builtin_always()
  92 cat <<EOF
  93
  94 static inline int
  95 safe_builtin_always(int idx)
  96 {
  97 EOF
  98 awk '
  99 BEGIN { printed = 0 }
 100 {
 101         for (i = 2 ; i <= NF ; i++) {
 102                 if ($i == "-s") {
 103                         continue
 104                 } else if ($i == "-n") {
 105                         nofork = 1;
 106                 } else {
 107                         if (nofork == 0) {
 108                                 continue
 109                         }
 110                         if (printed == 1) {
 111                                 printf " || \n\t    "
 112                         } else {
 113                                 printf "\tif ("
 114                         }
 115                         printf "idx == " toupper($1)
 116                         printed = 1
 117                         nofork = 0;
 118                         # Only need to check each once
 119                         break
 120                 }
 121         }
 122 }' $temp
 123
 124 cat << EOF
 125 )
 126                 return (1);
 127         return(0);
 128 }
 129 EOF
 130
 131 rm -f $temp