diff options
Diffstat (limited to 'tikzit-old/src/common/TikzGraphAssembler.m')
| -rw-r--r-- | tikzit-old/src/common/TikzGraphAssembler.m | 310 |
1 files changed, 310 insertions, 0 deletions
diff --git a/tikzit-old/src/common/TikzGraphAssembler.m b/tikzit-old/src/common/TikzGraphAssembler.m new file mode 100644 index 0000000..c5d2811 --- /dev/null +++ b/tikzit-old/src/common/TikzGraphAssembler.m @@ -0,0 +1,310 @@ +// +// TikzGraphAssembler.m +// TikZiT +// +// Copyright 2010 Aleks Kissinger. All rights reserved. +// +// +// This file is part of TikZiT. +// +// TikZiT is free software: you can redistribute it and/or modify +// it under the terms of the GNU General Public License as published by +// the Free Software Foundation, either version 3 of the License, or +// (at your option) any later version. +// +// TikZiT is distributed in the hope that it will be useful, +// but WITHOUT ANY WARRANTY; without even the implied warranty of +// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +// GNU General Public License for more details. +// +// You should have received a copy of the GNU General Public License +// along with TikZiT. If not, see <http://www.gnu.org/licenses/>. +// + +#import "TikzGraphAssembler.h" +#import "tikzparserdefs.h" +#import "tikzparser.h" +#import "TikzGraphAssembler+Parser.h" +#import "tikzlexer.h" +#import "NSError+Tikzit.h" + +@implementation TikzGraphAssembler + +- (id)init { +#if ! __has_feature(objc_arc) + [self release]; +#endif + return nil; +} + +- (id)initWithGraph:(Graph*)g { + self = [super init]; + if (self) { +#if __has_feature(objc_arc) + graph = g; +#else + graph = [g retain]; +#endif + nodeMap = [[NSMutableDictionary alloc] init]; + yylex_init (&scanner); + yyset_extra(self, scanner); + } + return self; +} + +- (void)dealloc { +#if ! __has_feature(objc_arc) + [graph release]; + [nodeMap release]; + [lastError release]; + yylex_destroy (scanner); + [super dealloc]; +#endif +} + +- (BOOL) parseTikz:(NSString*)t error:(NSError**)error { +#if ! __has_feature(objc_arc) + NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init]; +#endif + + tikzStr = [t UTF8String]; + yy_scan_string(tikzStr, scanner); + int result = yyparse(scanner); + tikzStr = NULL; + +#if ! __has_feature(objc_arc) + [pool drain]; +#endif + + if (result == 0) { + return YES; + } else { + if (error) { + if (lastError) { +#if __has_feature(objc_arc) + *error = lastError; +#else + *error = [[lastError retain] autorelease]; +#endif + } else if (result == 1) { + *error = [NSError errorWithMessage:@"Syntax error" + code:TZ_ERR_PARSE]; + } else if (result == 2) { + *error = [NSError errorWithMessage:@"Insufficient memory" + code:TZ_ERR_PARSE]; + } else { + *error = [NSError errorWithMessage:@"Unknown error" + code:TZ_ERR_PARSE]; + } + } + return NO; + } +} + ++ (BOOL) parseTikz:(NSString*)tikz forGraph:(Graph*)gr { + return [self parseTikz:tikz forGraph:gr error:NULL]; +} ++ (Graph*) parseTikz:(NSString*)tikz error:(NSError**)e { + Graph *gr = [[Graph alloc] init]; + if ([self parseTikz:tikz forGraph:gr error:e]) { +#if __has_feature(objc_arc) + return gr; +#else + return [gr autorelease]; +#endif + } else { +#if ! __has_feature(objc_arc) + [gr release]; +#endif + return nil; + } +} ++ (Graph*) parseTikz:(NSString*)tikz { + return [self parseTikz:tikz error:NULL]; +} + ++ (BOOL) parseTikz:(NSString*)tikz forGraph:(Graph*)gr error:(NSError**)error { + if([tikz length] == 0) { + // empty string -> empty graph + return YES; + } + + TikzGraphAssembler *assembler = [[self alloc] initWithGraph:gr]; + BOOL success = [assembler parseTikz:tikz error:error]; +#if ! __has_feature(objc_arc) + [assembler release]; +#endif + return success; +} + ++ (BOOL)validateTikzPropertyNameOrValue:(NSString*)tikz { + BOOL valid; + + NSString * testTikz = [NSString stringWithFormat: @"{%@}", tikz]; + + void *scanner; + yylex_init (&scanner); + yyset_extra(nil, scanner); + yy_scan_string([testTikz UTF8String], scanner); + YYSTYPE lval; + YYLTYPE lloc; + int result = yylex(&lval, &lloc, scanner); + valid = (result == DELIMITEDSTRING) && + (yyget_leng(scanner) == [testTikz length]); + yylex_destroy(scanner); + + return valid; +} + ++ (BOOL)validateTikzEdgeAnchor:(NSString*)tikz { + if ([tikz length] == 0) + return YES; + + BOOL valid = YES; + + NSString * testTikz = [NSString stringWithFormat: @"(1.%@)", tikz]; + + void *scanner; + yylex_init (&scanner); + yyset_extra(nil, scanner); + yy_scan_string([testTikz UTF8String], scanner); + YYSTYPE lval; + YYLTYPE lloc; + valid = valid && (yylex(&lval, &lloc, scanner) == LEFTPARENTHESIS); + valid = valid && (yylex(&lval, &lloc, scanner) == REFSTRING); + valid = valid && (yylex(&lval, &lloc, scanner) == FULLSTOP); + valid = valid && (yylex(&lval, &lloc, scanner) == REFSTRING); + valid = valid && (yylex(&lval, &lloc, scanner) == RIGHTPARENTHESIS); + valid = valid && (lloc.last_column == [testTikz length]); + yylex_destroy(scanner); + + return valid; +} + +@end + +@implementation TikzGraphAssembler (Parser) +- (Graph*)graph { return graph; } + +- (void)addNodeToMap:(Node*)n { + [nodeMap setObject:n forKey:[n name]]; +} + +- (Node*)nodeWithName:(NSString*)name { + return [nodeMap objectForKey:name]; +} + +- (void) setLastError:(NSError*)error { +#if ! __has_feature(objc_arc) + [error retain]; + [lastError release]; +#endif + lastError = error; +} + +- (void) reportError:(const char *)message atLocation:(YYLTYPE*)yylloc { + NSString *nsmsg = [NSString stringWithUTF8String:message]; + + const char *first_line_start = find_start_of_nth_line ( + tikzStr, yylloc->first_line - 1); + const char *last_line_start = find_start_of_nth_line ( + first_line_start, yylloc->last_line - yylloc->first_line); + const char *last_line_end = last_line_start; + while (*last_line_end && *last_line_end != '\n') { + // points to just after end of last line + ++last_line_end; + } + + size_t context_len = last_line_end - first_line_start; + size_t token_offset = yylloc->first_column - 1; + size_t token_len = ((last_line_start - first_line_start) + yylloc->last_column) - token_offset; + + if (token_offset + token_len > context_len) { + // error position state is corrupted + NSLog(@"Got bad error state for error \"%s\": start(%i,%i), end(%i,%i)", + message, + yylloc->first_line, + yylloc->first_column, + yylloc->last_line, + yylloc->last_column); + [self setLastError:[NSError errorWithMessage:nsmsg + code:TZ_ERR_PARSE]]; + } else { + char *context = malloc (context_len + 1); + strncpy (context, first_line_start, context_len); + *(context + context_len) = '\0'; + + NSDictionary *userInfo = + [NSDictionary dictionaryWithObjectsAndKeys: + nsmsg, + NSLocalizedDescriptionKey, + [NSNumber numberWithInt:yylloc->first_line], + @"startLine", + [NSNumber numberWithInt:yylloc->first_column], + @"startColumn", + [NSNumber numberWithInt:yylloc->last_line], + @"endLine", + [NSNumber numberWithInt:yylloc->last_column], + @"endColumn", + [NSString stringWithUTF8String:context], + @"syntaxString", + [NSNumber numberWithInt:token_offset], + @"tokenStart", + [NSNumber numberWithInt:token_len], + @"tokenLength", + nil]; + [self setLastError: + [NSError errorWithDomain:TZErrorDomain + code:TZ_ERR_PARSE + userInfo:userInfo]]; + + // we can now freely edit context string + // we only bother printing out the first line + if (yylloc->last_line > yylloc->first_line) { + char *nlp = strchr(context, '\n'); + if (nlp) { + *nlp = '\0'; + context_len = nlp - context; + NSAssert2(token_offset < context_len, @"token_offset (%lu) < context_len (%lu)", token_offset, context_len); + if (token_offset + token_len > context_len) { + token_len = context_len - token_offset; + } + } else { + NSLog(@"Didn't find any newlines in context string!"); + } + } + size_t token_col_offset = 0; + size_t token_col_len = 0; + for (int i = 0; i < token_offset; ++i) { + if (*(context + i) == '\t') + token_col_offset += 8; + else + ++token_col_offset; + } + for (int i = token_offset; i < token_offset + token_len; ++i) { + if (*(context + i) == '\t') + token_col_len += 8; + else + ++token_col_len; + } + NSString *pointerLinePadding = + [@"" stringByPaddingToLength:token_col_offset + withString:@" " + startingAtIndex:0]; + NSString *pointerLineCarets = + [@"" stringByPaddingToLength:token_col_len + withString:@"^" + startingAtIndex:0]; + NSLog(@"Parse error on line %i, starting at %i: %s\n%s\n%@%@", + yylloc->first_line, + yylloc->first_column, + message, + context, + pointerLinePadding, + pointerLineCarets); + free (context); + } +} +@end + +// vi:ft=objc:ts=4:noet:sts=4:sw=4 |