1324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver/*
2324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * [The "BSD licence"]
3324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Copyright (c) 2005-2008 Terence Parr
4324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * All rights reserved.
5324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *
6324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Conversion to C#:
7324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Copyright (c) 2008-2009 Sam Harwell, Pixel Mine, Inc.
8324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * All rights reserved.
9324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *
10324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Redistribution and use in source and binary forms, with or without
11324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * modification, are permitted provided that the following conditions
12324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * are met:
13324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * 1. Redistributions of source code must retain the above copyright
14324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *    notice, this list of conditions and the following disclaimer.
15324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * 2. Redistributions in binary form must reproduce the above copyright
16324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *    notice, this list of conditions and the following disclaimer in the
17324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *    documentation and/or other materials provided with the distribution.
18324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * 3. The name of the author may not be used to endorse or promote products
19324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *    derived from this software without specific prior written permission.
20324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *
21324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver */
32324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
33324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruvernamespace Antlr.Runtime.Tree
34324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
35324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    using StringBuilder = System.Text.StringBuilder;
36324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
37324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    public class TreePatternLexer
38324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    {
39324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int Begin = 1;
40324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int End = 2;
41324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int Id = 3;
42324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int Arg = 4;
43324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int Percent = 5;
44324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int Colon = 6;
45324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int Dot = 7;
46324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
47324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>The tree pattern to lex like "(A B C)"</summary> */
48324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected string pattern;
49324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
50324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>Index into input string</summary> */
51324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected int p = -1;
52324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
53324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>Current char</summary> */
54324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected int c;
55324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
56324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>How long is the pattern in char?</summary> */
57324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected int n;
58324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
59324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>Set when token type is ID or ARG (name mimics Java's StreamTokenizer)</summary> */
60324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public StringBuilder sval = new StringBuilder();
61324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
62324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public bool error = false;
63324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
64324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public TreePatternLexer( string pattern )
65324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        {
66324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            this.pattern = pattern;
67324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            this.n = pattern.Length;
68324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            Consume();
69324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        }
70324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
71324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public virtual int NextToken()
72324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        {
73324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            sval.Length = 0; // reset, but reuse buffer
74324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            while ( c != CharStreamConstants.EndOfFile )
75324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            {
76324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ( c == ' ' || c == '\n' || c == '\r' || c == '\t' )
77324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                {
78324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
79324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    continue;
80324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
81324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ( ( c >= 'a' && c <= 'z' ) || ( c >= 'A' && c <= 'Z' ) || c == '_' )
82324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                {
83324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    sval.Append( (char)c );
84324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
85324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    while ( ( c >= 'a' && c <= 'z' ) || ( c >= 'A' && c <= 'Z' ) ||
86324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            ( c >= '0' && c <= '9' ) || c == '_' )
87324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    {
88324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        sval.Append( (char)c );
89324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        Consume();
90324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    }
91324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return Id;
92324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
93324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ( c == '(' )
94324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                {
95324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
96324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return Begin;
97324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
98324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ( c == ')' )
99324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                {
100324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
101324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return End;
102324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
103324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ( c == '%' )
104324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                {
105324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
106324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return Percent;
107324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
108324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ( c == ':' )
109324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                {
110324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
111324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return Colon;
112324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
113324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ( c == '.' )
114324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                {
115324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
116324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return Dot;
117324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
118324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ( c == '[' )
119324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                {
120324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    // grab [x] as a string, returning x
121324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
122324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    while ( c != ']' )
123324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    {
124324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        if ( c == '\\' )
125324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        {
126324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            Consume();
127324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            if ( c != ']' )
128324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            {
129324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                                sval.Append( '\\' );
130324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            }
131324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            sval.Append( (char)c );
132324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        }
133324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        else
134324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        {
135324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            sval.Append( (char)c );
136324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        }
137324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        Consume();
138324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    }
139324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
140324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return Arg;
141324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
142324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                Consume();
143324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                error = true;
144324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                return CharStreamConstants.EndOfFile;
145324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            }
146324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            return CharStreamConstants.EndOfFile;
147324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        }
148324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
149324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected virtual void Consume()
150324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        {
151324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            p++;
152324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            if ( p >= n )
153324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            {
154324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                c = CharStreamConstants.EndOfFile;
155324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            }
156324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            else
157324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            {
158324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                c = pattern[p];
159324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            }
160324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        }
161324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
162324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
163