Rev 2714 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 2714 | Rev 2787 | ||
---|---|---|---|
1 | #!/bin/sh - |
1 | #!/bin/sh - |
2 | # $NetBSD: mktokens,v 1.9 1999/07/09 03:05:50 christos Exp $ |
2 | # $NetBSD: mktokens,v 1.9 1999/07/09 03:05:50 christos Exp $ |
3 | # |
3 | # |
4 | # Copyright (c) 1991, 1993 |
4 | # Copyright (c) 1991, 1993 |
5 | # The Regents of the University of California. All rights reserved. |
5 | # The Regents of the University of California. All rights reserved. |
6 | # |
6 | # |
7 | # This code is derived from software contributed to Berkeley by |
7 | # This code is derived from software contributed to Berkeley by |
8 | # Kenneth Almquist. |
8 | # Kenneth Almquist. |
9 | # |
9 | # |
10 | # Redistribution and use in source and binary forms, with or without |
10 | # Redistribution and use in source and binary forms, with or without |
11 | # modification, are permitted provided that the following conditions |
11 | # modification, are permitted provided that the following conditions |
12 | # are met: |
12 | # are met: |
13 | # 1. Redistributions of source code must retain the above copyright |
13 | # 1. Redistributions of source code must retain the above copyright |
14 | # notice, this list of conditions and the following disclaimer. |
14 | # notice, this list of conditions and the following disclaimer. |
15 | # 2. Redistributions in binary form must reproduce the above copyright |
15 | # 2. Redistributions in binary form must reproduce the above copyright |
16 | # notice, this list of conditions and the following disclaimer in the |
16 | # notice, this list of conditions and the following disclaimer in the |
17 | # documentation and/or other materials provided with the distribution. |
17 | # documentation and/or other materials provided with the distribution. |
18 | # 3. All advertising materials mentioning features or use of this software |
18 | # 3. All advertising materials mentioning features or use of this software |
19 | # must display the following acknowledgement: |
19 | # must display the following acknowledgement: |
20 | # This product includes software developed by the University of |
20 | # This product includes software developed by the University of |
21 | # California, Berkeley and its contributors. |
21 | # California, Berkeley and its contributors. |
22 | # 4. Neither the name of the University nor the names of its contributors |
22 | # 4. Neither the name of the University nor the names of its contributors |
23 | # may be used to endorse or promote products derived from this software |
23 | # may be used to endorse or promote products derived from this software |
24 | # without specific prior written permission. |
24 | # without specific prior written permission. |
25 | # |
25 | # |
26 | # THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND |
26 | # THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND |
27 | # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
27 | # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
28 | # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
28 | # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
29 | # ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE |
29 | # ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE |
30 | # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
30 | # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
31 | # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
31 | # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
32 | # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
32 | # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
33 | # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
33 | # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
34 | # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
34 | # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
35 | # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
35 | # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
36 | # SUCH DAMAGE. |
36 | # SUCH DAMAGE. |
37 | # |
37 | # |
38 | # @(#)mktokens 8.1 (Berkeley) 5/31/93 |
38 | # @(#)mktokens 8.1 (Berkeley) 5/31/93 |
39 | 39 | ||
40 | # The following is a list of tokens. The second column is nonzero if the |
40 | # The following is a list of tokens. The second column is nonzero if the |
41 | # token marks the end of a list. The third column is the name to print in |
41 | # token marks the end of a list. The third column is the name to print in |
42 | # error messages. |
42 | # error messages. |
43 | 43 | ||
44 | cat > /tmp/ka$$ <<\! |
44 | cat > /tmp/ka$$ <<\! |
45 | TEOF 1 end of file |
45 | TEOF 1 end of file |
46 | TNL 0 newline |
46 | TNL 0 newline |
47 | TSEMI 0 ";" |
47 | TSEMI 0 ";" |
48 | TBACKGND 0 "&" |
48 | TBACKGND 0 "&" |
49 | TAND 0 "&&" |
49 | TAND 0 "&&" |
50 | TOR 0 "||" |
50 | TOR 0 "||" |
51 | TPIPE 0 "|" |
51 | TPIPE 0 "|" |
52 | TLP 0 "(" |
52 | TLP 0 "(" |
53 | TRP 1 ")" |
53 | TRP 1 ")" |
54 | TENDCASE 1 ";;" |
54 | TENDCASE 1 ";;" |
55 | TENDBQUOTE 1 "`" |
55 | TENDBQUOTE 1 "`" |
56 | TREDIR 0 redirection |
56 | TREDIR 0 redirection |
57 | TWORD 0 word |
57 | TWORD 0 word |
58 | TIF 0 "if" |
58 | TIF 0 "if" |
59 | TTHEN 1 "then" |
59 | TTHEN 1 "then" |
60 | TELSE 1 "else" |
60 | TELSE 1 "else" |
61 | TELIF 1 "elif" |
61 | TELIF 1 "elif" |
62 | TFI 1 "fi" |
62 | TFI 1 "fi" |
63 | TWHILE 0 "while" |
63 | TWHILE 0 "while" |
64 | TUNTIL 0 "until" |
64 | TUNTIL 0 "until" |
65 | TFOR 0 "for" |
65 | TFOR 0 "for" |
66 | TDO 1 "do" |
66 | TDO 1 "do" |
67 | TDONE 1 "done" |
67 | TDONE 1 "done" |
68 | TBEGIN 0 "{" |
68 | TBEGIN 0 "{" |
69 | TEND 1 "}" |
69 | TEND 1 "}" |
70 | TCASE 0 "case" |
70 | TCASE 0 "case" |
71 | TESAC 1 "esac" |
71 | TESAC 1 "esac" |
72 | TNOT 0 "!" |
72 | TNOT 0 "!" |
73 | ! |
73 | ! |
74 | nl=`wc -l /tmp/ka$$` |
74 | nl=`wc -l /tmp/ka$$` |
75 | exec > token.h |
75 | exec > token.h |
76 | awk '{print "#define " $1 " " NR-1}' /tmp/ka$$ |
76 | awk '{print "#define " $1 " " NR-1}' /tmp/ka$$ |
77 | echo ' |
77 | echo ' |
78 | /* Array indicating which tokens mark the end of a list */ |
78 | /* Array indicating which tokens mark the end of a list */ |
79 | const char tokendlist[] = {' |
79 | const char tokendlist[] = {' |
80 | awk '{print "\t" $2 ","}' /tmp/ka$$ |
80 | awk '{print "\t" $2 ","}' /tmp/ka$$ |
81 | echo '}; |
81 | echo '}; |
82 | 82 | ||
83 | const char *const tokname[] = {' |
83 | const char *const tokname[] = {' |
84 | sed -e 's/"/\\"/g' \ |
84 | sed -e 's/"/\\"/g' \ |
85 | -e 's/[^ ]*[ ][ ]*[^ ]*[ ][ ]*\(.*\)/ "\1",/' \ |
85 | -e 's/[^ ]*[ ][ ]*[^ ]*[ ][ ]*\(.*\)/ "\1",/' \ |
86 | /tmp/ka$$ |
86 | /tmp/ka$$ |
87 | echo '}; |
87 | echo '}; |
88 | ' |
88 | ' |
89 | sed 's/"//g' /tmp/ka$$ | awk ' |
89 | sed 's/"//g' /tmp/ka$$ | awk ' |
90 | /TIF/{print "#define KWDOFFSET " NR-1; print ""; |
90 | /TIF/{print "#define KWDOFFSET " NR-1; print ""; |
91 | print "const char *const parsekwd[] = {"} |
91 | print "const char *const parsekwd[] = {"} |
92 | /TIF/,/neverfound/{print " \"" $3 "\","}' |
92 | /TIF/,/neverfound/{print " \"" $3 "\","}' |
93 | echo ' 0 |
93 | echo ' 0 |
94 | };' |
94 | };' |
95 | 95 | ||
96 | rm /tmp/ka$$ |
96 | rm /tmp/ka$$ |
97 | 97 |