Home | History | Annotate | Line # | Download | only in dist
      1      1.1     skrll #! /bin/sh
      2      1.1     skrll # ylwrap - wrapper for lex/yacc invocations.
      3      1.1     skrll 
      4  1.1.1.3  christos scriptversion=2013-01-12.17; # UTC
      5      1.1     skrll 
      6  1.1.1.3  christos # Copyright (C) 1996-2014 Free Software Foundation, Inc.
      7      1.1     skrll #
      8      1.1     skrll # Written by Tom Tromey <tromey (at] cygnus.com>.
      9      1.1     skrll #
     10      1.1     skrll # This program is free software; you can redistribute it and/or modify
     11      1.1     skrll # it under the terms of the GNU General Public License as published by
     12      1.1     skrll # the Free Software Foundation; either version 2, or (at your option)
     13      1.1     skrll # any later version.
     14      1.1     skrll #
     15      1.1     skrll # This program is distributed in the hope that it will be useful,
     16      1.1     skrll # but WITHOUT ANY WARRANTY; without even the implied warranty of
     17      1.1     skrll # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     18      1.1     skrll # GNU General Public License for more details.
     19      1.1     skrll #
     20      1.1     skrll # You should have received a copy of the GNU General Public License
     21  1.1.1.2  christos # along with this program.  If not, see <http://www.gnu.org/licenses/>.
     22      1.1     skrll 
     23      1.1     skrll # As a special exception to the GNU General Public License, if you
     24      1.1     skrll # distribute this file as part of a program that contains a
     25      1.1     skrll # configuration script generated by Autoconf, you may include it under
     26      1.1     skrll # the same distribution terms that you use for the rest of that program.
     27      1.1     skrll 
     28      1.1     skrll # This file is maintained in Automake, please report
     29      1.1     skrll # bugs to <bug-automake (at] gnu.org> or send patches to
     30      1.1     skrll # <automake-patches (at] gnu.org>.
     31      1.1     skrll 
     32  1.1.1.3  christos get_dirname ()
     33  1.1.1.3  christos {
     34  1.1.1.3  christos   case $1 in
     35  1.1.1.3  christos     */*|*\\*) printf '%s\n' "$1" | sed -e 's|\([\\/]\)[^\\/]*$|\1|';;
     36  1.1.1.3  christos     # Otherwise,  we want the empty string (not ".").
     37  1.1.1.3  christos   esac
     38  1.1.1.3  christos }
     39  1.1.1.3  christos 
     40  1.1.1.3  christos # guard FILE
     41  1.1.1.3  christos # ----------
     42  1.1.1.3  christos # The CPP macro used to guard inclusion of FILE.
     43  1.1.1.3  christos guard ()
     44  1.1.1.3  christos {
     45  1.1.1.3  christos   printf '%s\n' "$1"                                                    \
     46  1.1.1.3  christos     | sed                                                               \
     47  1.1.1.3  christos         -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'   \
     48  1.1.1.3  christos         -e 's/[^ABCDEFGHIJKLMNOPQRSTUVWXYZ]/_/g'                        \
     49  1.1.1.3  christos         -e 's/__*/_/g'
     50  1.1.1.3  christos }
     51  1.1.1.3  christos 
     52  1.1.1.3  christos # quote_for_sed [STRING]
     53  1.1.1.3  christos # ----------------------
     54  1.1.1.3  christos # Return STRING (or stdin) quoted to be used as a sed pattern.
     55  1.1.1.3  christos quote_for_sed ()
     56  1.1.1.3  christos {
     57  1.1.1.3  christos   case $# in
     58  1.1.1.3  christos     0) cat;;
     59  1.1.1.3  christos     1) printf '%s\n' "$1";;
     60  1.1.1.3  christos   esac \
     61  1.1.1.3  christos     | sed -e 's|[][\\.*]|\\&|g'
     62  1.1.1.3  christos }
     63  1.1.1.3  christos 
     64      1.1     skrll case "$1" in
     65      1.1     skrll   '')
     66  1.1.1.3  christos     echo "$0: No files given.  Try '$0 --help' for more information." 1>&2
     67      1.1     skrll     exit 1
     68      1.1     skrll     ;;
     69      1.1     skrll   --basedir)
     70      1.1     skrll     basedir=$2
     71      1.1     skrll     shift 2
     72      1.1     skrll     ;;
     73      1.1     skrll   -h|--h*)
     74      1.1     skrll     cat <<\EOF
     75      1.1     skrll Usage: ylwrap [--help|--version] INPUT [OUTPUT DESIRED]... -- PROGRAM [ARGS]...
     76      1.1     skrll 
     77      1.1     skrll Wrapper for lex/yacc invocations, renaming files as desired.
     78      1.1     skrll 
     79      1.1     skrll   INPUT is the input file
     80      1.1     skrll   OUTPUT is one file PROG generates
     81      1.1     skrll   DESIRED is the file we actually want instead of OUTPUT
     82      1.1     skrll   PROGRAM is program to run
     83      1.1     skrll   ARGS are passed to PROG
     84      1.1     skrll 
     85      1.1     skrll Any number of OUTPUT,DESIRED pairs may be used.
     86      1.1     skrll 
     87      1.1     skrll Report bugs to <bug-automake@gnu.org>.
     88      1.1     skrll EOF
     89      1.1     skrll     exit $?
     90      1.1     skrll     ;;
     91      1.1     skrll   -v|--v*)
     92      1.1     skrll     echo "ylwrap $scriptversion"
     93      1.1     skrll     exit $?
     94      1.1     skrll     ;;
     95      1.1     skrll esac
     96      1.1     skrll 
     97      1.1     skrll 
     98      1.1     skrll # The input.
     99  1.1.1.3  christos input=$1
    100      1.1     skrll shift
    101  1.1.1.3  christos # We'll later need for a correct munging of "#line" directives.
    102  1.1.1.3  christos input_sub_rx=`get_dirname "$input" | quote_for_sed`
    103  1.1.1.3  christos case $input in
    104      1.1     skrll   [\\/]* | ?:[\\/]*)
    105      1.1     skrll     # Absolute path; do nothing.
    106      1.1     skrll     ;;
    107      1.1     skrll   *)
    108      1.1     skrll     # Relative path.  Make it absolute.
    109  1.1.1.3  christos     input=`pwd`/$input
    110      1.1     skrll     ;;
    111      1.1     skrll esac
    112  1.1.1.3  christos input_rx=`get_dirname "$input" | quote_for_sed`
    113  1.1.1.3  christos 
    114  1.1.1.3  christos # The parser itself, the first file, is the destination of the .y.c
    115  1.1.1.3  christos # rule in the Makefile.
    116  1.1.1.3  christos parser=$1
    117  1.1.1.3  christos 
    118  1.1.1.3  christos # A sed program to s/FROM/TO/g for all the FROM/TO so that, for
    119  1.1.1.3  christos # instance, we rename #include "y.tab.h" into #include "parse.h"
    120  1.1.1.3  christos # during the conversion from y.tab.c to parse.c.
    121  1.1.1.3  christos sed_fix_filenames=
    122  1.1.1.3  christos 
    123  1.1.1.3  christos # Also rename header guards, as Bison 2.7 for instance uses its header
    124  1.1.1.3  christos # guard in its implementation file.
    125  1.1.1.3  christos sed_fix_header_guards=
    126      1.1     skrll 
    127  1.1.1.3  christos while test $# -ne 0; do
    128  1.1.1.3  christos   if test x"$1" = x"--"; then
    129      1.1     skrll     shift
    130      1.1     skrll     break
    131      1.1     skrll   fi
    132  1.1.1.3  christos   from=$1
    133  1.1.1.3  christos   shift
    134  1.1.1.3  christos   to=$1
    135      1.1     skrll   shift
    136  1.1.1.3  christos   sed_fix_filenames="${sed_fix_filenames}s|"`quote_for_sed "$from"`"|$to|g;"
    137  1.1.1.3  christos   sed_fix_header_guards="${sed_fix_header_guards}s|"`guard "$from"`"|"`guard "$to"`"|g;"
    138      1.1     skrll done
    139      1.1     skrll 
    140      1.1     skrll # The program to run.
    141  1.1.1.3  christos prog=$1
    142      1.1     skrll shift
    143      1.1     skrll # Make any relative path in $prog absolute.
    144  1.1.1.3  christos case $prog in
    145      1.1     skrll   [\\/]* | ?:[\\/]*) ;;
    146  1.1.1.3  christos   *[\\/]*) prog=`pwd`/$prog ;;
    147      1.1     skrll esac
    148      1.1     skrll 
    149      1.1     skrll dirname=ylwrap$$
    150  1.1.1.3  christos do_exit="cd '`pwd`' && rm -rf $dirname > /dev/null 2>&1;"' (exit $ret); exit $ret'
    151  1.1.1.3  christos trap "ret=129; $do_exit" 1
    152  1.1.1.3  christos trap "ret=130; $do_exit" 2
    153  1.1.1.3  christos trap "ret=141; $do_exit" 13
    154  1.1.1.3  christos trap "ret=143; $do_exit" 15
    155      1.1     skrll mkdir $dirname || exit 1
    156      1.1     skrll 
    157      1.1     skrll cd $dirname
    158      1.1     skrll 
    159      1.1     skrll case $# in
    160  1.1.1.2  christos   0) "$prog" "$input" ;;
    161  1.1.1.2  christos   *) "$prog" "$@" "$input" ;;
    162      1.1     skrll esac
    163      1.1     skrll ret=$?
    164      1.1     skrll 
    165      1.1     skrll if test $ret -eq 0; then
    166  1.1.1.3  christos   for from in *
    167  1.1.1.3  christos   do
    168  1.1.1.3  christos     to=`printf '%s\n' "$from" | sed "$sed_fix_filenames"`
    169      1.1     skrll     if test -f "$from"; then
    170      1.1     skrll       # If $2 is an absolute path name, then just use that,
    171  1.1.1.3  christos       # otherwise prepend '../'.
    172  1.1.1.3  christos       case $to in
    173  1.1.1.3  christos         [\\/]* | ?:[\\/]*) target=$to;;
    174  1.1.1.3  christos         *) target=../$to;;
    175      1.1     skrll       esac
    176      1.1     skrll 
    177  1.1.1.3  christos       # Do not overwrite unchanged header files to avoid useless
    178  1.1.1.3  christos       # recompilations.  Always update the parser itself: it is the
    179  1.1.1.3  christos       # destination of the .y.c rule in the Makefile.  Divert the
    180  1.1.1.3  christos       # output of all other files to a temporary file so we can
    181  1.1.1.3  christos       # compare them to existing versions.
    182  1.1.1.3  christos       if test $from != $parser; then
    183  1.1.1.3  christos         realtarget=$target
    184  1.1.1.3  christos         target=tmp-`printf '%s\n' "$target" | sed 's|.*[\\/]||g'`
    185      1.1     skrll       fi
    186  1.1.1.3  christos 
    187  1.1.1.3  christos       # Munge "#line" or "#" directives.  Don't let the resulting
    188  1.1.1.3  christos       # debug information point at an absolute srcdir.  Use the real
    189  1.1.1.3  christos       # output file name, not yy.lex.c for instance.  Adjust the
    190  1.1.1.3  christos       # include guards too.
    191  1.1.1.3  christos       sed -e "/^#/!b"                           \
    192  1.1.1.3  christos           -e "s|$input_rx|$input_sub_rx|"       \
    193  1.1.1.3  christos           -e "$sed_fix_filenames"               \
    194  1.1.1.3  christos           -e "$sed_fix_header_guards"           \
    195  1.1.1.3  christos         "$from" >"$target" || ret=$?
    196  1.1.1.3  christos 
    197  1.1.1.3  christos       # Check whether files must be updated.
    198  1.1.1.3  christos       if test "$from" != "$parser"; then
    199  1.1.1.3  christos         if test -f "$realtarget" && cmp -s "$realtarget" "$target"; then
    200  1.1.1.3  christos           echo "$to is unchanged"
    201  1.1.1.3  christos           rm -f "$target"
    202  1.1.1.3  christos         else
    203  1.1.1.3  christos           echo "updating $to"
    204      1.1     skrll           mv -f "$target" "$realtarget"
    205      1.1     skrll         fi
    206      1.1     skrll       fi
    207      1.1     skrll     else
    208  1.1.1.3  christos       # A missing file is only an error for the parser.  This is a
    209  1.1.1.3  christos       # blatant hack to let us support using "yacc -d".  If -d is not
    210  1.1.1.3  christos       # specified, don't fail when the header file is "missing".
    211  1.1.1.3  christos       if test "$from" = "$parser"; then
    212      1.1     skrll         ret=1
    213      1.1     skrll       fi
    214      1.1     skrll     fi
    215      1.1     skrll   done
    216      1.1     skrll fi
    217      1.1     skrll 
    218      1.1     skrll # Remove the directory.
    219      1.1     skrll cd ..
    220      1.1     skrll rm -rf $dirname
    221      1.1     skrll 
    222      1.1     skrll exit $ret
    223      1.1     skrll 
    224      1.1     skrll # Local Variables:
    225      1.1     skrll # mode: shell-script
    226      1.1     skrll # sh-indentation: 2
    227      1.1     skrll # eval: (add-hook 'write-file-hooks 'time-stamp)
    228      1.1     skrll # time-stamp-start: "scriptversion="
    229      1.1     skrll # time-stamp-format: "%:y-%02m-%02d.%02H"
    230  1.1.1.2  christos # time-stamp-time-zone: "UTC"
    231  1.1.1.2  christos # time-stamp-end: "; # UTC"
    232      1.1     skrll # End:
    233