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    using StringBuilder = System.Text.StringBuilder;
35324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
36324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    public class TreePatternLexer {
37324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int EOF = -1;
38324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int BEGIN = 1;
39324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int END = 2;
40324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int ID = 3;
41324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int ARG = 4;
42324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int PERCENT = 5;
43324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int COLON = 6;
44324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public const int DOT = 7;
45324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
46324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>The tree pattern to lex like "(A B C)"</summary> */
47324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected string pattern;
48324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
49324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>Index into input string</summary> */
50324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected int p = -1;
51324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
52324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>Current char</summary> */
53324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected int c;
54324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
55324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>How long is the pattern in char?</summary> */
56324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected int n;
57324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
58324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        /** <summary>Set when token type is ID or ARG (name mimics Java's StreamTokenizer)</summary> */
59324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public StringBuilder sval = new StringBuilder();
60324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
61324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public bool error = false;
62324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
63324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public TreePatternLexer(string pattern) {
64324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            this.pattern = pattern;
65324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            this.n = pattern.Length;
66324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            Consume();
67324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        }
68324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
69324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        public virtual int NextToken() {
70324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            sval.Length = 0; // reset, but reuse buffer
71324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            while (c != EOF) {
72324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if (c == ' ' || c == '\n' || c == '\r' || c == '\t') {
73324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
74324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    continue;
75324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
76324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if ((c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z') || c == '_') {
77324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    sval.Append((char)c);
78324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
79324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    while ((c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z') ||
80324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            (c >= '0' && c <= '9') || c == '_') {
81324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        sval.Append((char)c);
82324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        Consume();
83324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    }
84324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return ID;
85324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
86324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if (c == '(') {
87324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
88324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return BEGIN;
89324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
90324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if (c == ')') {
91324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
92324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return END;
93324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
94324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if (c == '%') {
95324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
96324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return PERCENT;
97324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
98324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if (c == ':') {
99324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
100324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return COLON;
101324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
102324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if (c == '.') {
103324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
104324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return DOT;
105324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
106324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                if (c == '[') { // grab [x] as a string, returning x
107324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
108324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    while (c != ']') {
109324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        if (c == '\\') {
110324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            Consume();
111324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            if (c != ']') {
112324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                                sval.Append('\\');
113324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            }
114324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            sval.Append((char)c);
115324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        } else {
116324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                            sval.Append((char)c);
117324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        }
118324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                        Consume();
119324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    }
120324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    Consume();
121324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                    return ARG;
122324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                }
123324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                Consume();
124324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                error = true;
125324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                return EOF;
126324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            }
127324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            return EOF;
128324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        }
129324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
130324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        protected virtual void Consume() {
131324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            p++;
132324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            if (p >= n) {
133324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                c = EOF;
134324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            } else {
135324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver                c = pattern[p];
136324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            }
137324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        }
138324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
139324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
140