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