Initial import from FreeBSD RELENG_4:
[dragonfly.git] / usr.bin / yacc / yyfix.sh
1 #!/bin/sh -
2 #
3 # Copyright (c) 1990 The Regents of the University of California.
4 # All rights reserved.
5 #
6 # Redistribution and use in source and binary forms, with or without
7 # modification, are permitted provided that the following conditions
8 # are met:
9 # 1. Redistributions of source code must retain the above copyright
10 #    notice, this list of conditions and the following disclaimer.
11 # 2. Redistributions in binary form must reproduce the above copyright
12 #    notice, this list of conditions and the following disclaimer in the
13 #    documentation and/or other materials provided with the distribution.
14 # 3. All advertising materials mentioning features or use of this software
15 #    must display the following acknowledgement:
16 #       This product includes software developed by the University of
17 #       California, Berkeley and its contributors.
18 # 4. 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 #       @(#)yyfix.sh    5.2 (Berkeley) 5/12/90
35 #
36 OLDYACC="yyexca yyact yypact yypgo yyr1 yyr2 yychk yydef"
37 NEWYACC="yylhs yylen yydefred yydgoto yysindex yyrindex yygindex \
38          yytable yycheck"
39
40 if [ $# -eq 0 ]; then
41         echo "usage: $0 file [tables]" >&2
42         exit 1
43 fi
44
45 file=$1
46 >$file
47 shift
48
49 if [ $# -eq 0 ] ; then
50         if grep yylhs y.tab.c > /dev/null ; then
51                 if grep yyname y.tab.c > /dev/null ; then
52                         NEWYACC="$NEWYACC yyname"
53                 fi
54                 if grep yyrule y.tab.c > /dev/null ; then
55                         NEWYACC="$NEWYACC yyrule"
56                 fi
57                 set $NEWYACC
58         else
59                 set $OLDYACC
60         fi
61 fi
62
63 for i
64 do
65 ed - y.tab.c << END
66 /^\(.*\)$i[     ]*\[]/s//extern \1 $i[];\\
67 \1 $i []/
68 .ka
69 /}/kb
70 'br $file
71 'a,.w $file
72 'a,.d
73 w
74 q
75 END
76 done