1// [The "BSD licence"] 2// Copyright (c) 2006-2007 Kay Roepke 3// All rights reserved. 4// 5// Redistribution and use in source and binary forms, with or without 6// modification, are permitted provided that the following conditions 7// are met: 8// 1. Redistributions of source code must retain the above copyright 9// notice, this list of conditions and the following disclaimer. 10// 2. Redistributions in binary form must reproduce the above copyright 11// notice, this list of conditions and the following disclaimer in the 12// documentation and/or other materials provided with the distribution. 13// 3. The name of the author may not be used to endorse or promote products 14// derived from this software without specific prior written permission. 15// 16// THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17// IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 18// OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 19// IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 20// INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 21// NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 22// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 23// THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 24// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 25// THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 26 27#import "ANTLRDebugTreeAdaptor.h" 28 29 30@implementation ANTLRDebugTreeAdaptor 31 32 33- (id) initWithTreeAdaptor:(ANTLRCommonTreeAdaptor *)aTreeAdaptor debugListener:(id<ANTLRDebugEventListener>)aDebugListener 34{ 35 self = [super init]; 36 if (self) { 37 [self setDebugListener:aDebugListener]; 38 [self setTreeAdaptor:aTreeAdaptor]; 39 } 40 return self; 41} 42 43- (void) dealloc 44{ 45 [self setDebugListener: nil]; 46 [self setTreeAdaptor: nil]; 47 [super dealloc]; 48} 49 50- (id<ANTLRDebugEventListener>) debugListener 51{ 52 return debugListener; 53} 54 55- (void) setDebugListener: (id<ANTLRDebugEventListener>) aDebugListener 56{ 57 if (debugListener != aDebugListener) { 58 [(id<ANTLRTreeAdaptor,NSObject>)aDebugListener retain]; 59 [(id<ANTLRTreeAdaptor,NSObject>)debugListener release]; 60 debugListener = aDebugListener; 61 } 62} 63 64- (ANTLRCommonTreeAdaptor *) getTreeAdaptor 65{ 66 return treeAdaptor; 67} 68 69- (void) setTreeAdaptor: (ANTLRCommonTreeAdaptor *) aTreeAdaptor 70{ 71 if (treeAdaptor != aTreeAdaptor) { 72 [aTreeAdaptor retain]; 73 [treeAdaptor release]; 74 treeAdaptor = aTreeAdaptor; 75 } 76} 77 78#pragma mark - 79#pragma mark Proxy implementation 80 81// anything else that hasn't some debugger event assicioated with it, is simply 82// forwarded to the actual token stream 83- (void) forwardInvocation:(NSInvocation *)anInvocation 84{ 85 [anInvocation invokeWithTarget:[self getTreeAdaptor]]; 86} 87 88#pragma mark - 89 90#pragma mark Construction 91 92- (id<ANTLRBaseTree>) newANTLRTreeWithToken:(id<ANTLRToken>) payload 93{ 94 id<ANTLRBaseTree> newTree = [ANTLRCommonTree newTreeWithToken:payload]; 95 [debugListener createNode:[treeAdaptor uniqueIdForTree:newTree] fromTokenAtIndex:[payload getTokenIndex]]; 96 return newTree; 97} 98 99- (id<ANTLRBaseTree>) emptyTree 100{ 101 id<ANTLRBaseTree> newTree = [treeAdaptor newEmptyTree]; 102 [debugListener createNilNode:[treeAdaptor uniqueIdForTree:newTree]]; 103 return newTree; 104} 105 106/* We don't have debug events for those: 107 - (id) copyNode:(id<ANTLRBaseTree>)aNode 108{ 109} 110- (id) copyTree:(id<ANTLRBaseTree>)aTree 111{ 112} 113*/ 114 115- (void) addChild:(id<ANTLRBaseTree>)child toTree:(id<ANTLRBaseTree>)aTree 116{ 117 [treeAdaptor addChild:child toTree:aTree]; 118 [debugListener addChild:[treeAdaptor uniqueIdForTree:child] toTree:[self uniqueIdForTree:aTree]]; 119} 120 121- (id<ANTLRBaseTree>) becomeRoot:(id<ANTLRBaseTree>)newRoot old:(id<ANTLRBaseTree>)oldRoot 122{ 123 id<ANTLRBaseTree> newTree = [treeAdaptor becomeRoot:newRoot old:oldRoot]; 124 [debugListener becomeRoot:[treeAdaptor uniqueIdForTree:newTree] old:[self uniqueIdForTree:oldRoot]]; 125 return newTree; 126} 127 128/* handle by forwardInvocation: 129- (NSUInteger) uniqueIdForTree:(id<ANTLRBaseTree>)aNode 130{ 131} 132*/ 133 134#pragma mark Rewrite Rules 135 136 - (void) addTokenAsChild:(id<ANTLRToken>)child toTree:(id<ANTLRBaseTree>)aTree 137{ 138 id<ANTLRBaseTree> newChild = [self newANTLRTreeWithToken:child]; 139 [self addChild:newChild toTree:aTree]; 140} 141 142- (id<ANTLRBaseTree>) makeToken:(id<ANTLRToken>)newRoot parentOf:(id<ANTLRBaseTree>)oldRoot 143{ 144 id<ANTLRBaseTree> newNode = [self newANTLRTreeWithToken:newRoot]; 145 return [self becomeRoot:newNode old:oldRoot]; 146} 147 148- (id<ANTLRBaseTree>) newANTLRTreeWithTokenType:(NSInteger)tokenType 149{ 150 id<ANTLRBaseTree> newTree = [treeAdaptor newANTLRTreeWithTokenType:tokenType]; 151 [debugListener createNode:[treeAdaptor uniqueIdForTree:newTree] text:nil type:tokenType]; 152 return newTree; 153} 154 155- (id<ANTLRBaseTree>) newANTLRTreeWithTokenType:(NSInteger)tokenType text:(NSString *)tokenText 156{ 157 id<ANTLRBaseTree> newTree = [treeAdaptor newANTLRTreeWithTokenType:tokenType text:tokenText]; 158 [debugListener createNode:[treeAdaptor uniqueIdForTree:newTree] text:tokenText type:tokenType]; 159 return newTree; 160} 161- (id<ANTLRBaseTree>) newANTLRTreeWithToken:(id<ANTLRToken>)fromToken tokenType:(NSInteger)tokenType 162{ 163 id<ANTLRBaseTree> newTree = [treeAdaptor newANTLRTreeWithToken:fromToken tokenType:tokenType]; 164 [debugListener createNode:[treeAdaptor uniqueIdForTree:newTree] text:fromToken.text type:tokenType]; 165 return newTree; 166} 167 168- (id<ANTLRBaseTree>) newANTLRTreeWithToken:(id<ANTLRToken>)fromToken tokenType:(NSInteger)tokenType text:(NSString *)tokenText 169{ 170 id<ANTLRBaseTree> newTree = [treeAdaptor newANTLRTreeWithToken:fromToken tokenType:tokenType text:tokenText]; 171 [debugListener createNode:[treeAdaptor uniqueIdForTree:newTree] text:tokenText type:tokenType]; 172 return newTree; 173} 174 175- (id<ANTLRBaseTree>) newANTLRTreeWithToken:(id<ANTLRToken>)fromToken text:(NSString *)tokenText 176{ 177 id<ANTLRBaseTree> newTree = [treeAdaptor newANTLRTreeWithToken:fromToken text:tokenText]; 178 [debugListener createNode:[treeAdaptor uniqueIdForTree:newTree] text:tokenText type:fromToken.type]; 179 return newTree; 180} 181 182#pragma mark Content 183 184/* handled by forwardInvocation: 185- (NSInteger) tokenTypeForNode:(id<ANTLRBaseTree>)aNode 186{ 187} 188 189- (void) setTokenType:(NSInteger)tokenType forNode:(id)aNode 190{ 191} 192 193- (NSString *) textForNode:(id<ANTLRBaseTree>)aNode 194{ 195} 196 197- (void) setText:(NSString *)tokenText forNode:(id<ANTLRBaseTree>)aNode 198{ 199} 200*/ 201- (void) setBoundariesForTree:(id<ANTLRBaseTree>)aTree fromToken:(id<ANTLRToken>)startToken toToken:(id<ANTLRToken>)stopToken 202{ 203 [treeAdaptor setBoundariesForTree:aTree fromToken:startToken toToken:stopToken]; 204 if (aTree && startToken && stopToken) { 205 [debugListener setTokenBoundariesForTree:[aTree hash] From:[startToken getTokenIndex] To:[stopToken getTokenIndex]]; 206 } 207} 208/* handled by forwardInvocation: 209- (NSInteger) tokenStartIndexForTree:(id<ANTLRBaseTree>)aTree 210{ 211} 212 213- (NSInteger) tokenStopIndexForTree:(id<ANTLRBaseTree>)aTree 214{ 215} 216*/ 217 218#pragma mark Navigation / Tree Parsing 219/* handled by forwardInvocation: 220- (id<ANTLRBaseTree>) childForNode:(id<ANTLRBaseTree>) aNode atIndex:(NSInteger) i 221{ 222} 223 224- (NSInteger) childCountForTree:(id<ANTLRBaseTree>) aTree 225{ 226} 227*/ 228 229@end 230