//
//  CJSONDataSerializer.m
//  TouchCode
//
//  Created by Jonathan Wight on 12/07/2005.
//  Copyright 2005 toxicsoftware.com. All rights reserved.
//
//  Permission is hereby granted, free of charge, to any person
//  obtaining a copy of this software and associated documentation
//  files (the "Software"), to deal in the Software without
//  restriction, including without limitation the rights to use,
//  copy, modify, merge, publish, distribute, sublicense, and/or sell
//  copies of the Software, and to permit persons to whom the
//  Software is furnished to do so, subject to the following
//  conditions:
//
//  The above copyright notice and this permission notice shall be
//  included in all copies or substantial portions of the Software.
//
//  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
//  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
//  OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
//  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
//  HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
//  WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
//  FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
//  OTHER DEALINGS IN THE SOFTWARE.
//

#import "CJSONDataSerializer.h"

#import "CSerializedJSONData.h"

static NSData *kNULL = NULL;
static NSData *kFalse = NULL;
static NSData *kTrue = NULL;

@implementation CJSONDataSerializer

+ (void)initialize
{
NSAutoreleasePool *thePool = [[NSAutoreleasePool alloc] init];

@synchronized(@"CJSONDataSerializer")
	{
	if (kNULL == NULL)
		kNULL = [[NSData alloc] initWithBytesNoCopy:"null" length:4 freeWhenDone:NO];
	if (kFalse == NULL)
		kFalse = [[NSData alloc] initWithBytesNoCopy:"false" length:5 freeWhenDone:NO];
	if (kTrue == NULL)
		kTrue = [[NSData alloc] initWithBytesNoCopy:"true" length:4 freeWhenDone:NO];
	}

[thePool release];
}

+ (id)serializer
{
return([[[self alloc] init] autorelease]);
}

- (NSData *)serializeObject:(id)inObject;
{
NSData *theResult = NULL;

if ([inObject isKindOfClass:[NSNull class]])
	{
	theResult = [self serializeNull:inObject];
	}
else if ([inObject isKindOfClass:[NSNumber class]])
	{
	theResult = [self serializeNumber:inObject];
	}
else if ([inObject isKindOfClass:[NSString class]])
	{
	theResult = [self serializeString:inObject];
	}
else if ([inObject isKindOfClass:[NSArray class]])
	{
	theResult = [self serializeArray:inObject];
	}
else if ([inObject isKindOfClass:[NSDictionary class]])
	{
	theResult = [self serializeDictionary:inObject];
	}
else if ([inObject isKindOfClass:[NSData class]])
	{
	NSString *theString = [[[NSString alloc] initWithData:inObject encoding:NSUTF8StringEncoding] autorelease];
	theResult = [self serializeString:theString];
	}
else if ([inObject isKindOfClass:[CSerializedJSONData class]])
	{
	theResult = [inObject data];
	}
else
	{
	[NSException raise:NSGenericException format:@"Cannot serialize data of type '%@'", NSStringFromClass([inObject class])];
	}
if (theResult == NULL)
	[NSException raise:NSGenericException format:@"Could not serialize object '%@'", inObject];
return(theResult);
}

- (NSData *)serializeNull:(NSNull *)inNull
{
#pragma unused (inNull)
return(kNULL);
}

- (NSData *)serializeNumber:(NSNumber *)inNumber
{
NSData *theResult = NULL;
switch (CFNumberGetType((CFNumberRef)inNumber))
	{
	case kCFNumberCharType:
		{
		int theValue = [inNumber intValue];
		if (theValue == 0)
			theResult = kFalse;
		else if (theValue == 1)
			theResult = kTrue;
		else
			theResult = [[inNumber stringValue] dataUsingEncoding:NSASCIIStringEncoding];
		}
		break;
	case kCFNumberFloat32Type:
	case kCFNumberFloat64Type:
	case kCFNumberFloatType:
	case kCFNumberDoubleType:
	case kCFNumberSInt8Type:
	case kCFNumberSInt16Type:
	case kCFNumberSInt32Type:
	case kCFNumberSInt64Type:
	case kCFNumberShortType:
	case kCFNumberIntType:
	case kCFNumberLongType:
	case kCFNumberLongLongType:
	case kCFNumberCFIndexType:
	default:
		theResult = [[inNumber stringValue] dataUsingEncoding:NSASCIIStringEncoding];
		break;
	}
return(theResult);
}

- (NSData *)serializeString:(NSString *)inString
{
NSMutableString *theMutableCopy = [[inString mutableCopy] autorelease];
[theMutableCopy replaceOccurrencesOfString:@"\\" withString:@"\\\\" options:0 range:NSMakeRange(0, [theMutableCopy length])];
[theMutableCopy replaceOccurrencesOfString:@"\"" withString:@"\\\"" options:0 range:NSMakeRange(0, [theMutableCopy length])];
[theMutableCopy replaceOccurrencesOfString:@"/" withString:@"\\/" options:0 range:NSMakeRange(0, [theMutableCopy length])];
[theMutableCopy replaceOccurrencesOfString:@"\b" withString:@"\\b" options:0 range:NSMakeRange(0, [theMutableCopy length])];
[theMutableCopy replaceOccurrencesOfString:@"\f" withString:@"\\f" options:0 range:NSMakeRange(0, [theMutableCopy length])];
[theMutableCopy replaceOccurrencesOfString:@"\n" withString:@"\\n" options:0 range:NSMakeRange(0, [theMutableCopy length])];
[theMutableCopy replaceOccurrencesOfString:@"\r" withString:@"\\r" options:0 range:NSMakeRange(0, [theMutableCopy length])];
[theMutableCopy replaceOccurrencesOfString:@"\t" withString:@"\\t" options:0 range:NSMakeRange(0, [theMutableCopy length])];
/*
			case 'u':
				{
				theCharacter = 0;

				int theShift;
				for (theShift = 12; theShift >= 0; theShift -= 4)
					{
					int theDigit = HexToInt([self scanCharacter]);
					if (theDigit == -1)
						{
						[self setScanLocation:theScanLocation];
						return(NO);
						}
					theCharacter |= (theDigit << theShift);
					}
				}
*/
return([[NSString stringWithFormat:@"\"%@\"", theMutableCopy] dataUsingEncoding:NSUTF8StringEncoding]);
}

- (NSData *)serializeArray:(NSArray *)inArray
{
NSMutableData *theData = [NSMutableData data];

[theData appendBytes:"[" length:1];

NSEnumerator *theEnumerator = [inArray objectEnumerator];
id theValue = NULL;
NSUInteger i = 0;
while ((theValue = [theEnumerator nextObject]) != NULL)
	{
	[theData appendData:[self serializeObject:theValue]];
	if (++i < [inArray count])
		[theData appendBytes:"," length:1];
	}

[theData appendBytes:"]" length:1];

return(theData);
}

- (NSData *)serializeDictionary:(NSDictionary *)inDictionary
{
NSMutableData *theData = [NSMutableData data];

[theData appendBytes:"{" length:1];

NSArray *theKeys = [inDictionary allKeys];
NSEnumerator *theEnumerator = [theKeys objectEnumerator];
NSString *theKey = NULL;
while ((theKey = [theEnumerator nextObject]) != NULL)
	{
	id theValue = [inDictionary objectForKey:theKey];
	
	[theData appendData:[self serializeString:theKey]];
	[theData appendBytes:":" length:1];
	[theData appendData:[self serializeObject:theValue]];
	
	if (theKey != [theKeys lastObject])
		[theData appendData:[@"," dataUsingEncoding:NSASCIIStringEncoding]];
	}

[theData appendBytes:"}" length:1];

return(theData);
}

@end