1#!/bin/sh - 2# Copyright (c) 1991, 1993 3# The Regents of the University of California. All rights reserved. 4# Copyright (c) 1997-2005 5# Herbert Xu <herbert@gondor.apana.org.au>. 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# @(#)mktokens 8.1 (Berkeley) 5/31/93 35 36# The following is a list of tokens. The second column is nonzero if the 37# token marks the end of a list. The third column is the name to print in 38# error messages. 39 40cat > /tmp/ka$$ <<\! 41TEOF 1 end of file 42TNL 0 newline 43TSEMI 0 ";" 44TBACKGND 0 "&" 45TAND 0 "&&" 46TOR 0 "||" 47TPIPE 0 "|" 48TLP 0 "(" 49TRP 1 ")" 50TENDCASE 1 ";;" 51TENDBQUOTE 1 "`" 52TREDIR 0 redirection 53TWORD 0 word 54TNOT 0 "!" 55TCASE 0 "case" 56TDO 1 "do" 57TDONE 1 "done" 58TELIF 1 "elif" 59TELSE 1 "else" 60TESAC 1 "esac" 61TFI 1 "fi" 62TFOR 0 "for" 63TIF 0 "if" 64TIN 0 "in" 65TTHEN 1 "then" 66TUNTIL 0 "until" 67TWHILE 0 "while" 68TBEGIN 0 "{" 69TEND 1 "}" 70! 71nl=`wc -l /tmp/ka$$` 72exec > token.h 73awk '{print "#define " $1 " " NR-1}' /tmp/ka$$ 74 75exec > token_vars.h 76 77echo ' 78/* Array indicating which tokens mark the end of a list */ 79static const char tokendlist[] = {' 80awk '{print "\t" $2 ","}' /tmp/ka$$ 81echo '}; 82 83static const char *const tokname[] = {' 84sed -e 's/"/\\"/g' \ 85 -e 's/[^ ]*[ ][ ]*[^ ]*[ ][ ]*\(.*\)/ "\1",/' \ 86 /tmp/ka$$ 87echo '}; 88' 89sed 's/"//g' /tmp/ka$$ | awk ' 90/TNOT/{print "#define KWDOFFSET " NR-1; print ""; 91 print "static const char *const parsekwd[] = {"} 92/TNOT/,/neverfound/{if (last) print " \"" last "\","; last = $3} 93END{print " \"" last "\"\n};"}' 94 95rm /tmp/ka$$ 96