/*
* Copyright (c) 2008, 2009, 2010, 2011, 2012
* Jonathan Schleifer <js@webkeks.org>
*
* All rights reserved.
*
* This file is part of ObjFW. It may be distributed under the terms of the
* Q Public License 1.0, which can be found in the file LICENSE.QPL included in
* the packaging of this file.
*
* Alternatively, it may be distributed under the terms of the GNU General
* Public License, either version 2 or 3, which can be found in the file
* LICENSE.GPLv2 or LICENSE.GPLv3 respectively included in the packaging of this
* file.
*/
#include "config.h"
#include <stdarg.h>
#include <stdlib.h>
#include <string.h>
#include <sys/stat.h>
#import "OFString.h"
#import "OFString_UTF8.h"
#import "OFArray.h"
#import "OFDictionary.h"
#import "OFFile.h"
#import "OFURL.h"
#import "OFHTTPRequest.h"
#import "OFDataArray.h"
#import "OFXMLElement.h"
#import "OFHTTPRequestFailedException.h"
#import "OFInitializationFailedException.h"
#import "OFInvalidArgumentException.h"
#import "OFInvalidEncodingException.h"
#import "OFInvalidFormatException.h"
#import "OFNotImplementedException.h"
#import "OFOpenFileFailedException.h"
#import "OFOutOfMemoryException.h"
#import "OFOutOfRangeException.h"
#import "autorelease.h"
#import "macros.h"
#import "of_asprintf.h"
#import "unicode.h"
/*
* It seems strtod is buggy on Win32.
* However, the MinGW version __strtod seems to be ok.
*/
#ifdef _WIN32
# define strtod __strtod
#endif
/* References for static linking */
void _references_to_categories_of_OFString(void)
{
_OFString_Hashing_reference = 1;
_OFString_JSONValue_reference = 1;
_OFString_Serialization_reference = 1;
_OFString_URLEncoding_reference = 1;
_OFString_XMLEscaping_reference = 1;
_OFString_XMLUnescaping_reference = 1;
}
void _reference_to_OFConstantString(void)
{
[OFConstantString class];
}
size_t
of_unicode_string_length(const of_unichar_t *string)
{
const of_unichar_t *string_ = string;
while (*string_ != 0)
string_++;
return (size_t)(string_ - string);
}
size_t
of_utf16_string_length(const uint16_t *string)
{
const uint16_t *string_ = string;
while (*string_ != 0)
string_++;
return (size_t)(string_ - string);
}
static struct {
Class isa;
} placeholder;
@interface OFString_placeholder: OFString
@end
@implementation OFString_placeholder
- init
{
return (id)[[OFString_UTF8 alloc] init];
}
- initWithUTF8String: (const char*)UTF8String
{
id string;
size_t length;
void *storage;
length = strlen(UTF8String);
string = of_alloc_object([OFString_UTF8 class],
length + 1, 1, &storage);
return (id)[string OF_initWithUTF8String: UTF8String
length: length
storage: storage];
}
- initWithUTF8String: (const char*)UTF8String
length: (size_t)UTF8StringLength
{
id string;
void *storage;
string = of_alloc_object([OFString_UTF8 class],
UTF8StringLength + 1, 1, &storage);
return (id)[string OF_initWithUTF8String: UTF8String
length: UTF8StringLength
storage: storage];
}
- initWithUTF8StringNoCopy: (const char*)UTF8String
freeWhenDone: (BOOL)freeWhenDone
{
return (id)[[OFString_UTF8 alloc]
initWithUTF8StringNoCopy: UTF8String
freeWhenDone: freeWhenDone];
}
- initWithCString: (const char*)cString
encoding: (of_string_encoding_t)encoding
{
if (encoding == OF_STRING_ENCODING_UTF_8) {
id string;
size_t length;
void *storage;
length = strlen(cString);
string = of_alloc_object([OFString_UTF8 class],
length + 1, 1, &storage);
return (id)[string OF_initWithUTF8String: cString
length: length
storage: storage];
}
return (id)[[OFString_UTF8 alloc] initWithCString: cString
encoding: encoding];
}
- initWithCString: (const char*)cString
encoding: (of_string_encoding_t)encoding
length: (size_t)cStringLength
{
if (encoding == OF_STRING_ENCODING_UTF_8) {
id string;
void *storage;
string = of_alloc_object([OFString_UTF8 class],
cStringLength + 1, 1, &storage);
return (id)[string OF_initWithUTF8String: cString
length: cStringLength
storage: storage];
}
return (id)[[OFString_UTF8 alloc] initWithCString: cString
encoding: encoding
length: cStringLength];
}
- initWithString: (OFString*)string
{
return (id)[[OFString_UTF8 alloc] initWithString: string];
}
- initWithUnicodeString: (const of_unichar_t*)string
{
return (id)[[OFString_UTF8 alloc] initWithUnicodeString: string];
}
- initWithUnicodeString: (const of_unichar_t*)string
byteOrder: (of_byte_order_t)byteOrder
{
return (id)[[OFString_UTF8 alloc] initWithUnicodeString: string
byteOrder: byteOrder];
}
- initWithUnicodeString: (const of_unichar_t*)string
length: (size_t)length
{
return (id)[[OFString_UTF8 alloc] initWithUnicodeString: string
length: length];
}
- initWithUnicodeString: (const of_unichar_t*)string
byteOrder: (of_byte_order_t)byteOrder
length: (size_t)length
{
return (id)[[OFString_UTF8 alloc] initWithUnicodeString: string
byteOrder: byteOrder
length: length];
}
- initWithUTF16String: (const uint16_t*)string
{
return (id)[[OFString_UTF8 alloc] initWithUTF16String: string];
}
- initWithUTF16String: (const uint16_t*)string
byteOrder: (of_byte_order_t)byteOrder
{
return (id)[[OFString_UTF8 alloc] initWithUTF16String: string
byteOrder: byteOrder];
}
- initWithUTF16String: (const uint16_t*)string
length: (size_t)length
{
return (id)[[OFString_UTF8 alloc] initWithUTF16String: string
length: length];
}
- initWithUTF16String: (const uint16_t*)string
byteOrder: (of_byte_order_t)byteOrder
length: (size_t)length
{
return (id)[[OFString_UTF8 alloc] initWithUTF16String: string
byteOrder: byteOrder
length: length];
}
- initWithFormat: (OFConstantString*)format, ...
{
id ret;
va_list arguments;
va_start(arguments, format);
ret = [[OFString_UTF8 alloc] initWithFormat: format
arguments: arguments];
va_end(arguments);
return ret;
}
- initWithFormat: (OFConstantString*)format
arguments: (va_list)arguments
{
return (id)[[OFString_UTF8 alloc] initWithFormat: format
arguments: arguments];
}
- initWithPath: (OFString*)firstComponent, ...
{
id ret;
va_list arguments;
va_start(arguments, firstComponent);
ret = [[OFString_UTF8 alloc] initWithPath: firstComponent
arguments: arguments];
va_end(arguments);
return ret;
}
- initWithPath: (OFString*)firstComponent
arguments: (va_list)arguments
{
return (id)[[OFString_UTF8 alloc] initWithPath: firstComponent
arguments: arguments];
}
- initWithContentsOfFile: (OFString*)path
{
return (id)[[OFString_UTF8 alloc] initWithContentsOfFile: path];
}
- initWithContentsOfFile: (OFString*)path
encoding: (of_string_encoding_t)encoding
{
return (id)[[OFString_UTF8 alloc] initWithContentsOfFile: path
encoding: encoding];
}
- initWithContentsOfURL: (OFURL*)URL
{
return (id)[[OFString_UTF8 alloc] initWithContentsOfURL: URL];
}
- initWithContentsOfURL: (OFURL*)URL
encoding: (of_string_encoding_t)encoding
{
return (id)[[OFString_UTF8 alloc] initWithContentsOfURL: URL
encoding: encoding];
}
- initWithSerialization: (OFXMLElement*)element
{
return (id)[[OFString_UTF8 alloc] initWithSerialization: element];
}
- retain
{
return self;
}
- autorelease
{
return self;
}
- (void)release
{
}
- (void)dealloc
{
@throw [OFNotImplementedException exceptionWithClass: [self class]
selector: _cmd];
[super dealloc]; /* Get rid of a stupid warning */
}
@end
@implementation OFString
+ (void)initialize
{
if (self == [OFString class])
object_setClass((id)&placeholder, [OFString_placeholder class]);
}
+ alloc
{
if (self == [OFString class])
return (id)&placeholder;
return [super alloc];
}
+ (instancetype)string
{
return [[[self alloc] init] autorelease];
}
+ (instancetype)stringWithUTF8String: (const char*)UTF8String
{
return [[[self alloc] initWithUTF8String: UTF8String] autorelease];
}
+ (instancetype)stringWithUTF8String: (const char*)UTF8String
length: (size_t)UTF8StringLength
{
return [[[self alloc]
initWithUTF8String: UTF8String
length: UTF8StringLength] autorelease];
}
+ (instancetype)stringWithCString: (const char*)cString
encoding: (of_string_encoding_t)encoding
{
return [[[self alloc] initWithCString: cString
encoding: encoding] autorelease];
}
+ (instancetype)stringWithCString: (const char*)cString
encoding: (of_string_encoding_t)encoding
length: (size_t)cStringLength
{
return [[[self alloc] initWithCString: cString
encoding: encoding
length: cStringLength] autorelease];
}
+ (instancetype)stringWithString: (OFString*)string
{
return [[[self alloc] initWithString: string] autorelease];
}
+ (instancetype)stringWithUnicodeString: (const of_unichar_t*)string
{
return [[[self alloc] initWithUnicodeString: string] autorelease];
}
+ (instancetype)stringWithUnicodeString: (const of_unichar_t*)string
byteOrder: (of_byte_order_t)byteOrder
{
return [[[self alloc] initWithUnicodeString: string
byteOrder: byteOrder] autorelease];
}
+ (instancetype)stringWithUnicodeString: (const of_unichar_t*)string
length: (size_t)length
{
return [[[self alloc] initWithUnicodeString: string
length: length] autorelease];
}
+ (instancetype)stringWithUnicodeString: (const of_unichar_t*)string
byteOrder: (of_byte_order_t)byteOrder
length: (size_t)length
{
return [[[self alloc] initWithUnicodeString: string
byteOrder: byteOrder
length: length] autorelease];
}
+ (instancetype)stringWithUTF16String: (const uint16_t*)string
{
return [[[self alloc] initWithUTF16String: string] autorelease];
}
+ (instancetype)stringWithUTF16String: (const uint16_t*)string
byteOrder: (of_byte_order_t)byteOrder
{
return [[[self alloc] initWithUTF16String: string
byteOrder: byteOrder] autorelease];
}
+ (instancetype)stringWithUTF16String: (const uint16_t*)string
length: (size_t)length
{
return [[[self alloc] initWithUTF16String: string
length: length] autorelease];
}
+ (instancetype)stringWithUTF16String: (const uint16_t*)string
byteOrder: (of_byte_order_t)byteOrder
length: (size_t)length
{
return [[[self alloc] initWithUTF16String: string
byteOrder: byteOrder
length: length] autorelease];
}
+ (instancetype)stringWithFormat: (OFConstantString*)format, ...
{
id ret;
va_list arguments;
va_start(arguments, format);
ret = [[[self alloc] initWithFormat: format
arguments: arguments] autorelease];
va_end(arguments);
return ret;
}
+ (instancetype)stringWithPath: (OFString*)firstComponent, ...
{
id ret;
va_list arguments;
va_start(arguments, firstComponent);
ret = [[[self alloc] initWithPath: firstComponent
arguments: arguments] autorelease];
va_end(arguments);
return ret;
}
+ (instancetype)stringWithContentsOfFile: (OFString*)path
{
return [[[self alloc] initWithContentsOfFile: path] autorelease];
}
+ (instancetype)stringWithContentsOfFile: (OFString*)path
encoding: (of_string_encoding_t)encoding
{
return [[[self alloc] initWithContentsOfFile: path
encoding: encoding] autorelease];
}
+ (instancetype)stringWithContentsOfURL: (OFURL*)URL
{
return [[[self alloc] initWithContentsOfURL: URL] autorelease];
}
+ (instancetype)stringWithContentsOfURL: (OFURL*)URL
encoding: (of_string_encoding_t)encoding
{
return [[[self alloc] initWithContentsOfURL: URL
encoding: encoding] autorelease];
}
- init
{
if (object_getClass(self) == [OFString class]) {
Class c = [self class];
[self release];
@throw [OFNotImplementedException exceptionWithClass: c
selector: _cmd];
}
return [super init];
}
- initWithUTF8String: (const char*)UTF8String
{
return [self initWithCString: UTF8String
encoding: OF_STRING_ENCODING_UTF_8
length: strlen(UTF8String)];
}
- initWithUTF8String: (const char*)UTF8String
length: (size_t)UTF8StringLength
{
return [self initWithCString: UTF8String
encoding: OF_STRING_ENCODING_UTF_8
length: UTF8StringLength];
}
- initWithUTF8StringNoCopy: (const char*)UTF8String
freeWhenDone: (BOOL)freeWhenDone
{
return [self initWithUTF8String: UTF8String];
}
- initWithCString: (const char*)cString
encoding: (of_string_encoding_t)encoding
{
return [self initWithCString: cString
encoding: encoding
length: strlen(cString)];
}
- initWithCString: (const char*)cString
encoding: (of_string_encoding_t)encoding
length: (size_t)cStringLength
{
Class c = [self class];
[self release];
@throw [OFNotImplementedException exceptionWithClass: c
selector: _cmd];
}
- initWithString: (OFString*)string
{
Class c = [self class];
[self release];
@throw [OFNotImplementedException exceptionWithClass: c
selector: _cmd];
}
- initWithUnicodeString: (const of_unichar_t*)string
{
return [self initWithUnicodeString: string
byteOrder: OF_BYTE_ORDER_NATIVE
length: of_unicode_string_length(string)];
}
- initWithUnicodeString: (const of_unichar_t*)string
byteOrder: (of_byte_order_t)byteOrder
{
return [self initWithUnicodeString: string
byteOrder: byteOrder
length: of_unicode_string_length(string)];
}
- initWithUnicodeString: (const of_unichar_t*)string
length: (size_t)length
{
return [self initWithUnicodeString: string
byteOrder: OF_BYTE_ORDER_NATIVE
length: length];
}
- initWithUnicodeString: (const of_unichar_t*)string
byteOrder: (of_byte_order_t)byteOrder
length: (size_t)length
{
Class c = [self class];
[self release];
@throw [OFNotImplementedException exceptionWithClass: c
selector: _cmd];
}
- initWithUTF16String: (const uint16_t*)string
{
return [self initWithUTF16String: string
byteOrder: OF_BYTE_ORDER_BIG_ENDIAN
length: of_utf16_string_length(string)];
}
- initWithUTF16String: (const uint16_t*)string
byteOrder: (of_byte_order_t)byteOrder
{
return [self initWithUTF16String: string
byteOrder: byteOrder
length: of_utf16_string_length(string)];
}
- initWithUTF16String: (const uint16_t*)string
length: (size_t)length
{
return [self initWithUTF16String: string
byteOrder: OF_BYTE_ORDER_BIG_ENDIAN
length: length];
}
- initWithUTF16String: (const uint16_t*)string
byteOrder: (of_byte_order_t)byteOrder
length: (size_t)length
{
Class c = [self class];
[self release];
@throw [OFNotImplementedException exceptionWithClass: c
selector: _cmd];
}
- initWithFormat: (OFConstantString*)format, ...
{
id ret;
va_list arguments;
va_start(arguments, format);
ret = [self initWithFormat: format
arguments: arguments];
va_end(arguments);
return ret;
}
- initWithFormat: (OFConstantString*)format
arguments: (va_list)arguments
{
Class c = [self class];
[self release];
@throw [OFNotImplementedException exceptionWithClass: c
selector: _cmd];
}
- initWithPath: (OFString*)firstComponent, ...
{
id ret;
va_list arguments;
va_start(arguments, firstComponent);
ret = [self initWithPath: firstComponent
arguments: arguments];
va_end(arguments);
return ret;
}
- initWithPath: (OFString*)firstComponent
arguments: (va_list)arguments
{
Class c = [self class];
[self release];
@throw [OFNotImplementedException exceptionWithClass: c
selector: _cmd];
}
- initWithContentsOfFile: (OFString*)path
{
return [self initWithContentsOfFile: path
encoding: OF_STRING_ENCODING_UTF_8];
}
- initWithContentsOfFile: (OFString*)path
encoding: (of_string_encoding_t)encoding
{
char *tmp;
struct stat st;
@try {
OFFile *file;
if (stat([path cStringWithEncoding: OF_STRING_ENCODING_NATIVE],
&st) == -1)
@throw [OFOpenFileFailedException
exceptionWithClass: [self class]
path: path
mode: @"rb"];
if (st.st_size > SIZE_MAX)
@throw [OFOutOfRangeException
exceptionWithClass: [self class]];
file = [[OFFile alloc] initWithPath: path
mode: @"rb"];
@try {
tmp = [self allocMemoryWithSize: (size_t)st.st_size];
[file readIntoBuffer: tmp
exactLength: (size_t)st.st_size];
} @finally {
[file release];
}
} @catch (id e) {
[self release];
@throw e;
}
self = [self initWithCString: tmp
encoding: encoding
length: (size_t)st.st_size];
[self freeMemory: tmp];
return self;
}
- initWithContentsOfURL: (OFURL*)URL
{
return [self initWithContentsOfURL: URL
encoding: OF_STRING_ENCODING_AUTODETECT];
}
- initWithContentsOfURL: (OFURL*)URL
encoding: (of_string_encoding_t)encoding
{
void *pool;
OFHTTPRequest *request;
OFHTTPRequestResult *result;
OFString *contentType;
Class c;
c = [self class];
[self release];
pool = objc_autoreleasePoolPush();
if ([[URL scheme] isEqual: @"file"]) {
if (encoding == OF_STRING_ENCODING_AUTODETECT)
encoding = OF_STRING_ENCODING_UTF_8;
self = [[c alloc] initWithContentsOfFile: [URL path]
encoding: encoding];
objc_autoreleasePoolPop(pool);
return self;
}
request = [OFHTTPRequest requestWithURL: URL];
result = [request perform];
if ([result statusCode] != 200)
@throw [OFHTTPRequestFailedException
exceptionWithClass: [request class]
request: request
result: result];
if (encoding == OF_STRING_ENCODING_AUTODETECT &&
(contentType = [[result headers] objectForKey: @"Content-Type"])) {
contentType = [contentType lowercaseString];
if ([contentType hasSuffix: @"charset=utf-8"])
encoding = OF_STRING_ENCODING_UTF_8;
if ([contentType hasSuffix: @"charset=iso-8859-1"])
encoding = OF_STRING_ENCODING_ISO_8859_1;
if ([contentType hasSuffix: @"charset=iso-8859-15"])
encoding = OF_STRING_ENCODING_ISO_8859_15;
if ([contentType hasSuffix: @"charset=windows-1252"])
encoding = OF_STRING_ENCODING_WINDOWS_1252;
}
if (encoding == OF_STRING_ENCODING_AUTODETECT)
encoding = OF_STRING_ENCODING_UTF_8;
self = [[c alloc] initWithCString: (char*)[[result data] cArray]
encoding: encoding
length: [[result data] count]];
objc_autoreleasePoolPop(pool);
return self;
}
- initWithSerialization: (OFXMLElement*)element
{
@try {
void *pool = objc_autoreleasePoolPush();
if (![[element namespace] isEqual: OF_SERIALIZATION_NS])
@throw [OFInvalidArgumentException
exceptionWithClass: [self class]
selector: _cmd];
if ([self isKindOfClass: [OFMutableString class]]) {
if (![[element name] isEqual: @"OFMutableString"])
@throw [OFInvalidArgumentException
exceptionWithClass: [self class]
selector: _cmd];
} else {
if (![[element name] isEqual: @"OFString"])
@throw [OFInvalidArgumentException
exceptionWithClass: [self class]
selector: _cmd];
}
self = [self initWithString: [element stringValue]];
objc_autoreleasePoolPop(pool);
} @catch (id e) {
[self release];
@throw e;
}
return self;
}
- (const char*)UTF8String
{
const of_unichar_t *unicodeString = [self unicodeString];
char *UTF8String;
size_t i, j = 0, length = [self length];
size_t UTF8StringLength = length;
OFObject *object;
object = [[[OFObject alloc] init] autorelease];
UTF8String = [object allocMemoryWithSize: (length * 4) + 1];
for (i = 0; i < length; i++) {
char buffer[4];
size_t len = of_string_utf8_encode(unicodeString[i], buffer);
switch (len) {
case 1:
UTF8String[j++] = buffer[0];
break;
case 2:
UTF8StringLength++;
memcpy(UTF8String + j, buffer, 2);
j += 2;
break;
case 3:
UTF8StringLength += 2;
memcpy(UTF8String + j, buffer, 3);
j += 3;
break;
case 4:
UTF8StringLength += 3;
memcpy(UTF8String + j, buffer, 4);
j += 4;
break;
default:
@throw [OFInvalidEncodingException
exceptionWithClass: [self class]];
}
}
UTF8String[j] = '\0';
@try {
UTF8String = [object resizeMemory: UTF8String
size: UTF8StringLength + 1];
} @catch (OFOutOfMemoryException *e) {
/* We don't care, as we only tried to make it smaller */
}
return UTF8String;
}
- (const char*)cStringWithEncoding: (of_string_encoding_t)encoding
{
if (encoding == OF_STRING_ENCODING_UTF_8)
return [self UTF8String];
/* TODO: Implement! */
@throw [OFNotImplementedException exceptionWithClass: [self class]
selector: _cmd];
}
- (size_t)length
{
@throw [OFNotImplementedException exceptionWithClass: [self class]
selector: _cmd];
}
- (size_t)UTF8StringLength
{
const of_unichar_t *unicodeString = [self unicodeString];
size_t length = [self length];
size_t i, UTF8StringLength = 0;
for (i = 0; i < length; i++) {
char buffer[4];
size_t len = of_string_utf8_encode(unicodeString[i], buffer);
if (len == 0)
@throw [OFInvalidEncodingException
exceptionWithClass: [self class]];
UTF8StringLength += len;
}
return UTF8StringLength;
}
- (size_t)cStringLengthWithEncoding: (of_string_encoding_t)encoding
{
if (encoding == OF_STRING_ENCODING_UTF_8)
return [self UTF8StringLength];
/* TODO: Implement! */
@throw [OFNotImplementedException exceptionWithClass: [self class]
selector: _cmd];
}
- (of_unichar_t)characterAtIndex: (size_t)index
{
@throw [OFNotImplementedException exceptionWithClass: [self class]
selector: _cmd];
}
- (void)getCharacters: (of_unichar_t*)buffer
inRange: (of_range_t)range
{
size_t i;
for (i = 0; i < range.length; i++)
buffer[i] = [self characterAtIndex: range.location + i];
}
- (BOOL)isEqual: (id)object
{
void *pool;
OFString *otherString;
const of_unichar_t *unicodeString, *otherUnicodeString;
size_t length;
if (object == self)
return YES;
if (![object isKindOfClass: [OFString class]])
return NO;
otherString = object;
length = [self length];
if ([otherString length] != length)
return NO;
pool = objc_autoreleasePoolPush();
unicodeString = [self unicodeString];
otherUnicodeString = [otherString unicodeString];
if (memcmp(unicodeString, otherUnicodeString,
length * sizeof(of_unichar_t))) {
objc_autoreleasePoolPop(pool);
return NO;
}
objc_autoreleasePoolPop(pool);
return YES;
}
- copy
{
return [self retain];
}
- mutableCopy
{
return [[OFMutableString alloc] initWithString: self];
}
- (of_comparison_result_t)compare: (id <OFComparing>)object
{
void *pool;
OFString *otherString;
const of_unichar_t *unicodeString, *otherUnicodeString;
size_t i, minimumLength;
if (object == self)
return OF_ORDERED_SAME;
if (![object isKindOfClass: [OFString class]])
@throw [OFInvalidArgumentException
exceptionWithClass: [self class]
selector: _cmd];
otherString = (OFString*)object;
minimumLength = ([self length] > [otherString length]
? [otherString length] : [self length]);
pool = objc_autoreleasePoolPush();
unicodeString = [self unicodeString];
otherUnicodeString = [otherString unicodeString];
for (i = 0; i < minimumLength; i++) {
if (unicodeString[i] > otherUnicodeString[i]) {
objc_autoreleasePoolPop(pool);
return OF_ORDERED_DESCENDING;
}
if (unicodeString[i] < otherUnicodeString[i]) {
objc_autoreleasePoolPop(pool);
return OF_ORDERED_ASCENDING;
}
}
objc_autoreleasePoolPop(pool);
if ([self length] > [otherString length])
return OF_ORDERED_DESCENDING;
if ([self length] < [otherString length])
return OF_ORDERED_ASCENDING;
return OF_ORDERED_SAME;
}
- (of_comparison_result_t)caseInsensitiveCompare: (OFString*)otherString
{
void *pool = objc_autoreleasePoolPush();
const of_unichar_t *string, *otherUnicodeString;
size_t i, length, otherLength, minimumLength;
if (otherString == self)
return OF_ORDERED_SAME;
string = [self unicodeString];
otherUnicodeString = [otherString unicodeString];
length = [self length];
otherLength = [otherString length];
minimumLength = (length > otherLength ? otherLength : length);
for (i = 0; i < minimumLength; i++) {
of_unichar_t c = string[i];
of_unichar_t oc = otherUnicodeString[i];
if (c >> 8 < OF_UNICODE_CASEFOLDING_TABLE_SIZE) {
of_unichar_t tc =
of_unicode_casefolding_table[c >> 8][c & 0xFF];
if (tc)
c = tc;
}
if (oc >> 8 < OF_UNICODE_CASEFOLDING_TABLE_SIZE) {
of_unichar_t tc =
of_unicode_casefolding_table[oc >> 8][oc & 0xFF];
if (tc)
oc = tc;
}
if (c > oc) {
objc_autoreleasePoolPop(pool);
return OF_ORDERED_DESCENDING;
}
if (c < oc) {
objc_autoreleasePoolPop(pool);
return OF_ORDERED_ASCENDING;
}
}
objc_autoreleasePoolPop(pool);
if (length > otherLength)
return OF_ORDERED_DESCENDING;
if (length < otherLength)
return OF_ORDERED_ASCENDING;
return OF_ORDERED_SAME;
}
- (uint32_t)hash
{
const of_unichar_t *unicodeString = [self unicodeString];
size_t i, length = [self length];
uint32_t hash;
OF_HASH_INIT(hash);
for (i = 0; i < length; i++) {
const of_unichar_t c = unicodeString[i];
OF_HASH_ADD(hash, (c & 0xFF0000) >> 16);
OF_HASH_ADD(hash, (c & 0x00FF00) >> 8);
OF_HASH_ADD(hash, c & 0x0000FF);
}
OF_HASH_FINALIZE(hash);
return hash;
}
- (OFString*)description
{
return [[self copy] autorelease];
}
- (OFXMLElement*)XMLElementBySerializing
{
void *pool = objc_autoreleasePoolPush();
OFXMLElement *element;
OFString *className;
if ([self isKindOfClass: [OFMutableString class]])
className = @"OFMutableString";
else
className = @"OFString";
element = [OFXMLElement elementWithName: className
namespace: OF_SERIALIZATION_NS
stringValue: self];
[element retain];
objc_autoreleasePoolPop(pool);
return [element autorelease];
}
- (OFString*)JSONRepresentation
{
OFMutableString *JSON = [[self mutableCopy] autorelease];
/* FIXME: This is slow! Write it in pure C! */
[JSON replaceOccurrencesOfString: @"\\"
withString: @"\\\\"];
[JSON replaceOccurrencesOfString: @"\""
withString: @"\\\""];
[JSON replaceOccurrencesOfString: @"\b"
withString: @"\\b"];
[JSON replaceOccurrencesOfString: @"\f"
withString: @"\\f"];
[JSON replaceOccurrencesOfString: @"\n"
withString: @"\\n"];
[JSON replaceOccurrencesOfString: @"\r"
withString: @"\\r"];
[JSON replaceOccurrencesOfString: @"\t"
withString: @"\\t"];
[JSON prependString: @"\""];
[JSON appendString: @"\""];
[JSON makeImmutable];
return JSON;
}
- (of_range_t)rangeOfString: (OFString*)string
{
return [self rangeOfString: string
options: 0
range: of_range(0, [self length])];
}
- (of_range_t)rangeOfString: (OFString*)string
options: (of_string_search_options_t)options
{
return [self rangeOfString: string
options: options
range: of_range(0, [self length])];
}
- (of_range_t)rangeOfString: (OFString*)string
options: (of_string_search_options_t)options
range: (of_range_t)range
{
void *pool;
const of_unichar_t *searchString;
of_unichar_t *unicodeString;
size_t i, searchLength;
if ((searchLength = [string length]) == 0)
return of_range(0, 0);
if (searchLength > range.length)
return of_range(OF_INVALID_INDEX, 0);
if (range.length > SIZE_MAX / sizeof(of_unichar_t))
@throw [OFOutOfRangeException exceptionWithClass: [self class]];
pool = objc_autoreleasePoolPush();
searchString = [string unicodeString];
unicodeString = malloc(range.length * sizeof(of_unichar_t));
if (unicodeString == NULL)
@throw [OFOutOfMemoryException
exceptionWithClass: [self class]
requestedSize: range.length * sizeof(of_unichar_t)];
@try {
[self getCharacters: unicodeString
inRange: range];
if (options & OF_STRING_SEARCH_BACKWARDS) {
for (i = range.length - searchLength;; i--) {
if (!memcmp(unicodeString + i, searchString,
searchLength * sizeof(of_unichar_t))) {
objc_autoreleasePoolPop(pool);
return of_range(range.location + i,
searchLength);
}
/* No match and we're at the last character */
if (i == 0)
break;
}
} else {
for (i = 0; i <= range.length - searchLength; i++) {
if (!memcmp(unicodeString + i, searchString,
searchLength * sizeof(of_unichar_t))) {
objc_autoreleasePoolPop(pool);
return of_range(range.location + i,
searchLength);
}
}
}
} @finally {
free(unicodeString);
}
objc_autoreleasePoolPop(pool);
return of_range(OF_INVALID_INDEX, 0);
}
- (BOOL)containsString: (OFString*)string
{
void *pool;
const of_unichar_t *unicodeString, *searchString;
size_t i, length, searchLength;
if ((searchLength = [string length]) == 0)
return YES;
if (searchLength > (length = [self length]))
return NO;
pool = objc_autoreleasePoolPush();
unicodeString = [self unicodeString];
searchString = [string unicodeString];
for (i = 0; i <= length - searchLength; i++) {
if (!memcmp(unicodeString + i, searchString,
searchLength * sizeof(of_unichar_t))) {
objc_autoreleasePoolPop(pool);
return YES;
}
}
objc_autoreleasePoolPop(pool);
return NO;
}
- (OFString*)substringWithRange: (of_range_t)range
{
void *pool;
OFString *ret;
if (range.location + range.length > [self length])
@throw [OFOutOfRangeException
exceptionWithClass: [self class]];
pool = objc_autoreleasePoolPush();
ret = [[OFString alloc]
initWithUnicodeString: [self unicodeString] + range.location
length: range.length];
objc_autoreleasePoolPop(pool);
return [ret autorelease];
}
- (OFString*)stringByAppendingString: (OFString*)string
{
OFMutableString *new;
new = [OFMutableString stringWithString: self];
[new appendString: string];
[new makeImmutable];
return new;
}
- (OFString*)stringByAppendingPathComponent: (OFString*)component
{
return [OFString stringWithPath: self, component, nil];
}
- (OFString*)stringByPrependingString: (OFString*)string
{
OFMutableString *new = [[string mutableCopy] autorelease];
[new appendString: self];
[new makeImmutable];
return new;
}
- (OFString*)stringByReplacingOccurrencesOfString: (OFString*)string
withString: (OFString*)replacement
{
OFMutableString *new = [[self mutableCopy] autorelease];
[new replaceOccurrencesOfString: string
withString: replacement];
[new makeImmutable];
return new;
}
- (OFString*)stringByReplacingOccurrencesOfString: (OFString*)string
withString: (OFString*)replacement
inRange: (of_range_t)range
{
OFMutableString *new = [[self mutableCopy] autorelease];
[new replaceOccurrencesOfString: string
withString: replacement
inRange: range];
[new makeImmutable];
return new;
}
- (OFString*)uppercaseString
{
OFMutableString *new = [[self mutableCopy] autorelease];
[new uppercase];
[new makeImmutable];
return new;
}
- (OFString*)lowercaseString
{
OFMutableString *new = [[self mutableCopy] autorelease];
[new lowercase];
[new makeImmutable];
return new;
}
- (OFString*)capitalizedString
{
OFMutableString *new = [[self mutableCopy] autorelease];
[new capitalize];
[new makeImmutable];
return new;
}
- (OFString*)stringByDeletingLeadingWhitespaces
{
OFMutableString *new = [[self mutableCopy] autorelease];
[new deleteLeadingWhitespaces];
[new makeImmutable];
return new;
}
- (OFString*)stringByDeletingTrailingWhitespaces
{
OFMutableString *new = [[self mutableCopy] autorelease];
[new deleteTrailingWhitespaces];
[new makeImmutable];
return new;
}
- (OFString*)stringByDeletingEnclosingWhitespaces
{
OFMutableString *new = [[self mutableCopy] autorelease];
[new deleteEnclosingWhitespaces];
[new makeImmutable];
return new;
}
- (BOOL)hasPrefix: (OFString*)prefix
{
of_unichar_t *tmp;
const of_unichar_t *prefixString;
size_t prefixLength;
int compare;
if ((prefixLength = [prefix length]) > [self length])
return NO;
tmp = [self allocMemoryWithSize: sizeof(of_unichar_t)
count: prefixLength];
@try {
void *pool = objc_autoreleasePoolPush();
[self getCharacters: tmp
inRange: of_range(0, prefixLength)];
prefixString = [prefix unicodeString];
compare = memcmp(tmp, prefixString,
prefixLength * sizeof(of_unichar_t));
objc_autoreleasePoolPop(pool);
} @finally {
[self freeMemory: tmp];
}
return !compare;
}
- (BOOL)hasSuffix: (OFString*)suffix
{
of_unichar_t *tmp;
const of_unichar_t *suffixString;
size_t length, suffixLength;
int compare;
if ((suffixLength = [suffix length]) > [self length])
return NO;
length = [self length];
tmp = [self allocMemoryWithSize: sizeof(of_unichar_t)
count: suffixLength];
@try {
void *pool = objc_autoreleasePoolPush();
[self getCharacters: tmp
inRange: of_range(length - suffixLength,
suffixLength)];
suffixString = [suffix unicodeString];
compare = memcmp(tmp, suffixString,
suffixLength * sizeof(of_unichar_t));
objc_autoreleasePoolPop(pool);
} @finally {
[self freeMemory: tmp];
}
return !compare;
}
- (OFArray*)componentsSeparatedByString: (OFString*)delimiter
{
return [self componentsSeparatedByString: delimiter
skipEmpty: NO];
}
- (OFArray*)componentsSeparatedByString: (OFString*)delimiter
skipEmpty: (BOOL)skipEmpty
{
void *pool;
OFMutableArray *array = [OFMutableArray array];
const of_unichar_t *string, *delimiterString;
size_t length = [self length];
size_t delimiterLength = [delimiter length];
size_t i, last;
OFString *component;
pool = objc_autoreleasePoolPush();
string = [self unicodeString];
delimiterString = [delimiter unicodeString];
if (delimiterLength > length) {
[array addObject: [[self copy] autorelease]];
[array makeImmutable];
objc_autoreleasePoolPop(pool);
return array;
}
for (i = 0, last = 0; i <= length - delimiterLength; i++) {
if (memcmp(string + i, delimiterString,
delimiterLength * sizeof(of_unichar_t)))
continue;
component = [self substringWithRange: of_range(last, i - last)];
if (!skipEmpty || ![component isEqual: @""])
[array addObject: component];
i += delimiterLength - 1;
last = i + 1;
}
component = [self substringWithRange: of_range(last, length - last)];
if (!skipEmpty || ![component isEqual: @""])
[array addObject: component];
[array makeImmutable];
objc_autoreleasePoolPop(pool);
return array;
}
- (OFArray*)pathComponents
{
OFMutableArray *ret;
void *pool;
const of_unichar_t *string;
size_t i, last = 0, length = [self length];
ret = [OFMutableArray array];
if (length == 0)
return ret;
pool = objc_autoreleasePoolPush();
string = [self unicodeString];
#ifndef _WIN32
if (string[length - 1] == OF_PATH_DELIMITER)
#else
if (string[length - 1] == '/' || string[length - 1] == '\\')
#endif
length--;
for (i = 0; i < length; i++) {
#ifndef _WIN32
if (string[i] == OF_PATH_DELIMITER) {
#else
if (string[i] == '/' || string[i] == '\\') {
#endif
[ret addObject: [self substringWithRange:
of_range(last, i - last)]];
last = i + 1;
}
}
[ret addObject: [self substringWithRange: of_range(last, i - last)]];
[ret makeImmutable];
objc_autoreleasePoolPop(pool);
return ret;
}
- (OFString*)lastPathComponent
{
void *pool;
const of_unichar_t *string;
size_t length = [self length];
ssize_t i;
if (length == 0)
return @"";
pool = objc_autoreleasePoolPush();
string = [self unicodeString];
#ifndef _WIN32
if (string[length - 1] == OF_PATH_DELIMITER)
#else
if (string[length - 1] == '/' || string[length - 1] == '\\')
#endif
length--;
for (i = length - 1; i >= 0; i--) {
#ifndef _WIN32
if (string[i] == OF_PATH_DELIMITER) {
#else
if (string[i] == '/' || string[i] == '\\') {
#endif
i++;
break;
}
}
objc_autoreleasePoolPop(pool);
/*
* Only one component, but the trailing delimiter might have been
* removed, so return a new string anyway.
*/
if (i < 0)
i = 0;
return [self substringWithRange: of_range(i, length - i)];
}
- (OFString*)stringByDeletingLastPathComponent
{
void *pool;
const of_unichar_t *string;
size_t i, length = [self length];
if (length == 0)
return @"";
pool = objc_autoreleasePoolPush();
string = [self unicodeString];
#ifndef _WIN32
if (string[length - 1] == OF_PATH_DELIMITER)
#else
if (string[length - 1] == '/' || string[length - 1] == '\\')
#endif
length--;
if (length == 0) {
objc_autoreleasePoolPop(pool);
return [self substringWithRange: of_range(0, 1)];
}
for (i = length - 1; i >= 1; i--) {
#ifndef _WIN32
if (string[i] == OF_PATH_DELIMITER) {
#else
if (string[i] == '/' || string[i] == '\\') {
#endif
objc_autoreleasePoolPop(pool);
return [self substringWithRange: of_range(0, i)];
}
}
#ifndef _WIN32
if (string[0] == OF_PATH_DELIMITER) {
#else
if (string[0] == '/' || string[0] == '\\') {
#endif
objc_autoreleasePoolPop(pool);
return [self substringWithRange: of_range(0, 1)];
}
objc_autoreleasePoolPop(pool);
return @".";
}
- (intmax_t)decimalValue
{
void *pool = objc_autoreleasePoolPush();
const of_unichar_t *string = [self unicodeString];
size_t length = [self length];
int i = 0;
intmax_t value = 0;
BOOL expectWhitespace = NO;
while (*string == ' ' || *string == '\t' || *string == '\n' ||
*string == '\r' || *string == '\f') {
string++;
length--;
}
if (length == 0) {
objc_autoreleasePoolPop(pool);
return 0;
}
if (string[0] == '-' || string[0] == '+')
i++;
for (; i < length; i++) {
if (expectWhitespace) {
if (string[i] != ' ' && string[i] != '\t' &&
string[i] != '\n' && string[i] != '\r' &&
string[i] != '\f')
@throw [OFInvalidFormatException
exceptionWithClass: [self class]];
continue;
}
if (string[i] >= '0' && string[i] <= '9') {
if (INTMAX_MAX / 10 < value ||
INTMAX_MAX - value * 10 < string[i] - '0')
@throw [OFOutOfRangeException
exceptionWithClass: [self class]];
value = (value * 10) + (string[i] - '0');
} else if (string[i] == ' ' || string[i] == '\t' ||
string[i] == '\n' || string[i] == '\r' ||
string[i] == '\f')
expectWhitespace = YES;
else
@throw [OFInvalidFormatException
exceptionWithClass: [self class]];
}
if (string[0] == '-')
value *= -1;
objc_autoreleasePoolPop(pool);
return value;
}
- (uintmax_t)hexadecimalValue
{
void *pool = objc_autoreleasePoolPush();
const of_unichar_t *string = [self unicodeString];
size_t length = [self length];
int i = 0;
uintmax_t value = 0;
BOOL expectWhitespace = NO, foundValue = NO;
while (*string == ' ' || *string == '\t' || *string == '\n' ||
*string == '\r' || *string == '\f') {
string++;
length--;
}
if (length == 0) {
objc_autoreleasePoolPop(pool);
return 0;
}
if (length >= 2 && string[0] == '0' && string[1] == 'x')
i = 2;
else if (length >= 1 && (string[0] == 'x' || string[0] == '$'))
i = 1;
for (; i < length; i++) {
uintmax_t newValue;
if (expectWhitespace) {
if (string[i] != ' ' && string[i] != '\t' &&
string[i] != '\n' && string[i] != '\r' &&
string[i] != '\f')
@throw [OFInvalidFormatException
exceptionWithClass: [self class]];
continue;
}
if (string[i] >= '0' && string[i] <= '9') {
newValue = (value << 4) | (string[i] - '0');
foundValue = YES;
} else if (string[i] >= 'A' && string[i] <= 'F') {
newValue = (value << 4) | (string[i] - 'A' + 10);
foundValue = YES;
} else if (string[i] >= 'a' && string[i] <= 'f') {
newValue = (value << 4) | (string[i] - 'a' + 10);
foundValue = YES;
} else if (string[i] == 'h' || string[i] == ' ' ||
string[i] == '\t' || string[i] == '\n' ||
string[i] == '\r' || string[i] == '\f') {
expectWhitespace = YES;
continue;
} else
@throw [OFInvalidFormatException
exceptionWithClass: [self class]];
if (newValue < value)
@throw [OFOutOfRangeException
exceptionWithClass: [self class]];
value = newValue;
}
if (!foundValue)
@throw [OFInvalidFormatException
exceptionWithClass: [self class]];
objc_autoreleasePoolPop(pool);
return value;
}
- (float)floatValue
{
void *pool = objc_autoreleasePoolPush();
const char *cString = [self UTF8String];
char *endPointer = NULL;
float value;
while (*cString == ' ' || *cString == '\t' || *cString == '\n' ||
*cString == '\r' || *cString == '\f')
cString++;
value = strtof(cString, &endPointer);
/* Check if there are any invalid chars left */
if (endPointer != NULL)
for (; *endPointer != '\0'; endPointer++)
if (*endPointer != ' ' && *endPointer != '\t' &&
*endPointer != '\n' && *endPointer != '\r' &&
*endPointer != '\f')
@throw [OFInvalidFormatException
exceptionWithClass: [self class]];
objc_autoreleasePoolPop(pool);
return value;
}
- (double)doubleValue
{
void *pool = objc_autoreleasePoolPush();
const char *cString = [self UTF8String];
char *endPointer = NULL;
double value;
while (*cString == ' ' || *cString == '\t' || *cString == '\n' ||
*cString == '\r' || *cString == '\f')
cString++;
value = strtod(cString, &endPointer);
/* Check if there are any invalid chars left */
if (endPointer != NULL)
for (; *endPointer != '\0'; endPointer++)
if (*endPointer != ' ' && *endPointer != '\t' &&
*endPointer != '\n' && *endPointer != '\r' &&
*endPointer != '\f')
@throw [OFInvalidFormatException
exceptionWithClass: [self class]];
objc_autoreleasePoolPop(pool);
return value;
}
- (const of_unichar_t*)unicodeString
{
OFObject *object = [[[OFObject alloc] init] autorelease];
size_t length = [self length];
of_unichar_t *ret;
ret = [object allocMemoryWithSize: sizeof(of_unichar_t)
count: length + 1];
[self getCharacters: ret
inRange: of_range(0, length)];
ret[length] = 0;
return ret;
}
- (const uint16_t*)UTF16String
{
OFObject *object = [[[OFObject alloc] init] autorelease];
void *pool = objc_autoreleasePoolPush();
const of_unichar_t *unicodeString = [self unicodeString];
size_t length = [self length];
uint16_t *ret;
size_t i, j;
/* Allocate memory for the worst case */
ret = [object allocMemoryWithSize: sizeof(uint16_t)
count: length * 2 + 1];
j = 0;
for (i = 0; i < length; i++) {
of_unichar_t c = unicodeString[i];
if (c > 0x10FFFF)
@throw [OFInvalidEncodingException
exceptionWithClass: [self class]];
if (c > 0xFFFF) {
c -= 0x10000;
ret[j++] = OF_BSWAP16_IF_LE(0xD800 | (c >> 10));
ret[j++] = OF_BSWAP16_IF_LE(0xDC00 | (c & 0x3FF));
} else
ret[j++] = OF_BSWAP16_IF_LE(c);
}
ret[j] = 0;
@try {
ret = [object resizeMemory: ret
size: sizeof(uint16_t)
count: j + 1];
} @catch (OFOutOfMemoryException *e) {
/* We don't care, as we only tried to make it smaller */
}
objc_autoreleasePoolPop(pool);
return ret;
}
- (void)writeToFile: (OFString*)path
{
void *pool = objc_autoreleasePoolPush();
OFFile *file;
file = [OFFile fileWithPath: path
mode: @"wb"];
[file writeString: self];
objc_autoreleasePoolPop(pool);
}
#ifdef OF_HAVE_BLOCKS
- (void)enumerateLinesUsingBlock: (of_string_line_enumeration_block_t)block
{
void *pool = objc_autoreleasePoolPush();
const of_unichar_t *string = [self unicodeString];
size_t i, last = 0, length = [self length];
BOOL stop = NO, lastCarriageReturn = NO;
for (i = 0; i < length && !stop; i++) {
if (lastCarriageReturn && string[i] == '\n') {
lastCarriageReturn = NO;
last++;
continue;
}
if (string[i] == '\n' || string[i] == '\r') {
void *pool2 = objc_autoreleasePoolPush();
block([self substringWithRange:
of_range(last, i - last)], &stop);
last = i + 1;
objc_autoreleasePoolPop(pool2);
}
lastCarriageReturn = (string[i] == '\r');
}
if (!stop)
block([self substringWithRange: of_range(last, i - last)],
&stop);
objc_autoreleasePoolPop(pool);
}
#endif
@end