1324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver//
2324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver//  ANTLRRuleStack.m
3324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver//  ANTLR
4324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver//
5324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver//  Created by Alan Condit on 6/9/10.
6324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver// [The "BSD licence"]
7324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver// Copyright (c) 2010 Alan Condit
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#define SUCCESS (0)
33324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver#define FAILURE (-1)
34324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
35324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverextern NSInteger debug;
36324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
37324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver#import "ANTLRRuleStack.h"
38324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver#import "ANTLRTree.h"
39324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
40324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver/*
41324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Start of ANTLRRuleStack
42324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver */
43324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver@implementation ANTLRRuleStack
44324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
45324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver+ (ANTLRRuleStack *)newANTLRRuleStack
46324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
47324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return [[ANTLRRuleStack alloc] init];
48324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
49324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
50324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver+ (ANTLRRuleStack *)newANTLRRuleStack:(NSInteger)cnt
51324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
52324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return [[ANTLRRuleStack alloc] initWithLen:cnt];
53324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
54324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
55324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (id)init
56324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
57324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	if ((self = [super init]) != nil) {
58324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	}
59324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return( self );
60324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
61324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
62324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (id)initWithLen:(NSInteger)cnt
63324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
64324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	if ((self = [super initWithLen:cnt]) != nil) {
65324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	}
66324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return( self );
67324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
68324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
69324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (void)dealloc
70324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
71324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver#ifdef DEBUG_DEALLOC
72324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    NSLog( @"called dealloc in ANTLRRuleStack" );
73324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver#endif
74324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	[super dealloc];
75324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
76324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
77324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (id) copyWithZone:(NSZone *)aZone
78324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
79324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return [super copyWithZone:aZone];
80324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
81324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
82324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (NSInteger)count
83324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
84324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ANTLRRuleMemo *anElement;
85324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    NSInteger aCnt = 0;
86324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    for( int i = 0; i < BuffSize; i++ ) {
87324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        if ((anElement = ptrBuffer[i]) != nil)
88324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            aCnt++;
89324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
90324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return aCnt;
91324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
92324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
93324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (NSInteger)size
94324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
95324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ANTLRRuleMemo *anElement;
96324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    NSInteger aSize = 0;
97324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    for( int i = 0; i < BuffSize; i++ ) {
98324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        if ((anElement = ptrBuffer[i]) != nil) {
99324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver            aSize++;
100324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        }
101324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
102324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return aSize;
103324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
104324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
105324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (ANTLRHashRule *)pop
106324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
107324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return (ANTLRHashRule *)[super pop];
108324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
109324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
110324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (void) insertObject:(ANTLRHashRule *)aRule atIndex:(NSInteger)idx
111324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
112324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    if ( idx >= BuffSize ) {
113324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        if ( debug > 2 ) NSLog( @"In ANTLRRuleStack attempting to insert aRule at Index %d, but Buffer is only %d long\n", idx, BuffSize );
114324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        [self ensureCapacity:idx];
115324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
116324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    if ( aRule != ptrBuffer[idx] ) {
117324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        if ( ptrBuffer[idx] ) [ptrBuffer[idx] release];
118324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        [aRule retain];
119324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
120324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ptrBuffer[idx] = aRule;
121324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
122324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
123324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (ANTLRHashRule *)objectAtIndex:(NSInteger)idx
124324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
125324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    if (idx < BuffSize) {
126324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        return ptrBuffer[idx];
127324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
128324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    return nil;
129324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
130324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
131324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver- (void)putHashRuleAtRuleIndex:(NSInteger)aRuleIndex StartIndex:(NSInteger)aStartIndex StopIndex:(NSInteger)aStopIndex
132324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
133324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ANTLRHashRule *aHashRule;
134324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ANTLRRuleMemo *aRuleMemo;
135324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
136324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    if (aRuleIndex >= BuffSize) {
137324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        if ( debug) NSLog( @"putHashRuleAtRuleIndex attempting to insert aRule at Index %d, but Buffer is only %d long\n", aRuleIndex, BuffSize );
138324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        [self ensureCapacity:aRuleIndex];
139324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
140324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    if ((aHashRule = ptrBuffer[aRuleIndex]) == nil) {
141324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        aHashRule = [[ANTLRHashRule newANTLRHashRuleWithLen:17] retain];
142324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        ptrBuffer[aRuleIndex] = aHashRule;
143324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
144324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    if (( aRuleMemo = [aHashRule objectAtIndex:aStartIndex] ) == nil ) {
145324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        aRuleMemo = [[ANTLRRuleMemo newANTLRRuleMemo] retain];
146324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        [aHashRule insertObject:aRuleMemo atIndex:aStartIndex];
147324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    }
148324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    [aRuleMemo setStartIndex:[NSNumber numberWithInteger:aStartIndex]];
149324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    [aRuleMemo setStopIndex:[NSNumber numberWithInteger:aStopIndex]];
150324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
151324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
152324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver@end
153