| /* |
| * Copyright (C) 2005 Apple Computer, Inc. All rights reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * |
| * 1. Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * 2. Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution. |
| * 3. Neither the name of Apple Computer, Inc. ("Apple") nor the names of |
| * its contributors may be used to endorse or promote products derived |
| * from this software without specific prior written permission. |
| * |
| * THIS SOFTWARE IS PROVIDED BY APPLE AND ITS CONTRIBUTORS "AS IS" AND ANY |
| * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED |
| * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE |
| * DISCLAIMED. IN NO EVENT SHALL APPLE OR ITS CONTRIBUTORS BE LIABLE FOR ANY |
| * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES |
| * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; |
| * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND |
| * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
| * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| */ |
| |
| #include "config.h" |
| #include "UserObjectImp.h" |
| #include <JavaScriptCore/PropertyNameArray.h> |
| |
| const ClassInfo UserObjectImp::info = { "UserObject", 0, 0 }; |
| |
| UserObjectImp::UserObjectImp(JSUserObject* userObject) |
| : fJSUserObject((JSUserObject*)userObject->Retain()) |
| { |
| } |
| |
| UserObjectImp::~UserObjectImp() |
| { |
| if (fJSUserObject) |
| fJSUserObject->Release(); |
| } |
| |
| const ClassInfo * UserObjectImp::classInfo() const |
| { |
| return &info; |
| } |
| |
| bool UserObjectImp::implementsCall() const |
| { |
| return fJSUserObject ? fJSUserObject->ImplementsCall() : false; |
| } |
| |
| JSValue *UserObjectImp::callAsFunction(ExecState *exec, JSObject *thisObj, const List &args) |
| { |
| JSValue *result = jsUndefined(); |
| JSUserObject* jsThisObj = KJSValueToJSObject(thisObj, exec); |
| if (jsThisObj) { |
| CFIndex argCount = args.size(); |
| CFArrayCallBacks arrayCallBacks; |
| JSTypeGetCFArrayCallBacks(&arrayCallBacks); |
| CFMutableArrayRef jsArgs = CFArrayCreateMutable(0, 0, &arrayCallBacks); |
| if (jsArgs) { |
| for (CFIndex i = 0; i < argCount; i++) { |
| JSUserObject* jsArg = KJSValueToJSObject(args[i], exec); |
| CFArrayAppendValue(jsArgs, (void*)jsArg); |
| jsArg->Release(); |
| } |
| } |
| |
| JSUserObject* jsResult; |
| { // scope |
| JSLock::DropAllLocks dropLocks; |
| |
| // implementsCall should have guarded against a NULL fJSUserObject. |
| assert(fJSUserObject); |
| jsResult = fJSUserObject->CallFunction(jsThisObj, jsArgs); |
| } |
| |
| if (jsResult) { |
| result = JSObjectKJSValue(jsResult); |
| jsResult->Release(); |
| } |
| |
| ReleaseCFType(jsArgs); |
| jsThisObj->Release(); |
| } |
| return result; |
| } |
| |
| |
| void UserObjectImp::getPropertyNames(ExecState *exec, PropertyNameArray& propertyNames) |
| { |
| JSUserObject* ptr = GetJSUserObject(); |
| if (ptr) { |
| CFArrayRef cfPropertyNames = ptr->CopyPropertyNames(); |
| if (cfPropertyNames) { |
| CFIndex count = CFArrayGetCount(cfPropertyNames); |
| CFIndex i; |
| for (i = 0; i < count; i++) { |
| CFStringRef propertyName = (CFStringRef)CFArrayGetValueAtIndex(cfPropertyNames, i); |
| propertyNames.add(CFStringToIdentifier(propertyName)); |
| } |
| CFRelease(cfPropertyNames); |
| } |
| } |
| JSObject::getPropertyNames(exec, propertyNames); |
| } |
| |
| JSValue *UserObjectImp::userObjectGetter(ExecState *, JSObject *, const Identifier& propertyName, const PropertySlot& slot) |
| { |
| UserObjectImp *thisObj = static_cast<UserObjectImp *>(slot.slotBase()); |
| // getOwnPropertySlot should have guarded against a null fJSUserObject. |
| assert(thisObj->fJSUserObject); |
| |
| CFStringRef cfPropName = IdentifierToCFString(propertyName); |
| JSUserObject *jsResult = thisObj->fJSUserObject->CopyProperty(cfPropName); |
| ReleaseCFType(cfPropName); |
| JSValue *result = JSObjectKJSValue(jsResult); |
| jsResult->Release(); |
| |
| return result; |
| } |
| |
| bool UserObjectImp::getOwnPropertySlot(ExecState *exec, const Identifier& propertyName, PropertySlot& slot) |
| { |
| if (!fJSUserObject) |
| return false; |
| |
| CFStringRef cfPropName = IdentifierToCFString(propertyName); |
| JSUserObject *jsResult = fJSUserObject->CopyProperty(cfPropName); |
| ReleaseCFType(cfPropName); |
| if (jsResult) { |
| slot.setCustom(this, userObjectGetter); |
| jsResult->Release(); |
| return true; |
| } else { |
| JSValue *kjsValue = toPrimitive(exec); |
| if (kjsValue->type() != NullType && kjsValue->type() != UndefinedType) { |
| JSObject *kjsObject = kjsValue->toObject(exec); |
| if (kjsObject->getPropertySlot(exec, propertyName, slot)) |
| return true; |
| } |
| } |
| return JSObject::getOwnPropertySlot(exec, propertyName, slot); |
| } |
| |
| void UserObjectImp::put(ExecState *exec, const Identifier &propertyName, JSValue *value, int attr) |
| { |
| if (!fJSUserObject) |
| return; |
| |
| CFStringRef cfPropName = IdentifierToCFString(propertyName); |
| JSUserObject *jsValueObj = KJSValueToJSObject(value, exec); |
| |
| fJSUserObject->SetProperty(cfPropName, jsValueObj); |
| |
| if (jsValueObj) jsValueObj->Release(); |
| ReleaseCFType(cfPropName); |
| } |
| |
| JSUserObject* UserObjectImp::GetJSUserObject() const |
| { |
| return fJSUserObject; |
| } |
| |
| JSValue *UserObjectImp::toPrimitive(ExecState *exec, JSType preferredType) const |
| { |
| JSValue *result = jsUndefined(); |
| JSUserObject* jsObjPtr = KJSValueToJSObject(toObject(exec), exec); |
| CFTypeRef cfValue = jsObjPtr ? jsObjPtr->CopyCFValue() : 0; |
| if (cfValue) { |
| CFTypeID cfType = CFGetTypeID(cfValue); // toPrimitive |
| if (cfValue == GetCFNull()) { |
| result = jsNull(); |
| } |
| else if (cfType == CFBooleanGetTypeID()) { |
| if (cfValue == kCFBooleanTrue) { |
| result = jsBoolean(true); |
| } else { |
| result = jsBoolean(false); |
| } |
| } else if (cfType == CFStringGetTypeID()) { |
| result = jsString(CFStringToUString((CFStringRef)cfValue)); |
| } else if (cfType == CFNumberGetTypeID()) { |
| double d = 0.0; |
| CFNumberGetValue((CFNumberRef)cfValue, kCFNumberDoubleType, &d); |
| result = jsNumber(d); |
| } else if (cfType == CFURLGetTypeID()) { |
| CFURLRef absURL = CFURLCopyAbsoluteURL((CFURLRef)cfValue); |
| if (absURL) { |
| result = jsString(CFStringToUString(CFURLGetString(absURL))); |
| ReleaseCFType(absURL); |
| } |
| } |
| ReleaseCFType(cfValue); |
| } |
| if (jsObjPtr) |
| jsObjPtr->Release(); |
| return result; |
| } |
| |
| |
| bool UserObjectImp::toBoolean(ExecState *exec) const |
| { |
| bool result = false; |
| JSUserObject* jsObjPtr = KJSValueToJSObject(toObject(exec), exec); |
| CFTypeRef cfValue = jsObjPtr ? jsObjPtr->CopyCFValue() : 0; |
| if (cfValue) |
| { |
| CFTypeID cfType = CFGetTypeID(cfValue); // toPrimitive |
| if (cfValue == GetCFNull()) |
| { |
| // |
| } |
| else if (cfType == CFBooleanGetTypeID()) |
| { |
| if (cfValue == kCFBooleanTrue) |
| { |
| result = true; |
| } |
| } |
| else if (cfType == CFStringGetTypeID()) |
| { |
| if (CFStringGetLength((CFStringRef)cfValue)) |
| { |
| result = true; |
| } |
| } |
| else if (cfType == CFNumberGetTypeID()) |
| { |
| if (cfValue != kCFNumberNaN) |
| { |
| double d; |
| if (CFNumberGetValue((CFNumberRef)cfValue, kCFNumberDoubleType, &d)) |
| { |
| if (d != 0) |
| { |
| result = true; |
| } |
| } |
| } |
| } |
| else if (cfType == CFArrayGetTypeID()) |
| { |
| if (CFArrayGetCount((CFArrayRef)cfValue)) |
| { |
| result = true; |
| } |
| } |
| else if (cfType == CFDictionaryGetTypeID()) |
| { |
| if (CFDictionaryGetCount((CFDictionaryRef)cfValue)) |
| { |
| result = true; |
| } |
| } |
| else if (cfType == CFSetGetTypeID()) |
| { |
| if (CFSetGetCount((CFSetRef)cfValue)) |
| { |
| result = true; |
| } |
| } |
| else if (cfType == CFURLGetTypeID()) |
| { |
| CFURLRef absURL = CFURLCopyAbsoluteURL((CFURLRef)cfValue); |
| if (absURL) |
| { |
| CFStringRef cfStr = CFURLGetString(absURL); |
| if (cfStr && CFStringGetLength(cfStr)) |
| { |
| result = true; |
| } |
| ReleaseCFType(absURL); |
| } |
| } |
| } |
| if (jsObjPtr) jsObjPtr->Release(); |
| ReleaseCFType(cfValue); |
| return result; |
| } |
| |
| double UserObjectImp::toNumber(ExecState *exec) const |
| { |
| double result = 0; |
| JSUserObject* jsObjPtr = KJSValueToJSObject(toObject(exec), exec); |
| CFTypeRef cfValue = jsObjPtr ? jsObjPtr->CopyCFValue() : 0; |
| if (cfValue) |
| { |
| CFTypeID cfType = CFGetTypeID(cfValue); |
| |
| if (cfValue == GetCFNull()) |
| { |
| // |
| } |
| else if (cfType == CFBooleanGetTypeID()) |
| { |
| if (cfValue == kCFBooleanTrue) |
| { |
| result = 1; |
| } |
| } |
| else if (cfType == CFStringGetTypeID()) |
| { |
| result = CFStringGetDoubleValue((CFStringRef)cfValue); |
| } |
| else if (cfType == CFNumberGetTypeID()) |
| { |
| CFNumberGetValue((CFNumberRef)cfValue, kCFNumberDoubleType, &result); |
| } |
| } |
| ReleaseCFType(cfValue); |
| if (jsObjPtr) jsObjPtr->Release(); |
| return result; |
| } |
| |
| UString UserObjectImp::toString(ExecState *exec) const |
| { |
| UString result; |
| JSUserObject* jsObjPtr = KJSValueToJSObject(toObject(exec), exec); |
| CFTypeRef cfValue = jsObjPtr ? jsObjPtr->CopyCFValue() : 0; |
| if (cfValue) |
| { |
| CFTypeID cfType = CFGetTypeID(cfValue); |
| if (cfValue == GetCFNull()) |
| { |
| // |
| } |
| else if (cfType == CFBooleanGetTypeID()) |
| { |
| if (cfValue == kCFBooleanTrue) |
| { |
| result = "true"; |
| } |
| else |
| { |
| result = "false"; |
| } |
| } |
| else if (cfType == CFStringGetTypeID()) |
| { |
| result = CFStringToUString((CFStringRef)cfValue); |
| } |
| else if (cfType == CFNumberGetTypeID()) |
| { |
| if (cfValue == kCFNumberNaN) |
| { |
| result = "Nan"; |
| } |
| else if (CFNumberCompare(kCFNumberPositiveInfinity, (CFNumberRef)cfValue, 0) == 0) |
| { |
| result = "Infinity"; |
| } |
| else if (CFNumberCompare(kCFNumberNegativeInfinity, (CFNumberRef)cfValue, 0) == 0) |
| { |
| result = "-Infinity"; |
| } |
| else |
| { |
| CFStringRef cfNumStr; |
| double d = 0; |
| CFNumberGetValue((CFNumberRef)cfValue, kCFNumberDoubleType, &d); |
| if (CFNumberIsFloatType((CFNumberRef)cfValue)) |
| { |
| cfNumStr = CFStringCreateWithFormat(0, 0, CFSTR("%f"), d); |
| } |
| else |
| { |
| cfNumStr = CFStringCreateWithFormat(0, 0, CFSTR("%.0f"), d); |
| } |
| result = CFStringToUString(cfNumStr); |
| ReleaseCFType(cfNumStr); |
| } |
| } |
| else if (cfType == CFArrayGetTypeID()) |
| { |
| // |
| } |
| else if (cfType == CFDictionaryGetTypeID()) |
| { |
| // |
| } |
| else if (cfType == CFSetGetTypeID()) |
| { |
| // |
| } |
| else if (cfType == CFURLGetTypeID()) |
| { |
| CFURLRef absURL = CFURLCopyAbsoluteURL((CFURLRef)cfValue); |
| if (absURL) |
| { |
| CFStringRef cfStr = CFURLGetString(absURL); |
| if (cfStr) |
| { |
| result = CFStringToUString(cfStr); |
| } |
| ReleaseCFType(absURL); |
| } |
| } |
| } |
| ReleaseCFType(cfValue); |
| if (jsObjPtr) jsObjPtr->Release(); |
| return result; |
| } |
| |
| void UserObjectImp::mark() |
| { |
| JSObject::mark(); |
| if (fJSUserObject) |
| fJSUserObject->Mark(); |
| } |
