-
Notifications
You must be signed in to change notification settings - Fork 28
/
TDTrack.m
73 lines (57 loc) · 1.99 KB
/
TDTrack.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
//
// TDTrack.m
// TDParseKit
//
// Created by Todd Ditchendorf on 8/13/08.
// Copyright 2008 Todd Ditchendorf. All rights reserved.
//
#import "TDTrack.h"
#import "TDAssembly.h"
#import "TDTrackException.h"
@interface TDParser ()
- (NSSet *)matchAndAssemble:(NSSet *)inAssemblies;
- (TDAssembly *)best:(NSSet *)inAssemblies;
@end
@interface TDTrack ()
- (void)throwTrackExceptionWithPreviousState:(NSSet *)inAssemblies parser:(TDParser *)p;
@end
@implementation TDTrack
+ (id)track {
return [[[self alloc] init] autorelease];
}
- (NSSet *)allMatchesFor:(NSSet *)inAssemblies {
NSParameterAssert(inAssemblies);
BOOL inTrack = NO;
NSSet *lastAssemblies = inAssemblies;
NSSet *outAssemblies = inAssemblies;
for (TDParser *p in subparsers) {
outAssemblies = [p matchAndAssemble:outAssemblies];
if (!outAssemblies.count) {
if (inTrack) {
[self throwTrackExceptionWithPreviousState:lastAssemblies parser:p];
}
break;
}
inTrack = YES;
lastAssemblies = outAssemblies;
}
return outAssemblies;
}
- (void)throwTrackExceptionWithPreviousState:(NSSet *)inAssemblies parser:(TDParser *)p {
TDAssembly *best = [self best:inAssemblies];
NSString *after = [best consumedObjectsJoinedByString:@" "];
if (!after.length) {
after = @"-nothing-";
}
NSString *expected = [p description];
id next = [best peek];
NSString *found = next ? [next description] : @"-nothing-";
NSString *reason = [NSString stringWithFormat:@"\n\nAfter : %@\nExpected : %@\nFound : %@\n\n", after, expected, found];
NSDictionary *userInfo = [NSDictionary dictionaryWithObjectsAndKeys:
after, @"after",
expected, @"expected",
found, @"found",
nil];
[[TDTrackException exceptionWithName:TDTrackExceptionName reason:reason userInfo:userInfo] raise];
}
@end