IRWebAPIResponseParser.m

//
//  IRWebAPIResponseParser.m
//  IRWebAPIKit
//
//  Created by Evadne Wu on 1/29/11.
//  Copyright 2011 Iridia Productions. All rights reserved.
//

#import "IRWebAPIResponseParser.h"





IRWebAPIResponseParser IRWebAPIResponseDefaultParserMake () {

//	Simply tucks the returned data into a dictionary

	NSDictionary * (^defaultParser) (NSData *) = ^ NSDictionary * (NSData *inData) {
	
		return [NSDictionary dictionaryWithObjectsAndKeys:
		
			inData, @"response",
			[[[NSString alloc] initWithData:inData encoding:NSUTF8StringEncoding] autorelease], @"responseText",
			
		nil];
	
	};

	return [[defaultParser copy] autorelease];

}





IRWebAPIResponseParser IRWebAPIResponseQueryResponseParserMake () {

//	Parses UTF8 String Data Like:	
//	
//	Key=URL_Encoded_Value
//	Another_Key=Another_Encoded_Value
	
	NSDictionary * (^queryResponseParser) (NSData *) = ^ NSDictionary * (NSData *inData) {
	
		NSString *responseString = [[[NSString alloc] initWithData:inData encoding:NSUTF8StringEncoding] autorelease];
		
		NSRegularExpression *expression = [NSRegularExpression regularExpressionWithPattern:@"([^=&\n\r]+)=([^=&\n\r]+)[\n\r&]?" options:NSRegularExpressionCaseInsensitive error:nil];
		
		NSMutableDictionary *returnedResponse = [NSMutableDictionary dictionary];
		
		@try {
		
			[expression enumerateMatchesInString:responseString options:0 range:NSMakeRange(0, [responseString length]) usingBlock: ^ (NSTextCheckingResult *result, NSMatchingFlags flags, BOOL *stop) {
			
				[returnedResponse setObject:[responseString substringWithRange:[result rangeAtIndex:2]] forKey:[responseString substringWithRange:[result rangeAtIndex:1]]];
			
			}];
		
		} @catch (NSException * e) {
			
			NSLog(@"IRWebAPIResponseQueryResponseParser encountered an exception while parsing response.  Returning empty dictionary.");
			
			return [NSDictionary dictionary];
			
		}

		return returnedResponse;
	
	};
	
	return [[queryResponseParser copy] autorelease];

}





IRWebAPIResponseParser IRWebAPIResponseDefaultJSONParserMake () {

	static id parserInstance = nil;
	static IRWebAPIResponseParser parserBlock = nil;
	
	if (parserBlock)
		return parserBlock;
	
	NSDictionary * (^dictionarize)(id<NSObject>) = ^ (id<NSObject> incomingObject) {

		if (!incomingObject)
			return (id)nil;

		if (![incomingObject isKindOfClass:[NSDictionary class]])
			return [NSDictionary dictionaryWithObject:incomingObject forKey:@"response"];
		
		return (id)incomingObject;

	};
	
	Class classJSONKit = NSClassFromString(@"JSONDecoder");
	if (classJSONKit) {
	
		parserInstance = [classJSONKit performSelector:@selector(decoder)];
		[parserInstance retain];
	
		parserBlock = (IRWebAPIResponseParser)[[^ (NSData *incomingData) {
			return dictionarize([parserInstance performSelector:@selector(objectWithData:) withObject:incomingData]);
		} copy] autorelease];
		
		return parserBlock;
		
	}
	
	Class classTouchJSON = NSClassFromString(@"CJSONDeserializer");
	if (classTouchJSON) {
		
		parserInstance = [classTouchJSON performSelector:@selector(deserializer)];
		[parserInstance retain];
		
		parserBlock = (IRWebAPIResponseParser)[[^ (NSData *incomingData) {
			
			SEL selDeserialize = @selector(deserialize:error:);
			id incomingObject;

			NSError *error = nil;
			NSError **errorPointer = &error;
			NSInvocation *invocation = [NSInvocation invocationWithMethodSignature:[parserInstance methodSignatureForSelector:selDeserialize]];
			
			[invocation setTarget:parserInstance];
			[invocation setSelector:selDeserialize];
			[invocation setArgument:&incomingData atIndex:2]; 
			[invocation setArgument:&errorPointer atIndex:3];
			[invocation invoke];
			[invocation getReturnValue:&incomingObject];
			
			return dictionarize(incomingObject);
			
		} copy] autorelease];
		
		return parserBlock;
	
	}
	
	return IRWebAPIResponseDefaultParserMake();
	
}

IRWebAPIResponseParser IRWebAPIResponseDefaultXMLParserMake () {

	static IRWebAPIResponseParser parserBlock = nil;
	
	if (parserBlock)
		return parserBlock;
	
	//	__block NSDictionary * (^dictionarize)(id<NSObject>);
	//	dictionarize = [[^ (id<NSObject> incomingObject) {
	//
	//		if (!incomingObject)
	//			return (NSDictionary *)nil;
	//			
	//		NSArray *children = [incomingObject performSelector:@selector(children)];
	//		NSArray *attributes = [incomingObject respondsToSelector:@selector(attributes)] ? [incomingObject performSelector:@selector(attributes)] : nil;
	//		
	//		NSMutableDictionary *returnedDictionary = [NSMutableDictionary dictionary];
	//		
	//		[returnedDictionary setObject:[incomingObject performSelector:@selector(name)] forKey:@"name"];
	//		
	//		if ([children count]) {
	//		
	//			NSMutableArray *childrenDictionaries = [NSMutableArray array];
	//			
	//			for (id element in children)
	//				[childrenDictionaries addObject:dictionarize(element)];
	//			
	//			[returnedDictionary setObject:childrenDictionaries forKey:@"children"];
	//		
	//		}
	//		
	//		if ([attributes count]) {
	//		
	//			NSMutableArray *attributesDictionaries = [NSMutableArray array];
	//			
	//			for (id element in attributes)
	//				[attributesDictionaries addObject:dictionarize(element)];
	//			
	//			[returnedDictionary setObject:attributesDictionaries forKey:@"attributes"];
	//		
	//		}
	//		
	//		[returnedDictionary setObject:[incomingObject performSelector:@selector(stringValue)] forKey:@"value"];
	//	
	//		return returnedDictionary;
	//
	//	} copy] autorelease];
	//	
	//	[dictionarize retain];
	
	Class classTouchXMLDocument = NSClassFromString(@"CXMLDocument");
	if (classTouchXMLDocument) {
	
		parserBlock = (IRWebAPIResponseParser)[[^ (NSData *incomingData) {
	
			SEL selInstantiate = @selector(initWithData:encoding:options:error:);
			id incomingObject = nil;
			
			NSError *error = nil;
			NSError **errorPointer = &error;
			
			id parserInstance = [classTouchXMLDocument performSelector:@selector(alloc)];
			NSInvocation *invocation = [NSInvocation invocationWithMethodSignature:[parserInstance methodSignatureForSelector:selInstantiate]];
			
			NSStringEncoding stringEncoding = NSUTF8StringEncoding;
			NSUInteger options = 0;
			
			[invocation setTarget:parserInstance];
			[invocation setSelector:selInstantiate];
			[invocation setArgument:&incomingData atIndex:2]; 
			[invocation setArgument:&stringEncoding atIndex:3];
			[invocation setArgument:&options atIndex:4]; 
			[invocation setArgument:&errorPointer atIndex:5]; 
			[invocation invoke];
			[invocation getReturnValue:&incomingObject];
			
			return [NSDictionary dictionaryWithObjectsAndKeys:
			
				incomingObject, @"object",
				incomingData, @"data",
				//	dictionarize([incomingObject performSelector:@selector(rootElement)]), @"interpretation",

			nil];
	
		} copy] autorelease];
		
		return parserBlock;
		
	}
	
	return IRWebAPIResponseDefaultParserMake();

}