// [The "BSD licence"] // Copyright (c) 2006-2007 Kay Roepke 2010 Alan Condit // All rights reserved. // // Redistribution and use in source and binary forms, with or without // modification, are permitted provided that the following conditions // are met: // 1. Redistributions of source code must retain the above copyright // notice, this list of conditions and the following disclaimer. // 2. Redistributions in binary form must reproduce the above copyright // notice, this list of conditions and the following disclaimer in the // documentation and/or other materials provided with the distribution. // 3. The name of the author may not be used to endorse or promote products // derived from this software without specific prior written permission. // // THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR // IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES // OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. // IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, // INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT // NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF // THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. #import "ANTLRCommonTreeAdaptor.h" @implementation ANTLRCommonTreeAdaptor + (ANTLRCommonTree *) newEmptyTree; { return [ANTLRCommonTree newTree]; } + (ANTLRCommonTreeAdaptor *)newTreeAdaptor { return[[ANTLRCommonTreeAdaptor alloc] init]; } - (id) init { self = [super init]; if (self) { } return self; } /** Duplicate a node. This is part of the factory; * override if you want another kind of node to be built. * * I could use reflection to prevent having to override this * but reflection is slow. */ - (id) dupNode:(id<ANTLRBaseTree>)t { if ( t==nil ) return nil; return [ANTLRCommonTree newTree:t]; } /** Tell me how to create a token for use with imaginary token nodes. * For example, there is probably no input symbol associated with imaginary * token DECL, but you need to create it as a payload or whatever for * the DECL node as in ^(DECL type ID). * * This is a variant of createToken where the new token is derived from * an actual real input token. Typically this is for converting '{' * tokens to BLOCK etc... You'll see * * r : lc='{' ID+ '}' -> ^(BLOCK[$lc] ID+) ; * * If you care what the token payload objects' type is, you should * override this method and any other createToken variant. */ - (ANTLRCommonTree *) create:(ANTLRCommonToken *)aToken { return [ANTLRCommonTree newTreeWithToken:aToken]; } /** Tell me how to create a token for use with imaginary token nodes. * For example, there is probably no input symbol associated with imaginary * token DECL, but you need to create it as a payload or whatever for * the DECL node as in ^(DECL type ID). * * If you care what the token payload objects' type is, you should * override this method and any other createToken variant. */ - (ANTLRCommonTree *)createTree:(NSInteger)tokenType Text:(NSString *)text { return [ANTLRCommonTree newTreeWithTokenType:tokenType Text:text]; } - (id<ANTLRToken>)createToken:(NSInteger)tokenType Text:(NSString *)text { id<ANTLRToken> fromToken = [ANTLRCommonToken newToken:tokenType Text:text]; return fromToken; } - (id<ANTLRToken>)createToken:(id<ANTLRToken>)fromToken { return [ANTLRCommonToken newTokenWithToken:(ANTLRCommonToken *)fromToken]; } /** Track start/stop token for subtree root created for a rule. * Only works with Tree nodes. For rules that match nothing, * seems like this will yield start=i and stop=i-1 in a nil node. * Might be useful info so I'll not force to be i..i. */ - (void) setTokenBoundaries:(id<ANTLRBaseTree>)aTree From:(id<ANTLRToken>)startToken To:(id<ANTLRToken>)stopToken { if ( aTree == nil ) return; int startTokIdx = 0; int stopTokIdx = 0; if ( startToken != nil ) startTokIdx = [startToken getTokenIndex]; if ( stopToken != nil ) stopTokIdx = [stopToken getTokenIndex]; [(id<ANTLRBaseTree>)aTree setTokenStartIndex:startTokIdx]; [(id<ANTLRBaseTree>)aTree setTokenStopIndex:stopTokIdx]; } - (NSInteger)getTokenStartIndex:(id<ANTLRBaseTree>) t { if ( t == nil ) return -1; return [(id<ANTLRBaseTree>)t getTokenStartIndex]; } - (NSInteger)getTokenStopIndex:(id<ANTLRBaseTree>) t { if ( t == nil ) return -1; return [(id<ANTLRBaseTree>)t getTokenStopIndex]; } - (NSString *)getText:(ANTLRCommonTree *)t { if ( t == nil ) return nil; return t.token.text; } - (void)setText:(id<ANTLRBaseTree>)t Text:(NSString *)text { if ( t == nil ) return; } - (NSInteger)getType:(ANTLRCommonTree *)t { if ( t==nil ) return ANTLRTokenTypeInvalid; return t.token.type; } - (void) setType:(id<ANTLRBaseTree>)t Type:(NSInteger)tokenType { if ( t==nil ) return; } /** What is the Token associated with this node? If * you are not using ANTLRCommonTree, then you must * override this in your own adaptor. */ - (id<ANTLRToken>) getToken:(ANTLRCommonTree *) t { if ( [t isKindOfClass:[ANTLRCommonTree class]] ) { return t.token; } return nil; // no idea what to do } - (id<ANTLRBaseTree>) getChild:(id<ANTLRBaseTree>)t At:(NSInteger)i { if ( t == nil ) return nil; return [(id<ANTLRBaseTree>)t getChild:i]; } - (void) setChild:(id<ANTLRBaseTree>)t At:(NSInteger)i Child:(id<ANTLRBaseTree>)child { if ( t == nil ) return; [(id<ANTLRBaseTree>)t setChild:i With:child]; } - (id) deleteChild:(id<ANTLRBaseTree>)t Index:(NSInteger)anIndex { return [t deleteChild:anIndex]; } - (NSInteger) getChildCount:(id<ANTLRBaseTree>) t { if ( t == nil ) return 0; return [(id<ANTLRBaseTree>) t getChildCount]; } - (id<ANTLRBaseTree>) getParent:(id<ANTLRBaseTree>) t { if ( t == nil ) return nil; return (id<ANTLRBaseTree>)[t getParent]; } - (void) setParent:(id<ANTLRBaseTree>)t With:(id<ANTLRBaseTree>) parent { if ( t != nil ) [(id<ANTLRBaseTree>) t setParent:(id<ANTLRBaseTree>)parent]; } - (NSInteger) getChildIndex:(id<ANTLRBaseTree>) t { if ( t == nil ) return 0; return [(id<ANTLRBaseTree>) t getChildIndex]; } - (void) setChildIndex:(id<ANTLRBaseTree>)t With:(NSInteger)anIndex { if ( t!=nil ) [(id<ANTLRBaseTree>)t setChildIndex:anIndex]; } - (void) replaceChildren:(id<ANTLRBaseTree>)parent From:(NSInteger)startChildIndex To:(NSInteger)stopChildIndex With:(id<ANTLRBaseTree>)t { if ( parent != nil ) { [(id<ANTLRBaseTree>)parent replaceChildrenFrom:startChildIndex To:stopChildIndex With:t]; } } - (id) copyWithZone:(NSZone *)aZone { return [[[self class] allocWithZone:aZone] init]; } @end