~ubuntu-branches/ubuntu/quantal/linpsk/quantal

« back to all changes in this revision

Viewing changes to admin/ylwrap

  • Committer: Bazaar Package Importer
  • Author(s): Bruce Walker
  • Date: 2002-02-06 11:43:38 UTC
  • Revision ID: james.westby@ubuntu.com-20020206114338-xqmjmhh01lpjm0g4
Tags: upstream-0.6.2
ImportĀ upstreamĀ versionĀ 0.6.2

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#! /bin/sh
 
2
# ylwrap - wrapper for lex/yacc invocations.
 
3
# Copyright (C) 1996, 1997, 1998, 1999 Free Software Foundation, Inc.
 
4
# Written by Tom Tromey <tromey@cygnus.com>.
 
5
#
 
6
# This program is free software; you can redistribute it and/or modify
 
7
# it under the terms of the GNU General Public License as published by
 
8
# the Free Software Foundation; either version 2, or (at your option)
 
9
# any later version.
 
10
#
 
11
# This program is distributed in the hope that it will be useful,
 
12
# but WITHOUT ANY WARRANTY; without even the implied warranty of
 
13
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
14
# GNU General Public License for more details.
 
15
#
 
16
# You should have received a copy of the GNU General Public License
 
17
# along with this program; if not, write to the Free Software
 
18
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
19
 
 
20
# Usage:
 
21
#     ylwrap PROGRAM INPUT [OUTPUT DESIRED]... -- [ARGS]...
 
22
# * PROGRAM is program to run.
 
23
# * INPUT is the input file
 
24
# * OUTPUT is file PROG generates
 
25
# * DESIRED is file we actually want
 
26
# * ARGS are passed to PROG
 
27
# Any number of OUTPUT,DESIRED pairs may be used.
 
28
 
 
29
# The program to run.
 
30
prog="$1"
 
31
shift
 
32
# Make any relative path in $prog absolute.
 
33
case "$prog" in
 
34
 /* | [A-Za-z]:*) ;;
 
35
 */*) prog="`pwd`/$prog" ;;
 
36
esac
 
37
 
 
38
# The input.
 
39
input="$1"
 
40
shift
 
41
case "$input" in
 
42
 /* | [A-Za-z]:*)
 
43
    # Absolute path; do nothing.
 
44
    ;;
 
45
 *)
 
46
    # Relative path.  Make it absolute.  Why?  Because otherwise any
 
47
    # debugging info in the generated file will point to the wrong
 
48
    # place.  This is really gross.
 
49
    input="`pwd`/$input"
 
50
    ;;
 
51
esac
 
52
 
 
53
# We don't want to use the absolute path if the input in the current
 
54
# directory like when making a tar ball.
 
55
input_base=`echo $input | sed -e 's|.*/||'`
 
56
if test -f $input_base && cmp $input_base $input >/dev/null 2>&1; then
 
57
  input=$input_base
 
58
fi
 
59
 
 
60
pairlist=
 
61
while test "$#" -ne 0; do
 
62
   if test "$1" = "--"; then
 
63
      shift
 
64
      break
 
65
   fi
 
66
   pairlist="$pairlist $1"
 
67
   shift
 
68
done
 
69
 
 
70
# FIXME: add hostname here for parallel makes that run commands on
 
71
# other machines.  But that might take us over the 14-char limit.
 
72
dirname=ylwrap$$
 
73
trap "cd `pwd`; rm -rf $dirname > /dev/null 2>&1" 1 2 3 15
 
74
mkdir $dirname || exit 1
 
75
 
 
76
cd $dirname
 
77
case "$input" in
 
78
 /* | [A-Za-z]:*)
 
79
    # Absolute path; do nothing.
 
80
    ;;
 
81
 *)
 
82
    # Make a symbolic link, hard link or hardcopy.
 
83
    ln -s ../"$input" . > /dev/null 2>&1 || ln ../"$input" . > /dev/null 2>&1 || cp ../"$input" .
 
84
    ;;
 
85
esac
 
86
$prog ${1+"$@"} "$input"
 
87
status=$?
 
88
 
 
89
if test $status -eq 0; then
 
90
   set X $pairlist
 
91
   shift
 
92
   first=yes
 
93
   # Since DOS filename conventions don't allow two dots,
 
94
   # the DOS version of Bison writes out y_tab.c instead of y.tab.c
 
95
   # and y_tab.h instead of y.tab.h. Test to see if this is the case.
 
96
   y_tab_nodot="no"
 
97
   if test -f y_tab.c || test -f y_tab.h; then
 
98
      y_tab_nodot="yes"
 
99
   fi
 
100
 
 
101
   while test "$#" -ne 0; do
 
102
      from="$1"
 
103
      # Handle y_tab.c and y_tab.h output by DOS
 
104
      if test $y_tab_nodot = "yes"; then
 
105
         if test $from = "y.tab.c"; then
 
106
            from="y_tab.c"
 
107
         else
 
108
            if test $from = "y.tab.h"; then
 
109
               from="y_tab.h"
 
110
            fi
 
111
         fi
 
112
      fi
 
113
      if test -f "$from"; then
 
114
         # If $2 is an absolute path name, then just use that,
 
115
         # otherwise prepend `../'.
 
116
         case "$2" in
 
117
           /* | [A-Za-z]:*) target="$2";;
 
118
           *) target="../$2";;
 
119
         esac
 
120
         mv "$from" "$target" || status=$?
 
121
      else
 
122
         # A missing file is only an error for the first file.  This
 
123
         # is a blatant hack to let us support using "yacc -d".  If -d
 
124
         # is not specified, we don't want an error when the header
 
125
         # file is "missing".
 
126
         if test $first = yes; then
 
127
            status=1
 
128
         fi
 
129
      fi
 
130
      shift
 
131
      shift
 
132
      first=no
 
133
   done
 
134
else
 
135
   status=$?
 
136
fi
 
137
 
 
138
# Remove the directory.
 
139
cd ..
 
140
rm -rf $dirname
 
141
 
 
142
exit $status