Update versioning to support the mysterious future.
[WebKit-https.git] / JavaScriptGlue / JSValueWrapper.cpp
index d1a6460..f955ed0 100644 (file)
@@ -1,11 +1,39 @@
-//
-// JSValueWrapper.cpp
-//
+/*
+ * 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 "JSValueWrapper.h"
-#include "JavaScriptCore/reference_list.h"
+#include "JSRun.h"
+#include <JavaScriptCore/PropertyNameArray.h>
+#include <pthread.h>
 
-JSValueWrapper::JSValueWrapper(ValueImp *inValue, ExecState *inExec)
-    : fValue(inValue), fExec(inExec)
+JSValueWrapper::JSValueWrapper(JSValue *inValue)
+    : fValue(inValue)
 {
 }
 
@@ -13,15 +41,56 @@ JSValueWrapper::~JSValueWrapper()
 {
 }
 
-ValueImp *JSValueWrapper::GetValue()
+JSValue *JSValueWrapper::GetValue()
 {
     return fValue;
 }
-ExecState* JSValueWrapper::GetExecState() const
+
+/*
+ * This is a slight hack. The JSGlue API has no concept of execution state.
+ * However, execution state is an inherent part of JS, and JSCore requires it.
+ * So, we keep a single execution state for the whole thread and supply it
+ * where necessary.
+
+ * The execution state holds two things: (1) exceptions; (2) the global object. 
+ * JSGlue has no API for accessing exceptions, so we just discard them. As for
+ * the global object, JSGlue includes no calls that depend on it. Its property
+ * getters and setters are per-object; they don't walk up the enclosing scope. 
+ * Functions called by JSObjectCallFunction may reference values in the enclosing 
+ * scope, but they do so through an internally stored scope chain, so we don't 
+ * need to supply the global scope.
+ */      
+
+pthread_key_t globalObjectKey;
+pthread_once_t globalObjectKeyOnce = PTHREAD_ONCE_INIT;
+
+static void unprotectGlobalObject(void* data) 
 {
-    return fExec;
+    gcUnprotect(static_cast<JSGlobalObject*>(data));
 }
 
+static void initializeGlobalObjectKey()
+{
+    pthread_key_create(&globalObjectKey, unprotectGlobalObject);
+}
+
+static ExecState* getThreadGlobalExecState()
+{
+    pthread_once(&globalObjectKeyOnce, initializeGlobalObjectKey);
+    JSGlobalObject* globalObject = static_cast<JSGlobalObject*>(pthread_getspecific(globalObjectKey));
+    if (!globalObject) {
+        globalObject = new JSGlueGlobalObject;
+        gcProtect(globalObject);
+        pthread_setspecific(globalObjectKey, globalObject);
+    }
+    
+    ExecState* exec = globalObject->globalExec();
+
+    // Discard exceptions -- otherwise an exception would forestall JS 
+    // evaluation throughout the thread
+    exec->clearException();
+    return exec;
+}
 
 void JSValueWrapper::GetJSObectCallBacks(JSObjectCallBacks& callBacks)
 {
@@ -49,13 +118,14 @@ CFArrayRef JSValueWrapper::JSObjectCopyPropertyNames(void *data)
     JSValueWrapper* ptr = (JSValueWrapper*)data;
     if (ptr)
     {
-        ExecState* exec = ptr->GetExecState();
-        ObjectImp *object = ptr->GetValue()->toObject(exec);
-        ReferenceList list = object->propList(exec);
-        ReferenceListIterator iterator = list.begin();
-
-        while (iterator != list.end()) {
-            Identifier name = iterator->getPropertyName(exec);
+        ExecState* exec = getThreadGlobalExecState();
+        JSObject *object = ptr->GetValue()->toObject(exec);
+        PropertyNameArray propNames;
+        object->getPropertyNames(exec, propNames);
+        PropertyNameArray::const_iterator iterator = propNames.begin();
+
+        while (iterator != propNames.end()) {
+            Identifier name = *iterator;
             CFStringRef nameStr = IdentifierToCFString(name);
 
             if (!result)
@@ -83,9 +153,9 @@ JSObjectRef JSValueWrapper::JSObjectCopyProperty(void *data, CFStringRef propert
     JSValueWrapper* ptr = (JSValueWrapper*)data;
     if (ptr)
     {
-        ExecState* exec = ptr->GetExecState();
-        ValueImp *propValue = ptr->GetValue()->toObject(exec)->get(exec, CFStringToIdentifier(propertyName));
-        JSValueWrapper* wrapperValue = new JSValueWrapper(propValue, exec);
+        ExecState* exec = getThreadGlobalExecState();
+        JSValue *propValue = ptr->GetValue()->toObject(exec)->get(exec, CFStringToIdentifier(propertyName));
+        JSValueWrapper* wrapperValue = new JSValueWrapper(propValue);
 
         JSObjectCallBacks callBacks;
         GetJSObectCallBacks(callBacks);
@@ -106,9 +176,9 @@ void JSValueWrapper::JSObjectSetProperty(void *data, CFStringRef propertyName, J
     JSValueWrapper* ptr = (JSValueWrapper*)data;
     if (ptr)
     {
-        ExecState* exec = ptr->GetExecState();
-        ValueImp *value = JSObjectKJSValue((JSUserObject*)jsValue);
-        ObjectImp *objValue = ptr->GetValue()->toObject(exec);
+        ExecState* exec = getThreadGlobalExecState();
+        JSValue *value = JSObjectKJSValue((JSUserObject*)jsValue);
+        JSObject *objValue = ptr->GetValue()->toObject(exec);
         objValue->put(exec, CFStringToIdentifier(propertyName), value);
     }
 }
@@ -121,23 +191,23 @@ JSObjectRef JSValueWrapper::JSObjectCallFunction(void *data, JSObjectRef thisObj
     JSValueWrapper* ptr = (JSValueWrapper*)data;
     if (ptr)
     {
-        ExecState* exec = ptr->GetExecState();
+        ExecState* exec = getThreadGlobalExecState();
 
-        ValueImp *value = JSObjectKJSValue((JSUserObject*)thisObj);
-        ObjectImp *ksjThisObj = value->toObject(exec);
-        ObjectImp *objValue = ptr->GetValue()->toObject(exec);
+        JSValue *value = JSObjectKJSValue((JSUserObject*)thisObj);
+        JSObject *ksjThisObj = value->toObject(exec);
+        JSObject *objValue = ptr->GetValue()->toObject(exec);
 
         List listArgs;
         CFIndex argCount = args ? CFArrayGetCount(args) : 0;
         for (CFIndex i = 0; i < argCount; i++)
         {
             JSObjectRef jsArg = (JSObjectRef)CFArrayGetValueAtIndex(args, i);
-            ValueImp *kgsArg = JSObjectKJSValue((JSUserObject*)jsArg);
+            JSValue *kgsArg = JSObjectKJSValue((JSUserObject*)jsArg);
             listArgs.append(kgsArg);
         }
 
-        ValueImp *resultValue = objValue->call(exec, ksjThisObj, listArgs);
-        JSValueWrapper* wrapperValue = new JSValueWrapper(resultValue, ptr->GetExecState());
+        JSValue *resultValue = objValue->call(exec, ksjThisObj, listArgs);
+        JSValueWrapper* wrapperValue = new JSValueWrapper(resultValue);
         JSObjectCallBacks callBacks;
         GetJSObectCallBacks(callBacks);
         result = JSObjectCreate(wrapperValue, &callBacks);
@@ -157,7 +227,7 @@ CFTypeRef JSValueWrapper::JSObjectCopyCFValue(void *data)
     JSValueWrapper* ptr = (JSValueWrapper*)data;
     if (ptr)
     {
-        result = KJSValueToCFType(ptr->fValue, ptr->fExec);
+        result = KJSValueToCFType(ptr->GetValue(), getThreadGlobalExecState());
     }
     return result;
 }