WebCore/bridge/testqtbindings.cpp
changeset 0 4f2f89ce4247
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/WebCore/bridge/testqtbindings.cpp	Fri Sep 17 09:02:29 2010 +0300
@@ -0,0 +1,139 @@
+/*
+ * Copyright (C) 2008 Nokia Corporation and/or its subsidiary(-ies)
+ *
+ * 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"
+
+#include "Bridge.h"
+#include "JSObject.h"
+#include "JSValue.h"
+#include "interpreter.h"
+#include "qdebug.h"
+#include "qobject.h"
+#include "runtime_object.h"
+#include "types.h"
+#include <assert.h>
+#include <stdio.h>
+#include <string.h>
+
+
+class MyObject : public QObject
+{
+    Q_OBJECT
+    Q_PROPERTY(QString testString READ testString WRITE setTestString)
+    Q_PROPERTY(int testInt READ testInt WRITE setTestInt)
+
+public:
+    MyObject() : QObject(0), integer(0){}
+
+    void setTestString(const QString &str) {
+        qDebug() << "called setTestString" << str;
+        string = str;
+    }
+    void setTestInt(int i) {
+        qDebug() << "called setTestInt" << i;
+        integer = i;
+    }
+    QString testString() const {
+        qDebug() << "called testString" << string;
+        return string;
+    }
+    int testInt() const {
+        qDebug() << "called testInt" << integer;
+        return integer;
+    }
+    QString string;
+    int integer;
+
+public slots:
+    void foo() { qDebug() << "foo invoked"; }
+};
+
+// --------------------------------------------------------
+
+using namespace JSC;
+using namespace JSC::Bindings;
+
+class Global : public JSObject {
+public:
+  virtual UString className() const { return "global"; }
+};
+
+static char code[] =
+    "myInterface.foo();\n"
+    "myInterface.testString = \"Hello\";\n"
+    "str = myInterface.testString;\n"
+    "myInterface.testInt = 10;\n"
+    "i = myInterface.testInt;\n";
+
+int main(int argc, char** argv)
+{
+    // expecting a filename
+    bool ret = true;
+    {
+        JSLock lock;
+        
+        // create interpreter w/ global object
+        Global* global = new Global();
+
+        // create interpreter
+        RefPtr<Interpreter> interp = new Interpreter(global);
+        ExecState* exec = interp->globalExec();
+        
+        MyObject* myObject = new MyObject;
+        
+        global->put(exec, Identifier("myInterface"), Instance::createRuntimeObject(Instance::QtLanguage, (void*)myObject));
+        
+        
+        if (code) {
+            // run
+            Completion comp(interp->evaluate("", 0, code));
+            
+            if (comp.complType() == Throw) {
+                qDebug() << "exception thrown";
+                JSValue* exVal = comp.value();
+                char* msg = exVal->toString(exec).ascii();
+                int lineno = -1;
+                if (exVal->type() == ObjectType) {
+                    JSValue* lineVal = exVal->getObject()->get(exec, Identifier("line"));
+                    if (lineVal->type() == NumberType)
+                        lineno = int(lineVal->toNumber(exec));
+                }
+                if (lineno != -1)
+                    fprintf(stderr,"Exception, line %d: %s\n",lineno,msg);
+                else
+                    fprintf(stderr,"Exception: %s\n",msg);
+                ret = false;
+            }
+            else if (comp.complType() == ReturnValue) {
+                char* msg = comp.value()->toString(interp->globalExec()).ascii();
+                fprintf(stderr,"Return value: %s\n",msg);
+            }
+        }
+        
+    } // end block, so that Interpreter and global get deleted
+    
+    return ret ? 0 : 1;
+}
+
+#include "testqtbindings.moc"