+++ /dev/null
-/*
- * Copyright (C) 2004, 2006 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.
- *
- * THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``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 COMPUTER, INC. OR
- * 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"
-
-#if ENABLE(NETSCAPE_API)
-
-#include "NP_jsobject.h"
-
-#include "JSGlobalObject.h"
-#include "PropertyNameArray.h"
-#include "SourceCode.h"
-#include "c_utility.h"
-#include "interpreter.h"
-#include "npruntime_impl.h"
-#include "npruntime_priv.h"
-#include "object.h"
-#include "runtime_root.h"
-
-using namespace KJS;
-using namespace KJS::Bindings;
-
-static void getListFromVariantArgs(ExecState* exec, const NPVariant* args, unsigned argCount, RootObject* rootObject, List& aList)
-{
- for (unsigned i = 0; i < argCount; i++)
- aList.append(convertNPVariantToValue(exec, &args[i], rootObject));
-}
-
-static NPObject* jsAllocate(NPP, NPClass*)
-{
- return (NPObject*)malloc(sizeof(JavaScriptObject));
-}
-
-static void jsDeallocate(NPObject* npObj)
-{
- JavaScriptObject* obj = (JavaScriptObject*)npObj;
-
- if (obj->rootObject && obj->rootObject->isValid())
- obj->rootObject->gcUnprotect(obj->imp);
-
- if (obj->rootObject)
- obj->rootObject->deref();
-
- free(obj);
-}
-
-static NPClass javascriptClass = { 1, jsAllocate, jsDeallocate, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
-static NPClass noScriptClass = { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
-
-NPClass* NPScriptObjectClass = &javascriptClass;
-static NPClass* NPNoScriptObjectClass = &noScriptClass;
-
-NPObject* _NPN_CreateScriptObject(NPP npp, JSObject* imp, PassRefPtr<RootObject> rootObject)
-{
- JavaScriptObject* obj = (JavaScriptObject*)_NPN_CreateObject(npp, NPScriptObjectClass);
-
- obj->rootObject = rootObject.releaseRef();
-
- if (obj->rootObject)
- obj->rootObject->gcProtect(imp);
- obj->imp = imp;
-
- return (NPObject*)obj;
-}
-
-NPObject *_NPN_CreateNoScriptObject(void)
-{
- return _NPN_CreateObject(0, NPNoScriptObjectClass);
-}
-
-bool _NPN_InvokeDefault(NPP, NPObject* o, const NPVariant* args, uint32_t argCount, NPVariant* result)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- VOID_TO_NPVARIANT(*result);
-
- // Lookup the function object.
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- JSLock lock;
-
- // Call the function object.
- JSObject *funcImp = static_cast<JSObject*>(obj->imp);
- if (!funcImp->implementsCall())
- return false;
-
- List argList;
- getListFromVariantArgs(exec, args, argCount, rootObject, argList);
- rootObject->globalObject()->startTimeoutCheck();
- JSValue *resultV = funcImp->call (exec, funcImp, argList);
- rootObject->globalObject()->stopTimeoutCheck();
-
- // Convert and return the result of the function call.
- convertValueToNPVariant(exec, resultV, result);
- return true;
- }
-
- if (o->_class->invokeDefault)
- return o->_class->invokeDefault(o, args, argCount, result);
- VOID_TO_NPVARIANT(*result);
- return true;
-}
-
-bool _NPN_Invoke(NPP npp, NPObject* o, NPIdentifier methodName, const NPVariant* args, uint32_t argCount, NPVariant* result)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- PrivateIdentifier* i = (PrivateIdentifier*)methodName;
- if (!i->isString)
- return false;
-
- // Special case the "eval" method.
- if (methodName == _NPN_GetStringIdentifier("eval")) {
- if (argCount != 1)
- return false;
- if (args[0].type != NPVariantType_String)
- return false;
- return _NPN_Evaluate(npp, o, (NPString *)&args[0].value.stringValue, result);
- }
-
- // Lookup the function object.
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- JSLock lock;
- JSValue* func = obj->imp->get(exec, identifierFromNPIdentifier(i->value.string));
- if (func->isNull()) {
- NULL_TO_NPVARIANT(*result);
- return false;
- }
- if (func->isUndefined()) {
- VOID_TO_NPVARIANT(*result);
- return false;
- }
- // Call the function object.
- JSObject *funcImp = static_cast<JSObject*>(func);
- JSObject *thisObj = const_cast<JSObject*>(obj->imp);
- List argList;
- getListFromVariantArgs(exec, args, argCount, rootObject, argList);
- rootObject->globalObject()->startTimeoutCheck();
- JSValue *resultV = funcImp->call (exec, thisObj, argList);
- rootObject->globalObject()->stopTimeoutCheck();
-
- // Convert and return the result of the function call.
- convertValueToNPVariant(exec, resultV, result);
- return true;
- }
-
- if (o->_class->invoke)
- return o->_class->invoke(o, methodName, args, argCount, result);
-
- VOID_TO_NPVARIANT(*result);
- return true;
-}
-
-bool _NPN_Evaluate(NPP, NPObject* o, NPString* s, NPVariant* variant)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
-
- JSLock lock;
- NPUTF16* scriptString;
- unsigned int UTF16Length;
- convertNPStringToUTF16(s, &scriptString, &UTF16Length); // requires free() of returned memory
- rootObject->globalObject()->startTimeoutCheck();
-
- SourceCode source = makeSource(UString(reinterpret_cast<const UChar*>(scriptString), UTF16Length), UString());
- Completion completion = Interpreter::evaluate(rootObject->globalObject()->globalExec(), source);
- rootObject->globalObject()->stopTimeoutCheck();
- ComplType type = completion.complType();
-
- JSValue* result;
- if (type == Normal) {
- result = completion.value();
- if (!result)
- result = jsUndefined();
- } else
- result = jsUndefined();
-
- free(scriptString);
-
- convertValueToNPVariant(exec, result, variant);
-
- return true;
- }
-
- VOID_TO_NPVARIANT(*variant);
- return false;
-}
-
-bool _NPN_GetProperty(NPP, NPObject* o, NPIdentifier propertyName, NPVariant* variant)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- PrivateIdentifier* i = (PrivateIdentifier*)propertyName;
-
- JSLock lock;
- JSValue *result;
- if (i->isString)
- result = obj->imp->get(exec, identifierFromNPIdentifier(i->value.string));
- else
- result = obj->imp->get(exec, i->value.number);
-
- convertValueToNPVariant(exec, result, variant);
- return true;
- }
-
- if (o->_class->hasProperty && o->_class->getProperty) {
- if (o->_class->hasProperty(o, propertyName))
- return o->_class->getProperty(o, propertyName, variant);
- return false;
- }
-
- VOID_TO_NPVARIANT(*variant);
- return false;
-}
-
-bool _NPN_SetProperty(NPP, NPObject* o, NPIdentifier propertyName, const NPVariant* variant)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- JSLock lock;
- PrivateIdentifier* i = (PrivateIdentifier*)propertyName;
- if (i->isString)
- obj->imp->put(exec, identifierFromNPIdentifier(i->value.string), convertNPVariantToValue(exec, variant, rootObject));
- else
- obj->imp->put(exec, i->value.number, convertNPVariantToValue(exec, variant, rootObject));
- return true;
- }
-
- if (o->_class->setProperty)
- return o->_class->setProperty(o, propertyName, variant);
-
- return false;
-}
-
-bool _NPN_RemoveProperty(NPP, NPObject* o, NPIdentifier propertyName)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- PrivateIdentifier* i = (PrivateIdentifier*)propertyName;
- if (i->isString) {
- if (!obj->imp->hasProperty(exec, identifierFromNPIdentifier(i->value.string)))
- return false;
- } else {
- if (!obj->imp->hasProperty(exec, i->value.number))
- return false;
- }
-
- JSLock lock;
- if (i->isString)
- obj->imp->deleteProperty(exec, identifierFromNPIdentifier(i->value.string));
- else
- obj->imp->deleteProperty(exec, i->value.number);
-
- return true;
- }
- return false;
-}
-
-bool _NPN_HasProperty(NPP, NPObject* o, NPIdentifier propertyName)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- PrivateIdentifier* i = (PrivateIdentifier*)propertyName;
- JSLock lock;
- if (i->isString)
- return obj->imp->hasProperty(exec, identifierFromNPIdentifier(i->value.string));
- return obj->imp->hasProperty(exec, i->value.number);
- }
-
- if (o->_class->hasProperty)
- return o->_class->hasProperty(o, propertyName);
-
- return false;
-}
-
-bool _NPN_HasMethod(NPP, NPObject* o, NPIdentifier methodName)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- PrivateIdentifier* i = (PrivateIdentifier*)methodName;
- if (!i->isString)
- return false;
-
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- JSLock lock;
- JSValue* func = obj->imp->get(exec, identifierFromNPIdentifier(i->value.string));
- return !func->isUndefined();
- }
-
- if (o->_class->hasMethod)
- return o->_class->hasMethod(o, methodName);
-
- return false;
-}
-
-void _NPN_SetException(NPObject* o, const NPUTF8* message)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- JSLock lock;
- throwError(exec, GeneralError, message);
- }
-}
-
-bool _NPN_Enumerate(NPP, NPObject *o, NPIdentifier **identifier, uint32_t *count)
-{
- if (o->_class == NPScriptObjectClass) {
- JavaScriptObject* obj = (JavaScriptObject*)o;
-
- RootObject* rootObject = obj->rootObject;
- if (!rootObject || !rootObject->isValid())
- return false;
-
- ExecState* exec = rootObject->globalObject()->globalExec();
- JSLock lock;
- PropertyNameArray propertyNames;
-
- obj->imp->getPropertyNames(exec, propertyNames);
- unsigned size = static_cast<unsigned>(propertyNames.size());
- // FIXME: This should really call NPN_MemAlloc but that's in WebKit
- NPIdentifier *identifiers = static_cast<NPIdentifier*>(malloc(sizeof(NPIdentifier) * size));
-
- for (unsigned i = 0; i < size; i++)
- identifiers[i] = _NPN_GetStringIdentifier(propertyNames[i].ustring().UTF8String().c_str());
-
- *identifier = identifiers;
- *count = size;
-
- return true;
- }
-
- if (NP_CLASS_STRUCT_VERSION_HAS_ENUM(o->_class) && o->_class->enumerate)
- return o->_class->enumerate(o, identifier, count);
-
- return false;
-}
-
-#endif // ENABLE(NETSCAPE_API)