summaryrefslogtreecommitdiffstats
path: root/tdehtml/ecma
diff options
context:
space:
mode:
authorTimothy Pearson <kb9vqf@pearsoncomputing.net>2013-01-26 13:17:21 -0600
committerTimothy Pearson <kb9vqf@pearsoncomputing.net>2013-01-26 13:17:21 -0600
commitdfe289850f068f19ba4a83ab4e7e22a7e09c13c9 (patch)
treec297348a55df66c571de4525646e0b9762427353 /tdehtml/ecma
parentb7658a0d5eca24a9d37c6e04f88298ef02389db0 (diff)
downloadtdelibs-dfe289850f068f19ba4a83ab4e7e22a7e09c13c9.tar.gz
tdelibs-dfe289850f068f19ba4a83ab4e7e22a7e09c13c9.zip
Rename a number of libraries and executables to avoid conflicts with KDE4
Diffstat (limited to 'tdehtml/ecma')
-rw-r--r--tdehtml/ecma/AUTHORS4
-rw-r--r--tdehtml/ecma/CMakeLists.txt61
-rw-r--r--tdehtml/ecma/Makefile.am90
-rw-r--r--tdehtml/ecma/README21
-rw-r--r--tdehtml/ecma/THANKS9
-rw-r--r--tdehtml/ecma/TODO12
-rw-r--r--tdehtml/ecma/domparser.cpp112
-rw-r--r--tdehtml/ecma/domparser.h58
-rw-r--r--tdehtml/ecma/jsk.html113
-rw-r--r--tdehtml/ecma/kjs_binding.cpp467
-rw-r--r--tdehtml/ecma/kjs_binding.h409
-rw-r--r--tdehtml/ecma/kjs_css.cpp1302
-rw-r--r--tdehtml/ecma/kjs_css.h304
-rw-r--r--tdehtml/ecma/kjs_debugwin.cpp1139
-rw-r--r--tdehtml/ecma/kjs_debugwin.h285
-rw-r--r--tdehtml/ecma/kjs_dom.cpp1849
-rw-r--r--tdehtml/ecma/kjs_dom.h299
-rw-r--r--tdehtml/ecma/kjs_events.cpp993
-rw-r--r--tdehtml/ecma/kjs_events.h250
-rw-r--r--tdehtml/ecma/kjs_html.cpp3946
-rw-r--r--tdehtml/ecma/kjs_html.h294
-rw-r--r--tdehtml/ecma/kjs_mozilla.cpp94
-rw-r--r--tdehtml/ecma/kjs_mozilla.h44
-rw-r--r--tdehtml/ecma/kjs_navigator.cpp670
-rw-r--r--tdehtml/ecma/kjs_navigator.h53
-rw-r--r--tdehtml/ecma/kjs_proxy.cpp411
-rw-r--r--tdehtml/ecma/kjs_proxy.h91
-rw-r--r--tdehtml/ecma/kjs_range.cpp233
-rw-r--r--tdehtml/ecma/kjs_range.h71
-rw-r--r--tdehtml/ecma/kjs_traversal.cpp327
-rw-r--r--tdehtml/ecma/kjs_traversal.h108
-rw-r--r--tdehtml/ecma/kjs_views.cpp91
-rw-r--r--tdehtml/ecma/kjs_views.h53
-rw-r--r--tdehtml/ecma/kjs_window.cpp2935
-rw-r--r--tdehtml/ecma/kjs_window.h309
-rw-r--r--tdehtml/ecma/testecma.cpp67
-rw-r--r--tdehtml/ecma/xmlhttprequest.cpp810
-rw-r--r--tdehtml/ecma/xmlhttprequest.h142
-rw-r--r--tdehtml/ecma/xmlserializer.cpp109
-rw-r--r--tdehtml/ecma/xmlserializer.h54
40 files changed, 18689 insertions, 0 deletions
diff --git a/tdehtml/ecma/AUTHORS b/tdehtml/ecma/AUTHORS
new file mode 100644
index 000000000..2a129330d
--- /dev/null
+++ b/tdehtml/ecma/AUTHORS
@@ -0,0 +1,4 @@
+Harri Porten <porten@kde.org>
+Peter Kelly <pmk@post.com>
+Dirk Mueller <mueller@kde.org>
+Daniel Molkentin <molkentin@kde.org>
diff --git a/tdehtml/ecma/CMakeLists.txt b/tdehtml/ecma/CMakeLists.txt
new file mode 100644
index 000000000..eddd99f1e
--- /dev/null
+++ b/tdehtml/ecma/CMakeLists.txt
@@ -0,0 +1,61 @@
+#################################################
+#
+# (C) 2010 Serghei Amelian
+# serghei (DOT) amelian (AT) gmail.com
+#
+# Improvements and feedback are welcome
+#
+# This file is released under GPL >= 2
+#
+#################################################
+
+include_directories(
+ ${TQT_INCLUDE_DIRS}
+ ${CMAKE_CURRENT_BINARY_DIR}
+ ${CMAKE_BINARY_DIR}
+ ${CMAKE_BINARY_DIR}/kjs
+ ${CMAKE_BINARY_DIR}/tdecore
+ ${CMAKE_SOURCE_DIR}
+ ${CMAKE_SOURCE_DIR}/tdehtml
+ ${CMAKE_SOURCE_DIR}/dcop
+ ${CMAKE_SOURCE_DIR}/tdefx
+ ${CMAKE_SOURCE_DIR}/tdecore
+ ${CMAKE_SOURCE_DIR}/tdeui
+ ${CMAKE_SOURCE_DIR}/kio
+ ${CMAKE_SOURCE_DIR}/kio/kio
+ ${CMAKE_SOURCE_DIR}/kio/bookmarks
+ ${CMAKE_SOURCE_DIR}/kjs
+ ${CMAKE_SOURCE_DIR}/tdewallet/client
+ ${CMAKE_SOURCE_DIR}/tdeutils
+)
+
+link_directories(
+ ${TQT_LIBRARY_DIRS}
+)
+
+
+##### kjs_html-static ###########################
+
+set( target kjs_html )
+
+set( ${target}_SRCS
+ kjs_binding.cpp kjs_dom.cpp kjs_html.cpp kjs_window.cpp
+ kjs_navigator.cpp kjs_proxy.cpp kjs_css.cpp
+ kjs_range.cpp kjs_traversal.cpp kjs_events.cpp
+ kjs_views.cpp kjs_debugwin.cpp kjs_mozilla.cpp
+ xmlhttprequest.cpp xmlserializer.cpp domparser.cpp
+)
+
+set( ${target}_LUTS
+ kjs_dom.cpp kjs_html.cpp kjs_css.cpp kjs_events.cpp
+ kjs_navigator.cpp kjs_mozilla.cpp kjs_range.cpp
+ kjs_traversal.cpp kjs_views.cpp kjs_window.cpp
+ xmlhttprequest.cpp xmlserializer.cpp domparser.cpp
+)
+
+tde_add_luts( ${${target}_LUTS} )
+
+tde_add_library( ${target} STATIC_PIC AUTOMOC
+ SOURCES ${${target}_SRCS}
+)
+
diff --git a/tdehtml/ecma/Makefile.am b/tdehtml/ecma/Makefile.am
new file mode 100644
index 000000000..d69ff807b
--- /dev/null
+++ b/tdehtml/ecma/Makefile.am
@@ -0,0 +1,90 @@
+# This file is part of the KDE libraries
+# Copyright (C) 1999 Harri Porten (porten@kde.org)
+
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Library General Public
+# License as published by the Free Software Foundation; either
+# version 2 of the License, or (at your option) any later version.
+
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+# Library General Public License for more details.
+
+# You should have received a copy of the GNU Library General Public License
+# along with this library; see the file COPYING.LIB. If not, write to
+# the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+# Boston, MA 02110-1301, USA.
+
+INCLUDES = -I$(top_srcdir) -I$(top_srcdir)/kio -I$(top_srcdir)/kio/bookmarks -I$(top_srcdir)/tdehtml -I$(top_srcdir)/tdehtml/java -I$(top_srcdir)/tdewallet/client -I$(top_srcdir)/tdeutils -I$(top_builddir)/kjs $(all_includes)
+
+KDE_CXXFLAGS = $(USE_EXCEPTIONS)
+
+noinst_LTLIBRARIES = libkjs_html.la
+
+noinst_HEADERS = kjs_html.h kjs_dom.h kjs_window.h kjs_navigator.h \
+ kjs_binding.h kjs_proxy.h kjs_css.h kjs_range.h \
+ kjs_traversal.h kjs_events.h kjs_views.h kjs_debugwin.h
+
+libkjs_html_la_SOURCES = kjs_binding.cpp kjs_dom.cpp kjs_html.cpp kjs_window.cpp \
+ kjs_navigator.cpp kjs_proxy.cpp \
+ kjs_css.cpp kjs_range.cpp kjs_traversal.cpp kjs_events.cpp \
+ kjs_views.cpp kjs_debugwin.cpp kjs_mozilla.cpp xmlhttprequest.cpp \
+ xmlserializer.cpp domparser.cpp
+#libkjs_html_la_LDFLAGS = -module -avoid-version $(all_libraries)
+libkjs_html_la_LIBADD = $(top_builddir)/kjs/libkjs.la # ../libtdehtml.la
+libkjs_html_la_METASOURCES = AUTO
+
+LUT_FILES = kjs_dom.lut.h kjs_html.lut.h kjs_css.lut.h kjs_events.lut.h kjs_navigator.lut.h \
+ kjs_mozilla.lut.h kjs_range.lut.h kjs_traversal.lut.h kjs_views.lut.h kjs_window.lut.h
+
+CREATE_HASH_TABLE = $(top_srcdir)/kjs/create_hash_table
+
+kjs_dom.lut.h : $(srcdir)/kjs_dom.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_dom.cpp > $@
+kjs_dom.lo: kjs_dom.lut.h
+kjs_html.lut.h : $(srcdir)/kjs_html.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_html.cpp > $@
+kjs_html.lo: kjs_html.lut.h
+kjs_css.lut.h : $(srcdir)/kjs_css.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_css.cpp > $@
+kjs_css.lo: kjs_css.lut.h
+kjs_events.lut.h : $(srcdir)/kjs_events.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_events.cpp > $@
+kjs_events.lo: kjs_events.lut.h
+kjs_navigator.lut.h : $(srcdir)/kjs_navigator.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_navigator.cpp > $@
+kjs_navigator.lo: kjs_navigator.lut.h
+kjs_mozilla.lut.h : $(srcdir)/kjs_mozilla.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_mozilla.cpp > $@
+kjs_mozilla.lo: kjs_mozilla.lut.h
+kjs_range.lut.h : $(srcdir)/kjs_range.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_range.cpp > $@
+kjs_range.lo: kjs_range.lut.h
+kjs_traversal.lut.h : $(srcdir)/kjs_traversal.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_traversal.cpp > $@
+kjs_traversal.lo: kjs_traversal.lut.h
+kjs_views.lut.h : $(srcdir)/kjs_views.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_views.cpp > $@
+kjs_views.lo: kjs_views.lut.h
+kjs_window.lut.h : $(srcdir)/kjs_window.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/kjs_window.cpp > $@
+kjs_window.lo: kjs_window.lut.h
+xmlhttprequest.lut.h : $(srcdir)/xmlhttprequest.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/xmlhttprequest.cpp > $@
+xmlhttprequest.lo: xmlhttprequest.lut.h
+xmlserializer.lut.h : $(srcdir)/xmlserializer.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/xmlserializer.cpp > $@
+xmlserializer.lo: xmlserializer.lut.h
+domparser.lut.h : $(srcdir)/domparser.cpp $(CREATE_HASH_TABLE)
+ $(PERL) $(CREATE_HASH_TABLE) $(srcdir)/domparser.cpp > $@
+domparser.lo: domparser.lut.h
+
+
+CLEANFILES = $(LUT_FILES)
+
+# interactive test program
+#check_PROGRAMS = testecma
+#testecma_SOURCES = testecma.cpp
+#testecma_LDADD = ../libtdehtml.la $(top_builddir)/kjs/libkjs.la
+
diff --git a/tdehtml/ecma/README b/tdehtml/ecma/README
new file mode 100644
index 000000000..4c341699a
--- /dev/null
+++ b/tdehtml/ecma/README
@@ -0,0 +1,21 @@
+This module contains the ECMAScript a.k.a. JavaScript language bindings for
+the KHTML Part.
+
+The module is loaded into KHTML's address space on demand.
+
+To test the non-HTML DOM functions you may compile a little interactive
+interpreter called 'testecma' with 'make check' (see testecma.cpp for
+further details).
+
+Harri Porten <porten@kde.org>
+
+========================================================================
+Appendix A: Web sites with useful tests
+
+http://oucsace.cs.ohiou.edu/~ywang/JavaScript
+http://www.xs4all.nl/~ppk/js/index.html?version5.html
+
+Appendix B: References for HTML JavaScript bindings
+
+http://msdn.microsoft.com/workshop/author/dhtml/reference/objects.asp
+http://docs.sun.com/source/816-6408-10/
diff --git a/tdehtml/ecma/THANKS b/tdehtml/ecma/THANKS
new file mode 100644
index 000000000..b21dce741
--- /dev/null
+++ b/tdehtml/ecma/THANKS
@@ -0,0 +1,9 @@
+Vadim Plessky <lucy-ples@mtu-net.ru> for dissecting an endless number
+of bug reports and therefore taking quite some load of our shoulders.
+
+Ferdinand Gassauer <f.gassauer@aon.at> for numerous useful bug reports
+and keeping track of them later.
+
+David Faure <faure@kde.org> for taking some time off from Konqueror
+and making a lotto site working fixing bugs along the way.
+
diff --git a/tdehtml/ecma/TODO b/tdehtml/ecma/TODO
new file mode 100644
index 000000000..16a7152c5
--- /dev/null
+++ b/tdehtml/ecma/TODO
@@ -0,0 +1,12 @@
+Has to be done
+==============
+- frame[] correct search and sorting order (DONE ?)
+- optional error message output
+- change KParts::WindowArgs && friends
+ that we can detect if a locationbar is on/or not
+
+Could be done
+=============
+- Make the graphical debugger useable
+- Improve internal structures to give a really useful
+ output on errors (i.e. improve backtrance capabilities)
diff --git a/tdehtml/ecma/domparser.cpp b/tdehtml/ecma/domparser.cpp
new file mode 100644
index 000000000..672754a45
--- /dev/null
+++ b/tdehtml/ecma/domparser.cpp
@@ -0,0 +1,112 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2005 Anders Carlsson (andersca@mac.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "domparser.h"
+#include "domparser.lut.h"
+
+#include "kjs_dom.h"
+#include "kjs_window.h"
+#include "xml/dom_nodeimpl.h"
+#include "xml/dom_docimpl.h"
+
+#include "html/html_documentimpl.h"
+
+using DOM::DocumentImpl;
+
+////////////////////// DOMParser Object ////////////////////////
+
+/* Source for DOMParserProtoTable.
+@begin DOMParserProtoTable 1
+ parseFromString DOMParser::ParseFromString DontDelete|Function 2
+@end
+*/
+
+
+namespace KJS {
+
+KJS_DEFINE_PROTOTYPE(DOMParserProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMParserProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMParser", DOMParserProto, DOMParserProtoFunc)
+
+
+DOMParserConstructorImp::DOMParserConstructorImp(ExecState *, DOM::DocumentImpl *d)
+ : doc(d)
+{
+}
+
+bool DOMParserConstructorImp::implementsConstruct() const
+{
+ return true;
+}
+
+Object DOMParserConstructorImp::construct(ExecState *exec, const List &)
+{
+ return Object(new DOMParser(exec, doc.get()));
+}
+
+const ClassInfo DOMParser::info = { "DOMParser", 0, 0 /* &DOMParserTable*/, 0 };
+
+
+DOMParser::DOMParser(ExecState *exec, DOM::DocumentImpl *d)
+ : DOMObject(DOMParserProto::self(exec)), doc(d)
+{
+// setPrototype(DOMParserProto::self(exec));
+}
+
+
+Value DOMParserProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ if (!thisObj.inherits(&DOMParser::info)) {
+ Object err = Error::create(exec,TypeError);
+ exec->setException(err);
+ return err;
+ }
+
+ DOMParser *parser = static_cast<DOMParser *>(thisObj.imp());
+
+ switch (id) {
+ case DOMParser::ParseFromString:
+ {
+ if (args.size() != 2) {
+ return Undefined();
+ }
+
+ TQString str = args[0].toString(exec).qstring();
+ TQString contentType = args[1].toString(exec).qstring().stripWhiteSpace();
+
+ if (contentType == "text/xml" || contentType == "application/xml" || contentType == "application/xhtml+xml") {
+ DocumentImpl *docImpl = parser->doc->implementation()->createDocument();
+
+ docImpl->open();
+ docImpl->write(str);
+ docImpl->finishParsing();
+ docImpl->close();
+
+ return getDOMNode(exec, docImpl);
+ }
+ }
+ }
+
+ return Undefined();
+}
+
+} // end namespace
+
+
diff --git a/tdehtml/ecma/domparser.h b/tdehtml/ecma/domparser.h
new file mode 100644
index 000000000..13a880837
--- /dev/null
+++ b/tdehtml/ecma/domparser.h
@@ -0,0 +1,58 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2005 Anders Carlsson (andersca@mac.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef DOMPARSER_H
+#define DOMPARSER_H
+
+#include <tqguardedptr.h>
+#include <kjs/object.h>
+#include <kjs/interpreter.h>
+#include <misc/shared.h>
+
+#include "kjs_dom.h"
+
+namespace KJS {
+
+ class DOMParserConstructorImp : public ObjectImp {
+ public:
+ DOMParserConstructorImp(ExecState *, DOM::DocumentImpl *d);
+ virtual bool implementsConstruct() const;
+ virtual Object construct(ExecState *exec, const List &args);
+private:
+ tdehtml::SharedPtr<DOM::DocumentImpl> doc;
+ };
+
+ class DOMParser : public DOMObject {
+ public:
+ DOMParser(ExecState *, DOM::DocumentImpl *d);
+ virtual bool toBoolean(ExecState *) const { return true; }
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { ParseFromString };
+
+ private:
+ TQGuardedPtr<DOM::DocumentImpl> doc;
+
+ friend class DOMParserProtoFunc;
+ };
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/jsk.html b/tdehtml/ecma/jsk.html
new file mode 100644
index 000000000..917c083e8
--- /dev/null
+++ b/tdehtml/ecma/jsk.html
@@ -0,0 +1,113 @@
+<html>
+<!--
+Javascript Konsole (c) 2001 Till Krech <till@snafu.de>
+Dieser Code unterliegt den Bedingungen der Gnu Public License Version 2.
+-->
+<head>
+<title>Javascript Konsole</title>
+<style type="text/css">
+code {
+ color:#444488;
+}
+em {
+ font-weight: bold;
+}
+</style>
+<script language="JavaScript">
+
+function do_eval() {
+ var fo = document.forms.fo;
+ fo.restyp.value = "";
+ fo.field.value = "";
+ var fo = document.fo;
+ var expr = fo.zeile.value;
+ var result = eval(expr);
+ fo.restyp.value = typeof(result);
+ var tuedel = "";
+ if (typeof(result) == "string") {
+ tuedel = '"';
+ }
+ fo.field.value = tuedel + result + tuedel;
+}
+
+function do_properties() {
+ var fo = document.forms.fo;
+ fo.restyp.value = "";
+ fo.field.value = "";
+ var fo = document.fo;
+ var expr = fo.zeile.value;
+ var result = eval(expr);
+ var i;
+ fo.restyp.value = typeof(result);
+ var fieldvalue = "";
+ if (typeof(result) != "undefined") {
+ for (i in result) {
+ var tuedel = "";
+ var propval = result[i];
+ if (typeof(propval) == "string") {
+ tuedel = '"';
+ }
+ fieldvalue +=
+ i
+ + " [" + typeof(propval) + "] = "
+ + tuedel + propval + tuedel + "\n";
+ }
+ fo.field.value = fieldvalue;
+ }
+}
+
+
+</script>
+</head>
+<body bgcolor="#dddddd">
+<h1>JavaScript Konsole</h1>
+<form name="fo">
+<table bgcolor="#cccccc" cellspacing="1" cellpadding="8">
+ <tr bgcolor="#ffeeee"><th height="40" align="right">Expression</th><td><input name="zeile" type="text" size="60"></td></tr>
+ <tr bgcolor="#eeeeee"><th align="right">Result Type</th><td><input name="restyp" readonly type="text" size="60"></td></tr>
+ <tr bgcolor="#eeeeee"><th align="right">Result(s)</th><td><textarea readonly name="field" rows="10" cols="60"></textarea></td></tr>
+<tr bgcolor="#ffeeee"><td>&nbsp;</td><td>
+ <input type="button" value="list properties" onclick="do_properties()">
+ <input type="button" value="evaluate" onclick="do_eval()">
+ <input type="reset" value="clear fields"
+</td></tr>
+</table>
+</form>
+<h2>Explanation</h2>
+<h3>Operation</h3>
+<blockquote>
+When <em>evaluate</em> is pressed, the given expression is evaluated and the result is displayed in the result(s) field.
+In case of <em>list properties</em> being pressed, the result of the expression is taken as an object
+and the objects properties are displayed with their type and value in the the result(s) field.
+</blockquote>
+<h3>Expression</h3>
+<blockquote>
+Expression must be a valid javascript expression, e.g.<br><code>window</code>
+<br>or<br><code>document.body.innerHTML</code><br>or<br>
+<code>"Today: " + (new Date()).toString()</code><br>
+or<br>
+<code>"Cablecar".match(/ab.*c/)</code>
+<br>It is also possible to assign a value,
+e.g.<br><code>document.getElementsByTagName('H1').item(0).innerText="Hello World"</code><br>
+You may execute these examples by pasting them into the expression field.
+</blockquote>
+<h3>Result Type</h3>
+<blockquote>
+The type of the result of the given expression.
+</blockquote>
+<h3>Result(s)</h3>
+<blockquote>
+The result of the expression is implicitly converted to a primitive type by the javascript interpreter,
+if <em>evaluate</em> was pressed. When <em>list properties</em> was pressed, a <code>for (var i in obj)</code> loop
+is executed to list the properties. These object properties are in turn evaluated and their types and values
+are displayed.
+</blockquote>
+<p>
+<a href="mailto:till@snafu.de?subject=JavaScript%20Konsole">Till Krech</a>
+</p>
+<p>
+<br>
+</p>
+
+</body>
+</html>
diff --git a/tdehtml/ecma/kjs_binding.cpp b/tdehtml/ecma/kjs_binding.cpp
new file mode 100644
index 000000000..09961fbb5
--- /dev/null
+++ b/tdehtml/ecma/kjs_binding.cpp
@@ -0,0 +1,467 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 1999-2003 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001-2003 David Faure (faure@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "kjs_binding.h"
+#include "kjs_dom.h"
+
+#include "dom/dom_exception.h"
+#include "dom/dom2_range.h"
+#include "xml/dom2_eventsimpl.h"
+#include "tdehtmlpart_p.h"
+
+#include <kdebug.h>
+#include <tdeparts/browserextension.h>
+
+#include <assert.h>
+
+using namespace KJS;
+
+/* TODO:
+ * The catch all (...) clauses below shouldn't be necessary.
+ * But they helped to view for example www.faz.net in an stable manner.
+ * Those unknown exceptions should be treated as severe bugs and be fixed.
+ *
+ * these may be CSS exceptions - need to check - pmk
+ */
+
+Value DOMObject::get(ExecState *exec, const Identifier &p) const
+{
+ Value result;
+ try {
+ result = tryGet(exec,p);
+ }
+ catch (DOM::DOMException e) {
+ // ### translate code into readable string ?
+ // ### oh, and s/QString/i18n or I18N_NOOP (the code in kjs uses I18N_NOOP... but where is it translated ?)
+ // and where does it appear to the user ?
+ Object err = Error::create(exec, GeneralError, TQString(TQString("DOM exception %1").arg(e.code)).local8Bit());
+ exec->setException( err );
+ result = Undefined();
+ }
+ catch (...) {
+ kdError(6070) << "Unknown exception in DOMObject::get()" << endl;
+ result = String("Unknown exception");
+ }
+
+ return result;
+}
+
+void DOMObject::put(ExecState *exec, const Identifier &propertyName,
+ const Value &value, int attr)
+{
+ try {
+ tryPut(exec, propertyName, value, attr);
+ }
+ catch (DOM::DOMException e) {
+ Object err = Error::create(exec, GeneralError, TQString(TQString("DOM exception %1").arg(e.code)).local8Bit());
+ exec->setException(err);
+ }
+ catch (...) {
+ kdError(6070) << "Unknown exception in DOMObject::put()" << endl;
+ }
+}
+
+void DOMObject::tryPut(ExecState *exec, const Identifier &propertyName,
+ const Value& value, int attr)
+{
+ static_cast<ScriptInterpreter*>(exec->dynamicInterpreter())->customizedDOMObject(this);
+ ObjectImp::put(exec,propertyName,value,attr);
+}
+
+UString DOMObject::toString(ExecState *) const
+{
+ return "[object " + className() + "]";
+}
+
+Boolean DOMObject::hasInstance(ExecState *exec, const Value &value)
+{
+ if (value.type() != ObjectType)
+ return Boolean(false);
+
+ Value prot = get(exec,prototypePropertyName);
+ if (prot.type() != ObjectType && prot.type() != NullType) {
+ Object err = Error::create(exec, TypeError, "Invalid prototype encountered "
+ "in instanceof operation.");
+ exec->setException(err);
+ return Boolean(false);
+ }
+
+ Object v = Object(static_cast<ObjectImp*>(value.imp()));
+ while ((v = Object::dynamicCast(v.prototype())).imp()) {
+ if (v.imp() == prot.imp())
+ return Boolean(true);
+ }
+ return Boolean(false);
+}
+
+
+Value DOMFunction::get(ExecState *exec, const Identifier &propertyName) const
+{
+ try {
+ return tryGet(exec, propertyName);
+ }
+ catch (DOM::DOMException e) {
+ Object err = Error::create(exec, GeneralError, TQString(TQString("DOM exception %1").arg(e.code)).local8Bit());
+ exec->setException(err);
+ return Undefined();
+ }
+ catch (...) {
+ kdError(6070) << "Unknown exception in DOMFunction::get()" << endl;
+ return String("Unknown exception");
+ }
+}
+
+Value DOMFunction::call(ExecState *exec, Object &thisObj, const List &args)
+{
+ try {
+ return tryCall(exec, thisObj, args);
+ }
+ // pity there's no way to distinguish between these in JS code
+ // ### Look into setting prototypes of these & the use of instanceof so the exception
+ // type can be determined. See what other browsers do.
+ catch (DOM::DOMException e) {
+ Object err = Error::create(exec, GeneralError, TQString(TQString("DOM Exception %1").arg(e.code)).local8Bit());
+ err.put(exec, "code", Number(e.code));
+ exec->setException(err);
+ return Undefined();
+ }
+ catch (DOM::RangeException e) {
+ Object err = Error::create(exec, GeneralError, TQString(TQString("DOM Range Exception %1").arg(e.code)).local8Bit());
+ err.put(exec, "code", Number(e.code));
+ exec->setException(err);
+ return Undefined();
+ }
+ catch (DOM::CSSException e) {
+ Object err = Error::create(exec, GeneralError, TQString(TQString("CSS Exception %1").arg(e.code)).local8Bit());
+ err.put(exec, "code", Number(e.code));
+ exec->setException(err);
+ return Undefined();
+ }
+ catch (DOM::EventException e) {
+ Object err = Error::create(exec, GeneralError, TQString(TQString("DOM Event Exception %1").arg(e.code)).local8Bit());
+ err.put(exec, "code", Number(e.code));
+ exec->setException(err);
+ return Undefined();
+ }
+ catch (...) {
+ kdError(6070) << "Unknown exception in DOMFunction::call()" << endl;
+ Object err = Error::create(exec, GeneralError, "Unknown exception");
+ exec->setException(err);
+ return Undefined();
+ }
+}
+
+typedef TQPtrList<ScriptInterpreter> InterpreterList;
+static InterpreterList *interpreterList;
+
+ScriptInterpreter::ScriptInterpreter( const Object &global, tdehtml::ChildFrame* frame )
+ : Interpreter( global ), m_frame( frame ), m_domObjects(1021),
+ m_evt( 0L ), m_inlineCode(false), m_timerCallback(false)
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "ScriptInterpreter::ScriptInterpreter " << this << " for part=" << m_frame << endl;
+#endif
+ if ( !interpreterList )
+ interpreterList = new InterpreterList;
+ interpreterList->append( this );
+}
+
+ScriptInterpreter::~ScriptInterpreter()
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "ScriptInterpreter::~ScriptInterpreter " << this << " for part=" << m_frame << endl;
+#endif
+ assert( interpreterList && interpreterList->contains( this ) );
+ interpreterList->remove( this );
+ if ( interpreterList->isEmpty() ) {
+ delete interpreterList;
+ interpreterList = 0;
+ }
+}
+
+void ScriptInterpreter::forgetDOMObject( void* objectHandle )
+{
+ if( !interpreterList ) return;
+
+ TQPtrListIterator<ScriptInterpreter> it( *interpreterList );
+ while ( it.current() ) {
+ (*it)->deleteDOMObject( objectHandle );
+ ++it;
+ }
+}
+
+void ScriptInterpreter::mark()
+{
+ Interpreter::mark();
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "ScriptInterpreter::mark " << this << " marking " << m_customizedDomObjects.count() << " DOM objects" << endl;
+#endif
+ TQPtrDictIterator<void> it( m_customizedDomObjects );
+ for( ; it.current(); ++it )
+ static_cast<DOMObject*>(it.currentKey())->mark();
+}
+
+KParts::ReadOnlyPart* ScriptInterpreter::part() const {
+ return m_frame->m_part;
+}
+
+bool ScriptInterpreter::isWindowOpenAllowed() const
+{
+ if ( m_evt )
+ {
+ int id = m_evt->handle()->id();
+ bool eventOk = ( // mouse events
+ id == DOM::EventImpl::CLICK_EVENT ||
+ id == DOM::EventImpl::MOUSEUP_EVENT || id == DOM::EventImpl::MOUSEDOWN_EVENT ||
+ id == DOM::EventImpl::KHTML_ECMA_CLICK_EVENT || id == DOM::EventImpl::KHTML_ECMA_DBLCLICK_EVENT ||
+ // keyboard events
+ id == DOM::EventImpl::KEYDOWN_EVENT || id == DOM::EventImpl::KEYPRESS_EVENT ||
+ id == DOM::EventImpl::KEYUP_EVENT ||
+ // other accepted events
+ id == DOM::EventImpl::SELECT_EVENT || id == DOM::EventImpl::CHANGE_EVENT ||
+ id == DOM::EventImpl::SUBMIT_EVENT );
+ kdDebug(6070) << "Window.open, smart policy: id=" << id << " eventOk=" << eventOk << endl;
+ if (eventOk)
+ return true;
+ } else // no event
+ {
+ if ( m_inlineCode && !m_timerCallback )
+ {
+ // This is the <a href="javascript:window.open('...')> case -> we let it through
+ return true;
+ kdDebug(6070) << "Window.open, smart policy, no event, inline code -> ok" << endl;
+ }
+ else // This is the <script>window.open(...)</script> case or a timer callback -> block it
+ kdDebug(6070) << "Window.open, smart policy, no event, <script> tag -> refused" << endl;
+ }
+ return false;
+}
+
+
+UString::UString(const TQString &d)
+{
+ unsigned int len = d.length();
+ UChar *dat = new UChar[len];
+ memcpy(dat, d.unicode(), len * sizeof(UChar));
+ rep = UString::Rep::create(dat, len);
+}
+
+UString::UString(const DOM::DOMString &d)
+{
+ if (d.isNull()) {
+ // we do a conversion here as null DOMStrings shouldn't cross
+ // the boundary to kjs. They should either be empty strings
+ // or explicitly converted to KJS::Null via getString().
+ attach(&Rep::empty);
+ return;
+ }
+
+ unsigned int len = d.length();
+ UChar *dat = new UChar[len];
+ memcpy(dat, d.unicode(), len * sizeof(UChar));
+ rep = UString::Rep::create(dat, len);
+}
+
+DOM::DOMString UString::string() const
+{
+ return DOM::DOMString((TQChar*) data(), size());
+}
+
+TQString UString::qstring() const
+{
+ return TQString((TQChar*) data(), size());
+}
+
+TQConstString UString::qconststring() const
+{
+ return TQConstString((TQChar*) data(), size());
+}
+
+DOM::DOMString Identifier::string() const
+{
+ return DOM::DOMString((TQChar*) data(), size());
+}
+
+TQString Identifier::qstring() const
+{
+ return TQString((TQChar*) data(), size());
+}
+
+DOM::Node KJS::toNode(const Value& val)
+{
+ Object obj = Object::dynamicCast(val);
+ if (!obj.isValid() || !obj.inherits(&DOMNode::info))
+ return DOM::Node();
+
+ const DOMNode *dobj = static_cast<const DOMNode*>(obj.imp());
+ return dobj->toNode();
+}
+
+Value KJS::getString(DOM::DOMString s)
+{
+ if (s.isNull())
+ return Null();
+ else
+ return String(s);
+}
+
+TQVariant KJS::ValueToVariant(ExecState* exec, const Value &val) {
+ TQVariant res;
+ switch (val.type()) {
+ case BooleanType:
+ res = TQVariant(val.toBoolean(exec), 0);
+ break;
+ case NumberType:
+ res = TQVariant(val.toNumber(exec));
+ break;
+ case StringType:
+ res = TQVariant(val.toString(exec).qstring());
+ break;
+ default:
+ // everything else will be 'invalid'
+ break;
+ }
+ return res;
+}
+
+class EmbedLiveConnect : public ObjectImp
+{
+ friend Value KJS::getLiveConnectValue(KParts::LiveConnectExtension *lc, const TQString & name, const int type, const TQString & value, int id);
+ EmbedLiveConnect(KParts::LiveConnectExtension *lc, UString n, KParts::LiveConnectExtension::Type t, int id);
+public:
+ ~EmbedLiveConnect();
+
+ virtual Value get(ExecState *, const Identifier & prop) const;
+ virtual void put(ExecState * exec, const Identifier &prop, const Value & value, int=None);
+ virtual Value call(ExecState * exec, Object &, const List &args);
+ virtual bool implementsCall() const;
+ virtual bool toBoolean(ExecState *) const;
+ virtual Value toPrimitive(ExecState *exec, Type) const;
+ virtual UString toString(ExecState *) const;
+
+private:
+ EmbedLiveConnect(const EmbedLiveConnect &);
+ TQGuardedPtr<KParts::LiveConnectExtension> m_liveconnect;
+ UString name;
+ KParts::LiveConnectExtension::Type objtype;
+ unsigned long objid;
+};
+
+Value KJS::getLiveConnectValue(KParts::LiveConnectExtension *lc, const TQString & name, const int type, const TQString & value, int id)
+{
+ KParts::LiveConnectExtension::Type t=(KParts::LiveConnectExtension::Type)type;
+ switch(t) {
+ case KParts::LiveConnectExtension::TypeBool: {
+ bool ok;
+ int i = value.toInt(&ok);
+ if (ok)
+ return Boolean(i);
+ return Boolean(!strcasecmp(value.latin1(), "true"));
+ }
+ case KParts::LiveConnectExtension::TypeObject:
+ case KParts::LiveConnectExtension::TypeFunction:
+ return Value(new EmbedLiveConnect(lc, name, t, id));
+ case KParts::LiveConnectExtension::TypeNumber: {
+ bool ok;
+ int i = value.toInt(&ok);
+ if (ok)
+ return Number(i);
+ else
+ return Number(value.toDouble(&ok));
+ }
+ case KParts::LiveConnectExtension::TypeString:
+ return String(value);
+ case KParts::LiveConnectExtension::TypeVoid:
+ default:
+ return Undefined();
+ }
+}
+
+/* only with gcc > 3.4 KDE_NO_EXPORT */
+EmbedLiveConnect::EmbedLiveConnect(KParts::LiveConnectExtension *lc, UString n, KParts::LiveConnectExtension::Type t, int id)
+ : m_liveconnect (lc), name(n), objtype(t), objid(id)
+{}
+
+/* only with gcc > 3.4 KDE_NO_EXPORT */
+EmbedLiveConnect::~EmbedLiveConnect() {
+ if (m_liveconnect)
+ m_liveconnect->unregister(objid);
+}
+
+KDE_NO_EXPORT
+Value EmbedLiveConnect::get(ExecState *, const Identifier & prop) const
+{
+ if (m_liveconnect) {
+ KParts::LiveConnectExtension::Type rettype;
+ TQString retval;
+ unsigned long retobjid;
+ if (m_liveconnect->get(objid, prop.qstring(), rettype, retobjid, retval))
+ return getLiveConnectValue(m_liveconnect, prop.qstring(), rettype, retval, retobjid);
+ }
+ return Undefined();
+}
+
+KDE_NO_EXPORT
+void EmbedLiveConnect::put(ExecState * exec, const Identifier &prop, const Value & value, int)
+{
+ if (m_liveconnect)
+ m_liveconnect->put(objid, prop.qstring(), value.toString(exec).qstring());
+}
+
+KDE_NO_EXPORT
+bool EmbedLiveConnect::implementsCall() const {
+ return objtype == KParts::LiveConnectExtension::TypeFunction;
+}
+
+KDE_NO_EXPORT
+Value EmbedLiveConnect::call(ExecState *exec, Object&, const List &args)
+{
+ if (m_liveconnect) {
+ TQStringList qargs;
+ for (ListIterator i = args.begin(); i != args.end(); ++i)
+ qargs.append((*i).toString(exec).qstring());
+ KParts::LiveConnectExtension::Type rtype;
+ TQString rval;
+ unsigned long robjid;
+ if (m_liveconnect->call(objid, name.qstring(), qargs, rtype, robjid, rval))
+ return getLiveConnectValue(m_liveconnect, name.qstring(), rtype, rval, robjid);
+ }
+ return Undefined();
+}
+
+KDE_NO_EXPORT
+bool EmbedLiveConnect::toBoolean(ExecState *) const {
+ return true;
+}
+
+KDE_NO_EXPORT
+Value EmbedLiveConnect::toPrimitive(ExecState *exec, Type) const {
+ return String(toString(exec));
+}
+
+KDE_NO_EXPORT
+UString EmbedLiveConnect::toString(ExecState *) const {
+ TQString str;
+ const char *type = objtype == KParts::LiveConnectExtension::TypeFunction ? "Function" : "Object";
+ str.sprintf("[object %s ref=%d]", type, (int) objid);
+ return UString(str);
+}
diff --git a/tdehtml/ecma/kjs_binding.h b/tdehtml/ecma/kjs_binding.h
new file mode 100644
index 000000000..9b69284ba
--- /dev/null
+++ b/tdehtml/ecma/kjs_binding.h
@@ -0,0 +1,409 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 1999-2001 Harri Porten (porten@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_BINDING_H_
+#define _KJS_BINDING_H_
+
+#include <kjs/interpreter.h>
+#include <kjs/function_object.h> /// for FunctionPrototypeImp
+
+#include <dom/dom_node.h>
+#include <tqvariant.h>
+#include <tqptrdict.h>
+#include <kurl.h>
+#include <kjs/lookup.h>
+
+namespace KParts {
+ class ReadOnlyPart;
+ class LiveConnectExtension;
+}
+
+namespace tdehtml {
+ class ChildFrame;
+}
+
+namespace KJS {
+
+ /**
+ * Base class for all objects in this binding - get() and put() run
+ * tryGet() and tryPut() respectively, and catch exceptions if they
+ * occur.
+ */
+ class DOMObject : public ObjectImp {
+ public:
+ DOMObject(const Object &proto) : ObjectImp(proto) {}
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const
+ { return ObjectImp::get(exec, propertyName); }
+ virtual bool implementsHasInstance() const { return true; }
+ virtual Boolean hasInstance(ExecState *exec, const Value &value);
+ virtual void put(ExecState *exec, const Identifier &propertyName,
+ const Value &value, int attr = None);
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName,
+ const Value& value, int attr = None);
+
+ virtual UString toString(ExecState *exec) const;
+ };
+
+ /**
+ * Base class for all functions in this binding - get() and call() run
+ * tryGet() and tryCall() respectively, and catch exceptions if they
+ * occur.
+ */
+ class DOMFunction : public InternalFunctionImp {
+ public:
+ DOMFunction(ExecState* exec) : InternalFunctionImp(
+ static_cast<FunctionPrototypeImp*>(exec->interpreter()->builtinFunctionPrototype().imp())
+ ) {}
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const
+ { return ObjectImp::get(exec, propertyName); }
+
+ virtual bool implementsCall() const { return true; }
+ virtual Value call(ExecState *exec, Object &thisObj, const List &args);
+
+ virtual Value tryCall(ExecState *exec, Object &thisObj, const List&args)
+ { return ObjectImp::call(exec, thisObj, args); }
+ virtual bool toBoolean(ExecState *) const { return true; }
+ };
+
+ /**
+ * We inherit from Interpreter, to save a pointer to the HTML part
+ * that the interpreter runs for.
+ * The interpreter also stores the DOM object - >KJS::DOMObject cache.
+ */
+ class KDE_EXPORT ScriptInterpreter : public Interpreter
+ {
+ public:
+ ScriptInterpreter( const Object &global, tdehtml::ChildFrame* frame );
+ virtual ~ScriptInterpreter();
+
+ DOMObject* getDOMObject( void* objectHandle ) const {
+ return m_domObjects[objectHandle];
+ }
+ void putDOMObject( void* objectHandle, DOMObject* obj ) {
+ m_domObjects.insert( objectHandle, obj );
+ }
+ void customizedDOMObject( DOMObject* obj ) {
+ m_customizedDomObjects.replace( obj, this );
+ }
+ bool deleteDOMObject( void* objectHandle ) {
+ DOMObject* obj = m_domObjects.take( objectHandle );
+ if (obj) {
+ m_customizedDomObjects.remove( obj );
+ return true;
+ }
+ else
+ return false;
+ }
+ void clear() {
+ m_customizedDomObjects.clear();
+ m_domObjects.clear();
+ }
+ /**
+ * Static method. Makes all interpreters forget about the object
+ */
+ static void forgetDOMObject( void* objectHandle );
+
+ /**
+ * Mark objects in the DOMObject cache.
+ */
+ virtual void mark();
+ KParts::ReadOnlyPart* part() const;
+
+ virtual int rtti() { return 1; }
+
+ /**
+ * Set the event that is triggering the execution of a script, if any
+ */
+ void setCurrentEvent( DOM::Event *evt ) { m_evt = evt; }
+ void setInlineCode( bool inlineCode ) { m_inlineCode = inlineCode; }
+ void setProcessingTimerCallback( bool timerCallback ) { m_timerCallback = timerCallback; }
+ /**
+ * "Smart" window.open policy
+ */
+ bool isWindowOpenAllowed() const;
+
+ private:
+ tdehtml::ChildFrame* m_frame;
+ TQPtrDict<DOMObject> m_domObjects;
+ TQPtrDict<void> m_customizedDomObjects; //Objects which had custom properties set,
+ //and should not be GC'd. key is DOMObject*
+ DOM::Event *m_evt;
+ bool m_inlineCode;
+ bool m_timerCallback;
+ };
+ /**
+ * Retrieve from cache, or create, a KJS object around a DOM object
+ */
+ template<class DOMObj, class KJSDOMObj>
+ inline Value cacheDOMObject(ExecState *exec, DOMObj domObj)
+ {
+ DOMObject *ret;
+ if (domObj.isNull())
+ return Null();
+ ScriptInterpreter* interp = static_cast<ScriptInterpreter *>(exec->interpreter());
+ if ((ret = interp->getDOMObject(domObj.handle())))
+ return Value(ret);
+ else {
+ ret = new KJSDOMObj(exec, domObj);
+ interp->putDOMObject(domObj.handle(),ret);
+ return Value(ret);
+ }
+ }
+
+ /**
+ * Convert an object to a Node. Returns a null Node if not possible.
+ */
+ DOM::Node toNode(const Value&);
+ /**
+ * Get a String object, or Null() if s is null
+ */
+ Value getString(DOM::DOMString s);
+
+ /**
+ * Convery a KJS value into a QVariant
+ */
+ TQVariant ValueToVariant(ExecState* exec, const Value& val);
+
+ /**
+ * We need a modified version of lookupGet because
+ * we call tryGet instead of get, in DOMObjects.
+ */
+ template <class FuncImp, class ThisImp, class ParentImp>
+ inline Value DOMObjectLookupGet(ExecState *exec, const Identifier &propertyName,
+ const HashTable* table, const ThisImp* thisObj)
+ {
+ const HashEntry* entry = Lookup::findEntry(table, propertyName);
+
+ if (!entry) // not found, forward to parent
+ return thisObj->ParentImp::tryGet(exec, propertyName);
+
+ if (entry->attr & Function) {
+ return lookupOrCreateFunction<FuncImp>(exec, propertyName, thisObj, entry->value, entry->params, entry->attr);
+ }
+ return thisObj->getValueProperty(exec, entry->value);
+ }
+
+ /**
+ * Simplified version of DOMObjectLookupGet in case there are no
+ * functions, only "values".
+ */
+ template <class ThisImp, class ParentImp>
+ inline Value DOMObjectLookupGetValue(ExecState *exec, const Identifier &propertyName,
+ const HashTable* table, const ThisImp* thisObj)
+ {
+ const HashEntry* entry = Lookup::findEntry(table, propertyName);
+
+ if (!entry) // not found, forward to parent
+ return thisObj->ParentImp::tryGet(exec, propertyName);
+
+ if (entry->attr & Function)
+ fprintf(stderr, "Function bit set! Shouldn't happen in lookupValue!\n" );
+ return thisObj->getValueProperty(exec, entry->value);
+ }
+
+ /**
+ * We need a modified version of lookupPut because
+ * we call tryPut instead of put, in DOMObjects.
+ */
+ template <class ThisImp, class ParentImp>
+ inline void DOMObjectLookupPut(ExecState *exec, const Identifier &propertyName,
+ const Value& value, int attr,
+ const HashTable* table, ThisImp* thisObj)
+ {
+ const HashEntry* entry = Lookup::findEntry(table, propertyName);
+
+ if (!entry) // not found: forward to parent
+ thisObj->ParentImp::tryPut(exec, propertyName, value, attr);
+ else if (entry->attr & Function) // function: put as override property
+ thisObj->ObjectImp::put(exec, propertyName, value, attr);
+ else if (entry->attr & ReadOnly) // readonly! Can't put!
+#ifdef KJS_VERBOSE
+ fprintf(stderr,"WARNING: Attempt to change value of readonly property '%s'\n",propertyName.ascii());
+#else
+ ; // do nothing
+#endif
+ else
+ thisObj->putValueProperty(exec, entry->value, value, attr);
+ }
+
+// Versions of prototype functions that properly support instanceof,
+// and are compatible with trunk.
+#define KJS_DEFINE_PROTOTYPE_IMP(ClassProto,ProtoCode) \
+ class ClassProto : public ObjectImp { \
+ friend Object cacheGlobalObject<ClassProto>(ExecState *exec, const Identifier &propertyName); \
+ public: \
+ static Object self(ExecState *exec); \
+ virtual const ClassInfo *classInfo() const { return &info; } \
+ static const ClassInfo info; \
+ Value get(ExecState *exec, const Identifier &propertyName) const; \
+ protected: \
+ ClassProto( ExecState *exec ) \
+ : ObjectImp( ProtoCode ) {} \
+ \
+ static Identifier* s_name; \
+ static Identifier* name(); \
+ };
+
+#define KJS_DEFINE_PROTOTYPE(ClassProto) \
+ KJS_DEFINE_PROTOTYPE_IMP(ClassProto, exec->interpreter()->builtinObjectPrototype())
+
+#define KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(ClassProto, ClassProtoProto) \
+ KJS_DEFINE_PROTOTYPE_IMP(ClassProto, ClassProtoProto::self(exec))
+
+#define KJS_EMPTY_PROTOTYPE_IMP(ClassName, ClassProto, ProtoCode) \
+ class ClassProto : public ObjectImp { \
+ friend Object cacheGlobalObject<ClassProto>(ExecState *exec, const Identifier &propertyName); \
+ public: \
+ static Object self(ExecState *exec) { \
+ return cacheGlobalObject<ClassProto>(exec, *name()); \
+ } \
+ virtual const ClassInfo *classInfo() const { return &info; } \
+ static const ClassInfo info; \
+ protected: \
+ ClassProto( ExecState *exec ) \
+ : ObjectImp( ProtoCode ) {} \
+ \
+ static Identifier* s_name; \
+ static Identifier* name() { \
+ if (!s_name) s_name = new Identifier("[[" ClassName ".prototype]]"); \
+ return s_name; \
+ }\
+ }; \
+ Identifier* ClassProto::s_name = 0; \
+ const ClassInfo ClassProto::info = { ClassName, 0, 0, 0 };
+
+#define KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE(ClassName, ClassProto, ClassProtoProto) \
+ KJS_EMPTY_PROTOTYPE_IMP(ClassName, ClassProto, ClassProtoProto::self(exec))
+
+//### this doesn't implement hasProperty, but stuff in lookup.h didn't
+//either (just did the forward)
+#define KJS_IMPLEMENT_PROTOTYPE(ClassName, ClassProto, ClassFunc) \
+ const ClassInfo ClassProto::info = { ClassName, 0, &ClassProto##Table, 0 }; \
+ Identifier* ClassProto::s_name = 0; \
+ Object ClassProto::self(ExecState *exec) \
+ { \
+ return cacheGlobalObject<ClassProto>(exec, *name()); \
+ } \
+ Value ClassProto::get(ExecState *exec, const Identifier &propertyName) const \
+ { \
+ /*fprintf( stderr, "%sProto::get(%s) [in macro, no parent]\n", info.className, propertyName.ascii());*/ \
+ return lookupGetFunction<ClassFunc,ObjectImp>(exec, propertyName, &ClassProto##Table, this ); \
+ } \
+ Identifier* ClassProto::name() \
+ { \
+ if (!s_name) s_name = new Identifier("[[" ClassName ".prototype]]"); \
+ return s_name; \
+ }
+
+ // Modified version of IMPLEMENT_PROTOFUNC, to use DOMFunction and tryCall
+#define IMPLEMENT_PROTOFUNC_DOM(ClassFunc) \
+ class ClassFunc : public DOMFunction { \
+ public: \
+ ClassFunc(ExecState *exec, int i, int len) \
+ : DOMFunction( exec ), id(i) { \
+ Value protect(this); \
+ put(exec,lengthPropertyName,Number(len),DontDelete|ReadOnly|DontEnum); \
+ } \
+ /** You need to implement that one */ \
+ virtual Value tryCall(ExecState *exec, Object &thisObj, const List &args); \
+ private: \
+ int id; \
+ };
+
+ Value getLiveConnectValue(KParts::LiveConnectExtension *lc, const TQString & name, const int type, const TQString & value, int id);
+
+
+// This is used to create pseudo-constructor objects, like Mozillaish
+// Element, HTMLDocument, etc., which do not act like real constructors,
+// but do have the prototype property pointing to prototype of "instances"
+#define DEFINE_PSEUDO_CONSTRUCTOR(ClassName) \
+ class ClassName : public DOMObject { \
+ public: \
+ ClassName(ExecState *); \
+ virtual const ClassInfo* classInfo() const { return &info; } \
+ static const ClassInfo info; \
+ static Object self(ExecState *exec); \
+ };
+
+#define IMPLEMENT_PSEUDO_CONSTRUCTOR_IMP(Class,ClassName,ProtoClass,ParentProto) \
+ const ClassInfo Class::info = { ClassName, 0, 0, 0 }; \
+ Class::Class(ExecState* exec): DOMObject(ParentProto) {\
+ Object proto = ProtoClass::self(exec); \
+ putDirect(prototypePropertyName, proto.imp(), DontDelete|ReadOnly); \
+ }\
+ Object Class::self(ExecState *exec) { \
+ return Object(cacheGlobalObject<Class>(exec, "[[" ClassName ".constructor]]")); \
+ }
+
+#define IMPLEMENT_PSEUDO_CONSTRUCTOR(Class,ClassName,ProtoClass) \
+ IMPLEMENT_PSEUDO_CONSTRUCTOR_IMP(Class,ClassName,ProtoClass,exec->lexicalInterpreter()->builtinObjectPrototype())
+
+#define IMPLEMENT_PSEUDO_CONSTRUCTOR_WITH_PARENT(Class,ClassName,ProtoClass,ParentProtoClass) \
+ IMPLEMENT_PSEUDO_CONSTRUCTOR_IMP(Class,ClassName,ProtoClass,ParentProtoClass::self(exec))
+
+// This declares a constant table, which merely maps everything in its
+// table to its token value. Can be used as a prototype
+#define DEFINE_CONSTANT_TABLE(Class) \
+ class Class : public DOMObject { \
+ public: \
+ Class(ExecState *exec): DOMObject(exec->lexicalInterpreter()->builtinObjectPrototype()) {} \
+ \
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;\
+ Value getValueProperty(ExecState * /*exec*/, int token) const; \
+ virtual const ClassInfo* classInfo() const { return &info; } \
+ static const ClassInfo info; \
+ static Object self(ExecState *exec);\
+ static Identifier* s_name; \
+ static Identifier* name(); \
+ };
+
+// Emits an implementation of a constant table
+#define IMPLEMENT_CONSTANT_TABLE(Class,ClassName) \
+ Value Class::tryGet(ExecState *exec, const Identifier &propertyName) const { \
+ return DOMObjectLookupGetValue<Class, DOMObject>(exec, propertyName, &Class##Table, this);\
+ } \
+ Value Class::getValueProperty(ExecState * /*exec*/, int token) const { \
+ /* We use the token as the value to return directly*/ \
+ return Number((unsigned int)token); \
+ } \
+ Object Class::self(ExecState *exec) { \
+ return cacheGlobalObject<Class>(exec, *name()); \
+ } \
+ Identifier* Class::s_name = 0; \
+ Identifier* Class::name() { \
+ if (!s_name) s_name = new Identifier("[[" ClassName ".constant_table]]"); \
+ return s_name; \
+ } \
+ const ClassInfo Class::info = { ClassName, 0, &Class##Table, 0 };
+
+
+// Hide some of the stuff in lookup.h..
+#undef PUBLIC_DEFINE_PROTOTYPE
+#undef DEFINE_PROTOTYPE
+#undef IMPLEMENT_PROTOTYPE
+#undef PUBLIC_IMPLEMENT_PROTOTYPE
+#undef IMPLEMENT_PROTOTYPE_WITH_PARENT
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_css.cpp b/tdehtml/ecma/kjs_css.cpp
new file mode 100644
index 000000000..b42f9dd02
--- /dev/null
+++ b/tdehtml/ecma/kjs_css.cpp
@@ -0,0 +1,1302 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "kjs_css.h"
+#include "kjs_css.lut.h"
+
+#include <dom/html_head.h> // for HTMLStyleElement
+
+#include <css/css_base.h>
+#include "kjs_dom.h"
+
+
+#include <kdebug.h>
+
+namespace KJS {
+
+static TQString cssPropertyName( const Identifier &p, bool& hadPixelPrefix )
+{
+ TQString prop = p.qstring();
+ int i = prop.length();
+ while ( --i ) {
+ char c = prop[i].latin1();
+ if ( c >= 'A' && c <= 'Z' )
+ prop.insert( i, '-' );
+ }
+
+ prop = prop.lower();
+ hadPixelPrefix = false;
+
+ if (prop.startsWith("css-")) {
+ prop = prop.mid(4);
+ } else if (prop.startsWith("pixel-")) {
+ prop = prop.mid(6);
+ hadPixelPrefix = true;
+ } else if (prop.startsWith("pos-")) {
+ prop = prop.mid(4);
+ hadPixelPrefix = true;
+ }
+
+ return prop;
+}
+
+/*
+@begin DOMCSSStyleDeclarationProtoTable 7
+ getPropertyValue DOMCSSStyleDeclaration::GetPropertyValue DontDelete|Function 1
+ getPropertyCSSValue DOMCSSStyleDeclaration::GetPropertyCSSValue DontDelete|Function 1
+ removeProperty DOMCSSStyleDeclaration::RemoveProperty DontDelete|Function 1
+ getPropertyPriority DOMCSSStyleDeclaration::GetPropertyPriority DontDelete|Function 1
+ setProperty DOMCSSStyleDeclaration::SetProperty DontDelete|Function 3
+ item DOMCSSStyleDeclaration::Item DontDelete|Function 1
+# IE names for it (#36063)
+ getAttribute DOMCSSStyleDeclaration::GetPropertyValue DontDelete|Function 1
+ removeAttribute DOMCSSStyleDeclaration::RemoveProperty DontDelete|Function 1
+ setAttribute DOMCSSStyleDeclaration::SetProperty DontDelete|Function 3
+@end
+@begin DOMCSSStyleDeclarationTable 3
+ cssText DOMCSSStyleDeclaration::CssText DontDelete
+ length DOMCSSStyleDeclaration::Length DontDelete|ReadOnly
+ parentRule DOMCSSStyleDeclaration::ParentRule DontDelete|ReadOnly
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMCSSStyleDeclarationProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMCSSStyleDeclarationProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMCSSStyleDeclaration", DOMCSSStyleDeclarationProto, DOMCSSStyleDeclarationProtoFunc)
+
+IMPLEMENT_PSEUDO_CONSTRUCTOR(CSSStyleDeclarationPseudoCtor, "DOMCSSStyleDeclaration",DOMCSSStyleDeclarationProto)
+
+const ClassInfo DOMCSSStyleDeclaration::info = { "CSSStyleDeclaration", 0, &DOMCSSStyleDeclarationTable, 0 };
+
+DOMCSSStyleDeclaration::DOMCSSStyleDeclaration(ExecState *exec, const DOM::CSSStyleDeclaration& s)
+ : DOMObject(DOMCSSStyleDeclarationProto::self(exec)), styleDecl(s)
+{ }
+
+DOMCSSStyleDeclaration::~DOMCSSStyleDeclaration()
+{
+ ScriptInterpreter::forgetDOMObject(styleDecl.handle());
+}
+
+bool DOMCSSStyleDeclaration::hasProperty(ExecState *exec, const Identifier &p) const
+{
+ bool hadPixelPrefix;
+ TQString cssprop = cssPropertyName(p, hadPixelPrefix);
+ if (DOM::getPropertyID(cssprop.latin1(), cssprop.length()))
+ return true;
+
+ return ObjectImp::hasProperty(exec, p);
+}
+
+Value DOMCSSStyleDeclaration::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMCSSStyleDeclaration::tryGet " << propertyName.qstring() << endl;
+#endif
+ const HashEntry* entry = Lookup::findEntry(&DOMCSSStyleDeclarationTable, propertyName);
+ if (entry)
+ switch (entry->value) {
+ case CssText:
+ return String(styleDecl.cssText());
+ case Length:
+ return Number(styleDecl.length());
+ case ParentRule:
+ return getDOMCSSRule(exec,styleDecl.parentRule());
+ default:
+ break;
+ }
+
+ // Look in the prototype (for functions) before assuming it's a name
+ Object proto = Object::dynamicCast(prototype());
+ if (proto.isValid() && proto.hasProperty(exec,propertyName))
+ return proto.get(exec,propertyName);
+
+ bool ok;
+ long unsigned int u = propertyName.toULong(&ok);
+ if (ok)
+ return String(DOM::CSSStyleDeclaration(styleDecl).item(u));
+
+ // pixelTop returns "CSS Top" as number value in unit pixels
+ // posTop returns "CSS top" as number value in unit pixels _if_ its a
+ // positioned element. if it is not a positioned element, return 0
+ // from MSIE documentation ### IMPLEMENT THAT (Dirk)
+ bool asNumber;
+ TQString p = cssPropertyName(propertyName, asNumber);
+
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMCSSStyleDeclaration: converting to css property name: " << p << ( asNumber ? "px" : "" ) << endl;
+#endif
+
+ if (asNumber) {
+ DOM::CSSValue v = styleDecl.getPropertyCSSValue(p);
+ if ( !v.isNull() && v.cssValueType() == DOM::CSSValue::CSS_PRIMITIVE_VALUE)
+ return Number(static_cast<DOM::CSSPrimitiveValue>(v).getFloatValue(DOM::CSSPrimitiveValue::CSS_PX));
+ }
+
+ DOM::DOMString str = const_cast<DOM::CSSStyleDeclaration &>( styleDecl ).getPropertyValue(p);
+ if (!str.isNull())
+ return String(str);
+
+ // see if we know this css property, return empty then
+ if (DOM::getPropertyID(p.latin1(), p.length()))
+ return String(DOM::DOMString(""));
+
+ return DOMObject::tryGet(exec, propertyName);
+}
+
+
+void DOMCSSStyleDeclaration::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr )
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMCSSStyleDeclaration::tryPut " << propertyName.qstring() << endl;
+#endif
+ if (propertyName == "cssText") {
+ styleDecl.setCssText(value.toString(exec).string());
+ }
+ else {
+ bool pxSuffix;
+ TQString prop = cssPropertyName(propertyName, pxSuffix);
+ TQString propvalue = value.toString(exec).qstring();
+
+ if (pxSuffix)
+ propvalue += "px";
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMCSSStyleDeclaration: prop=" << prop << " propvalue=" << propvalue << endl;
+#endif
+ // Look whether the property is known.d In that case add it as a CSS property.
+ if (DOM::getPropertyID(prop.latin1(), prop.length())) {
+ if (propvalue.isEmpty())
+ styleDecl.removeProperty(prop);
+ else {
+ int important = propvalue.find("!important", 0, false);
+ if (important == -1)
+ styleDecl.setProperty(prop, DOM::DOMString(propvalue), "");
+ else
+ styleDecl.setProperty(prop, DOM::DOMString(propvalue.left(important - 1)), "important");
+ }
+ }
+ else
+ // otherwise add it as a JS property
+ DOMObject::tryPut( exec, propertyName, value, attr );
+ }
+}
+
+Value DOMCSSStyleDeclarationProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMCSSStyleDeclaration, thisObj );
+ DOM::CSSStyleDeclaration styleDecl = static_cast<DOMCSSStyleDeclaration *>(thisObj.imp())->toStyleDecl();
+ String str = args[0].toString(exec);
+ DOM::DOMString s = str.value().string();
+
+ switch (id) {
+ case DOMCSSStyleDeclaration::GetPropertyValue:
+ return String(styleDecl.getPropertyValue(s));
+ case DOMCSSStyleDeclaration::GetPropertyCSSValue:
+ return getDOMCSSValue(exec,styleDecl.getPropertyCSSValue(s));
+ case DOMCSSStyleDeclaration::RemoveProperty:
+ return String(styleDecl.removeProperty(s));
+ case DOMCSSStyleDeclaration::GetPropertyPriority:
+ return String(styleDecl.getPropertyPriority(s));
+ case DOMCSSStyleDeclaration::SetProperty:
+ styleDecl.setProperty(args[0].toString(exec).string(),
+ args[1].toString(exec).string(),
+ args[2].toString(exec).string());
+ return Undefined();
+ case DOMCSSStyleDeclaration::Item:
+ return String(styleDecl.item(args[0].toInteger(exec)));
+ default:
+ return Undefined();
+ }
+}
+
+Value getDOMCSSStyleDeclaration(ExecState *exec, const DOM::CSSStyleDeclaration& s)
+{
+ return cacheDOMObject<DOM::CSSStyleDeclaration, KJS::DOMCSSStyleDeclaration>(exec, s);
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMStyleSheet::info = { "StyleSheet", 0, &DOMStyleSheetTable, 0 };
+/*
+@begin DOMStyleSheetTable 7
+ type DOMStyleSheet::Type DontDelete|ReadOnly
+ disabled DOMStyleSheet::Disabled DontDelete
+ ownerNode DOMStyleSheet::OwnerNode DontDelete|ReadOnly
+ parentStyleSheet DOMStyleSheet::ParentStyleSheet DontDelete|ReadOnly
+ href DOMStyleSheet::Href DontDelete|ReadOnly
+ title DOMStyleSheet::Title DontDelete|ReadOnly
+ media DOMStyleSheet::Media DontDelete|ReadOnly
+@end
+*/
+
+DOMStyleSheet::DOMStyleSheet(ExecState* exec, const DOM::StyleSheet& ss)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), styleSheet(ss)
+{
+}
+
+DOMStyleSheet::~DOMStyleSheet()
+{
+ ScriptInterpreter::forgetDOMObject(styleSheet.handle());
+}
+
+Value DOMStyleSheet::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+ return DOMObjectLookupGetValue<DOMStyleSheet,DOMObject>(exec,propertyName,&DOMStyleSheetTable,this);
+}
+
+Value DOMStyleSheet::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case Type:
+ return String(styleSheet.type());
+ case Disabled:
+ return Boolean(styleSheet.disabled());
+ case OwnerNode:
+ return getDOMNode(exec,styleSheet.ownerNode());
+ case ParentStyleSheet:
+ return getDOMStyleSheet(exec,styleSheet.parentStyleSheet());
+ case Href:
+ return String(styleSheet.href());
+ case Title:
+ return String(styleSheet.title());
+ case Media:
+ return getDOMMediaList(exec, styleSheet.media());
+ }
+ return Value();
+}
+
+void DOMStyleSheet::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+ if (propertyName == "disabled") {
+ styleSheet.setDisabled(value.toBoolean(exec));
+ }
+ else
+ DOMObject::tryPut(exec, propertyName, value, attr);
+}
+
+Value getDOMStyleSheet(ExecState *exec, const DOM::StyleSheet& ss)
+{
+ DOMObject *ret;
+ if (ss.isNull())
+ return Null();
+ ScriptInterpreter* interp = static_cast<ScriptInterpreter *>(exec->interpreter());
+ if ((ret = interp->getDOMObject(ss.handle())))
+ return Value(ret);
+ else {
+ if (ss.isCSSStyleSheet()) {
+ DOM::CSSStyleSheet cs;
+ cs = ss;
+ ret = new DOMCSSStyleSheet(exec,cs);
+ }
+ else
+ ret = new DOMStyleSheet(exec,ss);
+ interp->putDOMObject(ss.handle(),ret);
+ return Value(ret);
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMStyleSheetList::info = { "StyleSheetList", 0, &DOMStyleSheetListTable, 0 };
+
+/*
+@begin DOMStyleSheetListTable 2
+ length DOMStyleSheetList::Length DontDelete|ReadOnly
+ item DOMStyleSheetList::Item DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(DOMStyleSheetListFunc) // not really a proto, but doesn't matter
+
+DOMStyleSheetList::DOMStyleSheetList(ExecState *exec, const DOM::StyleSheetList& ssl, const DOM::Document& doc)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), styleSheetList(ssl), m_doc(doc)
+{
+}
+
+DOMStyleSheetList::~DOMStyleSheetList()
+{
+ ScriptInterpreter::forgetDOMObject(styleSheetList.handle());
+}
+
+Value DOMStyleSheetList::tryGet(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMStyleSheetList::tryGet " << p.qstring() << endl;
+#endif
+ if (p == lengthPropertyName)
+ return Number(styleSheetList.length());
+ else if (p == "item")
+ return lookupOrCreateFunction<DOMStyleSheetListFunc>(exec,p,this,DOMStyleSheetList::Item,1,DontDelete|Function);
+
+ // Retrieve stylesheet by index
+ bool ok;
+ long unsigned int u = p.toULong(&ok);
+ if (ok)
+ return getDOMStyleSheet(exec, DOM::StyleSheetList(styleSheetList).item(u));
+
+ // IE also supports retrieving a stylesheet by name, using the name/id of the <style> tag
+ // (this is consistent with all the other collections)
+#if 0
+ // Bad implementation because DOM::StyleSheet doesn't inherit DOM::Node
+ // so we can't use DOMNamedNodesCollection.....
+ // We could duplicate it for stylesheets though - worth it ?
+ // Other problem of this implementation: it doesn't look for the ID attribute!
+ DOM::NameNodeListImpl namedList( m_doc.documentElement().handle(), p.string() );
+ int len = namedList.length();
+ if ( len ) {
+ TQValueList<DOM::Node> styleSheets;
+ for ( int i = 0 ; i < len ; ++i ) {
+ DOM::HTMLStyleElement elem = DOM::Node(namedList.item(i));
+ if (!elem.isNull())
+ styleSheets.append(elem.sheet());
+ }
+ if ( styleSheets.count() == 1 ) // single result
+ return getDOMStyleSheet(exec, styleSheets[0]);
+ else if ( styleSheets.count() > 1 ) {
+ return new DOMNamedItemsCollection(exec,styleSheets);
+ }
+ }
+#endif
+ // ### Bad implementation because returns a single element (are IDs always unique?)
+ // and doesn't look for name attribute (see implementation above).
+ // But unicity of stylesheet ids is good practice anyway ;)
+ DOM::DOMString pstr = p.string();
+ DOM::HTMLStyleElement styleElem = m_doc.getElementById( pstr );
+ if (!styleElem.isNull())
+ return getDOMStyleSheet(exec, styleElem.sheet());
+
+ return DOMObject::tryGet(exec, p);
+}
+
+Value KJS::DOMStyleSheetList::call(ExecState *exec, Object &thisObj, const List &args)
+{
+ // This code duplication is necessary, DOMStyleSheetList isn't a DOMFunction
+ Value val;
+ try {
+ val = tryCall(exec, thisObj, args);
+ }
+ // pity there's no way to distinguish between these in JS code
+ catch (...) {
+ Object err = Error::create(exec, GeneralError, "Exception from DOMStyleSheetList");
+ exec->setException(err);
+ }
+ return val;
+}
+
+Value DOMStyleSheetList::tryCall(ExecState *exec, Object & /*thisObj*/, const List &args)
+{
+ if (args.size() == 1) {
+ // support for styleSheets(<index>) and styleSheets(<name>)
+ return tryGet( exec, Identifier(args[0].toString(exec)) );
+ }
+ return Undefined();
+}
+
+Value getDOMStyleSheetList(ExecState *exec, const DOM::StyleSheetList& ssl, const DOM::Document& doc)
+{
+ // Can't use the cacheDOMObject macro because of the doc argument
+ DOMObject *ret;
+ if (ssl.isNull())
+ return Null();
+ ScriptInterpreter* interp = static_cast<ScriptInterpreter *>(exec->interpreter());
+ if ((ret = interp->getDOMObject(ssl.handle())))
+ return Value(ret);
+ else {
+ ret = new DOMStyleSheetList(exec, ssl, doc);
+ interp->putDOMObject(ssl.handle(),ret);
+ return Value(ret);
+ }
+}
+
+Value DOMStyleSheetListFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMStyleSheetList, thisObj );
+ DOM::StyleSheetList styleSheetList = static_cast<DOMStyleSheetList *>(thisObj.imp())->toStyleSheetList();
+ if (id == DOMStyleSheetList::Item)
+ return getDOMStyleSheet(exec, styleSheetList.item(args[0].toInteger(exec)));
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMMediaList::info = { "MediaList", 0, &DOMMediaListTable, 0 };
+
+/*
+@begin DOMMediaListTable 2
+ mediaText DOMMediaList::MediaText DontDelete|ReadOnly
+ length DOMMediaList::Length DontDelete|ReadOnly
+@end
+@begin DOMMediaListProtoTable 3
+ item DOMMediaList::Item DontDelete|Function 1
+ deleteMedium DOMMediaList::DeleteMedium DontDelete|Function 1
+ appendMedium DOMMediaList::AppendMedium DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMMediaListProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMMediaListProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMMediaList", DOMMediaListProto, DOMMediaListProtoFunc)
+
+DOMMediaList::DOMMediaList(ExecState *exec, const DOM::MediaList& ml)
+ : DOMObject(DOMMediaListProto::self(exec)), mediaList(ml) { }
+
+DOMMediaList::~DOMMediaList()
+{
+ ScriptInterpreter::forgetDOMObject(mediaList.handle());
+}
+
+Value DOMMediaList::tryGet(ExecState *exec, const Identifier &p) const
+{
+ if (p == "mediaText")
+ return String(mediaList.mediaText());
+ else if (p == lengthPropertyName)
+ return Number(mediaList.length());
+
+ bool ok;
+ long unsigned int u = p.toULong(&ok);
+ if (ok)
+ return String(mediaList.item(u));
+
+ return DOMObject::tryGet(exec, p);
+}
+
+void DOMMediaList::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+ if (propertyName == "mediaText")
+ mediaList.setMediaText(value.toString(exec).string());
+ else
+ DOMObject::tryPut(exec, propertyName, value, attr);
+}
+
+Value getDOMMediaList(ExecState *exec, const DOM::MediaList& ml)
+{
+ return cacheDOMObject<DOM::MediaList, KJS::DOMMediaList>(exec, ml);
+}
+
+Value KJS::DOMMediaListProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMMediaList, thisObj );
+ DOM::MediaList mediaList = static_cast<DOMMediaList *>(thisObj.imp())->toMediaList();
+ switch (id) {
+ case DOMMediaList::Item:
+ return String(mediaList.item(args[0].toInteger(exec)));
+ case DOMMediaList::DeleteMedium:
+ mediaList.deleteMedium(args[0].toString(exec).string());
+ return Undefined();
+ case DOMMediaList::AppendMedium:
+ mediaList.appendMedium(args[0].toString(exec).string());
+ return Undefined();
+ default:
+ return Undefined();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMCSSStyleSheet::info = { "CSSStyleSheet", 0, &DOMCSSStyleSheetTable, 0 };
+
+/*
+@begin DOMCSSStyleSheetTable 2
+ ownerRule DOMCSSStyleSheet::OwnerRule DontDelete|ReadOnly
+ cssRules DOMCSSStyleSheet::CssRules DontDelete|ReadOnly
+# MSIE extension
+ rules DOMCSSStyleSheet::Rules DontDelete|ReadOnly
+@end
+@begin DOMCSSStyleSheetProtoTable 2
+ insertRule DOMCSSStyleSheet::InsertRule DontDelete|Function 2
+ deleteRule DOMCSSStyleSheet::DeleteRule DontDelete|Function 1
+# IE extensions
+ addRule DOMCSSStyleSheet::AddRule DontDelete|Function 3
+ removeRule DOMCSSStyleSheet::RemoveRule DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMCSSStyleSheetProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMCSSStyleSheetProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMCSSStyleSheet",DOMCSSStyleSheetProto,DOMCSSStyleSheetProtoFunc) // warning, use _WITH_PARENT if DOMStyleSheet gets a proto
+
+DOMCSSStyleSheet::DOMCSSStyleSheet(ExecState *exec, const DOM::CSSStyleSheet& ss)
+ : DOMStyleSheet(DOMCSSStyleSheetProto::self(exec),ss) { }
+
+DOMCSSStyleSheet::~DOMCSSStyleSheet()
+{
+}
+
+Value DOMCSSStyleSheet::tryGet(ExecState *exec, const Identifier &p) const
+{
+ DOM::CSSStyleSheet cssStyleSheet = static_cast<DOM::CSSStyleSheet>(styleSheet);
+ if (p == "ownerRule")
+ return getDOMCSSRule(exec,cssStyleSheet.ownerRule());
+ else if (p == "cssRules" || p == "rules" /* MSIE extension */)
+ return getDOMCSSRuleList(exec,cssStyleSheet.cssRules());
+ return DOMStyleSheet::tryGet(exec,p);
+}
+
+Value DOMCSSStyleSheetProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMCSSStyleSheet, thisObj );
+ DOM::CSSStyleSheet styleSheet = static_cast<DOMCSSStyleSheet *>(thisObj.imp())->toCSSStyleSheet();
+
+ switch (id) {
+ case DOMCSSStyleSheet::InsertRule:
+ return Number(styleSheet.insertRule(args[0].toString(exec).string(),(long unsigned int)args[1].toInteger(exec)));
+ case DOMCSSStyleSheet::DeleteRule:
+ styleSheet.deleteRule(args[0].toInteger(exec));
+ return Undefined();
+ // IE extensions
+ case DOMCSSStyleSheet::AddRule: {
+ //Unpassed/-1 means append. Since insertRule is picky (throws exceptions)
+ //we adjust it to the desired length
+ unsigned long index = args[2].toInteger(exec);
+ unsigned long length = styleSheet.cssRules().length();
+ if (args[2].type() == UndefinedType) index = length;
+ if (index > length) index = length;
+ DOM::DOMString str = args[0].toString(exec).string() + " { " + args[1].toString(exec).string() + " } ";
+ return Number(styleSheet.insertRule(str,index));
+ }
+ case DOMCSSStyleSheet::RemoveRule: {
+ int index = args.size() > 0 ? args[0].toInteger(exec) : 0 /*first one*/;
+ styleSheet.deleteRule(index);
+ return Undefined();
+ }
+ default:
+ return Undefined();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMCSSRuleList::info = { "CSSRuleList", 0, &DOMCSSRuleListTable, 0 };
+/*
+@begin DOMCSSRuleListTable 3
+ length DOMCSSRuleList::Length DontDelete|ReadOnly
+ item DOMCSSRuleList::Item DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(DOMCSSRuleListFunc) // not really a proto, but doesn't matter
+
+DOMCSSRuleList::DOMCSSRuleList(ExecState* exec, const DOM::CSSRuleList& rl)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), cssRuleList(rl)
+{
+}
+
+DOMCSSRuleList::~DOMCSSRuleList()
+{
+ ScriptInterpreter::forgetDOMObject(cssRuleList.handle());
+}
+
+Value DOMCSSRuleList::tryGet(ExecState *exec, const Identifier &p) const
+{
+ Value result;
+ if (p == lengthPropertyName)
+ return Number(cssRuleList.length());
+ else if (p == "item")
+ return lookupOrCreateFunction<DOMCSSRuleListFunc>(exec,p,this,DOMCSSRuleList::Item,1,DontDelete|Function);
+
+ bool ok;
+ long unsigned int u = p.toULong(&ok);
+ if (ok)
+ return getDOMCSSRule(exec,DOM::CSSRuleList(cssRuleList).item(u));
+
+ return DOMObject::tryGet(exec,p);
+}
+
+Value DOMCSSRuleListFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMCSSRuleList, thisObj );
+ DOM::CSSRuleList cssRuleList = static_cast<DOMCSSRuleList *>(thisObj.imp())->toCSSRuleList();
+ switch (id) {
+ case DOMCSSRuleList::Item:
+ return getDOMCSSRule(exec,cssRuleList.item(args[0].toInteger(exec)));
+ default:
+ return Undefined();
+ }
+}
+
+Value getDOMCSSRuleList(ExecState *exec, const DOM::CSSRuleList& rl)
+{
+ return cacheDOMObject<DOM::CSSRuleList, KJS::DOMCSSRuleList>(exec, rl);
+}
+
+// -------------------------------------------------------------------------
+
+IMPLEMENT_PROTOFUNC_DOM(DOMCSSRuleFunc) // Not a proto, but doesn't matter
+
+DOMCSSRule::DOMCSSRule(ExecState* exec, const DOM::CSSRule& r)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), cssRule(r)
+{
+}
+
+DOMCSSRule::~DOMCSSRule()
+{
+ ScriptInterpreter::forgetDOMObject(cssRule.handle());
+}
+
+const ClassInfo DOMCSSRule::info = { "CSSRule", 0, &DOMCSSRuleTable, 0 };
+const ClassInfo DOMCSSRule::style_info = { "CSSStyleRule", &DOMCSSRule::info, &DOMCSSStyleRuleTable, 0 };
+const ClassInfo DOMCSSRule::media_info = { "CSSMediaRule", &DOMCSSRule::info, &DOMCSSMediaRuleTable, 0 };
+const ClassInfo DOMCSSRule::fontface_info = { "CSSFontFaceRule", &DOMCSSRule::info, &DOMCSSFontFaceRuleTable, 0 };
+const ClassInfo DOMCSSRule::page_info = { "CSSPageRule", &DOMCSSRule::info, &DOMCSSPageRuleTable, 0 };
+const ClassInfo DOMCSSRule::import_info = { "CSSImportRule", &DOMCSSRule::info, &DOMCSSImportRuleTable, 0 };
+const ClassInfo DOMCSSRule::charset_info = { "CSSCharsetRule", &DOMCSSRule::info, &DOMCSSCharsetRuleTable, 0 };
+
+const ClassInfo* DOMCSSRule::classInfo() const
+{
+ switch (cssRule.type()) {
+ case DOM::CSSRule::STYLE_RULE:
+ return &style_info;
+ case DOM::CSSRule::MEDIA_RULE:
+ return &media_info;
+ case DOM::CSSRule::FONT_FACE_RULE:
+ return &fontface_info;
+ case DOM::CSSRule::PAGE_RULE:
+ return &page_info;
+ case DOM::CSSRule::IMPORT_RULE:
+ return &import_info;
+ case DOM::CSSRule::CHARSET_RULE:
+ return &charset_info;
+ case DOM::CSSRule::UNKNOWN_RULE:
+ default:
+ return &info;
+ }
+}
+/*
+@begin DOMCSSRuleTable 4
+ type DOMCSSRule::Type DontDelete|ReadOnly
+ cssText DOMCSSRule::CssText DontDelete|ReadOnly
+ parentStyleSheet DOMCSSRule::ParentStyleSheet DontDelete|ReadOnly
+ parentRule DOMCSSRule::ParentRule DontDelete|ReadOnly
+@end
+@begin DOMCSSStyleRuleTable 2
+ selectorText DOMCSSRule::Style_SelectorText DontDelete
+ style DOMCSSRule::Style_Style DontDelete|ReadOnly
+@end
+@begin DOMCSSMediaRuleTable 4
+ media DOMCSSRule::Media_Media DontDelete|ReadOnly
+ cssRules DOMCSSRule::Media_CssRules DontDelete|ReadOnly
+ insertRule DOMCSSRule::Media_InsertRule DontDelete|Function 2
+ deleteRule DOMCSSRule::Media_DeleteRule DontDelete|Function 1
+@end
+@begin DOMCSSFontFaceRuleTable 1
+ style DOMCSSRule::FontFace_Style DontDelete|ReadOnly
+@end
+@begin DOMCSSPageRuleTable 2
+ selectorText DOMCSSRule::Page_SelectorText DontDelete
+ style DOMCSSRule::Page_Style DontDelete|ReadOnly
+@end
+@begin DOMCSSImportRuleTable 3
+ href DOMCSSRule::Import_Href DontDelete|ReadOnly
+ media DOMCSSRule::Import_Media DontDelete|ReadOnly
+ styleSheet DOMCSSRule::Import_StyleSheet DontDelete|ReadOnly
+@end
+@begin DOMCSSCharsetRuleTable 1
+ encoding DOMCSSRule::Charset_Encoding DontDelete
+@end
+*/
+Value DOMCSSRule::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMCSSRule::tryGet " << propertyName.qstring() << endl;
+#endif
+ const HashTable* table = classInfo()->propHashTable; // get the right hashtable
+ const HashEntry* entry = Lookup::findEntry(table, propertyName);
+ if (entry) {
+ if (entry->attr & Function)
+ return lookupOrCreateFunction<DOMCSSRuleFunc>(exec, propertyName, this, entry->value, entry->params, entry->attr);
+ return getValueProperty(exec, entry->value);
+ }
+
+ // Base CSSRule stuff or parent class forward, as usual
+ return DOMObjectLookupGet<DOMCSSRuleFunc, DOMCSSRule, DOMObject>(exec, propertyName, &DOMCSSRuleTable, this);
+}
+
+Value DOMCSSRule::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case Type:
+ return Number(cssRule.type());
+ case CssText:
+ return String(cssRule.cssText());
+ case ParentStyleSheet:
+ return getDOMStyleSheet(exec,cssRule.parentStyleSheet());
+ case ParentRule:
+ return getDOMCSSRule(exec,cssRule.parentRule());
+
+ // for DOM::CSSRule::STYLE_RULE:
+ case Style_SelectorText:
+ return String(static_cast<DOM::CSSStyleRule>(cssRule).selectorText());
+ case Style_Style:
+ return getDOMCSSStyleDeclaration(exec,static_cast<DOM::CSSStyleRule>(cssRule).style());
+
+ // for DOM::CSSRule::MEDIA_RULE:
+ case Media_Media:
+ return getDOMMediaList(exec,static_cast<DOM::CSSMediaRule>(cssRule).media());
+ case Media_CssRules:
+ return getDOMCSSRuleList(exec,static_cast<DOM::CSSMediaRule>(cssRule).cssRules());
+
+ // for DOM::CSSRule::FONT_FACE_RULE:
+ case FontFace_Style:
+ return getDOMCSSStyleDeclaration(exec,static_cast<DOM::CSSFontFaceRule>(cssRule).style());
+
+ // for DOM::CSSRule::PAGE_RULE:
+ case Page_SelectorText:
+ return String(static_cast<DOM::CSSPageRule>(cssRule).selectorText());
+ case Page_Style:
+ return getDOMCSSStyleDeclaration(exec,static_cast<DOM::CSSPageRule>(cssRule).style());
+
+ // for DOM::CSSRule::IMPORT_RULE:
+ case Import_Href:
+ return String(static_cast<DOM::CSSImportRule>(cssRule).href());
+ case Import_Media:
+ return getDOMMediaList(exec,static_cast<DOM::CSSImportRule>(cssRule).media());
+ case Import_StyleSheet:
+ return getDOMStyleSheet(exec,static_cast<DOM::CSSImportRule>(cssRule).styleSheet());
+
+ // for DOM::CSSRule::CHARSET_RULE:
+ case Charset_Encoding:
+ return String(static_cast<DOM::CSSCharsetRule>(cssRule).encoding());
+
+ default:
+ kdDebug(6070) << "WARNING: DOMCSSRule::getValueProperty unhandled token " << token << endl;
+ }
+ return Undefined();
+}
+
+void DOMCSSRule::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+ const HashTable* table = classInfo()->propHashTable; // get the right hashtable
+ const HashEntry* entry = Lookup::findEntry(table, propertyName);
+ if (entry) {
+ if (entry->attr & Function) // function: put as override property
+ {
+ ObjectImp::put(exec, propertyName, value, attr);
+ return;
+ }
+ else if ((entry->attr & ReadOnly) == 0) // let DOMObjectLookupPut print the warning if not
+ {
+ putValueProperty(exec, entry->value, value, attr);
+ return;
+ }
+ }
+ DOMObjectLookupPut<DOMCSSRule, DOMObject>(exec, propertyName, value, attr, &DOMCSSRuleTable, this);
+}
+
+void DOMCSSRule::putValueProperty(ExecState *exec, int token, const Value& value, int)
+{
+ switch (token) {
+ // for DOM::CSSRule::STYLE_RULE:
+ case Style_SelectorText:
+ static_cast<DOM::CSSStyleRule>(cssRule).setSelectorText(value.toString(exec).string());
+ return;
+
+ // for DOM::CSSRule::PAGE_RULE:
+ case Page_SelectorText:
+ static_cast<DOM::CSSPageRule>(cssRule).setSelectorText(value.toString(exec).string());
+ return;
+
+ // for DOM::CSSRule::CHARSET_RULE:
+ case Charset_Encoding:
+ static_cast<DOM::CSSCharsetRule>(cssRule).setEncoding(value.toString(exec).string());
+ return;
+
+ default:
+ kdDebug(6070) << "WARNING: DOMCSSRule::putValueProperty unhandled token " << token << endl;
+ }
+}
+
+Value DOMCSSRuleFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMCSSRule, thisObj );
+ DOM::CSSRule cssRule = static_cast<DOMCSSRule *>(thisObj.imp())->toCSSRule();
+
+ if (cssRule.type() == DOM::CSSRule::MEDIA_RULE) {
+ DOM::CSSMediaRule rule = static_cast<DOM::CSSMediaRule>(cssRule);
+ if (id == DOMCSSRule::Media_InsertRule)
+ return Number(rule.insertRule(args[0].toString(exec).string(),args[1].toInteger(exec)));
+ else if (id == DOMCSSRule::Media_DeleteRule)
+ rule.deleteRule(args[0].toInteger(exec));
+ }
+
+ return Undefined();
+}
+
+Value getDOMCSSRule(ExecState *exec, const DOM::CSSRule& r)
+{
+ return cacheDOMObject<DOM::CSSRule, KJS::DOMCSSRule>(exec, r);
+}
+
+// -------------------------------------------------------------------------
+
+
+DOM::CSSRule toCSSRule(const Value& val)
+{
+ Object obj = Object::dynamicCast(val);
+ if (!obj.isValid() || !obj.inherits(&DOMCSSRule::info))
+ return DOM::CSSRule();
+
+ const DOMCSSRule *dobj = static_cast<const DOMCSSRule*>(obj.imp());
+ return dobj->toCSSRule();
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo CSSRuleConstructor::info = { "CSSRuleConstructor", 0, &CSSRuleConstructorTable, 0 };
+/*
+@begin CSSRuleConstructorTable 7
+ UNKNOWN_RULE CSSRuleConstructor::UNKNOWN_RULE DontDelete|ReadOnly
+ STYLE_RULE CSSRuleConstructor::STYLE_RULE DontDelete|ReadOnly
+ CHARSET_RULE CSSRuleConstructor::CHARSET_RULE DontDelete|ReadOnly
+ IMPORT_RULE CSSRuleConstructor::IMPORT_RULE DontDelete|ReadOnly
+ MEDIA_RULE CSSRuleConstructor::MEDIA_RULE DontDelete|ReadOnly
+ FONT_FACE_RULE CSSRuleConstructor::FONT_FACE_RULE DontDelete|ReadOnly
+ PAGE_RULE CSSRuleConstructor::PAGE_RULE DontDelete|ReadOnly
+@end
+*/
+
+CSSRuleConstructor::CSSRuleConstructor(ExecState *exec)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype())
+{
+}
+
+Value CSSRuleConstructor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<CSSRuleConstructor,DOMObject>(exec,p,&CSSRuleConstructorTable,this);
+}
+
+Value CSSRuleConstructor::getValueProperty(ExecState *, int token) const
+{
+ switch (token) {
+ case UNKNOWN_RULE:
+ return Number(DOM::CSSRule::UNKNOWN_RULE);
+ case STYLE_RULE:
+ return Number(DOM::CSSRule::STYLE_RULE);
+ case CHARSET_RULE:
+ return Number(DOM::CSSRule::CHARSET_RULE);
+ case IMPORT_RULE:
+ return Number(DOM::CSSRule::IMPORT_RULE);
+ case MEDIA_RULE:
+ return Number(DOM::CSSRule::MEDIA_RULE);
+ case FONT_FACE_RULE:
+ return Number(DOM::CSSRule::FONT_FACE_RULE);
+ case PAGE_RULE:
+ return Number(DOM::CSSRule::PAGE_RULE);
+ }
+ return Value();
+}
+
+Value getCSSRuleConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<CSSRuleConstructor>( exec, "[[cssRule.constructor]]" );
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMCSSValue::info = { "CSSValue", 0, &DOMCSSValueTable, 0 };
+
+/*
+@begin DOMCSSValueTable 2
+ cssText DOMCSSValue::CssText DontDelete|ReadOnly
+ cssValueType DOMCSSValue::CssValueType DontDelete|ReadOnly
+@end
+*/
+
+DOMCSSValue::DOMCSSValue(ExecState* exec, const DOM::CSSValue& val)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), cssValue(val)
+{
+}
+
+DOMCSSValue::~DOMCSSValue()
+{
+ ScriptInterpreter::forgetDOMObject(cssValue.handle());
+}
+
+Value DOMCSSValue::tryGet(ExecState *exec, const Identifier &p) const
+{
+ if (p == "cssText")
+ return String(cssValue.cssText());
+ else if (p == "cssValueType")
+ return Number(cssValue.cssValueType());
+ return DOMObject::tryGet(exec,p);
+}
+
+void DOMCSSValue::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+ if (propertyName == "cssText")
+ cssValue.setCssText(value.toString(exec).string());
+ else
+ DOMObject::tryPut(exec, propertyName, value, attr);
+}
+
+Value getDOMCSSValue(ExecState *exec, const DOM::CSSValue& v)
+{
+ DOMObject *ret;
+ if (v.isNull())
+ return Null();
+ ScriptInterpreter* interp = static_cast<ScriptInterpreter *>(exec->interpreter());
+ if ((ret = interp->getDOMObject(v.handle())))
+ return Value(ret);
+ else {
+ if (v.isCSSValueList())
+ ret = new DOMCSSValueList(exec,v);
+ else if (v.isCSSPrimitiveValue())
+ ret = new DOMCSSPrimitiveValue(exec,v);
+ else
+ ret = new DOMCSSValue(exec,v);
+ interp->putDOMObject(v.handle(),ret);
+ return Value(ret);
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo CSSValueConstructor::info = { "CSSValueConstructor", 0, &CSSValueConstructorTable, 0 };
+/*
+@begin CSSValueConstructorTable 5
+ CSS_INHERIT CSSValueConstructor::CSS_INHERIT DontDelete|ReadOnly
+ CSS_PRIMITIVE_VALUE CSSValueConstructor::CSS_PRIMITIVE_VALUE DontDelete|ReadOnly
+ CSS_VALUE_LIST CSSValueConstructor::CSS_VALUE_LIST DontDelete|ReadOnly
+ CSS_CUSTOM CSSValueConstructor::CSS_CUSTOM DontDelete|ReadOnly
+@end
+*/
+
+CSSValueConstructor::CSSValueConstructor(ExecState *exec)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype())
+{
+}
+
+Value CSSValueConstructor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<CSSValueConstructor,DOMObject>(exec,p,&CSSValueConstructorTable,this);
+}
+
+Value CSSValueConstructor::getValueProperty(ExecState *, int token) const
+{
+ switch (token) {
+ case CSS_INHERIT:
+ return Number(DOM::CSSValue::CSS_INHERIT);
+ case CSS_PRIMITIVE_VALUE:
+ return Number(DOM::CSSValue::CSS_PRIMITIVE_VALUE);
+ case CSS_VALUE_LIST:
+ return Number(DOM::CSSValue::CSS_VALUE_LIST);
+ case CSS_CUSTOM:
+ return Number(DOM::CSSValue::CSS_CUSTOM);
+ }
+ return Value();
+}
+
+Value getCSSValueConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<CSSValueConstructor>( exec, "[[cssValue.constructor]]" );
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMCSSPrimitiveValue::info = { "CSSPrimitiveValue", 0, &DOMCSSPrimitiveValueTable, 0 };
+/*
+@begin DOMCSSPrimitiveValueTable 1
+ primitiveType DOMCSSPrimitiveValue::PrimitiveType DontDelete|ReadOnly
+@end
+@begin DOMCSSPrimitiveValueProtoTable 3
+ setFloatValue DOMCSSPrimitiveValue::SetFloatValue DontDelete|Function 2
+ getFloatValue DOMCSSPrimitiveValue::GetFloatValue DontDelete|Function 1
+ setStringValue DOMCSSPrimitiveValue::SetStringValue DontDelete|Function 2
+ getStringValue DOMCSSPrimitiveValue::GetStringValue DontDelete|Function 0
+ getCounterValue DOMCSSPrimitiveValue::GetCounterValue DontDelete|Function 0
+ getRectValue DOMCSSPrimitiveValue::GetRectValue DontDelete|Function 0
+ getRGBColorValue DOMCSSPrimitiveValue::GetRGBColorValue DontDelete|Function 0
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMCSSPrimitiveValueProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMCSSPrimitiveValueProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMCSSPrimitiveValue",DOMCSSPrimitiveValueProto,DOMCSSPrimitiveValueProtoFunc)
+
+DOMCSSPrimitiveValue::DOMCSSPrimitiveValue(ExecState *exec, const DOM::CSSPrimitiveValue& v)
+ : DOMCSSValue(DOMCSSPrimitiveValueProto::self(exec), v) { }
+
+Value DOMCSSPrimitiveValue::tryGet(ExecState *exec, const Identifier &p) const
+{
+ if (p=="primitiveType")
+ return Number(static_cast<DOM::CSSPrimitiveValue>(cssValue).primitiveType());
+ return DOMObject::tryGet(exec,p);
+}
+
+Value DOMCSSPrimitiveValueProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMCSSPrimitiveValue, thisObj );
+ DOM::CSSPrimitiveValue val = static_cast<DOMCSSPrimitiveValue *>(thisObj.imp())->toCSSPrimitiveValue();
+ switch (id) {
+ case DOMCSSPrimitiveValue::SetFloatValue:
+ val.setFloatValue(args[0].toInteger(exec),args[1].toNumber(exec));
+ return Undefined();
+ case DOMCSSPrimitiveValue::GetFloatValue:
+ return Number(val.getFloatValue(args[0].toInteger(exec)));
+ case DOMCSSPrimitiveValue::SetStringValue:
+ val.setStringValue(args[0].toInteger(exec),args[1].toString(exec).string());
+ return Undefined();
+ case DOMCSSPrimitiveValue::GetStringValue:
+ return String(val.getStringValue());
+ case DOMCSSPrimitiveValue::GetCounterValue:
+ return getDOMCounter(exec,val.getCounterValue());
+ case DOMCSSPrimitiveValue::GetRectValue:
+ return getDOMRect(exec,val.getRectValue());
+ case DOMCSSPrimitiveValue::GetRGBColorValue:
+ return getDOMRGBColor(exec,val.getRGBColorValue());
+ default:
+ return Undefined();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo CSSPrimitiveValueConstructor::info = { "CSSPrimitiveValueConstructor", 0, &CSSPrimitiveValueConstructorTable, 0 };
+
+/*
+@begin CSSPrimitiveValueConstructorTable 27
+ CSS_UNKNOWN DOM::CSSPrimitiveValue::CSS_UNKNOWN DontDelete|ReadOnly
+ CSS_NUMBER DOM::CSSPrimitiveValue::CSS_NUMBER DontDelete|ReadOnly
+ CSS_PERCENTAGE DOM::CSSPrimitiveValue::CSS_PERCENTAGE DontDelete|ReadOnly
+ CSS_EMS DOM::CSSPrimitiveValue::CSS_EMS DontDelete|ReadOnly
+ CSS_EXS DOM::CSSPrimitiveValue::CSS_EXS DontDelete|ReadOnly
+ CSS_PX DOM::CSSPrimitiveValue::CSS_PX DontDelete|ReadOnly
+ CSS_CM DOM::CSSPrimitiveValue::CSS_CM DontDelete|ReadOnly
+ CSS_MM DOM::CSSPrimitiveValue::CSS_MM DontDelete|ReadOnly
+ CSS_IN DOM::CSSPrimitiveValue::CSS_IN DontDelete|ReadOnly
+ CSS_PT DOM::CSSPrimitiveValue::CSS_PT DontDelete|ReadOnly
+ CSS_PC DOM::CSSPrimitiveValue::CSS_PC DontDelete|ReadOnly
+ CSS_DEG DOM::CSSPrimitiveValue::CSS_DEG DontDelete|ReadOnly
+ CSS_RAD DOM::CSSPrimitiveValue::CSS_RAD DontDelete|ReadOnly
+ CSS_GRAD DOM::CSSPrimitiveValue::CSS_GRAD DontDelete|ReadOnly
+ CSS_MS DOM::CSSPrimitiveValue::CSS_MS DontDelete|ReadOnly
+ CSS_S DOM::CSSPrimitiveValue::CSS_S DontDelete|ReadOnly
+ CSS_HZ DOM::CSSPrimitiveValue::CSS_HZ DontDelete|ReadOnly
+ CSS_KHZ DOM::CSSPrimitiveValue::CSS_KHZ DontDelete|ReadOnly
+ CSS_DIMENSION DOM::CSSPrimitiveValue::CSS_DIMENSION DontDelete|ReadOnly
+ CSS_STRING DOM::CSSPrimitiveValue::CSS_STRING DontDelete|ReadOnly
+ CSS_URI DOM::CSSPrimitiveValue::CSS_URI DontDelete|ReadOnly
+ CSS_IDENT DOM::CSSPrimitiveValue::CSS_IDENT DontDelete|ReadOnly
+ CSS_ATTR DOM::CSSPrimitiveValue::CSS_ATTR DontDelete|ReadOnly
+ CSS_COUNTER DOM::CSSPrimitiveValue::CSS_COUNTER DontDelete|ReadOnly
+ CSS_RECT DOM::CSSPrimitiveValue::CSS_RECT DontDelete|ReadOnly
+ CSS_RGBCOLOR DOM::CSSPrimitiveValue::CSS_RGBCOLOR DontDelete|ReadOnly
+@end
+*/
+
+Value CSSPrimitiveValueConstructor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<CSSPrimitiveValueConstructor,CSSValueConstructor>(exec,p,&CSSPrimitiveValueConstructorTable,this);
+}
+
+Value CSSPrimitiveValueConstructor::getValueProperty(ExecState *, int token) const
+{
+ // We use the token as the value to return directly
+ return Number(token);
+}
+
+Value getCSSPrimitiveValueConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<CSSPrimitiveValueConstructor>( exec, "[[cssPrimitiveValue.constructor]]" );
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMCSSValueList::info = { "CSSValueList", 0, &DOMCSSValueListTable, 0 };
+
+/*
+@begin DOMCSSValueListTable 3
+ length DOMCSSValueList::Length DontDelete|ReadOnly
+ item DOMCSSValueList::Item DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(DOMCSSValueListFunc) // not really a proto, but doesn't matter
+
+DOMCSSValueList::DOMCSSValueList(ExecState *exec, const DOM::CSSValueList& v)
+ : DOMCSSValue(exec, v) { }
+
+Value DOMCSSValueList::tryGet(ExecState *exec, const Identifier &p) const
+{
+ Value result;
+ DOM::CSSValueList valueList = static_cast<DOM::CSSValueList>(cssValue);
+
+ if (p == lengthPropertyName)
+ return Number(valueList.length());
+ else if (p == "item")
+ return lookupOrCreateFunction<DOMCSSValueListFunc>(exec,p,this,DOMCSSValueList::Item,1,DontDelete|Function);
+
+ bool ok;
+ long unsigned int u = p.toULong(&ok);
+ if (ok)
+ return getDOMCSSValue(exec,valueList.item(u));
+
+ return DOMCSSValue::tryGet(exec,p);
+}
+
+Value DOMCSSValueListFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMCSSValueList, thisObj );
+ DOM::CSSValueList valueList = static_cast<DOMCSSValueList *>(thisObj.imp())->toValueList();
+ switch (id) {
+ case DOMCSSValueList::Item:
+ return getDOMCSSValue(exec,valueList.item(args[0].toInteger(exec)));
+ default:
+ return Undefined();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMRGBColor::info = { "RGBColor", 0, &DOMRGBColorTable, 0 };
+
+/*
+@begin DOMRGBColorTable 3
+ red DOMRGBColor::Red DontDelete|ReadOnly
+ green DOMRGBColor::Green DontDelete|ReadOnly
+ blue DOMRGBColor::Blue DontDelete|ReadOnly
+@end
+*/
+
+DOMRGBColor::DOMRGBColor(ExecState* exec, const DOM::RGBColor& c)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), rgbColor(c)
+{
+}
+
+DOMRGBColor::~DOMRGBColor()
+{
+ //rgbColors.remove(rgbColor.handle());
+}
+
+Value DOMRGBColor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<DOMRGBColor,DOMObject>(exec, p,
+ &DOMRGBColorTable,
+ this);
+}
+
+Value DOMRGBColor::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case Red:
+ return getDOMCSSValue(exec, rgbColor.red());
+ case Green:
+ return getDOMCSSValue(exec, rgbColor.green());
+ case Blue:
+ return getDOMCSSValue(exec, rgbColor.blue());
+ default:
+ return Value();
+ }
+}
+
+Value getDOMRGBColor(ExecState *exec, const DOM::RGBColor& c)
+{
+ // ### implement equals for RGBColor since they're not refcounted objects
+ return Value(new DOMRGBColor(exec, c));
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMRect::info = { "Rect", 0, &DOMRectTable, 0 };
+/*
+@begin DOMRectTable 4
+ top DOMRect::Top DontDelete|ReadOnly
+ right DOMRect::Right DontDelete|ReadOnly
+ bottom DOMRect::Bottom DontDelete|ReadOnly
+ left DOMRect::Left DontDelete|ReadOnly
+@end
+*/
+
+DOMRect::DOMRect(ExecState *exec, const DOM::Rect& r)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), rect(r)
+{
+}
+
+DOMRect::~DOMRect()
+{
+ ScriptInterpreter::forgetDOMObject(rect.handle());
+}
+
+Value DOMRect::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<DOMRect,DOMObject>(exec, p,
+ &DOMRectTable, this);
+}
+
+Value DOMRect::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case Top:
+ return getDOMCSSValue(exec, rect.top());
+ case Right:
+ return getDOMCSSValue(exec, rect.right());
+ case Bottom:
+ return getDOMCSSValue(exec, rect.bottom());
+ case Left:
+ return getDOMCSSValue(exec, rect.left());
+ default:
+ return Value();
+ }
+}
+
+Value getDOMRect(ExecState *exec, const DOM::Rect& r)
+{
+ return cacheDOMObject<DOM::Rect, KJS::DOMRect>(exec, r);
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMCounter::info = { "Counter", 0, &DOMCounterTable, 0 };
+/*
+@begin DOMCounterTable 3
+ identifier DOMCounter::identifier DontDelete|ReadOnly
+ listStyle DOMCounter::listStyle DontDelete|ReadOnly
+ separator DOMCounter::separator DontDelete|ReadOnly
+@end
+*/
+DOMCounter::DOMCounter(ExecState *exec, const DOM::Counter& c)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), counter(c)
+{
+}
+
+DOMCounter::~DOMCounter()
+{
+ ScriptInterpreter::forgetDOMObject(counter.handle());
+}
+
+Value DOMCounter::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<DOMCounter,DOMObject>(exec, p,
+ &DOMCounterTable, this);
+}
+
+Value DOMCounter::getValueProperty(ExecState *, int token) const
+{
+ switch (token) {
+ case identifier:
+ return String(counter.identifier());
+ case listStyle:
+ return String(counter.listStyle());
+ case separator:
+ return String(counter.separator());
+ default:
+ return Value();
+ }
+}
+
+Value getDOMCounter(ExecState *exec, const DOM::Counter& c)
+{
+ return cacheDOMObject<DOM::Counter, KJS::DOMCounter>(exec, c);
+}
+
+} //namespace KJS
diff --git a/tdehtml/ecma/kjs_css.h b/tdehtml/ecma/kjs_css.h
new file mode 100644
index 000000000..2b7d14712
--- /dev/null
+++ b/tdehtml/ecma/kjs_css.h
@@ -0,0 +1,304 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_CSS_H_
+#define _KJS_CSS_H_
+
+#include <dom/dom_node.h>
+#include <dom/dom_doc.h>
+#include <kjs/object.h>
+#include <dom/css_value.h>
+#include <dom/css_stylesheet.h>
+#include <dom/css_rule.h>
+#include "kjs_binding.h"
+
+namespace KJS {
+
+ class DOMCSSStyleDeclaration : public DOMObject {
+ public:
+ DOMCSSStyleDeclaration(ExecState *exec, const DOM::CSSStyleDeclaration& s);
+ virtual ~DOMCSSStyleDeclaration();
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ virtual bool hasProperty(ExecState *exec, const Identifier &propertyName) const;
+ virtual const ClassInfo *classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { CssText, Length, ParentRule,
+ GetPropertyValue, GetPropertyCSSValue, RemoveProperty, GetPropertyPriority,
+ SetProperty, Item };
+ DOM::CSSStyleDeclaration toStyleDecl() const { return styleDecl; }
+ protected:
+ DOM::CSSStyleDeclaration styleDecl;
+ };
+
+ DEFINE_PSEUDO_CONSTRUCTOR(CSSStyleDeclarationPseudoCtor)
+
+ Value getDOMCSSStyleDeclaration(ExecState *exec, const DOM::CSSStyleDeclaration& n);
+
+ class DOMStyleSheet : public DOMObject {
+ public:
+ // Build a DOMStyleSheet
+ DOMStyleSheet(ExecState *, const DOM::StyleSheet& ss);
+ // Constructor for inherited classes
+ DOMStyleSheet(const Object& proto, const DOM::StyleSheet& ss) : DOMObject(proto), styleSheet(ss) { }
+ virtual ~DOMStyleSheet();
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ virtual bool toBoolean(ExecState *) const { return true; }
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Type, Disabled, OwnerNode, ParentStyleSheet, Href, Title, Media };
+ protected:
+ DOM::StyleSheet styleSheet;
+ };
+
+ Value getDOMStyleSheet(ExecState *exec, const DOM::StyleSheet& ss);
+
+ class DOMStyleSheetList : public DOMObject {
+ public:
+ DOMStyleSheetList(ExecState *, const DOM::StyleSheetList& ssl, const DOM::Document& doc);
+ virtual ~DOMStyleSheetList();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ virtual Value call(ExecState *exec, Object &thisObj, const List &args);
+ Value tryCall(ExecState *exec, Object &thisObj, const List &args);
+ virtual bool implementsCall() const { return true; }
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ virtual bool toBoolean(ExecState* ) const { return true; }
+ static const ClassInfo info;
+ DOM::StyleSheetList toStyleSheetList() const { return styleSheetList; }
+ enum { Item, Length };
+ private:
+ DOM::StyleSheetList styleSheetList;
+ DOM::Document m_doc;
+ };
+
+ // The document is only used for get-stylesheet-by-name (make optional if necessary)
+ Value getDOMStyleSheetList(ExecState *exec, const DOM::StyleSheetList& ss, const DOM::Document& doc);
+
+ class DOMMediaList : public DOMObject {
+ public:
+ DOMMediaList(ExecState *, const DOM::MediaList& ml);
+ virtual ~DOMMediaList();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ virtual const ClassInfo* classInfo() const { return &info; }
+ virtual bool toBoolean(ExecState* ) const { return true; }
+ static const ClassInfo info;
+ enum { MediaText, Length,
+ Item, DeleteMedium, AppendMedium };
+ DOM::MediaList toMediaList() const { return mediaList; }
+ private:
+ DOM::MediaList mediaList;
+ };
+
+ Value getDOMMediaList(ExecState *exec, const DOM::MediaList& ss);
+
+ class DOMCSSStyleSheet : public DOMStyleSheet {
+ public:
+ DOMCSSStyleSheet(ExecState *exec, const DOM::CSSStyleSheet& ss);
+ virtual ~DOMCSSStyleSheet();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { OwnerRule, CssRules, Rules,
+ InsertRule, DeleteRule, AddRule, RemoveRule };
+ DOM::CSSStyleSheet toCSSStyleSheet() const { return static_cast<DOM::CSSStyleSheet>(styleSheet); }
+ };
+
+ class DOMCSSRuleList : public DOMObject {
+ public:
+ DOMCSSRuleList(ExecState *, const DOM::CSSRuleList& rl);
+ virtual ~DOMCSSRuleList();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Item, Length };
+ DOM::CSSRuleList toCSSRuleList() const { return cssRuleList; }
+ protected:
+ DOM::CSSRuleList cssRuleList;
+ };
+
+ Value getDOMCSSRuleList(ExecState *exec, const DOM::CSSRuleList& rl);
+
+ class DOMCSSRule : public DOMObject {
+ public:
+ DOMCSSRule(ExecState *, const DOM::CSSRule& r);
+ virtual ~DOMCSSRule();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ void putValueProperty(ExecState *exec, int token, const Value& value, int attr);
+ virtual const ClassInfo* classInfo() const;
+ static const ClassInfo info;
+ static const ClassInfo style_info, media_info, fontface_info, page_info, import_info, charset_info;
+ enum { ParentStyleSheet, Type, CssText, ParentRule,
+ Style_SelectorText, Style_Style,
+ Media_Media, Media_InsertRule, Media_DeleteRule, Media_CssRules,
+ FontFace_Style, Page_SelectorText, Page_Style,
+ Import_Href, Import_Media, Import_StyleSheet, Charset_Encoding };
+ DOM::CSSRule toCSSRule() const { return cssRule; }
+ protected:
+ DOM::CSSRule cssRule;
+ };
+
+ Value getDOMCSSRule(ExecState *exec, const DOM::CSSRule& r);
+
+ /**
+ * Convert an object to a CSSRule. Returns a null CSSRule if not possible.
+ */
+ DOM::CSSRule toCSSRule(const Value&);
+
+ // Constructor for CSSRule - currently only used for some global values
+ class CSSRuleConstructor : public DOMObject {
+ public:
+ CSSRuleConstructor(ExecState *);
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { UNKNOWN_RULE, STYLE_RULE, CHARSET_RULE, IMPORT_RULE, MEDIA_RULE, FONT_FACE_RULE, PAGE_RULE };
+ };
+
+ Value getCSSRuleConstructor(ExecState *exec);
+
+ class DOMCSSValue : public DOMObject {
+ public:
+ DOMCSSValue(ExecState *, const DOM::CSSValue& v);
+ DOMCSSValue(const Object& proto, const DOM::CSSValue& v) : DOMObject(proto), cssValue(v) { }
+ virtual ~DOMCSSValue();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { CssText, CssValueType };
+ protected:
+ DOM::CSSValue cssValue;
+ };
+
+ Value getDOMCSSValue(ExecState *exec, const DOM::CSSValue& v);
+
+ // Constructor for CSSValue - currently only used for some global values
+ class CSSValueConstructor : public DOMObject {
+ public:
+ CSSValueConstructor(ExecState *exec);
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { CSS_VALUE_LIST, CSS_PRIMITIVE_VALUE, CSS_CUSTOM, CSS_INHERIT };
+ };
+
+ Value getCSSValueConstructor(ExecState *exec);
+
+ class DOMCSSPrimitiveValue : public DOMCSSValue {
+ public:
+ DOMCSSPrimitiveValue(ExecState *exec, const DOM::CSSPrimitiveValue& v);
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ DOM::CSSPrimitiveValue toCSSPrimitiveValue() const { return static_cast<DOM::CSSPrimitiveValue>(cssValue); }
+ enum { PrimitiveType, SetFloatValue, GetFloatValue, SetStringValue, GetStringValue,
+ GetCounterValue, GetRectValue, GetRGBColorValue };
+ };
+
+ // Constructor for CSSPrimitiveValue - currently only used for some global values
+ class CSSPrimitiveValueConstructor : public CSSValueConstructor {
+ public:
+ CSSPrimitiveValueConstructor(ExecState *exec) : CSSValueConstructor(exec) { }
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ };
+
+ Value getCSSPrimitiveValueConstructor(ExecState *exec);
+
+ class DOMCSSValueList : public DOMCSSValue {
+ public:
+ DOMCSSValueList(ExecState *exec, const DOM::CSSValueList& v);
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Item, Length };
+ DOM::CSSValueList toValueList() const { return static_cast<DOM::CSSValueList>(cssValue); }
+ };
+
+ class DOMRGBColor : public DOMObject {
+ public:
+ DOMRGBColor(ExecState*, const DOM::RGBColor& c);
+ ~DOMRGBColor();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Red, Green, Blue };
+ protected:
+ DOM::RGBColor rgbColor;
+ };
+
+ Value getDOMRGBColor(ExecState *exec, const DOM::RGBColor& c);
+
+ class DOMRect : public DOMObject {
+ public:
+ DOMRect(ExecState *, const DOM::Rect& r);
+ ~DOMRect();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Top, Right, Bottom, Left };
+ protected:
+ DOM::Rect rect;
+ };
+
+ Value getDOMRect(ExecState *exec, const DOM::Rect& r);
+
+ class DOMCounter : public DOMObject {
+ public:
+ DOMCounter(ExecState *, const DOM::Counter& c);
+ ~DOMCounter();
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { identifier, listStyle, separator };
+ protected:
+ DOM::Counter counter;
+ };
+
+ Value getDOMCounter(ExecState *exec, const DOM::Counter& c);
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_debugwin.cpp b/tdehtml/ecma/kjs_debugwin.cpp
new file mode 100644
index 000000000..4830c1108
--- /dev/null
+++ b/tdehtml/ecma/kjs_debugwin.cpp
@@ -0,0 +1,1139 @@
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000-2001 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001,2003 Peter Kelly (pmk@post.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "kjs_debugwin.h"
+#include "kjs_proxy.h"
+
+#ifdef KJS_DEBUGGER
+
+#include <assert.h>
+#include <stdlib.h>
+#include <tqlayout.h>
+#include <tqpushbutton.h>
+#include <tqtextedit.h>
+#include <tqlistbox.h>
+#include <tqmultilineedit.h>
+#include <tqapplication.h>
+#include <tqsplitter.h>
+#include <tqcombobox.h>
+#include <tqbitmap.h>
+#include <tqwidgetlist.h>
+#include <tqlabel.h>
+#include <tqdatastream.h>
+#include <tqcstring.h>
+#include <tqpainter.h>
+#include <tqscrollbar.h>
+
+#include <klocale.h>
+#include <kdebug.h>
+#include <kiconloader.h>
+#include <kglobal.h>
+#include <kmessagebox.h>
+#include <kguiitem.h>
+#include <kpopupmenu.h>
+#include <kmenubar.h>
+#include <kaction.h>
+#include <kactioncollection.h>
+#include <kglobalsettings.h>
+#include <kshortcut.h>
+#include <kconfig.h>
+#include <kconfigbase.h>
+#include <kapplication.h>
+#include <dcop/dcopclient.h>
+#include <kstringhandler.h>
+
+#include "kjs_dom.h"
+#include "kjs_binding.h"
+#include "tdehtml_part.h"
+#include "tdehtmlview.h"
+#include "tdehtml_pagecache.h"
+#include "tdehtml_settings.h"
+#include "tdehtml_factory.h"
+#include "misc/decoder.h"
+#include <kjs/ustring.h>
+#include <kjs/object.h>
+#include <kjs/function.h>
+#include <kjs/interpreter.h>
+
+using namespace KJS;
+using namespace tdehtml;
+
+SourceDisplay::SourceDisplay(KJSDebugWin *debugWin, TQWidget *parent, const char *name)
+ : TQScrollView(parent,name), m_currentLine(-1), m_sourceFile(0), m_debugWin(debugWin),
+ m_font(TDEGlobalSettings::fixedFont())
+{
+ verticalScrollBar()->setLineStep(TQFontMetrics(m_font).height());
+ viewport()->setBackgroundMode(TQt::NoBackground);
+ m_breakpointIcon = TDEGlobal::iconLoader()->loadIcon("stop",KIcon::Small);
+}
+
+SourceDisplay::~SourceDisplay()
+{
+ if (m_sourceFile) {
+ m_sourceFile->deref();
+ m_sourceFile = 0L;
+ }
+}
+
+void SourceDisplay::setSource(SourceFile *sourceFile)
+{
+ if ( sourceFile )
+ sourceFile->ref();
+ if (m_sourceFile)
+ m_sourceFile->deref();
+ m_sourceFile = sourceFile;
+ if ( m_sourceFile )
+ m_sourceFile->ref();
+
+ if (!m_sourceFile || !m_debugWin->isVisible()) {
+ return;
+ }
+
+ TQString code = sourceFile->getCode();
+ const TQChar *chars = code.unicode();
+ uint len = code.length();
+ TQChar newLine('\n');
+ TQChar cr('\r');
+ TQChar tab('\t');
+ TQString tabstr(" ");
+ TQString line;
+ m_lines.clear();
+ int width = 0;
+ TQFontMetrics metrics(m_font);
+
+ for (uint pos = 0; pos < len; pos++) {
+ TQChar c = chars[pos];
+ if (c == cr) {
+ if (pos < len-1 && chars[pos+1] == newLine)
+ continue;
+ else
+ c = newLine;
+ }
+ if (c == newLine) {
+ m_lines.append(line);
+ int lineWidth = metrics.width(line);
+ if (lineWidth > width)
+ width = lineWidth;
+ line = "";
+ }
+ else if (c == tab) {
+ line += tabstr;
+ }
+ else {
+ line += c;
+ }
+ }
+ if (line.length()) {
+ m_lines.append(line);
+ int lineWidth = metrics.width(line);
+ if (lineWidth > width)
+ width = lineWidth;
+ }
+
+ int linenoDisplayWidth = metrics.width("888888");
+ resizeContents(linenoDisplayWidth+4+width,metrics.height()*m_lines.count());
+ update();
+ sourceFile->deref();
+}
+
+void SourceDisplay::setCurrentLine(int lineno, bool doCenter)
+{
+ m_currentLine = lineno;
+
+ if (doCenter && m_currentLine >= 0) {
+ TQFontMetrics metrics(m_font);
+ int height = metrics.height();
+ center(0,height*m_currentLine+height/2);
+ }
+
+ updateContents();
+}
+
+void SourceDisplay::contentsMousePressEvent(TQMouseEvent *e)
+{
+ TQScrollView::mouseDoubleClickEvent(e);
+ TQFontMetrics metrics(m_font);
+ int lineno = e->y()/metrics.height();
+ emit lineDoubleClicked(lineno+1); // line numbers start from 1
+}
+
+void SourceDisplay::showEvent(TQShowEvent *)
+{
+ setSource(m_sourceFile);
+}
+
+void SourceDisplay::drawContents(TQPainter *p, int clipx, int clipy, int clipw, int cliph)
+{
+ if (!m_sourceFile) {
+ p->fillRect(clipx,clipy,clipw,cliph,palette().active().base());
+ return;
+ }
+
+ TQFontMetrics metrics(m_font);
+ int height = metrics.height();
+
+ int bottom = clipy + cliph;
+ int right = clipx + clipw;
+
+ int firstLine = clipy/height-1;
+ if (firstLine < 0)
+ firstLine = 0;
+ int lastLine = bottom/height+2;
+ if (lastLine > (int)m_lines.count())
+ lastLine = m_lines.count();
+
+ p->setFont(m_font);
+
+ int linenoWidth = metrics.width("888888");
+
+ for (int lineno = firstLine; lineno <= lastLine; lineno++) {
+ TQString linenoStr = TQString().sprintf("%d",lineno+1);
+
+
+ p->fillRect(0,height*lineno,linenoWidth,height,palette().active().mid());
+
+ p->setPen(palette().active().text());
+ p->drawText(0,height*lineno,linenoWidth,height,Qt::AlignRight,linenoStr);
+
+ TQColor bgColor;
+ TQColor textColor;
+
+ if (lineno == m_currentLine) {
+ bgColor = palette().active().highlight();
+ textColor = palette().active().highlightedText();
+ }
+ else if (m_debugWin->haveBreakpoint(m_sourceFile,lineno+1,lineno+1)) {
+ bgColor = palette().active().text();
+ textColor = palette().active().base();
+ p->drawPixmap(2,height*lineno+height/2-m_breakpointIcon.height()/2,m_breakpointIcon);
+ }
+ else {
+ bgColor = palette().active().base();
+ textColor = palette().active().text();
+ }
+
+ p->fillRect(linenoWidth,height*lineno,right-linenoWidth,height,bgColor);
+ p->setPen(textColor);
+ p->drawText(linenoWidth+4,height*lineno,contentsWidth()-linenoWidth-4,height,
+ Qt::AlignLeft,m_lines[lineno]);
+ }
+
+ int remainingTop = height*(lastLine+1);
+ p->fillRect(0,remainingTop,linenoWidth,bottom-remainingTop,palette().active().mid());
+
+ p->fillRect(linenoWidth,remainingTop,
+ right-linenoWidth,bottom-remainingTop,palette().active().base());
+}
+
+//-------------------------------------------------------------------------
+
+KJSDebugWin * KJSDebugWin::kjs_html_debugger = 0;
+
+TQString SourceFile::getCode()
+{
+ if (interpreter) {
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart*>(static_cast<ScriptInterpreter*>(interpreter)->part());
+ if (part && url == part->url().url() && KHTMLPageCache::self()->isValid(part->cacheId())) {
+ Decoder *decoder = part->createDecoder();
+ TQByteArray data;
+ TQDataStream stream(data,IO_WriteOnly);
+ KHTMLPageCache::self()->saveData(part->cacheId(),&stream);
+ TQString str;
+ if (data.size() == 0)
+ str = "";
+ else
+ str = decoder->decode(data.data(),data.size()) + decoder->flush();
+ delete decoder;
+ return str;
+ }
+ }
+
+ return code;
+}
+
+//-------------------------------------------------------------------------
+
+SourceFragment::SourceFragment(int sid, int bl, int el, SourceFile *sf)
+{
+ sourceId = sid;
+ baseLine = bl;
+ errorLine = el;
+ sourceFile = sf;
+ sourceFile->ref();
+}
+
+SourceFragment::~SourceFragment()
+{
+ sourceFile->deref();
+ sourceFile = 0L;
+}
+
+//-------------------------------------------------------------------------
+
+KJSErrorDialog::KJSErrorDialog(TQWidget *parent, const TQString& errorMessage, bool showDebug)
+ : KDialogBase(parent,0,true,i18n("JavaScript Error"),
+ showDebug ? KDialogBase::Ok|KDialogBase::User1 : KDialogBase::Ok,
+ KDialogBase::Ok,false,KGuiItem("&Debug","gear"))
+{
+ TQWidget *page = new TQWidget(this);
+ setMainWidget(page);
+
+ TQLabel *iconLabel = new TQLabel("",page);
+ iconLabel->setPixmap(TDEGlobal::iconLoader()->loadIcon("messagebox_critical",
+ KIcon::NoGroup,KIcon::SizeMedium,
+ KIcon::DefaultState,0,true));
+
+ TQWidget *contents = new TQWidget(page);
+ TQLabel *label = new TQLabel(errorMessage,contents);
+ m_dontShowAgainCb = new TQCheckBox(i18n("&Do not show this message again"),contents);
+
+ TQVBoxLayout *vl = new TQVBoxLayout(contents,0,spacingHint());
+ vl->addWidget(label);
+ vl->addWidget(m_dontShowAgainCb);
+
+ TQHBoxLayout *topLayout = new TQHBoxLayout(page,0,spacingHint());
+ topLayout->addWidget(iconLabel);
+ topLayout->addWidget(contents);
+ topLayout->addStretch(10);
+
+ m_debugSelected = false;
+}
+
+KJSErrorDialog::~KJSErrorDialog()
+{
+}
+
+void KJSErrorDialog::slotUser1()
+{
+ m_debugSelected = true;
+ close();
+}
+
+//-------------------------------------------------------------------------
+EvalMultiLineEdit::EvalMultiLineEdit(TQWidget *parent)
+ : TQMultiLineEdit(parent) {
+}
+
+void EvalMultiLineEdit::keyPressEvent(TQKeyEvent * e)
+{
+ if (e->key() == Qt::Key_Return) {
+ if (hasSelectedText()) {
+ m_code = selectedText();
+ } else {
+ int para, index;
+ getCursorPosition(&para, &index);
+ m_code = text(para);
+ }
+ end();
+ }
+ TQMultiLineEdit::keyPressEvent(e);
+}
+//-------------------------------------------------------------------------
+KJSDebugWin::KJSDebugWin(TQWidget *parent, const char *name)
+ : KMainWindow(parent, name, (WFlags)WType_TopLevel), TDEInstance("kjs_debugger")
+{
+ m_breakpoints = 0;
+ m_breakpointCount = 0;
+
+ m_curSourceFile = 0;
+ m_mode = Continue;
+ m_nextSourceUrl = "";
+ m_nextSourceBaseLine = 1;
+ m_execs = 0;
+ m_execsCount = 0;
+ m_execsAlloc = 0;
+ m_steppingDepth = 0;
+
+ m_stopIcon = TDEGlobal::iconLoader()->loadIcon("stop",KIcon::Small);
+ m_emptyIcon = TQPixmap(m_stopIcon.width(),m_stopIcon.height());
+ TQBitmap emptyMask(m_stopIcon.width(),m_stopIcon.height(),true);
+ m_emptyIcon.setMask(emptyMask);
+
+ setCaption(i18n("JavaScript Debugger"));
+
+ TQWidget *mainWidget = new TQWidget(this);
+ setCentralWidget(mainWidget);
+
+ TQVBoxLayout *vl = new TQVBoxLayout(mainWidget,5);
+
+ // frame list & code
+ TQSplitter *hsplitter = new TQSplitter(Qt::Vertical,mainWidget);
+ TQSplitter *vsplitter = new TQSplitter(hsplitter);
+ TQFont font(TDEGlobalSettings::fixedFont());
+
+ TQWidget *contextContainer = new TQWidget(vsplitter);
+
+ TQLabel *contextLabel = new TQLabel(i18n("Call stack"),contextContainer);
+ TQWidget *contextListContainer = new TQWidget(contextContainer);
+ m_contextList = new TQListBox(contextListContainer);
+ m_contextList->setMinimumSize(100,200);
+ connect(m_contextList,TQT_SIGNAL(highlighted(int)),this,TQT_SLOT(slotShowFrame(int)));
+
+ TQHBoxLayout *clistLayout = new TQHBoxLayout(contextListContainer);
+ clistLayout->addWidget(m_contextList);
+ clistLayout->addSpacing(KDialog::spacingHint());
+
+ TQVBoxLayout *contextLayout = new TQVBoxLayout(contextContainer);
+ contextLayout->addWidget(contextLabel);
+ contextLayout->addSpacing(KDialog::spacingHint());
+ contextLayout->addWidget(contextListContainer);
+
+ // source selection & display
+ TQWidget *sourceSelDisplay = new TQWidget(vsplitter);
+ TQVBoxLayout *ssdvl = new TQVBoxLayout(sourceSelDisplay);
+
+ m_sourceSel = new TQComboBox(toolBar());
+ connect(m_sourceSel,TQT_SIGNAL(activated(int)),this,TQT_SLOT(slotSourceSelected(int)));
+
+ m_sourceDisplay = new SourceDisplay(this,sourceSelDisplay);
+ ssdvl->addWidget(m_sourceDisplay);
+ connect(m_sourceDisplay,TQT_SIGNAL(lineDoubleClicked(int)),TQT_SLOT(slotToggleBreakpoint(int)));
+
+ TQValueList<int> vsplitSizes;
+ vsplitSizes.insert(vsplitSizes.end(),120);
+ vsplitSizes.insert(vsplitSizes.end(),480);
+ vsplitter->setSizes(vsplitSizes);
+
+ // evaluate
+
+ TQWidget *evalContainer = new TQWidget(hsplitter);
+
+ TQLabel *evalLabel = new TQLabel(i18n("JavaScript console"),evalContainer);
+ m_evalEdit = new EvalMultiLineEdit(evalContainer);
+ m_evalEdit->setWordWrap(TQMultiLineEdit::NoWrap);
+ m_evalEdit->setFont(font);
+ connect(m_evalEdit,TQT_SIGNAL(returnPressed()),TQT_SLOT(slotEval()));
+ m_evalDepth = 0;
+
+ TQVBoxLayout *evalLayout = new TQVBoxLayout(evalContainer);
+ evalLayout->addSpacing(KDialog::spacingHint());
+ evalLayout->addWidget(evalLabel);
+ evalLayout->addSpacing(KDialog::spacingHint());
+ evalLayout->addWidget(m_evalEdit);
+
+ TQValueList<int> hsplitSizes;
+ hsplitSizes.insert(hsplitSizes.end(),400);
+ hsplitSizes.insert(hsplitSizes.end(),200);
+ hsplitter->setSizes(hsplitSizes);
+
+ vl->addWidget(hsplitter);
+
+ // actions
+ KPopupMenu *debugMenu = new KPopupMenu(this);
+ menuBar()->insertItem("&Debug",debugMenu);
+
+ m_actionCollection = new KActionCollection(this);
+ m_actionCollection->setInstance(this);
+
+ // Venkman use F12, KDevelop F10
+ KShortcut scNext = KShortcut(KKeySequence(KKey(Qt::Key_F12)));
+ scNext.append(KKeySequence(KKey(Qt::Key_F10)));
+ m_nextAction = new KAction(i18n("Next breakpoint","&Next"),"dbgnext",scNext,TQT_TQOBJECT(this),TQT_SLOT(slotNext()),
+ m_actionCollection,"next");
+ m_stepAction = new KAction(i18n("&Step"),"dbgstep",KShortcut(Qt::Key_F11),TQT_TQOBJECT(this),TQT_SLOT(slotStep()),
+ m_actionCollection,"step");
+ // Venkman use F5, Kdevelop F9
+ KShortcut scCont = KShortcut(KKeySequence(KKey(Qt::Key_F5)));
+ scCont.append(KKeySequence(KKey(Qt::Key_F9)));
+ m_continueAction = new KAction(i18n("&Continue"),"dbgrun",scCont,TQT_TQOBJECT(this),TQT_SLOT(slotContinue()),
+ m_actionCollection,"cont");
+ m_stopAction = new KAction(i18n("St&op"),"stop",KShortcut(Qt::Key_F4),TQT_TQOBJECT(this),TQT_SLOT(slotStop()),
+ m_actionCollection,"stop");
+ m_breakAction = new KAction(i18n("&Break at Next Statement"),"dbgrunto",KShortcut(Qt::Key_F8),TQT_TQOBJECT(this),TQT_SLOT(slotBreakNext()),
+ m_actionCollection,"breaknext");
+
+
+ m_nextAction->setToolTip(i18n("Next breakpoint","Next"));
+ m_stepAction->setToolTip(i18n("Step"));
+ m_continueAction->setToolTip(i18n("Continue"));
+ m_stopAction->setToolTip(i18n("Stop"));
+ m_breakAction->setToolTip("Break at next Statement");
+
+ m_nextAction->setEnabled(false);
+ m_stepAction->setEnabled(false);
+ m_continueAction->setEnabled(false);
+ m_stopAction->setEnabled(false);
+ m_breakAction->setEnabled(true);
+
+ m_nextAction->plug(debugMenu);
+ m_stepAction->plug(debugMenu);
+ m_continueAction->plug(debugMenu);
+// m_stopAction->plug(debugMenu); ### disabled until DebuggerImp::stop() works reliably
+ m_breakAction->plug(debugMenu);
+
+ m_nextAction->plug(toolBar());
+ m_stepAction->plug(toolBar());
+ m_continueAction->plug(toolBar());
+// m_stopAction->plug(toolBar()); ###
+ m_breakAction->plug(toolBar());
+
+ toolBar()->insertWidget(1,300,m_sourceSel);
+ toolBar()->setItemAutoSized(1);
+
+ updateContextList();
+ setMinimumSize(300,200);
+ resize(600,450);
+
+}
+
+KJSDebugWin::~KJSDebugWin()
+{
+ free(m_breakpoints);
+ free(m_execs);
+}
+
+KJSDebugWin *KJSDebugWin::createInstance()
+{
+ assert(!kjs_html_debugger);
+ kjs_html_debugger = new KJSDebugWin();
+ return kjs_html_debugger;
+}
+
+void KJSDebugWin::destroyInstance()
+{
+ assert(kjs_html_debugger);
+ kjs_html_debugger->hide();
+ delete kjs_html_debugger;
+}
+
+void KJSDebugWin::slotNext()
+{
+ m_mode = Next;
+ leaveSession();
+}
+
+void KJSDebugWin::slotStep()
+{
+ m_mode = Step;
+ leaveSession();
+}
+
+void KJSDebugWin::slotContinue()
+{
+ m_mode = Continue;
+ leaveSession();
+}
+
+void KJSDebugWin::slotStop()
+{
+ m_mode = Stop;
+ while (!m_execStates.isEmpty())
+ leaveSession();
+}
+
+void KJSDebugWin::slotBreakNext()
+{
+ m_mode = Step;
+}
+
+void KJSDebugWin::slotToggleBreakpoint(int lineno)
+{
+ if (m_sourceSel->currentItem() < 0)
+ return;
+
+ SourceFile *sourceFile = m_sourceSelFiles.at(m_sourceSel->currentItem());
+
+ // Find the source fragment containing the selected line (if any)
+ int sourceId = -1;
+ int highestBaseLine = -1;
+ TQMap<int,SourceFragment*>::Iterator it;
+
+ for (it = m_sourceFragments.begin(); it != m_sourceFragments.end(); ++it) {
+ SourceFragment *sourceFragment = it.data();
+ if (sourceFragment &&
+ sourceFragment->sourceFile == sourceFile &&
+ sourceFragment->baseLine <= lineno &&
+ sourceFragment->baseLine > highestBaseLine) {
+
+ sourceId = sourceFragment->sourceId;
+ highestBaseLine = sourceFragment->baseLine;
+ }
+ }
+
+ if (sourceId < 0)
+ return;
+
+ // Update the source code display with the appropriate icon
+ int fragmentLineno = lineno-highestBaseLine+1;
+ if (!setBreakpoint(sourceId,fragmentLineno)) // was already set
+ deleteBreakpoint(sourceId,fragmentLineno);
+
+ m_sourceDisplay->updateContents();
+}
+
+void KJSDebugWin::slotShowFrame(int frameno)
+{
+ if (frameno < 0 || frameno >= m_execsCount)
+ return;
+
+ Context ctx = m_execs[frameno]->context();
+ setSourceLine(ctx.sourceId(),ctx.curStmtFirstLine());
+}
+
+void KJSDebugWin::slotSourceSelected(int sourceSelIndex)
+{
+ // A source file has been selected from the drop-down list - display the file
+ if (sourceSelIndex < 0 || sourceSelIndex >= (int)m_sourceSel->count())
+ return;
+ SourceFile *sourceFile = m_sourceSelFiles.at(sourceSelIndex);
+ displaySourceFile(sourceFile,true);
+
+ // If the currently selected context is in the current source file, then hilight
+ // the line it's on.
+ if (m_contextList->currentItem() >= 0) {
+ Context ctx = m_execs[m_contextList->currentItem()]->context();
+ if (m_sourceFragments[ctx.sourceId()]->sourceFile == m_sourceSelFiles.at(sourceSelIndex))
+ setSourceLine(ctx.sourceId(),ctx.curStmtFirstLine());
+ }
+}
+
+void KJSDebugWin::slotEval()
+{
+ // Work out which execution state to use. If we're currently in a debugging session,
+ // use the current context - otherwise, use the global execution state from the interpreter
+ // corresponding to the currently displayed source file.
+ ExecState *exec;
+ Object thisobj;
+ if (m_execStates.isEmpty()) {
+ if (m_sourceSel->currentItem() < 0)
+ return;
+ SourceFile *sourceFile = m_sourceSelFiles.at(m_sourceSel->currentItem());
+ if (!sourceFile->interpreter)
+ return;
+ exec = sourceFile->interpreter->globalExec();
+ thisobj = exec->interpreter()->globalObject();
+ }
+ else {
+ exec = m_execStates.top();
+ thisobj = exec->context().thisValue();
+ }
+
+ // Evaluate the js code from m_evalEdit
+ UString code(m_evalEdit->code());
+ TQString msg;
+
+ KJSCPUGuard guard;
+ guard.start();
+
+ Interpreter *interp = exec->interpreter();
+
+ Object obj = Object::dynamicCast(interp->globalObject().get(exec, "eval"));
+ List args;
+ args.append(String(code));
+
+ m_evalDepth++;
+ Value retval = obj.call(exec, thisobj, args);
+ m_evalDepth--;
+ guard.stop();
+
+ // Print the return value or exception message to the console
+ if (exec->hadException()) {
+ Value exc = exec->exception();
+ exec->clearException();
+ msg = "Exception: " + exc.toString(interp->globalExec()).qstring();
+ }
+ else {
+ msg = retval.toString(interp->globalExec()).qstring();
+ }
+
+ m_evalEdit->insert(msg+"\n");
+ updateContextList();
+}
+
+void KJSDebugWin::closeEvent(TQCloseEvent *e)
+{
+ while (!m_execStates.isEmpty()) // ### not sure if this will work
+ leaveSession();
+ return TQWidget::closeEvent(e);
+}
+
+bool KJSDebugWin::eventFilter(TQObject *o, TQEvent *e)
+{
+ switch (e->type()) {
+ case TQEvent::MouseButtonPress:
+ case TQEvent::MouseButtonRelease:
+ case TQEvent::MouseButtonDblClick:
+ case TQEvent::MouseMove:
+ case TQEvent::KeyPress:
+ case TQEvent::KeyRelease:
+ case TQEvent::Destroy:
+ case TQEvent::Close:
+ case TQEvent::Quit:
+ while (o->parent())
+ o = TQT_TQOBJECT(o->parent());
+ if (TQT_BASE_OBJECT(o) == TQT_BASE_OBJECT(this))
+ return TQWidget::eventFilter(o,e);
+ else
+ return true;
+ break;
+ default:
+ return TQWidget::eventFilter(o,e);
+ }
+}
+
+void KJSDebugWin::disableOtherWindows()
+{
+ TQWidgetList *widgets = TQApplication::allWidgets();
+ TQWidgetListIt it(*widgets);
+ for (; it.current(); ++it)
+ it.current()->installEventFilter(this);
+}
+
+void KJSDebugWin::enableOtherWindows()
+{
+ TQWidgetList *widgets = TQApplication::allWidgets();
+ TQWidgetListIt it(*widgets);
+ for (; it.current(); ++it)
+ it.current()->removeEventFilter(this);
+}
+
+bool KJSDebugWin::sourceParsed(KJS::ExecState *exec, int sourceId,
+ const KJS::UString &source, int errorLine)
+{
+ // Work out which source file this fragment is in
+ SourceFile *sourceFile = 0;
+ if (!m_nextSourceUrl.isEmpty())
+ sourceFile = getSourceFile(exec->interpreter(),m_nextSourceUrl);
+
+ int index;
+ if (!sourceFile) {
+ index = m_sourceSel->count();
+ if (!m_nextSourceUrl.isEmpty()) {
+
+ TQString code = source.qstring();
+ KParts::ReadOnlyPart *part = static_cast<ScriptInterpreter*>(exec->interpreter())->part();
+ if (m_nextSourceUrl == part->url().url()) {
+ // Only store the code here if it's not from the part's html page... in that
+ // case we can get it from KHTMLPageCache
+ code = TQString::null;
+ }
+
+ sourceFile = new SourceFile(m_nextSourceUrl,code,exec->interpreter());
+ setSourceFile(exec->interpreter(),m_nextSourceUrl,sourceFile);
+ m_sourceSelFiles.append(sourceFile);
+ m_sourceSel->insertItem(m_nextSourceUrl);
+ }
+ else {
+ // Sourced passed from somewhere else (possibly an eval call)... we don't know the url,
+ // but we still know the interpreter
+ sourceFile = new SourceFile("(unknown)",source.qstring(),exec->interpreter());
+ m_sourceSelFiles.append(sourceFile);
+ m_sourceSel->insertItem(TQString::number(index) += "-???");
+ }
+ }
+ else {
+ // Ensure that each source file to be displayed is associated with
+ // an appropriate interpreter
+ if (!sourceFile->interpreter)
+ sourceFile->interpreter = exec->interpreter();
+ for (index = 0; index < m_sourceSel->count(); index++) {
+ if (m_sourceSelFiles.at(index) == sourceFile)
+ break;
+ }
+ assert(index < m_sourceSel->count());
+ }
+
+ SourceFragment *sf = new SourceFragment(sourceId,m_nextSourceBaseLine,errorLine,sourceFile);
+ m_sourceFragments[sourceId] = sf;
+
+ if (m_sourceSel->currentItem() < 0)
+ m_sourceSel->setCurrentItem(index);
+
+ if (m_sourceSel->currentItem() == index) {
+ displaySourceFile(sourceFile,true);
+ }
+
+ m_nextSourceBaseLine = 1;
+ m_nextSourceUrl = "";
+
+ return (m_mode != Stop);
+}
+
+bool KJSDebugWin::sourceUnused(KJS::ExecState *exec, int sourceId)
+{
+ // Verify that there aren't any contexts on the stack using the given sourceId
+ // This should never be the case because this function is only called when
+ // the interpreter has deleted all Node objects for the source.
+ for (int e = 0; e < m_execsCount; e++)
+ assert(m_execs[e]->context().sourceId() != sourceId);
+
+ // Now remove the fragment (and the SourceFile, if it was the last fragment in that file)
+ SourceFragment *fragment = m_sourceFragments[sourceId];
+ if (fragment) {
+ m_sourceFragments.erase(sourceId);
+
+ SourceFile *sourceFile = fragment->sourceFile;
+ if (sourceFile->hasOneRef()) {
+ for (int i = 0; i < m_sourceSel->count(); i++) {
+ if (m_sourceSelFiles.at(i) == sourceFile) {
+ m_sourceSel->removeItem(i);
+ m_sourceSelFiles.remove(i);
+ break;
+ }
+ }
+ removeSourceFile(exec->interpreter(),sourceFile->url);
+ }
+ delete fragment;
+ }
+
+ return (m_mode != Stop);
+}
+
+bool KJSDebugWin::exception(ExecState *exec, const Value &value, bool inTryCatch)
+{
+ assert(value.isValid());
+
+ // Ignore exceptions that will be caught by the script
+ if (inTryCatch)
+ return true;
+
+ KParts::ReadOnlyPart *part = static_cast<ScriptInterpreter*>(exec->interpreter())->part();
+ KHTMLPart *tdehtmlpart = ::tqqt_cast<KHTMLPart*>(part);
+ if (tdehtmlpart && !tdehtmlpart->settings()->isJavaScriptErrorReportingEnabled())
+ return true;
+
+ TQWidget *dlgParent = (m_evalDepth == 0) ? (TQWidget*)part->widget() : (TQWidget*)this;
+
+ TQString exceptionMsg = value.toString(exec).qstring();
+
+ // Syntax errors are a special case. For these we want to display the url & lineno,
+ // which isn't included in the exception messeage. So we work it out from the values
+ // passed to sourceParsed()
+ Object valueObj = Object::dynamicCast(value);
+ Object syntaxError = exec->interpreter()->builtinSyntaxError();
+ if (valueObj.isValid() && valueObj.get(exec,"constructor").imp() == syntaxError.imp()) {
+ Value sidValue = valueObj.get(exec,"sid");
+ if (sidValue.isA(NumberType)) { // sid is not set for Function() constructor
+ int sourceId = (int)sidValue.toNumber(exec);
+ assert(m_sourceFragments[sourceId]);
+ exceptionMsg = i18n("Parse error at %1 line %2")
+ .arg(m_sourceFragments[sourceId]->sourceFile->url)
+ .arg(m_sourceFragments[sourceId]->baseLine+m_sourceFragments[sourceId]->errorLine-1);
+ }
+ }
+
+ bool dontShowAgain = false;
+ if (m_execsCount == 0) {
+ // An exception occurred and we're not currently executing any code... this can
+ // happen in some cases e.g. a parse error, or native code accessing funcitons like
+ // Object::put()
+ TQString msg = i18n("An error occurred while attempting to run a script on this page.\n\n%1")
+ .arg(exceptionMsg);
+ KJSErrorDialog dlg(dlgParent,msg,false);
+ dlg.exec();
+ dontShowAgain = dlg.dontShowAgain();
+ }
+ else {
+ Context ctx = m_execs[m_execsCount-1]->context();
+ SourceFragment *sourceFragment = m_sourceFragments[ctx.sourceId()];
+ TQString msg = i18n("An error occurred while attempting to run a script on this page.\n\n%1 line %2:\n%3")
+ .arg(KStringHandler::rsqueeze( sourceFragment->sourceFile->url,80),
+ TQString::number( sourceFragment->baseLine+ctx.curStmtFirstLine()-1),
+ exceptionMsg);
+
+ KJSErrorDialog dlg(dlgParent,msg,true);
+ dlg.exec();
+ dontShowAgain = dlg.dontShowAgain();
+
+ if (dlg.debugSelected()) {
+ m_mode = Next;
+ m_steppingDepth = m_execsCount-1;
+ enterSession(exec);
+ }
+ }
+
+ if (dontShowAgain) {
+ TDEConfig *config = kapp->config();
+ TDEConfigGroupSaver saver(config,TQString::fromLatin1("Java/JavaScript Settings"));
+ config->writeEntry("ReportJavaScriptErrors",TQVariant(false,0));
+ config->sync();
+ TQByteArray data;
+ kapp->dcopClient()->send( "konqueror*", "KonquerorIface", "reparseConfiguration()", data );
+ }
+
+ return (m_mode != Stop);
+}
+
+bool KJSDebugWin::atStatement(KJS::ExecState *exec)
+{
+ assert(m_execsCount > 0);
+ assert(m_execs[m_execsCount-1] == exec);
+ checkBreak(exec);
+ return (m_mode != Stop);
+}
+
+bool KJSDebugWin::enterContext(ExecState *exec)
+{
+ if (m_execsCount >= m_execsAlloc) {
+ m_execsAlloc += 10;
+ m_execs = (ExecState**)realloc(m_execs,m_execsAlloc*sizeof(ExecState*));
+ }
+ m_execs[m_execsCount++] = exec;
+
+ if (m_mode == Step)
+ m_steppingDepth = m_execsCount-1;
+
+ checkBreak(exec);
+ return (m_mode != Stop);
+}
+
+bool KJSDebugWin::exitContext(ExecState *exec, const Completion &/*completion*/)
+{
+ assert(m_execsCount > 0);
+ assert(m_execs[m_execsCount-1] == exec);
+
+ checkBreak(exec);
+
+ m_execsCount--;
+ if (m_steppingDepth > m_execsCount-1)
+ m_steppingDepth = m_execsCount-1;
+ if (m_execsCount == 0)
+ updateContextList();
+
+ return (m_mode != Stop);
+}
+
+void KJSDebugWin::displaySourceFile(SourceFile *sourceFile, bool forceRefresh)
+{
+ if (m_curSourceFile == sourceFile && !forceRefresh)
+ return;
+ sourceFile->ref();
+ m_sourceDisplay->setSource(sourceFile);
+ if (m_curSourceFile)
+ m_curSourceFile->deref();
+ m_curSourceFile = sourceFile;
+}
+
+void KJSDebugWin::setSourceLine(int sourceId, int lineno)
+{
+ SourceFragment *source = m_sourceFragments[sourceId];
+ if (!source)
+ return;
+
+ SourceFile *sourceFile = source->sourceFile;
+ if (m_curSourceFile != source->sourceFile) {
+ for (int i = 0; i < m_sourceSel->count(); i++)
+ if (m_sourceSelFiles.at(i) == sourceFile)
+ m_sourceSel->setCurrentItem(i);
+ displaySourceFile(sourceFile,false);
+ }
+ m_sourceDisplay->setCurrentLine(source->baseLine+lineno-2);
+}
+
+void KJSDebugWin::setNextSourceInfo(TQString url, int baseLine)
+{
+ m_nextSourceUrl = url;
+ m_nextSourceBaseLine = baseLine;
+}
+
+void KJSDebugWin::sourceChanged(Interpreter *interpreter, TQString url)
+{
+ SourceFile *sourceFile = getSourceFile(interpreter,url);
+ if (sourceFile && m_curSourceFile == sourceFile)
+ displaySourceFile(sourceFile,true);
+}
+
+void KJSDebugWin::clearInterpreter(Interpreter *interpreter)
+{
+ TQMap<int,SourceFragment*>::Iterator it;
+
+ for (it = m_sourceFragments.begin(); it != m_sourceFragments.end(); ++it)
+ if (it.data() && it.data()->sourceFile->interpreter == interpreter)
+ it.data()->sourceFile->interpreter = 0;
+}
+
+SourceFile *KJSDebugWin::getSourceFile(Interpreter *interpreter, TQString url)
+{
+ TQString key = TQString("%1|%2").arg((long)interpreter).arg(url);
+ return m_sourceFiles[key];
+}
+
+void KJSDebugWin::setSourceFile(Interpreter *interpreter, TQString url, SourceFile *sourceFile)
+{
+ TQString key = TQString("%1|%2").arg((long)interpreter).arg(url);
+ sourceFile->ref();
+ if (SourceFile* oldFile = m_sourceFiles[key])
+ oldFile->deref();
+ m_sourceFiles[key] = sourceFile;
+}
+
+void KJSDebugWin::removeSourceFile(Interpreter *interpreter, TQString url)
+{
+ TQString key = TQString("%1|%2").arg((long)interpreter).arg(url);
+ if (SourceFile* oldFile = m_sourceFiles[key])
+ oldFile->deref();
+ m_sourceFiles.remove(key);
+}
+
+void KJSDebugWin::checkBreak(ExecState *exec)
+{
+ if (m_breakpointCount > 0) {
+ Context ctx = m_execs[m_execsCount-1]->context();
+ if (haveBreakpoint(ctx.sourceId(),ctx.curStmtFirstLine(),ctx.curStmtLastLine())) {
+ m_mode = Next;
+ m_steppingDepth = m_execsCount-1;
+ }
+ }
+
+ if ((m_mode == Step || m_mode == Next) && m_steppingDepth == m_execsCount-1)
+ enterSession(exec);
+}
+
+void KJSDebugWin::enterSession(ExecState *exec)
+{
+ // This "enters" a new debugging session, i.e. enables usage of the debugging window
+ // It re-enters the qt event loop here, allowing execution of other parts of the
+ // program to continue while the script is stopped. We have to be a bit careful here,
+ // i.e. make sure the user can't quit the app, and disable other event handlers which
+ // could interfere with the debugging session.
+ if (!isVisible())
+ show();
+
+ m_mode = Continue;
+
+ if (m_execStates.isEmpty()) {
+ disableOtherWindows();
+ m_nextAction->setEnabled(true);
+ m_stepAction->setEnabled(true);
+ m_continueAction->setEnabled(true);
+ m_stopAction->setEnabled(true);
+ m_breakAction->setEnabled(false);
+ }
+ m_execStates.push(exec);
+
+ updateContextList();
+
+ tqApp->enter_loop(); // won't return until leaveSession() is called
+}
+
+void KJSDebugWin::leaveSession()
+{
+ // Disables debugging for this window and returns to execute the rest of the script
+ // (or aborts execution, if the user pressed stop). When this returns, the program
+ // will exit the qt event loop, i.e. return to whatever processing was being done
+ // before the debugger was stopped.
+ assert(!m_execStates.isEmpty());
+
+ m_execStates.pop();
+
+ if (m_execStates.isEmpty()) {
+ m_nextAction->setEnabled(false);
+ m_stepAction->setEnabled(false);
+ m_continueAction->setEnabled(false);
+ m_stopAction->setEnabled(false);
+ m_breakAction->setEnabled(true);
+ m_sourceDisplay->setCurrentLine(-1);
+ enableOtherWindows();
+ }
+
+ tqApp->exit_loop();
+}
+
+void KJSDebugWin::updateContextList()
+{
+ disconnect(m_contextList,TQT_SIGNAL(highlighted(int)),this,TQT_SLOT(slotShowFrame(int)));
+
+ m_contextList->clear();
+ for (int i = 0; i < m_execsCount; i++)
+ m_contextList->insertItem(contextStr(m_execs[i]->context()));
+
+ if (m_execsCount > 0) {
+ m_contextList->setSelected(m_execsCount-1, true);
+ Context ctx = m_execs[m_execsCount-1]->context();
+ setSourceLine(ctx.sourceId(),ctx.curStmtFirstLine());
+ }
+
+ connect(m_contextList,TQT_SIGNAL(highlighted(int)),this,TQT_SLOT(slotShowFrame(int)));
+}
+
+TQString KJSDebugWin::contextStr(const Context &ctx)
+{
+ TQString str = "";
+ SourceFragment *sourceFragment = m_sourceFragments[ctx.sourceId()];
+ TQString url = sourceFragment->sourceFile->url;
+ int fileLineno = sourceFragment->baseLine+ctx.curStmtFirstLine()-1;
+
+ switch (ctx.codeType()) {
+ case GlobalCode:
+ str = TQString("Global code at %1:%2").arg(url).arg(fileLineno);
+ break;
+ case EvalCode:
+ str = TQString("Eval code at %1:%2").arg(url).arg(fileLineno);
+ break;
+ case FunctionCode:
+ if (!ctx.functionName().isNull())
+ str = TQString("%1() at %2:%3").arg(ctx.functionName().qstring()).arg(url).arg(fileLineno);
+ else
+ str = TQString("Anonymous function at %1:%2").arg(url).arg(fileLineno);
+ break;
+ }
+
+ return str;
+}
+
+bool KJSDebugWin::setBreakpoint(int sourceId, int lineno)
+{
+ if (haveBreakpoint(sourceId,lineno,lineno))
+ return false;
+
+ m_breakpointCount++;
+ m_breakpoints = static_cast<Breakpoint*>(realloc(m_breakpoints,
+ m_breakpointCount*sizeof(Breakpoint)));
+ m_breakpoints[m_breakpointCount-1].sourceId = sourceId;
+ m_breakpoints[m_breakpointCount-1].lineno = lineno;
+
+ return true;
+}
+
+bool KJSDebugWin::deleteBreakpoint(int sourceId, int lineno)
+{
+ for (int i = 0; i < m_breakpointCount; i++) {
+ if (m_breakpoints[i].sourceId == sourceId && m_breakpoints[i].lineno == lineno) {
+
+ memmove(m_breakpoints+i,m_breakpoints+i+1,(m_breakpointCount-i-1)*sizeof(Breakpoint));
+ m_breakpointCount--;
+ m_breakpoints = static_cast<Breakpoint*>(realloc(m_breakpoints,
+ m_breakpointCount*sizeof(Breakpoint)));
+ return true;
+ }
+ }
+
+ return false;
+}
+
+bool KJSDebugWin::haveBreakpoint(SourceFile *sourceFile, int line0, int line1)
+{
+ for (int i = 0; i < m_breakpointCount; i++) {
+ int sourceId = m_breakpoints[i].sourceId;
+ int lineno = m_breakpoints[i].lineno;
+ if (m_sourceFragments.contains(sourceId) &&
+ m_sourceFragments[sourceId]->sourceFile == sourceFile) {
+ int absLineno = m_sourceFragments[sourceId]->baseLine+lineno-1;
+ if (absLineno >= line0 && absLineno <= line1)
+ return true;
+ }
+ }
+
+ return false;
+}
+
+#include "kjs_debugwin.moc"
+
+#endif // KJS_DEBUGGER
diff --git a/tdehtml/ecma/kjs_debugwin.h b/tdehtml/ecma/kjs_debugwin.h
new file mode 100644
index 000000000..dc2368ac2
--- /dev/null
+++ b/tdehtml/ecma/kjs_debugwin.h
@@ -0,0 +1,285 @@
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000-2001 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001,2003 Peter Kelly (pmk@post.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_DEBUGGER_H_
+#define _KJS_DEBUGGER_H_
+
+#include <tqglobal.h>
+
+#define KJS_DEBUGGER
+
+#ifdef KJS_DEBUGGER
+
+#include <tqwidget.h>
+#include <tqmultilineedit.h>
+#include <tqpixmap.h>
+#include <tqptrlist.h>
+#include <tqptrstack.h>
+#include <tqcheckbox.h>
+#include <kdialogbase.h>
+#include <kmainwindow.h>
+#include <tqscrollview.h>
+
+#include <kjs/debugger.h>
+
+#include "dom/dom_misc.h"
+
+class TQListBox;
+class TQComboBox;
+class KActionCollection;
+class KAction;
+
+namespace KJS {
+ class FunctionImp;
+ class List;
+ class Interpreter;
+ class KJSDebugWin;
+
+ class SourceFile : public DOM::DomShared
+ {
+ public:
+ SourceFile(TQString u, TQString c, Interpreter *interp)
+ : url(u), code(c), interpreter(interp) {}
+ TQString getCode();
+ TQString url;
+ TQString code;
+ Interpreter *interpreter;
+ };
+
+ /**
+ * @internal
+ *
+ * When kjs parses some code, it generates a source code fragment (or just "source").
+ * This is referenced by its source id in future calls to functions such as atLine()
+ * and callEvent(). We keep a record of all source fragments parsed in order to display
+ * then to the user.
+ *
+ * For .js files, the source fragment will be the entire file. For js code included
+ * in html files, however, there may be multiple source fragments within the one file
+ * (e.g. multiple SCRIPT tags or onclick="..." attributes)
+ *
+ * In the case where a single file has multiple source fragments, the source objects
+ * for these fragments will all point to the same SourceFile for their code.
+ */
+ class SourceFragment
+ {
+ public:
+ SourceFragment(int sid, int bl, int el, SourceFile *sf);
+ ~SourceFragment();
+
+ int sourceId;
+ int baseLine;
+ int errorLine;
+ SourceFile *sourceFile;
+ private:
+ SourceFragment(const SourceFragment& other);
+ SourceFragment& operator = (const SourceFragment& other);
+ };
+
+ class KJSErrorDialog : public KDialogBase {
+ Q_OBJECT
+ public:
+ KJSErrorDialog(TQWidget *parent, const TQString& errorMessage, bool showDebug);
+ virtual ~KJSErrorDialog();
+
+ bool debugSelected() const { return m_debugSelected; }
+ bool dontShowAgain() const { return m_dontShowAgainCb->isChecked(); }
+
+ protected slots:
+ virtual void slotUser1();
+
+ private:
+ TQCheckBox *m_dontShowAgainCb;
+ bool m_debugSelected;
+ };
+
+ class EvalMultiLineEdit : public TQMultiLineEdit {
+ Q_OBJECT
+ public:
+ EvalMultiLineEdit(TQWidget *parent);
+ const TQString & code() const { return m_code; }
+ protected:
+ void keyPressEvent(TQKeyEvent * e);
+ private:
+ TQString m_code;
+ };
+
+ class SourceDisplay : public TQScrollView {
+ Q_OBJECT
+ public:
+ SourceDisplay(KJSDebugWin *debugWin, TQWidget *parent, const char *name = 0);
+ ~SourceDisplay();
+
+ void setSource(SourceFile *sourceFile);
+ void setCurrentLine(int lineno, bool doCenter = true);
+
+ signals:
+ void lineDoubleClicked(int lineno);
+
+ protected:
+ virtual void contentsMousePressEvent(TQMouseEvent *e);
+ virtual void showEvent(TQShowEvent *);
+ virtual void drawContents(TQPainter *p, int clipx, int clipy, int clipw, int cliph);
+
+ TQString m_source;
+ int m_currentLine;
+ SourceFile *m_sourceFile;
+ TQStringList m_lines;
+
+ KJSDebugWin *m_debugWin;
+ TQFont m_font;
+ TQPixmap m_breakpointIcon;
+ };
+
+ /**
+ * @internal
+ *
+ * KJSDebugWin represents the debugger window that is visible to the user. It contains
+ * a stack frame list, a code viewer and a source fragment selector, plus buttons
+ * to control execution including next, step and continue.
+ *
+ * There is only one debug window per program. This can be obtained by calling #instance
+ */
+ class KJSDebugWin : public KMainWindow, public Debugger, public TDEInstance
+ {
+ Q_OBJECT
+ friend class SourceDisplay;
+ public:
+ KJSDebugWin(TQWidget *parent=0, const char *name=0);
+ virtual ~KJSDebugWin();
+
+ static KJSDebugWin *createInstance();
+ static void destroyInstance();
+ static KJSDebugWin *debugWindow() { return kjs_html_debugger; }
+
+ enum Mode { Disabled = 0, // No break on any statements
+ Next = 1, // Will break on next statement in current context
+ Step = 2, // Will break on next statement in current or deeper context
+ Continue = 3, // Will continue until next breakpoint
+ Stop = 4 // The script will stop execution completely,
+ // as soon as possible
+ };
+
+ void setSourceLine(int sourceId, int lineno);
+ void setNextSourceInfo(TQString url, int baseLine);
+ void sourceChanged(Interpreter *interpreter, TQString url);
+ bool inSession() const { return !m_execStates.isEmpty(); }
+ void setMode(Mode m) { m_mode = m; }
+ void clearInterpreter(Interpreter *interpreter);
+ ExecState *getExecState() const { return m_execStates.top(); }
+
+ // functions overridden from KJS:Debugger
+ bool sourceParsed(ExecState *exec, int sourceId,
+ const UString &source, int errorLine);
+ bool sourceUnused(ExecState * exec, int sourceId);
+ bool exception(ExecState *exec, const Value &value, bool inTryCatch);
+ bool atStatement(ExecState *exec);
+ bool enterContext(ExecState *exec);
+ bool exitContext(ExecState *exec, const Completion &completion);
+
+ public slots:
+ void slotNext();
+ void slotStep();
+ void slotContinue();
+ void slotStop();
+ void slotBreakNext();
+ void slotToggleBreakpoint(int lineno);
+ void slotShowFrame(int frameno);
+ void slotSourceSelected(int sourceSelIndex);
+ void slotEval();
+
+ protected:
+
+ void closeEvent(TQCloseEvent *e);
+ bool eventFilter(TQObject *obj, TQEvent *evt);
+ void disableOtherWindows();
+ void enableOtherWindows();
+
+ private:
+
+ SourceFile *getSourceFile(Interpreter *interpreter, TQString url);
+ void setSourceFile(Interpreter *interpreter, TQString url, SourceFile *sourceFile);
+ void removeSourceFile(Interpreter *interpreter, TQString url);
+
+ void checkBreak(ExecState *exec);
+ void enterSession(ExecState *exec);
+ void leaveSession();
+ void displaySourceFile(SourceFile *sourceFile, bool forceRefresh);
+ void updateContextList();
+
+ TQString contextStr(const Context &ctx);
+
+ struct Breakpoint {
+ int sourceId;
+ int lineno;
+ };
+ Breakpoint *m_breakpoints;
+ int m_breakpointCount;
+ bool setBreakpoint(int sourceId, int lineno);
+ bool deleteBreakpoint(int sourceId, int lineno);
+ bool haveBreakpoint(SourceFile *sourceFile, int line0, int line1);
+ bool haveBreakpoint(int sourceId, int line0, int line1) const {
+ for (int i = 0; i < m_breakpointCount; i++) {
+ if (m_breakpoints[i].sourceId == sourceId &&
+ m_breakpoints[i].lineno >= line0 &&
+ m_breakpoints[i].lineno <= line1)
+ return true;
+ }
+ return false;
+ }
+
+ SourceFile *m_curSourceFile;
+ Mode m_mode;
+ TQString m_nextSourceUrl;
+ int m_nextSourceBaseLine;
+ TQPtrStack<ExecState> m_execStates;
+ ExecState **m_execs;
+ int m_execsCount;
+ int m_execsAlloc;
+ int m_steppingDepth;
+
+ TQMap<TQString,SourceFile*> m_sourceFiles; /* maps url->SourceFile */
+ TQMap<int,SourceFragment*> m_sourceFragments; /* maps SourceId->SourceFragment */
+ TQPtrList<SourceFile> m_sourceSelFiles; /* maps combobox index->SourceFile */
+
+ KActionCollection *m_actionCollection;
+ TQPixmap m_stopIcon;
+ TQPixmap m_emptyIcon;
+ SourceDisplay *m_sourceDisplay;
+ TQListBox *m_contextList;
+
+ KAction *m_stepAction;
+ KAction *m_nextAction;
+ KAction *m_continueAction;
+ KAction *m_stopAction;
+ KAction *m_breakAction;
+
+ TQComboBox *m_sourceSel;
+ EvalMultiLineEdit *m_evalEdit;
+ int m_evalDepth;
+
+ static KJSDebugWin *kjs_html_debugger;
+ };
+
+} // namespace
+
+#endif // KJS_DEBUGGER
+
+#endif // _KJS_DEBUGGER_H_
diff --git a/tdehtml/ecma/kjs_dom.cpp b/tdehtml/ecma/kjs_dom.cpp
new file mode 100644
index 000000000..71e91d7ef
--- /dev/null
+++ b/tdehtml/ecma/kjs_dom.cpp
@@ -0,0 +1,1849 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000 Harri Porten (porten@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include <tdehtmlview.h>
+#include "xml/dom2_eventsimpl.h"
+#include "rendering/render_canvas.h"
+#include "rendering/render_layer.h"
+#include "xml/dom_nodeimpl.h"
+#include "xml/dom_docimpl.h"
+#include "misc/htmltags.h" // ID_*
+#include "misc/htmlattrs.h" // ATTR_*
+#include "html/html_baseimpl.h"
+#include <kdebug.h>
+#include <tdehtml_part.h>
+
+#include "kjs_dom.h"
+#include "kjs_html.h"
+#include "kjs_css.h"
+#include "kjs_range.h"
+#include "kjs_traversal.h"
+#include "kjs_events.h"
+#include "kjs_views.h"
+#include "kjs_window.h"
+#include "dom/dom_exception.h"
+#include "kjs_dom.lut.h"
+#include "tdehtmlpart_p.h"
+
+namespace KJS {
+
+// -------------------------------------------------------------------------
+/* Source for DOMNodeConstantsTable.
+@begin DOMNodeConstantsTable 11
+ ELEMENT_NODE DOM::Node::ELEMENT_NODE DontDelete|ReadOnly
+ ATTRIBUTE_NODE DOM::Node::ATTRIBUTE_NODE DontDelete|ReadOnly
+ TEXT_NODE DOM::Node::TEXT_NODE DontDelete|ReadOnly
+ CDATA_SECTION_NODE DOM::Node::CDATA_SECTION_NODE DontDelete|ReadOnly
+ ENTITY_REFERENCE_NODE DOM::Node::ENTITY_REFERENCE_NODE DontDelete|ReadOnly
+ ENTITY_NODE DOM::Node::ENTITY_NODE DontDelete|ReadOnly
+ PROCESSING_INSTRUCTION_NODE DOM::Node::PROCESSING_INSTRUCTION_NODE DontDelete|ReadOnly
+ COMMENT_NODE DOM::Node::COMMENT_NODE DontDelete|ReadOnly
+ DOCUMENT_NODE DOM::Node::DOCUMENT_NODE DontDelete|ReadOnly
+ DOCUMENT_TYPE_NODE DOM::Node::DOCUMENT_TYPE_NODE DontDelete|ReadOnly
+ DOCUMENT_FRAGMENT_NODE DOM::Node::DOCUMENT_FRAGMENT_NODE DontDelete|ReadOnly
+ NOTATION_NODE DOM::Node::NOTATION_NODE DontDelete|ReadOnly
+@end
+*/
+IMPLEMENT_CONSTANT_TABLE(DOMNodeConstants,"DOMNodeConstants")
+// -------------------------------------------------------------------------
+/* Source for DOMNodeProtoTable.
+@begin DOMNodeProtoTable 13
+ insertBefore DOMNode::InsertBefore DontDelete|Function 2
+ replaceChild DOMNode::ReplaceChild DontDelete|Function 2
+ removeChild DOMNode::RemoveChild DontDelete|Function 1
+ appendChild DOMNode::AppendChild DontDelete|Function 1
+ hasAttributes DOMNode::HasAttributes DontDelete|Function 0
+ hasChildNodes DOMNode::HasChildNodes DontDelete|Function 0
+ cloneNode DOMNode::CloneNode DontDelete|Function 1
+# DOM2
+ normalize DOMNode::Normalize DontDelete|Function 0
+ isSupported DOMNode::IsSupported DontDelete|Function 2
+# from the EventTarget interface
+ addEventListener DOMNode::AddEventListener DontDelete|Function 3
+ removeEventListener DOMNode::RemoveEventListener DontDelete|Function 3
+ dispatchEvent DOMNode::DispatchEvent DontDelete|Function 1
+# IE extensions
+ contains DOMNode::Contains DontDelete|Function 1
+ insertAdjacentHTML DOMNode::InsertAdjacentHTML DontDelete|Function 2
+# "DOM level 0" (from Gecko DOM reference; also in WinIE)
+ item DOMNode::Item DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(DOMNodeProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMNode", DOMNodeProto, DOMNodeProtoFunc)
+
+const ClassInfo DOMNode::info = { "Node", 0, &DOMNodeTable, 0 };
+
+DOMNode::DOMNode(ExecState *exec, const DOM::Node& n)
+ : DOMObject(DOMNodeProto::self(exec)), node(n)
+{
+}
+
+DOMNode::DOMNode(const Object& proto, const DOM::Node& n)
+ : DOMObject(proto), node(n)
+{
+}
+
+DOMNode::~DOMNode()
+{
+ ScriptInterpreter::forgetDOMObject(node.handle());
+}
+
+bool DOMNode::toBoolean(ExecState *) const
+{
+ return !node.isNull();
+}
+
+/* Source for DOMNodeTable.
+@begin DOMNodeTable 53
+ nodeName DOMNode::NodeName DontDelete|ReadOnly
+ nodeValue DOMNode::NodeValue DontDelete
+ nodeType DOMNode::NodeType DontDelete|ReadOnly
+ parentNode DOMNode::ParentNode DontDelete|ReadOnly
+ parentElement DOMNode::ParentElement DontDelete|ReadOnly
+ childNodes DOMNode::ChildNodes DontDelete|ReadOnly
+ firstChild DOMNode::FirstChild DontDelete|ReadOnly
+ lastChild DOMNode::LastChild DontDelete|ReadOnly
+ previousSibling DOMNode::PreviousSibling DontDelete|ReadOnly
+ nextSibling DOMNode::NextSibling DontDelete|ReadOnly
+ attributes DOMNode::Attributes DontDelete|ReadOnly
+ namespaceURI DOMNode::NamespaceURI DontDelete|ReadOnly
+# DOM2
+ prefix DOMNode::Prefix DontDelete
+ localName DOMNode::LocalName DontDelete|ReadOnly
+ ownerDocument DOMNode::OwnerDocument DontDelete|ReadOnly
+# DOM3
+ textContent DOMNode::TextContent DontDelete
+# Event handlers
+# IE also has: onactivate, onbefore*, oncontextmenu, oncontrolselect, oncut,
+# ondeactivate, ondrag*, ondrop, onfocusin, onfocusout, onhelp, onmousewheel,
+# onmove*, onpaste, onpropertychange, onreadystatechange, onresizeend/start,
+# onselectionchange, onstop
+ onabort DOMNode::OnAbort DontDelete
+ onblur DOMNode::OnBlur DontDelete
+ onchange DOMNode::OnChange DontDelete
+ onclick DOMNode::OnClick DontDelete
+ ondblclick DOMNode::OnDblClick DontDelete
+ ondragdrop DOMNode::OnDragDrop DontDelete
+ onerror DOMNode::OnError DontDelete
+ onfocus DOMNode::OnFocus DontDelete
+ onkeydown DOMNode::OnKeyDown DontDelete
+ onkeypress DOMNode::OnKeyPress DontDelete
+ onkeyup DOMNode::OnKeyUp DontDelete
+ onload DOMNode::OnLoad DontDelete
+ onmousedown DOMNode::OnMouseDown DontDelete
+ onmousemove DOMNode::OnMouseMove DontDelete
+ onmouseout DOMNode::OnMouseOut DontDelete
+ onmouseover DOMNode::OnMouseOver DontDelete
+ onmouseup DOMNode::OnMouseUp DontDelete
+ onmove DOMNode::OnMove DontDelete
+ onreset DOMNode::OnReset DontDelete
+ onresize DOMNode::OnResize DontDelete
+ onselect DOMNode::OnSelect DontDelete
+ onsubmit DOMNode::OnSubmit DontDelete
+ onunload DOMNode::OnUnload DontDelete
+# IE extensions
+ offsetLeft DOMNode::OffsetLeft DontDelete|ReadOnly
+ offsetTop DOMNode::OffsetTop DontDelete|ReadOnly
+ offsetWidth DOMNode::OffsetWidth DontDelete|ReadOnly
+ offsetHeight DOMNode::OffsetHeight DontDelete|ReadOnly
+ offsetParent DOMNode::OffsetParent DontDelete|ReadOnly
+ clientWidth DOMNode::ClientWidth DontDelete|ReadOnly
+ clientHeight DOMNode::ClientHeight DontDelete|ReadOnly
+ scrollLeft DOMNode::ScrollLeft DontDelete
+ scrollTop DOMNode::ScrollTop DontDelete
+ scrollWidth DOMNode::ScrollWidth DontDelete|ReadOnly
+ scrollHeight DOMNode::ScrollHeight DontDelete|ReadOnly
+ sourceIndex DOMNode::SourceIndex DontDelete|ReadOnly
+@end
+*/
+Value DOMNode::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMNode::tryGet " << propertyName.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMNode, DOMObject>(exec, propertyName, &DOMNodeTable, this);
+}
+
+static tdehtml::RenderObject* handleBodyRootQuirk(const DOM::Node& node, tdehtml::RenderObject* rend, int token)
+{
+ //This emulates the quirks of various height/width properties on the viewport and root. Note that it
+ //is (mostly) IE-compatible in quirks, and mozilla-compatible in strict.
+ if (!rend) return 0;
+
+ bool quirksMode = rend->style() && rend->style()->htmlHacks();
+
+ //There are a couple quirks here. One is that in quirks mode body is always forwarded to root...
+ //This is relevant for even the scrollTop/scrollLeft type properties.
+ if (quirksMode && node.handle()->id() == ID_BODY) {
+ while (rend->parent() && !rend->isRoot())
+ rend = rend->parent();
+ }
+
+ //Also, some properties of the root are really done in terms of the viewport.
+ //These are {offset/client}{Height/Width}. The offset versions do it only in
+ //quirks mode, the client always.
+ if (!rend->isRoot()) return rend; //Don't care about non-root things here!
+ bool needViewport = false;
+
+ switch (token) {
+ case DOMNode::OffsetHeight:
+ case DOMNode::OffsetWidth:
+ needViewport = quirksMode;
+ break;
+ case DOMNode::ClientHeight:
+ case DOMNode::ClientWidth:
+ needViewport = true;
+ break;
+ }
+
+ if (needViewport) {
+ //Scan up to find the new target
+ while (rend->parent())
+ rend = rend->parent();
+ }
+ return rend;
+}
+
+Value DOMNode::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case NodeName:
+ return String(node.nodeName());
+ case NodeValue:
+ return getString(node.nodeValue()); // initially null, per domts/level1/core/hc_documentcreateelement.html
+ case NodeType:
+ return Number((unsigned int)node.nodeType());
+ case ParentNode:
+ return getDOMNode(exec,node.parentNode());
+ case ParentElement: // IE only apparently
+ return getDOMNode(exec,node.parentNode());
+ case ChildNodes:
+ return getDOMNodeList(exec,node.childNodes());
+ case FirstChild:
+ return getDOMNode(exec,node.firstChild());
+ case LastChild:
+ return getDOMNode(exec,node.lastChild());
+ case PreviousSibling:
+ return getDOMNode(exec,node.previousSibling());
+ case NextSibling:
+ return getDOMNode(exec,node.nextSibling());
+ case Attributes:
+ return getDOMNamedNodeMap(exec,node.attributes());
+ case NamespaceURI:
+ return getString(node.namespaceURI()); // Moz returns null if not set (dom/namespaces.html)
+ case Prefix:
+ return getString(node.prefix()); // Moz returns null if not set (dom/namespaces.html)
+ case TextContent:
+ return getString(node.textContent()); //DOM3 says return null, but I really should test mozilla..
+ case LocalName:
+ return getString(node.localName()); // Moz returns null if not set (dom/namespaces.html)
+ case OwnerDocument:
+ return getDOMNode(exec,node.ownerDocument());
+ case OnAbort:
+ return getListener(DOM::EventImpl::ABORT_EVENT);
+ case OnBlur:
+ return getListener(DOM::EventImpl::BLUR_EVENT);
+ case OnChange:
+ return getListener(DOM::EventImpl::CHANGE_EVENT);
+ case OnClick:
+ return getListener(DOM::EventImpl::KHTML_ECMA_CLICK_EVENT);
+ case OnDblClick:
+ return getListener(DOM::EventImpl::KHTML_ECMA_DBLCLICK_EVENT);
+ case OnDragDrop:
+ return getListener(DOM::EventImpl::KHTML_DRAGDROP_EVENT);
+ case OnError:
+ return getListener(DOM::EventImpl::ERROR_EVENT);
+ case OnFocus:
+ return getListener(DOM::EventImpl::FOCUS_EVENT);
+ case OnKeyDown:
+ return getListener(DOM::EventImpl::KEYDOWN_EVENT);
+ case OnKeyPress:
+ return getListener(DOM::EventImpl::KEYPRESS_EVENT);
+ case OnKeyUp:
+ return getListener(DOM::EventImpl::KEYUP_EVENT);
+ case OnLoad:
+ return getListener(DOM::EventImpl::LOAD_EVENT);
+ case OnMouseDown:
+ return getListener(DOM::EventImpl::MOUSEDOWN_EVENT);
+ case OnMouseMove:
+ return getListener(DOM::EventImpl::MOUSEMOVE_EVENT);
+ case OnMouseOut:
+ return getListener(DOM::EventImpl::MOUSEOUT_EVENT);
+ case OnMouseOver:
+ return getListener(DOM::EventImpl::MOUSEOVER_EVENT);
+ case OnMouseUp:
+ return getListener(DOM::EventImpl::MOUSEUP_EVENT);
+ case OnMove:
+ return getListener(DOM::EventImpl::KHTML_MOVE_EVENT);
+ case OnReset:
+ return getListener(DOM::EventImpl::RESET_EVENT);
+ case OnResize:
+ return getListener(DOM::EventImpl::RESIZE_EVENT);
+ case OnSelect:
+ return getListener(DOM::EventImpl::SELECT_EVENT);
+ case OnSubmit:
+ return getListener(DOM::EventImpl::SUBMIT_EVENT);
+ case OnUnload:
+ return getListener(DOM::EventImpl::UNLOAD_EVENT);
+ case SourceIndex: {
+ // Retrieves the ordinal position of the object, in source order, as the object
+ // appears in the document's all collection
+ // i.e. document.all[n.sourceIndex] == n
+ DOM::Document doc = node.ownerDocument();
+ if (doc.isHTMLDocument()) {
+ DOM::HTMLCollection all = static_cast<DOM::HTMLDocument>(doc).all();
+ unsigned long i = 0;
+ DOM::Node n = all.firstItem();
+ for ( ; !n.isNull() && n != node; n = all.nextItem() )
+ ++i;
+ Q_ASSERT( !n.isNull() ); // node not in document.all !?
+ return Number(i);
+ }
+ }
+ default:
+ // no DOM standard, found in IE only
+
+ // Make sure our layout is up to date before we allow a query on these attributes.
+ DOM::DocumentImpl* docimpl = node.handle()->getDocument();
+ if (docimpl) {
+ docimpl->updateLayout();
+ }
+
+ tdehtml::RenderObject *rend = node.handle()->renderer();
+
+ //In quirks mode, may need to forward if to body.
+ rend = handleBodyRootQuirk(node, rend, token);
+
+ switch (token) {
+ case OffsetLeft:
+ return rend ? static_cast<Value>( Number( rend->offsetLeft() ) ) : Number(0);
+ case OffsetTop:
+ return rend ? static_cast<Value>( Number( rend->offsetTop() ) ) : Number(0);
+ case OffsetWidth:
+ return rend ? static_cast<Value>( Number( rend->offsetWidth() ) ) : Number(0);
+ case OffsetHeight:
+ return rend ? static_cast<Value>( Number( rend->offsetHeight() ) ) : Number(0);
+ case OffsetParent:
+ {
+ tdehtml::RenderObject* par = rend ? rend->offsetParent() : 0;
+ return getDOMNode( exec, par ? par->element() : 0 );
+ }
+ case ClientWidth:
+ return rend ? static_cast<Value>( Number( rend->clientWidth() ) ) : Number(0);
+ case ClientHeight:
+ return rend ? static_cast<Value>( Number( rend->clientHeight() ) ) : Number(0);
+ case ScrollWidth:
+ return rend ? static_cast<Value>( Number(rend->scrollWidth()) ) : Number(0);
+ case ScrollHeight:
+ return rend ? static_cast<Value>( Number(rend->scrollHeight()) ) : Number(0);
+ case ScrollLeft:
+ if (rend && rend->layer()) {
+ if (rend->isRoot() && !rend->style()->hidesOverflow())
+ return Number( node.ownerDocument().view() ? node.ownerDocument().view()->contentsX() : 0);
+ return Number( rend->layer()->scrollXOffset() );
+ }
+ return Number( 0 );
+ case ScrollTop:
+ if (rend && rend->layer()) {
+ if (rend->isRoot() && !rend->style()->hidesOverflow())
+ return Number( node.ownerDocument().view() ? node.ownerDocument().view()->contentsY() : 0);
+ return Number( rend->layer()->scrollYOffset() );
+ }
+ return Number( 0 );
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMNode::getValueProperty : " << token << endl;
+ break;
+ }
+ }
+ return Undefined();
+}
+
+
+void DOMNode::tryPut(ExecState *exec, const Identifier& propertyName, const Value& value, int attr)
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMNode::tryPut " << propertyName.qstring() << endl;
+#endif
+ DOMObjectLookupPut<DOMNode,DOMObject>(exec, propertyName, value, attr,
+ &DOMNodeTable, this );
+}
+
+void DOMNode::putValueProperty(ExecState *exec, int token, const Value& value, int /*attr*/)
+{
+ switch (token) {
+ case NodeValue:
+ node.setNodeValue(value.toString(exec).string());
+ break;
+ case Prefix:
+ node.setPrefix(value.toString(exec).string());
+ break;
+ case TextContent:
+ node.setTextContent(value.toString(exec).string());
+ break;
+ case OnAbort:
+ setListener(exec,DOM::EventImpl::ABORT_EVENT,value);
+ break;
+ case OnBlur:
+ setListener(exec,DOM::EventImpl::BLUR_EVENT,value);
+ break;
+ case OnChange:
+ setListener(exec,DOM::EventImpl::CHANGE_EVENT,value);
+ break;
+ case OnClick:
+ setListener(exec,DOM::EventImpl::KHTML_ECMA_CLICK_EVENT,value);
+ break;
+ case OnDblClick:
+ setListener(exec,DOM::EventImpl::KHTML_ECMA_DBLCLICK_EVENT,value);
+ break;
+ case OnDragDrop:
+ setListener(exec,DOM::EventImpl::KHTML_DRAGDROP_EVENT,value);
+ break;
+ case OnError:
+ setListener(exec,DOM::EventImpl::ERROR_EVENT,value);
+ break;
+ case OnFocus:
+ setListener(exec,DOM::EventImpl::FOCUS_EVENT,value);
+ break;
+ case OnKeyDown:
+ setListener(exec,DOM::EventImpl::KEYDOWN_EVENT,value);
+ break;
+ case OnKeyPress:
+ setListener(exec,DOM::EventImpl::KEYPRESS_EVENT,value);
+ break;
+ case OnKeyUp:
+ setListener(exec,DOM::EventImpl::KEYUP_EVENT,value);
+ break;
+ case OnLoad:
+ setListener(exec,DOM::EventImpl::LOAD_EVENT,value);
+ break;
+ case OnMouseDown:
+ setListener(exec,DOM::EventImpl::MOUSEDOWN_EVENT,value);
+ break;
+ case OnMouseMove:
+ setListener(exec,DOM::EventImpl::MOUSEMOVE_EVENT,value);
+ break;
+ case OnMouseOut:
+ setListener(exec,DOM::EventImpl::MOUSEOUT_EVENT,value);
+ break;
+ case OnMouseOver:
+ setListener(exec,DOM::EventImpl::MOUSEOVER_EVENT,value);
+ break;
+ case OnMouseUp:
+ setListener(exec,DOM::EventImpl::MOUSEUP_EVENT,value);
+ break;
+ case OnMove:
+ setListener(exec,DOM::EventImpl::KHTML_MOVE_EVENT,value);
+ break;
+ case OnReset:
+ setListener(exec,DOM::EventImpl::RESET_EVENT,value);
+ break;
+ case OnResize:
+ setListener(exec,DOM::EventImpl::RESIZE_EVENT,value);
+ break;
+ case OnSelect:
+ setListener(exec,DOM::EventImpl::SELECT_EVENT,value);
+ break;
+ case OnSubmit:
+ setListener(exec,DOM::EventImpl::SUBMIT_EVENT,value);
+ break;
+ case OnUnload:
+ setListener(exec,DOM::EventImpl::UNLOAD_EVENT,value);
+ break;
+ default:
+ // Make sure our layout is up to date
+ DOM::DocumentImpl* docimpl = node.handle()->getDocument();
+ if (docimpl)
+ docimpl->updateLayout();
+
+ tdehtml::RenderObject *rend = node.handle() ? node.handle()->renderer() : 0L;
+
+ //In quirks mode, may need to forward.
+ rend = handleBodyRootQuirk(node, rend, token);
+
+ switch (token) {
+ case ScrollLeft:
+ if (rend && rend->layer()) {
+ if (rend->style()->hidesOverflow())
+ rend->layer()->scrollToXOffset(value.toInt32(exec));
+ else if (rend->isRoot()) {
+ TQScrollView* sview = node.ownerDocument().view();
+ if (sview)
+ sview->setContentsPos(value.toInt32(exec), sview->contentsY());
+ }
+ }
+ break;
+ case ScrollTop:
+ if (rend && rend->layer()) {
+ if (rend->style()->hidesOverflow())
+ rend->layer()->scrollToYOffset(value.toInt32(exec));
+ else if (rend->isRoot()) {
+ TQScrollView* sview = node.ownerDocument().view();
+ if (sview)
+ sview->setContentsPos(sview->contentsX(), value.toInt32(exec));
+ }
+ }
+ break;
+ default:
+ kdDebug(6070) << "WARNING: DOMNode::putValueProperty unhandled token " << token << endl;
+ }
+ }
+}
+
+Value DOMNode::toPrimitive(ExecState *exec, Type /*preferred*/) const
+{
+ if (node.isNull())
+ return Null();
+
+ return String(toString(exec));
+}
+
+UString DOMNode::toString(ExecState *) const
+{
+ if (node.isNull())
+ return "null";
+ UString s;
+
+ DOM::Element e = node;
+ if ( !e.isNull() ) {
+ s = static_cast<UString>(e.nodeName().string());
+ } else
+ s = className(); // fallback
+
+ return "[object " + s + "]";
+}
+
+void DOMNode::setListener(ExecState *exec, int eventId, const Value& func) const
+{
+ node.handle()->setHTMLEventListener(eventId,Window::retrieveActive(exec)->getJSEventListener(func,true));
+}
+
+Value DOMNode::getListener(int eventId) const
+{
+ DOM::EventListener *listener = node.handle()->getHTMLEventListener(eventId);
+ JSEventListener *jsListener = static_cast<JSEventListener*>(listener);
+ if ( jsListener && jsListener->listenerObjImp() )
+ return jsListener->listenerObj();
+ else
+ return Null();
+}
+
+void DOMNode::pushEventHandlerScope(ExecState *, ScopeChain &) const
+{
+}
+
+Value DOMNodeProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( DOMNode, thisObj );
+ DOM::Node node = static_cast<DOMNode *>( thisObj.imp() )->toNode();
+ switch (id) {
+ case DOMNode::HasAttributes:
+ return Boolean(node.hasAttributes());
+ case DOMNode::HasChildNodes:
+ return Boolean(node.hasChildNodes());
+ case DOMNode::CloneNode:
+ return getDOMNode(exec,node.cloneNode(args[0].toBoolean(exec)));
+ case DOMNode::Normalize:
+ node.normalize();
+ return Undefined();
+ case DOMNode::IsSupported:
+ return Boolean(node.isSupported(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ case DOMNode::AddEventListener: {
+ JSEventListener *listener = Window::retrieveActive(exec)->getJSEventListener(args[1]);
+ node.addEventListener(args[0].toString(exec).string(),listener,args[2].toBoolean(exec));
+ return Undefined();
+ }
+ case DOMNode::RemoveEventListener: {
+ JSEventListener *listener = Window::retrieveActive(exec)->getJSEventListener(args[1]);
+ node.removeEventListener(args[0].toString(exec).string(),listener,args[2].toBoolean(exec));
+ return Undefined();
+ }
+ case DOMNode::DispatchEvent:
+ return Boolean(node.dispatchEvent(toEvent(args[0])));
+ case DOMNode::AppendChild:
+ return getDOMNode(exec,node.appendChild(toNode(args[0])));
+ case DOMNode::RemoveChild:
+ return getDOMNode(exec,node.removeChild(toNode(args[0])));
+ case DOMNode::InsertBefore:
+ return getDOMNode(exec,node.insertBefore(toNode(args[0]), toNode(args[1])));
+ case DOMNode::ReplaceChild:
+ return getDOMNode(exec,node.replaceChild(toNode(args[0]), toNode(args[1])));
+ case DOMNode::Contains:
+ {
+ DOM::Node other = toNode(args[0]);
+ if (!other.isNull() && node.nodeType()==DOM::Node::ELEMENT_NODE)
+ {
+ DOM::NodeBaseImpl *impl = static_cast<DOM::NodeBaseImpl *>(node.handle());
+ bool retval = other.handle()->isAncestor(impl);
+ return Boolean(retval);
+ }
+ return Undefined();
+ }
+ case DOMNode::InsertAdjacentHTML:
+ {
+ // see http://www.faqts.com/knowledge_base/view.phtml/aid/5756
+ // and http://msdn.microsoft.com/workshop/author/dhtml/reference/methods/insertAdjacentHTML.asp
+ Range range = node.ownerDocument().createRange();
+
+ range.setStartBefore(node);
+
+ DocumentFragment docFrag = range.createContextualFragment(args[1].toString(exec).string());
+
+ DOMString where = args[0].toString(exec).string();
+
+ if (where == "beforeBegin" || where == "BeforeBegin")
+ node.parentNode().insertBefore(docFrag, node);
+ else if (where == "afterBegin" || where == "AfterBegin")
+ node.insertBefore(docFrag, node.firstChild());
+ else if (where == "beforeEnd" || where == "BeforeEnd")
+ return getDOMNode(exec, node.appendChild(docFrag));
+ else if (where == "afterEnd" || where == "AfterEnd")
+ if (!node.nextSibling().isNull())
+ node.parentNode().insertBefore(docFrag, node.nextSibling());
+ else
+ node.parentNode().appendChild(docFrag);
+
+ return Undefined();
+ }
+ case DOMNode::Item:
+ return getDOMNode(exec, node.childNodes().item(static_cast<unsigned long>(args[0].toNumber(exec))));
+ }
+
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+
+/*
+@begin DOMNodeListProtoTable 2
+ item DOMNodeList::Item DontDelete|Function 1
+# IE extension (IE treats DOMNodeList like an HTMLCollection)
+ namedItem DOMNodeList::NamedItem DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMNodeListProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMNodeListProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMNodeList", DOMNodeListProto, DOMNodeListProtoFunc)
+
+
+const ClassInfo DOMNodeList::info = { "NodeList", 0, 0, 0 };
+
+DOMNodeList::DOMNodeList(ExecState *exec, const DOM::NodeList& l)
+ : DOMObject(DOMNodeListProto::self(exec)), list(l) { }
+
+DOMNodeList::~DOMNodeList()
+{
+ ScriptInterpreter::forgetDOMObject(list.handle());
+}
+
+// We have to implement hasProperty since we don't use a hashtable for 'length'
+// ## this breaks "for (..in..)" though.
+bool DOMNodeList::hasProperty(ExecState *exec, const Identifier &p) const
+{
+ if (p == lengthPropertyName)
+ return true;
+
+ if (ObjectImp::hasProperty(exec, p))
+ return true;
+
+ bool ok;
+ unsigned long pos = p.toULong(&ok);
+ if (ok && pos < list.length())
+ return true;
+
+ // ## missing: accept p if item id...
+ return false;
+}
+
+Value DOMNodeList::tryGet(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMNodeList::tryGet " << p.ascii() << endl;
+#endif
+ if (p == lengthPropertyName)
+ return Number(list.length());
+
+ // Look in the prototype (for functions) before assuming it's an item's name
+ Object proto = Object::dynamicCast(prototype());
+ if (proto.isValid() && proto.hasProperty(exec,p))
+ return proto.get(exec,p);
+
+ Value result;
+
+ // array index ?
+ bool ok;
+ long unsigned int idx = p.toULong(&ok);
+ if (ok)
+ result = getDOMNode(exec,list.item(idx));
+ else {
+ // Find by ID
+ DOM::HTMLElement e;
+ unsigned long l = list.length();
+ bool found = false;
+
+ for ( unsigned long i = 0; i < l; i++ )
+ if ( ( e = list.item( i ) ).id() == p.string() ) {
+ result = getDOMNode(exec, list.item( i ) );
+ found = true;
+ break;
+ }
+
+ if ( !found )
+ result = ObjectImp::get(exec, p);
+ }
+
+ return result;
+}
+
+ReferenceList DOMNodeList::propList(ExecState *exec, bool recursive)
+{
+ ReferenceList properties = ObjectImp::propList(exec,recursive);
+
+ for (unsigned i = 0; i < list.length(); ++i) {
+ if (!ObjectImp::hasProperty(exec,Identifier::from(i))) {
+ properties.append(Reference(this, i));
+ }
+ }
+
+ if (!ObjectImp::hasProperty(exec, lengthPropertyName))
+ properties.append(Reference(this, lengthPropertyName));
+
+ return properties;
+}
+
+// Need to support both get and call, so that list[0] and list(0) work.
+Value DOMNodeList::call(ExecState *exec, Object &thisObj, const List &args)
+{
+ // This code duplication is necessary, DOMNodeList isn't a DOMFunction
+ Value val;
+ try {
+ val = tryCall(exec, thisObj, args);
+ }
+ // pity there's no way to distinguish between these in JS code
+ catch (...) {
+ Object err = Error::create(exec, GeneralError, "Exception from DOMNodeList");
+ exec->setException(err);
+ }
+ return val;
+}
+
+Value DOMNodeList::tryCall(ExecState *exec, Object &, const List &args)
+{
+ // Do not use thisObj here. See HTMLCollection.
+ UString s = args[0].toString(exec);
+
+ // index-based lookup?
+ bool ok;
+ unsigned int u = s.toULong(&ok);
+ if (ok)
+ return getDOMNode(exec,list.item(u));
+
+ // try lookup by name
+ // ### NodeList::namedItem() would be cool to have
+ // ### do we need to support the same two arg overload as in HTMLCollection?
+ Value result = tryGet(exec, Identifier(s));
+
+ if (result.isValid())
+ return result;
+
+ return Undefined();
+}
+
+// Not a prototype class currently, but should probably be converted to one
+Value DOMNodeListProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMNodeList, thisObj );
+ DOM::NodeList list = static_cast<DOMNodeList *>(thisObj.imp())->nodeList();
+ switch (id) {
+ case KJS::DOMNodeList::Item:
+ return getDOMNode(exec, list.item(args[0].toInt32(exec)));
+ case KJS::DOMNodeList::NamedItem:
+ {
+ // Not a real namedItem implementation like the one HTMLCollection has.
+ // This is only an IE extension...
+ DOM::HTMLElement e;
+ unsigned long len = list.length();
+ DOM::DOMString s = args[0].toString(exec).string();
+
+ for ( unsigned long i = 0; i < len; i++ )
+ {
+ e = list.item( i );
+ if ( !e.isNull() && (
+ e.id() == s || static_cast<ElementImpl *>(e.handle())->getAttribute(ATTR_NAME) == s )
+ )
+ {
+ return getDOMNode(exec, e );
+ }
+ }
+ return Null(); // see HTMLCollection::NamedItem implementation
+ }
+ default:
+ return Undefined();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+//### FIXME: link to the node prototype.
+const ClassInfo DOMAttr::info = { "Attr", &DOMNode::info, &DOMAttrTable, 0 };
+
+/* Source for DOMAttrTable.
+@begin DOMAttrTable 5
+ name DOMAttr::Name DontDelete|ReadOnly
+ specified DOMAttr::Specified DontDelete|ReadOnly
+ value DOMAttr::ValueProperty DontDelete
+ ownerElement DOMAttr::OwnerElement DontDelete|ReadOnly
+@end
+*/
+Value DOMAttr::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMAttr::tryGet " << propertyName.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMAttr,DOMNode>(exec, propertyName,
+ &DOMAttrTable, this );
+}
+
+Value DOMAttr::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case Name:
+ return String(static_cast<DOM::Attr>(node).name());
+ case Specified:
+ return Boolean(static_cast<DOM::Attr>(node).specified());
+ case ValueProperty:
+ return String(static_cast<DOM::Attr>(node).value());
+ case OwnerElement: // DOM2
+ return getDOMNode(exec,static_cast<DOM::Attr>(node).ownerElement());
+ }
+ return Value(); // not reached
+}
+
+void DOMAttr::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMAttr::tryPut " << propertyName.qstring() << endl;
+#endif
+ DOMObjectLookupPut<DOMAttr,DOMNode>(exec, propertyName, value, attr,
+ &DOMAttrTable, this );
+}
+
+void DOMAttr::putValueProperty(ExecState *exec, int token, const Value& value, int /*attr*/)
+{
+ switch (token) {
+ case ValueProperty:
+ static_cast<DOM::Attr>(node).setValue(value.toString(exec).string());
+ return;
+ default:
+ kdDebug(6070) << "WARNING: DOMAttr::putValueProperty unhandled token " << token << endl;
+ }
+}
+
+// -------------------------------------------------------------------------
+
+/* Source for DOMDocumentProtoTable.
+@begin DOMDocumentProtoTable 23
+ createElement DOMDocument::CreateElement DontDelete|Function 1
+ createDocumentFragment DOMDocument::CreateDocumentFragment DontDelete|Function 1
+ createTextNode DOMDocument::CreateTextNode DontDelete|Function 1
+ createComment DOMDocument::CreateComment DontDelete|Function 1
+ createCDATASection DOMDocument::CreateCDATASection DontDelete|Function 1
+ createProcessingInstruction DOMDocument::CreateProcessingInstruction DontDelete|Function 1
+ createAttribute DOMDocument::CreateAttribute DontDelete|Function 1
+ createEntityReference DOMDocument::CreateEntityReference DontDelete|Function 1
+ getElementsByTagName DOMDocument::GetElementsByTagName DontDelete|Function 1
+ importNode DOMDocument::ImportNode DontDelete|Function 2
+ createElementNS DOMDocument::CreateElementNS DontDelete|Function 2
+ createAttributeNS DOMDocument::CreateAttributeNS DontDelete|Function 2
+ getElementsByTagNameNS DOMDocument::GetElementsByTagNameNS DontDelete|Function 2
+ getElementById DOMDocument::GetElementById DontDelete|Function 1
+ createRange DOMDocument::CreateRange DontDelete|Function 0
+ createNodeIterator DOMDocument::CreateNodeIterator DontDelete|Function 3
+ createTreeWalker DOMDocument::CreateTreeWalker DontDelete|Function 4
+ createEvent DOMDocument::CreateEvent DontDelete|Function 1
+ getOverrideStyle DOMDocument::GetOverrideStyle DontDelete|Function 2
+ abort DOMDocument::Abort DontDelete|Function 0
+ load DOMDocument::Load DontDelete|Function 1
+ loadXML DOMDocument::LoadXML DontDelete|Function 2
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(DOMDocumentProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMDocument", DOMDocumentProto, DOMDocumentProtoFunc)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(DocumentPseudoCtor, "Document", DOMDocumentProto)
+
+const ClassInfo DOMDocument::info = { "Document", &DOMNode::info, &DOMDocumentTable, 0 };
+
+/* Source for DOMDocumentTable.
+@begin DOMDocumentTable 4
+ doctype DOMDocument::DocType DontDelete|ReadOnly
+ implementation DOMDocument::Implementation DontDelete|ReadOnly
+ characterSet DOMDocument::CharacterSet DontDelete|ReadOnly
+ documentElement DOMDocument::DocumentElement DontDelete|ReadOnly
+ styleSheets DOMDocument::StyleSheets DontDelete|ReadOnly
+ preferredStylesheetSet DOMDocument::PreferredStylesheetSet DontDelete|ReadOnly
+ selectedStylesheetSet DOMDocument::SelectedStylesheetSet DontDelete
+ readyState DOMDocument::ReadyState DontDelete|ReadOnly
+ defaultView DOMDocument::DefaultView DontDelete|ReadOnly
+ async DOMDocument::Async DontDelete
+@end
+*/
+
+DOMDocument::DOMDocument(ExecState *exec, const DOM::Document& d)
+ : DOMNode(DOMDocumentProto::self(exec), d) { }
+
+DOMDocument::DOMDocument(const Object& proto, const DOM::Document& d)
+ : DOMNode(proto, d) { }
+
+DOMDocument::~DOMDocument()
+{
+ ScriptInterpreter::forgetDOMObject(node.handle());
+}
+
+Value DOMDocument::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMDocument::tryGet " << propertyName.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMDocument, DOMNode>(
+ exec, propertyName, &DOMDocumentTable, this);
+}
+
+Value DOMDocument::getValueProperty(ExecState *exec, int token) const
+{
+ DOM::Document doc = static_cast<DOM::Document>(node);
+
+ switch(token) {
+ case DocType:
+ return getDOMNode(exec,doc.doctype());
+ case Implementation:
+ return getDOMDOMImplementation(exec,doc.implementation());
+ case DocumentElement:
+ return getDOMNode(exec,doc.documentElement());
+ case CharacterSet: {
+ DOM::DocumentImpl* docImpl = static_cast<DOM::DocumentImpl*>(doc.handle());
+ if (docImpl->part())
+ return String(docImpl->part()->encoding());
+ else
+ return Undefined();
+ }
+ case StyleSheets:
+ //kdDebug() << "DOMDocument::StyleSheets, returning " << doc.styleSheets().length() << " stylesheets" << endl;
+ return getDOMStyleSheetList(exec, doc.styleSheets(), doc);
+ case DOMDocument::DefaultView: // DOM2
+ {
+ KHTMLView *view = node.handle()->getDocument()->view();
+ if (view)
+ return Window::retrieve(view->part());
+ return getDOMAbstractView(exec, doc.defaultView());
+ }
+ case PreferredStylesheetSet:
+ return String(doc.preferredStylesheetSet());
+ case SelectedStylesheetSet:
+ return String(doc.selectedStylesheetSet());
+ case ReadyState:
+ {
+ DOM::DocumentImpl* docimpl = node.handle()->getDocument();
+ if ( docimpl && docimpl->view() )
+ {
+ KHTMLPart* part = docimpl->view()->part();
+ if ( part ) {
+ if (part->d->m_bComplete) return String("complete");
+ if (docimpl->parsing()) return String("loading");
+ return String("loaded");
+ // What does the interactive value mean ?
+ // Missing support for "uninitialized"
+ }
+ }
+ return Undefined();
+ }
+ case Async:
+ return Boolean(doc.async());
+ default:
+ kdDebug(6070) << "WARNING: DOMDocument::getValueProperty unhandled token " << token << endl;
+ return Value();
+ }
+}
+
+void DOMDocument::tryPut(ExecState *exec, const Identifier& propertyName, const Value& value, int attr)
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMDocument::tryPut " << propertyName.qstring() << endl;
+#endif
+ DOMObjectLookupPut<DOMDocument,DOMNode>(exec, propertyName, value, attr, &DOMDocumentTable, this );
+}
+
+void DOMDocument::putValueProperty(ExecState *exec, int token, const Value& value, int /*attr*/)
+{
+ DOM::Document doc = static_cast<DOM::Document>(node);
+ switch (token) {
+ case SelectedStylesheetSet: {
+ doc.setSelectedStylesheetSet(value.toString(exec).string());
+ break;
+ }
+ case Async: {
+ doc.setAsync(value.toBoolean(exec));
+ break;
+ }
+ }
+}
+
+Value DOMDocumentProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMDocument, thisObj );
+ DOM::Node node = static_cast<DOMNode *>( thisObj.imp() )->toNode();
+ DOM::Document doc = static_cast<DOM::Document>(node);
+ String str = args[0].toString(exec);
+ DOM::DOMString s = str.value().string();
+
+ switch(id) {
+ case DOMDocument::CreateElement:
+ return getDOMNode(exec,doc.createElement(s));
+ case DOMDocument::CreateDocumentFragment:
+ return getDOMNode(exec,doc.createDocumentFragment());
+ case DOMDocument::CreateTextNode:
+ return getDOMNode(exec,doc.createTextNode(s));
+ case DOMDocument::CreateComment:
+ return getDOMNode(exec,doc.createComment(s));
+ case DOMDocument::CreateCDATASection:
+ return getDOMNode(exec,doc.createCDATASection(s)); /* TODO: okay ? */
+ case DOMDocument::CreateProcessingInstruction:
+ return getDOMNode(exec,doc.createProcessingInstruction(args[0].toString(exec).string(),
+ args[1].toString(exec).string()));
+ case DOMDocument::CreateAttribute:
+ return getDOMNode(exec,doc.createAttribute(s));
+ case DOMDocument::CreateEntityReference:
+ return getDOMNode(exec,doc.createEntityReference(args[0].toString(exec).string()));
+ case DOMDocument::GetElementsByTagName:
+ return getDOMNodeList(exec,doc.getElementsByTagName(s));
+ case DOMDocument::ImportNode: // DOM2
+ return getDOMNode(exec,doc.importNode(toNode(args[0]), args[1].toBoolean(exec)));
+ case DOMDocument::CreateElementNS: // DOM2
+ return getDOMNode(exec,doc.createElementNS(args[0].toString(exec).string(), args[1].toString(exec).string()));
+ case DOMDocument::CreateAttributeNS: // DOM2
+ return getDOMNode(exec,doc.createAttributeNS(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ case DOMDocument::GetElementsByTagNameNS: // DOM2
+ return getDOMNodeList(exec,doc.getElementsByTagNameNS(args[0].toString(exec).string(),
+ args[1].toString(exec).string()));
+ case DOMDocument::GetElementById:
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMDocument::GetElementById looking for " << args[0].toString(exec).string() << endl;
+#endif
+ return getDOMNode(exec,doc.getElementById(args[0].toString(exec).string()));
+ case DOMDocument::CreateRange:
+ return getDOMRange(exec,doc.createRange());
+ case DOMDocument::CreateNodeIterator:
+ if (args[2].isA(NullType)) {
+ DOM::NodeFilter filter;
+ return getDOMNodeIterator(exec,
+ doc.createNodeIterator(toNode(args[0]),
+ (long unsigned int)(args[1].toNumber(exec)),
+ filter,args[3].toBoolean(exec)));
+ }
+ else {
+ Object obj = Object::dynamicCast(args[2]);
+ if (obj.isValid())
+ {
+ DOM::CustomNodeFilter *customFilter = new JSNodeFilter(obj);
+ DOM::NodeFilter filter = DOM::NodeFilter::createCustom(customFilter);
+ return getDOMNodeIterator(exec,
+ doc.createNodeIterator(
+ toNode(args[0]),(long unsigned int)(args[1].toNumber(exec)),
+ filter,args[3].toBoolean(exec)));
+ }// else?
+ }
+ case DOMDocument::CreateTreeWalker:
+ return getDOMTreeWalker(exec,doc.createTreeWalker(toNode(args[0]),(long unsigned int)(args[1].toNumber(exec)),
+ toNodeFilter(args[2]),args[3].toBoolean(exec)));
+ case DOMDocument::CreateEvent:
+ return getDOMEvent(exec,doc.createEvent(s));
+ case DOMDocument::GetOverrideStyle: {
+ DOM::Node arg0 = toNode(args[0]);
+ if (arg0.nodeType() != DOM::Node::ELEMENT_NODE)
+ return Undefined(); // throw exception?
+ else
+ return getDOMCSSStyleDeclaration(exec,doc.getOverrideStyle(static_cast<DOM::Element>(arg0),args[1].toString(exec).string()));
+ }
+ case DOMDocument::Abort:
+ doc.abort();
+ break;
+ case DOMDocument::Load: {
+ Window* active = Window::retrieveActive(exec);
+ // Complete the URL using the "active part" (running interpreter). We do this for the security
+ // check and to make sure we load exactly the same url as we have verified to be safe
+ KHTMLPart *tdehtmlpart = ::tqqt_cast<KHTMLPart *>(active->part());
+ if (tdehtmlpart) {
+ // Security: only allow documents to be loaded from the same host
+ TQString dstUrl = tdehtmlpart->htmlDocument().completeURL(s).string();
+ KParts::ReadOnlyPart *part = static_cast<KJS::ScriptInterpreter*>(exec->interpreter())->part();
+ if (part->url().host() == KURL(dstUrl).host()) {
+ kdDebug(6070) << "JavaScript: access granted for document.load() of " << dstUrl << endl;
+ doc.load(dstUrl);
+ }
+ else {
+ kdDebug(6070) << "JavaScript: access denied for document.load() of " << dstUrl << endl;
+ }
+ }
+ break;
+ }
+ case DOMDocument::LoadXML:
+ doc.loadXML(s);
+ break;
+ default:
+ break;
+ }
+
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+
+/* Source for DOMElementProtoTable.
+@begin DOMElementProtoTable 17
+ getAttribute DOMElement::GetAttribute DontDelete|Function 1
+ setAttribute DOMElement::SetAttribute DontDelete|Function 2
+ removeAttribute DOMElement::RemoveAttribute DontDelete|Function 1
+ getAttributeNode DOMElement::GetAttributeNode DontDelete|Function 1
+ setAttributeNode DOMElement::SetAttributeNode DontDelete|Function 2
+ removeAttributeNode DOMElement::RemoveAttributeNode DontDelete|Function 1
+ getElementsByTagName DOMElement::GetElementsByTagName DontDelete|Function 1
+ hasAttribute DOMElement::HasAttribute DontDelete|Function 1
+ getAttributeNS DOMElement::GetAttributeNS DontDelete|Function 2
+ setAttributeNS DOMElement::SetAttributeNS DontDelete|Function 3
+ removeAttributeNS DOMElement::RemoveAttributeNS DontDelete|Function 2
+ getAttributeNodeNS DOMElement::GetAttributeNodeNS DontDelete|Function 2
+ setAttributeNodeNS DOMElement::SetAttributeNodeNS DontDelete|Function 1
+ getElementsByTagNameNS DOMElement::GetElementsByTagNameNS DontDelete|Function 2
+ hasAttributeNS DOMElement::HasAttributeNS DontDelete|Function 2
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(DOMElementProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMElement", DOMElementProto, DOMElementProtoFunc)
+
+IMPLEMENT_PSEUDO_CONSTRUCTOR(ElementPseudoCtor, "Element", DOMElementProto)
+
+const ClassInfo DOMElement::info = { "Element", &DOMNode::info, &DOMElementTable, 0 };
+/* Source for DOMElementTable.
+@begin DOMElementTable 3
+ tagName DOMElement::TagName DontDelete|ReadOnly
+ style DOMElement::Style DontDelete|ReadOnly
+@end
+*/
+DOMElement::DOMElement(ExecState *exec, const DOM::Element& e)
+ : DOMNode(DOMElementProto::self(exec), e) { }
+
+DOMElement::DOMElement(const Object& proto, const DOM::Element& e)
+ : DOMNode(proto, e) { }
+
+Value DOMElement::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMElement::tryGet " << propertyName.qstring() << endl;
+#endif
+ DOM::Element element = static_cast<DOM::Element>(node);
+
+ const HashEntry* entry = Lookup::findEntry(&DOMElementTable, propertyName);
+ if (entry)
+ {
+ switch( entry->value ) {
+ case TagName:
+ return String(element.tagName());
+ case Style:
+ return getDOMCSSStyleDeclaration(exec,element.style());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMElement::tryGet : " << entry->value << endl;
+ break;
+ }
+ }
+ // We have to check in DOMNode before giving access to attributes, otherwise
+ // onload="..." would make onload return the string (attribute value) instead of
+ // the listener object (function).
+ if (DOMNode::hasProperty(exec, propertyName))
+ return DOMNode::tryGet(exec, propertyName);
+
+ DOM::DOMString attr = element.getAttribute( propertyName.string() );
+ // Give access to attributes
+ if ( !attr.isNull() )
+ return String( attr );
+
+ return Undefined();
+}
+
+Value DOMElementProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMNode, thisObj ); // node should be enough here, given the cast
+ DOM::Node node = static_cast<DOMNode *>( thisObj.imp() )->toNode();
+ DOM::Element element = static_cast<DOM::Element>(node);
+
+ switch(id) {
+ case DOMElement::GetAttribute:
+ /** In theory, we should not return null here, as per DOM. In practice, that
+ breaks websites
+ */
+ return getString(element.getAttribute(args[0].toString(exec).string()));
+ case DOMElement::SetAttribute:
+ element.setAttribute(args[0].toString(exec).string(),args[1].toString(exec).string());
+ return Undefined();
+ case DOMElement::RemoveAttribute:
+ element.removeAttribute(args[0].toString(exec).string());
+ return Undefined();
+ case DOMElement::GetAttributeNode:
+ return getDOMNode(exec,element.getAttributeNode(args[0].toString(exec).string()));
+ case DOMElement::SetAttributeNode:
+ return getDOMNode(exec,element.setAttributeNode(KJS::toNode(args[0])));
+ case DOMElement::RemoveAttributeNode:
+ return getDOMNode(exec,element.removeAttributeNode(KJS::toNode(args[0])));
+ case DOMElement::GetElementsByTagName:
+ return getDOMNodeList(exec,element.getElementsByTagName(args[0].toString(exec).string()));
+ case DOMElement::HasAttribute: // DOM2
+ return Boolean(element.hasAttribute(args[0].toString(exec).string()));
+ case DOMElement::GetAttributeNS: // DOM2
+ return String(element.getAttributeNS(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ case DOMElement::SetAttributeNS: // DOM2
+ element.setAttributeNS(args[0].toString(exec).string(),args[1].toString(exec).string(),args[2].toString(exec).string());
+ return Undefined();
+ case DOMElement::RemoveAttributeNS: // DOM2
+ element.removeAttributeNS(args[0].toString(exec).string(),args[1].toString(exec).string());
+ return Undefined();
+ case DOMElement::GetAttributeNodeNS: // DOM2
+ return getDOMNode(exec,element.getAttributeNodeNS(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ case DOMElement::SetAttributeNodeNS: // DOM2
+ return getDOMNode(exec,element.setAttributeNodeNS(KJS::toNode(args[0])));
+ case DOMElement::GetElementsByTagNameNS: // DOM2
+ return getDOMNodeList(exec,element.getElementsByTagNameNS(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ case DOMElement::HasAttributeNS: // DOM2
+ return Boolean(element.hasAttributeNS(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ default:
+ return Undefined();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+/* Source for DOMDOMImplementationProtoTable.
+@begin DOMDOMImplementationProtoTable 5
+ hasFeature DOMDOMImplementation::HasFeature DontDelete|Function 2
+ createCSSStyleSheet DOMDOMImplementation::CreateCSSStyleSheet DontDelete|Function 2
+# DOM2
+ createDocumentType DOMDOMImplementation::CreateDocumentType DontDelete|Function 3
+ createDocument DOMDOMImplementation::CreateDocument DontDelete|Function 3
+ createHTMLDocument DOMDOMImplementation::CreateHTMLDocument DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMDOMImplementationProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMDOMImplementationProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMImplementation", DOMDOMImplementationProto, DOMDOMImplementationProtoFunc)
+
+const ClassInfo DOMDOMImplementation::info = { "DOMImplementation", 0, 0, 0 };
+
+DOMDOMImplementation::DOMDOMImplementation(ExecState *exec, const DOM::DOMImplementation& i)
+ : DOMObject(DOMDOMImplementationProto::self(exec)), implementation(i) { }
+
+DOMDOMImplementation::~DOMDOMImplementation()
+{
+ ScriptInterpreter::forgetDOMObject(implementation.handle());
+}
+
+Value DOMDOMImplementationProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMDOMImplementation, thisObj );
+ DOM::DOMImplementation implementation = static_cast<DOMDOMImplementation *>( thisObj.imp() )->toImplementation();
+
+ switch(id) {
+ case DOMDOMImplementation::HasFeature:
+ return Boolean(implementation.hasFeature(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ case DOMDOMImplementation::CreateDocumentType: // DOM2
+ return getDOMNode(exec,implementation.createDocumentType(args[0].toString(exec).string(),args[1].toString(exec).string(),args[2].toString(exec).string()));
+ case DOMDOMImplementation::CreateDocument: { // DOM2
+ // Initially set the URL to document of the creator... this is so that it resides in the same
+ // host/domain for security checks. The URL will be updated if Document.load() is called.
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart*>(static_cast<KJS::ScriptInterpreter*>(exec->interpreter())->part());
+ if (part) {
+ Document doc = implementation.createDocument(args[0].toString(exec).string(),args[1].toString(exec).string(),toNode(args[2]));
+ KURL url = static_cast<DocumentImpl*>(part->document().handle())->URL();
+ static_cast<DocumentImpl*>(doc.handle())->setURL(url.url());
+ return getDOMNode(exec,doc);
+ }
+ break;
+ }
+ case DOMDOMImplementation::CreateCSSStyleSheet: // DOM2
+ return getDOMStyleSheet(exec,implementation.createCSSStyleSheet(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ case DOMDOMImplementation::CreateHTMLDocument: // DOM2-HTML
+ return getDOMNode(exec, implementation.createHTMLDocument(args[0].toString(exec).string()));
+ default:
+ break;
+ }
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMDocumentType::info = { "DocumentType", &DOMNode::info, &DOMDocumentTypeTable, 0 };
+
+/* Source for DOMDocumentTypeTable.
+@begin DOMDocumentTypeTable 6
+ name DOMDocumentType::Name DontDelete|ReadOnly
+ entities DOMDocumentType::Entities DontDelete|ReadOnly
+ notations DOMDocumentType::Notations DontDelete|ReadOnly
+# DOM2
+ publicId DOMDocumentType::PublicId DontDelete|ReadOnly
+ systemId DOMDocumentType::SystemId DontDelete|ReadOnly
+ internalSubset DOMDocumentType::InternalSubset DontDelete|ReadOnly
+@end
+*/
+DOMDocumentType::DOMDocumentType(ExecState *exec, const DOM::DocumentType& dt)
+ : DOMNode( /*### no proto yet*/exec, dt ) { }
+
+Value DOMDocumentType::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMDocumentType::tryGet " << propertyName.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMDocumentType, DOMNode>(exec, propertyName, &DOMDocumentTypeTable, this);
+}
+
+Value DOMDocumentType::getValueProperty(ExecState *exec, int token) const
+{
+ DOM::DocumentType type = static_cast<DOM::DocumentType>(node);
+ switch (token) {
+ case Name:
+ return String(type.name());
+ case Entities:
+ return getDOMNamedNodeMap(exec,type.entities());
+ case Notations:
+ return getDOMNamedNodeMap(exec,type.notations());
+ case PublicId: // DOM2
+ return String(type.publicId());
+ case SystemId: // DOM2
+ return String(type.systemId());
+ case InternalSubset: // DOM2
+ return getString(type.internalSubset()); // can be null, see domts/level2/core/internalSubset01.html
+ default:
+ kdDebug(6070) << "WARNING: DOMDocumentType::getValueProperty unhandled token " << token << endl;
+ return Value();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+/* Source for DOMNamedNodeMapProtoTable.
+@begin DOMNamedNodeMapProtoTable 7
+ getNamedItem DOMNamedNodeMap::GetNamedItem DontDelete|Function 1
+ setNamedItem DOMNamedNodeMap::SetNamedItem DontDelete|Function 1
+ removeNamedItem DOMNamedNodeMap::RemoveNamedItem DontDelete|Function 1
+ item DOMNamedNodeMap::Item DontDelete|Function 1
+# DOM2
+ getNamedItemNS DOMNamedNodeMap::GetNamedItemNS DontDelete|Function 2
+ setNamedItemNS DOMNamedNodeMap::SetNamedItemNS DontDelete|Function 1
+ removeNamedItemNS DOMNamedNodeMap::RemoveNamedItemNS DontDelete|Function 2
+@end
+@begin DOMNamedNodeMapTable 7
+ length DOMNamedNodeMap::Length DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMNamedNodeMapProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMNamedNodeMapProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("NamedNodeMap", DOMNamedNodeMapProto, DOMNamedNodeMapProtoFunc)
+
+const ClassInfo DOMNamedNodeMap::info = { "NamedNodeMap", 0, &DOMNamedNodeMapTable, 0 };
+
+DOMNamedNodeMap::DOMNamedNodeMap(ExecState *exec, const DOM::NamedNodeMap& m)
+ : DOMObject(DOMNamedNodeMapProto::self(exec)), map(m) { }
+
+DOMNamedNodeMap::~DOMNamedNodeMap()
+{
+ ScriptInterpreter::forgetDOMObject(map.handle());
+}
+
+bool DOMNamedNodeMap::hasProperty(ExecState *exec, const Identifier &p) const
+{
+ // ## missing? array index
+ return DOMObject::hasProperty(exec, p);
+}
+
+Value DOMNamedNodeMap::tryGet(ExecState* exec, const Identifier &p) const
+{
+ if (p == lengthPropertyName)
+ return Number(map.length());
+
+ // array index ?
+ bool ok;
+ long unsigned int idx = p.toULong(&ok);
+ if (ok)
+ return getDOMNode(exec,map.item(idx));
+
+ // Anything else (including functions, defined in the prototype)
+ return DOMObject::tryGet(exec, p);
+}
+
+Value DOMNamedNodeMapProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMNamedNodeMap, thisObj );
+ DOM::NamedNodeMap map = static_cast<DOMNamedNodeMap *>(thisObj.imp())->toMap();
+
+ switch(id) {
+ case DOMNamedNodeMap::GetNamedItem:
+ return getDOMNode(exec, map.getNamedItem(args[0].toString(exec).string()));
+ case DOMNamedNodeMap::SetNamedItem:
+ return getDOMNode(exec, map.setNamedItem(KJS::toNode(args[0])));
+ case DOMNamedNodeMap::RemoveNamedItem:
+ return getDOMNode(exec, map.removeNamedItem(args[0].toString(exec).string()));
+ case DOMNamedNodeMap::Item:
+ return getDOMNode(exec, map.item(args[0].toInt32(exec)));
+ case DOMNamedNodeMap::GetNamedItemNS: // DOM2
+ return getDOMNode(exec, map.getNamedItemNS(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ case DOMNamedNodeMap::SetNamedItemNS: // DOM2
+ return getDOMNode(exec, map.setNamedItemNS(toNode(args[0])));
+ case DOMNamedNodeMap::RemoveNamedItemNS: // DOM2
+ return getDOMNode(exec, map.removeNamedItemNS(args[0].toString(exec).string(),args[1].toString(exec).string()));
+ default:
+ break;
+ }
+
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+//### FIXME: proto
+const ClassInfo DOMProcessingInstruction::info = { "ProcessingInstruction", &DOMNode::info, &DOMProcessingInstructionTable, 0 };
+
+/* Source for DOMProcessingInstructionTable.
+@begin DOMProcessingInstructionTable 3
+ target DOMProcessingInstruction::Target DontDelete|ReadOnly
+ data DOMProcessingInstruction::Data DontDelete
+ sheet DOMProcessingInstruction::Sheet DontDelete|ReadOnly
+@end
+*/
+Value DOMProcessingInstruction::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+ return DOMObjectLookupGetValue<DOMProcessingInstruction, DOMNode>(exec, propertyName, &DOMProcessingInstructionTable, this);
+}
+
+Value DOMProcessingInstruction::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case Target:
+ return String(static_cast<DOM::ProcessingInstruction>(node).target());
+ case Data:
+ return String(static_cast<DOM::ProcessingInstruction>(node).data());
+ case Sheet:
+ return getDOMStyleSheet(exec,static_cast<DOM::ProcessingInstruction>(node).sheet());
+ default:
+ kdDebug(6070) << "WARNING: DOMProcessingInstruction::getValueProperty unhandled token " << token << endl;
+ return Value();
+ }
+}
+
+void DOMProcessingInstruction::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+ // Not worth using the hashtable for this one ;)
+ if (propertyName == "data")
+ static_cast<DOM::ProcessingInstruction>(node).setData(value.toString(exec).string());
+ else
+ DOMNode::tryPut(exec, propertyName,value,attr);
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMNotation::info = { "Notation", &DOMNode::info, &DOMNotationTable, 0 };
+
+/* Source for DOMNotationTable.
+@begin DOMNotationTable 2
+ publicId DOMNotation::PublicId DontDelete|ReadOnly
+ systemId DOMNotation::SystemId DontDelete|ReadOnly
+@end
+*/
+Value DOMNotation::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+ return DOMObjectLookupGetValue<DOMNotation, DOMNode>(exec, propertyName, &DOMNotationTable, this);
+}
+
+Value DOMNotation::getValueProperty(ExecState *, int token) const
+{
+ switch (token) {
+ case PublicId:
+ return String(static_cast<DOM::Notation>(node).publicId());
+ case SystemId:
+ return String(static_cast<DOM::Notation>(node).systemId());
+ default:
+ kdDebug(6070) << "WARNING: DOMNotation::getValueProperty unhandled token " << token << endl;
+ return Value();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMEntity::info = { "Entity", &DOMNode::info, 0, 0 };
+
+/* Source for DOMEntityTable.
+@begin DOMEntityTable 2
+ publicId DOMEntity::PublicId DontDelete|ReadOnly
+ systemId DOMEntity::SystemId DontDelete|ReadOnly
+ notationName DOMEntity::NotationName DontDelete|ReadOnly
+@end
+*/
+Value DOMEntity::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+ return DOMObjectLookupGetValue<DOMEntity, DOMNode>(exec, propertyName, &DOMEntityTable, this);
+}
+
+Value DOMEntity::getValueProperty(ExecState *, int token) const
+{
+ switch (token) {
+ case PublicId:
+ return String(static_cast<DOM::Entity>(node).publicId());
+ case SystemId:
+ return String(static_cast<DOM::Entity>(node).systemId());
+ case NotationName:
+ return String(static_cast<DOM::Entity>(node).notationName());
+ default:
+ kdDebug(6070) << "WARNING: DOMEntity::getValueProperty unhandled token " << token << endl;
+ return Value();
+ }
+}
+
+// -------------------------------------------------------------------------
+
+bool checkNodeSecurity(ExecState *exec, const DOM::Node& n)
+{
+ // Check to see if the currently executing interpreter is allowed to access the specified node
+ if (n.isNull())
+ return true;
+ KHTMLView *view = n.handle()->getDocument()->view();
+ Window* win = view && view->part() ? Window::retrieveWindow(view->part()) : 0L;
+ if ( !win || !win->isSafeScript(exec) )
+ return false;
+ return true;
+}
+
+Value getDOMNode(ExecState *exec, const DOM::Node& n)
+{
+ DOMObject *ret = 0;
+ if (n.isNull())
+ return Null();
+ ScriptInterpreter* interp = static_cast<ScriptInterpreter *>(exec->interpreter());
+ if ((ret = interp->getDOMObject(n.handle())))
+ return Value(ret);
+
+ switch (n.nodeType()) {
+ case DOM::Node::ELEMENT_NODE:
+ if (static_cast<DOM::Element>(n).isHTMLElement())
+ ret = new HTMLElement(exec, static_cast<DOM::HTMLElement>(n));
+ else
+ ret = new DOMElement(exec, static_cast<DOM::Element>(n));
+ break;
+ case DOM::Node::ATTRIBUTE_NODE:
+ ret = new DOMAttr(exec, static_cast<DOM::Attr>(n));
+ break;
+ case DOM::Node::TEXT_NODE:
+ case DOM::Node::CDATA_SECTION_NODE:
+ ret = new DOMText(exec, static_cast<DOM::Text>(n));
+ break;
+ case DOM::Node::ENTITY_REFERENCE_NODE:
+ ret = new DOMNode(exec, n);
+ break;
+ case DOM::Node::ENTITY_NODE:
+ ret = new DOMEntity(exec, static_cast<DOM::Entity>(n));
+ break;
+ case DOM::Node::PROCESSING_INSTRUCTION_NODE:
+ ret = new DOMProcessingInstruction(exec, static_cast<DOM::ProcessingInstruction>(n));
+ break;
+ case DOM::Node::COMMENT_NODE:
+ ret = new DOMCharacterData(exec, static_cast<DOM::CharacterData>(n));
+ break;
+ case DOM::Node::DOCUMENT_NODE:
+ if (static_cast<DOM::Document>(n).isHTMLDocument())
+ ret = new HTMLDocument(exec, static_cast<DOM::HTMLDocument>(n));
+ else
+ ret = new DOMDocument(exec, static_cast<DOM::Document>(n));
+ break;
+ case DOM::Node::DOCUMENT_TYPE_NODE:
+ ret = new DOMDocumentType(exec, static_cast<DOM::DocumentType>(n));
+ break;
+ case DOM::Node::DOCUMENT_FRAGMENT_NODE:
+ ret = new DOMNode(exec, n);
+ break;
+ case DOM::Node::NOTATION_NODE:
+ ret = new DOMNotation(exec, static_cast<DOM::Notation>(n));
+ break;
+ default:
+ ret = new DOMNode(exec, n);
+ }
+ interp->putDOMObject(n.handle(),ret);
+
+ return Value(ret);
+}
+
+Value getDOMNamedNodeMap(ExecState *exec, const DOM::NamedNodeMap& m)
+{
+ return Value(cacheDOMObject<DOM::NamedNodeMap, KJS::DOMNamedNodeMap>(exec, m));
+}
+
+Value getDOMNodeList(ExecState *exec, const DOM::NodeList& l)
+{
+ return Value(cacheDOMObject<DOM::NodeList, KJS::DOMNodeList>(exec, l));
+}
+
+Value getDOMDOMImplementation(ExecState *exec, const DOM::DOMImplementation& i)
+{
+ return Value(cacheDOMObject<DOM::DOMImplementation, KJS::DOMDOMImplementation>(exec, i));
+}
+
+// -------------------------------------------------------------------------
+IMPLEMENT_PSEUDO_CONSTRUCTOR_WITH_PARENT(NodeConstructor, "NodeConstructor", DOMNodeProto, DOMNodeConstants)
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMExceptionConstructor::info = { "DOMExceptionConstructor", 0, 0, 0 };
+
+/* Source for DOMExceptionConstructorTable.
+@begin DOMExceptionConstructorTable 15
+ INDEX_SIZE_ERR DOM::DOMException::INDEX_SIZE_ERR DontDelete|ReadOnly
+ DOMSTRING_SIZE_ERR DOM::DOMException::DOMSTRING_SIZE_ERR DontDelete|ReadOnly
+ HIERARCHY_REQUEST_ERR DOM::DOMException::HIERARCHY_REQUEST_ERR DontDelete|ReadOnly
+ WRONG_DOCUMENT_ERR DOM::DOMException::WRONG_DOCUMENT_ERR DontDelete|ReadOnly
+ INVALID_CHARACTER_ERR DOM::DOMException::INVALID_CHARACTER_ERR DontDelete|ReadOnly
+ NO_DATA_ALLOWED_ERR DOM::DOMException::NO_DATA_ALLOWED_ERR DontDelete|ReadOnly
+ NO_MODIFICATION_ALLOWED_ERR DOM::DOMException::NO_MODIFICATION_ALLOWED_ERR DontDelete|ReadOnly
+ NOT_FOUND_ERR DOM::DOMException::NOT_FOUND_ERR DontDelete|ReadOnly
+ NOT_SUPPORTED_ERR DOM::DOMException::NOT_SUPPORTED_ERR DontDelete|ReadOnly
+ INUSE_ATTRIBUTE_ERR DOM::DOMException::INUSE_ATTRIBUTE_ERR DontDelete|ReadOnly
+ INVALID_STATE_ERR DOM::DOMException::INVALID_STATE_ERR DontDelete|ReadOnly
+ SYNTAX_ERR DOM::DOMException::SYNTAX_ERR DontDelete|ReadOnly
+ INVALID_MODIFICATION_ERR DOM::DOMException::INVALID_MODIFICATION_ERR DontDelete|ReadOnly
+ NAMESPACE_ERR DOM::DOMException::NAMESPACE_ERR DontDelete|ReadOnly
+ INVALID_ACCESS_ERR DOM::DOMException::INVALID_ACCESS_ERR DontDelete|ReadOnly
+@end
+*/
+
+DOMExceptionConstructor::DOMExceptionConstructor(ExecState* exec)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype())
+{
+}
+
+Value DOMExceptionConstructor::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+ return DOMObjectLookupGetValue<DOMExceptionConstructor, DOMObject>(exec, propertyName, &DOMExceptionConstructorTable, this);
+}
+
+Value DOMExceptionConstructor::getValueProperty(ExecState *, int token) const
+{
+ // We use the token as the value to return directly
+ return Number((unsigned int)token);
+#if 0
+ switch (token) {
+ case INDEX_SIZE_ERR:
+ return Number((unsigned int)DOM::DOMException::INDEX_SIZE_ERR);
+ case DOMSTRING_SIZE_ERR:
+ return Number((unsigned int)DOM::DOMException::DOMSTRING_SIZE_ERR);
+ case HIERARCHY_REQUEST_ERR:
+ return Number((unsigned int)DOM::DOMException::HIERARCHY_REQUEST_ERR);
+ case WRONG_DOCUMENT_ERR:
+ return Number((unsigned int)DOM::DOMException::WRONG_DOCUMENT_ERR);
+ case INVALID_CHARACTER_ERR:
+ return Number((unsigned int)DOM::DOMException::INVALID_CHARACTER_ERR);
+ case NO_DATA_ALLOWED_ERR:
+ return Number((unsigned int)DOM::DOMException::NO_DATA_ALLOWED_ERR);
+ case NO_MODIFICATION_ALLOWED_ERR:
+ return Number((unsigned int)DOM::DOMException::NO_MODIFICATION_ALLOWED_ERR);
+ case NOT_FOUND_ERR:
+ return Number((unsigned int)DOM::DOMException::NOT_FOUND_ERR);
+ case NOT_SUPPORTED_ERR:
+ return Number((unsigned int)DOM::DOMException::NOT_SUPPORTED_ERR);
+ case INUSE_ATTRIBUTE_ERR:
+ return Number((unsigned int)DOM::DOMException::INUSE_ATTRIBUTE_ERR);
+ case INVALID_STATE_ERR:
+ return Number((unsigned int)DOM::DOMException::INVALID_STATE_ERR);
+ case SYNTAX_ERR:
+ return Number((unsigned int)DOM::DOMException::SYNTAX_ERR);
+ case INVALID_MODIFICATION_ERR:
+ return Number((unsigned int)DOM::DOMException::INVALID_MODIFICATION_ERR);
+ case NAMESPACE_ERR:
+ return Number((unsigned int)DOM::DOMException::NAMESPACE_ERR);
+ case INVALID_ACCESS_ERR:
+ return Number((unsigned int)DOM::DOMException::INVALID_ACCESS_ERR);
+ default:
+ kdDebug(6070) << "WARNING: DOMExceptionConstructor::getValueProperty unhandled token " << token << endl;
+ return Value();
+ }
+#endif
+}
+
+Object getDOMExceptionConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<DOMExceptionConstructor>(exec, "[[DOMException.constructor]]");
+}
+
+// -------------------------------------------------------------------------
+
+/* Source for DOMNamedNodesCollection.
+@begin DOMNamedNodesCollectionTable 1
+ length KJS::DOMNamedNodesCollection::Length DontDelete|ReadOnly
+@end
+*/
+const ClassInfo KJS::DOMNamedNodesCollection::info = { "DOMNamedNodesCollection", 0, &DOMNamedNodesCollectionTable, 0 };
+
+// Such a collection is usually very short-lived, it only exists
+// for constructs like document.forms.<name>[1],
+// so it shouldn't be a problem that it's storing all the nodes (with the same name). (David)
+DOMNamedNodesCollection::DOMNamedNodesCollection(ExecState *exec, const TQValueList<DOM::Node>& nodes )
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()),
+ m_nodes(nodes)
+{
+ // Maybe we should ref (and deref in the dtor) the nodes, though ?
+}
+
+Value DOMNamedNodesCollection::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+ kdDebug(6070) << k_funcinfo << propertyName.ascii() << endl;
+ if (propertyName == lengthPropertyName)
+ return Number(m_nodes.count());
+ // index?
+ bool ok;
+ unsigned int u = propertyName.toULong(&ok);
+ if (ok && u < m_nodes.count()) {
+ DOM::Node node = m_nodes[u];
+ return getDOMNode(exec,node);
+ }
+ return DOMObject::tryGet(exec,propertyName);
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMCharacterData::info = { "CharacterImp",
+ &DOMNode::info, &DOMCharacterDataTable, 0 };
+/*
+@begin DOMCharacterDataTable 2
+ data DOMCharacterData::Data DontDelete
+ length DOMCharacterData::Length DontDelete|ReadOnly
+@end
+@begin DOMCharacterDataProtoTable 7
+ substringData DOMCharacterData::SubstringData DontDelete|Function 2
+ appendData DOMCharacterData::AppendData DontDelete|Function 1
+ insertData DOMCharacterData::InsertData DontDelete|Function 2
+ deleteData DOMCharacterData::DeleteData DontDelete|Function 2
+ replaceData DOMCharacterData::ReplaceData DontDelete|Function 2
+@end
+*/
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMCharacterDataProto, DOMNodeProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMCharacterDataProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMCharacterData", DOMCharacterDataProto, DOMCharacterDataProtoFunc)
+
+DOMCharacterData::DOMCharacterData(ExecState *exec, const DOM::CharacterData& d)
+ : DOMNode(DOMCharacterDataProto::self(exec), d) {}
+
+DOMCharacterData::DOMCharacterData(const Object& proto, const DOM::CharacterData& d)
+ : DOMNode(proto, d) {}
+
+Value DOMCharacterData::tryGet(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070)<<"DOMCharacterData::tryGet "<<p.string().string()<<endl;
+#endif
+ return DOMObjectLookupGetValue<DOMCharacterData,DOMNode>(exec,p,&DOMCharacterDataTable,this);
+}
+
+Value DOMCharacterData::getValueProperty(ExecState *, int token) const
+{
+ DOM::CharacterData data = static_cast<DOM::CharacterData>(node);
+ switch (token) {
+ case Data:
+ return String(data.data());
+ case Length:
+ return Number(data.length());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMCharacterData::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+void DOMCharacterData::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+ if (propertyName == "data")
+ static_cast<DOM::CharacterData>(node).setData(value.toString(exec).string());
+ else
+ DOMNode::tryPut(exec, propertyName,value,attr);
+}
+
+Value DOMCharacterDataProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMCharacterData, thisObj );
+ DOM::CharacterData data = static_cast<DOMCharacterData *>(thisObj.imp())->toData();
+ switch(id) {
+ case DOMCharacterData::SubstringData:
+ return String(data.substringData(args[0].toInteger(exec),args[1].toInteger(exec)));
+ case DOMCharacterData::AppendData:
+ data.appendData(args[0].toString(exec).string());
+ return Undefined();
+ break;
+ case DOMCharacterData::InsertData:
+ data.insertData(args[0].toInteger(exec),args[1].toString(exec).string());
+ return Undefined();
+ break;
+ case DOMCharacterData::DeleteData:
+ data.deleteData(args[0].toInteger(exec),args[1].toInteger(exec));
+ return Undefined();
+ break;
+ case DOMCharacterData::ReplaceData:
+ data.replaceData(args[0].toInteger(exec),args[1].toInteger(exec),args[2].toString(exec).string());
+ return Undefined();
+ default:
+ break;
+ }
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMText::info = { "Text",
+ &DOMCharacterData::info, 0, 0 };
+/*
+@begin DOMTextProtoTable 1
+ splitText DOMText::SplitText DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMTextProto, DOMCharacterDataProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMTextProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMText", DOMTextProto, DOMTextProtoFunc)
+
+DOMText::DOMText(ExecState *exec, const DOM::Text& t)
+ : DOMCharacterData(DOMTextProto::self(exec), t) { }
+
+Value DOMText::tryGet(ExecState *exec, const Identifier &p) const
+{
+ if (p.isEmpty())
+ return Undefined(); // ### TODO
+ else
+ return DOMCharacterData::tryGet(exec, p);
+}
+
+Value DOMTextProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMText, thisObj );
+ DOM::Text text = static_cast<DOMText *>(thisObj.imp())->toText();
+ switch(id) {
+ case DOMText::SplitText:
+ return getDOMNode(exec,text.splitText(args[0].toInteger(exec)));
+ default:
+ break;
+ }
+ return Undefined();
+}
+
+}
diff --git a/tdehtml/ecma/kjs_dom.h b/tdehtml/ecma/kjs_dom.h
new file mode 100644
index 000000000..b17488592
--- /dev/null
+++ b/tdehtml/ecma/kjs_dom.h
@@ -0,0 +1,299 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000 Harri Porten (porten@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_DOM_H_
+#define _KJS_DOM_H_
+
+#include "dom/dom_node.h"
+#include "dom/dom_doc.h"
+#include "dom/dom_element.h"
+#include "dom/dom_xml.h"
+
+#include "ecma/kjs_binding.h"
+
+
+namespace KJS {
+
+ class DOMNode : public DOMObject {
+ public:
+ // Build a DOMNode
+ DOMNode(ExecState *exec, const DOM::Node& n);
+ // Constructor for inherited classes
+ DOMNode(const Object& proto, const DOM::Node& n);
+ ~DOMNode();
+ virtual bool toBoolean(ExecState *) const;
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ void putValueProperty(ExecState *exec, int token, const Value& value, int attr);
+ virtual DOM::Node toNode() const { return node; }
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+
+ virtual Value toPrimitive(ExecState *exec, Type preferred = UndefinedType) const;
+ virtual UString toString(ExecState *exec) const;
+ void setListener(ExecState *exec, int eventId, const Value& func) const;
+ Value getListener(int eventId) const;
+ virtual void pushEventHandlerScope(ExecState *exec, ScopeChain &scope) const;
+
+ enum { NodeName, NodeValue, NodeType, ParentNode, ParentElement,
+ ChildNodes, FirstChild, LastChild, PreviousSibling, NextSibling, Item,
+ Attributes, NamespaceURI, Prefix, LocalName, OwnerDocument, InsertBefore,
+ ReplaceChild, RemoveChild, AppendChild, HasAttributes, HasChildNodes,
+ CloneNode, Normalize, IsSupported, AddEventListener, RemoveEventListener,
+ DispatchEvent, Contains, InsertAdjacentHTML,
+ OnAbort, OnBlur, OnChange, OnClick, OnDblClick, OnDragDrop, OnError,
+ OnFocus, OnKeyDown, OnKeyPress, OnKeyUp, OnLoad, OnMouseDown,
+ OnMouseMove, OnMouseOut, OnMouseOver, OnMouseUp, OnMove, OnReset,
+ OnResize, OnSelect, OnSubmit, OnUnload,
+ OffsetLeft, OffsetTop, OffsetWidth, OffsetHeight, OffsetParent,
+ ClientWidth, ClientHeight, ScrollLeft, ScrollTop,
+ ScrollWidth, ScrollHeight, SourceIndex, TextContent };
+
+ protected:
+ DOM::Node node;
+ };
+
+ DEFINE_CONSTANT_TABLE(DOMNodeConstants)
+ KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMNodeProto, DOMNodeConstants)
+ DEFINE_PSEUDO_CONSTRUCTOR(NodeConstructor)
+
+ class DOMNodeList : public DOMObject {
+ public:
+ DOMNodeList(ExecState *, const DOM::NodeList& l);
+ ~DOMNodeList();
+ virtual bool hasProperty(ExecState *exec, const Identifier &p) const;
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ virtual Value call(ExecState *exec, Object &thisObj, const List&args);
+ virtual Value tryCall(ExecState *exec, Object &thisObj, const List&args);
+ virtual bool implementsCall() const { return true; }
+ virtual ReferenceList propList(ExecState *exec, bool recursive);
+
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ virtual bool toBoolean(ExecState *) const { return true; }
+ static const ClassInfo info;
+ DOM::NodeList nodeList() const { return list; }
+ enum { Item, NamedItem };
+ private:
+ DOM::NodeList list;
+ };
+
+ class DOMDocument : public DOMNode {
+ public:
+ // Build a DOMDocument
+ DOMDocument(ExecState *exec, const DOM::Document& d);
+ // Constructor for inherited classes
+ DOMDocument(const Object& proto, const DOM::Document& d);
+ virtual ~DOMDocument();
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ void putValueProperty(ExecState *exec, int token, const Value& value, int attr);
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { DocType, Implementation, DocumentElement, CharacterSet,
+ // Functions
+ CreateElement, CreateDocumentFragment, CreateTextNode, CreateComment,
+ CreateCDATASection, CreateProcessingInstruction, CreateAttribute,
+ CreateEntityReference, GetElementsByTagName, ImportNode, CreateElementNS,
+ CreateAttributeNS, GetElementsByTagNameNS, GetElementById,
+ CreateRange, CreateNodeIterator, CreateTreeWalker, DefaultView,
+ CreateEvent, StyleSheets, GetOverrideStyle, Abort, Load, LoadXML,
+ PreferredStylesheetSet, SelectedStylesheetSet, ReadyState, Async };
+ };
+
+ KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMDocumentProto, DOMNodeProto)
+
+ DEFINE_PSEUDO_CONSTRUCTOR(DocumentPseudoCtor)
+
+ class DOMAttr : public DOMNode {
+ public:
+ DOMAttr(ExecState *exec, const DOM::Attr& a) : DOMNode(exec, a) { }
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ Value getValueProperty(ExecState *exec, int token) const;
+ void putValueProperty(ExecState *exec, int token, const Value& value, int attr);
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Name, Specified, ValueProperty, OwnerElement };
+ };
+
+ class DOMElement : public DOMNode {
+ public:
+ // Build a DOMElement
+ DOMElement(ExecState *exec, const DOM::Element& e);
+ // Constructor for inherited classes
+ DOMElement(const Object& proto, const DOM::Element& e);
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { TagName, Style,
+ GetAttribute, SetAttribute, RemoveAttribute, GetAttributeNode,
+ SetAttributeNode, RemoveAttributeNode, GetElementsByTagName,
+ GetAttributeNS, SetAttributeNS, RemoveAttributeNS, GetAttributeNodeNS,
+ SetAttributeNodeNS, GetElementsByTagNameNS, HasAttribute, HasAttributeNS };
+ };
+
+ KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMElementProto, DOMNodeProto)
+ DEFINE_PSEUDO_CONSTRUCTOR(ElementPseudoCtor)
+
+ class DOMDOMImplementation : public DOMObject {
+ public:
+ // Build a DOMDOMImplementation
+ DOMDOMImplementation(ExecState *, const DOM::DOMImplementation& i);
+ ~DOMDOMImplementation();
+ // no put - all functions
+ virtual const ClassInfo* classInfo() const { return &info; }
+ virtual bool toBoolean(ExecState *) const { return true; }
+ static const ClassInfo info;
+ enum { HasFeature, CreateDocumentType, CreateDocument, CreateCSSStyleSheet, CreateHTMLDocument };
+ DOM::DOMImplementation toImplementation() const { return implementation; }
+ private:
+ DOM::DOMImplementation implementation;
+ };
+
+ class DOMDocumentType : public DOMNode {
+ public:
+ // Build a DOMDocumentType
+ DOMDocumentType(ExecState *exec, const DOM::DocumentType& dt);
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Name, Entities, Notations, PublicId, SystemId, InternalSubset };
+ };
+
+ class DOMNamedNodeMap : public DOMObject {
+ public:
+ DOMNamedNodeMap(ExecState *, const DOM::NamedNodeMap& m);
+ ~DOMNamedNodeMap();
+ virtual bool hasProperty(ExecState *exec, const Identifier &p) const;
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ virtual bool toBoolean(ExecState *) const { return true; }
+ static const ClassInfo info;
+ enum { GetNamedItem, SetNamedItem, RemoveNamedItem, Item, Length,
+ GetNamedItemNS, SetNamedItemNS, RemoveNamedItemNS };
+ DOM::NamedNodeMap toMap() const { return map; }
+ private:
+ DOM::NamedNodeMap map;
+ };
+
+ class DOMProcessingInstruction : public DOMNode {
+ public:
+ DOMProcessingInstruction(ExecState *exec, const DOM::ProcessingInstruction& pi) : DOMNode(exec, pi) { }
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Target, Data, Sheet };
+ };
+
+ class DOMNotation : public DOMNode {
+ public:
+ DOMNotation(ExecState *exec, const DOM::Notation& n) : DOMNode(exec, n) { }
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { PublicId, SystemId };
+ };
+
+ class DOMEntity : public DOMNode {
+ public:
+ DOMEntity(ExecState *exec, const DOM::Entity& e) : DOMNode(exec, e) { }
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { PublicId, SystemId, NotationName };
+ };
+
+ // Constructor for DOMException - constructor stuff not implemented yet
+ class DOMExceptionConstructor : public DOMObject {
+ public:
+ DOMExceptionConstructor(ExecState *);
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ };
+
+ bool checkNodeSecurity(ExecState *exec, const DOM::Node& n);
+ KDE_EXPORT Value getDOMNode(ExecState *exec, const DOM::Node& n);
+ Value getDOMNamedNodeMap(ExecState *exec, const DOM::NamedNodeMap& m);
+ Value getDOMNodeList(ExecState *exec, const DOM::NodeList& l);
+ Value getDOMDOMImplementation(ExecState *exec, const DOM::DOMImplementation& i);
+ Object getDOMExceptionConstructor(ExecState *exec);
+
+ // Internal class, used for the collection return by e.g. document.forms.myinput
+ // when multiple nodes have the same name.
+ class DOMNamedNodesCollection : public DOMObject {
+ public:
+ DOMNamedNodesCollection(ExecState *exec, const TQValueList<DOM::Node>& nodes );
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ const TQValueList<DOM::Node>& nodes() const { return m_nodes; }
+ enum { Length };
+ private:
+ TQValueList<DOM::Node> m_nodes;
+ };
+
+ class DOMCharacterData : public DOMNode {
+ public:
+ // Build a DOMCharacterData
+ DOMCharacterData(ExecState *exec, const DOM::CharacterData& d);
+ // Constructor for inherited classes
+ DOMCharacterData(const Object& proto, const DOM::CharacterData& d);
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ DOM::CharacterData toData() const { return static_cast<DOM::CharacterData>(node); }
+ enum { Data, Length,
+ SubstringData, AppendData, InsertData, DeleteData, ReplaceData };
+ };
+
+ class DOMText : public DOMCharacterData {
+ public:
+ DOMText(ExecState *exec, const DOM::Text& t);
+ virtual Value tryGet(ExecState *exec,const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *, int token) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ DOM::Text toText() const { return static_cast<DOM::Text>(node); }
+ enum { SplitText };
+ };
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_events.cpp b/tdehtml/ecma/kjs_events.cpp
new file mode 100644
index 000000000..7b6ff3cc1
--- /dev/null
+++ b/tdehtml/ecma/kjs_events.cpp
@@ -0,0 +1,993 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "kjs_window.h"
+#include "kjs_events.h"
+#include "kjs_events.lut.h"
+#include "kjs_views.h"
+#include "kjs_proxy.h"
+#include "xml/dom_nodeimpl.h"
+#include "xml/dom_docimpl.h"
+#include "xml/dom2_eventsimpl.h"
+#include "rendering/render_object.h"
+#include "rendering/render_canvas.h"
+#include "xml/dom2_eventsimpl.h"
+#include "tdehtml_part.h"
+
+#include <kdebug.h>
+
+using namespace DOM;
+
+namespace KJS {
+
+// -------------------------------------------------------------------------
+
+JSEventListener::JSEventListener(Object _listener, ObjectImp *_compareListenerImp, const Object &_win, bool _html)
+ : listener( _listener ), compareListenerImp( _compareListenerImp ), html( _html ), win( _win )
+{
+ //fprintf(stderr,"JSEventListener::JSEventListener this=%p listener=%p\n",this,listener.imp());
+ if (compareListenerImp) {
+ static_cast<Window*>(win.imp())->jsEventListeners.insert(compareListenerImp, this);
+ }
+}
+
+JSEventListener::~JSEventListener()
+{
+ if (compareListenerImp) {
+ static_cast<Window*>(win.imp())->jsEventListeners.remove(compareListenerImp);
+ }
+ //fprintf(stderr,"JSEventListener::~JSEventListener this=%p listener=%p\n",this,listener.imp());
+}
+
+void JSEventListener::handleEvent(DOM::Event &evt)
+{
+#ifdef KJS_DEBUGGER
+ if (KJSDebugWin::debugWindow() && KJSDebugWin::debugWindow()->inSession())
+ return;
+#endif
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(static_cast<Window*>(win.imp())->part());
+ KJSProxy *proxy = 0L;
+ if (part)
+ proxy = part->jScript();
+
+ if (proxy && listener.isValid() && listener.implementsCall()) {
+ ref();
+
+ KJS::ScriptInterpreter *interpreter = static_cast<KJS::ScriptInterpreter *>(proxy->interpreter());
+ ExecState *exec = interpreter->globalExec();
+
+ List args;
+ args.append(getDOMEvent(exec,evt));
+
+ // Set "this" to the event's current target
+ Object thisObj = Object::dynamicCast(getDOMNode(exec,evt.currentTarget()));
+ if ( !thisObj.isValid() ) {
+ // Window events (window.onload/window.onresize etc.) must have 'this' set to the window.
+ // DocumentImpl::defaultEventHandler sets currentTarget to 0 to mean 'window'.
+ thisObj = win;
+ }
+
+ Window *window = static_cast<Window*>(win.imp());
+ // Set the event we're handling in the Window object
+ window->setCurrentEvent( &evt );
+ // ... and in the interpreter
+ interpreter->setCurrentEvent( &evt );
+
+ KJSCPUGuard guard;
+ guard.start();
+ Value retval = listener.call(exec, thisObj, args);
+ guard.stop();
+
+ window->setCurrentEvent( 0 );
+ interpreter->setCurrentEvent( 0 );
+ if ( exec->hadException() )
+ exec->clearException();
+ else if (html)
+ {
+ TQVariant ret = ValueToVariant(exec, retval);
+ if (ret.type() == TQVariant::Bool && ret.toBool() == false)
+ evt.preventDefault();
+ }
+ window->afterScriptExecution();
+ deref();
+ }
+}
+
+DOM::DOMString JSEventListener::eventListenerType()
+{
+ if (html)
+ return "_tdehtml_HTMLEventListener";
+ else
+ return "_tdehtml_JSEventListener";
+}
+
+Object JSEventListener::listenerObj() const
+{
+ return listener;
+}
+
+JSLazyEventListener::JSLazyEventListener(const TQString &_code, const TQString &_name, const Object &_win, DOM::NodeImpl* _originalNode)
+ : JSEventListener(Object(), 0, _win, true),
+ code(_code), name(_name),
+ parsed(false)
+{
+ // We don't retain the original node, because we assume it
+ // will stay alive as long as this handler object is around
+ // and we need to avoid a reference cycle. If JS transfers
+ // this handler to another node, parseCode will be called and
+ // then originalNode is no longer needed.
+
+ originalNode = _originalNode;
+}
+
+JSLazyEventListener::~JSLazyEventListener()
+{
+ if (listener.isValid()) {
+ static_cast<Window*>(win.imp())->jsEventListeners.remove(listener.imp());
+ }
+}
+
+void JSLazyEventListener::handleEvent(DOM::Event &evt)
+{
+ parseCode();
+ if (listener.isValid()) {
+ JSEventListener::handleEvent(evt);
+ }
+}
+
+
+Object JSLazyEventListener::listenerObj() const
+{
+ parseCode();
+ return listener;
+}
+
+void JSLazyEventListener::parseCode() const
+{
+ if (!parsed) {
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(static_cast<Window*>(win.imp())->part());
+ KJSProxy *proxy = 0L;
+ if (part)
+ proxy = part->jScript();
+
+ if (proxy) {
+ KJS::ScriptInterpreter *interpreter = static_cast<KJS::ScriptInterpreter *>(proxy->interpreter());
+ ExecState *exec = interpreter->globalExec();
+
+ //KJS::Constructor constr(KJS::Global::current().get("Function").imp());
+ KJS::Object constr = interpreter->builtinFunction();
+ KJS::List args;
+
+ static KJS::String eventString("event");
+
+ args.append(eventString);
+ args.append(KJS::String(code));
+ listener = constr.construct(exec, args); // ### is globalExec ok ?
+
+ if (exec->hadException()) {
+ exec->clearException();
+
+ // failed to parse, so let's just make this listener a no-op
+ listener = Object();
+ } else if (!listener.inherits(&DeclaredFunctionImp::info)) {
+ listener = Object();// Error creating function
+ } else {
+ DeclaredFunctionImp *declFunc = static_cast<DeclaredFunctionImp*>(listener.imp());
+ declFunc->setName(Identifier(static_cast<UString>(name)));
+
+ if (originalNode)
+ {
+ // Add the event's home element to the scope
+ // (and the document, and the form - see KJS::HTMLElement::eventHandlerScope)
+ ScopeChain scope = listener.scope();
+
+ Object thisObj = Object::dynamicCast(getDOMNode(exec, originalNode));
+
+ if (thisObj.isValid()) {
+ static_cast<DOMNode*>(thisObj.imp())->pushEventHandlerScope(exec, scope);
+
+ listener.setScope(scope);
+ }
+ }
+ }
+ }
+
+ // no more need to keep the unparsed code around
+ code = TQString();
+
+ if (listener.isValid()) {
+ static_cast<Window*>(win.imp())->jsEventListeners.insert(listener.imp(),
+ (KJS::JSEventListener *)(this));
+ }
+
+ parsed = true;
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMEvent::info = { "Event", 0, &DOMEventTable, 0 };
+/*
+@begin DOMEventTable 7
+ type DOMEvent::Type DontDelete|ReadOnly
+ target DOMEvent::Target DontDelete|ReadOnly
+ currentTarget DOMEvent::CurrentTarget DontDelete|ReadOnly
+ srcElement DOMEvent::SrcElement DontDelete|ReadOnly
+ eventPhase DOMEvent::EventPhase DontDelete|ReadOnly
+ bubbles DOMEvent::Bubbles DontDelete|ReadOnly
+ cancelable DOMEvent::Cancelable DontDelete|ReadOnly
+ timeStamp DOMEvent::TimeStamp DontDelete|ReadOnly
+ returnValue DOMEvent::ReturnValue DontDelete
+ cancelBubble DOMEvent::CancelBubble DontDelete
+@end
+@begin DOMEventProtoTable 3
+ stopPropagation DOMEvent::StopPropagation DontDelete|Function 0
+ preventDefault DOMEvent::PreventDefault DontDelete|Function 0
+ initEvent DOMEvent::InitEvent DontDelete|Function 3
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMEventProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMEventProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMEvent", DOMEventProto, DOMEventProtoFunc)
+
+DOMEvent::DOMEvent(ExecState *exec, DOM::Event e)
+ : DOMObject(DOMEventProto::self(exec)), event(e) { }
+
+DOMEvent::DOMEvent(const Object &proto, DOM::Event e)
+ : DOMObject(proto), event(e) { }
+
+DOMEvent::~DOMEvent()
+{
+ ScriptInterpreter::forgetDOMObject(event.handle());
+}
+
+Value DOMEvent::tryGet(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug() << "KJS::DOMEvent::tryGet " << p.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMEvent,DOMObject>(exec, p, &DOMEventTable, this );
+}
+
+Value DOMEvent::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case Type:
+ return String(event.type());
+ case Target:
+ case SrcElement: /*MSIE extension - "the object that fired the event"*/
+ return getDOMNode(exec,event.target());
+ case CurrentTarget:
+ return getDOMNode(exec,event.currentTarget());
+ case EventPhase:
+ return Number((unsigned int)event.eventPhase());
+ case Bubbles:
+ return Boolean(event.bubbles());
+ case Cancelable:
+ return Boolean(event.cancelable());
+ case TimeStamp:
+ return Number((long unsigned int)event.timeStamp()); // ### long long ?
+ case ReturnValue: // MSIE extension
+ // return false == cancel, so this returns the -opposite- of defaultPrevented
+ return Boolean(!event.handle()->defaultPrevented());
+ case CancelBubble: // MSIE extension
+ return Boolean(event.handle()->propagationStopped());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMEvent::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+Value DOMEvent::defaultValue(ExecState *exec, KJS::Type hint) const
+{
+ if (event.handle()->id() == EventImpl::ERROR_EVENT && !event.handle()->message().isNull()) {
+ return String(event.handle()->message());
+ }
+ else
+ return DOMObject::defaultValue(exec,hint);
+}
+
+void DOMEvent::tryPut(ExecState *exec, const Identifier &propertyName,
+ const Value& value, int attr)
+{
+ DOMObjectLookupPut<DOMEvent, DOMObject>(exec, propertyName, value, attr,
+ &DOMEventTable, this);
+}
+
+void DOMEvent::putValueProperty(ExecState *exec, int token, const Value& value, int)
+{
+ switch (token) {
+ case ReturnValue: // MSIE equivalent for "preventDefault" (but with a way to reset it)
+ // returnValue=false means "default action of the event on the source object is canceled",
+ // which means preventDefault(true). Hence the '!'.
+ event.handle()->preventDefault(!value.toBoolean(exec));
+ break;
+ case CancelBubble: // MSIE equivalent for "stopPropagation" (but with a way to reset it)
+ event.handle()->stopPropagation(value.toBoolean(exec));
+ break;
+ default:
+ break;
+ }
+}
+
+Value DOMEventProtoFunc::tryCall(ExecState *exec, Object & thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMEvent, thisObj );
+ DOM::Event event = static_cast<DOMEvent *>( thisObj.imp() )->toEvent();
+ switch (id) {
+ case DOMEvent::StopPropagation:
+ event.stopPropagation();
+ return Undefined();
+ case DOMEvent::PreventDefault:
+ event.preventDefault();
+ return Undefined();
+ case DOMEvent::InitEvent:
+ event.initEvent(args[0].toString(exec).string(),args[1].toBoolean(exec),args[2].toBoolean(exec));
+ return Undefined();
+ };
+ return Undefined();
+}
+
+Value getDOMEvent(ExecState *exec, DOM::Event e)
+{
+ DOM::EventImpl *ei = e.handle();
+ if (!ei)
+ return Null();
+ ScriptInterpreter* interp = static_cast<ScriptInterpreter *>(exec->interpreter());
+ DOMObject *ret = interp->getDOMObject(ei);
+ if (!ret) {
+ if (ei->isTextInputEvent())
+ ret = new DOMTextEvent(exec, e);
+ else if (ei->isKeyboardEvent())
+ ret = new DOMKeyboardEvent(exec, e);
+ else if (ei->isMouseEvent())
+ ret = new DOMMouseEvent(exec, e);
+ else if (ei->isUIEvent())
+ ret = new DOMUIEvent(exec, e);
+ else if (ei->isMutationEvent())
+ ret = new DOMMutationEvent(exec, e);
+ else
+ ret = new DOMEvent(exec, e);
+
+ interp->putDOMObject(ei, ret);
+ }
+
+ return Value(ret);
+}
+
+DOM::Event toEvent(const Value& val)
+{
+ Object obj = Object::dynamicCast(val);
+ if (!obj.isValid() || !obj.inherits(&DOMEvent::info))
+ return DOM::Event();
+
+ const DOMEvent *dobj = static_cast<const DOMEvent*>(obj.imp());
+ return dobj->toEvent();
+}
+
+// -------------------------------------------------------------------------
+/*
+@begin EventConstantsTable 23
+ CAPTURING_PHASE DOM::Event::CAPTURING_PHASE DontDelete|ReadOnly
+ AT_TARGET DOM::Event::AT_TARGET DontDelete|ReadOnly
+ BUBBLING_PHASE DOM::Event::BUBBLING_PHASE DontDelete|ReadOnly
+# Reverse-engineered from Netscape
+ MOUSEDOWN 1 DontDelete|ReadOnly
+ MOUSEUP 2 DontDelete|ReadOnly
+ MOUSEOVER 4 DontDelete|ReadOnly
+ MOUSEOUT 8 DontDelete|ReadOnly
+ MOUSEMOVE 16 DontDelete|ReadOnly
+ MOUSEDRAG 32 DontDelete|ReadOnly
+ CLICK 64 DontDelete|ReadOnly
+ DBLCLICK 128 DontDelete|ReadOnly
+ KEYDOWN 256 DontDelete|ReadOnly
+ KEYUP 512 DontDelete|ReadOnly
+ KEYPRESS 1024 DontDelete|ReadOnly
+ DRAGDROP 2048 DontDelete|ReadOnly
+ FOCUS 4096 DontDelete|ReadOnly
+ BLUR 8192 DontDelete|ReadOnly
+ SELECT 16384 DontDelete|ReadOnly
+ CHANGE 32768 DontDelete|ReadOnly
+@end
+*/
+DEFINE_CONSTANT_TABLE(EventConstants)
+IMPLEMENT_CONSTANT_TABLE(EventConstants, "EventConstants")
+
+IMPLEMENT_PSEUDO_CONSTRUCTOR_WITH_PARENT(EventConstructor, "EventConstructor", DOMEventProto, EventConstants)
+// -------------------------------------------------------------------------
+
+
+const ClassInfo EventExceptionConstructor::info = { "EventExceptionConstructor", 0, &EventExceptionConstructorTable, 0 };
+/*
+@begin EventExceptionConstructorTable 1
+ UNSPECIFIED_EVENT_TYPE_ERR DOM::EventException::UNSPECIFIED_EVENT_TYPE_ERR DontDelete|ReadOnly
+@end
+*/
+EventExceptionConstructor::EventExceptionConstructor(ExecState *exec)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype())
+{
+}
+
+Value EventExceptionConstructor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<EventExceptionConstructor, DOMObject>(exec,p,&EventExceptionConstructorTable,this);
+}
+
+Value EventExceptionConstructor::getValueProperty(ExecState *, int token) const
+{
+ // We use the token as the value to return directly
+ return Number(token);
+}
+
+Value getEventExceptionConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<EventExceptionConstructor>(exec, "[[eventException.constructor]]");
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMUIEvent::info = { "UIEvent", &DOMEvent::info, &DOMUIEventTable, 0 };
+/*
+@begin DOMUIEventTable 7
+ view DOMUIEvent::View DontDelete|ReadOnly
+ detail DOMUIEvent::Detail DontDelete|ReadOnly
+ keyCode DOMUIEvent::KeyCode DontDelete|ReadOnly
+ charCode DOMUIEvent::CharCode DontDelete|ReadOnly
+ layerX DOMUIEvent::LayerX DontDelete|ReadOnly
+ layerY DOMUIEvent::LayerY DontDelete|ReadOnly
+ pageX DOMUIEvent::PageX DontDelete|ReadOnly
+ pageY DOMUIEvent::PageY DontDelete|ReadOnly
+ which DOMUIEvent::Which DontDelete|ReadOnly
+@end
+@begin DOMUIEventProtoTable 1
+ initUIEvent DOMUIEvent::InitUIEvent DontDelete|Function 5
+@end
+*/
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMUIEventProto, DOMEventProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMUIEventProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMUIEvent", DOMUIEventProto, DOMUIEventProtoFunc)
+
+DOMUIEvent::DOMUIEvent(ExecState *exec, DOM::UIEvent ue) :
+ DOMEvent(DOMUIEventProto::self(exec), ue) {}
+
+DOMUIEvent::DOMUIEvent(const Object &proto, DOM::UIEvent ue) :
+ DOMEvent(proto, ue) {}
+
+DOMUIEvent::~DOMUIEvent()
+{
+}
+
+Value DOMUIEvent::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<DOMUIEvent,DOMEvent>(exec,p,&DOMUIEventTable,this);
+}
+
+Value DOMUIEvent::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case View:
+ return getDOMAbstractView(exec,static_cast<DOM::UIEvent>(event).view());
+ case Detail:
+ return Number(static_cast<DOM::UIEvent>(event).detail());
+ case KeyCode:
+ // IE-compatibility
+ return Number(static_cast<DOM::UIEvent>(event).keyCode());
+ case CharCode:
+ // IE-compatibility
+ return Number(static_cast<DOM::UIEvent>(event).charCode());
+ case LayerX:
+ // NS-compatibility
+ return Number(static_cast<DOM::UIEvent>(event).layerX());
+ case LayerY:
+ // NS-compatibility
+ return Number(static_cast<DOM::UIEvent>(event).layerY());
+ case PageX:
+ // NS-compatibility
+ return Number(static_cast<DOM::UIEvent>(event).pageX());
+ case PageY:
+ // NS-compatibility
+ return Number(static_cast<DOM::UIEvent>(event).pageY());
+ case Which:
+ // NS-compatibility
+ return Number(static_cast<DOM::UIEvent>(event).which());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMUIEvent::getValueProperty : " << token << endl;
+ return Undefined();
+ }
+}
+
+Value DOMUIEventProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMUIEvent, thisObj );
+ DOM::UIEvent uiEvent = static_cast<DOMUIEvent *>(thisObj.imp())->toUIEvent();
+ switch (id) {
+ case DOMUIEvent::InitUIEvent: {
+ DOM::AbstractView v = toAbstractView(args[3]);
+ static_cast<DOM::UIEvent>(uiEvent).initUIEvent(args[0].toString(exec).string(),
+ args[1].toBoolean(exec),
+ args[2].toBoolean(exec),
+ v,
+ args[4].toInteger(exec));
+ }
+ return Undefined();
+ }
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMMouseEvent::info = { "MouseEvent", &DOMUIEvent::info, &DOMMouseEventTable, 0 };
+
+/*
+@begin DOMMouseEventTable 2
+ screenX DOMMouseEvent::ScreenX DontDelete|ReadOnly
+ screenY DOMMouseEvent::ScreenY DontDelete|ReadOnly
+ clientX DOMMouseEvent::ClientX DontDelete|ReadOnly
+ x DOMMouseEvent::X DontDelete|ReadOnly
+ clientY DOMMouseEvent::ClientY DontDelete|ReadOnly
+ y DOMMouseEvent::Y DontDelete|ReadOnly
+ offsetX DOMMouseEvent::OffsetX DontDelete|ReadOnly
+ offsetY DOMMouseEvent::OffsetY DontDelete|ReadOnly
+ ctrlKey DOMMouseEvent::CtrlKey DontDelete|ReadOnly
+ shiftKey DOMMouseEvent::ShiftKey DontDelete|ReadOnly
+ altKey DOMMouseEvent::AltKey DontDelete|ReadOnly
+ metaKey DOMMouseEvent::MetaKey DontDelete|ReadOnly
+ button DOMMouseEvent::Button DontDelete|ReadOnly
+ relatedTarget DOMMouseEvent::RelatedTarget DontDelete|ReadOnly
+ fromElement DOMMouseEvent::FromElement DontDelete|ReadOnly
+ toElement DOMMouseEvent::ToElement DontDelete|ReadOnly
+@end
+@begin DOMMouseEventProtoTable 1
+ initMouseEvent DOMMouseEvent::InitMouseEvent DontDelete|Function 15
+@end
+*/
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMMouseEventProto, DOMUIEventProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMMouseEventProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMMouseEvent", DOMMouseEventProto, DOMMouseEventProtoFunc)
+
+DOMMouseEvent::DOMMouseEvent(ExecState *exec, DOM::MouseEvent me) :
+ DOMUIEvent(DOMMouseEventProto::self(exec), me) {}
+
+DOMMouseEvent::~DOMMouseEvent()
+{
+}
+
+Value DOMMouseEvent::tryGet(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMMouseEvent::tryGet " << p.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMMouseEvent,DOMUIEvent>(exec,p,&DOMMouseEventTable,this);
+}
+
+Value DOMMouseEvent::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case ScreenX:
+ return Number(static_cast<DOM::MouseEvent>(event).screenX());
+ case ScreenY:
+ return Number(static_cast<DOM::MouseEvent>(event).screenY());
+ case ClientX:
+ case X:
+ return Number(static_cast<DOM::MouseEvent>(event).clientX());
+ case ClientY:
+ case Y:
+ return Number(static_cast<DOM::MouseEvent>(event).clientY());
+ case OffsetX:
+ case OffsetY: // MSIE extension
+ {
+ DOM::Node node = event.target();
+ tdehtml::RenderObject *rend = 0;
+ if (node.handle()) {
+ node.handle()->getDocument()->updateRendering();
+ rend = node.handle()->renderer();
+ }
+ int x = static_cast<DOM::MouseEvent>(event).clientX();
+ int y = static_cast<DOM::MouseEvent>(event).clientY();
+ if ( rend ) {
+ int xPos, yPos;
+ if ( rend->absolutePosition( xPos, yPos ) ) {
+ //kdDebug() << "DOMMouseEvent::getValueProperty rend=" << rend << " xPos=" << xPos << " yPos=" << yPos << endl;
+ x -= xPos;
+ y -= yPos;
+ }
+ if ( rend->canvas() ) {
+ int cYPos, cXPos;
+ rend->canvas()->absolutePosition( cXPos, cYPos, true );
+ x += cXPos;
+ y += cYPos;
+ }
+ }
+ return Number( token == OffsetX ? x : y );
+ }
+ case CtrlKey:
+ return Boolean(static_cast<DOM::MouseEvent>(event).ctrlKey());
+ case ShiftKey:
+ return Boolean(static_cast<DOM::MouseEvent>(event).shiftKey());
+ case AltKey:
+ return Boolean(static_cast<DOM::MouseEvent>(event).altKey());
+ case MetaKey:
+ return Boolean(static_cast<DOM::MouseEvent>(event).metaKey());
+ case Button:
+ {
+ if ( exec->interpreter()->compatMode() == Interpreter::NetscapeCompat ) {
+ return Number(static_cast<DOM::MouseEvent>(event).button());
+ }
+ // Tricky. The DOM (and tdehtml) use 0 for LMB, 1 for MMB and 2 for RMB
+ // but MSIE uses 1=LMB, 2=RMB, 4=MMB, as a bitfield
+ int domButton = static_cast<DOM::MouseEvent>(event).button();
+ int button = domButton==0 ? 1 : domButton==1 ? 4 : domButton==2 ? 2 : 0;
+ return Number( (unsigned int)button );
+ }
+ case ToElement:
+ // MSIE extension - "the object toward which the user is moving the mouse pointer"
+ if (event.handle()->id() == DOM::EventImpl::MOUSEOUT_EVENT)
+ return getDOMNode(exec,static_cast<DOM::MouseEvent>(event).relatedTarget());
+ return getDOMNode(exec,static_cast<DOM::MouseEvent>(event).target());
+ case FromElement:
+ // MSIE extension - "object from which activation
+ // or the mouse pointer is exiting during the event" (huh?)
+ if (event.handle()->id() == DOM::EventImpl::MOUSEOUT_EVENT)
+ return getDOMNode(exec,static_cast<DOM::MouseEvent>(event).target());
+ /* fall through */
+ case RelatedTarget:
+ return getDOMNode(exec,static_cast<DOM::MouseEvent>(event).relatedTarget());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMMouseEvent::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+Value DOMMouseEventProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMMouseEvent, thisObj );
+ DOM::MouseEvent mouseEvent = static_cast<DOMMouseEvent *>(thisObj.imp())->toMouseEvent();
+ switch (id) {
+ case DOMMouseEvent::InitMouseEvent:
+ mouseEvent.initMouseEvent(args[0].toString(exec).string(), // typeArg
+ args[1].toBoolean(exec), // canBubbleArg
+ args[2].toBoolean(exec), // cancelableArg
+ toAbstractView(args[3]), // viewArg
+ args[4].toInteger(exec), // detailArg
+ args[5].toInteger(exec), // screenXArg
+ args[6].toInteger(exec), // screenYArg
+ args[7].toInteger(exec), // clientXArg
+ args[8].toInteger(exec), // clientYArg
+ args[9].toBoolean(exec), // ctrlKeyArg
+ args[10].toBoolean(exec), // altKeyArg
+ args[11].toBoolean(exec), // shiftKeyArg
+ args[12].toBoolean(exec), // metaKeyArg
+ args[13].toInteger(exec), // buttonArg
+ toNode(args[14])); // relatedTargetArg
+ return Undefined();
+ }
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMKeyEventBase::info = { "KeyEventBase", &DOMUIEvent::info, &DOMKeyEventBaseTable, 0 };
+
+/*
+@begin DOMKeyEventBaseTable 5
+ keyVal DOMKeyEventBase::Key DontDelete|ReadOnly
+ virtKeyVal DOMKeyEventBase::VirtKey DontDelete|ReadOnly
+ ctrlKey DOMKeyEventBase::CtrlKey DontDelete|ReadOnly
+ altKey DOMKeyEventBase::AltKey DontDelete|ReadOnly
+ shiftKey DOMKeyEventBase::ShiftKey DontDelete|ReadOnly
+ altKey DOMKeyEventBase::AltKey DontDelete|ReadOnly
+@end
+*/
+
+DOMKeyEventBase::DOMKeyEventBase(const Object &proto, DOM::TextEvent ke) :
+ DOMUIEvent(proto, ke) {}
+
+DOMKeyEventBase::~DOMKeyEventBase()
+{}
+
+Value DOMKeyEventBase::tryGet(ExecState *exec,const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMKeyEventBase::tryGet " << p.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMKeyEventBase,DOMUIEvent>(exec,p,&DOMKeyEventBaseTable,this);
+}
+
+Value DOMKeyEventBase::getValueProperty(ExecState *, int token) const
+{
+ DOM::KeyEventBaseImpl* tevent = impl();
+ switch (token) {
+ case Key:
+ return Number(tevent->keyVal());
+ case VirtKey:
+ return Number(tevent->virtKeyVal());
+ // these modifier attributes actually belong into a KeyboardEvent interface,
+ // but we want them on "keypress" as well.
+ case CtrlKey:
+ return Boolean(tevent->ctrlKey());
+ case ShiftKey:
+ return Boolean(tevent->shiftKey());
+ case AltKey:
+ return Boolean(tevent->altKey());
+ case MetaKey:
+ return Boolean(tevent->metaKey());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMTextEvent::getValueProperty : " << token << endl;
+ return KJS::Undefined();
+ }
+}
+
+// -------------------------------------------------------------------------
+const ClassInfo DOMTextEvent::info = { "TextEvent", &DOMKeyEventBase::info, &DOMTextEventTable, 0 };
+
+/*
+@begin DOMTextEventTable 1
+ data DOMTextEvent::Data DontDelete|ReadOnly
+@end
+@begin DOMTextEventProtoTable 1
+ initTextEvent DOMTextEvent::InitTextEvent DontDelete|Function 5
+ # Missing: initTextEventNS
+@end
+*/
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMTextEventProto, DOMUIEventProto) //Note: no proto in KeyBase
+IMPLEMENT_PROTOFUNC_DOM(DOMTextEventProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMTextEvent", DOMTextEventProto, DOMTextEventProtoFunc)
+
+DOMTextEvent::DOMTextEvent(ExecState *exec, DOM::TextEvent ke) :
+ DOMKeyEventBase(DOMTextEventProto::self(exec), ke) {}
+
+DOMTextEvent::~DOMTextEvent()
+{
+}
+
+Value DOMTextEvent::tryGet(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMTextEvent::tryGet " << p.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMTextEvent,DOMKeyEventBase>(exec,p,&DOMTextEventTable,this);
+}
+
+Value DOMTextEvent::getValueProperty(ExecState *, int token) const
+{
+ DOM::TextEventImpl* tevent = impl();
+ switch (token) {
+ case Data:
+ return String(tevent->data());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMTextEvent::getValueProperty : " << token << endl;
+ return KJS::Undefined();
+ }
+}
+
+Value DOMTextEventProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMTextEvent, thisObj );
+ DOM::TextEventImpl* keyEvent = static_cast<DOMTextEvent *>(thisObj.imp())->impl();
+ switch (id) {
+ case DOMTextEvent::InitTextEvent:
+ keyEvent->initTextEvent(args[0].toString(exec).string(), // typeArg
+ args[1].toBoolean(exec), // canBubbleArg
+ args[2].toBoolean(exec), // cancelableArg
+ toAbstractView(args[3]), // viewArg
+ args[4].toString(exec).string()); // dataArg
+
+ return Undefined();
+ }
+ return Undefined();
+}
+// -------------------------------------------------------------------------
+const ClassInfo DOMKeyboardEvent::info = { "KeyboardEvent", &DOMKeyEventBase::info, &DOMKeyboardEventTable, 0 };
+
+/*
+@begin DOMKeyboardEventTable 2
+ keyIdentifier DOMKeyboardEvent::KeyIdentifier DontDelete|ReadOnly
+ keyLocation DOMKeyboardEvent::KeyLocation DontDelete|ReadOnly
+@end
+@begin DOMKeyboardEventProtoTable 2
+ initKeyboardEvent DOMKeyboardEvent::InitKeyboardEvent DontDelete|Function 7
+ getModifierState DOMKeyboardEvent::GetModifierState DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMKeyboardEventProto, DOMUIEventProto) //Note: no proto in KeyBase
+IMPLEMENT_PROTOFUNC_DOM(DOMKeyboardEventProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMKeyboardEvent", DOMKeyboardEventProto, DOMKeyboardEventProtoFunc)
+
+DOMKeyboardEvent::DOMKeyboardEvent(ExecState *exec, DOM::TextEvent ke) :
+ DOMKeyEventBase(DOMKeyboardEventProto::self(exec), ke) {}
+
+DOMKeyboardEvent::~DOMKeyboardEvent()
+{
+}
+
+Value DOMKeyboardEvent::tryGet(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "DOMKeyboardEvent::tryGet " << p.qstring() << endl;
+#endif
+ return DOMObjectLookupGetValue<DOMKeyboardEvent,DOMKeyEventBase>(exec,p,&DOMKeyboardEventTable,this);
+}
+
+Value DOMKeyboardEvent::getValueProperty(ExecState *, int token) const
+{
+ DOM::KeyboardEventImpl* tevent = impl();
+ switch (token) {
+ case KeyIdentifier:
+ return String(tevent->keyIdentifier());
+ case KeyLocation:
+ return Number(tevent->keyLocation());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMKeyboardEvent::getValueProperty : " << token << endl;
+ return KJS::Undefined();
+ }
+}
+
+Value DOMKeyboardEventProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMKeyboardEvent, thisObj );
+ DOM::KeyboardEventImpl* keyEvent = static_cast<DOMKeyboardEvent *>(thisObj.imp())->impl();
+ switch (id) {
+ case DOMKeyboardEvent::InitKeyboardEvent:
+ keyEvent->initKeyboardEvent(args[0].toString(exec).string(), // typeArg
+ args[1].toBoolean(exec), // canBubbleArg
+ args[2].toBoolean(exec), // cancelableArg
+ toAbstractView(args[3]), // viewArg
+ args[4].toString(exec).string(), // keyIdentifierArg
+ args[5].toInteger(exec), // keyLocationArg
+ args[6].toString(exec).string()); //modifiersList
+ break;
+ case DOMKeyboardEvent::GetModifierState:
+ return Boolean(keyEvent->getModifierState(args[0].toString(exec).string()));
+ }
+ return Undefined();
+}
+
+// -------------------------------------------------------------------------
+const ClassInfo KeyboardEventConstructor::info = { "KeyboardEventConstructor", 0, &KeyboardEventConstructorTable, 0 };
+/*
+@begin KeyboardEventConstructorTable 4
+ DOM_KEY_LOCATION_STANDARD DOM::KeyboardEventImpl::DOM_KEY_LOCATION_STANDARD DontDelete|ReadOnly
+ DOM_KEY_LOCATION_LEFT DOM::KeyboardEventImpl::DOM_KEY_LOCATION_LEFT DontDelete|ReadOnly
+ DOM_KEY_LOCATION_RIGHT DOM::KeyboardEventImpl::DOM_KEY_LOCATION_RIGHT DontDelete|ReadOnly
+ DOM_KEY_LOCATION_NUMPAD DOM::KeyboardEventImpl::DOM_KEY_LOCATION_NUMPAD DontDelete|ReadOnly
+@end
+*/
+KeyboardEventConstructor::KeyboardEventConstructor(ExecState* exec)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype())
+{}
+
+Value KeyboardEventConstructor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<KeyboardEventConstructor,DOMObject>(exec,p,&KeyboardEventConstructorTable,this);
+}
+
+Value KeyboardEventConstructor::getValueProperty(ExecState *, int token) const
+{
+ // We use the token as the value to return directly
+ return Number(token);
+}
+
+Value getKeyboardEventConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<KeyboardEventConstructor>(exec, "[[keyboardEvent.constructor]]");
+}
+
+
+// -------------------------------------------------------------------------
+const ClassInfo MutationEventConstructor::info = { "MutationEventConstructor", 0, &MutationEventConstructorTable, 0 };
+/*
+@begin MutationEventConstructorTable 3
+ MODIFICATION DOM::MutationEvent::MODIFICATION DontDelete|ReadOnly
+ ADDITION DOM::MutationEvent::ADDITION DontDelete|ReadOnly
+ REMOVAL DOM::MutationEvent::REMOVAL DontDelete|ReadOnly
+@end
+*/
+MutationEventConstructor::MutationEventConstructor(ExecState* exec)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype())
+{
+}
+
+Value MutationEventConstructor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<MutationEventConstructor,DOMObject>(exec,p,&MutationEventConstructorTable,this);
+}
+
+Value MutationEventConstructor::getValueProperty(ExecState *, int token) const
+{
+ // We use the token as the value to return directly
+ return Number(token);
+}
+
+Value getMutationEventConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<MutationEventConstructor>(exec, "[[mutationEvent.constructor]]");
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMMutationEvent::info = { "MutationEvent", &DOMEvent::info, &DOMMutationEventTable, 0 };
+/*
+@begin DOMMutationEventTable 5
+ relatedNode DOMMutationEvent::RelatedNode DontDelete|ReadOnly
+ prevValue DOMMutationEvent::PrevValue DontDelete|ReadOnly
+ newValue DOMMutationEvent::NewValue DontDelete|ReadOnly
+ attrName DOMMutationEvent::AttrName DontDelete|ReadOnly
+ attrChange DOMMutationEvent::AttrChange DontDelete|ReadOnly
+@end
+@begin DOMMutationEventProtoTable 1
+ initMutationEvent DOMMutationEvent::InitMutationEvent DontDelete|Function 8
+@end
+*/
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(DOMMutationEventProto, DOMEventProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMMutationEventProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMMutationEvent", DOMMutationEventProto, DOMMutationEventProtoFunc)
+
+DOMMutationEvent::DOMMutationEvent(ExecState *exec, DOM::MutationEvent me) :
+ DOMEvent(DOMMutationEventProto::self(exec), me) {}
+
+DOMMutationEvent::~DOMMutationEvent()
+{
+}
+
+Value DOMMutationEvent::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<DOMMutationEvent,DOMEvent>(exec,p,&DOMMutationEventTable,this);
+}
+
+Value DOMMutationEvent::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case RelatedNode:
+ return getDOMNode(exec,static_cast<DOM::MutationEvent>(event).relatedNode());
+ case PrevValue:
+ return String(static_cast<DOM::MutationEvent>(event).prevValue());
+ case NewValue:
+ return String(static_cast<DOM::MutationEvent>(event).newValue());
+ case AttrName:
+ return String(static_cast<DOM::MutationEvent>(event).attrName());
+ case AttrChange:
+ return Number((unsigned int)static_cast<DOM::MutationEvent>(event).attrChange());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMMutationEvent::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+Value DOMMutationEventProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMMutationEvent, thisObj );
+ DOM::MutationEvent mutationEvent = static_cast<DOMMutationEvent *>(thisObj.imp())->toMutationEvent();
+ switch (id) {
+ case DOMMutationEvent::InitMutationEvent:
+ mutationEvent.initMutationEvent(args[0].toString(exec).string(), // typeArg,
+ args[1].toBoolean(exec), // canBubbleArg
+ args[2].toBoolean(exec), // cancelableArg
+ toNode(args[3]), // relatedNodeArg
+ args[4].toString(exec).string(), // prevValueArg
+ args[5].toString(exec).string(), // newValueArg
+ args[6].toString(exec).string(), // attrNameArg
+ args[7].toInteger(exec)); // attrChangeArg
+ return Undefined();
+ }
+ return Undefined();
+}
+
+} //namespace KJS
diff --git a/tdehtml/ecma/kjs_events.h b/tdehtml/ecma/kjs_events.h
new file mode 100644
index 000000000..e48276031
--- /dev/null
+++ b/tdehtml/ecma/kjs_events.h
@@ -0,0 +1,250 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_EVENTS_H_
+#define _KJS_EVENTS_H_
+
+#include "ecma/kjs_dom.h"
+#include "dom/dom2_events.h"
+#include "dom/dom_misc.h"
+#include "xml/dom2_eventsimpl.h"
+
+namespace KJS {
+
+ class Window;
+
+ class JSEventListener : public DOM::EventListener {
+ public:
+ /**
+ * @param _listener the function object, that will be called when the event is emitted
+ * @param _compareListenerImp Compare Listener implementation.
+ * @param _win Window object, for memory management and caching.
+ * @param _html \c true if it is HTML.
+ * Never create a JSEventListener directly, use Window::getJSEventListener.
+ */
+ JSEventListener(Object _listener, ObjectImp *_compareListenerImp, const Object &_win, bool _html = false);
+ virtual ~JSEventListener();
+ virtual void handleEvent(DOM::Event &evt);
+ virtual DOM::DOMString eventListenerType();
+ // Return the KJS function object executed when this event is emitted
+ virtual Object listenerObj() const;
+ ObjectImp *listenerObjImp() const { return listenerObj().imp(); }
+ // for Window::clear(). This is a bad hack though. The JSEventListener might not get deleted
+ // if it was added to a DOM node in another frame (#61467). But calling removeEventListener on
+ // all nodes we're listening to is quite difficult.
+ void clear() { listener = Object(); }
+ bool isHTMLEventListener() const { return html; }
+
+ protected:
+ mutable Object listener;
+ // Storing a different ObjectImp ptr is needed to support addEventListener(.. [Object] ..) calls
+ // In the real-life case (where a 'function' is passed to addEventListener) we can directly call
+ // the 'listener' object and can cache the 'listener.imp()'. If the event listener should be removed
+ // the implementation will call removeEventListener(.. [Function] ..), and we can lookup the event
+ // listener by the passed function's imp() ptr.
+ // In the only dom-approved way (passing an Object to add/removeEventListener), the 'listener'
+ // variable stores the function object 'passedListener.handleEvent'. But we need to cache
+ // the imp() ptr of the 'passedListener' function _object_, as the implementation will
+ // call removeEventListener(.. [Object ..] on removal, and now we can successfully lookup
+ // the correct event listener, as well as the 'listener.handleEvent' function, we need to call.
+ mutable ObjectImp *compareListenerImp;
+ bool html;
+ Object win;
+ };
+
+ class JSLazyEventListener : public JSEventListener {
+ public:
+ JSLazyEventListener(const TQString &_code, const TQString &_name, const Object &_win, DOM::NodeImpl* node);
+ ~JSLazyEventListener();
+ virtual void handleEvent(DOM::Event &evt);
+ Object listenerObj() const;
+ private:
+ void parseCode() const;
+
+ mutable TQString code;
+ mutable TQString name;
+ mutable bool parsed;
+ DOM::NodeImpl *originalNode;
+ };
+
+ // Constructor for Event - currently only used for some global vars
+ DEFINE_PSEUDO_CONSTRUCTOR(EventConstructor)
+
+ class DOMEvent : public DOMObject {
+ public:
+ // Build a DOMEvent
+ DOMEvent(ExecState *exec, DOM::Event e);
+ // Constructor for inherited classes
+ DOMEvent(const Object &proto, DOM::Event e);
+ ~DOMEvent();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName,
+ const Value& value, int attr = None);
+ virtual Value defaultValue(ExecState *exec, KJS::Type hint) const;
+ void putValueProperty(ExecState *exec, int token, const Value& value, int);
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Type, Target, CurrentTarget, EventPhase, Bubbles,
+ Cancelable, TimeStamp, StopPropagation, PreventDefault, InitEvent,
+ // MS IE equivalents
+ SrcElement, ReturnValue, CancelBubble };
+ DOM::Event toEvent() const { return event; }
+ protected:
+ DOM::Event event;
+ };
+
+ Value getDOMEvent(ExecState *exec, DOM::Event e);
+
+ /**
+ * Convert an object to an Event. Returns a null Event if not possible.
+ */
+ DOM::Event toEvent(const Value&);
+
+ // Constructor object EventException
+ class EventExceptionConstructor : public DOMObject {
+ public:
+ EventExceptionConstructor(ExecState *);
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ };
+
+ Value getEventExceptionConstructor(ExecState *exec);
+
+ class DOMUIEvent : public DOMEvent {
+ public:
+ // Build a DOMUIEvent
+ DOMUIEvent(ExecState *exec, DOM::UIEvent ue);
+ // Constructor for inherited classes
+ DOMUIEvent(const Object &proto, DOM::UIEvent ue);
+ ~DOMUIEvent();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { View, Detail, KeyCode, CharCode, LayerX, LayerY, PageX, PageY, Which, InitUIEvent };
+ DOM::UIEvent toUIEvent() const { return static_cast<DOM::UIEvent>(event); }
+ };
+
+ class DOMMouseEvent : public DOMUIEvent {
+ public:
+ DOMMouseEvent(ExecState *exec, DOM::MouseEvent me);
+ ~DOMMouseEvent();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { ScreenX, ScreenY, ClientX, X, ClientY, Y, OffsetX, OffsetY,
+ CtrlKey, ShiftKey, AltKey,
+ MetaKey, Button, RelatedTarget, FromElement, ToElement,
+ InitMouseEvent
+ };
+ DOM::MouseEvent toMouseEvent() const { return static_cast<DOM::MouseEvent>(event); }
+ };
+
+ class DOMKeyEventBase : public DOMUIEvent {
+ public:
+ DOMKeyEventBase(const Object &proto, DOM::TextEvent ke);
+ ~DOMKeyEventBase();
+
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Key, VirtKey, CtrlKey, ShiftKey, AltKey, MetaKey };
+ DOM::KeyEventBaseImpl* impl() const { return static_cast<DOM::KeyEventBaseImpl*>(event.handle()); }
+ };
+
+ class DOMTextEvent : public DOMKeyEventBase {
+ public:
+ DOMTextEvent(ExecState *exec, DOM::TextEvent ke);
+ ~DOMTextEvent();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum {Data, InitTextEvent};
+ DOM::TextEventImpl* impl() const { return static_cast<DOM::TextEventImpl*>(event.handle()); }
+ };
+
+ class DOMKeyboardEvent : public DOMKeyEventBase {
+ public:
+ DOMKeyboardEvent(ExecState *exec, DOM::TextEvent ke);
+ ~DOMKeyboardEvent();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum {KeyIdentifier, KeyLocation, GetModifierState, InitKeyboardEvent};
+ DOM::KeyboardEventImpl* impl() const { return static_cast<DOM::KeyboardEventImpl*>(event.handle()); }
+ };
+
+ // Constructor object KeyboardEvent
+ class KeyboardEventConstructor : public DOMObject {
+ public:
+ KeyboardEventConstructor(ExecState *);
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ };
+
+ Value getKeyboardEventConstructor(ExecState *exec);
+
+ // Constructor object MutationEvent
+ class MutationEventConstructor : public DOMObject {
+ public:
+ MutationEventConstructor(ExecState *);
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ };
+
+ Value getMutationEventConstructor(ExecState *exec);
+
+ class DOMMutationEvent : public DOMEvent {
+ public:
+ DOMMutationEvent(ExecState *exec, DOM::MutationEvent me);
+ ~DOMMutationEvent();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { AttrChange, RelatedNode, AttrName, PrevValue, NewValue,
+ InitMutationEvent };
+ DOM::MutationEvent toMutationEvent() const { return static_cast<DOM::MutationEvent>(event); }
+ };
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_html.cpp b/tdehtml/ecma/kjs_html.cpp
new file mode 100644
index 000000000..37fd70754
--- /dev/null
+++ b/tdehtml/ecma/kjs_html.cpp
@@ -0,0 +1,3946 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 1999-2002 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001-2003 David Faure (faure@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "misc/loader.h"
+#include "dom/html_block.h"
+#include "dom/html_head.h"
+#include "dom/html_image.h"
+#include "dom/html_inline.h"
+#include "dom/html_list.h"
+#include "dom/html_table.h"
+#include "dom/html_object.h"
+#include "dom/dom_exception.h"
+
+// ### HACK
+#include "html/html_baseimpl.h"
+#include "html/html_documentimpl.h"
+#include "html/html_formimpl.h"
+#include "html/html_imageimpl.h"
+#include "html/html_miscimpl.h"
+#include "xml/dom2_eventsimpl.h"
+
+#include <tdeparts/browserextension.h>
+
+#include "tdehtml_part.h"
+#include "tdehtmlview.h"
+
+#include "ecma/kjs_css.h"
+#include "ecma/kjs_events.h"
+#include "ecma/kjs_html.h"
+#include "ecma/kjs_window.h"
+#include "kjs_html.lut.h"
+
+#include "misc/htmltags.h"
+#include "misc/htmlattrs.h"
+#include "rendering/render_object.h"
+#include "rendering/render_canvas.h"
+#include "rendering/render_frames.h"
+#include "rendering/render_layer.h"
+
+#include "kmessagebox.h"
+#include <kstringhandler.h>
+#include <klocale.h>
+
+#include <kdebug.h>
+
+namespace KJS {
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLDocumentProto, DOMDocumentProto)
+IMPLEMENT_PROTOFUNC_DOM(HTMLDocFunction)
+KJS_IMPLEMENT_PROTOTYPE("HTMLDocument", HTMLDocumentProto, HTMLDocFunction)
+
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLDocumentPseudoCtor, "HTMLDocument", HTMLDocumentProto)
+
+/* Source for HTMLDocumentProtoTable.
+@begin HTMLDocumentProtoTable 11
+ clear HTMLDocument::Clear DontDelete|Function 0
+ open HTMLDocument::Open DontDelete|Function 0
+ close HTMLDocument::Close DontDelete|Function 0
+ write HTMLDocument::Write DontDelete|Function 1
+ writeln HTMLDocument::WriteLn DontDelete|Function 1
+ getElementsByName HTMLDocument::GetElementsByName DontDelete|Function 1
+ getSelection HTMLDocument::GetSelection DontDelete|Function 1
+ captureEvents HTMLDocument::CaptureEvents DontDelete|Function 0
+ releaseEvents HTMLDocument::ReleaseEvents DontDelete|Function 0
+@end
+*/
+
+
+Value KJS::HTMLDocFunction::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( HTMLDocument, thisObj );
+
+ DOM::HTMLDocument doc = static_cast<KJS::HTMLDocument *>(thisObj.imp())->toDocument();
+
+ switch (id) {
+ case HTMLDocument::Clear: // even IE doesn't support that one...
+ //doc.clear(); // TODO
+ return Undefined();
+ case HTMLDocument::Open:
+ if (args.size() >= 3) // IE extension for document.open: it means window.open if it has 3 args or more
+ {
+ KHTMLView *view = static_cast<DOM::DocumentImpl*>(doc.handle())->view();
+ if ( view && view->part() ) {
+ Window* win = Window::retrieveWindow(view->part());
+ if( win ) {
+ win->openWindow(exec, args);
+ }
+ }
+ }
+
+ doc.open();
+ return Undefined();
+ case HTMLDocument::Close:
+ // see tdehtmltests/ecma/tokenizer-script-recursion.html
+ doc.close();
+ return Undefined();
+ case HTMLDocument::Write:
+ case HTMLDocument::WriteLn: {
+ // DOM only specifies single string argument, but NS & IE allow multiple
+ // or no arguments
+ UString str = "";
+ for (int i = 0; i < args.size(); i++)
+ str += args[i].toString(exec);
+ if (id == HTMLDocument::WriteLn)
+ str += "\n";
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "document.write: " << str.string().string() << endl;
+#endif
+ doc.write(str.string());
+ return Undefined();
+ }
+ case HTMLDocument::GetElementsByName:
+ return getDOMNodeList(exec,doc.getElementsByName(args[0].toString(exec).string()));
+ case HTMLDocument::GetSelection: {
+ // NS4 and Mozilla specific. IE uses document.selection.createRange()
+ // http://docs.sun.com/source/816-6408-10/document.htm#1195981
+ KHTMLView *view = static_cast<DOM::DocumentImpl*>(doc.handle())->view();
+ if ( view && view->part() )
+ return String(view->part()->selectedText());
+ else
+ return Undefined();
+ }
+ case HTMLDocument::CaptureEvents:
+ case HTMLDocument::ReleaseEvents:
+ // Do nothing for now. These are NS-specific legacy calls.
+ break;
+ }
+
+ return Undefined();
+}
+
+const ClassInfo KJS::HTMLDocument::info =
+ { "HTMLDocument", &DOMDocument::info, &HTMLDocumentTable, 0 };
+/* Source for HTMLDocumentTable.
+@begin HTMLDocumentTable 31
+ title HTMLDocument::Title DontDelete
+ referrer HTMLDocument::Referrer DontDelete|ReadOnly
+ domain HTMLDocument::Domain DontDelete
+ URL HTMLDocument::URL DontDelete|ReadOnly
+ body HTMLDocument::Body DontDelete
+ location HTMLDocument::Location DontDelete
+ cookie HTMLDocument::Cookie DontDelete
+ images HTMLDocument::Images DontDelete|ReadOnly
+ applets HTMLDocument::Applets DontDelete|ReadOnly
+ links HTMLDocument::Links DontDelete|ReadOnly
+ forms HTMLDocument::Forms DontDelete|ReadOnly
+ anchors HTMLDocument::Anchors DontDelete|ReadOnly
+ scripts HTMLDocument::Scripts DontDelete|ReadOnly
+ all HTMLDocument::All DontDelete|ReadOnly
+ bgColor HTMLDocument::BgColor DontDelete
+ fgColor HTMLDocument::FgColor DontDelete
+ alinkColor HTMLDocument::AlinkColor DontDelete
+ linkColor HTMLDocument::LinkColor DontDelete
+ vlinkColor HTMLDocument::VlinkColor DontDelete
+ lastModified HTMLDocument::LastModified DontDelete|ReadOnly
+ height HTMLDocument::Height DontDelete|ReadOnly
+ width HTMLDocument::Width DontDelete|ReadOnly
+ dir HTMLDocument::Dir DontDelete
+ compatMode HTMLDocument::CompatMode DontDelete|ReadOnly
+#IE extension
+ frames HTMLDocument::Frames DontDelete|ReadOnly
+#NS4 extension
+ layers HTMLDocument::Layers DontDelete|ReadOnly
+#potentially obsolete array properties
+# plugins
+# tags
+#potentially obsolete properties
+# embeds
+# ids
+@end
+*/
+
+KJS::HTMLDocument::HTMLDocument(ExecState *exec, const DOM::HTMLDocument& d)
+ : DOMDocument(HTMLDocumentProto::self(exec), d) { }
+
+bool KJS::HTMLDocument::hasProperty(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ //kdDebug(6070) << "KJS::HTMLDocument::hasProperty " << p.qstring() << endl;
+#endif
+ DOM::HTMLDocument doc = static_cast<DOM::HTMLDocument>(node);
+ DOM::DocumentImpl* docImpl = static_cast<DOM::DocumentImpl*>(doc.handle());
+ KHTMLView *view = docImpl->view();
+ Window* win = view && view->part() ? Window::retrieveWindow(view->part()) : 0L;
+ if ( !win || !win->isSafeScript(exec) )
+ return false;
+
+
+ if ( docImpl->underDocNamedCache().contains( p.qstring() ) )
+ return true;
+
+ if ( view && view->part() )
+ {
+ KHTMLPart *kp = view->part()->findFrame( p.qstring() );
+ if (kp)
+ return true;
+ }
+
+ return DOMDocument::hasProperty(exec, p);
+}
+
+Value KJS::HTMLDocument::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLDocument::tryGet " << propertyName.qstring() << endl;
+#endif
+
+ DOM::HTMLDocument doc = static_cast<DOM::HTMLDocument>(node);
+ DOM::DocumentImpl* docImpl = static_cast<DOM::DocumentImpl*>(doc.handle());
+ KHTMLView *view = docImpl->view();
+
+ Window* win = view && view->part() ? Window::retrieveWindow(view->part()) : 0L;
+ if ( !win || !win->isSafeScript(exec) )
+ return Undefined();
+
+ //Check for images, forms, objects, etc.
+ ElementMappingCache::ItemInfo* info = docImpl->underDocNamedCache().get(propertyName.qstring());
+ if (info) {
+ //May be a false positive, but we can try to avoid doing it the hard way in
+ //simpler cases. The trickiness here is that the cache is kept under both
+ //name and id, but we sometimes ignore id for IE compat
+ DOM::DOMString propertyDOMString = propertyName.string();
+
+ if (info->nd && DOM::HTMLMappedNameCollectionImpl::matchesName(info->nd,
+ HTMLCollectionImpl::DOCUMENT_NAMED_ITEMS, propertyDOMString)) {
+ return getDOMNode(exec, info->nd);
+ } else {
+ //Can't tell it just like that, so better go through collection and count stuff. This is the slow path...
+ DOM::HTMLMappedNameCollection coll(docImpl, HTMLCollectionImpl::DOCUMENT_NAMED_ITEMS, propertyDOMString);
+
+ if (coll.length() == 1) {
+ DOM::Node node = coll.firstItem();
+ return getDOMNode(exec, node);
+ } else if (coll.length() > 1) {
+ return getHTMLCollection(exec, coll);
+ }
+ }
+ }
+
+ // Check for frames/iframes with name==propertyName
+ if ( view && view->part() )
+ {
+ // ###### TODO return a collection in case several frames have the same name
+ // (IE does that). Hard to do with findFrame :}
+ KHTMLPart *kp = view->part()->findFrame( propertyName.qstring() );
+ if (kp)
+ return Window::retrieve(kp);
+ }
+
+ const HashEntry* entry = Lookup::findEntry(&HTMLDocumentTable, propertyName);
+ if (entry) {
+ switch (entry->value) {
+ case Title:
+ return String(doc.title());
+ case Referrer:
+ return String(doc.referrer());
+ case Domain:
+ return String(doc.domain());
+ case URL:
+ return String(doc.URL());
+ case Body:
+ return getDOMNode(exec,doc.body());
+ case Location:
+ if (win)
+ return Value(win->location());
+ else
+ return Undefined();
+ case Cookie:
+ return String(doc.cookie());
+ case Images:
+ return getHTMLCollection(exec,doc.images());
+ case Applets:
+ return getHTMLCollection(exec,doc.applets());
+ case Links:
+ return getHTMLCollection(exec,doc.links());
+ case Forms:
+ return getHTMLCollection(exec,doc.forms());
+ case Layers:
+ // ### Should not be hidden when we emulate Netscape4
+ return getHTMLCollection(exec,doc.layers(), true);
+ case Anchors:
+ return getHTMLCollection(exec,doc.anchors());
+ case Scripts:
+ return getHTMLCollection(exec,doc.scripts());
+ case All:
+ // Disable document.all when we try to be Netscape-compatible
+ if ( exec->interpreter()->compatMode() == Interpreter::NetscapeCompat )
+ return Undefined();
+ else
+ if ( exec->interpreter()->compatMode() == Interpreter::IECompat )
+ return getHTMLCollection(exec,doc.all());
+ else // enabled but hidden
+ return getHTMLCollection(exec,doc.all(), true);
+ case CompatMode:
+ return String(static_cast<HTMLDocumentImpl *>(doc.handle())->parseMode()
+ == DocumentImpl::Compat ? "BackCompat" : "CSS1Compat");
+ }
+ }
+ // Look for overrides
+ ValueImp * val = ObjectImp::getDirect(propertyName);
+ if (val)
+ return Value(val);
+
+ DOM::HTMLBodyElement body = doc.body();
+ if (entry) {
+ switch (entry->value) {
+ case BgColor:
+ return String(body.bgColor());
+ case FgColor:
+ return String(body.text());
+ case AlinkColor:
+ return String(body.aLink());
+ case LinkColor:
+ return String(body.link());
+ case VlinkColor:
+ return String(body.vLink());
+ case LastModified:
+ return String(doc.lastModified());
+ case Height: // NS-only, not available in IE
+ return Number(view ? view->contentsHeight() : 0);
+ case Width: // NS-only, not available in IE
+ return Number(view ? view->contentsWidth() : 0);
+ case Dir:
+ return String(body.dir());
+ case Frames:
+ if ( win )
+ return Value(win->frames(exec));
+ else
+ return Undefined();
+ }
+ }
+ return DOMDocument::tryGet(exec, propertyName);
+}
+
+void KJS::HTMLDocument::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLDocument::tryPut " << propertyName.qstring() << endl;
+#endif
+ KHTMLView *view = static_cast<DOM::DocumentImpl*>(node.handle())->view();
+
+ Window* win = view && view->part() ? Window::retrieveWindow(view->part()) : 0L;
+ if ( !win || !win->isSafeScript(exec) )
+ return;
+
+ DOMObjectLookupPut<HTMLDocument, DOMDocument>( exec, propertyName, value, attr, &HTMLDocumentTable, this );
+}
+
+void KJS::HTMLDocument::putValueProperty(ExecState *exec, int token, const Value& value, int /*attr*/)
+{
+ DOM::HTMLDocument doc = static_cast<DOM::HTMLDocument>(node);
+
+ DOM::HTMLBodyElement body = doc.body();
+ DOM::DOMString val = value.toString(exec).string();
+
+ switch (token) {
+ case Title:
+ if (doc.title() != val) doc.setTitle(val);
+ break;
+ case Body: {
+ DOMNode *node = new DOMNode(exec, KJS::toNode(value));
+ // This is required to avoid leaking the node.
+ Value nodeValue(node);
+ doc.setBody(node->toNode());
+ break;
+ }
+ case Domain: { // not part of the DOM
+ DOM::HTMLDocumentImpl* docimpl = static_cast<DOM::HTMLDocumentImpl*>(doc.handle());
+ if (docimpl)
+ docimpl->setDomain(val);
+ break;
+ }
+ case Cookie:
+ doc.setCookie(val);
+ break;
+ case Location:
+ {
+ KHTMLView *view = static_cast<DOM::DocumentImpl*>(doc.handle())->view();
+ if ( view )
+ Window::retrieveWindow(view->part())->goURL(exec, value.toString(exec).qstring(), false /*don't lock history*/);
+ break;
+ }
+ case BgColor:
+ if (body.bgColor() != val) body.setBgColor(val);
+ break;
+ case FgColor:
+ if (body.text() != val) body.setText(val);
+ break;
+ case AlinkColor:
+ if (body.aLink() != val) body.setALink(val);
+ break;
+ case LinkColor:
+ if (body.link() != val) body.setLink(val);
+ break;
+ case VlinkColor:
+ if (body.vLink() != val) body.setVLink(val);
+ break;
+ case Dir:
+ body.setDir(val);
+ break;
+ default:
+ kdDebug(6070) << "WARNING: HTMLDocument::putValueProperty unhandled token " << token << endl;
+ }
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo KJS::HTMLElement::info = { "HTMLElement", &DOMElement::info, &HTMLElementTable, 0 };
+const ClassInfo KJS::HTMLElement::html_info = { "HTMLHtmlElement", &KJS::HTMLElement::info, &HTMLHtmlElementTable, 0 };
+const ClassInfo KJS::HTMLElement::head_info = { "HTMLHeadElement", &KJS::HTMLElement::info, &HTMLHeadElementTable, 0 };
+const ClassInfo KJS::HTMLElement::link_info = { "HTMLLinkElement", &KJS::HTMLElement::info, &HTMLLinkElementTable, 0 };
+const ClassInfo KJS::HTMLElement::title_info = { "HTMLTitleElement", &KJS::HTMLElement::info, &HTMLTitleElementTable, 0 };
+const ClassInfo KJS::HTMLElement::meta_info = { "HTMLMetaElement", &KJS::HTMLElement::info, &HTMLMetaElementTable, 0 };
+const ClassInfo KJS::HTMLElement::base_info = { "HTMLBaseElement", &KJS::HTMLElement::info, &HTMLBaseElementTable, 0 };
+const ClassInfo KJS::HTMLElement::isIndex_info = { "HTMLIsIndexElement", &KJS::HTMLElement::info, &HTMLIsIndexElementTable, 0 };
+const ClassInfo KJS::HTMLElement::style_info = { "HTMLStyleElement", &KJS::HTMLElement::info, &HTMLStyleElementTable, 0 };
+const ClassInfo KJS::HTMLElement::body_info = { "HTMLBodyElement", &KJS::HTMLElement::info, &HTMLBodyElementTable, 0 };
+const ClassInfo KJS::HTMLElement::form_info = { "HTMLFormElement", &KJS::HTMLElement::info, &HTMLFormElementTable, 0 };
+const ClassInfo KJS::HTMLElement::select_info = { "HTMLSelectElement", &KJS::HTMLElement::info, &HTMLSelectElementTable, 0 };
+const ClassInfo KJS::HTMLElement::optGroup_info = { "HTMLOptGroupElement", &KJS::HTMLElement::info, &HTMLOptGroupElementTable, 0 };
+const ClassInfo KJS::HTMLElement::option_info = { "HTMLOptionElement", &KJS::HTMLElement::info, &HTMLOptionElementTable, 0 };
+const ClassInfo KJS::HTMLElement::input_info = { "HTMLInputElement", &KJS::HTMLElement::info, &HTMLInputElementTable, 0 };
+const ClassInfo KJS::HTMLElement::textArea_info = { "HTMLTextAreaElement", &KJS::HTMLElement::info, &HTMLTextAreaElementTable, 0 };
+const ClassInfo KJS::HTMLElement::button_info = { "HTMLButtonElement", &KJS::HTMLElement::info, &HTMLButtonElementTable, 0 };
+const ClassInfo KJS::HTMLElement::label_info = { "HTMLLabelElement", &KJS::HTMLElement::info, &HTMLLabelElementTable, 0 };
+const ClassInfo KJS::HTMLElement::fieldSet_info = { "HTMLFieldSetElement", &KJS::HTMLElement::info, &HTMLFieldSetElementTable, 0 };
+const ClassInfo KJS::HTMLElement::legend_info = { "HTMLLegendElement", &KJS::HTMLElement::info, &HTMLLegendElementTable, 0 };
+const ClassInfo KJS::HTMLElement::ul_info = { "HTMLUListElement", &KJS::HTMLElement::info, &HTMLUListElementTable, 0 };
+const ClassInfo KJS::HTMLElement::ol_info = { "HTMLOListElement", &KJS::HTMLElement::info, &HTMLOListElementTable, 0 };
+const ClassInfo KJS::HTMLElement::dl_info = { "HTMLDListElement", &KJS::HTMLElement::info, &HTMLDListElementTable, 0 };
+const ClassInfo KJS::HTMLElement::dir_info = { "HTMLDirectoryElement", &KJS::HTMLElement::info, &HTMLDirectoryElementTable, 0 };
+const ClassInfo KJS::HTMLElement::menu_info = { "HTMLMenuElement", &KJS::HTMLElement::info, &HTMLMenuElementTable, 0 };
+const ClassInfo KJS::HTMLElement::li_info = { "HTMLLIElement", &KJS::HTMLElement::info, &HTMLLIElementTable, 0 };
+const ClassInfo KJS::HTMLElement::div_info = { "HTMLDivElement", &KJS::HTMLElement::info, &HTMLDivElementTable, 0 };
+const ClassInfo KJS::HTMLElement::p_info = { "HTMLParagraphElement", &KJS::HTMLElement::info, &HTMLParagraphElementTable, 0 };
+const ClassInfo KJS::HTMLElement::heading_info = { "HTMLHeadingElement", &KJS::HTMLElement::info, &HTMLHeadingElementTable, 0 };
+const ClassInfo KJS::HTMLElement::blockQuote_info = { "HTMLBlockQuoteElement", &KJS::HTMLElement::info, &HTMLBlockQuoteElementTable, 0 };
+const ClassInfo KJS::HTMLElement::q_info = { "HTMLQuoteElement", &KJS::HTMLElement::info, &HTMLQuoteElementTable, 0 };
+const ClassInfo KJS::HTMLElement::pre_info = { "HTMLPreElement", &KJS::HTMLElement::info, &HTMLPreElementTable, 0 };
+const ClassInfo KJS::HTMLElement::br_info = { "HTMLBRElement", &KJS::HTMLElement::info, &HTMLBRElementTable, 0 };
+const ClassInfo KJS::HTMLElement::baseFont_info = { "HTMLBaseFontElement", &KJS::HTMLElement::info, &HTMLBaseFontElementTable, 0 };
+const ClassInfo KJS::HTMLElement::font_info = { "HTMLFontElement", &KJS::HTMLElement::info, &HTMLFontElementTable, 0 };
+const ClassInfo KJS::HTMLElement::hr_info = { "HTMLHRElement", &KJS::HTMLElement::info, &HTMLHRElementTable, 0 };
+const ClassInfo KJS::HTMLElement::mod_info = { "HTMLModElement", &KJS::HTMLElement::info, &HTMLModElementTable, 0 };
+const ClassInfo KJS::HTMLElement::a_info = { "HTMLAnchorElement", &KJS::HTMLElement::info, &HTMLAnchorElementTable, 0 };
+const ClassInfo KJS::HTMLElement::img_info = { "HTMLImageElement", &KJS::HTMLElement::info, &HTMLImageElementTable, 0 };
+const ClassInfo KJS::HTMLElement::object_info = { "HTMLObjectElement", &KJS::HTMLElement::info, &HTMLObjectElementTable, 0 };
+const ClassInfo KJS::HTMLElement::param_info = { "HTMLParamElement", &KJS::HTMLElement::info, &HTMLParamElementTable, 0 };
+const ClassInfo KJS::HTMLElement::applet_info = { "HTMLAppletElement", &KJS::HTMLElement::info, &HTMLAppletElementTable, 0 };
+const ClassInfo KJS::HTMLElement::map_info = { "HTMLMapElement", &KJS::HTMLElement::info, &HTMLMapElementTable, 0 };
+const ClassInfo KJS::HTMLElement::area_info = { "HTMLAreaElement", &KJS::HTMLElement::info, &HTMLAreaElementTable, 0 };
+const ClassInfo KJS::HTMLElement::script_info = { "HTMLScriptElement", &KJS::HTMLElement::info, &HTMLScriptElementTable, 0 };
+const ClassInfo KJS::HTMLElement::table_info = { "HTMLTableElement", &KJS::HTMLElement::info, &HTMLTableElementTable, 0 };
+const ClassInfo KJS::HTMLElement::caption_info = { "HTMLTableCaptionElement", &KJS::HTMLElement::info, &HTMLTableCaptionElementTable, 0 };
+const ClassInfo KJS::HTMLElement::col_info = { "HTMLTableColElement", &KJS::HTMLElement::info, &HTMLTableColElementTable, 0 };
+const ClassInfo KJS::HTMLElement::tablesection_info = { "HTMLTableSectionElement", &KJS::HTMLElement::info, &HTMLTableSectionElementTable, 0 };
+const ClassInfo KJS::HTMLElement::tr_info = { "HTMLTableRowElement", &KJS::HTMLElement::info, &HTMLTableRowElementTable, 0 };
+const ClassInfo KJS::HTMLElement::tablecell_info = { "HTMLTableCellElement", &KJS::HTMLElement::info, &HTMLTableCellElementTable, 0 };
+const ClassInfo KJS::HTMLElement::frameSet_info = { "HTMLFrameSetElement", &KJS::HTMLElement::info, &HTMLFrameSetElementTable, 0 };
+const ClassInfo KJS::HTMLElement::frame_info = { "HTMLFrameElement", &KJS::HTMLElement::info, &HTMLFrameElementTable, 0 };
+const ClassInfo KJS::HTMLElement::iFrame_info = { "HTMLIFrameElement", &KJS::HTMLElement::info, &HTMLIFrameElementTable, 0 };
+const ClassInfo KJS::HTMLElement::marquee_info = { "HTMLMarqueeElement", &KJS::HTMLElement::info, 0, 0 };
+const ClassInfo KJS::HTMLElement::layer_info = { "HTMLLayerElement", &KJS::HTMLElement::info, &HTMLLayerElementTable, 0 };
+
+static Object prototypeForID(ExecState* exec, DOM::NodeImpl::Id id);
+
+KJS::HTMLElement::HTMLElement(ExecState *exec, const DOM::HTMLElement& e) :
+ DOMElement(prototypeForID(exec, e.elementId()), e) { }
+
+const ClassInfo* KJS::HTMLElement::classInfo() const
+{
+ DOM::HTMLElement element = static_cast<DOM::HTMLElement>(node);
+ switch (element.elementId()) {
+ case ID_HTML:
+ return &html_info;
+ case ID_HEAD:
+ return &head_info;
+ case ID_LINK:
+ return &link_info;
+ case ID_TITLE:
+ return &title_info;
+ case ID_META:
+ return &meta_info;
+ case ID_BASE:
+ return &base_info;
+ case ID_ISINDEX:
+ return &isIndex_info;
+ case ID_STYLE:
+ return &style_info;
+ case ID_BODY:
+ return &body_info;
+ case ID_FORM:
+ return &form_info;
+ case ID_SELECT:
+ return &select_info;
+ case ID_OPTGROUP:
+ return &optGroup_info;
+ case ID_OPTION:
+ return &option_info;
+ case ID_INPUT:
+ return &input_info;
+ case ID_TEXTAREA:
+ return &textArea_info;
+ case ID_BUTTON:
+ return &button_info;
+ case ID_LABEL:
+ return &label_info;
+ case ID_FIELDSET:
+ return &fieldSet_info;
+ case ID_LEGEND:
+ return &legend_info;
+ case ID_UL:
+ return &ul_info;
+ case ID_OL:
+ return &ol_info;
+ case ID_DL:
+ return &dl_info;
+ case ID_DIR:
+ return &dir_info;
+ case ID_MENU:
+ return &menu_info;
+ case ID_LI:
+ return &li_info;
+ case ID_DIV:
+ return &div_info;
+ case ID_P:
+ return &p_info;
+ case ID_H1:
+ case ID_H2:
+ case ID_H3:
+ case ID_H4:
+ case ID_H5:
+ case ID_H6:
+ return &heading_info;
+ case ID_BLOCKQUOTE:
+ return &blockQuote_info;
+ case ID_Q:
+ return &q_info;
+ case ID_PRE:
+ return &pre_info;
+ case ID_BR:
+ return &br_info;
+ case ID_BASEFONT:
+ return &baseFont_info;
+ case ID_FONT:
+ return &font_info;
+ case ID_HR:
+ return &hr_info;
+ case ID_INS:
+ case ID_DEL:
+ return &mod_info;
+ case ID_A:
+ return &a_info;
+ case ID_IMG:
+ return &img_info;
+ case ID_OBJECT:
+ return &object_info;
+ case ID_PARAM:
+ return &param_info;
+ case ID_APPLET:
+ return &applet_info;
+ case ID_MAP:
+ return &map_info;
+ case ID_AREA:
+ return &area_info;
+ case ID_SCRIPT:
+ return &script_info;
+ case ID_TABLE:
+ return &table_info;
+ case ID_CAPTION:
+ return &caption_info;
+ case ID_COL:
+ case ID_COLGROUP:
+ return &col_info;
+ case ID_THEAD:
+ case ID_TBODY:
+ case ID_TFOOT:
+ return &tablesection_info;
+ case ID_TR:
+ return &tr_info;
+ case ID_TH:
+ case ID_TD:
+ return &tablecell_info;
+ case ID_FRAMESET:
+ return &frameSet_info;
+ case ID_FRAME:
+ return &frame_info;
+ case ID_IFRAME:
+ return &iFrame_info;
+ case ID_MARQUEE:
+ return &marquee_info;
+ case ID_LAYER:
+ return &layer_info;
+ default:
+ return &info;
+ }
+}
+/*
+@begin HTMLElementTable 11
+ id KJS::HTMLElement::ElementId DontDelete
+ title KJS::HTMLElement::ElementTitle DontDelete
+ lang KJS::HTMLElement::ElementLang DontDelete
+ dir KJS::HTMLElement::ElementDir DontDelete
+### isn't this "class" in the HTML spec?
+ className KJS::HTMLElement::ElementClassName DontDelete
+ innerHTML KJS::HTMLElement::ElementInnerHTML DontDelete
+ innerText KJS::HTMLElement::ElementInnerText DontDelete
+ document KJS::HTMLElement::ElementDocument DontDelete|ReadOnly
+# IE extension
+ children KJS::HTMLElement::ElementChildren DontDelete|ReadOnly
+ all KJS::HTMLElement::ElementAll DontDelete|ReadOnly
+@end
+@begin HTMLElementProtoTable 1
+ scrollIntoView KJS::HTMLElement::ElementScrollIntoView DontDelete|Function 0
+@end
+@begin HTMLHtmlElementTable 1
+ version KJS::HTMLElement::HtmlVersion DontDelete
+@end
+@begin HTMLHeadElementTable 1
+ profile KJS::HTMLElement::HeadProfile DontDelete
+@end
+@begin HTMLLinkElementTable 11
+ disabled KJS::HTMLElement::LinkDisabled DontDelete
+ charset KJS::HTMLElement::LinkCharset DontDelete
+ href KJS::HTMLElement::LinkHref DontDelete
+ hreflang KJS::HTMLElement::LinkHrefLang DontDelete
+ media KJS::HTMLElement::LinkMedia DontDelete
+ rel KJS::HTMLElement::LinkRel DontDelete
+ rev KJS::HTMLElement::LinkRev DontDelete
+ target KJS::HTMLElement::LinkTarget DontDelete
+ type KJS::HTMLElement::LinkType DontDelete
+ sheet KJS::HTMLElement::LinkSheet DontDelete|ReadOnly
+@end
+@begin HTMLTitleElementTable 1
+ text KJS::HTMLElement::TitleText DontDelete
+@end
+@begin HTMLMetaElementTable 4
+ content KJS::HTMLElement::MetaContent DontDelete
+ httpEquiv KJS::HTMLElement::MetaHttpEquiv DontDelete
+ name KJS::HTMLElement::MetaName DontDelete
+ scheme KJS::HTMLElement::MetaScheme DontDelete
+@end
+@begin HTMLBaseElementTable 2
+ href KJS::HTMLElement::BaseHref DontDelete
+ target KJS::HTMLElement::BaseTarget DontDelete
+@end
+@begin HTMLIsIndexElementTable 2
+ form KJS::HTMLElement::IsIndexForm DontDelete|ReadOnly
+ prompt KJS::HTMLElement::IsIndexPrompt DontDelete
+@end
+@begin HTMLStyleElementTable 4
+ disabled KJS::HTMLElement::StyleDisabled DontDelete
+ media KJS::HTMLElement::StyleMedia DontDelete
+ type KJS::HTMLElement::StyleType DontDelete
+ sheet KJS::HTMLElement::StyleSheet DontDelete|ReadOnly
+@end
+@begin HTMLBodyElementTable 8
+ aLink KJS::HTMLElement::BodyALink DontDelete
+ background KJS::HTMLElement::BodyBackground DontDelete
+ bgColor KJS::HTMLElement::BodyBgColor DontDelete
+ link KJS::HTMLElement::BodyLink DontDelete
+ text KJS::HTMLElement::BodyText DontDelete
+ vLink KJS::HTMLElement::BodyVLink DontDelete
+# IE extension
+ onload KJS::HTMLElement::BodyOnLoad DontDelete
+@end
+@begin HTMLBodyElementProtoTable 2
+# Mozilla'ish extension. Ideally we would want to support this on all elements.
+# Not hard, but not an immediate need.
+ focus KJS::HTMLElement::BodyFocus DontDelete|Function 0
+@end
+@begin HTMLFormElementTable 11
+# Also supported, by name/index
+ elements KJS::HTMLElement::FormElements DontDelete|ReadOnly
+ length KJS::HTMLElement::FormLength DontDelete|ReadOnly
+ name KJS::HTMLElement::FormName DontDelete
+ acceptCharset KJS::HTMLElement::FormAcceptCharset DontDelete
+ action KJS::HTMLElement::FormAction DontDelete
+ encoding KJS::HTMLElement::FormEncType DontDelete
+ enctype KJS::HTMLElement::FormEncType DontDelete
+ method KJS::HTMLElement::FormMethod DontDelete
+ target KJS::HTMLElement::FormTarget DontDelete
+@end
+@begin HTMLFormElementProtoTable 2
+ submit KJS::HTMLElement::FormSubmit DontDelete|Function 0
+ reset KJS::HTMLElement::FormReset DontDelete|Function 0
+@end
+@begin HTMLSelectElementTable 11
+# Also supported, by index
+ type KJS::HTMLElement::SelectType DontDelete|ReadOnly
+ selectedIndex KJS::HTMLElement::SelectSelectedIndex DontDelete
+ value KJS::HTMLElement::SelectValue DontDelete
+ length KJS::HTMLElement::SelectLength DontDelete
+ form KJS::HTMLElement::SelectForm DontDelete|ReadOnly
+ options KJS::HTMLElement::SelectOptions DontDelete|ReadOnly
+ disabled KJS::HTMLElement::SelectDisabled DontDelete
+ multiple KJS::HTMLElement::SelectMultiple DontDelete
+ name KJS::HTMLElement::SelectName DontDelete
+ size KJS::HTMLElement::SelectSize DontDelete
+ tabIndex KJS::HTMLElement::SelectTabIndex DontDelete
+@end
+@begin HTMLSelectElementProtoTable 4
+ add KJS::HTMLElement::SelectAdd DontDelete|Function 2
+ remove KJS::HTMLElement::SelectRemove DontDelete|Function 1
+ blur KJS::HTMLElement::SelectBlur DontDelete|Function 0
+ focus KJS::HTMLElement::SelectFocus DontDelete|Function 0
+@end
+@begin HTMLOptGroupElementTable 2
+ disabled KJS::HTMLElement::OptGroupDisabled DontDelete
+ label KJS::HTMLElement::OptGroupLabel DontDelete
+@end
+@begin HTMLOptionElementTable 8
+ form KJS::HTMLElement::OptionForm DontDelete|ReadOnly
+ defaultSelected KJS::HTMLElement::OptionDefaultSelected DontDelete
+ text KJS::HTMLElement::OptionText DontDelete
+ index KJS::HTMLElement::OptionIndex DontDelete|ReadOnly
+ disabled KJS::HTMLElement::OptionDisabled DontDelete
+ label KJS::HTMLElement::OptionLabel DontDelete
+ selected KJS::HTMLElement::OptionSelected DontDelete
+ value KJS::HTMLElement::OptionValue DontDelete
+@end
+@begin HTMLInputElementTable 25
+ defaultValue KJS::HTMLElement::InputDefaultValue DontDelete
+ defaultChecked KJS::HTMLElement::InputDefaultChecked DontDelete
+ form KJS::HTMLElement::InputForm DontDelete|ReadOnly
+ accept KJS::HTMLElement::InputAccept DontDelete
+ accessKey KJS::HTMLElement::InputAccessKey DontDelete
+ align KJS::HTMLElement::InputAlign DontDelete
+ alt KJS::HTMLElement::InputAlt DontDelete
+ checked KJS::HTMLElement::InputChecked DontDelete
+ indeterminate KJS::HTMLElement::InputIndeterminate DontDelete
+ status KJS::HTMLElement::InputChecked DontDelete
+ disabled KJS::HTMLElement::InputDisabled DontDelete
+ maxLength KJS::HTMLElement::InputMaxLength DontDelete
+ name KJS::HTMLElement::InputName DontDelete
+ readOnly KJS::HTMLElement::InputReadOnly DontDelete
+ size KJS::HTMLElement::InputSize DontDelete
+ src KJS::HTMLElement::InputSrc DontDelete
+ tabIndex KJS::HTMLElement::InputTabIndex DontDelete
+ type KJS::HTMLElement::InputType DontDelete
+ useMap KJS::HTMLElement::InputUseMap DontDelete
+ value KJS::HTMLElement::InputValue DontDelete
+ selectionStart KJS::HTMLElement::InputSelectionStart DontDelete
+ selectionEnd KJS::HTMLElement::InputSelectionEnd DontDelete
+@end
+@begin HTMLInputElementProtoTable 5
+ blur KJS::HTMLElement::InputBlur DontDelete|Function 0
+ focus KJS::HTMLElement::InputFocus DontDelete|Function 0
+ select KJS::HTMLElement::InputSelect DontDelete|Function 0
+ click KJS::HTMLElement::InputClick DontDelete|Function 0
+ setSelectionRange KJS::HTMLElement::InputSetSelectionRange DontDelete|Function 2
+@end
+@begin HTMLTextAreaElementTable 13
+ defaultValue KJS::HTMLElement::TextAreaDefaultValue DontDelete
+ form KJS::HTMLElement::TextAreaForm DontDelete|ReadOnly
+ accessKey KJS::HTMLElement::TextAreaAccessKey DontDelete
+ cols KJS::HTMLElement::TextAreaCols DontDelete
+ disabled KJS::HTMLElement::TextAreaDisabled DontDelete
+ name KJS::HTMLElement::TextAreaName DontDelete
+ readOnly KJS::HTMLElement::TextAreaReadOnly DontDelete
+ rows KJS::HTMLElement::TextAreaRows DontDelete
+ tabIndex KJS::HTMLElement::TextAreaTabIndex DontDelete
+ type KJS::HTMLElement::TextAreaType DontDelete|ReadOnly
+ value KJS::HTMLElement::TextAreaValue DontDelete
+ selectionStart KJS::HTMLElement::TextAreaSelectionStart DontDelete
+ selectionEnd KJS::HTMLElement::TextAreaSelectionEnd DontDelete
+ textLength KJS::HTMLElement::TextAreaTextLength DontDelete|ReadOnly
+@end
+@begin HTMLTextAreaElementProtoTable 4
+ blur KJS::HTMLElement::TextAreaBlur DontDelete|Function 0
+ focus KJS::HTMLElement::TextAreaFocus DontDelete|Function 0
+ select KJS::HTMLElement::TextAreaSelect DontDelete|Function 0
+ setSelectionRange KJS::HTMLElement::TextAreaSetSelectionRange DontDelete|Function 2
+@end
+@begin HTMLButtonElementTable 9
+ form KJS::HTMLElement::ButtonForm DontDelete|ReadOnly
+ accessKey KJS::HTMLElement::ButtonAccessKey DontDelete
+ disabled KJS::HTMLElement::ButtonDisabled DontDelete
+ name KJS::HTMLElement::ButtonName DontDelete
+ tabIndex KJS::HTMLElement::ButtonTabIndex DontDelete
+ type KJS::HTMLElement::ButtonType DontDelete|ReadOnly
+ value KJS::HTMLElement::ButtonValue DontDelete
+@end
+@begin HTMLButtonElementProtoTable 2
+ blur KJS::HTMLElement::ButtonBlur DontDelete|Function 0
+ focus KJS::HTMLElement::ButtonFocus DontDelete|Function 0
+@end
+@begin HTMLLabelElementTable 3
+ form KJS::HTMLElement::LabelForm DontDelete|ReadOnly
+ accessKey KJS::HTMLElement::LabelAccessKey DontDelete
+ htmlFor KJS::HTMLElement::LabelHtmlFor DontDelete
+@end
+@begin HTMLFieldSetElementTable 1
+ form KJS::HTMLElement::FieldSetForm DontDelete|ReadOnly
+@end
+@begin HTMLLegendElementTable 3
+ form KJS::HTMLElement::LegendForm DontDelete|ReadOnly
+ accessKey KJS::HTMLElement::LegendAccessKey DontDelete
+ align KJS::HTMLElement::LegendAlign DontDelete
+@end
+@begin HTMLUListElementTable 2
+ compact KJS::HTMLElement::UListCompact DontDelete
+ type KJS::HTMLElement::UListType DontDelete
+@end
+@begin HTMLOListElementTable 3
+ compact KJS::HTMLElement::OListCompact DontDelete
+ start KJS::HTMLElement::OListStart DontDelete
+ type KJS::HTMLElement::OListType DontDelete
+@end
+@begin HTMLDListElementTable 1
+ compact KJS::HTMLElement::DListCompact DontDelete
+@end
+@begin HTMLDirectoryElementTable 1
+ compact KJS::HTMLElement::DirectoryCompact DontDelete
+@end
+@begin HTMLMenuElementTable 1
+ compact KJS::HTMLElement::MenuCompact DontDelete
+@end
+@begin HTMLLIElementTable 2
+ type KJS::HTMLElement::LIType DontDelete
+ value KJS::HTMLElement::LIValue DontDelete
+@end
+@begin HTMLDivElementTable 1
+ align KJS::HTMLElement::DivAlign DontDelete
+@end
+@begin HTMLParagraphElementTable 1
+ align KJS::HTMLElement::ParagraphAlign DontDelete
+@end
+@begin HTMLHeadingElementTable 1
+ align KJS::HTMLElement::HeadingAlign DontDelete
+@end
+@begin HTMLBlockQuoteElementTable 1
+ cite KJS::HTMLElement::BlockQuoteCite DontDelete
+@end
+@begin HTMLQuoteElementTable 1
+ cite KJS::HTMLElement::QuoteCite DontDelete
+@end
+@begin HTMLPreElementTable 1
+ width KJS::HTMLElement::PreWidth DontDelete
+@end
+@begin HTMLBRElementTable 1
+ clear KJS::HTMLElement::BRClear DontDelete
+@end
+@begin HTMLBaseFontElementTable 3
+ color KJS::HTMLElement::BaseFontColor DontDelete
+ face KJS::HTMLElement::BaseFontFace DontDelete
+ size KJS::HTMLElement::BaseFontSize DontDelete
+@end
+@begin HTMLFontElementTable 3
+ color KJS::HTMLElement::FontColor DontDelete
+ face KJS::HTMLElement::FontFace DontDelete
+ size KJS::HTMLElement::FontSize DontDelete
+@end
+@begin HTMLHRElementTable 4
+ align KJS::HTMLElement::HRAlign DontDelete
+ noShade KJS::HTMLElement::HRNoShade DontDelete
+ size KJS::HTMLElement::HRSize DontDelete
+ width KJS::HTMLElement::HRWidth DontDelete
+@end
+@begin HTMLModElementTable 2
+ cite KJS::HTMLElement::ModCite DontDelete
+ dateTime KJS::HTMLElement::ModDateTime DontDelete
+@end
+@begin HTMLAnchorElementTable 23
+ accessKey KJS::HTMLElement::AnchorAccessKey DontDelete
+ charset KJS::HTMLElement::AnchorCharset DontDelete
+ coords KJS::HTMLElement::AnchorCoords DontDelete
+ href KJS::HTMLElement::AnchorHref DontDelete
+ hreflang KJS::HTMLElement::AnchorHrefLang DontDelete
+ hash KJS::HTMLElement::AnchorHash DontDelete|ReadOnly
+ host KJS::HTMLElement::AnchorHost DontDelete|ReadOnly
+ hostname KJS::HTMLElement::AnchorHostname DontDelete|ReadOnly
+ name KJS::HTMLElement::AnchorName DontDelete
+ pathname KJS::HTMLElement::AnchorPathName DontDelete|ReadOnly
+ port KJS::HTMLElement::AnchorPort DontDelete|ReadOnly
+ protocol KJS::HTMLElement::AnchorProtocol DontDelete|ReadOnly
+ rel KJS::HTMLElement::AnchorRel DontDelete
+ rev KJS::HTMLElement::AnchorRev DontDelete
+ search KJS::HTMLElement::AnchorSearch DontDelete
+ shape KJS::HTMLElement::AnchorShape DontDelete
+ tabIndex KJS::HTMLElement::AnchorTabIndex DontDelete
+ target KJS::HTMLElement::AnchorTarget DontDelete
+ text KJS::HTMLElement::AnchorText DontDelete|ReadOnly
+ type KJS::HTMLElement::AnchorType DontDelete
+@end
+@begin HTMLAnchorElementProtoTable 3
+ blur KJS::HTMLElement::AnchorBlur DontDelete|Function 0
+ focus KJS::HTMLElement::AnchorFocus DontDelete|Function 0
+ click KJS::HTMLElement::AnchorClick DontDelete|Function 0
+@end
+@begin HTMLImageElementTable 15
+ name KJS::HTMLElement::ImageName DontDelete
+ align KJS::HTMLElement::ImageAlign DontDelete
+ alt KJS::HTMLElement::ImageAlt DontDelete
+ border KJS::HTMLElement::ImageBorder DontDelete
+ complete KJS::HTMLElement::ImageComplete DontDelete|ReadOnly
+ height KJS::HTMLElement::ImageHeight DontDelete
+ hspace KJS::HTMLElement::ImageHspace DontDelete
+ isMap KJS::HTMLElement::ImageIsMap DontDelete
+ longDesc KJS::HTMLElement::ImageLongDesc DontDelete
+ src KJS::HTMLElement::ImageSrc DontDelete
+ useMap KJS::HTMLElement::ImageUseMap DontDelete
+ vspace KJS::HTMLElement::ImageVspace DontDelete
+ width KJS::HTMLElement::ImageWidth DontDelete
+ x KJS::HTMLElement::ImageX DontDelete|ReadOnly
+ y KJS::HTMLElement::ImageY DontDelete|ReadOnly
+@end
+@begin HTMLObjectElementTable 20
+ form KJS::HTMLElement::ObjectForm DontDelete|ReadOnly
+ code KJS::HTMLElement::ObjectCode DontDelete
+ align KJS::HTMLElement::ObjectAlign DontDelete
+ archive KJS::HTMLElement::ObjectArchive DontDelete
+ border KJS::HTMLElement::ObjectBorder DontDelete
+ codeBase KJS::HTMLElement::ObjectCodeBase DontDelete
+ codeType KJS::HTMLElement::ObjectCodeType DontDelete
+ contentDocument KJS::HTMLElement::ObjectContentDocument DontDelete|ReadOnly
+ data KJS::HTMLElement::ObjectData DontDelete
+ declare KJS::HTMLElement::ObjectDeclare DontDelete
+ height KJS::HTMLElement::ObjectHeight DontDelete
+ hspace KJS::HTMLElement::ObjectHspace DontDelete
+ name KJS::HTMLElement::ObjectName DontDelete
+ standby KJS::HTMLElement::ObjectStandby DontDelete
+ tabIndex KJS::HTMLElement::ObjectTabIndex DontDelete
+ type KJS::HTMLElement::ObjectType DontDelete
+ useMap KJS::HTMLElement::ObjectUseMap DontDelete
+ vspace KJS::HTMLElement::ObjectVspace DontDelete
+ width KJS::HTMLElement::ObjectWidth DontDelete
+@end
+@begin HTMLParamElementTable 4
+ name KJS::HTMLElement::ParamName DontDelete
+ type KJS::HTMLElement::ParamType DontDelete
+ value KJS::HTMLElement::ParamValue DontDelete
+ valueType KJS::HTMLElement::ParamValueType DontDelete
+@end
+@begin HTMLAppletElementTable 11
+ align KJS::HTMLElement::AppletAlign DontDelete
+ alt KJS::HTMLElement::AppletAlt DontDelete
+ archive KJS::HTMLElement::AppletArchive DontDelete
+ code KJS::HTMLElement::AppletCode DontDelete
+ codeBase KJS::HTMLElement::AppletCodeBase DontDelete
+ height KJS::HTMLElement::AppletHeight DontDelete
+ hspace KJS::HTMLElement::AppletHspace DontDelete
+ name KJS::HTMLElement::AppletName DontDelete
+ object KJS::HTMLElement::AppletObject DontDelete
+ vspace KJS::HTMLElement::AppletVspace DontDelete
+ width KJS::HTMLElement::AppletWidth DontDelete
+@end
+@begin HTMLMapElementTable 2
+ areas KJS::HTMLElement::MapAreas DontDelete|ReadOnly
+ name KJS::HTMLElement::MapName DontDelete
+@end
+@begin HTMLAreaElementTable 15
+ accessKey KJS::HTMLElement::AreaAccessKey DontDelete
+ alt KJS::HTMLElement::AreaAlt DontDelete
+ coords KJS::HTMLElement::AreaCoords DontDelete
+ href KJS::HTMLElement::AreaHref DontDelete
+ hash KJS::HTMLElement::AreaHash DontDelete|ReadOnly
+ host KJS::HTMLElement::AreaHost DontDelete|ReadOnly
+ hostname KJS::HTMLElement::AreaHostName DontDelete|ReadOnly
+ pathname KJS::HTMLElement::AreaPathName DontDelete|ReadOnly
+ port KJS::HTMLElement::AreaPort DontDelete|ReadOnly
+ protocol KJS::HTMLElement::AreaProtocol DontDelete|ReadOnly
+ search KJS::HTMLElement::AreaSearch DontDelete|ReadOnly
+ noHref KJS::HTMLElement::AreaNoHref DontDelete
+ shape KJS::HTMLElement::AreaShape DontDelete
+ tabIndex KJS::HTMLElement::AreaTabIndex DontDelete
+ target KJS::HTMLElement::AreaTarget DontDelete
+@end
+@begin HTMLScriptElementTable 7
+ text KJS::HTMLElement::ScriptText DontDelete
+ htmlFor KJS::HTMLElement::ScriptHtmlFor DontDelete
+ event KJS::HTMLElement::ScriptEvent DontDelete
+ charset KJS::HTMLElement::ScriptCharset DontDelete
+ defer KJS::HTMLElement::ScriptDefer DontDelete
+ src KJS::HTMLElement::ScriptSrc DontDelete
+ type KJS::HTMLElement::ScriptType DontDelete
+@end
+@begin HTMLTableElementTable 23
+ caption KJS::HTMLElement::TableCaption DontDelete
+ tHead KJS::HTMLElement::TableTHead DontDelete
+ tFoot KJS::HTMLElement::TableTFoot DontDelete
+ rows KJS::HTMLElement::TableRows DontDelete|ReadOnly
+ tBodies KJS::HTMLElement::TableTBodies DontDelete|ReadOnly
+ align KJS::HTMLElement::TableAlign DontDelete
+ bgColor KJS::HTMLElement::TableBgColor DontDelete
+ border KJS::HTMLElement::TableBorder DontDelete
+ cellPadding KJS::HTMLElement::TableCellPadding DontDelete
+ cellSpacing KJS::HTMLElement::TableCellSpacing DontDelete
+ frame KJS::HTMLElement::TableFrame DontDelete
+ rules KJS::HTMLElement::TableRules DontDelete
+ summary KJS::HTMLElement::TableSummary DontDelete
+ width KJS::HTMLElement::TableWidth DontDelete
+@end
+@begin HTMLTableElementProtoTable 8
+ createTHead KJS::HTMLElement::TableCreateTHead DontDelete|Function 0
+ deleteTHead KJS::HTMLElement::TableDeleteTHead DontDelete|Function 0
+ createTFoot KJS::HTMLElement::TableCreateTFoot DontDelete|Function 0
+ deleteTFoot KJS::HTMLElement::TableDeleteTFoot DontDelete|Function 0
+ createCaption KJS::HTMLElement::TableCreateCaption DontDelete|Function 0
+ deleteCaption KJS::HTMLElement::TableDeleteCaption DontDelete|Function 0
+ insertRow KJS::HTMLElement::TableInsertRow DontDelete|Function 1
+ deleteRow KJS::HTMLElement::TableDeleteRow DontDelete|Function 1
+@end
+@begin HTMLTableCaptionElementTable 1
+ align KJS::HTMLElement::TableCaptionAlign DontDelete
+@end
+@begin HTMLTableColElementTable 7
+ align KJS::HTMLElement::TableColAlign DontDelete
+ ch KJS::HTMLElement::TableColCh DontDelete
+ chOff KJS::HTMLElement::TableColChOff DontDelete
+ span KJS::HTMLElement::TableColSpan DontDelete
+ vAlign KJS::HTMLElement::TableColVAlign DontDelete
+ width KJS::HTMLElement::TableColWidth DontDelete
+@end
+@begin HTMLTableSectionElementTable 7
+ align KJS::HTMLElement::TableSectionAlign DontDelete
+ ch KJS::HTMLElement::TableSectionCh DontDelete
+ chOff KJS::HTMLElement::TableSectionChOff DontDelete
+ vAlign KJS::HTMLElement::TableSectionVAlign DontDelete
+ rows KJS::HTMLElement::TableSectionRows DontDelete|ReadOnly
+@end
+@begin HTMLTableSectionElementProtoTable 2
+ insertRow KJS::HTMLElement::TableSectionInsertRow DontDelete|Function 1
+ deleteRow KJS::HTMLElement::TableSectionDeleteRow DontDelete|Function 1
+@end
+@begin HTMLTableRowElementTable 11
+ rowIndex KJS::HTMLElement::TableRowRowIndex DontDelete|ReadOnly
+ sectionRowIndex KJS::HTMLElement::TableRowSectionRowIndex DontDelete|ReadOnly
+ cells KJS::HTMLElement::TableRowCells DontDelete|ReadOnly
+ align KJS::HTMLElement::TableRowAlign DontDelete
+ bgColor KJS::HTMLElement::TableRowBgColor DontDelete
+ ch KJS::HTMLElement::TableRowCh DontDelete
+ chOff KJS::HTMLElement::TableRowChOff DontDelete
+ vAlign KJS::HTMLElement::TableRowVAlign DontDelete
+@end
+@begin HTMLTableRowElementProtoTable 2
+ insertCell KJS::HTMLElement::TableRowInsertCell DontDelete|Function 1
+ deleteCell KJS::HTMLElement::TableRowDeleteCell DontDelete|Function 1
+@end
+@begin HTMLTableCellElementTable 15
+ cellIndex KJS::HTMLElement::TableCellCellIndex DontDelete|ReadOnly
+ abbr KJS::HTMLElement::TableCellAbbr DontDelete
+ align KJS::HTMLElement::TableCellAlign DontDelete
+ axis KJS::HTMLElement::TableCellAxis DontDelete
+ bgColor KJS::HTMLElement::TableCellBgColor DontDelete
+ ch KJS::HTMLElement::TableCellCh DontDelete
+ chOff KJS::HTMLElement::TableCellChOff DontDelete
+ colSpan KJS::HTMLElement::TableCellColSpan DontDelete
+ headers KJS::HTMLElement::TableCellHeaders DontDelete
+ height KJS::HTMLElement::TableCellHeight DontDelete
+ noWrap KJS::HTMLElement::TableCellNoWrap DontDelete
+ rowSpan KJS::HTMLElement::TableCellRowSpan DontDelete
+ scope KJS::HTMLElement::TableCellScope DontDelete
+ vAlign KJS::HTMLElement::TableCellVAlign DontDelete
+ width KJS::HTMLElement::TableCellWidth DontDelete
+@end
+@begin HTMLFrameSetElementTable 2
+ cols KJS::HTMLElement::FrameSetCols DontDelete
+ rows KJS::HTMLElement::FrameSetRows DontDelete
+@end
+@begin HTMLLayerElementTable 6
+ top KJS::HTMLElement::LayerTop DontDelete
+ left KJS::HTMLElement::LayerLeft DontDelete
+ visibility KJS::HTMLElement::LayerVisibility DontDelete
+ bgColor KJS::HTMLElement::LayerBgColor DontDelete
+ document KJS::HTMLElement::LayerDocument DontDelete|ReadOnly
+ clip KJS::HTMLElement::LayerClip DontDelete|ReadOnly
+ layers KJS::HTMLElement::LayerLayers DontDelete|ReadOnly
+@end
+@begin HTMLFrameElementTable 13
+ contentDocument KJS::HTMLElement::FrameContentDocument DontDelete|ReadOnly
+ contentWindow KJS::HTMLElement::FrameContentWindow DontDelete|ReadOnly
+ frameBorder KJS::HTMLElement::FrameFrameBorder DontDelete
+ longDesc KJS::HTMLElement::FrameLongDesc DontDelete
+ marginHeight KJS::HTMLElement::FrameMarginHeight DontDelete
+ marginWidth KJS::HTMLElement::FrameMarginWidth DontDelete
+ name KJS::HTMLElement::FrameName DontDelete
+ noResize KJS::HTMLElement::FrameNoResize DontDelete
+ scrolling KJS::HTMLElement::FrameScrolling DontDelete
+ src KJS::HTMLElement::FrameSrc DontDelete
+ location KJS::HTMLElement::FrameLocation DontDelete
+# IE extension
+ width KJS::HTMLElement::FrameWidth DontDelete|ReadOnly
+ height KJS::HTMLElement::FrameHeight DontDelete|ReadOnly
+@end
+@begin HTMLIFrameElementTable 12
+ align KJS::HTMLElement::IFrameAlign DontDelete
+ contentDocument KJS::HTMLElement::IFrameContentDocument DontDelete|ReadOnly
+ contentWindow KJS::HTMLElement::IFrameContentWindow DontDelete|ReadOnly
+ frameBorder KJS::HTMLElement::IFrameFrameBorder DontDelete
+ height KJS::HTMLElement::IFrameHeight DontDelete
+ longDesc KJS::HTMLElement::IFrameLongDesc DontDelete
+ marginHeight KJS::HTMLElement::IFrameMarginHeight DontDelete
+ marginWidth KJS::HTMLElement::IFrameMarginWidth DontDelete
+ name KJS::HTMLElement::IFrameName DontDelete
+ scrolling KJS::HTMLElement::IFrameScrolling DontDelete
+ src KJS::HTMLElement::IFrameSrc DontDelete
+ width KJS::HTMLElement::IFrameWidth DontDelete
+@end
+
+@begin HTMLMarqueeElementProtoTable 2
+ start KJS::HTMLElement::MarqueeStart DontDelete|Function 0
+ stop KJS::HTMLElement::MarqueeStop DontDelete|Function 0
+@end
+
+*/
+
+static KParts::LiveConnectExtension *getLiveConnectExtension(const DOM::HTMLElement & element)
+{
+ DOM::HTMLDocument doc = element.ownerDocument();
+ KHTMLView *view = static_cast<DOM::DocumentImpl*>(doc.handle())->view();
+ if (view && element.handle())
+ return view->part()->liveConnectExtension(static_cast<tdehtml::RenderPart*>(element.handle()->renderer()));
+ return 0L;
+}
+
+Value KJS::HTMLElement::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+ DOM::HTMLElement element = static_cast<DOM::HTMLElement>(node);
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLElement::tryGet " << propertyName.qstring() << " thisTag=" << element.tagName().string() << endl;
+#endif
+ // First look at dynamic properties
+ switch (element.elementId()) {
+ case ID_FORM: {
+ DOM::HTMLFormElement form = element;
+ // Check if we're retrieving an element (by index or by name)
+ bool ok;
+ uint u = propertyName.toULong(&ok);
+
+ if (ok)
+ return getDOMNode(exec,form.elements().item(u));
+ KJS::HTMLCollection coll(exec, form.elements());
+ Value namedItems = coll.getNamedItems(exec, propertyName);
+ if (namedItems.type() != UndefinedType)
+ return namedItems;
+ }
+ break;
+ case ID_SELECT: {
+ DOM::HTMLSelectElement select = element;
+ bool ok;
+ uint u = propertyName.toULong(&ok);
+ if (ok)
+ return getDOMNode(exec,select.options().item(u)); // not specified by DOM(?) but supported in netscape/IE
+ }
+ break;
+ case ID_APPLET:
+ case ID_OBJECT:
+ case ID_EMBED: {
+ KParts::LiveConnectExtension *lc = getLiveConnectExtension(element);
+ TQString rvalue;
+ KParts::LiveConnectExtension::Type rtype;
+ unsigned long robjid;
+ if (lc && lc->get(0, propertyName.qstring(), rtype, robjid, rvalue))
+ return getLiveConnectValue(lc, propertyName.qstring(), rtype, rvalue, robjid);
+ }
+ break;
+ default:
+ break;
+ }
+
+ const HashTable* table = classInfo()->propHashTable; // get the right hashtable
+ const HashEntry* entry = table ? Lookup::findEntry(table, propertyName) : 0;
+ if (entry) {
+ if (entry->attr & Function)
+ return lookupOrCreateFunction<KJS::HTMLElementFunction>(exec, propertyName, this, entry->value, entry->params, entry->attr);
+ return getValueProperty(exec, entry->value);
+ }
+
+ // Base HTMLElement stuff or parent class forward, as usual
+ return DOMObjectLookupGet<KJS::HTMLElementFunction, KJS::HTMLElement, DOMElement>(exec, propertyName, &KJS::HTMLElementTable, this);
+}
+
+Value KJS::HTMLElement::getValueProperty(ExecState *exec, int token) const
+{
+ DOM::HTMLElement element = static_cast<DOM::HTMLElement>(node);
+ switch (element.elementId()) {
+ case ID_HTML: {
+ DOM::HTMLHtmlElement html = element;
+ if (token == HtmlVersion) return String(html.version());
+ }
+ break;
+ case ID_HEAD: {
+ DOM::HTMLHeadElement head = element;
+ if (token == HeadProfile) return String(head.profile());
+ }
+ break;
+ case ID_LINK: {
+ DOM::HTMLLinkElement link = element;
+ switch (token) {
+ case LinkDisabled: return Boolean(link.disabled());
+ case LinkCharset: return String(link.charset());
+ case LinkHref: return String(link.href());
+ case LinkHrefLang: return String(link.hreflang());
+ case LinkMedia: return String(link.media());
+ case LinkRel: return String(link.rel());
+ case LinkRev: return String(link.rev());
+ case LinkTarget: return String(link.target());
+ case LinkType: return String(link.type());
+ case LinkSheet: return getDOMStyleSheet(exec,static_cast<DOM::ProcessingInstruction>(node).sheet());
+ }
+ }
+ break;
+ case ID_TITLE: {
+ DOM::HTMLTitleElement title = element;
+ switch (token) {
+ case TitleText: return String(title.text());
+ }
+ }
+ break;
+ case ID_META: {
+ DOM::HTMLMetaElement meta = element;
+ switch (token) {
+ case MetaContent: return String(meta.content());
+ case MetaHttpEquiv: return String(meta.httpEquiv());
+ case MetaName: return String(meta.name());
+ case MetaScheme: return String(meta.scheme());
+ }
+ }
+ break;
+ case ID_BASE: {
+ DOM::HTMLBaseElement base = element;
+ switch (token) {
+ case BaseHref: return String(base.href());
+ case BaseTarget: return String(base.target());
+ }
+ }
+ break;
+ case ID_ISINDEX: {
+ DOM::HTMLIsIndexElement isindex = element;
+ switch (token) {
+ case IsIndexForm: return getDOMNode(exec,isindex.form()); // type HTMLFormElement
+ case IsIndexPrompt: return String(isindex.prompt());
+ }
+ }
+ break;
+ case ID_STYLE: {
+ DOM::HTMLStyleElement style = element;
+ switch (token) {
+ case StyleDisabled: return Boolean(style.disabled());
+ case StyleMedia: return String(style.media());
+ case StyleType: return String(style.type());
+ case StyleSheet: return getDOMStyleSheet(exec,style.sheet());
+ }
+ }
+ break;
+ case ID_BODY: {
+ DOM::HTMLBodyElement body = element;
+ switch (token) {
+ case BodyALink: return String(body.aLink());
+ case BodyBackground: return String(body.background());
+ case BodyBgColor: return String(body.bgColor());
+ case BodyLink: return String(body.link());
+ case BodyText: return String(body.text());
+ case BodyVLink: return String(body.vLink());
+ case BodyOnLoad: {
+ DOM::DocumentImpl *doc = static_cast<DOM::DocumentImpl *>(node.ownerDocument().handle());
+ if (!doc || !checkNodeSecurity(exec, node))
+ return Undefined();
+ DOMNode* kjsDocNode = new DOMNode(exec, doc);
+ // Need to create a Value wrapper to avoid leaking the KJS::DOMNode
+ Value nodeValue(kjsDocNode);
+ return kjsDocNode->getListener( DOM::EventImpl::LOAD_EVENT );
+ }
+ }
+ }
+ break;
+
+ case ID_FORM: {
+ DOM::HTMLFormElement form = element;
+ switch (token) {
+ case FormElements: return getHTMLCollection(exec,form.elements());
+ case FormLength: return Number(form.length());
+ case FormName: return String(form.name()); // NOT getString (IE gives empty string)
+ case FormAcceptCharset: return String(form.acceptCharset());
+ case FormAction: return String(form.action());
+ case FormEncType: return String(form.enctype());
+ case FormMethod: return String(form.method());
+ case FormTarget: return String(form.target());
+ }
+ }
+ break;
+ case ID_SELECT: {
+ DOM::HTMLSelectElement select = element;
+ switch (token) {
+ case SelectType: return String(select.type());
+ case SelectSelectedIndex: return Number(select.selectedIndex());
+ case SelectValue: return String(select.value());
+ case SelectLength: return Number(select.length());
+ case SelectForm: return getDOMNode(exec,select.form()); // type HTMLFormElement
+ case SelectOptions: return getSelectHTMLCollection(exec, select.options(), select); // type HTMLCollection
+ case SelectDisabled: return Boolean(select.disabled());
+ case SelectMultiple: return Boolean(select.multiple());
+ case SelectName: return String(select.name());
+ case SelectSize: return Number(select.size());
+ case SelectTabIndex: return Number(select.tabIndex());
+ }
+ }
+ break;
+ case ID_OPTGROUP: {
+ DOM::HTMLOptGroupElement optgroup = element;
+ switch (token) {
+ case OptGroupDisabled: return Boolean(optgroup.disabled());
+ case OptGroupLabel: return String(optgroup.label());
+ }
+ }
+ break;
+ case ID_OPTION: {
+ DOM::HTMLOptionElement option = element;
+ switch (token) {
+ case OptionForm: return getDOMNode(exec,option.form()); // type HTMLFormElement
+ case OptionDefaultSelected: return Boolean(option.defaultSelected());
+ case OptionText: return String(option.text());
+ case OptionIndex: return Number(option.index());
+ case OptionDisabled: return Boolean(option.disabled());
+ case OptionLabel: return String(option.label());
+ case OptionSelected: return Boolean(option.selected());
+ case OptionValue: return String(option.value());
+ }
+ }
+ break;
+ case ID_INPUT: {
+ DOM::HTMLInputElement input = element;
+ switch (token) {
+ case InputDefaultValue: return String(input.defaultValue());
+ case InputDefaultChecked: return Boolean(input.defaultChecked());
+ case InputForm: return getDOMNode(exec,input.form()); // type HTMLFormElement
+ case InputAccept: return String(input.accept());
+ case InputAccessKey: return String(input.accessKey());
+ case InputAlign: return String(input.align());
+ case InputAlt: return String(input.alt());
+ case InputChecked: return Boolean(input.checked());
+ case InputIndeterminate: return Boolean(input.indeterminate());
+ case InputDisabled: return Boolean(input.disabled());
+ case InputMaxLength: return Number(input.maxLength());
+ case InputName: return String(input.name()); // NOT getString (IE gives empty string)
+ case InputReadOnly: return Boolean(input.readOnly());
+ case InputSize: return Number(input.getSize());
+ case InputSrc: return String(input.src());
+ case InputTabIndex: return Number(input.tabIndex());
+ case InputType: return String(input.type());
+ case InputUseMap: return String(input.useMap());
+ case InputValue: return String(input.value());
+ case InputSelectionStart: {
+ long val = input.selectionStart();
+ if (val != -1)
+ return Number(val);
+ else
+ return Undefined();
+ }
+ case InputSelectionEnd: {
+ long val = input.selectionEnd();
+ if (val != -1)
+ return Number(val);
+ else
+ return Undefined();
+ }
+ }
+ }
+ break;
+ case ID_TEXTAREA: {
+ DOM::HTMLTextAreaElement textarea = element;
+ switch (token) {
+ case TextAreaDefaultValue: return String(textarea.defaultValue());
+ case TextAreaForm: return getDOMNode(exec,textarea.form()); // type HTMLFormElement
+ case TextAreaAccessKey: return String(textarea.accessKey());
+ case TextAreaCols: return Number(textarea.cols());
+ case TextAreaDisabled: return Boolean(textarea.disabled());
+ case TextAreaName: return String(textarea.name());
+ case TextAreaReadOnly: return Boolean(textarea.readOnly());
+ case TextAreaRows: return Number(textarea.rows());
+ case TextAreaTabIndex: return Number(textarea.tabIndex());
+ case TextAreaType: return String(textarea.type());
+ case TextAreaValue: return String(textarea.value());
+ case TextAreaSelectionStart: return Number(textarea.selectionStart());
+ case TextAreaSelectionEnd: return Number(textarea.selectionEnd());
+ case TextAreaTextLength: return Number(textarea.textLength());
+ }
+ }
+ break;
+ case ID_BUTTON: {
+ DOM::HTMLButtonElement button = element;
+ switch (token) {
+ case ButtonForm: return getDOMNode(exec,button.form()); // type HTMLFormElement
+ case ButtonAccessKey: return String(button.accessKey());
+ case ButtonDisabled: return Boolean(button.disabled());
+ case ButtonName: return String(button.name());
+ case ButtonTabIndex: return Number(button.tabIndex());
+ case ButtonType: return String(button.type());
+ case ButtonValue: return String(button.value());
+ }
+ }
+ break;
+ case ID_LABEL: {
+ DOM::HTMLLabelElement label = element;
+ switch (token) {
+ case LabelForm: return getDOMNode(exec,label.form()); // type HTMLFormElement
+ case LabelAccessKey: return String(label.accessKey());
+ case LabelHtmlFor: return String(label.htmlFor());
+ }
+ }
+ break;
+ case ID_FIELDSET: {
+ DOM::HTMLFieldSetElement fieldSet = element;
+ switch (token) {
+ case FieldSetForm: return getDOMNode(exec,fieldSet.form()); // type HTMLFormElement
+ }
+ }
+ break;
+ case ID_LEGEND: {
+ DOM::HTMLLegendElement legend = element;
+ switch (token) {
+ case LegendForm: return getDOMNode(exec,legend.form()); // type HTMLFormElement
+ case LegendAccessKey: return String(legend.accessKey());
+ case LegendAlign: return String(legend.align());
+ }
+ }
+ break;
+ case ID_UL: {
+ DOM::HTMLUListElement uList = element;
+ switch (token) {
+ case UListCompact: return Boolean(uList.compact());
+ case UListType: return String(uList.type());
+ }
+ }
+ break;
+ case ID_OL: {
+ DOM::HTMLOListElement oList = element;
+ switch (token) {
+ case OListCompact: return Boolean(oList.compact());
+ case OListStart: return Number(oList.start());
+ case OListType: return String(oList.type());
+ }
+ }
+ break;
+ case ID_DL: {
+ DOM::HTMLDListElement dList = element;
+ switch (token) {
+ case DListCompact: return Boolean(dList.compact());
+ }
+ }
+ break;
+ case ID_DIR: {
+ DOM::HTMLDirectoryElement directory = element;
+ switch (token) {
+ case DirectoryCompact: return Boolean(directory.compact());
+ }
+ }
+ break;
+ case ID_MENU: {
+ DOM::HTMLMenuElement menu = element;
+ switch (token) {
+ case MenuCompact: return Boolean(menu.compact());
+ }
+ }
+ break;
+ case ID_LI: {
+ DOM::HTMLLIElement li = element;
+ switch (token) {
+ case LIType: return String(li.type());
+ case LIValue: return Number(li.value());
+ }
+ }
+ break;
+ case ID_DIV: {
+ DOM::HTMLDivElement div = element;
+ switch (token) {
+ case DivAlign: return String(div.align());
+ }
+ }
+ break;
+ case ID_P: {
+ DOM::HTMLParagraphElement paragraph = element;
+ switch (token) {
+ case ParagraphAlign: return String(paragraph.align());
+ }
+ }
+ break;
+ case ID_H1:
+ case ID_H2:
+ case ID_H3:
+ case ID_H4:
+ case ID_H5:
+ case ID_H6: {
+ DOM::HTMLHeadingElement heading = element;
+ switch (token) {
+ case HeadingAlign: return String(heading.align());
+ }
+ }
+ break;
+ case ID_BLOCKQUOTE: {
+ DOM::HTMLBlockquoteElement blockquote = element;
+ switch (token) {
+ case BlockQuoteCite: return String(blockquote.cite());
+ }
+ }
+ case ID_Q: {
+ DOM::HTMLQuoteElement quote = element;
+ switch (token) {
+ case QuoteCite: return String(quote.cite());
+ }
+ }
+ case ID_PRE: {
+ DOM::HTMLPreElement pre = element;
+ switch (token) {
+ case PreWidth: return Number(pre.width());
+ }
+ }
+ break;
+ case ID_BR: {
+ DOM::HTMLBRElement br = element;
+ switch (token) {
+ case BRClear: return String(br.clear());
+ }
+ }
+ break;
+ case ID_BASEFONT: {
+ DOM::HTMLBaseFontElement baseFont = element;
+ switch (token) {
+ case BaseFontColor: return String(baseFont.color());
+ case BaseFontFace: return String(baseFont.face());
+ case BaseFontSize: return Number(baseFont.getSize());
+ }
+ }
+ break;
+ case ID_FONT: {
+ DOM::HTMLFontElement font = element;
+ switch (token) {
+ case FontColor: return String(font.color());
+ case FontFace: return String(font.face());
+ case FontSize: return String(font.size());
+ }
+ }
+ break;
+ case ID_HR: {
+ DOM::HTMLHRElement hr = element;
+ switch (token) {
+ case HRAlign: return String(hr.align());
+ case HRNoShade: return Boolean(hr.noShade());
+ case HRSize: return String(hr.size());
+ case HRWidth: return String(hr.width());
+ }
+ }
+ break;
+ case ID_INS:
+ case ID_DEL: {
+ DOM::HTMLModElement mod = element;
+ switch (token) {
+ case ModCite: return String(mod.cite());
+ case ModDateTime: return String(mod.dateTime());
+ }
+ }
+ break;
+ case ID_A: {
+ DOM::HTMLAnchorElement anchor = element;
+ switch (token) {
+ case AnchorAccessKey: return String(anchor.accessKey());
+ case AnchorCharset: return String(anchor.charset());
+ case AnchorCoords: return String(anchor.coords());
+ case AnchorHref: return String(anchor.href());
+ case AnchorHrefLang: return String(anchor.hreflang());
+ case AnchorHash: return String('#'+KURL(anchor.href().string()).ref());
+ case AnchorHost: return String(KURL(anchor.href().string()).host());
+ case AnchorHostname: {
+ KURL url(anchor.href().string());
+ kdDebug(6070) << "anchor::hostname uses:" <<url.url()<<endl;
+ if (url.port()==0)
+ return String(url.host());
+ else
+ return String(url.host() + ":" + TQString::number(url.port()));
+ }
+ case AnchorPathName: return String(KURL(anchor.href().string()).path());
+ case AnchorPort: return String(TQString::number(KURL(anchor.href().string()).port()));
+ case AnchorProtocol: return String(KURL(anchor.href().string()).protocol()+":");
+ case AnchorSearch: { KURL u(anchor.href().string());
+ TQString q = u.query();
+ if (q.length() == 1)
+ return String();
+ return String(q); }
+ case AnchorName: return String(anchor.name());
+ case AnchorRel: return String(anchor.rel());
+ case AnchorRev: return String(anchor.rev());
+ case AnchorShape: return String(anchor.shape());
+ case AnchorTabIndex: return Number(anchor.tabIndex());
+ case AnchorTarget: return String(anchor.target());
+ // Not specified in http://msdn.microsoft.com/workshop/author/dhtml/reference/objects/a.asp
+ // Mozilla returns the inner text.
+ case AnchorText: return String(anchor.innerText());
+ case AnchorType: return String(anchor.type());
+ }
+ }
+ break;
+ case ID_IMG: {
+ DOM::HTMLImageElement image = element;
+ switch (token) {
+ case ImageName: return String(image.name()); // NOT getString (IE gives empty string)
+ case ImageAlign: return String(image.align());
+ case ImageAlt: return String(image.alt());
+ case ImageBorder: return String(image.getBorder());
+ case ImageComplete: return Boolean(static_cast<DOM::HTMLImageElementImpl*>( image.handle() )->complete());
+ case ImageHeight: return Number(image.height());
+ case ImageHspace: return Number(image.hspace());
+ case ImageIsMap: return Boolean(image.isMap());
+ case ImageLongDesc: return String(image.longDesc());
+ case ImageSrc: return String(image.src());
+ case ImageUseMap: return String(image.useMap());
+ case ImageVspace: return Number(image.vspace());
+ case ImageWidth: return Number(image.width());
+ case ImageX: return Number(image.x());
+ case ImageY: return Number(image.y());
+ }
+ }
+ break;
+ case ID_OBJECT: {
+ DOM::HTMLObjectElement object = element;
+ switch (token) {
+ case ObjectForm: return getDOMNode(exec,object.form()); // type HTMLFormElement
+ case ObjectCode: return String(object.code());
+ case ObjectAlign: return String(object.align());
+ case ObjectArchive: return String(object.archive());
+ case ObjectBorder: return String(object.border());
+ case ObjectCodeBase: return String(object.codeBase());
+ case ObjectCodeType: return String(object.codeType());
+ case ObjectContentDocument: return checkNodeSecurity(exec,object.contentDocument()) ?
+ getDOMNode(exec, object.contentDocument()) : Undefined();
+ case ObjectData: return String(object.data());
+ case ObjectDeclare: return Boolean(object.declare());
+ case ObjectHeight: return String(object.height());
+ case ObjectHspace: return Number(object.getHspace());
+ case ObjectName: return String(object.name());
+ case ObjectStandby: return String(object.standby());
+ case ObjectTabIndex: return Number(object.tabIndex());
+ case ObjectType: return String(object.type());
+ case ObjectUseMap: return String(object.useMap());
+ case ObjectVspace: return Number(object.getVspace());
+ case ObjectWidth: return String(object.width());
+ }
+ }
+ break;
+ case ID_PARAM: {
+ DOM::HTMLParamElement param = element;
+ switch (token) {
+ case ParamName: return String(param.name());
+ case ParamType: return String(param.type());
+ case ParamValue: return String(param.value());
+ case ParamValueType: return String(param.valueType());
+ }
+ }
+ break;
+ case ID_APPLET: {
+ DOM::HTMLAppletElement applet = element;
+ switch (token) {
+ case AppletAlign: return String(applet.align());
+ case AppletAlt: return String(applet.alt());
+ case AppletArchive: return String(applet.archive());
+ case AppletCode: return String(applet.code());
+ case AppletCodeBase: return String(applet.codeBase());
+ case AppletHeight: return String(applet.height());
+ case AppletHspace: return Number(applet.getHspace());
+ case AppletName: return String(applet.name());
+ case AppletObject: return String(applet.object());
+ case AppletVspace: return Number(applet.getVspace());
+ case AppletWidth: return String(applet.width());
+ }
+ }
+ break;
+ case ID_MAP: {
+ DOM::HTMLMapElement map = element;
+ switch (token) {
+ case MapAreas: return getHTMLCollection(exec, map.areas()); // type HTMLCollection
+ case MapName: return String(map.name());
+ }
+ }
+ break;
+ case ID_AREA: {
+ DOM::HTMLAreaElement area = element;
+ switch (token) {
+ case AreaAccessKey: return String(area.accessKey());
+ case AreaAlt: return String(area.alt());
+ case AreaCoords: return String(area.coords());
+ // Group everything that needs href
+ case AreaHref:
+ case AreaHash:
+ case AreaHost:
+ case AreaHostName:
+ case AreaPathName:
+ case AreaPort:
+ case AreaProtocol:
+ case AreaSearch:
+ {
+ DOM::Document doc = area.ownerDocument();
+ DOM::DOMString href = area.href();
+ KURL url;
+ if ( !href.isNull() ) {
+ url = doc.completeURL( href ).string();
+ if ( href.isEmpty() )
+ url.setFileName( TQString::null ); // href="" clears the filename (in IE)
+ }
+ switch(token) {
+ case AreaHref:
+ return String(url.url());
+ case AreaHash: return String(url.isEmpty() ? "" : '#'+url.ref());
+ case AreaHost: return String(url.host());
+ case AreaHostName: {
+ if (url.port()==0)
+ return String(url.host());
+ else
+ return String(url.host() + ":" + TQString::number(url.port()));
+ }
+ case AreaPathName: {
+ return String(url.path());
+ }
+ case AreaPort: return String(TQString::number(url.port()));
+ case AreaProtocol: return String(url.isEmpty() ? "" : url.protocol()+":");
+ case AreaSearch: return String(url.query());
+ }
+ }
+ case AreaNoHref: return Boolean(area.noHref());
+ case AreaShape: return String(area.shape());
+ case AreaTabIndex: return Number(area.tabIndex());
+ case AreaTarget: return String(area.target());
+ }
+ }
+ break;
+ case ID_SCRIPT: {
+ DOM::HTMLScriptElement script = element;
+ switch (token) {
+ case ScriptText: return String(script.text());
+ case ScriptHtmlFor: return String(script.htmlFor());
+ case ScriptEvent: return String(script.event());
+ case ScriptCharset: return String(script.charset());
+ case ScriptDefer: return Boolean(script.defer());
+ case ScriptSrc: return String(script.src());
+ case ScriptType: return String(script.type());
+ }
+ }
+ break;
+ case ID_TABLE: {
+ DOM::HTMLTableElement table = element;
+ switch (token) {
+ case TableCaption: return getDOMNode(exec,table.caption()); // type HTMLTableCaptionElement
+ case TableTHead: return getDOMNode(exec,table.tHead()); // type HTMLTableSectionElement
+ case TableTFoot: return getDOMNode(exec,table.tFoot()); // type HTMLTableSectionElement
+ case TableRows: return getHTMLCollection(exec,table.rows()); // type HTMLCollection
+ case TableTBodies: return getHTMLCollection(exec,table.tBodies()); // type HTMLCollection
+ case TableAlign: return String(table.align());
+ case TableBgColor: return String(table.bgColor());
+ case TableBorder: return String(table.border());
+ case TableCellPadding: return String(table.cellPadding());
+ case TableCellSpacing: return String(table.cellSpacing());
+ case TableFrame: return String(table.frame());
+ case TableRules: return String(table.rules());
+ case TableSummary: return String(table.summary());
+ case TableWidth: return String(table.width());
+ }
+ }
+ break;
+ case ID_CAPTION: {
+ DOM::HTMLTableCaptionElement tableCaption = element;
+ switch (token) {
+ case TableCaptionAlign: return String(tableCaption.align());
+ }
+ }
+ break;
+ case ID_COL:
+ case ID_COLGROUP: {
+ DOM::HTMLTableColElement tableCol = element;
+ switch (token) {
+ case TableColAlign: return String(tableCol.align());
+ case TableColCh: return String(tableCol.ch());
+ case TableColChOff: return String(tableCol.chOff());
+ case TableColSpan: return Number(tableCol.span());
+ case TableColVAlign: return String(tableCol.vAlign());
+ case TableColWidth: return String(tableCol.width());
+ }
+ }
+ break;
+ case ID_THEAD:
+ case ID_TBODY:
+ case ID_TFOOT: {
+ DOM::HTMLTableSectionElement tableSection = element;
+ switch (token) {
+ case TableSectionAlign: return String(tableSection.align());
+ case TableSectionCh: return String(tableSection.ch());
+ case TableSectionChOff: return String(tableSection.chOff());
+ case TableSectionVAlign: return String(tableSection.vAlign());
+ case TableSectionRows: return getHTMLCollection(exec,tableSection.rows()); // type HTMLCollection
+ }
+ }
+ break;
+ case ID_TR: {
+ DOM::HTMLTableRowElement tableRow = element;
+ switch (token) {
+ case TableRowRowIndex: return Number(tableRow.rowIndex());
+ case TableRowSectionRowIndex: return Number(tableRow.sectionRowIndex());
+ case TableRowCells: return getHTMLCollection(exec,tableRow.cells()); // type HTMLCollection
+ case TableRowAlign: return String(tableRow.align());
+ case TableRowBgColor: return String(tableRow.bgColor());
+ case TableRowCh: return String(tableRow.ch());
+ case TableRowChOff: return String(tableRow.chOff());
+ case TableRowVAlign: return String(tableRow.vAlign());
+ }
+ }
+ break;
+ case ID_TH:
+ case ID_TD: {
+ DOM::HTMLTableCellElement tableCell = element;
+ switch (token) {
+ case TableCellCellIndex: return Number(tableCell.cellIndex());
+ case TableCellAbbr: return String(tableCell.abbr());
+ case TableCellAlign: return String(tableCell.align());
+ case TableCellAxis: return String(tableCell.axis());
+ case TableCellBgColor: return String(tableCell.bgColor());
+ case TableCellCh: return String(tableCell.ch());
+ case TableCellChOff: return String(tableCell.chOff());
+ case TableCellColSpan: return Number(tableCell.colSpan());
+ case TableCellHeaders: return String(tableCell.headers());
+ case TableCellHeight: return String(tableCell.height());
+ case TableCellNoWrap: return Boolean(tableCell.noWrap());
+ case TableCellRowSpan: return Number(tableCell.rowSpan());
+ case TableCellScope: return String(tableCell.scope());
+ case TableCellVAlign: return String(tableCell.vAlign());
+ case TableCellWidth: return String(tableCell.width());
+ }
+ }
+ break;
+ case ID_FRAMESET: {
+ DOM::HTMLFrameSetElement frameSet = element;
+ switch (token) {
+ case FrameSetCols: return String(frameSet.cols());
+ case FrameSetRows: return String(frameSet.rows());
+ }
+ }
+ break;
+ case ID_LAYER: {
+ DOM::HTMLLayerElement layerElement = element;
+ switch (token) {
+ case LayerTop: return Number(layerElement.top());
+ case LayerLeft: return Number(layerElement.left());
+ case LayerVisibility: return getString(layerElement.visibility());
+ case LayerBgColor: return getString(layerElement.bgColor());
+ /*case LayerClip: return getLayerClip(exec, layerElement); */
+ case LayerDocument: return Undefined();
+ case LayerLayers: return getHTMLCollection(exec,layerElement.layers());
+ }
+ }
+ break;
+ case ID_FRAME: {
+ DOM::HTMLFrameElement frameElement = element;
+ switch (token) {
+ case FrameContentDocument: return checkNodeSecurity(exec,frameElement.contentDocument()) ?
+ getDOMNode(exec, frameElement.contentDocument()) : Undefined();
+ case FrameContentWindow: {
+ KHTMLPart* part = static_cast<DOM::HTMLFrameElementImpl*>(frameElement.handle())->contentPart();
+ if (part) {
+ Window *w = Window::retrieveWindow(part);
+ if (w)
+ return Value(w);
+ }
+ return Undefined();
+ }
+ case FrameFrameBorder: return String(frameElement.frameBorder());
+ case FrameLongDesc: return String(frameElement.longDesc());
+ case FrameMarginHeight: return String(frameElement.marginHeight());
+ case FrameMarginWidth: return String(frameElement.marginWidth());
+ case FrameName: return String(frameElement.name());
+ case FrameNoResize: return Boolean(frameElement.noResize());
+ case FrameScrolling: return String(frameElement.scrolling());
+ case FrameSrc:
+ case FrameLocation: return String(frameElement.src());
+ // IE only
+ case FrameWidth:
+ case FrameHeight:
+ {
+ frameElement.handle()->getDocument()->updateLayout();
+ tdehtml::RenderObject* r = frameElement.handle()->renderer();
+ return Number( r ? (token == FrameWidth ? r->width() : r->height()) : 0 );
+ }
+ }
+ }
+ break;
+ case ID_IFRAME: {
+ DOM::HTMLIFrameElement iFrame = element;
+ switch (token) {
+ case IFrameAlign: return String(iFrame.align());
+ case IFrameContentDocument: return checkNodeSecurity(exec,iFrame.contentDocument()) ?
+ getDOMNode(exec, iFrame.contentDocument()) : Undefined();
+ case IFrameContentWindow: {
+ KHTMLPart* part = static_cast<DOM::HTMLIFrameElementImpl*>(iFrame.handle())->contentPart();
+ if (part) {
+ Window *w = Window::retrieveWindow(part);
+ if (w)
+ return Value(w);
+ }
+ return Undefined();
+ }
+ case IFrameFrameBorder: return String(iFrame.frameBorder());
+ case IFrameHeight: return String(iFrame.height());
+ case IFrameLongDesc: return String(iFrame.longDesc());
+ case IFrameMarginHeight: return String(iFrame.marginHeight());
+ case IFrameMarginWidth: return String(iFrame.marginWidth());
+ case IFrameName: return String(iFrame.name());
+ case IFrameScrolling: return String(iFrame.scrolling());
+ case IFrameSrc: return String(iFrame.src());
+ case IFrameWidth: return String(iFrame.width());
+ }
+ break;
+ }
+ } // xemacs (or arnt) could be a bit smarter when it comes to indenting switch()es ;)
+ // its not arnt to blame - its the original Stroustrup style we like :) (Dirk)
+
+ // generic properties
+ switch (token) {
+ case ElementId:
+ return String(element.id()); // String is wrong here. Other browsers return empty string if no id specified.
+ case ElementTitle:
+ return String(element.title());
+ case ElementLang:
+ return String(element.lang());
+ case ElementDir:
+ return String(element.dir());
+ case ElementClassName:
+ return String(element.className());
+ case ElementInnerHTML:
+ return String(element.innerHTML());
+ case ElementInnerText:
+ return String(element.innerText());
+ case ElementDocument:
+ return getDOMNode(exec,element.ownerDocument());
+ case ElementChildren:
+ return getHTMLCollection(exec,element.children());
+ case ElementAll:
+ // Disable element.all when we try to be Netscape-compatible
+ if ( exec->interpreter()->compatMode() == Interpreter::NetscapeCompat )
+ return Undefined();
+ else
+ if ( exec->interpreter()->compatMode() == Interpreter::IECompat )
+ return getHTMLCollection(exec,element.all());
+ else // Enabled but hidden by default
+ return getHTMLCollection(exec,element.all(), true);
+ // ### what about style? or is this used instead for DOM2 stylesheets?
+ }
+ kdError() << "HTMLElement::getValueProperty unhandled token " << token << endl;
+ return Undefined();
+}
+
+bool KJS::HTMLElement::hasProperty(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ //kdDebug(6070) << "HTMLElement::hasProperty " << propertyName.qstring() << endl;
+#endif
+ DOM::HTMLElement element = static_cast<DOM::HTMLElement>(node);
+ // First look at dynamic properties - keep this in sync with tryGet
+ switch (element.elementId()) {
+ case ID_FORM: {
+ DOM::HTMLFormElement form = element;
+ // Check if we're retrieving an element (by index or by name)
+ bool ok;
+ uint u = propertyName.toULong(&ok);
+ if (ok && !(form.elements().item(u).isNull()))
+ return true;
+ DOM::Node testnode = form.elements().namedItem(propertyName.string());
+ if (!testnode.isNull())
+ return true;
+ }
+ case ID_SELECT: {
+ DOM::HTMLSelectElement select = element;
+ bool ok;
+ uint u = propertyName.toULong(&ok);
+ if (ok && !(select.options().item(u).isNull()))
+ return true;
+ }
+ default:
+ break;
+ }
+
+ return DOMElement::hasProperty(exec, propertyName);
+}
+
+UString KJS::HTMLElement::toString(ExecState *exec) const
+{
+ if (node.elementId() == ID_A)
+ return UString(static_cast<const DOM::HTMLAnchorElement&>(node).href());
+ else if (node.elementId() == ID_APPLET) {
+ KParts::LiveConnectExtension *lc = getLiveConnectExtension(node);
+ TQStringList qargs;
+ TQString retvalue;
+ KParts::LiveConnectExtension::Type rettype;
+ unsigned long retobjid;
+ if (lc && lc->call(0, "hashCode", qargs, rettype, retobjid, retvalue)) {
+ TQString str("[object APPLET ref=");
+ return UString(str + retvalue + TQString("]"));
+ }
+ } else if (node.elementId() == ID_IMG) {
+ DOM::HTMLImageElement image(node);
+ if (!image.alt().isEmpty())
+ return UString(image.alt()) + " " + DOMElement::toString(exec);
+ }
+ return DOMElement::toString(exec);
+}
+
+static void getForm(DOM::HTMLFormElement* form, const DOM::HTMLElement& element)
+{
+ switch (element.elementId()) {
+ case ID_ISINDEX: {
+ DOM::HTMLIsIndexElement isindex = element;
+ *form = isindex.form();
+ break;
+ }
+ case ID_SELECT: {
+ DOM::HTMLSelectElement select = element;
+ *form = select.form();
+ break;
+ }
+ case ID_OPTION: {
+ DOM::HTMLOptionElement option = element;
+ *form = option.form();
+ break;
+ }
+ case ID_INPUT: {
+ DOM::HTMLInputElement input = element;
+ *form = input.form();
+ break;
+ }
+ case ID_TEXTAREA: {
+ DOM::HTMLTextAreaElement textarea = element;
+ *form = textarea.form();
+ break;
+ }
+ case ID_LABEL: {
+ DOM::HTMLLabelElement label = element;
+ *form = label.form();
+ break;
+ }
+ case ID_FIELDSET: {
+ DOM::HTMLFieldSetElement fieldset = element;
+ *form = fieldset.form();
+ break;
+ }
+ case ID_LEGEND: {
+ DOM::HTMLLegendElement legend = element;
+ *form = legend.form();
+ break;
+ }
+ case ID_OBJECT: {
+ DOM::HTMLObjectElement object = element;
+ *form = object.form();
+ break;
+ }
+ default:
+ break;
+ }
+}
+
+void KJS::HTMLElement::pushEventHandlerScope(ExecState *exec, ScopeChain &scope) const
+{
+ DOM::HTMLElement element = static_cast<DOM::HTMLElement>(node);
+
+ // The document is put on first, fall back to searching it only after the element and form.
+ scope.push(static_cast<ObjectImp *>(getDOMNode(exec, element.ownerDocument()).imp()));
+
+ // The form is next, searched before the document, but after the element itself.
+ DOM::HTMLFormElement formElt;
+
+ // First try to obtain the form from the element itself. We do this to deal with
+ // the malformed case where <form>s aren't in our parent chain (e.g., when they were inside
+ // <table> or <tbody>.
+ getForm(&formElt, element);
+ if (!formElt.isNull())
+ scope.push(static_cast<ObjectImp *>(getDOMNode(exec, formElt).imp()));
+ else {
+ DOM::Node form = element.parentNode();
+ while (!form.isNull() && form.elementId() != ID_FORM)
+ form = form.parentNode();
+
+ if (!form.isNull())
+ scope.push(static_cast<ObjectImp *>(getDOMNode(exec, form).imp()));
+ }
+
+ // The element is on top, searched first.
+ scope.push(static_cast<ObjectImp *>(getDOMNode(exec, element).imp()));
+}
+
+HTMLElementFunction::HTMLElementFunction(ExecState *exec, int i, int len)
+ : DOMFunction(exec), id(i)
+{
+ Value protect(this);
+ put(exec,lengthPropertyName,Number(len),DontDelete|ReadOnly|DontEnum);
+}
+
+Value KJS::HTMLElementFunction::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( HTMLElement, thisObj );
+
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLElementFunction::tryCall " << endl;
+#endif
+ DOM::HTMLElement element = static_cast<KJS::HTMLElement *>(thisObj.imp())->toElement();
+
+ switch (element.elementId()) {
+ case ID_FORM: {
+ DOM::HTMLFormElement form = element;
+ if (id == KJS::HTMLElement::FormSubmit) {
+
+
+ DOM::HTMLDocument doc = element.ownerDocument();
+ KHTMLView *view = static_cast<DOM::DocumentImpl*>(doc.handle())->view();
+ KHTMLSettings::KJSWindowOpenPolicy policy = KHTMLSettings::KJSWindowOpenAllow;
+ if (view)
+ policy = view->part()->settings()->windowOpenPolicy(view->part()->url().host());
+
+ bool block = false;
+
+ if ( policy != KHTMLSettings::KJSWindowOpenAllow ) {
+ block = true;
+
+ // if this is a form without a target, or a special target, don't block
+ TQString trg = form.target().lower().string();
+ if( trg.isEmpty() || trg == "_top" || trg == "_self" ||
+ trg == "_parent")
+ block = false;
+
+ TQString caption;
+
+ // if there is a frame with the target name, don't block
+ if ( view && view->part() ) {
+ if (!view->part()->url().host().isEmpty())
+ caption = view->part()->url().host() + " - ";
+ // search all (possibly nested) framesets
+ KHTMLPart *currentPart = view->part()->parentPart();
+ while( currentPart != 0L ) {
+ if( currentPart->frameExists( form.target().string() ) )
+ block = false;
+ currentPart = currentPart->parentPart();
+ }
+ }
+
+ if ( block && policy == KHTMLSettings::KJSWindowOpenAsk && view ) {
+ if (view && view->part())
+ emit view->part()->browserExtension()->requestFocus(view->part());
+ caption += i18n( "Confirmation: JavaScript Popup" );
+ if ( KMessageBox::questionYesNo(view, form.action().isEmpty() ?
+ i18n( "This site is submitting a form which will open up a new browser "
+ "window via JavaScript.\n"
+ "Do you want to allow the form to be submitted?" ) :
+ i18n( "<qt>This site is submitting a form which will open <p>%1</p> in a new browser window via JavaScript.<br />"
+ "Do you want to allow the form to be submitted?</qt>").arg(KStringHandler::csqueeze(form.action().string(), 100)),
+ caption, i18n("Allow"), i18n("Do Not Allow") ) == KMessageBox::Yes )
+ block = false;
+
+ } else if ( block && policy == KHTMLSettings::KJSWindowOpenSmart ) {
+ if( static_cast<KJS::ScriptInterpreter *>(exec->interpreter())->isWindowOpenAllowed() ) {
+ // This submission has been triggered by the user
+ block = false;
+ }
+ }
+ }
+
+ if( !block )
+ form.submit();
+
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::FormReset) {
+ form.reset();
+ return Undefined();
+ }
+ }
+ break;
+ case ID_BODY: {
+ if (id == KJS::HTMLElement::BodyFocus) {
+ // Just blur everything. Not perfect, but good enough for now
+ if (DOM::NodeImpl* impl = element.handle()) {
+ impl->getDocument()->setFocusNode(0);
+ }
+ }
+ }
+ break;
+ case ID_SELECT: {
+ DOM::HTMLSelectElement select = element;
+ if (id == KJS::HTMLElement::SelectAdd) {
+ select.add(KJS::toNode(args[0]),KJS::toNode(args[1]));
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::SelectRemove) {
+ select.remove(int(args[0].toNumber(exec)));
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::SelectBlur) {
+ select.blur();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::SelectFocus) {
+ select.focus();
+ return Undefined();
+ }
+ }
+ break;
+ case ID_INPUT: {
+ DOM::HTMLInputElement input = element;
+ if (id == KJS::HTMLElement::InputBlur) {
+ input.blur();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::InputFocus) {
+ input.focus();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::InputSelect) {
+ input.select();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::InputClick) {
+ input.click();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::InputSetSelectionRange) {
+ input.setSelectionRange(args[0].toNumber(exec), args[1].toNumber(exec));
+ return Undefined();
+ }
+ }
+ break;
+ case ID_BUTTON: {
+ DOM::HTMLButtonElement button = element;
+ if (id == KJS::HTMLElement::ButtonBlur) {
+ button.blur();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::ButtonFocus) {
+ button.focus();
+ return Undefined();
+ }
+ }
+ break;
+ case ID_TEXTAREA: {
+ DOM::HTMLTextAreaElement textarea = element;
+ if (id == KJS::HTMLElement::TextAreaBlur) {
+ textarea.blur();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::TextAreaFocus) {
+ textarea.focus();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::TextAreaSelect) {
+ textarea.select();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::TextAreaSetSelectionRange) {
+ textarea.setSelectionRange(args[0].toNumber(exec), args[1].toNumber(exec));
+ return Undefined();
+ }
+
+ }
+ break;
+ case ID_A: {
+ DOM::HTMLAnchorElement anchor = element;
+ if (id == KJS::HTMLElement::AnchorBlur) {
+ anchor.blur();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::AnchorFocus) {
+ anchor.focus();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::AnchorClick) {
+ static_cast<DOM::HTMLAnchorElementImpl*>(anchor.handle())->click();
+ return Undefined();
+ }
+ }
+ break;
+ case ID_TABLE: {
+ DOM::HTMLTableElement table = element;
+ if (id == KJS::HTMLElement::TableCreateTHead)
+ return getDOMNode(exec,table.createTHead());
+ else if (id == KJS::HTMLElement::TableDeleteTHead) {
+ table.deleteTHead();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::TableCreateTFoot)
+ return getDOMNode(exec,table.createTFoot());
+ else if (id == KJS::HTMLElement::TableDeleteTFoot) {
+ table.deleteTFoot();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::TableCreateCaption)
+ return getDOMNode(exec,table.createCaption());
+ else if (id == KJS::HTMLElement::TableDeleteCaption) {
+ table.deleteCaption();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::TableInsertRow)
+ return getDOMNode(exec,table.insertRow(args[0].toInteger(exec)));
+ else if (id == KJS::HTMLElement::TableDeleteRow) {
+ table.deleteRow(args[0].toInteger(exec));
+ return Undefined();
+ }
+ }
+ break;
+ case ID_THEAD:
+ case ID_TBODY:
+ case ID_TFOOT: {
+ DOM::HTMLTableSectionElement tableSection = element;
+ if (id == KJS::HTMLElement::TableSectionInsertRow)
+ return getDOMNode(exec,tableSection.insertRow(args[0].toInteger(exec)));
+ else if (id == KJS::HTMLElement::TableSectionDeleteRow) {
+ tableSection.deleteRow(args[0].toInteger(exec));
+ return Undefined();
+ }
+ }
+ break;
+ case ID_TR: {
+ DOM::HTMLTableRowElement tableRow = element;
+ if (id == KJS::HTMLElement::TableRowInsertCell)
+ return getDOMNode(exec,tableRow.insertCell(args[0].toInteger(exec)));
+ else if (id == KJS::HTMLElement::TableRowDeleteCell) {
+ tableRow.deleteCell(args[0].toInteger(exec));
+ return Undefined();
+ }
+ break;
+ }
+ case ID_MARQUEE: {
+ if (id == KJS::HTMLElement::MarqueeStart && element.handle()->renderer() &&
+ element.handle()->renderer()->layer() &&
+ element.handle()->renderer()->layer()->marquee()) {
+ element.handle()->renderer()->layer()->marquee()->start();
+ return Undefined();
+ }
+ else if (id == KJS::HTMLElement::MarqueeStop && element.handle()->renderer() &&
+ element.handle()->renderer()->layer() &&
+ element.handle()->renderer()->layer()->marquee()) {
+ element.handle()->renderer()->layer()->marquee()->stop();
+ return Undefined();
+ }
+ break;
+ }
+ }
+
+ if (id == HTMLElement::ElementScrollIntoView) {
+ bool alignToTop = true;
+ if (args.size() > 0)
+ alignToTop = args[0].toBoolean(exec);
+ static_cast<HTMLElementImpl*>(element.handle())->scrollIntoView(alignToTop);
+ return Undefined();
+ }
+
+ return Undefined();
+}
+
+void KJS::HTMLElement::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+#ifdef KJS_VERBOSE
+ DOM::DOMString str = value.isA(NullType) ? DOM::DOMString() : value.toString(exec).string();
+#endif
+ DOM::HTMLElement element = static_cast<DOM::HTMLElement>(node);
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLElement::tryPut " << propertyName.qstring()
+ << " thisTag=" << element.tagName().string()
+ << " str=" << str.string() << endl;
+#endif
+ // First look at dynamic properties
+ switch (element.elementId()) {
+ case ID_SELECT: {
+ DOM::HTMLSelectElement select = element;
+ bool ok;
+ /*uint u =*/ propertyName.toULong(&ok);
+ if (ok) {
+ Object coll = Object::dynamicCast( getSelectHTMLCollection(exec, select.options(), select) );
+ if ( coll.isValid() )
+ coll.put(exec,propertyName,value);
+ return;
+ }
+ break;
+ }
+ case ID_APPLET:
+ case ID_OBJECT:
+ case ID_EMBED: {
+ KParts::LiveConnectExtension *lc = getLiveConnectExtension(element);
+ if (lc && lc->put(0, propertyName.qstring(), value.toString(exec).qstring()))
+ return;
+ break;
+ }
+ default:
+ break;
+ }
+
+ const HashTable* table = classInfo()->propHashTable; // get the right hashtable
+ const HashEntry* entry = table ? Lookup::findEntry(table, propertyName) : 0;
+ if (entry) {
+ if (entry->attr & Function) // function: put as override property
+ {
+ ObjectImp::put(exec, propertyName, value, attr);
+ return;
+ }
+ else if ((entry->attr & ReadOnly) == 0) // let DOMObjectLookupPut print the warning if not
+ {
+ putValueProperty(exec, entry->value, value, attr);
+ return;
+ }
+ }
+ DOMObjectLookupPut<KJS::HTMLElement, DOMElement>(exec, propertyName, value, attr, &KJS::HTMLElementTable, this);
+}
+
+void KJS::HTMLElement::putValueProperty(ExecState *exec, int token, const Value& value, int)
+{
+ DOM::DOMString str = value.isA(NullType) ? DOM::DOMString() : value.toString(exec).string();
+ DOMNode *kjsNode = new DOMNode(exec, KJS::toNode(value));
+ // Need to create a Value wrapper to avoid leaking the KJS::DOMNode
+ Value nodeValue(kjsNode);
+ DOM::Node n = kjsNode->toNode();
+ DOM::HTMLElement element = static_cast<DOM::HTMLElement>(node);
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLElement::putValueProperty "
+ << " thisTag=" << element.tagName().string()
+ << " token=" << token << endl;
+#endif
+
+ switch (element.elementId()) {
+ case ID_HTML: {
+ DOM::HTMLHtmlElement html = element;
+ switch (token) {
+ case HtmlVersion: { html.setVersion(str); return; }
+ }
+ }
+ break;
+ case ID_HEAD: {
+ DOM::HTMLHeadElement head = element;
+ switch (token) {
+ case HeadProfile: { head.setProfile(str); return; }
+ }
+ }
+ break;
+ case ID_LINK: {
+ DOM::HTMLLinkElement link = element;
+ switch (token) {
+ case LinkDisabled: { link.setDisabled(value.toBoolean(exec)); return; }
+ case LinkCharset: { link.setCharset(str); return; }
+ case LinkHref: { link.setHref(str); return; }
+ case LinkHrefLang: { link.setHreflang(str); return; }
+ case LinkMedia: { link.setMedia(str); return; }
+ case LinkRel: { link.setRel(str); return; }
+ case LinkRev: { link.setRev(str); return; }
+ case LinkTarget: { link.setTarget(str); return; }
+ case LinkType: { link.setType(str); return; }
+ }
+ }
+ break;
+ case ID_TITLE: {
+ DOM::HTMLTitleElement title = element;
+ switch (token) {
+ case TitleText: { title.setText(str); return; }
+ }
+ }
+ break;
+ case ID_META: {
+ DOM::HTMLMetaElement meta = element;
+ switch (token) {
+ case MetaContent: { meta.setContent(str); return; }
+ case MetaHttpEquiv: { meta.setHttpEquiv(str); return; }
+ case MetaName: { meta.setName(str); return; }
+ case MetaScheme: { meta.setScheme(str); return; }
+ }
+ }
+ break;
+ case ID_BASE: {
+ DOM::HTMLBaseElement base = element;
+ switch (token) {
+ case BaseHref: { base.setHref(str); return; }
+ case BaseTarget: { base.setTarget(str); return; }
+ }
+ }
+ break;
+ case ID_ISINDEX: {
+ DOM::HTMLIsIndexElement isindex = element;
+ switch (token) {
+ // read-only: form
+ case IsIndexPrompt: { isindex.setPrompt(str); return; }
+ }
+ }
+ break;
+ case ID_STYLE: {
+ DOM::HTMLStyleElement style = element;
+ switch (token) {
+ case StyleDisabled: { style.setDisabled(value.toBoolean(exec)); return; }
+ case StyleMedia: { style.setMedia(str); return; }
+ case StyleType: { style.setType(str); return; }
+ }
+ }
+ break;
+ case ID_BODY: {
+ DOM::HTMLBodyElement body = element;
+ switch (token) {
+ case BodyALink: { body.setALink(str); return; }
+ case BodyBackground: { body.setBackground(str); return; }
+ case BodyBgColor: { body.setBgColor(str); return; }
+ case BodyLink: { body.setLink(str); return; }
+ case BodyText: { body.setText(str); return; }
+ case BodyVLink: { body.setVLink(str); return; }
+ case BodyOnLoad:
+ DOM::DocumentImpl *doc = static_cast<DOM::DocumentImpl *>(node.ownerDocument().handle());
+ if (doc && checkNodeSecurity(exec, node))
+ {
+ DOMNode* kjsDocNode = new DOMNode(exec, doc);
+ // Need to create a Value wrapper to avoid leaking the KJS::DOMNode
+ Value nodeValue(kjsDocNode);
+ kjsDocNode->setListener(exec,DOM::EventImpl::LOAD_EVENT,value);
+ }
+ return;
+ }
+ }
+ break;
+ case ID_FORM: {
+ DOM::HTMLFormElement form = element;
+ switch (token) {
+ // read-only: elements
+ // read-only: length
+ case FormName: { form.setName(str); return; }
+ case FormAcceptCharset: { form.setAcceptCharset(str); return; }
+ case FormAction: { form.setAction(str.string()); return; }
+ case FormEncType: { form.setEnctype(str); return; }
+ case FormMethod: { form.setMethod(str); return; }
+ case FormTarget: { form.setTarget(str); return; }
+ }
+ }
+ break;
+ case ID_SELECT: {
+ DOM::HTMLSelectElement select = element;
+ switch (token) {
+ // read-only: type
+ case SelectSelectedIndex: { select.setSelectedIndex(value.toInteger(exec)); return; }
+ case SelectValue: { select.setValue(str); return; }
+ case SelectLength: { // read-only according to the NS spec, but webpages need it writeable
+ Object coll = Object::dynamicCast( getSelectHTMLCollection(exec, select.options(), select) );
+ if ( coll.isValid() )
+ coll.put(exec,"length",value);
+ return;
+ }
+ // read-only: form
+ // read-only: options
+ case SelectDisabled: { select.setDisabled(value.toBoolean(exec)); return; }
+ case SelectMultiple: { select.setMultiple(value.toBoolean(exec)); return; }
+ case SelectName: { select.setName(str); return; }
+ case SelectSize: { select.setSize(value.toInteger(exec)); return; }
+ case SelectTabIndex: { select.setTabIndex(value.toInteger(exec)); return; }
+ }
+ }
+ break;
+ case ID_OPTGROUP: {
+ DOM::HTMLOptGroupElement optgroup = element;
+ switch (token) {
+ case OptGroupDisabled: { optgroup.setDisabled(value.toBoolean(exec)); return; }
+ case OptGroupLabel: { optgroup.setLabel(str); return; }
+ }
+ }
+ break;
+ case ID_OPTION: {
+ DOM::HTMLOptionElement option = element;
+ switch (token) {
+ // read-only: form
+ case OptionDefaultSelected: { option.setDefaultSelected(value.toBoolean(exec)); return; }
+ // read-only: text <--- According to the DOM, but JavaScript and JScript both allow changes.
+ // So, we'll do it here and not add it to our DOM headers.
+ case OptionText: { DOM::NodeList nl(option.childNodes());
+ for (unsigned int i = 0; i < nl.length(); i++) {
+ if (nl.item(i).nodeType() == DOM::Node::TEXT_NODE) {
+ static_cast<DOM::Text>(nl.item(i)).setData(str);
+ return;
+ }
+ }
+ // No child text node found, creating one
+ DOM::Text t = option.ownerDocument().createTextNode(str);
+ try { option.appendChild(t); }
+ catch(DOM::DOMException& e) {
+ // #### exec->setException ?
+ }
+
+ return;
+ }
+ // read-only: index
+ case OptionDisabled: { option.setDisabled(value.toBoolean(exec)); return; }
+ case OptionLabel: { option.setLabel(str); return; }
+ case OptionSelected: { option.setSelected(value.toBoolean(exec)); return; }
+ case OptionValue: { option.setValue(str); return; }
+ }
+ }
+ break;
+ case ID_INPUT: {
+ DOM::HTMLInputElement input = element;
+ switch (token) {
+ case InputDefaultValue: { input.setDefaultValue(str); return; }
+ case InputDefaultChecked: { input.setDefaultChecked(value.toBoolean(exec)); return; }
+ // read-only: form
+ case InputAccept: { input.setAccept(str); return; }
+ case InputAccessKey: { input.setAccessKey(str); return; }
+ case InputAlign: { input.setAlign(str); return; }
+ case InputAlt: { input.setAlt(str); return; }
+ case InputChecked: { input.setChecked(value.toBoolean(exec)); return; }
+ case InputIndeterminate: { input.setIndeterminate(value.toBoolean(exec)); return; }
+ case InputDisabled: { input.setDisabled(value.toBoolean(exec)); return; }
+ case InputMaxLength: { input.setMaxLength(value.toInteger(exec)); return; }
+ case InputName: { input.setName(str); return; }
+ case InputReadOnly: { input.setReadOnly(value.toBoolean(exec)); return; }
+ case InputSize: { input.setSize(value.toInteger(exec)); return; }
+ case InputSrc: { input.setSrc(str); return; }
+ case InputTabIndex: { input.setTabIndex(value.toInteger(exec)); return; }
+ case InputType: { input.setType(str); return; }
+ case InputUseMap: { input.setUseMap(str); return; }
+ case InputValue: { input.setValue(str); return; }
+ case InputSelectionStart: { input.setSelectionStart(value.toInteger(exec)); return; }
+ case InputSelectionEnd: { input.setSelectionEnd (value.toInteger(exec)); return; }
+ }
+ }
+ break;
+ case ID_TEXTAREA: {
+ DOM::HTMLTextAreaElement textarea = element;
+ switch (token) {
+ case TextAreaDefaultValue: { textarea.setDefaultValue(str); return; }
+ // read-only: form
+ case TextAreaAccessKey: { textarea.setAccessKey(str); return; }
+ case TextAreaCols: { textarea.setCols(value.toInteger(exec)); return; }
+ case TextAreaDisabled: { textarea.setDisabled(value.toBoolean(exec)); return; }
+ case TextAreaName: { textarea.setName(str); return; }
+ case TextAreaReadOnly: { textarea.setReadOnly(value.toBoolean(exec)); return; }
+ case TextAreaRows: { textarea.setRows(value.toInteger(exec)); return; }
+ case TextAreaTabIndex: { textarea.setTabIndex(value.toInteger(exec)); return; }
+ // read-only: type
+ case TextAreaValue: { textarea.setValue(str); return; }
+ case TextAreaSelectionStart: { textarea.setSelectionStart(value.toInteger(exec)); return; }
+ case TextAreaSelectionEnd: { textarea.setSelectionEnd (value.toInteger(exec)); return; }
+ }
+ }
+ break;
+ case ID_BUTTON: {
+ DOM::HTMLButtonElement button = element;
+ switch (token) {
+ // read-only: form
+ case ButtonAccessKey: { button.setAccessKey(str); return; }
+ case ButtonDisabled: { button.setDisabled(value.toBoolean(exec)); return; }
+ case ButtonName: { button.setName(str); return; }
+ case ButtonTabIndex: { button.setTabIndex(value.toInteger(exec)); return; }
+ // read-only: type
+ case ButtonValue: { button.setValue(str); return; }
+ }
+ }
+ break;
+ case ID_LABEL: {
+ DOM::HTMLLabelElement label = element;
+ switch (token) {
+ // read-only: form
+ case LabelAccessKey: { label.setAccessKey(str); return; }
+ case LabelHtmlFor: { label.setHtmlFor(str); return; }
+ }
+ }
+ break;
+// case ID_FIELDSET: {
+// DOM::HTMLFieldSetElement fieldSet = element;
+// // read-only: form
+// }
+// break;
+ case ID_LEGEND: {
+ DOM::HTMLLegendElement legend = element;
+ switch (token) {
+ // read-only: form
+ case LegendAccessKey: { legend.setAccessKey(str); return; }
+ case LegendAlign: { legend.setAlign(str); return; }
+ }
+ }
+ break;
+ case ID_UL: {
+ DOM::HTMLUListElement uList = element;
+ switch (token) {
+ case UListCompact: { uList.setCompact(value.toBoolean(exec)); return; }
+ case UListType: { uList.setType(str); return; }
+ }
+ }
+ break;
+ case ID_OL: {
+ DOM::HTMLOListElement oList = element;
+ switch (token) {
+ case OListCompact: { oList.setCompact(value.toBoolean(exec)); return; }
+ case OListStart: { oList.setStart(value.toInteger(exec)); return; }
+ case OListType: { oList.setType(str); return; }
+ }
+ }
+ break;
+ case ID_DL: {
+ DOM::HTMLDListElement dList = element;
+ switch (token) {
+ case DListCompact: { dList.setCompact(value.toBoolean(exec)); return; }
+ }
+ }
+ break;
+ case ID_DIR: {
+ DOM::HTMLDirectoryElement directory = element;
+ switch (token) {
+ case DirectoryCompact: { directory.setCompact(value.toBoolean(exec)); return; }
+ }
+ }
+ break;
+ case ID_MENU: {
+ DOM::HTMLMenuElement menu = element;
+ switch (token) {
+ case MenuCompact: { menu.setCompact(value.toBoolean(exec)); return; }
+ }
+ }
+ break;
+ case ID_LI: {
+ DOM::HTMLLIElement li = element;
+ switch (token) {
+ case LIType: { li.setType(str); return; }
+ case LIValue: { li.setValue(value.toInteger(exec)); return; }
+ }
+ }
+ break;
+ case ID_DIV: {
+ DOM::HTMLDivElement div = element;
+ switch (token) {
+ case DivAlign: { div.setAlign(str); return; }
+ }
+ }
+ break;
+ case ID_P: {
+ DOM::HTMLParagraphElement paragraph = element;
+ switch (token) {
+ case ParagraphAlign: { paragraph.setAlign(str); return; }
+ }
+ }
+ break;
+ case ID_H1:
+ case ID_H2:
+ case ID_H3:
+ case ID_H4:
+ case ID_H5:
+ case ID_H6: {
+ DOM::HTMLHeadingElement heading = element;
+ switch (token) {
+ case HeadingAlign: { heading.setAlign(str); return; }
+ }
+ }
+ break;
+ case ID_BLOCKQUOTE: {
+ DOM::HTMLBlockquoteElement blockquote = element;
+ switch (token) {
+ case BlockQuoteCite: { blockquote.setCite(str); return; }
+ }
+ }
+ break;
+ case ID_Q: {
+ DOM::HTMLQuoteElement quote = element;
+ switch (token) {
+ case QuoteCite: { quote.setCite(str); return; }
+ }
+ }
+ break;
+ case ID_PRE: {
+ DOM::HTMLPreElement pre = element;
+ switch (token) {
+ case PreWidth: { pre.setWidth(value.toInteger(exec)); return; }
+ }
+ }
+ break;
+ case ID_BR: {
+ DOM::HTMLBRElement br = element;
+ switch (token) {
+ case BRClear: { br.setClear(str); return; }
+ }
+ }
+ break;
+ case ID_BASEFONT: {
+ DOM::HTMLBaseFontElement baseFont = element;
+ switch (token) {
+ case BaseFontColor: { baseFont.setColor(str); return; }
+ case BaseFontFace: { baseFont.setFace(str); return; }
+ case BaseFontSize: { baseFont.setSize(value.toInteger(exec)); return; }
+ }
+ }
+ break;
+ case ID_FONT: {
+ DOM::HTMLFontElement font = element;
+ switch (token) {
+ case FontColor: { font.setColor(str); return; }
+ case FontFace: { font.setFace(str); return; }
+ case FontSize: { font.setSize(str); return; }
+ }
+ }
+ break;
+ case ID_HR: {
+ DOM::HTMLHRElement hr = element;
+ switch (token) {
+ case HRAlign: { hr.setAlign(str); return; }
+ case HRNoShade: { hr.setNoShade(value.toBoolean(exec)); return; }
+ case HRSize: { hr.setSize(str); return; }
+ case HRWidth: { hr.setWidth(str); return; }
+ }
+ }
+ break;
+ case ID_INS:
+ case ID_DEL: {
+ DOM::HTMLModElement mod = element;
+ switch (token) {
+ case ModCite: { mod.setCite(str); return; }
+ case ModDateTime: { mod.setDateTime(str); return; }
+ }
+ }
+ break;
+ case ID_A: {
+ DOM::HTMLAnchorElement anchor = element;
+ switch (token) {
+ case AnchorAccessKey: { anchor.setAccessKey(str); return; }
+ case AnchorCharset: { anchor.setCharset(str); return; }
+ case AnchorCoords: { anchor.setCoords(str); return; }
+ case AnchorHref: { anchor.setHref(str); return; }
+ case AnchorHrefLang: { anchor.setHreflang(str); return; }
+ case AnchorSearch: { KURL href(anchor.href().string());
+ TQString q = str.isEmpty() ? TQString() : str.string();
+ href.setQuery(q);
+ anchor.setHref(href.url()); return; }
+ case AnchorName: { anchor.setName(str); return; }
+ case AnchorRel: { anchor.setRel(str); return; }
+ case AnchorRev: { anchor.setRev(str); return; }
+ case AnchorShape: { anchor.setShape(str); return; }
+ case AnchorTabIndex: { anchor.setTabIndex(value.toInteger(exec)); return; }
+ case AnchorTarget: { anchor.setTarget(str); return; }
+ case AnchorType: { anchor.setType(str); return; }
+ }
+ }
+ break;
+ case ID_IMG: {
+ DOM::HTMLImageElement image = element;
+ switch (token) {
+ case ImageName: { image.setName(str); return; }
+ case ImageAlign: { image.setAlign(str); return; }
+ case ImageAlt: { image.setAlt(str); return; }
+ case ImageBorder: { image.setBorder(str); return; }
+ case ImageHeight: { image.setHeight(value.toInteger(exec)); return; }
+ case ImageHspace: { image.setHspace(value.toInteger(exec)); return; }
+ case ImageIsMap: { image.setIsMap(value.toBoolean(exec)); return; }
+ case ImageLongDesc: { image.setLongDesc(str); return; }
+ case ImageSrc: { image.setSrc(str); return; }
+ case ImageUseMap: { image.setUseMap(str); return; }
+ case ImageVspace: { image.setVspace(value.toInteger(exec)); return; }
+ case ImageWidth: { image.setWidth(value.toInteger(exec)); return; }
+ }
+ }
+ break;
+ case ID_OBJECT: {
+ DOM::HTMLObjectElement object = element;
+ switch (token) {
+ // read-only: form
+ case ObjectCode: { object.setCode(str); return; }
+ case ObjectAlign: { object.setAlign(str); return; }
+ case ObjectArchive: { object.setArchive(str); return; }
+ case ObjectBorder: { object.setBorder(str); return; }
+ case ObjectCodeBase: { object.setCodeBase(str); return; }
+ case ObjectCodeType: { object.setCodeType(str); return; }
+ // read-only: ObjectContentDocument
+ case ObjectData: { object.setData(str); return; }
+ case ObjectDeclare: { object.setDeclare(value.toBoolean(exec)); return; }
+ case ObjectHeight: { object.setHeight(str); return; }
+ case ObjectHspace: { object.setHspace(value.toInteger(exec)); return; }
+ case ObjectName: { object.setName(str); return; }
+ case ObjectStandby: { object.setStandby(str); return; }
+ case ObjectTabIndex: { object.setTabIndex(value.toInteger(exec)); return; }
+ case ObjectType: { object.setType(str); return; }
+ case ObjectUseMap: { object.setUseMap(str); return; }
+ case ObjectVspace: { object.setVspace(value.toInteger(exec)); return; }
+ case ObjectWidth: { object.setWidth(str); return; }
+ }
+ }
+ break;
+ case ID_PARAM: {
+ DOM::HTMLParamElement param = element;
+ switch (token) {
+ case ParamName: { param.setName(str); return; }
+ case ParamType: { param.setType(str); return; }
+ case ParamValue: { param.setValue(str); return; }
+ case ParamValueType: { param.setValueType(str); return; }
+ }
+ }
+ break;
+ case ID_APPLET: {
+ DOM::HTMLAppletElement applet = element;
+ switch (token) {
+ case AppletAlign: { applet.setAlign(str); return; }
+ case AppletAlt: { applet.setAlt(str); return; }
+ case AppletArchive: { applet.setArchive(str); return; }
+ case AppletCode: { applet.setCode(str); return; }
+ case AppletCodeBase: { applet.setCodeBase(str); return; }
+ case AppletHeight: { applet.setHeight(str); return; }
+ case AppletHspace: { applet.setHspace(value.toInteger(exec)); return; }
+ case AppletName: { applet.setName(str); return; }
+ case AppletObject: { applet.setObject(str); return; }
+ case AppletVspace: { applet.setVspace(value.toInteger(exec)); return; }
+ case AppletWidth: { applet.setWidth(str); return; }
+ }
+ }
+ break;
+ case ID_MAP: {
+ DOM::HTMLMapElement map = element;
+ switch (token) {
+ // read-only: areas
+ case MapName: { map.setName(str); return; }
+ }
+ }
+ break;
+ case ID_AREA: {
+ DOM::HTMLAreaElement area = element;
+ switch (token) {
+ case AreaAccessKey: { area.setAccessKey(str); return; }
+ case AreaAlt: { area.setAlt(str); return; }
+ case AreaCoords: { area.setCoords(str); return; }
+ case AreaHref: { area.setHref(str); return; }
+ case AreaNoHref: { area.setNoHref(value.toBoolean(exec)); return; }
+ case AreaShape: { area.setShape(str); return; }
+ case AreaTabIndex: { area.setTabIndex(value.toInteger(exec)); return; }
+ case AreaTarget: { area.setTarget(str); return; }
+ }
+ }
+ break;
+ case ID_SCRIPT: {
+ DOM::HTMLScriptElement script = element;
+ switch (token) {
+ case ScriptText: { script.setText(str); return; }
+ case ScriptHtmlFor: { script.setHtmlFor(str); return; }
+ case ScriptEvent: { script.setEvent(str); return; }
+ case ScriptCharset: { script.setCharset(str); return; }
+ case ScriptDefer: { script.setDefer(value.toBoolean(exec)); return; }
+ case ScriptSrc: { script.setSrc(str); return; }
+ case ScriptType: { script.setType(str); return; }
+ }
+ }
+ break;
+ case ID_TABLE: {
+ DOM::HTMLTableElement table = element;
+ switch (token) {
+ case TableCaption: { table.setCaption(n); return; } // type HTMLTableCaptionElement
+ case TableTHead: { table.setTHead(n); return; } // type HTMLTableSectionElement
+ case TableTFoot: { table.setTFoot(n); return; } // type HTMLTableSectionElement
+ // read-only: rows
+ // read-only: tbodies
+ case TableAlign: { table.setAlign(str); return; }
+ case TableBgColor: { table.setBgColor(str); return; }
+ case TableBorder: { table.setBorder(str); return; }
+ case TableCellPadding: { table.setCellPadding(str); return; }
+ case TableCellSpacing: { table.setCellSpacing(str); return; }
+ case TableFrame: { table.setFrame(str); return; }
+ case TableRules: { table.setRules(str); return; }
+ case TableSummary: { table.setSummary(str); return; }
+ case TableWidth: { table.setWidth(str); return; }
+ }
+ }
+ break;
+ case ID_CAPTION: {
+ DOM::HTMLTableCaptionElement tableCaption = element;
+ switch (token) {
+ case TableCaptionAlign: { tableCaption.setAlign(str); return; }
+ }
+ }
+ break;
+ case ID_COL:
+ case ID_COLGROUP: {
+ DOM::HTMLTableColElement tableCol = element;
+ switch (token) {
+ case TableColAlign: { tableCol.setAlign(str); return; }
+ case TableColCh: { tableCol.setCh(str); return; }
+ case TableColChOff: { tableCol.setChOff(str); return; }
+ case TableColSpan: { tableCol.setSpan(value.toInteger(exec)); return; }
+ case TableColVAlign: { tableCol.setVAlign(str); return; }
+ case TableColWidth: { tableCol.setWidth(str); return; }
+ }
+ }
+ break;
+ case ID_THEAD:
+ case ID_TBODY:
+ case ID_TFOOT: {
+ DOM::HTMLTableSectionElement tableSection = element;
+ switch (token) {
+ case TableSectionAlign: { tableSection.setAlign(str); return; }
+ case TableSectionCh: { tableSection.setCh(str); return; }
+ case TableSectionChOff: { tableSection.setChOff(str); return; }
+ case TableSectionVAlign: { tableSection.setVAlign(str); return; }
+ // read-only: rows
+ }
+ }
+ break;
+ case ID_TR: {
+ DOM::HTMLTableRowElement tableRow = element;
+ switch (token) {
+ // read-only: rowIndex
+ // read-only: sectionRowIndex
+ // read-only: cells
+ case TableRowAlign: { tableRow.setAlign(str); return; }
+ case TableRowBgColor: { tableRow.setBgColor(str); return; }
+ case TableRowCh: { tableRow.setCh(str); return; }
+ case TableRowChOff: { tableRow.setChOff(str); return; }
+ case TableRowVAlign: { tableRow.setVAlign(str); return; }
+ }
+ }
+ break;
+ case ID_TH:
+ case ID_TD: {
+ DOM::HTMLTableCellElement tableCell = element;
+ switch (token) {
+ // read-only: cellIndex
+ case TableCellAbbr: { tableCell.setAbbr(str); return; }
+ case TableCellAlign: { tableCell.setAlign(str); return; }
+ case TableCellAxis: { tableCell.setAxis(str); return; }
+ case TableCellBgColor: { tableCell.setBgColor(str); return; }
+ case TableCellCh: { tableCell.setCh(str); return; }
+ case TableCellChOff: { tableCell.setChOff(str); return; }
+ case TableCellColSpan: { tableCell.setColSpan(value.toInteger(exec)); return; }
+ case TableCellHeaders: { tableCell.setHeaders(str); return; }
+ case TableCellHeight: { tableCell.setHeight(str); return; }
+ case TableCellNoWrap: { tableCell.setNoWrap(value.toBoolean(exec)); return; }
+ case TableCellRowSpan: { tableCell.setRowSpan(value.toInteger(exec)); return; }
+ case TableCellScope: { tableCell.setScope(str); return; }
+ case TableCellVAlign: { tableCell.setVAlign(str); return; }
+ case TableCellWidth: { tableCell.setWidth(str); return; }
+ }
+ }
+ break;
+ case ID_FRAMESET: {
+ DOM::HTMLFrameSetElement frameSet = element;
+ switch (token) {
+ case FrameSetCols: { frameSet.setCols(str); return; }
+ case FrameSetRows: { frameSet.setRows(str); return; }
+ }
+ }
+ break;
+ case ID_LAYER: {
+ DOM::HTMLLayerElement layerElement = element;
+ switch (token) {
+ case LayerTop: { layerElement.setTop(value.toInteger(exec)); return; }
+ case LayerLeft: { layerElement.setLeft(value.toInteger(exec)); return; }
+ case LayerVisibility: { layerElement.setVisibility(str); return; }
+ case LayerBgColor: { layerElement.setBgColor(str); return; }
+ // read-only: layers, clip
+ }
+ }
+ break;
+ case ID_FRAME: {
+ DOM::HTMLFrameElement frameElement = element;
+ switch (token) {
+ // read-only: FrameContentDocument:
+ case FrameFrameBorder: { frameElement.setFrameBorder(str); return; }
+ case FrameLongDesc: { frameElement.setLongDesc(str); return; }
+ case FrameMarginHeight: { frameElement.setMarginHeight(str); return; }
+ case FrameMarginWidth: { frameElement.setMarginWidth(str); return; }
+ case FrameName: { frameElement.setName(str); return; }
+ case FrameNoResize: { frameElement.setNoResize(value.toBoolean(exec)); return; }
+ case FrameScrolling: { frameElement.setScrolling(str); return; }
+ case FrameSrc: { frameElement.setSrc(str); return; }
+ case FrameLocation: {
+ static_cast<DOM::HTMLFrameElementImpl *>(frameElement.handle())->setLocation(str);
+ return;
+ }
+ }
+ }
+ break;
+ case ID_IFRAME: {
+ DOM::HTMLIFrameElement iFrame = element;
+ switch (token) {
+ case IFrameAlign: { iFrame.setAlign(str); return; }
+ // read-only: IFrameContentDocument
+ case IFrameFrameBorder: { iFrame.setFrameBorder(str); return; }
+ case IFrameHeight: { iFrame.setHeight(str); return; }
+ case IFrameLongDesc: { iFrame.setLongDesc(str); return; }
+ case IFrameMarginHeight: { iFrame.setMarginHeight(str); return; }
+ case IFrameMarginWidth: { iFrame.setMarginWidth(str); return; }
+ case IFrameName: { iFrame.setName(str); return; }
+ case IFrameScrolling: { iFrame.setScrolling(str); return; }
+ case IFrameSrc: { iFrame.setSrc(str); return; }
+ case IFrameWidth: { iFrame.setWidth(str); return; }
+ }
+ break;
+ }
+ }
+
+ // generic properties
+ switch (token) {
+ case ElementId:
+ element.setId(str);
+ return;
+ case ElementTitle:
+ element.setTitle(str);
+ return;
+ case ElementLang:
+ element.setLang(str);
+ return;
+ case ElementDir:
+ element.setDir(str);
+ return;
+ case ElementClassName:
+ element.setClassName(str);
+ return;
+ case ElementInnerHTML:
+ element.setInnerHTML(str);
+ return;
+ case ElementInnerText:
+ element.setInnerText(str);
+ return;
+ default:
+ kdDebug(6070) << "WARNING: KJS::HTMLElement::putValueProperty unhandled token " << token << " thisTag=" << element.tagName().string() << " str=" << str.string() << endl;
+ }
+}
+
+//Prototype mess for this...
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLElementProto, DOMElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLElement", HTMLElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLElementPseudoCtor, "HTMLElement", HTMLElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLHtmlElement", HTMLHtmlElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLHtmlElementPseudoCtor, "HTMLHtmlElement", HTMLHtmlElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLHeadElement", HTMLHeadElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLHeadElementPseudoCtor, "HTMLHeadElement", HTMLHeadElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLLinkElement", HTMLLinkElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLLinkElementPseudoCtor, "HTMLLinkElement", HTMLLinkElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLTitleElement", HTMLTitleElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLTitleElementPseudoCtor, "HTMLTitleElement", HTMLTitleElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLMetaElement", HTMLMetaElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLMetaElementPseudoCtor, "HTMLMetaElement", HTMLMetaElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLBaseElement", HTMLBaseElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLBaseElementPseudoCtor, "HTMLBaseElement", HTMLBaseElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLIsIndexElement", HTMLIsIndexElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLIsIndexElementPseudoCtor, "HTMLIsIndexElement", HTMLIsIndexElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLStyleElement", HTMLStyleElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLStyleElementPseudoCtor, "HTMLStyleElement", HTMLStyleElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLBodyElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLBodyElement", HTMLBodyElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLBodyElementPseudoCtor, "HTMLBodyElement", HTMLBodyElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLFormElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLFormElement", HTMLFormElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLFormElementPseudoCtor, "HTMLFormElement", HTMLFormElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLSelectElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLSelectElement", HTMLSelectElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLSelectElementPseudoCtor, "HTMLSelectElement", HTMLSelectElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLOptGroupElement", HTMLOptGroupElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLOptGroupElementPseudoCtor, "HTMLOptGroupElement", HTMLOptGroupElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLOptionElement", HTMLOptionElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLOptionElementPseudoCtor, "HTMLOptionElement", HTMLOptionElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLInputElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLInputElement", HTMLInputElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLInputElementPseudoCtor, "HTMLInputElement", HTMLInputElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLTextAreaElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLTextAreaElement", HTMLTextAreaElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLTextAreaElementPseudoCtor, "HTMLTextAreaElement", HTMLTextAreaElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLButtonElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLButtonElement", HTMLButtonElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLButtonElementPseudoCtor, "HTMLButtonElement", HTMLButtonElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLLabelElement", HTMLLabelElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLLabelElementPseudoCtor, "HTMLLabelElement", HTMLLabelElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLFieldSetElement", HTMLFieldSetElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLFieldSetElementPseudoCtor, "HTMLFieldSetElement", HTMLFieldSetElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLLegendElement", HTMLLegendElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLLegendElementPseudoCtor, "HTMLLegendElement", HTMLLegendElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLUListElement", HTMLUListElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLUListElementPseudoCtor, "HTMLUListElement", HTMLUListElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLOListElement", HTMLOListElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLOListElementPseudoCtor, "HTMLOListElement", HTMLOListElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLDListElement", HTMLDListElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLDListElementPseudoCtor, "HTMLDListElement", HTMLDListElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLDirectoryElement", HTMLDirectoryElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLDirectoryElementPseudoCtor, "HTMLDirectoryElement", HTMLDirectoryElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLMenuElement", HTMLMenuElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLMenuElementPseudoCtor, "HTMLMenuElement", HTMLMenuElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLLIElement", HTMLLIElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLLIElementPseudoCtor, "HTMLLIElement", HTMLLIElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLDivElement", HTMLDivElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLDivElementPseudoCtor, "HTMLDivElement", HTMLDivElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLParagraphElement", HTMLParagraphElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLParagraphElementPseudoCtor, "HTMLParagraphElement", HTMLParagraphElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLHeadingElement", HTMLHeadingElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLHeadingElementPseudoCtor, "HTMLHeadingElement", HTMLHeadingElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLBlockQuoteElement", HTMLBlockQuoteElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLBlockQuoteElementPseudoCtor, "HTMLBlockQuoteElement", HTMLBlockQuoteElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLQuoteElement", HTMLQuoteElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLQuoteElementPseudoCtor, "HTMLQuoteElement", HTMLQuoteElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLPreElement", HTMLPreElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLPreElementPseudoCtor, "HTMLPreElement", HTMLPreElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLBRElement", HTMLBRElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLBRElementPseudoCtor, "HTMLBRElement", HTMLBRElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLBaseFontElement", HTMLBaseFontElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLBaseFontElementPseudoCtor, "HTMLBaseFontElement", HTMLBaseFontElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLFontElement", HTMLFontElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLFontElementPseudoCtor, "HTMLFontElement", HTMLFontElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLHRElement", HTMLHRElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLHRElementPseudoCtor, "HTMLHRElement", HTMLHRElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLModElement", HTMLModElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLModElementPseudoCtor, "HTMLModElement", HTMLModElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLAnchorElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLAnchorElement", HTMLAnchorElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLAnchorElementPseudoCtor, "HTMLAnchorElement", HTMLAnchorElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLImageElement", HTMLImageElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLImageElementPseudoCtor, "HTMLImageElement", HTMLImageElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLObjectElement", HTMLObjectElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLObjectElementPseudoCtor, "HTMLObjectElement", HTMLObjectElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLParamElement", HTMLParamElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLParamElementPseudoCtor, "HTMLParamElement", HTMLParamElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLAppletElement", HTMLAppletElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLAppletElementPseudoCtor, "HTMLAppletElement", HTMLAppletElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLMapElement", HTMLMapElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLMapElementPseudoCtor, "HTMLMapElement", HTMLMapElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLAreaElement", HTMLAreaElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLAreaElementPseudoCtor, "HTMLAreaElement", HTMLAreaElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLScriptElement", HTMLScriptElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLScriptElementPseudoCtor, "HTMLScriptElement", HTMLScriptElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLTableElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLTableElement", HTMLTableElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLTableElementPseudoCtor, "HTMLTableElement", HTMLTableElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLTableCaptionElement", HTMLTableCaptionElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLTableCaptionElementPseudoCtor, "HTMLTableCaptionElement", HTMLTableCaptionElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLTableColElement", HTMLTableColElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLTableColElementPseudoCtor, "HTMLTableColElement", HTMLTableColElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLTableSectionElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLTableSectionElement", HTMLTableSectionElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLTableSectionElementPseudoCtor, "HTMLTableSectionElement", HTMLTableSectionElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLTableRowElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLTableRowElement", HTMLTableRowElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLTableRowElementPseudoCtor, "HTMLTableRowElement", HTMLTableRowElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLTableCellElement", HTMLTableCellElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLTableCellElementPseudoCtor, "HTMLTableCellElement", HTMLTableCellElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLFrameSetElement", HTMLFrameSetElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLFrameSetElementPseudoCtor, "HTMLFrameSetElement", HTMLFrameSetElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLLayerElement", HTMLLayerElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLLayerElementPseudoCtor, "HTMLLayerElement", HTMLLayerElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLFrameElement", HTMLFrameElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLFrameElementPseudoCtor, "HTMLFrameElement", HTMLFrameElementProto)
+
+KJS_EMPTY_PROTOTYPE_WITH_PROTOTYPE("HTMLIFrameElement", HTMLIFrameElementProto, HTMLElementProto)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLIFrameElementPseudoCtor, "HTMLIFrameElement", HTMLIFrameElementProto)
+
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLMarqueeElementProto, HTMLElementProto)
+KJS_IMPLEMENT_PROTOTYPE("HTMLMarqueeElement", HTMLMarqueeElementProto, HTMLElementFunction)
+IMPLEMENT_PSEUDO_CONSTRUCTOR(HTMLMarqueeElementPseudoCtor, "HTMLMarqueeElement", HTMLMarqueeElementProto)
+
+static Object prototypeForID(ExecState* exec, DOM::NodeImpl::Id id) {
+ switch (id) {
+ case ID_HTML:
+ return HTMLHtmlElementProto::self(exec);
+ case ID_HEAD:
+ return HTMLHeadElementProto::self(exec);
+ case ID_LINK:
+ return HTMLLinkElementProto::self(exec);
+ case ID_TITLE:
+ return HTMLTitleElementProto::self(exec);
+ case ID_META:
+ return HTMLMetaElementProto::self(exec);
+ case ID_BASE:
+ return HTMLBaseElementProto::self(exec);
+ case ID_ISINDEX:
+ return HTMLIsIndexElementProto::self(exec);
+ case ID_STYLE:
+ return HTMLStyleElementProto::self(exec);
+ case ID_BODY:
+ return HTMLBodyElementProto::self(exec);
+ case ID_FORM:
+ return HTMLFormElementProto::self(exec);
+ case ID_SELECT:
+ return HTMLSelectElementProto::self(exec);
+ case ID_OPTGROUP:
+ return HTMLOptGroupElementProto::self(exec);
+ case ID_OPTION:
+ return HTMLOptionElementProto::self(exec);
+ case ID_INPUT:
+ return HTMLInputElementProto::self(exec);
+ case ID_TEXTAREA:
+ return HTMLTextAreaElementProto::self(exec);
+ case ID_BUTTON:
+ return HTMLButtonElementProto::self(exec);
+ case ID_LABEL:
+ return HTMLLabelElementProto::self(exec);
+ case ID_FIELDSET:
+ return HTMLFieldSetElementProto::self(exec);
+ case ID_LEGEND:
+ return HTMLLegendElementProto::self(exec);
+ case ID_UL:
+ return HTMLUListElementProto::self(exec);
+ case ID_OL:
+ return HTMLOListElementProto::self(exec);
+ case ID_DL:
+ return HTMLDListElementProto::self(exec);
+ case ID_DIR:
+ return HTMLDirectoryElementProto::self(exec);
+ case ID_MENU:
+ return HTMLMenuElementProto::self(exec);
+ case ID_LI:
+ return HTMLLIElementProto::self(exec);
+ case ID_DIV:
+ return HTMLDivElementProto::self(exec);
+ case ID_P:
+ return HTMLParagraphElementProto::self(exec);
+ case ID_H1:
+ case ID_H2:
+ case ID_H3:
+ case ID_H4:
+ case ID_H5:
+ case ID_H6:
+ return HTMLHeadingElementProto::self(exec);
+ case ID_BLOCKQUOTE:
+ return HTMLBlockQuoteElementProto::self(exec);
+ case ID_Q:
+ return HTMLQuoteElementProto::self(exec);
+ case ID_PRE:
+ return HTMLPreElementProto::self(exec);
+ case ID_BR:
+ return HTMLBRElementProto::self(exec);
+ case ID_BASEFONT:
+ return HTMLBaseFontElementProto::self(exec);
+ case ID_FONT:
+ return HTMLFontElementProto::self(exec);
+ case ID_HR:
+ return HTMLHRElementProto::self(exec);
+ case ID_INS:
+ case ID_DEL:
+ return HTMLModElementProto::self(exec);
+ case ID_A:
+ return HTMLAnchorElementProto::self(exec);
+ case ID_IMG:
+ return HTMLImageElementProto::self(exec);
+ case ID_OBJECT:
+ return HTMLObjectElementProto::self(exec);
+ case ID_PARAM:
+ return HTMLParamElementProto::self(exec);
+ case ID_APPLET:
+ return HTMLAppletElementProto::self(exec);
+ case ID_MAP:
+ return HTMLMapElementProto::self(exec);
+ case ID_AREA:
+ return HTMLAreaElementProto::self(exec);
+ case ID_SCRIPT:
+ return HTMLScriptElementProto::self(exec);
+ case ID_TABLE:
+ return HTMLTableElementProto::self(exec);
+ case ID_CAPTION:
+ return HTMLTableCaptionElementProto::self(exec);
+ case ID_COL:
+ case ID_COLGROUP:
+ return HTMLTableColElementProto::self(exec);
+ case ID_THEAD:
+ case ID_TBODY:
+ case ID_TFOOT:
+ return HTMLTableSectionElementProto::self(exec);
+ case ID_TR:
+ return HTMLTableRowElementProto::self(exec);
+ case ID_TD:
+ case ID_TH:
+ return HTMLTableCellElementProto::self(exec);
+ case ID_FRAMESET:
+ return HTMLFrameSetElementProto::self(exec);
+ case ID_LAYER:
+ return HTMLLayerElementProto::self(exec);
+ case ID_FRAME:
+ return HTMLFrameElementProto::self(exec);
+ case ID_IFRAME:
+ return HTMLIFrameElementProto::self(exec);
+ case ID_MARQUEE:
+ return HTMLMarqueeElementProto::self(exec);
+ default:
+ return HTMLElementProto::self(exec);
+ }
+}
+
+// -------------------------------------------------------------------------
+/* Source for HTMLCollectionProtoTable.
+@begin HTMLCollectionProtoTable 3
+ item HTMLCollection::Item DontDelete|Function 1
+ namedItem HTMLCollection::NamedItem DontDelete|Function 1
+ tags HTMLCollection::Tags DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE(HTMLCollectionProto)
+IMPLEMENT_PROTOFUNC_DOM(HTMLCollectionProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("HTMLCollection", HTMLCollectionProto,HTMLCollectionProtoFunc)
+
+const ClassInfo KJS::HTMLCollection::info = { "HTMLCollection", 0, 0, 0 };
+
+KJS::HTMLCollection::HTMLCollection(ExecState *exec, const DOM::HTMLCollection& c)
+ : DOMObject(HTMLCollectionProto::self(exec)), collection(c), hidden(false) {}
+
+KJS::HTMLCollection::HTMLCollection(const KJS::Object& proto, const DOM::HTMLCollection& c)
+ : DOMObject(proto), collection(c), hidden(false) {}
+
+KJS::HTMLCollection::~HTMLCollection()
+{
+ ScriptInterpreter::forgetDOMObject(collection.handle());
+}
+
+bool KJS::HTMLCollection::toBoolean(ExecState *) const {
+ return !hidden;
+}
+
+// We have to implement hasProperty since we don't use a hashtable for 'selectedIndex' and 'length',
+// and for indices in "for (..in..)"
+bool KJS::HTMLCollection::hasProperty(ExecState *exec, const Identifier &p) const
+{
+ if (p == lengthPropertyName)
+ return true;
+ if ( collection.handle()->getType() == HTMLCollectionImpl::SELECT_OPTIONS &&
+ ( p == "selectedIndex" || p == "value" ) )
+ return true;
+
+ bool ok;
+ unsigned long pos = p.toULong(&ok);
+ if (ok && pos < collection.length())
+ return true;
+
+ return DOMObject::hasProperty(exec, p);
+}
+
+ReferenceList KJS::HTMLCollection::propList(ExecState *exec, bool recursive)
+{
+ ReferenceList properties = ObjectImp::propList(exec,recursive);
+
+ for (unsigned i = 0; i < collection.length(); ++i) {
+ if (!ObjectImp::hasProperty(exec,Identifier::from(i))) {
+ properties.append(Reference(this, i));
+ }
+ }
+
+ if (!ObjectImp::hasProperty(exec, lengthPropertyName))
+ properties.append(Reference(this, lengthPropertyName));
+
+ return properties;
+}
+
+Value KJS::HTMLCollection::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLCollection::tryGet " << propertyName.ascii() << endl;
+#endif
+ if (propertyName == lengthPropertyName)
+ {
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << " collection length is " << collection.length() << endl;
+#endif
+ return Number(collection.length());
+ }
+
+ if (collection.handle()->getType() == HTMLCollectionImpl::SELECT_OPTIONS) {
+ DOM::HTMLSelectElement parentSelect = collection.base();
+ if ( parentSelect.isNull() )
+ return Undefined();
+ if (propertyName == "selectedIndex") {
+ // NON-STANDARD options.selectedIndex
+ return Number(parentSelect.selectedIndex());
+ } else if ( propertyName == "value" ) {
+ // NON-STANDARD options.value
+ return String(parentSelect.value());
+ }
+ }
+
+ // Look in the prototype (for functions) before assuming it's an item's name
+ Object proto = Object::dynamicCast(prototype());
+ if (proto.isValid() && proto.hasProperty(exec,propertyName))
+ return proto.get(exec,propertyName);
+
+ // name or index ?
+ bool ok;
+ unsigned int u = propertyName.toULong(&ok);
+ if (ok) {
+ if ( u < collection.length() ) {
+ DOM::Node node = collection.item(u);
+ return getDOMNode(exec,node);
+ } else
+ return Undefined();
+ }
+ else
+ return getNamedItems(exec,propertyName);
+}
+
+// HTMLCollections are strange objects, they support both get and call,
+// so that document.forms.item(0) and document.forms(0) both work.
+Value KJS::HTMLCollection::call(ExecState *exec, Object &thisObj, const List &args)
+{
+ // This code duplication is necessary, HTMLCollection isn't a DOMFunction
+ Value val;
+ try {
+ val = tryCall(exec, thisObj, args);
+ }
+ // pity there's no way to distinguish between these in JS code
+ catch (...) {
+ Object err = Error::create(exec, GeneralError, "Exception from HTMLCollection");
+ exec->setException(err);
+ }
+ return val;
+}
+
+Value KJS::HTMLCollection::tryCall(ExecState *exec, Object &, const List &args)
+{
+ // Do not use thisObj here. It can be the HTMLDocument, in the document.forms(i) case.
+ /*if( thisObj.imp() != this )
+ {
+ kdDebug(6070) << "WARNING: thisObj.imp() != this in HTMLCollection::tryCall" << endl;
+ KJS::printInfo(exec,"KJS::HTMLCollection::tryCall thisObj",thisObj,-1);
+ KJS::printInfo(exec,"KJS::HTMLCollection::tryCall this",Value(this),-1);
+ }*/
+ // Also, do we need the TypeError test here ?
+
+ if (args.size() == 1) {
+ // support for document.all(<index>) etc.
+ bool ok;
+ UString s = args[0].toString(exec);
+ unsigned int u = s.toULong(&ok);
+ if (ok) {
+ DOM::Element element = collection.item(u);
+ return getDOMNode(exec,element);
+ }
+ // support for document.images('<name>') etc.
+ return getNamedItems(exec,Identifier(s));
+ }
+ else if (args.size() >= 1) // the second arg, if set, is the index of the item we want
+ {
+ bool ok;
+ UString s = args[0].toString(exec);
+ unsigned int u = args[1].toString(exec).toULong(&ok);
+ if (ok)
+ {
+ DOM::DOMString pstr = s.string();
+ DOM::Node node = collection.namedItem(pstr);
+ while (!node.isNull()) {
+ if (!u)
+ return getDOMNode(exec,node);
+ node = collection.nextNamedItem(pstr);
+ --u;
+ }
+ }
+ }
+ return Undefined();
+}
+
+Value KJS::HTMLCollection::getNamedItems(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLCollection::getNamedItems " << propertyName.ascii() << endl;
+#endif
+
+ DOM::DOMString pstr = propertyName.string();
+
+ TQValueList<DOM::NodeImpl*> matches = collection.handle()->namedItems(pstr);
+
+ if (!matches.isEmpty()) {
+ if (matches.size() == 1) {
+ DOM::Node node(matches[0]);
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "returning single node" << endl;
+#endif
+ return getDOMNode(exec,node);
+ }
+ else {
+ // multiple items, return a collection
+ TQValueList<DOM::Node> nodes;
+ for (TQValueList<DOM::NodeImpl*>::const_iterator i = matches.begin();
+ i != matches.end(); ++i)
+ nodes.append(DOM::Node(*i));
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "returning list of " << nodes.count() << " nodes" << endl;
+#endif
+ return Value(new DOMNamedNodesCollection(exec, nodes));
+ }
+ }
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "not found" << endl;
+#endif
+ return Undefined();
+}
+
+Value KJS::HTMLCollectionProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::HTMLCollection, thisObj );
+ DOM::HTMLCollection coll = static_cast<KJS::HTMLCollection *>(thisObj.imp())->toCollection();
+
+ switch (id) {
+ case KJS::HTMLCollection::Item:
+ {
+ // support for item(<index>) (DOM)
+ bool ok;
+ UString s = args[0].toString(exec);
+ unsigned int u = s.toULong(&ok);
+ if (ok) {
+ return getDOMNode(exec,coll.item(u));
+ }
+ // support for item('<name>') (IE only)
+ kdWarning() << "non-standard HTMLCollection.item('" << s.ascii() << "') called, use namedItem instead" << endl;
+ return getDOMNode(exec,coll.namedItem(s.string()));
+ }
+ case KJS::HTMLCollection::Tags:
+ {
+ DOM::DOMString tagName = args[0].toString(exec).string();
+ DOM::NodeList list;
+ // getElementsByTagName exists in Document and in Element, pick up the right one
+ if ( coll.base().nodeType() == DOM::Node::DOCUMENT_NODE )
+ {
+ DOM::Document doc = coll.base();
+ list = doc.getElementsByTagName(tagName);
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLCollectionProtoFunc::tryCall document.tags(" << tagName.string() << ") -> " << list.length() << " items in node list" << endl;
+#endif
+ } else
+ {
+ DOM::Element e = coll.base();
+ list = e.getElementsByTagName(tagName);
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLCollectionProtoFunc::tryCall element.tags(" << tagName.string() << ") -> " << list.length() << " items in node list" << endl;
+#endif
+ }
+ return getDOMNodeList(exec, list);
+ }
+ case KJS::HTMLCollection::NamedItem:
+ {
+ Value val = static_cast<HTMLCollection *>(thisObj.imp())->getNamedItems(exec, Identifier(args[0].toString(exec)));
+ // Must return null when asking for a named item that isn't in the collection
+ // (DOM2 testsuite, HTMLCollection12 test)
+ if ( val.type() == KJS::UndefinedType )
+ return Null();
+ else
+ return val;
+ }
+ default:
+ return Undefined();
+ }
+}
+
+// -------------------------------------------------------------------------
+/* Source for HTMLSelectCollectionProtoTable.
+@begin HTMLSelectCollectionProtoTable 1
+ add HTMLSelectCollection::Add DontDelete|Function 2
+@end
+*/
+KJS_DEFINE_PROTOTYPE_WITH_PROTOTYPE(HTMLSelectCollectionProto, HTMLCollectionProto)
+IMPLEMENT_PROTOFUNC_DOM(HTMLSelectCollectionProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("HTMLOptionsCollection", HTMLSelectCollectionProto, HTMLSelectCollectionProtoFunc)
+
+const ClassInfo KJS::HTMLSelectCollection::info = { "HTMLOptionsCollection", &HTMLCollection::info, 0, 0 };
+
+KJS::HTMLSelectCollection::HTMLSelectCollection(ExecState *exec, const DOM::HTMLCollection& c,
+ const DOM::HTMLSelectElement& e)
+ : HTMLCollection(HTMLSelectCollectionProto::self(exec), c), element(e) { }
+
+Value KJS::HTMLSelectCollection::tryGet(ExecState *exec, const Identifier &p) const
+{
+ if (p == "selectedIndex")
+ return Number(element.selectedIndex());
+
+ return HTMLCollection::tryGet(exec, p);
+}
+
+void KJS::HTMLSelectCollection::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int)
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "KJS::HTMLSelectCollection::tryPut " << propertyName.qstring() << endl;
+#endif
+ if ( propertyName == "selectedIndex" ) {
+ element.setSelectedIndex( value.toInteger( exec ) );
+ return;
+ }
+ // resize ?
+ else if (propertyName == lengthPropertyName) {
+ unsigned newLen;
+ bool converted = value.toUInt32(newLen);
+
+ if (!converted) {
+ return;
+ }
+
+ long diff = element.length() - newLen;
+
+ if (diff < 0) { // add dummy elements
+ do {
+ element.add(element.ownerDocument().createElement("OPTION"), DOM::HTMLElement());
+ } while (++diff);
+ }
+ else // remove elements
+ while (diff-- > 0)
+ element.remove(newLen + diff);
+
+ return;
+ }
+ // an index ?
+ bool ok;
+ unsigned int u = propertyName.toULong(&ok);
+ if (!ok)
+ return;
+
+ if (value.isA(NullType) || value.isA(UndefinedType)) {
+ // null and undefined delete. others, too ?
+ element.remove(u);
+ return;
+ }
+
+ // is v an option element ?
+ DOM::Node node = KJS::toNode(value);
+ if (node.isNull() || node.elementId() != ID_OPTION)
+ return;
+
+ DOM::HTMLOptionElement option = static_cast<DOM::HTMLOptionElement>(node);
+ if ( option.ownerDocument() != element.ownerDocument() )
+ option = static_cast<DOM::HTMLOptionElement>(element.ownerDocument().importNode(option, true));
+ long diff = long(u) - element.length();
+ DOM::HTMLElement before;
+ // out of array bounds ? first insert empty dummies
+ if (diff > 0) {
+ while (diff--) {
+ element.add(element.ownerDocument().createElement("OPTION"), before);
+ }
+ // replace an existing entry ?
+ } else if (diff < 0) {
+ before = element.options().item(u+1);
+ element.remove(u);
+ }
+ // finally add the new element
+ element.add(option, before);
+}
+
+
+Value KJS::HTMLSelectCollectionProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::HTMLSelectCollection, thisObj );
+ DOM::HTMLSelectElement element = static_cast<KJS::HTMLSelectCollection *>(thisObj.imp())->toElement();
+
+ switch (id) {
+ case KJS::HTMLSelectCollection::Add:
+ {
+ //Non-standard select.options.add.
+ //The first argument is the item, 2nd is offset.
+ //IE and Mozilla are both quite picky here, too...
+ DOM::Node node = KJS::toNode(args[0]);
+ if (node.isNull() || node.elementId() != ID_OPTION) {
+ Object err = Error::create(exec, GeneralError, "Invalid argument to HTMLOptionsCollection::add");
+ exec->setException(err);
+ return Undefined();
+ }
+
+ DOM::HTMLOptionElement option = static_cast<DOM::HTMLOptionElement>(node);
+ if ( option.ownerDocument() != element.ownerDocument() ) //### remove this once auto-adopt works...
+ option = static_cast<DOM::HTMLOptionElement>(element.ownerDocument().importNode(option, true));
+
+ int pos = 0;
+ //By default append, if not specified or null..
+ if (args[1].isA(UndefinedType))
+ pos = element.length();
+ else
+ pos = (int)args[1].toNumber(exec);
+
+ if (pos < 0) {
+ Object err = Error::create(exec, GeneralError, "Invalid index argument to HTMLOptionsCollection::add");
+ exec->setException(err);
+ return Undefined();
+ }
+
+ if (pos >= element.length()) {
+ //Append
+ element.add(option, DOM::Node());
+ } else {
+ //Find what to prepend before..
+ DOM::HTMLSelectElementImpl* impl = static_cast<HTMLSelectElementImpl*>(element.handle());
+ TQMemArray<HTMLGenericFormElementImpl*> items = impl->listItems();
+ int dummy;
+ impl->insertBefore(option.handle(), items.at(pos), dummy);
+ }
+ return Undefined();
+ break;
+ }
+ default:
+ break;
+ }
+ return Undefined();
+}
+
+
+////////////////////// Option Object ////////////////////////
+
+OptionConstructorImp::OptionConstructorImp(ExecState *exec, const DOM::Document &d)
+ : ObjectImp(), doc(d)
+{
+ // ## isn't there some redundancy between ObjectImp::_proto and the "prototype" property ?
+ //put(exec,"prototype", ...,DontEnum|DontDelete|ReadOnly);
+
+ // no. of arguments for constructor
+ // ## is 4 correct ? 0 to 4, it seems to be
+ put(exec,lengthPropertyName, Number(4), ReadOnly|DontDelete|DontEnum);
+}
+
+bool OptionConstructorImp::implementsConstruct() const
+{
+ return true;
+}
+
+Object OptionConstructorImp::construct(ExecState *exec, const List &args)
+{
+ DOM::Element el = doc.createElement("OPTION");
+ DOM::HTMLOptionElement opt = static_cast<DOM::HTMLOptionElement>(el);
+ int sz = args.size();
+ DOM::Text t = doc.createTextNode("");
+ try { opt.appendChild(t); }
+ catch(DOM::DOMException& e) {
+ // #### exec->setException ?
+ }
+ if (sz > 0)
+ t.setData(args[0].toString(exec).string()); // set the text
+ if (sz > 1)
+ opt.setValue(args[1].toString(exec).string());
+ if (sz > 2)
+ opt.setDefaultSelected(args[2].toBoolean(exec));
+ if (sz > 3)
+ opt.setSelected(args[3].toBoolean(exec));
+
+ return Object::dynamicCast(getDOMNode(exec,opt));
+}
+
+////////////////////// Image Object ////////////////////////
+
+//Like in other browsers, we merely make a new HTMLImageElement
+//not in tree for this.
+ImageConstructorImp::ImageConstructorImp(ExecState *, const DOM::Document &d)
+ : ObjectImp(), doc(d)
+{
+}
+
+bool ImageConstructorImp::implementsConstruct() const
+{
+ return true;
+}
+
+Object ImageConstructorImp::construct(ExecState *exec, const List &list)
+{
+ bool widthSet = false, heightSet = false;
+ int width = 0, height = 0;
+ if (list.size() > 0) {
+ widthSet = true;
+ Value w = list.at(0);
+ width = w.toInt32(exec);
+ }
+ if (list.size() > 1) {
+ heightSet = true;
+ Value h = list.at(1);
+ height = h.toInt32(exec);
+ }
+
+ HTMLImageElement image(doc.createElement("image"));
+
+ if (widthSet)
+ image.setWidth(width);
+
+ if (heightSet)
+ image.setHeight(height);
+
+ return Object::dynamicCast(getDOMNode(exec,image));
+}
+
+Value getHTMLCollection(ExecState *exec, const DOM::HTMLCollection& c, bool hide)
+{
+ Value coll = cacheDOMObject<DOM::HTMLCollection, KJS::HTMLCollection>(exec, c);
+ if (hide) {
+ KJS::HTMLCollection *impl = static_cast<KJS::HTMLCollection*>(coll.imp());
+ impl->hide();
+ }
+ return coll;
+}
+
+Value getSelectHTMLCollection(ExecState *exec, const DOM::HTMLCollection& c, const DOM::HTMLSelectElement& e)
+{
+ DOMObject *ret;
+ if (c.isNull())
+ return Null();
+ ScriptInterpreter* interp = static_cast<ScriptInterpreter *>(exec->interpreter());
+ if ((ret = interp->getDOMObject(c.handle())))
+ return Value(ret);
+ else {
+ ret = new HTMLSelectCollection(exec, c, e);
+ interp->putDOMObject(c.handle(),ret);
+ return Value(ret);
+ }
+}
+
+} //namespace KJS
diff --git a/tdehtml/ecma/kjs_html.h b/tdehtml/ecma/kjs_html.h
new file mode 100644
index 000000000..53da38462
--- /dev/null
+++ b/tdehtml/ecma/kjs_html.h
@@ -0,0 +1,294 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 1999 Harri Porten (porten@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_HTML_H_
+#define _KJS_HTML_H_
+
+#include "dom/html_document.h"
+#include "dom/html_base.h"
+#include "dom/html_misc.h"
+#include "dom/html_form.h"
+#include "misc/loader_client.h"
+
+#include "ecma/kjs_binding.h"
+#include "ecma/kjs_dom.h"
+#include "xml/dom_nodeimpl.h" // for NodeImpl::Id
+
+namespace KJS {
+
+ class HTMLElement;
+
+ class HTMLDocument : public DOMDocument {
+ public:
+ HTMLDocument(ExecState *exec, const DOM::HTMLDocument& d);
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ void putValueProperty(ExecState *exec, int token, const Value& value, int /*attr*/);
+ virtual bool hasProperty(ExecState *exec, const Identifier &propertyName) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Title, Referrer, Domain, URL, Body, Location, Cookie,
+ Images, Applets, Links, Forms, Layers, Anchors, Scripts, All, Clear, Open, Close,
+ Write, WriteLn, GetElementsByName, GetSelection, CaptureEvents, ReleaseEvents,
+ BgColor, FgColor, AlinkColor, LinkColor, VlinkColor, LastModified,
+ Height, Width, Dir, Frames, CompatMode };
+ DOM::Document toDocument() const { return static_cast<DOM::Document>( node ); }
+ };
+
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLDocumentPseudoCtor)
+
+ class HTMLElement : public DOMElement {
+ public:
+ HTMLElement(ExecState *exec, const DOM::HTMLElement& e);
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ void putValueProperty(ExecState *exec, int token, const Value& value, int);
+ virtual bool hasProperty(ExecState *exec, const Identifier &propertyName) const;
+ virtual UString toString(ExecState *exec) const;
+ virtual void pushEventHandlerScope(ExecState *exec, ScopeChain &scope) const;
+ virtual const ClassInfo* classInfo() const;
+ static const ClassInfo info;
+
+ static const ClassInfo html_info, head_info, link_info, title_info,
+ meta_info, base_info, isIndex_info, style_info, body_info, form_info,
+ select_info, optGroup_info, option_info, input_info, textArea_info,
+ button_info, label_info, fieldSet_info, legend_info, ul_info, ol_info,
+ dl_info, dir_info, menu_info, li_info, div_info, p_info, heading_info,
+ blockQuote_info, q_info, pre_info, br_info, baseFont_info, font_info,
+ hr_info, mod_info, a_info, img_info, object_info, param_info,
+ applet_info, map_info, area_info, script_info, table_info,
+ caption_info, col_info, tablesection_info, tr_info,
+ tablecell_info, frameSet_info, frame_info, iFrame_info, marquee_info, layer_info;
+
+ enum { HtmlVersion, HeadProfile, LinkHref, LinkRel, LinkMedia,
+ LinkCharset, LinkDisabled, LinkHrefLang, LinkRev, LinkTarget, LinkType,
+ LinkSheet, TitleText, MetaName, MetaHttpEquiv, MetaContent, MetaScheme,
+ BaseHref, BaseTarget, IsIndexForm, IsIndexPrompt, StyleDisabled,
+ StyleSheet, StyleType, StyleMedia, BodyBackground, BodyVLink, BodyText,
+ BodyLink, BodyALink, BodyBgColor, BodyOnLoad, BodyFocus,
+ FormAction, FormEncType, FormElements, FormLength, FormAcceptCharset,
+ FormReset, FormTarget, FormName, FormMethod, FormSubmit, SelectAdd,
+ SelectTabIndex, SelectValue, SelectSelectedIndex, SelectLength,
+ SelectRemove, SelectForm, SelectBlur, SelectType, SelectOptions,
+ SelectDisabled, SelectMultiple, SelectName, SelectSize, SelectFocus,
+ OptGroupDisabled, OptGroupLabel, OptionIndex, OptionSelected,
+ OptionForm, OptionText, OptionDefaultSelected, OptionDisabled,
+ OptionLabel, OptionValue, InputBlur, InputReadOnly, InputAccept,
+ InputSize, InputDefaultValue, InputTabIndex, InputValue, InputType,
+ InputFocus, InputMaxLength, InputDefaultChecked, InputDisabled,
+ InputChecked, InputIndeterminate, InputForm, InputAccessKey, InputAlign, InputAlt,
+ InputName, InputSrc, InputUseMap, InputSelect, InputClick,
+ InputSelectionStart, InputSelectionEnd, InputSetSelectionRange,
+ TextAreaAccessKey, TextAreaName, TextAreaDefaultValue, TextAreaSelect,
+ TextAreaCols, TextAreaDisabled, TextAreaForm, TextAreaType,
+ TextAreaTabIndex, TextAreaReadOnly, TextAreaRows, TextAreaValue,
+ TextAreaBlur, TextAreaFocus, TextAreaSelectionStart, TextAreaSelectionEnd, TextAreaSetSelectionRange,
+ TextAreaTextLength, ButtonBlur, ButtonFocus, ButtonForm, ButtonTabIndex, ButtonName,
+ ButtonDisabled, ButtonAccessKey, ButtonType, ButtonValue, LabelHtmlFor,
+ LabelForm, LabelAccessKey, FieldSetForm, LegendForm, LegendAccessKey,
+ LegendAlign, UListType, UListCompact, OListStart, OListCompact,
+ OListType, DListCompact, DirectoryCompact, MenuCompact, LIType,
+ LIValue, DivAlign, ParagraphAlign, HeadingAlign, BlockQuoteCite,
+ QuoteCite, PreWidth, BRClear, BaseFontColor, BaseFontSize,
+ BaseFontFace, FontColor, FontSize, FontFace, HRWidth, HRNoShade,
+ HRAlign, HRSize, ModCite, ModDateTime, AnchorShape, AnchorRel,
+ AnchorAccessKey, AnchorCoords, AnchorHref, AnchorProtocol, AnchorHost,
+ AnchorCharset, AnchorHrefLang, AnchorHostname, AnchorType, AnchorFocus,
+ AnchorPort, AnchorPathName, AnchorHash, AnchorSearch, AnchorName,
+ AnchorRev, AnchorTabIndex, AnchorTarget, AnchorText, AnchorBlur, AnchorClick,
+ ImageName, ImageAlign, ImageHspace, ImageVspace, ImageUseMap, ImageAlt,
+ ImageLowSrc, ImageWidth, ImageIsMap, ImageBorder, ImageHeight,
+ ImageLongDesc, ImageSrc, ImageX, ImageY, ImageComplete, ObjectHspace, ObjectHeight, ObjectAlign,
+ ObjectBorder, ObjectCode, ObjectType, ObjectVspace, ObjectArchive,
+ ObjectDeclare, ObjectForm, ObjectCodeBase, ObjectCodeType, ObjectData,
+ ObjectName, ObjectStandby, ObjectTabIndex, ObjectUseMap, ObjectWidth, ObjectContentDocument,
+ ParamName, ParamType, ParamValueType, ParamValue, AppletArchive,
+ AppletAlt, AppletCode, AppletWidth, AppletAlign, AppletCodeBase,
+ AppletName, AppletHeight, AppletHspace, AppletObject, AppletVspace,
+ MapAreas, MapName, AreaHash, AreaHref, AreaTarget, AreaPort, AreaShape,
+ AreaCoords, AreaAlt, AreaAccessKey, AreaNoHref, AreaHost, AreaProtocol,
+ AreaHostName, AreaPathName, AreaSearch, AreaTabIndex, ScriptEvent,
+ ScriptType, ScriptHtmlFor, ScriptText, ScriptSrc, ScriptCharset,
+ ScriptDefer, TableSummary, TableTBodies, TableTHead, TableCellPadding,
+ TableDeleteCaption, TableCreateCaption, TableCaption, TableWidth,
+ TableCreateTFoot, TableAlign, TableTFoot, TableDeleteRow,
+ TableCellSpacing, TableRows, TableBgColor, TableBorder, TableFrame,
+ TableRules, TableCreateTHead, TableDeleteTHead, TableDeleteTFoot,
+ TableInsertRow, TableCaptionAlign, TableColCh, TableColChOff,
+ TableColAlign, TableColSpan, TableColVAlign, TableColWidth,
+ TableSectionCh, TableSectionDeleteRow, TableSectionChOff,
+ TableSectionRows, TableSectionAlign, TableSectionVAlign,
+ TableSectionInsertRow, TableRowSectionRowIndex, TableRowRowIndex,
+ TableRowChOff, TableRowCells, TableRowVAlign, TableRowCh,
+ TableRowAlign, TableRowBgColor, TableRowDeleteCell, TableRowInsertCell,
+ TableCellColSpan, TableCellNoWrap, TableCellAbbr, TableCellHeight,
+ TableCellWidth, TableCellCellIndex, TableCellChOff, TableCellBgColor,
+ TableCellCh, TableCellVAlign, TableCellRowSpan, TableCellHeaders,
+ TableCellAlign, TableCellAxis, TableCellScope, FrameSetCols,
+ FrameSetRows, FrameSrc, FrameLocation, FrameFrameBorder, FrameScrolling,
+ FrameMarginWidth, FrameLongDesc, FrameMarginHeight, FrameName,
+ FrameContentDocument, FrameContentWindow,
+ FrameNoResize, FrameWidth, FrameHeight, IFrameLongDesc, IFrameAlign,
+ IFrameFrameBorder, IFrameSrc, IFrameName, IFrameHeight,
+ IFrameMarginHeight, IFrameMarginWidth, IFrameScrolling, IFrameWidth,
+ IFrameContentDocument, IFrameContentWindow,
+ MarqueeStart, MarqueeStop,
+ LayerTop, LayerLeft, LayerVisibility, LayerBgColor, LayerClip, LayerDocument, LayerLayers,
+ ElementInnerHTML, ElementTitle, ElementId, ElementDir, ElementLang,
+ ElementClassName, ElementInnerText, ElementDocument,
+ ElementChildren, ElementAll, ElementScrollIntoView };
+
+ DOM::HTMLElement toElement() const { return static_cast<DOM::HTMLElement>(node); }
+ };
+
+ class HTMLElementFunction : public DOMFunction {
+ public:
+ HTMLElementFunction(ExecState *exec, int i, int len);
+ virtual Value tryCall(ExecState *exec, Object &thisObj, const List&args);
+ private:
+ int id;
+ };
+
+ class HTMLCollection : public DOMObject {
+ public:
+ HTMLCollection(ExecState *exec, const DOM::HTMLCollection& c);
+ HTMLCollection(const KJS::Object& proto, const DOM::HTMLCollection& c);
+ ~HTMLCollection();
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ virtual Value call(ExecState *exec, Object &thisObj, const List&args);
+ virtual Value tryCall(ExecState *exec, Object &thisObj, const List&args);
+ virtual bool implementsCall() const { return true; }
+ virtual bool toBoolean(ExecState *) const;
+ virtual bool hasProperty(ExecState *exec, const Identifier &p) const;
+ virtual ReferenceList propList(ExecState *exec, bool recursive);
+ enum { Item, NamedItem, Tags };
+ Value getNamedItems(ExecState *exec, const Identifier &propertyName) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ DOM::HTMLCollection toCollection() const { return collection; }
+ virtual void hide() { hidden = true; }
+ protected:
+ DOM::HTMLCollection collection;
+ bool hidden;
+ };
+
+ class HTMLSelectCollection : public HTMLCollection {
+ public:
+ enum { Add };
+ HTMLSelectCollection(ExecState *exec, const DOM::HTMLCollection& c, const DOM::HTMLSelectElement& e);
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+
+ DOM::HTMLSelectElement toElement() const { return element; }
+ private:
+ DOM::HTMLSelectElement element;
+ };
+
+ ////////////////////// Option Object ////////////////////////
+
+ class OptionConstructorImp : public ObjectImp {
+ public:
+ OptionConstructorImp(ExecState *exec, const DOM::Document &d);
+ virtual bool implementsConstruct() const;
+ virtual Object construct(ExecState *exec, const List &args);
+ private:
+ DOM::Document doc;
+ };
+
+ ////////////////////// Image Object ////////////////////////
+
+ class ImageConstructorImp : public ObjectImp {
+ public:
+ ImageConstructorImp(ExecState *exec, const DOM::Document &d);
+ virtual bool implementsConstruct() const;
+ virtual Object construct(ExecState *exec, const List &args);
+ private:
+ DOM::Document doc;
+ };
+
+ Value getHTMLCollection(ExecState *exec, const DOM::HTMLCollection& c, bool hide=false);
+ Value getSelectHTMLCollection(ExecState *exec, const DOM::HTMLCollection& c, const DOM::HTMLSelectElement& e);
+
+
+ //All the pseudo constructors..
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLHtmlElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLHeadElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLLinkElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLTitleElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLMetaElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLBaseElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLIsIndexElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLStyleElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLBodyElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLFormElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLSelectElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLOptGroupElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLOptionElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLInputElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLTextAreaElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLButtonElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLLabelElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLFieldSetElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLLegendElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLUListElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLOListElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLDListElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLDirectoryElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLMenuElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLLIElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLDivElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLParagraphElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLHeadingElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLBlockQuoteElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLQuoteElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLPreElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLBRElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLBaseFontElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLFontElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLHRElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLModElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLAnchorElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLImageElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLObjectElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLParamElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLAppletElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLMapElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLAreaElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLScriptElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLTableElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLTableCaptionElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLTableColElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLTableSectionElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLTableRowElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLTableCellElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLFrameSetElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLLayerElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLFrameElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLIFrameElementPseudoCtor)
+ DEFINE_PSEUDO_CONSTRUCTOR(HTMLMarqueeElementPseudoCtor)
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_mozilla.cpp b/tdehtml/ecma/kjs_mozilla.cpp
new file mode 100644
index 000000000..216fde26e
--- /dev/null
+++ b/tdehtml/ecma/kjs_mozilla.cpp
@@ -0,0 +1,94 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (c) 2003 George Staikos (staikos@kde.org)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include <klocale.h>
+#include <kdebug.h>
+
+#include "kjs_mozilla.h"
+#include "kjs/lookup.h"
+#include "kjs_binding.h"
+#include "tdehtml_part.h"
+#include "kjs_mozilla.lut.h"
+
+using namespace KJS;
+
+namespace KJS {
+
+const ClassInfo MozillaSidebarExtension::info = { "sidebar", 0, &MozillaSidebarExtensionTable, 0 };
+/*
+@begin MozillaSidebarExtensionTable 1
+ addPanel MozillaSidebarExtension::addPanel DontDelete|Function 0
+@end
+*/
+}
+IMPLEMENT_PROTOFUNC_DOM(MozillaSidebarExtensionFunc)
+
+MozillaSidebarExtension::MozillaSidebarExtension(ExecState *exec, KHTMLPart *p)
+ : ObjectImp(exec->interpreter()->builtinObjectPrototype()), m_part(p) { }
+
+Value MozillaSidebarExtension::get(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "MozillaSidebarExtension::get " << propertyName.ascii() << endl;
+#endif
+ return lookupGet<MozillaSidebarExtensionFunc,MozillaSidebarExtension,ObjectImp>(exec,propertyName,&MozillaSidebarExtensionTable,this);
+}
+
+Value MozillaSidebarExtension::getValueProperty(ExecState *exec, int token) const
+{
+ Q_UNUSED(exec);
+ switch (token) {
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in MozillaSidebarExtension::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+Value MozillaSidebarExtensionFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::MozillaSidebarExtension, thisObj );
+ MozillaSidebarExtension *mse = static_cast<MozillaSidebarExtension*>(thisObj.imp());
+
+ KHTMLPart *part = mse->part();
+ if (!part)
+ return Undefined();
+
+ // addPanel() id == 0
+ KParts::BrowserExtension *ext = part->browserExtension();
+ if (ext) {
+ TQString url, name;
+ if (args.size() == 1) { // I've seen this, don't know if it's legal.
+ name = TQString::null;
+ url = args[0].toString(exec).qstring();
+ } else if (args.size() == 2 || args.size() == 3) {
+ name = args[0].toString(exec).qstring();
+ url = args[1].toString(exec).qstring();
+ // 2 is the "CURL" which I don't understand and don't think we need.
+ } else {
+ return Boolean(false);
+ }
+ emit ext->addWebSideBar(KURL( url ), name);
+ return Boolean(true);
+ }
+
+ return Undefined();
+}
+
+
diff --git a/tdehtml/ecma/kjs_mozilla.h b/tdehtml/ecma/kjs_mozilla.h
new file mode 100644
index 000000000..220094f63
--- /dev/null
+++ b/tdehtml/ecma/kjs_mozilla.h
@@ -0,0 +1,44 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2003 George Staikos (staikos@kde.org)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_MOZILLA_H_
+#define _KJS_MOZILLA_H_
+
+#include <kjs/object.h>
+
+class KHTMLPart;
+
+namespace KJS {
+
+ class MozillaSidebarExtension : public ObjectImp {
+ public:
+ MozillaSidebarExtension(ExecState *exec, KHTMLPart *p);
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { addPanel };
+ KHTMLPart *part() const { return m_part; }
+ private:
+ KHTMLPart *m_part;
+ };
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_navigator.cpp b/tdehtml/ecma/kjs_navigator.cpp
new file mode 100644
index 000000000..222ef7902
--- /dev/null
+++ b/tdehtml/ecma/kjs_navigator.cpp
@@ -0,0 +1,670 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000 Harri Porten (porten@kde.org)
+ * Copyright (c) 2000 Daniel Molkentin (molkentin@kde.org)
+ * Copyright (c) 2000 Stefan Schimanski (schimmi@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include <klocale.h>
+
+#include <kstandarddirs.h>
+#include <kconfig.h>
+#include <kdebug.h>
+
+#include <kio/kprotocolmanager.h>
+#include <kio/kmimetype.h>
+#include <kio/kservice.h>
+#include <kio/ktrader.h>
+#include "kjs_navigator.h"
+#include "kjs/lookup.h"
+#include "kjs_binding.h"
+#include "tdehtml_part.h"
+#include <sys/utsname.h>
+#include "kjs_navigator.lut.h"
+
+using namespace KJS;
+
+namespace KJS {
+
+ // All objects that need plugin info must inherit from PluginBase
+ // Its ctor and dtor take care of the refcounting on the static lists.
+ class PluginBase : public ObjectImp {
+ public:
+ PluginBase(ExecState *exec, bool loadPluginInfo);
+ virtual ~PluginBase();
+
+ struct MimeClassInfo;
+ struct PluginInfo;
+
+ struct MimeClassInfo {
+ TQString type;
+ TQString desc;
+ TQString suffixes;
+ PluginInfo *plugin;
+ };
+
+ struct PluginInfo {
+ TQString name;
+ TQString file;
+ TQString desc;
+ TQPtrList<MimeClassInfo> mimes;
+ };
+
+ static TQPtrList<PluginInfo> *plugins;
+ static TQPtrList<MimeClassInfo> *mimes;
+
+ private:
+ static int m_refCount;
+ };
+
+
+ class Plugins : public PluginBase {
+ public:
+ Plugins(ExecState *exec, bool pluginsEnabled)
+ : PluginBase(exec, pluginsEnabled),
+ m_pluginsEnabled(pluginsEnabled) {};
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ Value pluginByName( ExecState* exec, const TQString& name ) const;
+ bool pluginsEnabled() const { return m_pluginsEnabled; };
+ private:
+ bool m_pluginsEnabled;
+ };
+
+
+ class MimeTypes : public PluginBase {
+ public:
+ MimeTypes(ExecState *exec, bool pluginsEnabled)
+ : PluginBase(exec, pluginsEnabled),
+ m_pluginsEnabled(pluginsEnabled) {};
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ Value getValueProperty(ExecState *exec, int token) const;
+ Value mimeTypeByName( ExecState* exec, const TQString& name ) const;
+ bool pluginsEnabled() const { return m_pluginsEnabled; };
+ private:
+ bool m_pluginsEnabled;
+ };
+
+
+ class Plugin : public PluginBase {
+ public:
+ Plugin( ExecState *exec, PluginBase::PluginInfo *info )
+ : PluginBase( exec, true )
+ { m_info = info; };
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ Value mimeByName(ExecState* exec, const TQString& name ) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ PluginBase::PluginInfo *pluginInfo() const { return m_info; }
+ private:
+ PluginBase::PluginInfo *m_info;
+ };
+
+
+ class MimeType : public PluginBase {
+ public:
+ MimeType( ExecState *exec, PluginBase::MimeClassInfo *info )
+ : PluginBase( exec, true )
+ { m_info = info; };
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ Value getValueProperty(ExecState *exec, int token) const;
+ private:
+ PluginBase::MimeClassInfo *m_info;
+ };
+
+}
+
+
+TQPtrList<PluginBase::PluginInfo> *KJS::PluginBase::plugins = 0;
+TQPtrList<PluginBase::MimeClassInfo> *KJS::PluginBase::mimes = 0;
+int KJS::PluginBase::m_refCount = 0;
+
+const ClassInfo Navigator::info = { "Navigator", 0, &NavigatorTable, 0 };
+/*
+@begin NavigatorTable 12
+ appCodeName Navigator::AppCodeName DontDelete|ReadOnly
+ appName Navigator::AppName DontDelete|ReadOnly
+ appVersion Navigator::AppVersion DontDelete|ReadOnly
+ language Navigator::Language DontDelete|ReadOnly
+ userAgent Navigator::UserAgent DontDelete|ReadOnly
+ userLanguage Navigator::UserLanguage DontDelete|ReadOnly
+ browserLanguage Navigator::BrowserLanguage DontDelete|ReadOnly
+ platform Navigator::Platform DontDelete|ReadOnly
+ cpuClass Navigator::CpuClass DontDelete|ReadOnly
+ plugins Navigator::_Plugins DontDelete|ReadOnly
+ mimeTypes Navigator::_MimeTypes DontDelete|ReadOnly
+ product Navigator::Product DontDelete|ReadOnly
+ vendor Navigator::Vendor DontDelete|ReadOnly
+ productSub Navigator::ProductSub DontDelete|ReadOnly
+ cookieEnabled Navigator::CookieEnabled DontDelete|ReadOnly
+ javaEnabled Navigator::JavaEnabled DontDelete|Function 0
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(NavigatorFunc)
+
+Navigator::Navigator(ExecState *exec, KHTMLPart *p)
+ : ObjectImp(exec->interpreter()->builtinObjectPrototype()), m_part(p) { }
+
+Value Navigator::get(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Navigator::get " << propertyName.ascii() << endl;
+#endif
+ return lookupGet<NavigatorFunc,Navigator,ObjectImp>(exec,propertyName,&NavigatorTable,this);
+}
+
+Value Navigator::getValueProperty(ExecState *exec, int token) const
+{
+ KURL url = m_part->url();
+ TQString userAgent = url.host();
+ if (userAgent.isEmpty())
+ userAgent = "localhost";
+ userAgent = KProtocolManager::userAgentForHost(userAgent);
+ switch (token) {
+ case AppCodeName:
+ return String("Mozilla");
+ case AppName:
+ // If we find "Mozilla" but not "(compatible, ...)" we are a real Netscape
+ if (userAgent.find(TQString::fromLatin1("Mozilla")) >= 0 &&
+ userAgent.find(TQString::fromLatin1("compatible")) == -1)
+ {
+ //kdDebug() << "appName -> Mozilla" << endl;
+ return String("Netscape");
+ }
+ if (userAgent.find(TQString::fromLatin1("Microsoft")) >= 0 ||
+ userAgent.find(TQString::fromLatin1("MSIE")) >= 0)
+ {
+ //kdDebug() << "appName -> IE" << endl;
+ return String("Microsoft Internet Explorer");
+ }
+ //kdDebug() << "appName -> Konqueror" << endl;
+ return String("Konqueror");
+ case AppVersion:
+ // We assume the string is something like Mozilla/version (properties)
+ return String(userAgent.mid(userAgent.find('/') + 1));
+ case Product:
+ // We are pretending to be Mozilla or Safari
+ if (userAgent.find(TQString::fromLatin1("Mozilla")) >= 0 &&
+ userAgent.find(TQString::fromLatin1("compatible")) == -1)
+ {
+ return String("Gecko");
+ }
+ // When spoofing as IE, we use Undefined().
+ if (userAgent.find(TQString::fromLatin1("Microsoft")) >= 0 ||
+ userAgent.find(TQString::fromLatin1("MSIE")) >= 0)
+ {
+ return Undefined();
+ }
+ // We are acting straight
+ return String("Konqueror/tdehtml");
+ case ProductSub:
+ {
+ int ix = userAgent.find("Gecko");
+ if (ix >= 0 && userAgent.length() >= (uint)ix+14 && userAgent.unicode()[ix+5] == TQChar('/') &&
+ userAgent.find(TQRegExp("\\d{8}"), ix+6) == ix+6)
+ {
+ // We have Gecko/<productSub> in the UA string
+ return String(userAgent.mid(ix+6, 8));
+ }
+ else if (ix >= 0)
+ {
+ return String("20040107");
+ }
+ }
+ return Undefined();
+ case Vendor:
+ return String("KDE");
+ case BrowserLanguage:
+ case Language:
+ case UserLanguage:
+ return String(TDEGlobal::locale()->language());
+ case UserAgent:
+ return String(userAgent);
+ case Platform:
+ // yet another evil hack, but necessary to spoof some sites...
+ if ( (userAgent.find(TQString::fromLatin1("Win"),0,false)>=0) )
+ return String(TQString::fromLatin1("Win32"));
+ else if ( (userAgent.find(TQString::fromLatin1("Macintosh"),0,false)>=0) ||
+ (userAgent.find(TQString::fromLatin1("Mac_PowerPC"),0,false)>=0) )
+ return String(TQString::fromLatin1("MacPPC"));
+ else
+ {
+ struct utsname name;
+ int ret = uname(&name);
+ if ( ret >= 0 )
+ return String(TQString(TQString::fromLatin1("%1 %1 X11").arg(name.sysname).arg(name.machine)));
+ else // can't happen
+ return String(TQString(TQString::fromLatin1("Unix X11")));
+ }
+ case CpuClass:
+ {
+ struct utsname name;
+ int ret = uname(&name);
+ if ( ret >= 0 )
+ return String(name.machine);
+ else // can't happen
+ return String("x86");
+ }
+ case _Plugins:
+ return Value(new Plugins(exec, m_part->pluginsEnabled()));
+ case _MimeTypes:
+ return Value(new MimeTypes(exec, m_part->pluginsEnabled()));
+ case CookieEnabled:
+ return Boolean(true); /// ##### FIXME
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMEvent::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+/*******************************************************************/
+
+PluginBase::PluginBase(ExecState *exec, bool loadPluginInfo)
+ : ObjectImp(exec->interpreter()->builtinObjectPrototype() )
+{
+ if ( loadPluginInfo && !plugins ) {
+ plugins = new TQPtrList<PluginInfo>;
+ mimes = new TQPtrList<MimeClassInfo>;
+ plugins->setAutoDelete( true );
+ mimes->setAutoDelete( true );
+
+ // read in using KTrader
+ KTrader::OfferList offers = KTrader::self()->query("Browser/View");
+ KTrader::OfferList::iterator it;
+ for ( it = offers.begin(); it != offers.end(); ++it ) {
+
+ TQVariant pluginsinfo = (**it).property( "X-TDE-BrowserView-PluginsInfo" );
+ if ( !pluginsinfo.isValid() ) {
+ // <backwards compatible>
+ if ((**it).library() == TQString("libnsplugin"))
+ pluginsinfo = TQVariant("nsplugins/pluginsinfo");
+ else
+ // </backwards compatible>
+ continue;
+ }
+ // read configuration
+ TDEConfig kc( locate ("data", pluginsinfo.toString()) );
+ unsigned num = (unsigned int) kc.readNumEntry("number");
+ for ( unsigned n = 0; n < num; n++ ) {
+ kc.setGroup( TQString::number(n) );
+ PluginInfo *plugin = new PluginInfo;
+
+ plugin->name = kc.readEntry("name");
+ plugin->file = kc.readPathEntry("file");
+ plugin->desc = kc.readEntry("description");
+
+ plugins->append( plugin );
+
+ // get mime types from string
+ TQStringList types = TQStringList::split( ';', kc.readEntry("mime") );
+ TQStringList::Iterator type;
+ for ( type=types.begin(); type!=types.end(); ++type ) {
+
+ // get mime information
+ TQStringList tokens = TQStringList::split(':', *type, true);
+ if ( tokens.count() < 3 ) // we need 3 items
+ continue;
+
+ MimeClassInfo *mime = new MimeClassInfo;
+ TQStringList::Iterator token = tokens.begin();
+ mime->type = (*token).lower();
+ //kdDebug(6070) << "mime->type=" << mime->type << endl;
+ ++token;
+
+ mime->suffixes = *token;
+ ++token;
+
+ mime->desc = *token;
+ ++token;
+
+ mime->plugin = plugin;
+
+ mimes->append( mime );
+ plugin->mimes.append( mime );
+
+ }
+ }
+ }
+ }
+
+ m_refCount++;
+}
+
+PluginBase::~PluginBase()
+{
+ m_refCount--;
+ if ( m_refCount==0 ) {
+ delete plugins;
+ delete mimes;
+ plugins = 0;
+ mimes = 0;
+ }
+}
+
+
+/*******************************************************************/
+
+const ClassInfo Plugins::info = { "PluginArray", 0, &PluginsTable, 0 };
+/*
+@begin PluginsTable 4
+ length Plugins_Length DontDelete|ReadOnly
+ refresh Plugins_Refresh DontDelete|Function 0
+ item Plugins_Item DontDelete|Function 1
+ namedItem Plugins_NamedItem DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(PluginsFunc)
+
+Value Plugins::get(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Plugins::get " << propertyName.qstring() << endl;
+#endif
+ if (!pluginsEnabled()) {
+ if (propertyName == lengthPropertyName )
+ return Number(0);
+ } else {
+ if ( propertyName == lengthPropertyName )
+ return Number(plugins->count());
+
+ // plugins[#]
+ bool ok;
+ unsigned int i = propertyName.toULong(&ok);
+ if( ok && i<plugins->count() )
+ return Value( new Plugin( exec, plugins->at(i) ) );
+
+ // plugin[name]
+ Value val = pluginByName( exec, propertyName.qstring() );
+ if (!val.isA(UndefinedType))
+ return val;
+ }
+
+ return lookupGet<PluginsFunc,Plugins,ObjectImp>(exec,propertyName,&PluginsTable,this);
+}
+
+Value Plugins::pluginByName( ExecState* exec, const TQString& name ) const
+{
+ Q_ASSERT(plugins);
+ for ( PluginInfo *pl = plugins->first(); pl!=0; pl = plugins->next() ) {
+ if ( pl->name == name )
+ return Value( new Plugin( exec, pl ) );
+ }
+ return Undefined();
+}
+
+Value Plugins::getValueProperty(ExecState* /*exec*/, int token) const
+{
+ kdDebug(6070) << "WARNING: Unhandled token in Plugins::getValueProperty : " << token << endl;
+ return Undefined();
+}
+
+Value PluginsFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::Plugins, thisObj );
+ KJS::Plugins* base = static_cast<KJS::Plugins *>(thisObj.imp());
+ if (!base->pluginsEnabled()) {
+ if (id == Plugins_Refresh || //## TODO
+ id == Plugins_Item ||
+ id == Plugins_NamedItem)
+ return Undefined();
+ } else {
+ switch( id ) {
+ case Plugins_Refresh:
+ return Undefined(); //## TODO
+ case Plugins_Item:
+ {
+ bool ok;
+ unsigned int i = args[0].toString(exec).toArrayIndex(&ok);
+ if( ok && i<base->plugins->count() )
+ return Value( new Plugin( exec, base->plugins->at(i) ) );
+ return Undefined();
+ }
+ case Plugins_NamedItem:
+ UString s = args[0].toString(exec);
+ return base->pluginByName( exec, s.qstring() );
+ }
+ }
+ kdDebug(6070) << "WARNING: Unhandled token in PluginsFunc::tryCall : " << id << endl;
+ return Undefined();
+}
+
+/*******************************************************************/
+
+const ClassInfo MimeTypes::info = { "MimeTypeArray", 0, &MimeTypesTable, 0 };
+/*
+@begin MimeTypesTable 3
+ length MimeTypes_Length DontDelete|ReadOnly
+ item MimeTypes_Item DontDelete|Function 1
+ namedItem MimeTypes_NamedItem DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(MimeTypesFunc)
+
+Value MimeTypes::get(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "MimeTypes::get " << propertyName.qstring() << endl;
+#endif
+ if (!pluginsEnabled()) {
+ if (propertyName == lengthPropertyName )
+ return Number(0);
+ } else {
+ if( propertyName==lengthPropertyName )
+ return Number( mimes->count() );
+
+ // mimeTypes[#]
+ bool ok;
+ unsigned int i = propertyName.toULong(&ok);
+ if( ok && i<mimes->count() )
+ return Value( new MimeType( exec, mimes->at(i) ) );
+
+ // mimeTypes[name]
+ Value val = mimeTypeByName( exec, propertyName.qstring() );
+ if (!val.isA(UndefinedType))
+ return val;
+ }
+
+ return lookupGet<MimeTypesFunc,MimeTypes,ObjectImp>(exec,propertyName,&MimeTypesTable,this);
+}
+
+Value MimeTypes::mimeTypeByName( ExecState* exec, const TQString& name ) const
+{
+ //kdDebug(6070) << "MimeTypes[" << name << "]" << endl;
+ Q_ASSERT(mimes);
+ for ( MimeClassInfo *m = mimes->first(); m!=0; m = mimes->next() ) {
+ if ( m->type == name )
+ return Value( new MimeType( exec, m ) );
+ }
+ return Undefined();
+}
+
+Value MimeTypes::getValueProperty(ExecState* /*exec*/, int token) const
+{
+ kdDebug(6070) << "WARNING: Unhandled token in MimeTypes::getValueProperty : " << token << endl;
+ return Undefined();
+}
+
+Value MimeTypesFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::MimeTypes, thisObj );
+ KJS::MimeTypes* base = static_cast<KJS::MimeTypes *>(thisObj.imp());
+ if (!base->pluginsEnabled()) {
+ if (id == MimeTypes_Item ||
+ id == MimeTypes_NamedItem)
+ return Undefined();
+ } else {
+ switch( id ) {
+ case MimeTypes_Item:
+ {
+ bool ok;
+ unsigned int i = args[0].toString(exec).toArrayIndex(&ok);
+ if( ok && i<base->mimes->count() )
+ return Value( new MimeType( exec, base->mimes->at(i) ) );
+ return Undefined();
+ }
+ case MimeTypes_NamedItem:
+ UString s = args[0].toString(exec);
+ return base->mimeTypeByName( exec, s.qstring() );
+ }
+ }
+ kdDebug(6070) << "WARNING: Unhandled token in MimeTypesFunc::tryCall : " << id << endl;
+ return Undefined();
+}
+
+/************************************************************************/
+const ClassInfo Plugin::info = { "Plugin", 0, &PluginTable, 0 };
+/*
+@begin PluginTable 7
+ name Plugin_Name DontDelete|ReadOnly
+ filename Plugin_FileName DontDelete|ReadOnly
+ description Plugin_Description DontDelete|ReadOnly
+ length Plugin_Length DontDelete|ReadOnly
+ item Plugin_Item DontDelete|Function 1
+ namedItem Plugin_NamedItem DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(PluginFunc)
+
+Value Plugin::get(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Plugin::get " << propertyName.qstring() << endl;
+#endif
+ if ( propertyName == lengthPropertyName )
+ return Number( m_info->mimes.count() );
+
+ // plugin[#]
+ bool ok;
+ unsigned int i = propertyName.toULong(&ok);
+ //kdDebug(6070) << "Plugin::get plugin[" << i << "]" << endl;
+ if( ok && i<m_info->mimes.count() )
+ {
+ //kdDebug(6070) << "returning mimetype " << m_info->mimes.at(i)->type << endl;
+ return Value(new MimeType(exec, m_info->mimes.at(i)));
+ }
+
+ // plugin["name"]
+ Value val = mimeByName( exec, propertyName.qstring() );
+ if (!val.isA(UndefinedType))
+ return val;
+
+ return lookupGet<PluginFunc,Plugin,ObjectImp>(exec, propertyName, &PluginTable, this );
+}
+
+Value Plugin::mimeByName(ExecState* exec, const TQString& name) const
+{
+ for ( PluginBase::MimeClassInfo *m = m_info->mimes.first();
+ m != 0; m = m_info->mimes.next() ) {
+ if ( m->type == name )
+ return Value(new MimeType(exec, m));
+ }
+ return Undefined();
+}
+
+Value Plugin::getValueProperty(ExecState* /*exec*/, int token) const
+{
+ switch( token ) {
+ case Plugin_Name:
+ return String( m_info->name );
+ case Plugin_FileName:
+ return String( m_info->file );
+ case Plugin_Description:
+ return String( m_info->desc );
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in Plugin::getValueProperty : " << token << endl;
+ return Undefined();
+ }
+}
+
+Value PluginFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::Plugin, thisObj );
+ KJS::Plugin* plugin = static_cast<KJS::Plugin *>(thisObj.imp());
+ switch( id ) {
+ case Plugin_Item:
+ {
+ bool ok;
+ unsigned int i = args[0].toString(exec).toArrayIndex(&ok);
+ if( ok && i< plugin->pluginInfo()->mimes.count() )
+ return Value( new MimeType( exec, plugin->pluginInfo()->mimes.at(i) ) );
+ return Undefined();
+ }
+ case Plugin_NamedItem:
+ {
+ UString s = args[0].toString(exec);
+ return plugin->mimeByName( exec, s.qstring() );
+ }
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in PluginFunc::tryCall : " << id << endl;
+ return Undefined();
+ }
+}
+
+/*****************************************************************************/
+
+const ClassInfo MimeType::info = { "MimeType", 0, &MimeTypeTable, 0 };
+/*
+@begin MimeTypeTable 4
+ description MimeType_Description DontDelete|ReadOnly
+ enabledPlugin MimeType_EnabledPlugin DontDelete|ReadOnly
+ suffixes MimeType_Suffixes DontDelete|ReadOnly
+ type MimeType_Type DontDelete|ReadOnly
+@end
+*/
+
+Value MimeType::get(ExecState *exec, const Identifier &propertyName) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "MimeType::get " << propertyName.qstring() << endl;
+#endif
+ return lookupGetValue<MimeType,ObjectImp>(exec, propertyName, &MimeTypeTable, this );
+}
+
+Value MimeType::getValueProperty(ExecState* exec, int token) const
+{
+ switch( token ) {
+ case MimeType_Type:
+ return String( m_info->type );
+ case MimeType_Suffixes:
+ return String( m_info->suffixes );
+ case MimeType_Description:
+ return String( m_info->desc );
+ case MimeType_EnabledPlugin:
+ return Value(new Plugin(exec, m_info->plugin));
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in MimeType::getValueProperty : " << token << endl;
+ return Undefined();
+ }
+}
+
+
+Value NavigatorFunc::tryCall(ExecState *exec, Object &thisObj, const List &)
+{
+ KJS_CHECK_THIS( KJS::Navigator, thisObj );
+ Navigator *nav = static_cast<Navigator *>(thisObj.imp());
+ // javaEnabled()
+ return Boolean(nav->part()->javaEnabled());
+}
diff --git a/tdehtml/ecma/kjs_navigator.h b/tdehtml/ecma/kjs_navigator.h
new file mode 100644
index 000000000..ccd1ba63b
--- /dev/null
+++ b/tdehtml/ecma/kjs_navigator.h
@@ -0,0 +1,53 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000 Harri Porten (porten@kde.org)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_NAVIGATOR_H_
+#define _KJS_NAVIGATOR_H_
+
+#include <kjs/object.h>
+
+class KHTMLPart;
+
+namespace KJS {
+
+ class Navigator : public ObjectImp {
+ public:
+ Navigator(ExecState *exec, KHTMLPart *p);
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { AppCodeName, AppName, AppVersion, Language, UserAgent, UserLanguage, Platform,
+ _Plugins, _MimeTypes, Product, ProductSub, Vendor, CookieEnabled, JavaEnabled,
+ BrowserLanguage, CpuClass };
+ KHTMLPart *part() const { return m_part; }
+ private:
+ KHTMLPart *m_part;
+ };
+
+ // Hashtable enums
+ enum { Plugins_Refresh, Plugins_Length, Plugins_Item, Plugins_NamedItem };
+ enum { MimeTypes_Length, MimeTypes_Item, MimeTypes_NamedItem };
+ enum { Plugin_Name, Plugin_FileName, Plugin_Description, Plugin_Length, Plugin_Item, Plugin_NamedItem };
+ enum { MimeType_Type, MimeType_Description, MimeType_EnabledPlugin, MimeType_Suffixes };
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_proxy.cpp b/tdehtml/ecma/kjs_proxy.cpp
new file mode 100644
index 000000000..cc7afa00a
--- /dev/null
+++ b/tdehtml/ecma/kjs_proxy.cpp
@@ -0,0 +1,411 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 1999-2001 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001,2003 Peter Kelly (pmk@post.com)
+ * Copyright (C) 2001-2003 David Faure (faure@kde.org)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include <config.h>
+
+#if defined(HAVE_VALGRIND_MEMCHECK_H) && !defined(NDEBUG)
+
+#include <valgrind/memcheck.h>
+#define VALGRIND_SUPPORT
+
+#endif
+
+
+#include "kjs_proxy.h"
+
+#include "kjs_window.h"
+#include "kjs_events.h"
+#include "kjs_debugwin.h"
+#include "xml/dom_nodeimpl.h"
+#include "tdehtmlpart_p.h"
+#include <tdehtml_part.h>
+#include <kprotocolmanager.h>
+#include <kdebug.h>
+#include <kmessagebox.h>
+#include <klocale.h>
+#include <unistd.h>
+#include <signal.h>
+#include <sys/time.h>
+#include <assert.h>
+#include <kjs/function.h>
+
+using namespace KJS;
+
+extern "C" {
+ KJSProxy *kjs_html_init(tdehtml::ChildFrame *childframe);
+}
+
+namespace KJS {
+
+class KJSProxyImpl : public KJSProxy {
+public:
+ KJSProxyImpl(tdehtml::ChildFrame *frame);
+ virtual ~KJSProxyImpl();
+ virtual TQVariant evaluate(TQString filename, int baseLine, const TQString &, const DOM::Node &n,
+ Completion *completion = 0);
+ virtual void clear();
+ virtual DOM::EventListener *createHTMLEventHandler(TQString sourceUrl, TQString name, TQString code, DOM::NodeImpl *node);
+ virtual void finishedWithEvent(const DOM::Event &event);
+ virtual KJS::Interpreter *interpreter();
+
+ virtual void setDebugEnabled(bool enabled);
+ virtual void showDebugWindow(bool show=true);
+ virtual bool paused() const;
+ virtual void dataReceived();
+
+ void initScript();
+ void applyUserAgent();
+
+private:
+ KJS::ScriptInterpreter* m_script;
+ bool m_debugEnabled;
+#ifndef NDEBUG
+ static int s_count;
+#endif
+};
+
+} // namespace KJS
+
+#ifndef NDEBUG
+int KJSProxyImpl::s_count = 0;
+#endif
+
+KJSProxyImpl::KJSProxyImpl(tdehtml::ChildFrame *frame)
+{
+ m_script = 0;
+ m_frame = frame;
+ m_debugEnabled = false;
+#ifndef NDEBUG
+ s_count++;
+#endif
+}
+
+KJSProxyImpl::~KJSProxyImpl()
+{
+ if ( m_script ) {
+ //kdDebug() << "KJSProxyImpl::~KJSProxyImpl clearing global object " << m_script->globalObject().imp() << endl;
+ // This allows to delete the global-object properties, like all the protos
+ static_cast<ObjectImp*>(m_script->globalObject().imp())->deleteAllProperties( m_script->globalExec() );
+ //kdDebug() << "KJSProxyImpl::~KJSProxyImpl garbage collecting" << endl;
+ while (KJS::Interpreter::collect())
+ ;
+ //kdDebug() << "KJSProxyImpl::~KJSProxyImpl deleting interpreter " << m_script << endl;
+ delete m_script;
+ //kdDebug() << "KJSProxyImpl::~KJSProxyImpl garbage collecting again" << endl;
+ // Garbage collect - as many times as necessary
+ // (we could delete an object which was holding another object, so
+ // the deref() will happen too late for deleting the impl of the 2nd object).
+ while (KJS::Interpreter::collect())
+ ;
+ }
+
+#ifndef NDEBUG
+ s_count--;
+ // If it was the last interpreter, we should have nothing left
+#ifdef KJS_DEBUG_MEM
+ if ( s_count == 0 )
+ Interpreter::finalCheck();
+#endif
+#endif
+}
+
+TQVariant KJSProxyImpl::evaluate(TQString filename, int baseLine,
+ const TQString&str, const DOM::Node &n, Completion *completion) {
+ // evaluate code. Returns the JS return value or an invalid QVariant
+ // if there was none, an error occurred or the type couldn't be converted.
+
+ initScript();
+ // inlineCode is true for <a href="javascript:doSomething()">
+ // and false for <script>doSomething()</script>. Check if it has the
+ // expected value in all cases.
+ // See smart window.open policy for where this is used.
+ bool inlineCode = filename.isNull();
+ //kdDebug(6070) << "KJSProxyImpl::evaluate inlineCode=" << inlineCode << endl;
+
+#ifdef KJS_DEBUGGER
+ if (inlineCode)
+ filename = "(unknown file)";
+ if (KJSDebugWin::debugWindow()) {
+ KJSDebugWin::debugWindow()->attach(m_script);
+ KJSDebugWin::debugWindow()->setNextSourceInfo(filename,baseLine);
+ // KJSDebugWin::debugWindow()->setMode(KJSDebugWin::Step);
+ }
+#else
+ Q_UNUSED(baseLine);
+#endif
+
+ m_script->setInlineCode(inlineCode);
+ Window* window = Window::retrieveWindow( m_frame->m_part );
+ KJS::Value thisNode = n.isNull() ? Window::retrieve( m_frame->m_part ) : getDOMNode(m_script->globalExec(),n);
+
+ UString code( str );
+
+ KJSCPUGuard guard;
+ guard.start();
+ Completion comp = m_script->evaluate(code, thisNode);
+ guard.stop();
+
+ bool success = ( comp.complType() == Normal ) || ( comp.complType() == ReturnValue );
+
+ if (completion)
+ *completion = comp;
+
+#ifdef KJS_DEBUGGER
+ // KJSDebugWin::debugWindow()->setCode(TQString::null);
+#endif
+
+ window->afterScriptExecution();
+
+ // let's try to convert the return value
+ if (success && comp.value().isValid())
+ return ValueToVariant( m_script->globalExec(), comp.value());
+ else
+ {
+ if ( comp.complType() == Throw )
+ {
+ UString msg = comp.value().toString(m_script->globalExec());
+ kdDebug(6070) << "WARNING: Script threw exception: " << msg.qstring() << endl;
+ }
+ return TQVariant();
+ }
+}
+
+// Implementation of the debug() function
+class TestFunctionImp : public ObjectImp {
+public:
+ TestFunctionImp() : ObjectImp() {}
+ virtual bool implementsCall() const { return true; }
+ virtual Value call(ExecState *exec, Object &thisObj, const List &args);
+};
+
+Value TestFunctionImp::call(ExecState *exec, Object &/*thisObj*/, const List &args)
+{
+ fprintf(stderr,"--> %s\n",args[0].toString(exec).ascii());
+ return Undefined();
+}
+
+void KJSProxyImpl::clear() {
+ // clear resources allocated by the interpreter, and make it ready to be used by another page
+ // We have to keep it, so that the Window object for the part remains the same.
+ // (we used to delete and re-create it, previously)
+ if (m_script) {
+#ifdef KJS_DEBUGGER
+ // ###
+ KJSDebugWin *debugWin = KJSDebugWin::debugWindow();
+ if (debugWin) {
+ if (debugWin->getExecState() &&
+ debugWin->getExecState()->interpreter() == m_script)
+ debugWin->slotStop();
+ debugWin->clearInterpreter(m_script);
+ }
+#endif
+ m_script->clear();
+
+ Window *win = static_cast<Window *>(m_script->globalObject().imp());
+ if (win) {
+ win->clear( m_script->globalExec() );
+ // re-add "debug", clear() removed it
+ m_script->globalObject().put(m_script->globalExec(),
+ "debug", Value(new TestFunctionImp()), Internal);
+ if ( win->part() )
+ applyUserAgent();
+ }
+
+ // Really delete everything that can be, so that the DOM nodes get deref'ed
+ //kdDebug() << k_funcinfo << "all done -> collecting" << endl;
+ while (KJS::Interpreter::collect())
+ ;
+ }
+}
+
+DOM::EventListener *KJSProxyImpl::createHTMLEventHandler(TQString sourceUrl, TQString name, TQString code, DOM::NodeImpl *node)
+{
+ initScript();
+
+#ifdef KJS_DEBUGGER
+ if (KJSDebugWin::debugWindow()) {
+ KJSDebugWin::debugWindow()->attach(m_script);
+ KJSDebugWin::debugWindow()->setNextSourceInfo(sourceUrl,m_handlerLineno);
+ }
+#else
+ Q_UNUSED(sourceUrl);
+#endif
+
+ return KJS::Window::retrieveWindow(m_frame->m_part)->getJSLazyEventListener(code,name,node);
+}
+
+void KJSProxyImpl::finishedWithEvent(const DOM::Event &event)
+{
+ // This is called when the DOM implementation has finished with a particular event. This
+ // is the case in sitations where an event has been created just for temporary usage,
+ // e.g. an image load or mouse move. Once the event has been dispatched, it is forgotten
+ // by the DOM implementation and so does not need to be cached still by the interpreter
+ ScriptInterpreter::forgetDOMObject(event.handle());
+}
+
+KJS::Interpreter *KJSProxyImpl::interpreter()
+{
+ if (!m_script)
+ initScript();
+ return m_script;
+}
+
+void KJSProxyImpl::setDebugEnabled(bool enabled)
+{
+#ifdef KJS_DEBUGGER
+ m_debugEnabled = enabled;
+ //if (m_script)
+ // m_script->setDebuggingEnabled(enabled);
+ // NOTE: this is consistent across all KJSProxyImpl instances, as we only
+ // ever have 1 debug window
+ if (!enabled && KJSDebugWin::debugWindow()) {
+ KJSDebugWin::destroyInstance();
+ }
+ else if (enabled && !KJSDebugWin::debugWindow()) {
+ KJSDebugWin::createInstance();
+ initScript();
+ KJSDebugWin::debugWindow()->attach(m_script);
+ }
+#else
+ Q_UNUSED(enabled);
+#endif
+}
+
+void KJSProxyImpl::showDebugWindow(bool /*show*/)
+{
+#ifdef KJS_DEBUGGER
+ if (KJSDebugWin::debugWindow())
+ KJSDebugWin::debugWindow()->show();
+#else
+ //Q_UNUSED(show);
+#endif
+}
+
+bool KJSProxyImpl::paused() const
+{
+#ifdef KJS_DEBUGGER
+ if (KJSDebugWin::debugWindow())
+ return KJSDebugWin::debugWindow()->inSession();
+#endif
+ return false;
+}
+
+void KJSProxyImpl::dataReceived()
+{
+#ifdef KJS_DEBUGGER
+ if (KJSDebugWin::debugWindow() && m_frame->m_part)
+ KJSDebugWin::debugWindow()->sourceChanged(m_script,m_frame->m_part->url().url());
+#endif
+}
+
+void KJSProxyImpl::initScript()
+{
+ if (m_script)
+ return;
+
+ // Build the global object - which is a Window instance
+ Object globalObject( new Window(m_frame) );
+
+ // Create a KJS interpreter for this part
+ m_script = new KJS::ScriptInterpreter(globalObject, m_frame);
+ static_cast<ObjectImp*>(globalObject.imp())->setPrototype(m_script->builtinObjectPrototype());
+
+#ifdef KJS_DEBUGGER
+ //m_script->setDebuggingEnabled(m_debugEnabled);
+#endif
+ //m_script->enableDebug();
+ globalObject.put(m_script->globalExec(),
+ "debug", Value(new TestFunctionImp()), Internal);
+ applyUserAgent();
+}
+
+void KJSProxyImpl::applyUserAgent()
+{
+ assert( m_script );
+ TQString host = m_frame->m_part->url().isLocalFile() ? "localhost" : m_frame->m_part->url().host();
+ TQString userAgent = KProtocolManager::userAgentForHost(host);
+ if (userAgent.find(TQString::fromLatin1("Microsoft")) >= 0 ||
+ userAgent.find(TQString::fromLatin1("MSIE")) >= 0)
+ {
+ m_script->setCompatMode(Interpreter::IECompat);
+#ifdef KJS_VERBOSE
+ kdDebug() << "Setting IE compat mode" << endl;
+#endif
+ }
+ else
+ // If we find "Mozilla" but not "(compatible, ...)" we are a real Netscape
+ if (userAgent.find(TQString::fromLatin1("Mozilla")) >= 0 &&
+ userAgent.find(TQString::fromLatin1("compatible")) == -1 &&
+ userAgent.find(TQString::fromLatin1("KHTML")) == -1)
+ {
+ m_script->setCompatMode(Interpreter::NetscapeCompat);
+#ifdef KJS_VERBOSE
+ kdDebug() << "Setting NS compat mode" << endl;
+#endif
+ }
+}
+
+// Helper method, so that all classes which need jScript() don't need to be added
+// as friend to KHTMLPart
+KJSProxy * KJSProxy::proxy( KHTMLPart *part )
+{
+ return part->jScript();
+}
+
+// initialize HTML module
+KJSProxy *kjs_html_init(tdehtml::ChildFrame *childframe)
+{
+ return new KJSProxyImpl(childframe);
+}
+
+void KJSCPUGuard::start(unsigned int ms, unsigned int i_ms)
+{
+#ifdef VALGRIND_SUPPORT
+ if (RUNNING_ON_VALGRIND) {
+ ms *= 50;
+ i_ms *= 50;
+ }
+#endif
+
+ oldAlarmHandler = signal(SIGVTALRM, alarmHandler);
+ itimerval tv = {
+ { i_ms / 1000, (i_ms % 1000) * 1000 },
+ { ms / 1000, (ms % 1000) * 1000 }
+ };
+ setitimer(ITIMER_VIRTUAL, &tv, &oldtv);
+}
+
+void KJSCPUGuard::stop()
+{
+ setitimer(ITIMER_VIRTUAL, &oldtv, 0L);
+ signal(SIGVTALRM, oldAlarmHandler);
+}
+
+bool KJSCPUGuard::confirmTerminate() {
+ kdDebug(6070) << "alarmhandler" << endl;
+ return KMessageBox::warningYesNo(0L, i18n("A script on this page is causing KHTML to freeze. If it continues to run, other applications may become less responsive.\nDo you want to abort the script?"), i18n("JavaScript"), i18n("&Abort"), KStdGuiItem::cont(), "kjscupguard_alarmhandler") == KMessageBox::Yes;
+}
+
+void KJSCPUGuard::alarmHandler(int) {
+ ExecState::requestTerminate();
+ ExecState::confirmTerminate = KJSCPUGuard::confirmTerminate;
+}
diff --git a/tdehtml/ecma/kjs_proxy.h b/tdehtml/ecma/kjs_proxy.h
new file mode 100644
index 000000000..5ea2d5bf6
--- /dev/null
+++ b/tdehtml/ecma/kjs_proxy.h
@@ -0,0 +1,91 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 1999 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_PROXY_H_
+#define _KJS_PROXY_H_
+
+#include <tqvariant.h>
+#include <tqstring.h>
+#include <sys/time.h>
+
+class KHTMLPart;
+
+namespace DOM {
+ class Node;
+ class NodeImpl;
+ class EventListener;
+ class Event;
+}
+
+namespace KJS {
+ class List;
+ class Interpreter;
+ class Completion;
+ class KJSDebugWin;
+}
+
+namespace tdehtml {
+ class ChildFrame;
+}
+
+/**
+ * @internal
+ *
+ * @short Proxy class serving as interface when being dlopen'ed.
+ */
+class KJSProxy {
+public:
+ KJSProxy() { m_handlerLineno = 0; }
+ virtual ~KJSProxy() { }
+ virtual TQVariant evaluate(TQString filename, int baseLine, const TQString &, const DOM::Node &n,
+ KJS::Completion *completion = 0) = 0;
+ virtual void clear() = 0;
+ virtual DOM::EventListener *createHTMLEventHandler(TQString sourceUrl, TQString name, TQString code, DOM::NodeImpl* node) = 0;
+ virtual void finishedWithEvent(const DOM::Event &event) = 0;
+ virtual KJS::Interpreter *interpreter() = 0;
+
+ virtual void setDebugEnabled(bool enabled) = 0;
+ virtual void showDebugWindow(bool show=true) = 0;
+ virtual bool paused() const = 0;
+ virtual void dataReceived() = 0;
+
+ void setEventHandlerLineno(int lineno) { m_handlerLineno = lineno; }
+
+ tdehtml::ChildFrame *m_frame;
+ int m_handlerLineno;
+
+ // Helper method, to access the private KHTMLPart::jScript()
+ static KJSProxy *proxy( KHTMLPart *part );
+};
+
+class KJSCPUGuard {
+public:
+ KJSCPUGuard() {}
+ void start(unsigned int msec=5000, unsigned int i_msec=10000);
+ void stop();
+private:
+ void (*oldAlarmHandler)(int);
+ static void alarmHandler(int);
+ static bool confirmTerminate();
+ itimerval oldtv;
+};
+
+#endif
diff --git a/tdehtml/ecma/kjs_range.cpp b/tdehtml/ecma/kjs_range.cpp
new file mode 100644
index 000000000..bf148ffe8
--- /dev/null
+++ b/tdehtml/ecma/kjs_range.cpp
@@ -0,0 +1,233 @@
+
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "kjs_range.h"
+#include "kjs_range.lut.h"
+#include <kdebug.h>
+
+namespace KJS {
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMRange::info = { "Range", 0, &DOMRangeTable, 0 };
+/*
+@begin DOMRangeTable 7
+ startContainer DOMRange::StartContainer DontDelete|ReadOnly
+ startOffset DOMRange::StartOffset DontDelete|ReadOnly
+ endContainer DOMRange::EndContainer DontDelete|ReadOnly
+ endOffset DOMRange::EndOffset DontDelete|ReadOnly
+ collapsed DOMRange::Collapsed DontDelete|ReadOnly
+ commonAncestorContainer DOMRange::CommonAncestorContainer DontDelete|ReadOnly
+@end
+@begin DOMRangeProtoTable 17
+setStart DOMRange::SetStart DontDelete|Function 2
+ setEnd DOMRange::SetEnd DontDelete|Function 2
+ setStartBefore DOMRange::SetStartBefore DontDelete|Function 1
+ setStartAfter DOMRange::SetStartAfter DontDelete|Function 1
+ setEndBefore DOMRange::SetEndBefore DontDelete|Function 1
+ setEndAfter DOMRange::SetEndAfter DontDelete|Function 1
+ collapse DOMRange::Collapse DontDelete|Function 1
+ selectNode DOMRange::SelectNode DontDelete|Function 1
+ selectNodeContents DOMRange::SelectNodeContents DontDelete|Function 1
+ compareBoundaryPoints DOMRange::CompareBoundaryPoints DontDelete|Function 2
+ deleteContents DOMRange::DeleteContents DontDelete|Function 0
+ extractContents DOMRange::ExtractContents DontDelete|Function 0
+ cloneContents DOMRange::CloneContents DontDelete|Function 0
+ insertNode DOMRange::InsertNode DontDelete|Function 1
+ surroundContents DOMRange::SurroundContents DontDelete|Function 1
+ cloneRange DOMRange::CloneRange DontDelete|Function 0
+ toString DOMRange::ToString DontDelete|Function 0
+ detach DOMRange::Detach DontDelete|Function 0
+ createContextualFragment DOMRange::CreateContextualFragment DontDelete|Function 1
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMRangeProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMRangeProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMRange",DOMRangeProto,DOMRangeProtoFunc)
+
+DOMRange::DOMRange(ExecState *exec, DOM::Range r)
+ : DOMObject(DOMRangeProto::self(exec)), range(r) {}
+
+DOMRange::~DOMRange()
+{
+ ScriptInterpreter::forgetDOMObject(range.handle());
+}
+
+Value DOMRange::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<DOMRange,DOMObject>(exec,p,&DOMRangeTable,this);
+}
+
+Value DOMRange::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case StartContainer:
+ return getDOMNode(exec,range.startContainer());
+ case StartOffset:
+ return Number(range.startOffset());
+ case EndContainer:
+ return getDOMNode(exec,range.endContainer());
+ case EndOffset:
+ return Number(range.endOffset());
+ case Collapsed:
+ return Boolean(range.collapsed());
+ case CommonAncestorContainer: {
+ DOM::Range range2 = range; // avoid const error
+ return getDOMNode(exec,range2.commonAncestorContainer());
+ }
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMRange::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+Value DOMRangeProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMRange, thisObj );
+ DOM::Range range = static_cast<DOMRange *>(thisObj.imp())->toRange();
+ Value result;
+
+ switch (id) {
+ case DOMRange::SetStart:
+ range.setStart(toNode(args[0]),args[1].toInteger(exec));
+ result = Undefined();
+ break;
+ case DOMRange::SetEnd:
+ range.setEnd(toNode(args[0]),args[1].toInteger(exec));
+ result = Undefined();
+ break;
+ case DOMRange::SetStartBefore:
+ range.setStartBefore(toNode(args[0]));
+ result = Undefined();
+ break;
+ case DOMRange::SetStartAfter:
+ range.setStartAfter(toNode(args[0]));
+ result = Undefined();
+ break;
+ case DOMRange::SetEndBefore:
+ range.setEndBefore(toNode(args[0]));
+ result = Undefined();
+ break;
+ case DOMRange::SetEndAfter:
+ range.setEndAfter(toNode(args[0]));
+ result = Undefined();
+ break;
+ case DOMRange::Collapse:
+ range.collapse(args[0].toBoolean(exec));
+ result = Undefined();
+ break;
+ case DOMRange::SelectNode:
+ range.selectNode(toNode(args[0]));
+ result = Undefined();
+ break;
+ case DOMRange::SelectNodeContents:
+ range.selectNodeContents(toNode(args[0]));
+ result = Undefined();
+ break;
+ case DOMRange::CompareBoundaryPoints:
+ result = Number(range.compareBoundaryPoints(static_cast<DOM::Range::CompareHow>(args[0].toInteger(exec)),toRange(args[1])));
+ break;
+ case DOMRange::DeleteContents:
+ range.deleteContents();
+ result = Undefined();
+ break;
+ case DOMRange::ExtractContents:
+ result = getDOMNode(exec,range.extractContents());
+ break;
+ case DOMRange::CloneContents:
+ result = getDOMNode(exec,range.cloneContents());
+ break;
+ case DOMRange::InsertNode:
+ range.insertNode(toNode(args[0]));
+ result = Undefined();
+ break;
+ case DOMRange::SurroundContents:
+ range.surroundContents(toNode(args[0]));
+ result = Undefined();
+ break;
+ case DOMRange::CloneRange:
+ result = getDOMRange(exec,range.cloneRange());
+ break;
+ case DOMRange::ToString:
+ result = String(range.toString());
+ break;
+ case DOMRange::Detach:
+ range.detach();
+ result = Undefined();
+ break;
+ case DOMRange::CreateContextualFragment:
+ Value value = args[0];
+ DOM::DOMString str = value.isA(NullType) ? DOM::DOMString() : value.toString(exec).string();
+ result = getDOMNode(exec, range.createContextualFragment(str));
+ break;
+ };
+
+ return result;
+}
+
+Value getDOMRange(ExecState *exec, DOM::Range r)
+{
+ return cacheDOMObject<DOM::Range, KJS::DOMRange>(exec, r);
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo RangeConstructor::info = { "RangeConstructor", 0, &RangeConstructorTable, 0 };
+/*
+@begin RangeConstructorTable 5
+ START_TO_START DOM::Range::START_TO_START DontDelete|ReadOnly
+ START_TO_END DOM::Range::START_TO_END DontDelete|ReadOnly
+ END_TO_END DOM::Range::END_TO_END DontDelete|ReadOnly
+ END_TO_START DOM::Range::END_TO_START DontDelete|ReadOnly
+@end
+*/
+
+RangeConstructor::RangeConstructor(ExecState *exec)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()) { }
+
+Value RangeConstructor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<RangeConstructor,DOMObject>(exec,p,&RangeConstructorTable,this);
+}
+
+Value RangeConstructor::getValueProperty(ExecState *, int token) const
+{
+ return Number(token);
+}
+
+Value getRangeConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<RangeConstructor>(exec, "[[range.constructor]]");
+}
+
+
+DOM::Range toRange(const Value& val)
+{
+ Object obj = Object::dynamicCast(val);
+ if (!obj.isValid() || !obj.inherits(&DOMRange::info))
+ return DOM::Range();
+
+ const DOMRange *dobj = static_cast<const DOMRange*>(obj.imp());
+ return dobj->toRange();
+}
+
+} //namespace KJS
diff --git a/tdehtml/ecma/kjs_range.h b/tdehtml/ecma/kjs_range.h
new file mode 100644
index 000000000..fbf47020f
--- /dev/null
+++ b/tdehtml/ecma/kjs_range.h
@@ -0,0 +1,71 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_RANGE_H_
+#define _KJS_RANGE_H_
+
+#include "ecma/kjs_dom.h"
+#include "dom/dom2_range.h"
+
+namespace KJS {
+
+ class DOMRange : public DOMObject {
+ public:
+ DOMRange(ExecState *exec, DOM::Range r);
+ ~DOMRange();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { StartContainer, StartOffset, EndContainer, EndOffset, Collapsed,
+ CommonAncestorContainer,
+ SetStart, SetEnd, SetStartBefore, SetStartAfter, SetEndBefore,
+ SetEndAfter, Collapse, SelectNode, SelectNodeContents,
+ CompareBoundaryPoints, DeleteContents, ExtractContents,
+ CloneContents, InsertNode, SurroundContents, CloneRange, ToString,
+ Detach, CreateContextualFragment };
+ DOM::Range toRange() const { return range; }
+ protected:
+ DOM::Range range;
+ };
+
+ // Constructor object Range
+ class RangeConstructor : public DOMObject {
+ public:
+ RangeConstructor(ExecState *);
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ };
+
+ Value getDOMRange(ExecState *exec, DOM::Range r);
+ Value getRangeConstructor(ExecState *exec);
+
+ /**
+ * Convert an object to a Range. Returns a null Node if not possible.
+ */
+ DOM::Range toRange(const Value&);
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_traversal.cpp b/tdehtml/ecma/kjs_traversal.cpp
new file mode 100644
index 000000000..b8b9e824a
--- /dev/null
+++ b/tdehtml/ecma/kjs_traversal.cpp
@@ -0,0 +1,327 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "kjs_traversal.h"
+#include "kjs_traversal.lut.h"
+#include "kjs_proxy.h"
+#include <dom/dom_node.h>
+#include <xml/dom_nodeimpl.h>
+#include <xml/dom_docimpl.h>
+#include <tdehtmlview.h>
+#include <tdehtml_part.h>
+#include <kdebug.h>
+
+namespace KJS {
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMNodeIterator::info = { "NodeIterator", 0, &DOMNodeIteratorTable, 0 };
+/*
+@begin DOMNodeIteratorTable 5
+ root DOMNodeIterator::Root DontDelete|ReadOnly
+ whatToShow DOMNodeIterator::WhatToShow DontDelete|ReadOnly
+ filter DOMNodeIterator::Filter DontDelete|ReadOnly
+ expandEntityReferences DOMNodeIterator::ExpandEntityReferences DontDelete|ReadOnly
+@end
+@begin DOMNodeIteratorProtoTable 3
+ nextNode DOMNodeIterator::NextNode DontDelete|Function 0
+ previousNode DOMNodeIterator::PreviousNode DontDelete|Function 0
+ detach DOMNodeIterator::Detach DontDelete|Function 0
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMNodeIteratorProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMNodeIteratorProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMNodeIterator", DOMNodeIteratorProto,DOMNodeIteratorProtoFunc)
+
+DOMNodeIterator::DOMNodeIterator(ExecState *exec, DOM::NodeIterator ni)
+ : DOMObject(DOMNodeIteratorProto::self(exec)), nodeIterator(ni) {}
+
+DOMNodeIterator::~DOMNodeIterator()
+{
+ ScriptInterpreter::forgetDOMObject(nodeIterator.handle());
+}
+
+Value DOMNodeIterator::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<DOMNodeIterator,DOMObject>(exec,p,&DOMNodeIteratorTable,this);
+}
+
+Value DOMNodeIterator::getValueProperty(ExecState *exec, int token) const
+{
+ DOM::NodeIterator ni(nodeIterator);
+ switch (token) {
+ case Root:
+ return getDOMNode(exec,ni.root());
+ case WhatToShow:
+ return Number(ni.whatToShow());
+ case Filter:
+ return getDOMNodeFilter(exec,ni.filter());
+ case ExpandEntityReferences:
+ return Boolean(ni.expandEntityReferences());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMNodeIterator::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+Value DOMNodeIteratorProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &)
+{
+ KJS_CHECK_THIS( KJS::DOMNodeIterator, thisObj );
+ DOM::NodeIterator nodeIterator = static_cast<DOMNodeIterator *>(thisObj.imp())->toNodeIterator();
+ switch (id) {
+ case DOMNodeIterator::PreviousNode:
+ return getDOMNode(exec,nodeIterator.previousNode());
+ case DOMNodeIterator::NextNode:
+ return getDOMNode(exec,nodeIterator.nextNode());
+ case DOMNodeIterator::Detach:
+ nodeIterator.detach();
+ return Undefined();
+ }
+ return Undefined();
+}
+
+Value getDOMNodeIterator(ExecState *exec, DOM::NodeIterator ni)
+{
+ return cacheDOMObject<DOM::NodeIterator, DOMNodeIterator>(exec, ni);
+}
+
+
+// -------------------------------------------------------------------------
+
+const ClassInfo NodeFilterConstructor::info = { "NodeFilterConstructor", 0, &NodeFilterConstructorTable, 0 };
+/*
+@begin NodeFilterConstructorTable 17
+ FILTER_ACCEPT DOM::NodeFilter::FILTER_ACCEPT DontDelete|ReadOnly
+ FILTER_REJECT DOM::NodeFilter::FILTER_REJECT DontDelete|ReadOnly
+ FILTER_SKIP DOM::NodeFilter::FILTER_SKIP DontDelete|ReadOnly
+ SHOW_ALL DOM::NodeFilter::SHOW_ALL DontDelete|ReadOnly
+ SHOW_ELEMENT DOM::NodeFilter::SHOW_ELEMENT DontDelete|ReadOnly
+ SHOW_ATTRIBUTE DOM::NodeFilter::SHOW_ATTRIBUTE DontDelete|ReadOnly
+ SHOW_TEXT DOM::NodeFilter::SHOW_TEXT DontDelete|ReadOnly
+ SHOW_CDATA_SECTION DOM::NodeFilter::SHOW_CDATA_SECTION DontDelete|ReadOnly
+ SHOW_ENTITY_REFERENCE DOM::NodeFilter::SHOW_ENTITY_REFERENCE DontDelete|ReadOnly
+ SHOW_ENTITY DOM::NodeFilter::SHOW_ENTITY DontDelete|ReadOnly
+ SHOW_PROCESSING_INSTRUCTION DOM::NodeFilter::SHOW_PROCESSING_INSTRUCTION DontDelete|ReadOnly
+ SHOW_COMMENT DOM::NodeFilter::SHOW_COMMENT DontDelete|ReadOnly
+ SHOW_DOCUMENT DOM::NodeFilter::SHOW_DOCUMENT DontDelete|ReadOnly
+ SHOW_DOCUMENT_TYPE DOM::NodeFilter::SHOW_DOCUMENT_TYPE DontDelete|ReadOnly
+ SHOW_DOCUMENT_FRAGMENT DOM::NodeFilter::SHOW_DOCUMENT_FRAGMENT DontDelete|ReadOnly
+ SHOW_NOTATION DOM::NodeFilter::SHOW_NOTATION DontDelete|ReadOnly
+@end
+*/
+
+NodeFilterConstructor::NodeFilterConstructor(ExecState* exec)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype())
+{
+}
+
+Value NodeFilterConstructor::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<NodeFilterConstructor,DOMObject>(exec,p,&NodeFilterConstructorTable,this);
+}
+
+Value NodeFilterConstructor::getValueProperty(ExecState *, int token) const
+{
+ // We use the token as the value to return directly
+ return Number(token);
+}
+
+Value getNodeFilterConstructor(ExecState *exec)
+{
+ return cacheGlobalObject<NodeFilterConstructor>(exec, "[[nodeFilter.constructor]]");
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMNodeFilter::info = { "NodeFilter", 0, 0, 0 };
+/*
+@begin DOMNodeFilterProtoTable 1
+ acceptNode DOMNodeFilter::AcceptNode DontDelete|Function 0
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMNodeFilterProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMNodeFilterProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMNodeFilter",DOMNodeFilterProto,DOMNodeFilterProtoFunc)
+
+DOMNodeFilter::DOMNodeFilter(ExecState *exec, DOM::NodeFilter nf)
+ : DOMObject(DOMNodeFilterProto::self(exec)), nodeFilter(nf) {}
+
+DOMNodeFilter::~DOMNodeFilter()
+{
+ ScriptInterpreter::forgetDOMObject(nodeFilter.handle());
+}
+
+Value DOMNodeFilterProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMNodeFilter, thisObj );
+ DOM::NodeFilter nodeFilter = static_cast<DOMNodeFilter *>(thisObj.imp())->toNodeFilter();
+ switch (id) {
+ case DOMNodeFilter::AcceptNode:
+ return Number(nodeFilter.acceptNode(toNode(args[0])));
+ }
+ return Undefined();
+}
+
+Value getDOMNodeFilter(ExecState *exec, DOM::NodeFilter nf)
+{
+ return cacheDOMObject<DOM::NodeFilter, DOMNodeFilter>(exec, nf);
+}
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMTreeWalker::info = { "TreeWalker", 0, &DOMTreeWalkerTable, 0 };
+/*
+@begin DOMTreeWalkerTable 5
+ root DOMTreeWalker::Root DontDelete|ReadOnly
+ whatToShow DOMTreeWalker::WhatToShow DontDelete|ReadOnly
+ filter DOMTreeWalker::Filter DontDelete|ReadOnly
+ expandEntityReferences DOMTreeWalker::ExpandEntityReferences DontDelete|ReadOnly
+ currentNode DOMTreeWalker::CurrentNode DontDelete
+@end
+@begin DOMTreeWalkerProtoTable 7
+ parentNode DOMTreeWalker::ParentNode DontDelete|Function 0
+ firstChild DOMTreeWalker::FirstChild DontDelete|Function 0
+ lastChild DOMTreeWalker::LastChild DontDelete|Function 0
+ previousSibling DOMTreeWalker::PreviousSibling DontDelete|Function 0
+ nextSibling DOMTreeWalker::NextSibling DontDelete|Function 0
+ previousNode DOMTreeWalker::PreviousNode DontDelete|Function 0
+ nextNode DOMTreeWalker::NextNode DontDelete|Function 0
+@end
+*/
+KJS_DEFINE_PROTOTYPE(DOMTreeWalkerProto)
+IMPLEMENT_PROTOFUNC_DOM(DOMTreeWalkerProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("DOMTreeWalker", DOMTreeWalkerProto,DOMTreeWalkerProtoFunc)
+
+DOMTreeWalker::DOMTreeWalker(ExecState *exec, DOM::TreeWalker tw)
+ : DOMObject(DOMTreeWalkerProto::self(exec)), treeWalker(tw) {}
+
+DOMTreeWalker::~DOMTreeWalker()
+{
+ ScriptInterpreter::forgetDOMObject(treeWalker.handle());
+}
+
+Value DOMTreeWalker::tryGet(ExecState *exec, const Identifier &p) const
+{
+ return DOMObjectLookupGetValue<DOMTreeWalker,DOMObject>(exec,p,&DOMTreeWalkerTable,this);
+}
+
+Value DOMTreeWalker::getValueProperty(ExecState *exec, int token) const
+{
+ DOM::TreeWalker tw(treeWalker);
+ switch (token) {
+ case Root:
+ return getDOMNode(exec,tw.root());
+ case WhatToShow:
+ return Number(tw.whatToShow());
+ case Filter:
+ return getDOMNodeFilter(exec,tw.filter());
+ case ExpandEntityReferences:
+ return Boolean(tw.expandEntityReferences());
+ case CurrentNode:
+ return getDOMNode(exec,tw.currentNode());
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in DOMTreeWalker::getValueProperty : " << token << endl;
+ return Value();
+ }
+}
+
+void DOMTreeWalker::tryPut(ExecState *exec, const Identifier &propertyName,
+ const Value& value, int attr)
+{
+ if (propertyName == "currentNode") {
+ treeWalker.setCurrentNode(toNode(value));
+ }
+ else
+ ObjectImp::put(exec, propertyName, value, attr);
+}
+
+Value DOMTreeWalkerProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &)
+{
+ KJS_CHECK_THIS( KJS::DOMTreeWalker, thisObj );
+ DOM::TreeWalker treeWalker = static_cast<DOMTreeWalker *>(thisObj.imp())->toTreeWalker();
+ switch (id) {
+ case DOMTreeWalker::ParentNode:
+ return getDOMNode(exec,treeWalker.parentNode());
+ case DOMTreeWalker::FirstChild:
+ return getDOMNode(exec,treeWalker.firstChild());
+ case DOMTreeWalker::LastChild:
+ return getDOMNode(exec,treeWalker.lastChild());
+ case DOMTreeWalker::PreviousSibling:
+ return getDOMNode(exec,treeWalker.previousSibling());
+ case DOMTreeWalker::NextSibling:
+ return getDOMNode(exec,treeWalker.nextSibling());
+ case DOMTreeWalker::PreviousNode:
+ return getDOMNode(exec,treeWalker.previousSibling());
+ case DOMTreeWalker::NextNode:
+ return getDOMNode(exec,treeWalker.nextNode());
+ }
+ return Undefined();
+}
+
+Value getDOMTreeWalker(ExecState *exec, DOM::TreeWalker tw)
+{
+ return cacheDOMObject<DOM::TreeWalker, DOMTreeWalker>(exec, tw);
+}
+
+DOM::NodeFilter toNodeFilter(const Value& val)
+{
+ Object obj = Object::dynamicCast(val);
+ if (!obj.isValid() || !obj.inherits(&DOMNodeFilter::info))
+ return DOM::NodeFilter();
+
+ const DOMNodeFilter *dobj = static_cast<const DOMNodeFilter*>(obj.imp());
+ return dobj->toNodeFilter();
+}
+
+// -------------------------------------------------------------------------
+
+JSNodeFilter::JSNodeFilter(Object & _filter) : DOM::CustomNodeFilter(), filter( _filter )
+{
+}
+
+JSNodeFilter::~JSNodeFilter()
+{
+}
+
+short JSNodeFilter::acceptNode(const DOM::Node &n)
+{
+ KHTMLView *view = static_cast<DOM::DocumentImpl *>( n.handle()->docPtr() )->view();
+ if (!view)
+ return DOM::NodeFilter::FILTER_REJECT;
+
+ KHTMLPart *part = view->part();
+ KJSProxy *proxy = part->jScript();
+ if (proxy) {
+ ExecState *exec = proxy->interpreter()->globalExec();
+ Object acceptNodeFunc = Object::dynamicCast( filter.get(exec, "acceptNode") );
+ if (!acceptNodeFunc.isNull() && acceptNodeFunc.implementsCall()) {
+ List args;
+ args.append(getDOMNode(exec,n));
+ Value result = acceptNodeFunc.call(exec,filter,args);
+ if (exec->hadException())
+ exec->clearException();
+ return result.toInteger(exec);
+ }
+ }
+
+ return DOM::NodeFilter::FILTER_REJECT;
+}
+
+} //namespace KJS
diff --git a/tdehtml/ecma/kjs_traversal.h b/tdehtml/ecma/kjs_traversal.h
new file mode 100644
index 000000000..fd7e064b1
--- /dev/null
+++ b/tdehtml/ecma/kjs_traversal.h
@@ -0,0 +1,108 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_TRAVERSAL_H_
+#define _KJS_TRAVERSAL_H_
+
+#include "ecma/kjs_dom.h"
+#include "dom/dom2_traversal.h"
+
+namespace KJS {
+
+ class DOMNodeIterator : public DOMObject {
+ public:
+ DOMNodeIterator(ExecState *exec, DOM::NodeIterator ni);
+ ~DOMNodeIterator();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Filter, Root, WhatToShow, ExpandEntityReferences,
+ NextNode, PreviousNode, Detach };
+ DOM::NodeIterator toNodeIterator() const { return nodeIterator; }
+ protected:
+ DOM::NodeIterator nodeIterator;
+ };
+
+ // Constructor object NodeFilter
+ class NodeFilterConstructor : public DOMObject {
+ public:
+ NodeFilterConstructor(ExecState *);
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ };
+
+ class DOMNodeFilter : public DOMObject {
+ public:
+ DOMNodeFilter(ExecState *exec, DOM::NodeFilter nf);
+ ~DOMNodeFilter();
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ virtual DOM::NodeFilter toNodeFilter() const { return nodeFilter; }
+ enum { AcceptNode };
+ protected:
+ DOM::NodeFilter nodeFilter;
+ };
+
+ class DOMTreeWalker : public DOMObject {
+ public:
+ DOMTreeWalker(ExecState *exec, DOM::TreeWalker tw);
+ ~DOMTreeWalker();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName,
+ const Value& value, int attr = None);
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Root, WhatToShow, Filter, ExpandEntityReferences, CurrentNode,
+ ParentNode, FirstChild, LastChild, PreviousSibling, NextSibling,
+ PreviousNode, NextNode };
+ DOM::TreeWalker toTreeWalker() const { return treeWalker; }
+ protected:
+ DOM::TreeWalker treeWalker;
+ };
+
+ Value getDOMNodeIterator(ExecState *exec, DOM::NodeIterator ni);
+ Value getNodeFilterConstructor(ExecState *exec);
+ Value getDOMNodeFilter(ExecState *exec, DOM::NodeFilter nf);
+ Value getDOMTreeWalker(ExecState *exec, DOM::TreeWalker tw);
+
+ /**
+ * Convert an object to a NodeFilter. Returns a null Node if not possible.
+ */
+ DOM::NodeFilter toNodeFilter(const Value&);
+
+ class JSNodeFilter : public DOM::CustomNodeFilter {
+ public:
+ JSNodeFilter(Object & _filter);
+ virtual ~JSNodeFilter();
+ virtual short acceptNode (const DOM::Node &n);
+ protected:
+ Object filter;
+ };
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_views.cpp b/tdehtml/ecma/kjs_views.cpp
new file mode 100644
index 000000000..dbf354ce8
--- /dev/null
+++ b/tdehtml/ecma/kjs_views.cpp
@@ -0,0 +1,91 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "ecma/kjs_views.h"
+#include "ecma/kjs_css.h"
+#include "ecma/kjs_window.h"
+#include "kjs_views.lut.h"
+
+using namespace KJS;
+
+// -------------------------------------------------------------------------
+
+const ClassInfo DOMAbstractView::info = { "AbstractView", 0, &DOMAbstractViewTable, 0 };
+/*
+@begin DOMAbstractViewTable 2
+ document DOMAbstractView::Document DontDelete|ReadOnly
+ getComputedStyle DOMAbstractView::GetComputedStyle DontDelete|Function 2
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(DOMAbstractViewFunc)
+
+DOMAbstractView::DOMAbstractView(ExecState *exec, DOM::AbstractView av)
+ : DOMObject(exec->interpreter()->builtinObjectPrototype()), abstractView(av) {}
+
+DOMAbstractView::~DOMAbstractView()
+{
+ ScriptInterpreter::forgetDOMObject(abstractView.handle());
+}
+
+Value DOMAbstractView::tryGet(ExecState *exec, const Identifier &p) const
+{
+ if ( p == "document" )
+ return getDOMNode(exec,abstractView.document());
+ else if ( p == "getComputedStyle" )
+ return lookupOrCreateFunction<DOMAbstractViewFunc>(exec,p,this,DOMAbstractView::GetComputedStyle,2,DontDelete|Function);
+ else
+ return DOMObject::tryGet(exec,p);
+}
+
+Value DOMAbstractViewFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( KJS::DOMAbstractView, thisObj );
+ DOM::AbstractView abstractView = static_cast<DOMAbstractView *>(thisObj.imp())->toAbstractView();
+ switch (id) {
+ case DOMAbstractView::GetComputedStyle: {
+ DOM::Node arg0 = toNode(args[0]);
+ if (arg0.nodeType() != DOM::Node::ELEMENT_NODE)
+ return Undefined(); // throw exception?
+ else
+ return getDOMCSSStyleDeclaration(exec,abstractView.getComputedStyle(static_cast<DOM::Element>(arg0),
+ args[1].toString(exec).string()));
+ }
+ }
+ return Undefined();
+}
+
+Value KJS::getDOMAbstractView(ExecState *exec, DOM::AbstractView av)
+{
+ return cacheDOMObject<DOM::AbstractView, DOMAbstractView>(exec, av);
+}
+
+DOM::AbstractView KJS::toAbstractView (const Value& val)
+{
+ Object obj = Object::dynamicCast(val);
+ if (!obj.isValid() || !obj.inherits(&DOMAbstractView::info))
+ return DOM::AbstractView ();
+
+ // the Window object is considered for all practical purposes as a descendant of AbstractView
+ if (obj.inherits(&Window::info))
+ return static_cast<const Window *>(obj.imp())->toAbstractView();
+
+ const DOMAbstractView *dobj = static_cast<const DOMAbstractView *>(obj.imp());
+ return dobj->toAbstractView ();
+}
diff --git a/tdehtml/ecma/kjs_views.h b/tdehtml/ecma/kjs_views.h
new file mode 100644
index 000000000..11e103fde
--- /dev/null
+++ b/tdehtml/ecma/kjs_views.h
@@ -0,0 +1,53 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2001 Peter Kelly (pmk@post.com)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_VIEWS_H_
+#define _KJS_VIEWS_H_
+
+#include "ecma/kjs_dom.h"
+#include "dom/dom2_views.h"
+
+namespace KJS {
+
+
+ class DOMAbstractView : public DOMObject {
+ public:
+ DOMAbstractView(ExecState *, DOM::AbstractView av);
+ ~DOMAbstractView();
+ virtual Value tryGet(ExecState *exec,const Identifier &p) const;
+ // no put - all read-only
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ virtual DOM::AbstractView toAbstractView() const { return abstractView; }
+ enum { Document, GetComputedStyle };
+ protected:
+ DOM::AbstractView abstractView;
+ };
+
+ Value getDOMAbstractView(ExecState *exec, DOM::AbstractView av);
+
+ /**
+ * Convert an object to an AbstractView. Returns a null Node if not possible.
+ */
+ DOM::AbstractView toAbstractView(const Value&);
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/kjs_window.cpp b/tdehtml/ecma/kjs_window.cpp
new file mode 100644
index 000000000..767c7607f
--- /dev/null
+++ b/tdehtml/ecma/kjs_window.cpp
@@ -0,0 +1,2935 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000-2003 Harri Porten (porten@kde.org)
+ * Copyright (C) 2001-2003 David Faure (faure@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+#include "config.h"
+
+#include "tdehtmlview.h"
+#include "tdehtml_part.h"
+#include "tdehtmlpart_p.h"
+#include "tdehtml_settings.h"
+#include "xml/dom2_eventsimpl.h"
+#include "xml/dom_docimpl.h"
+#include "misc/htmltags.h"
+#include "html/html_documentimpl.h"
+#include "rendering/render_frames.h"
+
+#include <tqstylesheet.h>
+#include <tqtimer.h>
+#include <tqpaintdevicemetrics.h>
+#include <tqapplication.h>
+#include <kdebug.h>
+#include <kmessagebox.h>
+#include <kinputdialog.h>
+#include <klocale.h>
+#include <kmdcodec.h>
+#include <tdeparts/browserinterface.h>
+#include <twin.h>
+
+#if defined Q_WS_X11 && ! defined K_WS_QTONLY
+#include <twinmodule.h> // schroder
+#endif
+
+#ifndef KONQ_EMBEDDED
+#include <kbookmarkmanager.h>
+#endif
+#include <kglobalsettings.h>
+#include <assert.h>
+#include <tqstyle.h>
+#include <tqobjectlist.h>
+#include <kstringhandler.h>
+
+#include "kjs_proxy.h"
+#include "kjs_window.h"
+#include "kjs_navigator.h"
+#include "kjs_mozilla.h"
+#include "kjs_html.h"
+#include "kjs_range.h"
+#include "kjs_traversal.h"
+#include "kjs_css.h"
+#include "kjs_events.h"
+#include "kjs_views.h"
+#include "xmlhttprequest.h"
+#include "xmlserializer.h"
+#include "domparser.h"
+
+using namespace KJS;
+
+namespace KJS {
+
+ class History : public ObjectImp {
+ friend class HistoryFunc;
+ public:
+ History(ExecState *exec, KHTMLPart *p)
+ : ObjectImp(exec->interpreter()->builtinObjectPrototype()), part(p) { }
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Back, Forward, Go, Length };
+ private:
+ TQGuardedPtr<KHTMLPart> part;
+ };
+
+ class External : public ObjectImp {
+ friend class ExternalFunc;
+ public:
+ External(ExecState *exec, KHTMLPart *p)
+ : ObjectImp(exec->interpreter()->builtinObjectPrototype()), part(p) { }
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { AddFavorite };
+ private:
+ TQGuardedPtr<KHTMLPart> part;
+ };
+
+ class FrameArray : public ObjectImp {
+ public:
+ FrameArray(ExecState *exec, KHTMLPart *p)
+ : ObjectImp(exec->interpreter()->builtinObjectPrototype()), part(p) { }
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual Value call(ExecState *exec, Object &thisObj, const List &args);
+ virtual bool implementsCall() const { return true; }
+ private:
+ TQGuardedPtr<KHTMLPart> part;
+ };
+
+#ifdef Q_WS_QWS
+ class KonquerorFunc : public DOMFunction {
+ public:
+ KonquerorFunc(ExecState *exec, const Konqueror* k, const char* name)
+ : DOMFunction(exec), konqueror(k), m_name(name) { }
+ virtual Value tryCall(ExecState *exec, Object &thisObj, const List &args);
+
+ private:
+ const Konqueror* konqueror;
+ TQCString m_name;
+ };
+#endif
+} // namespace KJS
+
+#include "kjs_window.lut.h"
+#include "rendering/render_replaced.h"
+
+////////////////////// Screen Object ////////////////////////
+namespace KJS {
+// table for screen object
+/*
+@begin ScreenTable 7
+ height Screen::Height DontEnum|ReadOnly
+ width Screen::Width DontEnum|ReadOnly
+ colorDepth Screen::ColorDepth DontEnum|ReadOnly
+ pixelDepth Screen::PixelDepth DontEnum|ReadOnly
+ availLeft Screen::AvailLeft DontEnum|ReadOnly
+ availTop Screen::AvailTop DontEnum|ReadOnly
+ availHeight Screen::AvailHeight DontEnum|ReadOnly
+ availWidth Screen::AvailWidth DontEnum|ReadOnly
+@end
+*/
+
+const ClassInfo Screen::info = { "Screen", 0, &ScreenTable, 0 };
+
+// We set the object prototype so that toString is implemented
+Screen::Screen(ExecState *exec)
+ : ObjectImp(exec->interpreter()->builtinObjectPrototype()) {}
+
+Value Screen::get(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Screen::get " << p.qstring() << endl;
+#endif
+ return lookupGetValue<Screen,ObjectImp>(exec,p,&ScreenTable,this);
+}
+
+Value Screen::getValueProperty(ExecState *exec, int token) const
+{
+#if defined Q_WS_X11 && ! defined K_WS_QTONLY
+ KWinModule info(0, KWinModule::INFO_DESKTOP);
+#endif
+ TQWidget *thisWidget = Window::retrieveActive(exec)->part()->widget();
+ TQRect sg = TDEGlobalSettings::desktopGeometry(thisWidget);
+
+ switch( token ) {
+ case Height:
+ return Number(sg.height());
+ case Width:
+ return Number(sg.width());
+ case ColorDepth:
+ case PixelDepth: {
+ TQPaintDeviceMetrics m(TQApplication::desktop());
+ return Number(m.depth());
+ }
+ case AvailLeft: {
+#if defined Q_WS_X11 && ! defined K_WS_QTONLY
+ TQRect clipped = info.workArea().intersect(sg);
+ return Number(clipped.x()-sg.x());
+#else
+ return Number(10);
+#endif
+ }
+ case AvailTop: {
+#if defined Q_WS_X11 && ! defined K_WS_QTONLY
+ TQRect clipped = info.workArea().intersect(sg);
+ return Number(clipped.y()-sg.y());
+#else
+ return Number(10);
+#endif
+ }
+ case AvailHeight: {
+#if defined Q_WS_X11 && ! defined K_WS_QTONLY
+ TQRect clipped = info.workArea().intersect(sg);
+ return Number(clipped.height());
+#else
+ return Number(100);
+#endif
+ }
+ case AvailWidth: {
+#if defined Q_WS_X11 && ! defined K_WS_QTONLY
+ TQRect clipped = info.workArea().intersect(sg);
+ return Number(clipped.width());
+#else
+ return Number(100);
+#endif
+ }
+ default:
+ kdDebug(6070) << "WARNING: Screen::getValueProperty unhandled token " << token << endl;
+ return Undefined();
+ }
+}
+
+////////////////////// Window Object ////////////////////////
+
+const ClassInfo Window::info = { "Window", &DOMAbstractView::info, &WindowTable, 0 };
+
+/*
+@begin WindowTable 162
+ atob Window::AToB DontDelete|Function 1
+ btoa Window::BToA DontDelete|Function 1
+ closed Window::Closed DontDelete|ReadOnly
+ crypto Window::Crypto DontDelete|ReadOnly
+ defaultStatus Window::DefaultStatus DontDelete
+ defaultstatus Window::DefaultStatus DontDelete
+ status Window::Status DontDelete
+ document Window::Document DontDelete|ReadOnly
+ frameElement Window::FrameElement DontDelete|ReadOnly
+ frames Window::Frames DontDelete|ReadOnly
+ history Window::_History DontDelete|ReadOnly
+ external Window::_External DontDelete|ReadOnly
+ event Window::Event DontDelete|ReadOnly
+ innerHeight Window::InnerHeight DontDelete|ReadOnly
+ innerWidth Window::InnerWidth DontDelete|ReadOnly
+ length Window::Length DontDelete|ReadOnly
+ location Window::_Location DontDelete
+ name Window::Name DontDelete
+ navigator Window::_Navigator DontDelete|ReadOnly
+ clientInformation Window::ClientInformation DontDelete|ReadOnly
+ konqueror Window::_Konqueror DontDelete|ReadOnly
+ offscreenBuffering Window::OffscreenBuffering DontDelete|ReadOnly
+ opener Window::Opener DontDelete|ReadOnly
+ outerHeight Window::OuterHeight DontDelete|ReadOnly
+ outerWidth Window::OuterWidth DontDelete|ReadOnly
+ pageXOffset Window::PageXOffset DontDelete|ReadOnly
+ pageYOffset Window::PageYOffset DontDelete|ReadOnly
+ parent Window::Parent DontDelete|ReadOnly
+ personalbar Window::Personalbar DontDelete|ReadOnly
+ screenX Window::ScreenX DontDelete|ReadOnly
+ screenY Window::ScreenY DontDelete|ReadOnly
+ scrollbars Window::Scrollbars DontDelete|ReadOnly
+ scroll Window::Scroll DontDelete|Function 2
+ scrollBy Window::ScrollBy DontDelete|Function 2
+ scrollTo Window::ScrollTo DontDelete|Function 2
+ scrollX Window::ScrollX DontDelete|ReadOnly
+ scrollY Window::ScrollY DontDelete|ReadOnly
+ moveBy Window::MoveBy DontDelete|Function 2
+ moveTo Window::MoveTo DontDelete|Function 2
+ resizeBy Window::ResizeBy DontDelete|Function 2
+ resizeTo Window::ResizeTo DontDelete|Function 2
+ self Window::Self DontDelete|ReadOnly
+ window Window::_Window DontDelete|ReadOnly
+ top Window::Top DontDelete|ReadOnly
+ screen Window::_Screen DontDelete|ReadOnly
+ alert Window::Alert DontDelete|Function 1
+ confirm Window::Confirm DontDelete|Function 1
+ prompt Window::Prompt DontDelete|Function 2
+ open Window::Open DontDelete|Function 3
+ setTimeout Window::SetTimeout DontDelete|Function 2
+ clearTimeout Window::ClearTimeout DontDelete|Function 1
+ focus Window::Focus DontDelete|Function 0
+ blur Window::Blur DontDelete|Function 0
+ close Window::Close DontDelete|Function 0
+ setInterval Window::SetInterval DontDelete|Function 2
+ clearInterval Window::ClearInterval DontDelete|Function 1
+ captureEvents Window::CaptureEvents DontDelete|Function 0
+ releaseEvents Window::ReleaseEvents DontDelete|Function 0
+ print Window::Print DontDelete|Function 0
+ addEventListener Window::AddEventListener DontDelete|Function 3
+ removeEventListener Window::RemoveEventListener DontDelete|Function 3
+# Normally found in prototype. Add to window object itself to make them
+# accessible in closed and cross-site windows
+ valueOf Window::ValueOf DontDelete|Function 0
+ toString Window::ToString DontDelete|Function 0
+# IE extension
+ navigate Window::Navigate DontDelete|Function 1
+# Mozilla extension
+ sidebar Window::SideBar DontDelete|ReadOnly
+ getComputedStyle Window::GetComputedStyle DontDelete|Function 2
+
+# Warning, when adding a function to this object you need to add a case in Window::get
+
+# Event handlers
+# IE also has: onactivate, onbefore/afterprint, onbeforedeactivate/unload, oncontrolselect,
+# ondeactivate, onhelp, onmovestart/end, onresizestart/end, onscroll.
+# It doesn't have onabort, onchange, ondragdrop (but NS has that last one).
+ onabort Window::Onabort DontDelete
+ onblur Window::Onblur DontDelete
+ onchange Window::Onchange DontDelete
+ onclick Window::Onclick DontDelete
+ ondblclick Window::Ondblclick DontDelete
+ ondragdrop Window::Ondragdrop DontDelete
+ onerror Window::Onerror DontDelete
+ onfocus Window::Onfocus DontDelete
+ onkeydown Window::Onkeydown DontDelete
+ onkeypress Window::Onkeypress DontDelete
+ onkeyup Window::Onkeyup DontDelete
+ onload Window::Onload DontDelete
+ onmousedown Window::Onmousedown DontDelete
+ onmousemove Window::Onmousemove DontDelete
+ onmouseout Window::Onmouseout DontDelete
+ onmouseover Window::Onmouseover DontDelete
+ onmouseup Window::Onmouseup DontDelete
+ onmove Window::Onmove DontDelete
+ onreset Window::Onreset DontDelete
+ onresize Window::Onresize DontDelete
+ onselect Window::Onselect DontDelete
+ onsubmit Window::Onsubmit DontDelete
+ onunload Window::Onunload DontDelete
+
+# Constructors/constant tables
+ Node Window::Node DontDelete
+ Event Window::EventCtor DontDelete
+ Range Window::Range DontDelete
+ NodeFilter Window::NodeFilter DontDelete
+ DOMException Window::DOMException DontDelete
+ CSSRule Window::CSSRule DontDelete
+ MutationEvent Window::MutationEventCtor DontDelete
+ KeyboardEvent Window::KeyboardEventCtor DontDelete
+ EventException Window::EventExceptionCtor DontDelete
+ Image Window::Image DontDelete|ReadOnly
+ Option Window::Option DontDelete|ReadOnly
+ XMLHttpRequest Window::XMLHttpRequest DontDelete|ReadOnly
+ XMLSerializer Window::XMLSerializer DontDelete|ReadOnly
+ DOMParser Window::DOMParser DontDelete|ReadOnly
+
+# Mozilla dom emulation ones.
+ Element Window::ElementCtor DontDelete
+ Document Window::DocumentCtor DontDelete
+ #this one is an alias since we don't have a separate XMLDocument
+ XMLDocument Window::DocumentCtor DontDelete
+ HTMLElement Window::HTMLElementCtor DontDelete
+ HTMLDocument Window::HTMLDocumentCtor DontDelete
+ HTMLHtmlElement Window::HTMLHtmlElementCtor DontDelete
+ HTMLHeadElement Window::HTMLHeadElementCtor DontDelete
+ HTMLLinkElement Window::HTMLLinkElementCtor DontDelete
+ HTMLTitleElement Window::HTMLTitleElementCtor DontDelete
+ HTMLMetaElement Window::HTMLMetaElementCtor DontDelete
+ HTMLBaseElement Window::HTMLBaseElementCtor DontDelete
+ HTMLIsIndexElement Window::HTMLIsIndexElementCtor DontDelete
+ HTMLStyleElement Window::HTMLStyleElementCtor DontDelete
+ HTMLBodyElement Window::HTMLBodyElementCtor DontDelete
+ HTMLFormElement Window::HTMLFormElementCtor DontDelete
+ HTMLSelectElement Window::HTMLSelectElementCtor DontDelete
+ HTMLOptGroupElement Window::HTMLOptGroupElementCtor DontDelete
+ HTMLOptionElement Window::HTMLOptionElementCtor DontDelete
+ HTMLInputElement Window::HTMLInputElementCtor DontDelete
+ HTMLTextAreaElement Window::HTMLTextAreaElementCtor DontDelete
+ HTMLButtonElement Window::HTMLButtonElementCtor DontDelete
+ HTMLLabelElement Window::HTMLLabelElementCtor DontDelete
+ HTMLFieldSetElement Window::HTMLFieldSetElementCtor DontDelete
+ HTMLLegendElement Window::HTMLLegendElementCtor DontDelete
+ HTMLUListElement Window::HTMLUListElementCtor DontDelete
+ HTMLOListElement Window::HTMLOListElementCtor DontDelete
+ HTMLDListElement Window::HTMLDListElementCtor DontDelete
+ HTMLDirectoryElement Window::HTMLDirectoryElementCtor DontDelete
+ HTMLMenuElement Window::HTMLMenuElementCtor DontDelete
+ HTMLLIElement Window::HTMLLIElementCtor DontDelete
+ HTMLDivElement Window::HTMLDivElementCtor DontDelete
+ HTMLParagraphElement Window::HTMLParagraphElementCtor DontDelete
+ HTMLHeadingElement Window::HTMLHeadingElementCtor DontDelete
+ HTMLBlockQuoteElement Window::HTMLBlockQuoteElementCtor DontDelete
+ HTMLQuoteElement Window::HTMLQuoteElementCtor DontDelete
+ HTMLPreElement Window::HTMLPreElementCtor DontDelete
+ HTMLBRElement Window::HTMLBRElementCtor DontDelete
+ HTMLBaseFontElement Window::HTMLBaseFontElementCtor DontDelete
+ HTMLFontElement Window::HTMLFontElementCtor DontDelete
+ HTMLHRElement Window::HTMLHRElementCtor DontDelete
+ HTMLModElement Window::HTMLModElementCtor DontDelete
+ HTMLAnchorElement Window::HTMLAnchorElementCtor DontDelete
+ HTMLImageElement Window::HTMLImageElementCtor DontDelete
+ HTMLObjectElement Window::HTMLObjectElementCtor DontDelete
+ HTMLParamElement Window::HTMLParamElementCtor DontDelete
+ HTMLAppletElement Window::HTMLAppletElementCtor DontDelete
+ HTMLMapElement Window::HTMLMapElementCtor DontDelete
+ HTMLAreaElement Window::HTMLAreaElementCtor DontDelete
+ HTMLScriptElement Window::HTMLScriptElementCtor DontDelete
+ HTMLTableElement Window::HTMLTableElementCtor DontDelete
+ HTMLTableCaptionElement Window::HTMLTableCaptionElementCtor DontDelete
+ HTMLTableColElement Window::HTMLTableColElementCtor DontDelete
+ HTMLTableSectionElement Window::HTMLTableSectionElementCtor DontDelete
+ HTMLTableRowElement Window::HTMLTableRowElementCtor DontDelete
+ HTMLTableCellElement Window::HTMLTableCellElementCtor DontDelete
+ HTMLFrameSetElement Window::HTMLFrameSetElementCtor DontDelete
+ HTMLLayerElement Window::HTMLLayerElementCtor DontDelete
+ HTMLFrameElement Window::HTMLFrameElementCtor DontDelete
+ HTMLIFrameElement Window::HTMLIFrameElementCtor DontDelete
+ CSSStyleDeclaration Window::CSSStyleDeclarationCtor DontDelete
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(WindowFunc)
+
+Window::Window(tdehtml::ChildFrame *p)
+ : ObjectImp(/*no proto*/), m_frame(p), screen(0), history(0), external(0), m_frames(0), loc(0), m_evt(0)
+{
+ winq = new WindowQObject(this);
+ //kdDebug(6070) << "Window::Window this=" << this << " part=" << m_part << " " << m_part->name() << endl;
+}
+
+Window::~Window()
+{
+ delete winq;
+}
+
+Window *Window::retrieveWindow(KParts::ReadOnlyPart *p)
+{
+ Object obj = Object::dynamicCast( retrieve( p ) );
+#ifndef NDEBUG
+ // obj should never be null, except when javascript has been disabled in that part.
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(p);
+ if ( part && part->jScriptEnabled() )
+ {
+ assert( obj.isValid() );
+#ifndef QWS
+ assert( dynamic_cast<KJS::Window*>(obj.imp()) ); // type checking
+#endif
+ }
+#endif
+ if ( !obj.isValid() ) // JS disabled
+ return 0;
+ return static_cast<KJS::Window*>(obj.imp());
+}
+
+Window *Window::retrieveActive(ExecState *exec)
+{
+ ValueImp *imp = exec->interpreter()->globalObject().imp();
+ assert( imp );
+#ifndef QWS
+ assert( dynamic_cast<KJS::Window*>(imp) );
+#endif
+ return static_cast<KJS::Window*>(imp);
+}
+
+Value Window::retrieve(KParts::ReadOnlyPart *p)
+{
+ assert(p);
+ KHTMLPart * part = ::tqqt_cast<KHTMLPart *>(p);
+ KJSProxy *proxy = 0L;
+ if (!part) {
+ part = ::tqqt_cast<KHTMLPart *>(p->parent());
+ if (part)
+ proxy = part->framejScript(p);
+ } else
+ proxy = part->jScript();
+ if (proxy) {
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Window::retrieve part=" << part << " '" << part->name() << "' interpreter=" << proxy->interpreter() << " window=" << proxy->interpreter()->globalObject().imp() << endl;
+#endif
+ return proxy->interpreter()->globalObject(); // the Global object is the "window"
+ } else {
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Window::retrieve part=" << p << " '" << p->name() << "' no jsproxy." << endl;
+#endif
+ return Undefined(); // This can happen with JS disabled on the domain of that window
+ }
+}
+
+Location *Window::location() const
+{
+ if (!loc)
+ const_cast<Window*>(this)->loc = new Location(m_frame);
+ return loc;
+}
+
+ObjectImp* Window::frames( ExecState* exec ) const
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (part)
+ return m_frames ? m_frames :
+ (const_cast<Window*>(this)->m_frames = new FrameArray(exec, part));
+ return 0L;
+}
+
+// reference our special objects during garbage collection
+void Window::mark()
+{
+ ObjectImp::mark();
+ if (screen && !screen->marked())
+ screen->mark();
+ if (history && !history->marked())
+ history->mark();
+ if (external && !external->marked())
+ external->mark();
+ if (m_frames && !m_frames->marked())
+ m_frames->mark();
+ //kdDebug(6070) << "Window::mark " << this << " marking loc=" << loc << endl;
+ if (loc && !loc->marked())
+ loc->mark();
+ if (winq)
+ winq->mark();
+}
+
+bool Window::hasProperty(ExecState *exec, const Identifier &p) const
+{
+ // we don't want any operations on a closed window
+ if (m_frame.isNull() || m_frame->m_part.isNull())
+ return ( p == "closed" );
+
+ if (ObjectImp::hasProperty(exec, p))
+ return true;
+
+ if (Lookup::findEntry(&WindowTable, p))
+ return true;
+
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (!part)
+ return false;
+
+ TQString q = p.qstring();
+ if (part->findFramePart(p.qstring()))
+ return true;
+ // allow window[1] or parent[1] etc. (#56983)
+ bool ok;
+ unsigned int i = p.toArrayIndex(&ok);
+ if (ok) {
+ TQPtrList<KParts::ReadOnlyPart> frames = part->frames();
+ unsigned int len = frames.count();
+ if (i < len)
+ return true;
+ }
+
+ // allow shortcuts like 'Image1' instead of document.images.Image1
+ if (part->document().isHTMLDocument()) { // might be XML
+ DOM::HTMLDocument doc = part->htmlDocument();
+ // Keep in sync with tryGet
+
+ if (static_cast<DOM::DocumentImpl*>(doc.handle())->underDocNamedCache().get(p.qstring()))
+ return true;
+
+ return !doc.getElementById(p.string()).isNull();
+ }
+
+ return false;
+}
+
+UString Window::toString(ExecState *) const
+{
+ return "[object Window]";
+}
+
+Value Window::get(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Window("<<this<<")::get " << p.qstring() << endl;
+#endif
+ // we want only limited operations on a closed window
+ if (m_frame.isNull() || m_frame->m_part.isNull()) {
+ const HashEntry* entry = Lookup::findEntry(&WindowTable, p);
+ if (entry) {
+ switch (entry->value) {
+ case Closed:
+ return Boolean(true);
+ case _Location:
+ return Null();
+ case ValueOf:
+ case ToString:
+ return lookupOrCreateFunction<WindowFunc>(exec,p, this, entry->value,
+ entry->params, entry->attr);
+ default:
+ break;
+ }
+ }
+ return Undefined();
+ }
+
+ // Look for overrides first
+ ValueImp *val = getDirect(p);
+ if (val) {
+ //kdDebug(6070) << "Window::get found dynamic property '" << p.ascii() << "'" << endl;
+ return isSafeScript(exec) ? Value(val) : Undefined();
+ }
+
+ const HashEntry* entry = Lookup::findEntry(&WindowTable, p);
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+
+ // properties that work on all windows
+ if (entry) {
+ // ReadOnlyPart first
+ switch(entry->value) {
+ case Closed:
+ return Boolean( false );
+ case _Location:
+ // No isSafeScript test here, we must be able to _set_ location.href (#49819)
+ return Value(location());
+ case _Window:
+ case Self:
+ return retrieve(m_frame->m_part);
+ default:
+ break;
+ }
+ if (!part)
+ return Undefined();
+ // KHTMLPart next
+ switch(entry->value) {
+ case Frames:
+ return Value(frames(exec));
+ case Opener:
+ if (!part->opener())
+ return Null(); // ### a null Window might be better, but == null
+ else // doesn't work yet
+ return retrieve(part->opener());
+ case Parent:
+ return retrieve(part->parentPart() ? part->parentPart() : (KHTMLPart*)part);
+ case Top: {
+ KHTMLPart *p = part;
+ while (p->parentPart())
+ p = p->parentPart();
+ return retrieve(p);
+ }
+ case Alert:
+ case Confirm:
+ case Prompt:
+ case Open:
+ case Close:
+ case Focus:
+ case Blur:
+ case AToB:
+ case BToA:
+ case GetComputedStyle:
+ case ValueOf:
+ case ToString:
+ return lookupOrCreateFunction<WindowFunc>(exec,p,this,entry->value,entry->params,entry->attr);
+ default:
+ break;
+ }
+ } else if (!part) {
+ // not a KHTMLPart
+ TQString rvalue;
+ KParts::LiveConnectExtension::Type rtype;
+ unsigned long robjid;
+ if (m_frame->m_liveconnect &&
+ isSafeScript(exec) &&
+ m_frame->m_liveconnect->get(0, p.qstring(), rtype, robjid, rvalue))
+ return getLiveConnectValue(m_frame->m_liveconnect, p.qstring(), rtype, rvalue, robjid);
+ return Undefined();
+ }
+ // properties that only work on safe windows
+ if (isSafeScript(exec) && entry)
+ {
+ //kdDebug(6070) << "token: " << entry->value << endl;
+ switch( entry->value ) {
+ case Crypto:
+ return Undefined(); // ###
+ case DefaultStatus:
+ return String(UString(part->jsDefaultStatusBarText()));
+ case Status:
+ return String(UString(part->jsStatusBarText()));
+ case Document:
+ if (part->document().isNull()) {
+ kdDebug(6070) << "Document.write: adding <HTML><BODY> to create document" << endl;
+ part->begin();
+ part->write("<HTML><BODY>");
+ part->end();
+ }
+ return getDOMNode(exec,part->document());
+ case FrameElement:
+ if (m_frame->m_frame)
+ return getDOMNode(exec,m_frame->m_frame->element());
+ else
+ return Undefined();
+ case Node:
+ return NodeConstructor::self(exec);
+ case Range:
+ return getRangeConstructor(exec);
+ case NodeFilter:
+ return getNodeFilterConstructor(exec);
+ case DOMException:
+ return getDOMExceptionConstructor(exec);
+ case CSSRule:
+ return getCSSRuleConstructor(exec);
+ case ElementCtor:
+ return ElementPseudoCtor::self(exec);
+ case HTMLElementCtor:
+ return HTMLElementPseudoCtor::self(exec);
+ case HTMLHtmlElementCtor:
+ return HTMLHtmlElementPseudoCtor::self(exec);
+ case HTMLHeadElementCtor:
+ return HTMLHeadElementPseudoCtor::self(exec);
+ case HTMLLinkElementCtor:
+ return HTMLLinkElementPseudoCtor::self(exec);
+ case HTMLTitleElementCtor:
+ return HTMLTitleElementPseudoCtor::self(exec);
+ case HTMLMetaElementCtor:
+ return HTMLMetaElementPseudoCtor::self(exec);
+ case HTMLBaseElementCtor:
+ return HTMLBaseElementPseudoCtor::self(exec);
+ case HTMLIsIndexElementCtor:
+ return HTMLIsIndexElementPseudoCtor::self(exec);
+ case HTMLStyleElementCtor:
+ return HTMLStyleElementPseudoCtor::self(exec);
+ case HTMLBodyElementCtor:
+ return HTMLBodyElementPseudoCtor::self(exec);
+ case HTMLFormElementCtor:
+ return HTMLFormElementPseudoCtor::self(exec);
+ case HTMLSelectElementCtor:
+ return HTMLSelectElementPseudoCtor::self(exec);
+ case HTMLOptGroupElementCtor:
+ return HTMLOptGroupElementPseudoCtor::self(exec);
+ case HTMLOptionElementCtor:
+ return HTMLOptionElementPseudoCtor::self(exec);
+ case HTMLInputElementCtor:
+ return HTMLInputElementPseudoCtor::self(exec);
+ case HTMLTextAreaElementCtor:
+ return HTMLTextAreaElementPseudoCtor::self(exec);
+ case HTMLButtonElementCtor:
+ return HTMLButtonElementPseudoCtor::self(exec);
+ case HTMLLabelElementCtor:
+ return HTMLLabelElementPseudoCtor::self(exec);
+ case HTMLFieldSetElementCtor:
+ return HTMLFieldSetElementPseudoCtor::self(exec);
+ case HTMLLegendElementCtor:
+ return HTMLLegendElementPseudoCtor::self(exec);
+ case HTMLUListElementCtor:
+ return HTMLUListElementPseudoCtor::self(exec);
+ case HTMLOListElementCtor:
+ return HTMLOListElementPseudoCtor::self(exec);
+ case HTMLDListElementCtor:
+ return HTMLDListElementPseudoCtor::self(exec);
+ case HTMLDirectoryElementCtor:
+ return HTMLDirectoryElementPseudoCtor::self(exec);
+ case HTMLMenuElementCtor:
+ return HTMLMenuElementPseudoCtor::self(exec);
+ case HTMLLIElementCtor:
+ return HTMLLIElementPseudoCtor::self(exec);
+ case HTMLDivElementCtor:
+ return HTMLDivElementPseudoCtor::self(exec);
+ case HTMLParagraphElementCtor:
+ return HTMLParagraphElementPseudoCtor::self(exec);
+ case HTMLHeadingElementCtor:
+ return HTMLHeadingElementPseudoCtor::self(exec);
+ case HTMLBlockQuoteElementCtor:
+ return HTMLBlockQuoteElementPseudoCtor::self(exec);
+ case HTMLQuoteElementCtor:
+ return HTMLQuoteElementPseudoCtor::self(exec);
+ case HTMLPreElementCtor:
+ return HTMLPreElementPseudoCtor::self(exec);
+ case HTMLBRElementCtor:
+ return HTMLBRElementPseudoCtor::self(exec);
+ case HTMLBaseFontElementCtor:
+ return HTMLBaseFontElementPseudoCtor::self(exec);
+ case HTMLFontElementCtor:
+ return HTMLFontElementPseudoCtor::self(exec);
+ case HTMLHRElementCtor:
+ return HTMLHRElementPseudoCtor::self(exec);
+ case HTMLModElementCtor:
+ return HTMLModElementPseudoCtor::self(exec);
+ case HTMLAnchorElementCtor:
+ return HTMLAnchorElementPseudoCtor::self(exec);
+ case HTMLImageElementCtor:
+ return HTMLImageElementPseudoCtor::self(exec);
+ case HTMLObjectElementCtor:
+ return HTMLObjectElementPseudoCtor::self(exec);
+ case HTMLParamElementCtor:
+ return HTMLParamElementPseudoCtor::self(exec);
+ case HTMLAppletElementCtor:
+ return HTMLAppletElementPseudoCtor::self(exec);
+ case HTMLMapElementCtor:
+ return HTMLMapElementPseudoCtor::self(exec);
+ case HTMLAreaElementCtor:
+ return HTMLAreaElementPseudoCtor::self(exec);
+ case HTMLScriptElementCtor:
+ return HTMLScriptElementPseudoCtor::self(exec);
+ case HTMLTableElementCtor:
+ return HTMLTableElementPseudoCtor::self(exec);
+ case HTMLTableCaptionElementCtor:
+ return HTMLTableCaptionElementPseudoCtor::self(exec);
+ case HTMLTableColElementCtor:
+ return HTMLTableColElementPseudoCtor::self(exec);
+ case HTMLTableSectionElementCtor:
+ return HTMLTableSectionElementPseudoCtor::self(exec);
+ case HTMLTableRowElementCtor:
+ return HTMLTableRowElementPseudoCtor::self(exec);
+ case HTMLTableCellElementCtor:
+ return HTMLTableCellElementPseudoCtor::self(exec);
+ case HTMLFrameSetElementCtor:
+ return HTMLFrameSetElementPseudoCtor::self(exec);
+ case HTMLLayerElementCtor:
+ return HTMLLayerElementPseudoCtor::self(exec);
+ case HTMLFrameElementCtor:
+ return HTMLFrameElementPseudoCtor::self(exec);
+ case HTMLIFrameElementCtor:
+ return HTMLIFrameElementPseudoCtor::self(exec);
+ case DocumentCtor:
+ return DocumentPseudoCtor::self(exec);
+ case HTMLDocumentCtor:
+ return HTMLDocumentPseudoCtor::self(exec);
+ case CSSStyleDeclarationCtor:
+ return CSSStyleDeclarationPseudoCtor::self(exec);
+ case EventCtor:
+ return EventConstructor::self(exec);
+ case MutationEventCtor:
+ return getMutationEventConstructor(exec);
+ case KeyboardEventCtor:
+ return getKeyboardEventConstructor(exec);
+ case EventExceptionCtor:
+ return getEventExceptionConstructor(exec);
+ case _History:
+ return Value(history ? history :
+ (const_cast<Window*>(this)->history = new History(exec,part)));
+
+ case _External:
+ return Value(external ? external :
+ (const_cast<Window*>(this)->external = new External(exec,part)));
+
+ case Event:
+ if (m_evt)
+ return getDOMEvent(exec,*m_evt);
+ else {
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "WARNING: window(" << this << "," << part->name() << ").event, no event!" << endl;
+#endif
+ return Undefined();
+ }
+ case InnerHeight:
+ if (!part->view())
+ return Undefined();
+ tdehtml::RenderWidget::flushWidgetResizes(); // make sure frames have their final size
+ return Number(part->view()->visibleHeight());
+ case InnerWidth:
+ if (!part->view())
+ return Undefined();
+ tdehtml::RenderWidget::flushWidgetResizes(); // make sure frames have their final size
+ return Number(part->view()->visibleWidth());
+ case Length:
+ return Number(part->frames().count());
+ case Name:
+ return String(part->name());
+ case SideBar:
+ return Value(new MozillaSidebarExtension(exec, part));
+ case _Navigator:
+ case ClientInformation: {
+ // Store the navigator in the object so we get the same one each time.
+ Value nav( new Navigator(exec, part) );
+ const_cast<Window *>(this)->put(exec, "navigator", nav, DontDelete|ReadOnly|Internal);
+ const_cast<Window *>(this)->put(exec, "clientInformation", nav, DontDelete|ReadOnly|Internal);
+ return nav;
+ }
+#ifdef Q_WS_QWS
+ case _Konqueror: {
+ Value k( new Konqueror(part) );
+ const_cast<Window *>(this)->put(exec, "konqueror", k, DontDelete|ReadOnly|Internal);
+ return k;
+ }
+#endif
+ case OffscreenBuffering:
+ return Boolean(true);
+ case OuterHeight:
+ case OuterWidth:
+ {
+#if defined Q_WS_X11 && ! defined K_WS_QTONLY
+ if (!part->widget())
+ return Number(0);
+ KWin::WindowInfo inf = KWin::windowInfo(part->widget()->topLevelWidget()->winId());
+ return Number(entry->value == OuterHeight ?
+ inf.geometry().height() : inf.geometry().width());
+#else
+ return Number(entry->value == OuterHeight ?
+ part->view()->height() : part->view()->width());
+#endif
+ }
+ case PageXOffset:
+ return Number(part->view()->contentsX());
+ case PageYOffset:
+ return Number(part->view()->contentsY());
+ case Personalbar:
+ return Undefined(); // ###
+ case ScreenLeft:
+ case ScreenX: {
+ if (!part->view())
+ return Undefined();
+ TQRect sg = TDEGlobalSettings::desktopGeometry(part->view());
+ return Number(part->view()->mapToGlobal(TQPoint(0,0)).x() + sg.x());
+ }
+ case ScreenTop:
+ case ScreenY: {
+ if (!part->view())
+ return Undefined();
+ TQRect sg = TDEGlobalSettings::desktopGeometry(part->view());
+ return Number(part->view()->mapToGlobal(TQPoint(0,0)).y() + sg.y());
+ }
+ case ScrollX: {
+ if (!part->view())
+ return Undefined();
+ return Number(part->view()->contentsX());
+ }
+ case ScrollY: {
+ if (!part->view())
+ return Undefined();
+ return Number(part->view()->contentsY());
+ }
+ case Scrollbars:
+ return Undefined(); // ###
+ case _Screen:
+ return Value(screen ? screen :
+ (const_cast<Window*>(this)->screen = new Screen(exec)));
+ case Image:
+ return Value(new ImageConstructorImp(exec, part->document()));
+ case Option:
+ return Value(new OptionConstructorImp(exec, part->document()));
+ case XMLHttpRequest:
+ return Value(new XMLHttpRequestConstructorImp(exec, part->document()));
+ case XMLSerializer:
+ return Value(new XMLSerializerConstructorImp(exec));
+ case DOMParser:
+ return Value(new DOMParserConstructorImp(exec, part->xmlDocImpl()));
+ case Scroll: // compatibility
+ case ScrollBy:
+ case ScrollTo:
+ case MoveBy:
+ case MoveTo:
+ case ResizeBy:
+ case ResizeTo:
+ case CaptureEvents:
+ case ReleaseEvents:
+ case AddEventListener:
+ case RemoveEventListener:
+ case SetTimeout:
+ case ClearTimeout:
+ case SetInterval:
+ case ClearInterval:
+ case Print:
+ return lookupOrCreateFunction<WindowFunc>(exec,p,this,entry->value,entry->params,entry->attr);
+ // IE extension
+ case Navigate:
+ // Disabled in NS-compat mode. Supported by default - can't hurt, unless someone uses
+ // if (navigate) to test for IE (unlikely).
+ if ( exec->interpreter()->compatMode() == Interpreter::NetscapeCompat )
+ return Undefined();
+ return lookupOrCreateFunction<WindowFunc>(exec,p,this,entry->value,entry->params,entry->attr);
+ case Onabort:
+ return getListener(exec,DOM::EventImpl::ABORT_EVENT);
+ case Onblur:
+ return getListener(exec,DOM::EventImpl::BLUR_EVENT);
+ case Onchange:
+ return getListener(exec,DOM::EventImpl::CHANGE_EVENT);
+ case Onclick:
+ return getListener(exec,DOM::EventImpl::KHTML_ECMA_CLICK_EVENT);
+ case Ondblclick:
+ return getListener(exec,DOM::EventImpl::KHTML_ECMA_DBLCLICK_EVENT);
+ case Ondragdrop:
+ return getListener(exec,DOM::EventImpl::KHTML_DRAGDROP_EVENT);
+ case Onerror:
+ return getListener(exec,DOM::EventImpl::ERROR_EVENT);
+ case Onfocus:
+ return getListener(exec,DOM::EventImpl::FOCUS_EVENT);
+ case Onkeydown:
+ return getListener(exec,DOM::EventImpl::KEYDOWN_EVENT);
+ case Onkeypress:
+ return getListener(exec,DOM::EventImpl::KEYPRESS_EVENT);
+ case Onkeyup:
+ return getListener(exec,DOM::EventImpl::KEYUP_EVENT);
+ case Onload:
+ return getListener(exec,DOM::EventImpl::LOAD_EVENT);
+ case Onmousedown:
+ return getListener(exec,DOM::EventImpl::MOUSEDOWN_EVENT);
+ case Onmousemove:
+ return getListener(exec,DOM::EventImpl::MOUSEMOVE_EVENT);
+ case Onmouseout:
+ return getListener(exec,DOM::EventImpl::MOUSEOUT_EVENT);
+ case Onmouseover:
+ return getListener(exec,DOM::EventImpl::MOUSEOVER_EVENT);
+ case Onmouseup:
+ return getListener(exec,DOM::EventImpl::MOUSEUP_EVENT);
+ case Onmove:
+ return getListener(exec,DOM::EventImpl::KHTML_MOVE_EVENT);
+ case Onreset:
+ return getListener(exec,DOM::EventImpl::RESET_EVENT);
+ case Onresize:
+ return getListener(exec,DOM::EventImpl::RESIZE_EVENT);
+ case Onselect:
+ return getListener(exec,DOM::EventImpl::SELECT_EVENT);
+ case Onsubmit:
+ return getListener(exec,DOM::EventImpl::SUBMIT_EVENT);
+ case Onunload:
+ return getListener(exec,DOM::EventImpl::UNLOAD_EVENT);
+ }
+ }
+
+ // doing the remainder of ObjectImp::get() that is not covered by
+ // the getDirect() call above.
+ // #### guessed position. move further up or down?
+ Object proto = Object::dynamicCast(prototype());
+ assert(proto.isValid());
+ if (p == specialPrototypePropertyName)
+ return isSafeScript(exec) ? Value(proto) : Undefined();
+ Value val2 = proto.get(exec, p);
+ if (!val2.isA(UndefinedType)) {
+ return isSafeScript(exec) ? val2 : Undefined();
+ }
+
+ KParts::ReadOnlyPart *rop = part->findFramePart( p.qstring() );
+ if (rop)
+ return retrieve(rop);
+
+ // allow window[1] or parent[1] etc. (#56983)
+ bool ok;
+ unsigned int i = p.toArrayIndex(&ok);
+ if (ok) {
+ TQPtrList<KParts::ReadOnlyPart> frames = part->frames();
+ unsigned int len = frames.count();
+ if (i < len) {
+ KParts::ReadOnlyPart* frame = frames.at(i);
+ if (frame)
+ return Window::retrieve(frame);
+ }
+ }
+
+ //Check for images, forms, objects, etc.
+ if (isSafeScript(exec) && part->document().isHTMLDocument()) { // might be XML
+ DOM::DocumentImpl* docImpl = part->xmlDocImpl();
+ DOM::ElementMappingCache::ItemInfo* info = docImpl->underDocNamedCache().get(p.qstring());
+ if (info) {
+ //May be a false positive, but we can try to avoid doing it the hard way in
+ //simpler cases. The trickiness here is that the cache is kept under both
+ //name and id, but we sometimes ignore id for IE compat
+ DOM::DOMString propertyDOMString = p.string();
+ if (info->nd && DOM::HTMLMappedNameCollectionImpl::matchesName(info->nd,
+ DOM::HTMLCollectionImpl::WINDOW_NAMED_ITEMS, propertyDOMString)) {
+ return getDOMNode(exec, info->nd);
+ } else {
+ //Can't tell it just like that, so better go through collection and count stuff. This is the slow path...
+ DOM::HTMLMappedNameCollection coll(docImpl, DOM::HTMLCollectionImpl::WINDOW_NAMED_ITEMS, propertyDOMString);
+
+ if (coll.length() == 1)
+ return getDOMNode(exec, coll.firstItem());
+ else if (coll.length() > 1)
+ return getHTMLCollection(exec, coll);
+ }
+ }
+ DOM::Element element = part->document().getElementById(p.string());
+ if ( !element.isNull() )
+ return getDOMNode(exec, element );
+ }
+
+ // This isn't necessarily a bug. Some code uses if(!window.blah) window.blah=1
+ // But it can also mean something isn't loaded or implemented, hence the WARNING to help grepping.
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "WARNING: Window::get property not found: " << p.qstring() << endl;
+#endif
+ return Undefined();
+}
+
+void Window::put(ExecState* exec, const Identifier &propertyName, const Value &value, int attr)
+{
+ // we don't want any operations on a closed window
+ if (m_frame.isNull() || m_frame->m_part.isNull()) {
+ // ### throw exception? allow setting of some props like location?
+ return;
+ }
+
+ // Called by an internal KJS call (e.g. InterpreterImp's constructor) ?
+ // If yes, save time and jump directly to ObjectImp.
+ if ( (attr != None && attr != DontDelete) ||
+ // Same thing if we have a local override (e.g. "var location")
+ ( isSafeScript( exec ) && ObjectImp::getDirect(propertyName) ) )
+ {
+ ObjectImp::put( exec, propertyName, value, attr );
+ return;
+ }
+
+ const HashEntry* entry = Lookup::findEntry(&WindowTable, propertyName);
+ if (entry && !m_frame.isNull() && !m_frame->m_part.isNull())
+ {
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Window("<<this<<")::put " << propertyName.qstring() << endl;
+#endif
+ switch( entry->value) {
+ case _Location:
+ goURL(exec, value.toString(exec).qstring(), false /*don't lock history*/);
+ return;
+ default:
+ break;
+ }
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (part) {
+ switch( entry->value ) {
+ case Status: {
+ if (isSafeScript(exec) && part->settings()->windowStatusPolicy(part->url().host())
+ == KHTMLSettings::KJSWindowStatusAllow) {
+ String s = value.toString(exec);
+ part->setJSStatusBarText(s.value().qstring());
+ }
+ return;
+ }
+ case DefaultStatus: {
+ if (isSafeScript(exec) && part->settings()->windowStatusPolicy(part->url().host())
+ == KHTMLSettings::KJSWindowStatusAllow) {
+ String s = value.toString(exec);
+ part->setJSDefaultStatusBarText(s.value().qstring());
+ }
+ return;
+ }
+ case Onabort:
+ if (isSafeScript(exec))
+ setListener(exec, DOM::EventImpl::ABORT_EVENT,value);
+ return;
+ case Onblur:
+ if (isSafeScript(exec))
+ setListener(exec, DOM::EventImpl::BLUR_EVENT,value);
+ return;
+ case Onchange:
+ if (isSafeScript(exec))
+ setListener(exec, DOM::EventImpl::CHANGE_EVENT,value);
+ return;
+ case Onclick:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::KHTML_ECMA_CLICK_EVENT,value);
+ return;
+ case Ondblclick:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::KHTML_ECMA_DBLCLICK_EVENT,value);
+ return;
+ case Ondragdrop:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::KHTML_DRAGDROP_EVENT,value);
+ return;
+ case Onerror:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::ERROR_EVENT,value);
+ return;
+ case Onfocus:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::FOCUS_EVENT,value);
+ return;
+ case Onkeydown:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::KEYDOWN_EVENT,value);
+ return;
+ case Onkeypress:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::KEYPRESS_EVENT,value);
+ return;
+ case Onkeyup:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::KEYUP_EVENT,value);
+ return;
+ case Onload:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::LOAD_EVENT,value);
+ return;
+ case Onmousedown:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::MOUSEDOWN_EVENT,value);
+ return;
+ case Onmousemove:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::MOUSEMOVE_EVENT,value);
+ return;
+ case Onmouseout:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::MOUSEOUT_EVENT,value);
+ return;
+ case Onmouseover:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::MOUSEOVER_EVENT,value);
+ return;
+ case Onmouseup:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::MOUSEUP_EVENT,value);
+ return;
+ case Onmove:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::KHTML_MOVE_EVENT,value);
+ return;
+ case Onreset:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::RESET_EVENT,value);
+ return;
+ case Onresize:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::RESIZE_EVENT,value);
+ return;
+ case Onselect:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::SELECT_EVENT,value);
+ return;
+ case Onsubmit:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::SUBMIT_EVENT,value);
+ return;
+ case Onunload:
+ if (isSafeScript(exec))
+ setListener(exec,DOM::EventImpl::UNLOAD_EVENT,value);
+ return;
+ case Name:
+ if (isSafeScript(exec))
+ part->setName( value.toString(exec).qstring().local8Bit().data() );
+ return;
+ default:
+ break;
+ }
+ }
+ }
+ if (m_frame->m_liveconnect &&
+ isSafeScript(exec) &&
+ m_frame->m_liveconnect->put(0, propertyName.qstring(), value.toString(exec).qstring()))
+ return;
+ if (isSafeScript(exec)) {
+ //kdDebug(6070) << "Window("<<this<<")::put storing " << propertyName.qstring() << endl;
+ ObjectImp::put(exec, propertyName, value, attr);
+ }
+}
+
+bool Window::toBoolean(ExecState *) const
+{
+ return !m_frame.isNull() && !m_frame->m_part.isNull();
+}
+
+DOM::AbstractView Window::toAbstractView() const
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (!part)
+ return DOM::AbstractView();
+ return part->document().defaultView();
+}
+
+void Window::scheduleClose()
+{
+ kdDebug(6070) << "Window::scheduleClose window.close() " << m_frame << endl;
+ Q_ASSERT(winq);
+ TQTimer::singleShot( 0, winq, TQT_SLOT( timeoutClose() ) );
+}
+
+void Window::closeNow()
+{
+ if (m_frame.isNull() || m_frame->m_part.isNull()) {
+ kdDebug(6070) << k_funcinfo << "part is deleted already" << endl;
+ } else {
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (!part) {
+ kdDebug(6070) << "closeNow on non KHTML part" << endl;
+ } else {
+ //kdDebug(6070) << k_funcinfo << " -> closing window" << endl;
+ // We want to make sure that window.open won't find this part by name.
+ part->setName( 0 );
+ part->deleteLater();
+ part = 0;
+ }
+ }
+}
+
+void Window::afterScriptExecution()
+{
+ DOM::DocumentImpl::updateDocumentsRendering();
+ TQValueList<DelayedAction> delayedActions = m_delayed;
+ m_delayed.clear();
+ TQValueList<DelayedAction>::Iterator it = delayedActions.begin();
+ for ( ; it != delayedActions.end() ; ++it )
+ {
+ switch ((*it).actionId) {
+ case DelayedClose:
+ scheduleClose();
+ return; // stop here, in case of multiple actions
+ case DelayedGoHistory:
+ goHistory( (*it).param.toInt() );
+ break;
+ case NullAction:
+ // FIXME: anything needs to be done here? This is warning anyways.
+ break;
+ };
+ }
+}
+
+bool Window::checkIsSafeScript(KParts::ReadOnlyPart *activePart) const
+{
+ if (m_frame.isNull() || m_frame->m_part.isNull()) { // part deleted ? can't grant access
+ kdDebug(6070) << "Window::isSafeScript: accessing deleted part !" << endl;
+ return false;
+ }
+ if (!activePart) {
+ kdDebug(6070) << "Window::isSafeScript: current interpreter's part is 0L!" << endl;
+ return false;
+ }
+ if ( activePart == m_frame->m_part ) // Not calling from another frame, no problem.
+ return true;
+
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (!part)
+ return true; // not a KHTMLPart
+
+ if ( part->document().isNull() )
+ return true; // allow to access a window that was just created (e.g. with window.open("about:blank"))
+
+ DOM::HTMLDocument thisDocument = part->htmlDocument();
+ if ( thisDocument.isNull() ) {
+ kdDebug(6070) << "Window::isSafeScript: trying to access an XML document !?" << endl;
+ return false;
+ }
+
+ KHTMLPart *activeKHTMLPart = ::tqqt_cast<KHTMLPart *>(activePart);
+ if (!activeKHTMLPart)
+ return true; // not a KHTMLPart
+
+ DOM::HTMLDocument actDocument = activeKHTMLPart->htmlDocument();
+ if ( actDocument.isNull() ) {
+ kdDebug(6070) << "Window::isSafeScript: active part has no document!" << endl;
+ return false;
+ }
+ DOM::DOMString actDomain = actDocument.domain();
+ DOM::DOMString thisDomain = thisDocument.domain();
+
+ if ( actDomain == thisDomain ) {
+#ifdef KJS_VERBOSE
+ //kdDebug(6070) << "JavaScript: access granted, domain is '" << actDomain.string() << "'" << endl;
+#endif
+ return true;
+ }
+
+ kdDebug(6070) << "WARNING: JavaScript: access denied for current frame '" << actDomain.string() << "' to frame '" << thisDomain.string() << "'" << endl;
+ // TODO after 3.1: throw security exception (exec->setException())
+ return false;
+}
+
+void Window::setListener(ExecState *exec, int eventId, Value func)
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (!part || !isSafeScript(exec))
+ return;
+ DOM::DocumentImpl *doc = static_cast<DOM::DocumentImpl*>(part->htmlDocument().handle());
+ if (!doc)
+ return;
+
+ doc->setHTMLWindowEventListener(eventId,getJSEventListener(func,true));
+}
+
+Value Window::getListener(ExecState *exec, int eventId) const
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (!part || !isSafeScript(exec))
+ return Undefined();
+ DOM::DocumentImpl *doc = static_cast<DOM::DocumentImpl*>(part->htmlDocument().handle());
+ if (!doc)
+ return Undefined();
+
+ DOM::EventListener *listener = doc->getHTMLWindowEventListener(eventId);
+ if (listener && static_cast<JSEventListener*>(listener)->listenerObjImp())
+ return static_cast<JSEventListener*>(listener)->listenerObj();
+ else
+ return Null();
+}
+
+
+JSEventListener *Window::getJSEventListener(const Value& val, bool html)
+{
+ // This function is so hot that it's worth coding it directly with imps.
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (!part || val.type() != ObjectType)
+ return 0;
+
+ // It's ObjectType, so it must be valid.
+ Object listenerObject = Object::dynamicCast(val);
+ ObjectImp *listenerObjectImp = listenerObject.imp();
+
+ // 'listener' is not a simple ecma function. (Always use sanity checks: Better safe than sorry!)
+ if (!listenerObject.implementsCall() && part && part->jScript() && part->jScript()->interpreter())
+ {
+ Interpreter *interpreter = part->jScript()->interpreter();
+
+ // 'listener' probably is an EventListener object containing a 'handleEvent' function.
+ Value handleEventValue = listenerObject.get(interpreter->globalExec(), Identifier("handleEvent"));
+ Object handleEventObject = Object::dynamicCast(handleEventValue);
+
+ if(handleEventObject.isValid() && handleEventObject.implementsCall())
+ {
+ listenerObject = handleEventObject;
+ listenerObjectImp = handleEventObject.imp();
+ }
+ }
+
+ JSEventListener *existingListener = jsEventListeners[listenerObjectImp];
+ if (existingListener) {
+ if ( existingListener->isHTMLEventListener() != html )
+ // The existingListener will have the wrong type, so onclick= will behave like addEventListener or vice versa.
+ kdWarning() << "getJSEventListener: event listener already found but with html=" << !html << " - please report this, we thought it would never happen" << endl;
+ return existingListener;
+ }
+
+ // Note that the JSEventListener constructor adds it to our jsEventListeners list
+ return new JSEventListener(listenerObject, listenerObjectImp, Object(this), html);
+}
+
+JSLazyEventListener *Window::getJSLazyEventListener(const TQString& code, const TQString& name, DOM::NodeImpl *node)
+{
+ return new JSLazyEventListener(code, name, Object(this), node);
+}
+
+void Window::clear( ExecState *exec )
+{
+ delete winq;
+ winq = 0L;
+ // Get rid of everything, those user vars could hold references to DOM nodes
+ deleteAllProperties( exec );
+
+ // Break the dependency between the listeners and their object
+ TQPtrDictIterator<JSEventListener> it(jsEventListeners);
+ for (; it.current(); ++it)
+ it.current()->clear();
+ // Forget about the listeners (the DOM::NodeImpls will delete them)
+ jsEventListeners.clear();
+
+ if (m_frame) {
+ KJSProxy* proxy = m_frame->m_jscript;
+ if (proxy) // i.e. JS not disabled
+ {
+ winq = new WindowQObject(this);
+ // Now recreate a working global object for the next URL that will use us
+ KJS::Interpreter *interpreter = proxy->interpreter();
+ interpreter->initGlobalObject();
+ }
+ }
+}
+
+void Window::setCurrentEvent( DOM::Event *evt )
+{
+ m_evt = evt;
+ //kdDebug(6070) << "Window " << this << " (part=" << m_part << ")::setCurrentEvent m_evt=" << evt << endl;
+}
+
+void Window::goURL(ExecState* exec, const TQString& url, bool lockHistory)
+{
+ Window* active = Window::retrieveActive(exec);
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ KHTMLPart *active_part = ::tqqt_cast<KHTMLPart *>(active->part());
+ // Complete the URL using the "active part" (running interpreter)
+ if (active_part && part) {
+ if (url[0] == TQChar('#')) {
+ part->gotoAnchor(url.mid(1));
+ } else {
+ TQString dstUrl = active_part->htmlDocument().completeURL(url).string();
+ kdDebug(6070) << "Window::goURL dstUrl=" << dstUrl << endl;
+
+ // check if we're allowed to inject javascript
+ // SYNC check with tdehtml_part.cpp::slotRedirect!
+ if ( isSafeScript(exec) ||
+ dstUrl.find(TQString::fromLatin1("javascript:"), 0, false) != 0 )
+ part->scheduleRedirection(-1,
+ dstUrl,
+ lockHistory);
+ }
+ } else if (!part && !m_frame->m_part.isNull()) {
+ KParts::BrowserExtension *b = KParts::BrowserExtension::childObject(m_frame->m_part);
+ if (b)
+ b->emit openURLRequest(m_frame->m_frame->element()->getDocument()->completeURL(url));
+ kdDebug() << "goURL for ROPart" << endl;
+ }
+}
+
+KParts::ReadOnlyPart *Window::part() const {
+ return m_frame.isNull() ? 0L : static_cast<KParts::ReadOnlyPart *>(m_frame->m_part);
+}
+
+void Window::delayedGoHistory( int steps )
+{
+ m_delayed.append( DelayedAction( DelayedGoHistory, steps ) );
+}
+
+void Window::goHistory( int steps )
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if(!part)
+ // TODO history readonlypart
+ return;
+ KParts::BrowserExtension *ext = part->browserExtension();
+ if(!ext)
+ return;
+ KParts::BrowserInterface *iface = ext->browserInterface();
+
+ if ( !iface )
+ return;
+
+ iface->callMethod( "goHistory(int)", steps );
+ //emit ext->goHistory(steps);
+}
+
+void KJS::Window::resizeTo(TQWidget* tl, int width, int height)
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if(!part)
+ // TODO resizeTo readonlypart
+ return;
+ KParts::BrowserExtension *ext = part->browserExtension();
+ if (!ext) {
+ kdDebug(6070) << "Window::resizeTo found no browserExtension" << endl;
+ return;
+ }
+
+ // Security check: within desktop limits and bigger than 100x100 (per spec)
+ if ( width < 100 || height < 100 ) {
+ kdDebug(6070) << "Window::resizeTo refused, window would be too small ("<<width<<","<<height<<")" << endl;
+ return;
+ }
+
+ TQRect sg = TDEGlobalSettings::desktopGeometry(tl);
+
+ if ( width > sg.width() || height > sg.height() ) {
+ kdDebug(6070) << "Window::resizeTo refused, window would be too big ("<<width<<","<<height<<")" << endl;
+ return;
+ }
+
+ kdDebug(6070) << "resizing to " << width << "x" << height << endl;
+
+ emit ext->resizeTopLevelWidget( width, height );
+
+ // If the window is out of the desktop, move it up/left
+ // (maybe we should use workarea instead of sg, otherwise the window ends up below kicker)
+ int right = tl->x() + tl->frameGeometry().width();
+ int bottom = tl->y() + tl->frameGeometry().height();
+ int moveByX = 0;
+ int moveByY = 0;
+ if ( right > sg.right() )
+ moveByX = - right + sg.right(); // always <0
+ if ( bottom > sg.bottom() )
+ moveByY = - bottom + sg.bottom(); // always <0
+ if ( moveByX || moveByY )
+ emit ext->moveTopLevelWidget( tl->x() + moveByX , tl->y() + moveByY );
+}
+
+Value Window::openWindow(ExecState *exec, const List& args)
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ if (!part)
+ return Undefined();
+ KHTMLView *widget = part->view();
+ Value v = args[0];
+ TQString str;
+ if (v.isValid() && !v.isA(UndefinedType))
+ str = v.toString(exec).qstring();
+
+ // prepare arguments
+ KURL url;
+ if (!str.isEmpty())
+ {
+ KHTMLPart* p = ::tqqt_cast<KHTMLPart *>(Window::retrieveActive(exec)->m_frame->m_part);
+ if ( p )
+ url = p->htmlDocument().completeURL(str).string();
+ if ( !p ||
+ !static_cast<DOM::DocumentImpl*>(p->htmlDocument().handle())->isURLAllowed(url.url()) )
+ return Undefined();
+ }
+
+ KHTMLSettings::KJSWindowOpenPolicy policy =
+ part->settings()->windowOpenPolicy(part->url().host());
+ if ( policy == KHTMLSettings::KJSWindowOpenAsk ) {
+ emit part->browserExtension()->requestFocus(part);
+ TQString caption;
+ if (!part->url().host().isEmpty())
+ caption = part->url().host() + " - ";
+ caption += i18n( "Confirmation: JavaScript Popup" );
+ if ( KMessageBox::questionYesNo(widget,
+ str.isEmpty() ?
+ i18n( "This site is requesting to open up a new browser "
+ "window via JavaScript.\n"
+ "Do you want to allow this?" ) :
+ i18n( "<qt>This site is requesting to open<p>%1</p>in a new browser window via JavaScript.<br />"
+ "Do you want to allow this?</qt>").arg(KStringHandler::csqueeze(url.htmlURL(), 100)),
+ caption, i18n("Allow"), i18n("Do Not Allow") ) == KMessageBox::Yes )
+ policy = KHTMLSettings::KJSWindowOpenAllow;
+ } else if ( policy == KHTMLSettings::KJSWindowOpenSmart )
+ {
+ // window.open disabled unless from a key/mouse event
+ if (static_cast<ScriptInterpreter *>(exec->interpreter())->isWindowOpenAllowed())
+ policy = KHTMLSettings::KJSWindowOpenAllow;
+ }
+
+ TQString frameName = args.size() > 1 ? args[1].toString(exec).qstring() : TQString("_blank");
+
+ v = args[2];
+ TQString features;
+ if (!v.isNull() && v.type() != UndefinedType && v.toString(exec).size() > 0) {
+ features = v.toString(exec).qstring();
+ // Buggy scripts have ' at beginning and end, cut those
+ if (features.startsWith("\'") && features.endsWith("\'"))
+ features = features.mid(1, features.length()-2);
+ }
+
+ if ( policy != KHTMLSettings::KJSWindowOpenAllow ) {
+ if ( url.isEmpty() )
+ part->setSuppressedPopupIndicator(true, 0);
+ else {
+ part->setSuppressedPopupIndicator(true, part);
+ m_suppressedWindowInfo.append( SuppressedWindowInfo( url, frameName, features ) );
+ }
+ return Undefined();
+ } else {
+ return executeOpenWindow(exec, url, frameName, features);
+ }
+}
+
+Value Window::executeOpenWindow(ExecState *exec, const KURL& url, const TQString& frameName, const TQString& features)
+{
+ KHTMLPart *p = ::tqqt_cast<KHTMLPart *>(m_frame->m_part);
+ KHTMLView *widget = p->view();
+ KParts::WindowArgs winargs;
+
+ // scan feature argument
+ if (!features.isEmpty()) {
+ // specifying window params means false defaults
+ winargs.menuBarVisible = false;
+ winargs.toolBarsVisible = false;
+ winargs.statusBarVisible = false;
+ winargs.scrollBarsVisible = false;
+ TQStringList flist = TQStringList::split(',', features);
+ TQStringList::ConstIterator it = flist.begin();
+ while (it != flist.end()) {
+ TQString s = *it++;
+ TQString key, val;
+ int pos = s.find('=');
+ if (pos >= 0) {
+ key = s.left(pos).stripWhiteSpace().lower();
+ val = s.mid(pos + 1).stripWhiteSpace().lower();
+ TQRect screen = TDEGlobalSettings::desktopGeometry(widget->topLevelWidget());
+
+ if (key == "left" || key == "screenx") {
+ winargs.x = (int)val.toFloat() + screen.x();
+ if (winargs.x < screen.x() || winargs.x > screen.right())
+ winargs.x = screen.x(); // only safe choice until size is determined
+ } else if (key == "top" || key == "screeny") {
+ winargs.y = (int)val.toFloat() + screen.y();
+ if (winargs.y < screen.y() || winargs.y > screen.bottom())
+ winargs.y = screen.y(); // only safe choice until size is determined
+ } else if (key == "height") {
+ winargs.height = (int)val.toFloat() + 2*tqApp->style().pixelMetric( TQStyle::PM_DefaultFrameWidth ) + 2;
+ if (winargs.height > screen.height()) // should actually check workspace
+ winargs.height = screen.height();
+ if (winargs.height < 100)
+ winargs.height = 100;
+ } else if (key == "width") {
+ winargs.width = (int)val.toFloat() + 2*tqApp->style().pixelMetric( TQStyle::PM_DefaultFrameWidth ) + 2;
+ if (winargs.width > screen.width()) // should actually check workspace
+ winargs.width = screen.width();
+ if (winargs.width < 100)
+ winargs.width = 100;
+ } else {
+ goto boolargs;
+ }
+ continue;
+ } else {
+ // leaving away the value gives true
+ key = s.stripWhiteSpace().lower();
+ val = "1";
+ }
+ boolargs:
+ if (key == "menubar")
+ winargs.menuBarVisible = (val == "1" || val == "yes");
+ else if (key == "toolbar")
+ winargs.toolBarsVisible = (val == "1" || val == "yes");
+ else if (key == "location") // ### missing in WindowArgs
+ winargs.toolBarsVisible = (val == "1" || val == "yes");
+ else if (key == "status" || key == "statusbar")
+ winargs.statusBarVisible = (val == "1" || val == "yes");
+ else if (key == "scrollbars")
+ winargs.scrollBarsVisible = (val == "1" || val == "yes");
+ else if (key == "resizable")
+ winargs.resizable = (val == "1" || val == "yes");
+ else if (key == "fullscreen")
+ winargs.fullscreen = (val == "1" || val == "yes");
+ }
+ }
+
+ KParts::URLArgs uargs;
+ uargs.frameName = frameName;
+
+ if ( uargs.frameName.lower() == "_top" )
+ {
+ while ( p->parentPart() )
+ p = p->parentPart();
+ Window::retrieveWindow(p)->goURL(exec, url.url(), false /*don't lock history*/);
+ return Window::retrieve(p);
+ }
+ if ( uargs.frameName.lower() == "_parent" )
+ {
+ if ( p->parentPart() )
+ p = p->parentPart();
+ Window::retrieveWindow(p)->goURL(exec, url.url(), false /*don't lock history*/);
+ return Window::retrieve(p);
+ }
+ if ( uargs.frameName.lower() == "_self")
+ {
+ Window::retrieveWindow(p)->goURL(exec, url.url(), false /*don't lock history*/);
+ return Window::retrieve(p);
+ }
+ if ( uargs.frameName.lower() == "replace" )
+ {
+ Window::retrieveWindow(p)->goURL(exec, url.url(), true /*lock history*/);
+ return Window::retrieve(p);
+ }
+ uargs.serviceType = "text/html";
+
+ // request window (new or existing if framename is set)
+ KParts::ReadOnlyPart *newPart = 0L;
+ emit p->browserExtension()->createNewWindow(KURL(), uargs,winargs,newPart);
+ if (newPart && ::tqqt_cast<KHTMLPart*>(newPart)) {
+ KHTMLPart *tdehtmlpart = static_cast<KHTMLPart*>(newPart);
+ //tqDebug("opener set to %p (this Window's part) in new Window %p (this Window=%p)",part,win,window);
+ tdehtmlpart->setOpener(p);
+ tdehtmlpart->setOpenedByJS(true);
+ if (tdehtmlpart->document().isNull()) {
+ tdehtmlpart->begin();
+ tdehtmlpart->write("<HTML><BODY>");
+ tdehtmlpart->end();
+ if ( p->docImpl() ) {
+ //kdDebug(6070) << "Setting domain to " << p->docImpl()->domain().string() << endl;
+ tdehtmlpart->docImpl()->setDomain( p->docImpl()->domain());
+ tdehtmlpart->docImpl()->setBaseURL( p->docImpl()->baseURL() );
+ }
+ }
+ uargs.serviceType = TQString::null;
+ if (uargs.frameName.lower() == "_blank")
+ uargs.frameName = TQString::null;
+ if (!url.isEmpty())
+ emit tdehtmlpart->browserExtension()->openURLRequest(url,uargs);
+ return Window::retrieve(tdehtmlpart); // global object
+ } else
+ return Undefined();
+}
+
+void Window::forgetSuppressedWindows()
+{
+ m_suppressedWindowInfo.clear();
+}
+
+void Window::showSuppressedWindows()
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>( m_frame->m_part );
+ KJS::Interpreter *interpreter = part->jScript()->interpreter();
+ ExecState *exec = interpreter->globalExec();
+
+ TQValueList<SuppressedWindowInfo> suppressedWindowInfo = m_suppressedWindowInfo;
+ m_suppressedWindowInfo.clear();
+ TQValueList<SuppressedWindowInfo>::Iterator it = suppressedWindowInfo.begin();
+ for ( ; it != suppressedWindowInfo.end() ; ++it ) {
+ executeOpenWindow(exec, (*it).url, (*it).frameName, (*it).features);
+ }
+}
+
+Value WindowFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( Window, thisObj );
+
+ // these should work no matter whether the window is already
+ // closed or not
+ if (id == Window::ValueOf || id == Window::ToString) {
+ return String("[object Window]");
+ }
+
+ Window *window = static_cast<Window *>(thisObj.imp());
+ TQString str, str2;
+
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(window->m_frame->m_part);
+ if (!part)
+ return Undefined();
+
+ KHTMLView *widget = part->view();
+ Value v = args[0];
+ UString s;
+ if (v.isValid() && !v.isA(UndefinedType)) {
+ s = v.toString(exec);
+ str = s.qstring();
+ }
+
+ TQString caption;
+ if (part && !part->url().host().isEmpty())
+ caption = part->url().host() + " - ";
+ caption += "JavaScript"; // TODO: i18n
+ // functions that work everywhere
+ switch(id) {
+ case Window::Alert:
+ if (!widget->dialogsAllowed())
+ return Undefined();
+ if ( part && part->xmlDocImpl() )
+ part->xmlDocImpl()->updateRendering();
+ if ( part )
+ emit part->browserExtension()->requestFocus(part);
+ KMessageBox::error(widget, TQStyleSheet::convertFromPlainText(str, TQStyleSheetItem::WhiteSpaceNormal), caption);
+ return Undefined();
+ case Window::Confirm:
+ if (!widget->dialogsAllowed())
+ return Undefined();
+ if ( part && part->xmlDocImpl() )
+ part->xmlDocImpl()->updateRendering();
+ if ( part )
+ emit part->browserExtension()->requestFocus(part);
+ return Boolean((KMessageBox::warningYesNo(widget, TQStyleSheet::convertFromPlainText(str), caption,
+ KStdGuiItem::ok(), KStdGuiItem::cancel()) == KMessageBox::Yes));
+ case Window::Prompt:
+#ifndef KONQ_EMBEDDED
+ if (!widget->dialogsAllowed())
+ return Undefined();
+ if ( part && part->xmlDocImpl() )
+ part->xmlDocImpl()->updateRendering();
+ if ( part )
+ emit part->browserExtension()->requestFocus(part);
+ bool ok;
+ if (args.size() >= 2)
+ str2 = KInputDialog::getText(caption,
+ TQStyleSheet::convertFromPlainText(str),
+ args[1].toString(exec).qstring(), &ok, widget);
+ else
+ str2 = KInputDialog::getText(caption,
+ TQStyleSheet::convertFromPlainText(str),
+ TQString::null, &ok, widget);
+ if ( ok )
+ return String(str2);
+ else
+ return Null();
+#else
+ return Undefined();
+#endif
+ case Window::GetComputedStyle: {
+ if ( !part || !part->xmlDocImpl() )
+ return Undefined();
+ DOM::Node arg0 = toNode(args[0]);
+ if (arg0.nodeType() != DOM::Node::ELEMENT_NODE)
+ return Undefined(); // throw exception?
+ else
+ return getDOMCSSStyleDeclaration(exec, part->document().defaultView().getComputedStyle(static_cast<DOM::Element>(arg0),
+ args[1].toString(exec).string()));
+ }
+ case Window::Open:
+ return window->openWindow(exec, args);
+ case Window::Close: {
+ /* From http://developer.netscape.com/docs/manuals/js/client/jsref/window.htm :
+ The close method closes only windows opened by JavaScript using the open method.
+ If you attempt to close any other window, a confirm is generated, which
+ lets the user choose whether the window closes.
+ This is a security feature to prevent "mail bombs" containing self.close().
+ However, if the window has only one document (the current one) in its
+ session history, the close is allowed without any confirm. This is a
+ special case for one-off windows that need to open other windows and
+ then dispose of themselves.
+ */
+ bool doClose = false;
+ if (!part->openedByJS())
+ {
+ // To conform to the SPEC, we only ask if the window
+ // has more than one entry in the history (NS does that too).
+ History history(exec,part);
+
+ if ( history.get( exec, "length" ).toInt32(exec) <= 1 )
+ {
+ doClose = true;
+ }
+ else
+ {
+ // Can we get this dialog with tabs??? Does it close the window or the tab in that case?
+ emit part->browserExtension()->requestFocus(part);
+ if ( KMessageBox::questionYesNo( window->part()->widget(),
+ i18n("Close window?"), i18n("Confirmation Required"),
+ KStdGuiItem::close(), KStdGuiItem::cancel() )
+ == KMessageBox::Yes )
+ doClose = true;
+ }
+ }
+ else
+ doClose = true;
+
+ if (doClose)
+ {
+ // If this is the current window (the one the interpreter runs in),
+ // then schedule a delayed close (so that the script terminates first).
+ // But otherwise, close immediately. This fixes w=window.open("","name");w.close();window.open("name");
+ if ( Window::retrieveActive(exec) == window ) {
+ if (widget) {
+ // quit all dialogs of this view
+ // this fixes 'setTimeout('self.close()',1000); alert("Hi");' crash
+ widget->closeChildDialogs();
+ }
+ //kdDebug() << "scheduling delayed close" << endl;
+ // We'll close the window at the end of the script execution
+ Window* w = const_cast<Window*>(window);
+ w->m_delayed.append( Window::DelayedAction( Window::DelayedClose ) );
+ } else {
+ //kdDebug() << "closing NOW" << endl;
+ (const_cast<Window*>(window))->closeNow();
+ }
+ }
+ return Undefined();
+ }
+ case Window::Navigate:
+ window->goURL(exec, args[0].toString(exec).qstring(), false /*don't lock history*/);
+ return Undefined();
+ case Window::Focus: {
+ KHTMLSettings::KJSWindowFocusPolicy policy =
+ part->settings()->windowFocusPolicy(part->url().host());
+ if(policy == KHTMLSettings::KJSWindowFocusAllow && widget) {
+ widget->topLevelWidget()->raise();
+ KWin::deIconifyWindow( widget->topLevelWidget()->winId() );
+ widget->setActiveWindow();
+ emit part->browserExtension()->requestFocus(part);
+ }
+ return Undefined();
+ }
+ case Window::Blur:
+ // TODO
+ return Undefined();
+ case Window::BToA:
+ case Window::AToB: {
+ if (!s.is8Bit())
+ return Undefined();
+ TQByteArray in, out;
+ char *binData = s.ascii();
+ in.setRawData( binData, s.size() );
+ if (id == Window::AToB)
+ KCodecs::base64Decode( in, out );
+ else
+ KCodecs::base64Encode( in, out );
+ in.resetRawData( binData, s.size() );
+ UChar *d = new UChar[out.size()];
+ for (uint i = 0; i < out.size(); i++)
+ d[i].uc = (uchar) out[i];
+ UString ret(d, out.size(), false /*no copy*/);
+ return String(ret);
+ }
+
+ };
+
+
+ // now unsafe functions..
+ if (!window->isSafeScript(exec))
+ return Undefined();
+
+ switch (id) {
+ case Window::ScrollBy:
+ if(args.size() == 2 && widget)
+ widget->scrollBy(args[0].toInt32(exec), args[1].toInt32(exec));
+ return Undefined();
+ case Window::Scroll:
+ case Window::ScrollTo:
+ if(args.size() == 2 && widget)
+ widget->setContentsPos(args[0].toInt32(exec), args[1].toInt32(exec));
+ return Undefined();
+ case Window::MoveBy: {
+ KHTMLSettings::KJSWindowMovePolicy policy =
+ part->settings()->windowMovePolicy(part->url().host());
+ if(policy == KHTMLSettings::KJSWindowMoveAllow && args.size() == 2 && widget)
+ {
+ KParts::BrowserExtension *ext = part->browserExtension();
+ if (ext) {
+ TQWidget * tl = widget->topLevelWidget();
+ TQRect sg = TDEGlobalSettings::desktopGeometry(tl);
+
+ TQPoint dest = tl->pos() + TQPoint( args[0].toInt32(exec), args[1].toInt32(exec) );
+ // Security check (the spec talks about UniversalBrowserWrite to disable this check...)
+ if ( dest.x() >= sg.x() && dest.y() >= sg.x() &&
+ dest.x()+tl->width() <= sg.width()+sg.x() &&
+ dest.y()+tl->height() <= sg.height()+sg.y() )
+ emit ext->moveTopLevelWidget( dest.x(), dest.y() );
+ }
+ }
+ return Undefined();
+ }
+ case Window::MoveTo: {
+ KHTMLSettings::KJSWindowMovePolicy policy =
+ part->settings()->windowMovePolicy(part->url().host());
+ if(policy == KHTMLSettings::KJSWindowMoveAllow && args.size() == 2 && widget)
+ {
+ KParts::BrowserExtension *ext = part->browserExtension();
+ if (ext) {
+ TQWidget * tl = widget->topLevelWidget();
+ TQRect sg = TDEGlobalSettings::desktopGeometry(tl);
+
+ TQPoint dest( args[0].toInt32(exec)+sg.x(), args[1].toInt32(exec)+sg.y() );
+ // Security check (the spec talks about UniversalBrowserWrite to disable this check...)
+ if ( dest.x() >= sg.x() && dest.y() >= sg.y() &&
+ dest.x()+tl->width() <= sg.width()+sg.x() &&
+ dest.y()+tl->height() <= sg.height()+sg.y() )
+ emit ext->moveTopLevelWidget( dest.x(), dest.y() );
+ }
+ }
+ return Undefined();
+ }
+ case Window::ResizeBy: {
+ KHTMLSettings::KJSWindowResizePolicy policy =
+ part->settings()->windowResizePolicy(part->url().host());
+ if(policy == KHTMLSettings::KJSWindowResizeAllow
+ && args.size() == 2 && widget)
+ {
+ TQWidget * tl = widget->topLevelWidget();
+ TQRect geom = tl->frameGeometry();
+ window->resizeTo( tl,
+ geom.width() + args[0].toInt32(exec),
+ geom.height() + args[1].toInt32(exec) );
+ }
+ return Undefined();
+ }
+ case Window::ResizeTo: {
+ KHTMLSettings::KJSWindowResizePolicy policy =
+ part->settings()->windowResizePolicy(part->url().host());
+ if(policy == KHTMLSettings::KJSWindowResizeAllow
+ && args.size() == 2 && widget)
+ {
+ TQWidget * tl = widget->topLevelWidget();
+ window->resizeTo( tl, args[0].toInt32(exec), args[1].toInt32(exec) );
+ }
+ return Undefined();
+ }
+ case Window::SetTimeout:
+ case Window::SetInterval: {
+ bool singleShot;
+ int i; // timeout interval
+ if (args.size() == 0)
+ return Undefined();
+ if (args.size() > 1) {
+ singleShot = (id == Window::SetTimeout);
+ i = args[1].toInt32(exec);
+ } else {
+ // second parameter is missing. Emulate Mozilla behavior.
+ singleShot = true;
+ i = 4;
+ }
+ if (v.isA(StringType)) {
+ int r = (const_cast<Window*>(window))->winq->installTimeout(Identifier(s), i, singleShot );
+ return Number(r);
+ }
+ else if (v.isA(ObjectType) && Object::dynamicCast(v).implementsCall()) {
+ Object func = Object::dynamicCast(v);
+ List funcArgs;
+ ListIterator it = args.begin();
+ int argno = 0;
+ while (it != args.end()) {
+ Value arg = it++;
+ if (argno++ >= 2)
+ funcArgs.append(arg);
+ }
+ if (args.size() < 2)
+ funcArgs.append(Number(i));
+ int r = (const_cast<Window*>(window))->winq->installTimeout(func, funcArgs, i, singleShot );
+ return Number(r);
+ }
+ else
+ return Undefined();
+ }
+ case Window::ClearTimeout:
+ case Window::ClearInterval:
+ (const_cast<Window*>(window))->winq->clearTimeout(v.toInt32(exec));
+ return Undefined();
+ case Window::Print:
+ if ( widget ) {
+ // ### TODO emit onbeforeprint event
+ widget->print();
+ // ### TODO emit onafterprint event
+ }
+ case Window::CaptureEvents:
+ case Window::ReleaseEvents:
+ // Do nothing for now. These are NS-specific legacy calls.
+ break;
+ case Window::AddEventListener: {
+ JSEventListener *listener = Window::retrieveActive(exec)->getJSEventListener(args[1]);
+ if (listener) {
+ DOM::DocumentImpl* docimpl = static_cast<DOM::DocumentImpl *>(part->document().handle());
+ docimpl->addWindowEventListener(DOM::EventImpl::typeToId(args[0].toString(exec).string()),listener,args[2].toBoolean(exec));
+ }
+ return Undefined();
+ }
+ case Window::RemoveEventListener: {
+ JSEventListener *listener = Window::retrieveActive(exec)->getJSEventListener(args[1]);
+ if (listener) {
+ DOM::DocumentImpl* docimpl = static_cast<DOM::DocumentImpl *>(part->document().handle());
+ docimpl->removeWindowEventListener(DOM::EventImpl::typeToId(args[0].toString(exec).string()),listener,args[2].toBoolean(exec));
+ }
+ return Undefined();
+ }
+
+ }
+ return Undefined();
+}
+
+////////////////////// ScheduledAction ////////////////////////
+
+// KDE 4: Make those parameters const ... &
+ScheduledAction::ScheduledAction(Object _func, List _args, DateTimeMS _nextTime, int _interval, bool _singleShot,
+ int _timerId)
+{
+ //kdDebug(6070) << "ScheduledAction::ScheduledAction(isFunction) " << this << endl;
+ func = static_cast<ObjectImp*>(_func.imp());
+ args = _args;
+ isFunction = true;
+ singleShot = _singleShot;
+ nextTime = _nextTime;
+ interval = _interval;
+ executing = false;
+ timerId = _timerId;
+}
+
+// KDE 4: Make it const TQString &
+ScheduledAction::ScheduledAction(TQString _code, DateTimeMS _nextTime, int _interval, bool _singleShot, int _timerId)
+{
+ //kdDebug(6070) << "ScheduledAction::ScheduledAction(!isFunction) " << this << endl;
+ //func = 0;
+ //args = 0;
+ func = 0;
+ code = _code;
+ isFunction = false;
+ singleShot = _singleShot;
+ nextTime = _nextTime;
+ interval = _interval;
+ executing = false;
+ timerId = _timerId;
+}
+
+bool ScheduledAction::execute(Window *window)
+{
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(window->m_frame->m_part);
+ if (!part || !part->jScriptEnabled())
+ return false;
+ ScriptInterpreter *interpreter = static_cast<ScriptInterpreter *>(part->jScript()->interpreter());
+
+ interpreter->setProcessingTimerCallback(true);
+
+ //kdDebug(6070) << "ScheduledAction::execute " << this << endl;
+ if (isFunction) {
+ if (func->implementsCall()) {
+ // #### check this
+ Q_ASSERT( part );
+ if ( part )
+ {
+ KJS::Interpreter *interpreter = part->jScript()->interpreter();
+ ExecState *exec = interpreter->globalExec();
+ Q_ASSERT( window == interpreter->globalObject().imp() );
+ Object obj( window );
+ func->call(exec,obj,args); // note that call() creates its own execution state for the func call
+ if (exec->hadException())
+ exec->clearException();
+
+ // Update our document's rendering following the execution of the timeout callback.
+ part->document().updateRendering();
+ }
+ }
+ }
+ else {
+ part->executeScript(DOM::Node(), code);
+ }
+
+ interpreter->setProcessingTimerCallback(false);
+ return true;
+}
+
+void ScheduledAction::mark()
+{
+ if (func && !func->marked())
+ func->mark();
+ args.mark();
+}
+
+ScheduledAction::~ScheduledAction()
+{
+ //kdDebug(6070) << "ScheduledAction::~ScheduledAction " << this << endl;
+}
+
+////////////////////// WindowQObject ////////////////////////
+
+WindowQObject::WindowQObject(Window *w)
+ : parent(w)
+{
+ //kdDebug(6070) << "WindowQObject::WindowQObject " << this << endl;
+ if ( !parent->m_frame )
+ kdDebug(6070) << "WARNING: null part in " << k_funcinfo << endl;
+ else
+ connect( parent->m_frame, TQT_SIGNAL( destroyed() ),
+ this, TQT_SLOT( parentDestroyed() ) );
+ pausedTime = 0;
+ lastTimerId = 0;
+ currentlyDispatching = false;
+}
+
+WindowQObject::~WindowQObject()
+{
+ //kdDebug(6070) << "WindowQObject::~WindowQObject " << this << endl;
+ parentDestroyed(); // reuse same code
+}
+
+void WindowQObject::parentDestroyed()
+{
+ killTimers();
+
+ TQPtrListIterator<ScheduledAction> it(scheduledActions);
+ for (; it.current(); ++it)
+ delete it.current();
+ scheduledActions.clear();
+}
+
+int WindowQObject::installTimeout(const Identifier &handler, int t, bool singleShot)
+{
+ int id = ++lastTimerId;
+ if (t < 10) t = 10;
+ DateTimeMS nextTime = DateTimeMS::now().addMSecs(-pausedTime + t);
+
+ ScheduledAction *action = new ScheduledAction(handler.qstring(),nextTime,t,singleShot,id);
+ scheduledActions.append(action);
+ setNextTimer();
+ return id;
+}
+
+int WindowQObject::installTimeout(const Value &func, List args, int t, bool singleShot)
+{
+ Object objFunc = Object::dynamicCast( func );
+ if (!objFunc.isValid())
+ return 0;
+ int id = ++lastTimerId;
+ if (t < 10) t = 10;
+
+ DateTimeMS nextTime = DateTimeMS::now().addMSecs(-pausedTime + t);
+ ScheduledAction *action = new ScheduledAction(objFunc,args,nextTime,t,singleShot,id);
+ scheduledActions.append(action);
+ setNextTimer();
+ return id;
+}
+
+void WindowQObject::clearTimeout(int timerId)
+{
+ TQPtrListIterator<ScheduledAction> it(scheduledActions);
+ for (; it.current(); ++it) {
+ ScheduledAction *action = it.current();
+ if (action->timerId == timerId) {
+ scheduledActions.removeRef(action);
+ if (!action->executing)
+ delete action;
+ return;
+ }
+ }
+}
+
+bool WindowQObject::hasTimers() const
+{
+ return scheduledActions.count();
+}
+
+void WindowQObject::mark()
+{
+ TQPtrListIterator<ScheduledAction> it(scheduledActions);
+ for (; it.current(); ++it)
+ it.current()->mark();
+}
+
+void WindowQObject::timerEvent(TQTimerEvent *)
+{
+ killTimers();
+
+ if (scheduledActions.isEmpty())
+ return;
+
+ currentlyDispatching = true;
+
+
+ DateTimeMS currentActual = DateTimeMS::now();
+ DateTimeMS currentAdjusted = currentActual.addMSecs(-pausedTime);
+
+ // Work out which actions are to be executed. We take a separate copy of
+ // this list since the main one may be modified during action execution
+ TQPtrList<ScheduledAction> toExecute;
+ TQPtrListIterator<ScheduledAction> it(scheduledActions);
+ for (; it.current(); ++it)
+ if (currentAdjusted >= it.current()->nextTime)
+ toExecute.append(it.current());
+
+ // ### verify that the window can't be closed (and action deleted) during execution
+ it = TQPtrListIterator<ScheduledAction>(toExecute);
+ for (; it.current(); ++it) {
+ ScheduledAction *action = it.current();
+ if (!scheduledActions.containsRef(action)) // removed by clearTimeout()
+ continue;
+
+ action->executing = true; // prevent deletion in clearTimeout()
+
+ if (parent->part()) {
+ bool ok = action->execute(parent);
+ if ( !ok ) // e.g. JS disabled
+ scheduledActions.removeRef( action );
+ }
+
+ if (action->singleShot) {
+ scheduledActions.removeRef(action);
+ }
+
+ action->executing = false;
+
+ if (!scheduledActions.containsRef(action))
+ delete action;
+ else
+ action->nextTime = action->nextTime.addMSecs(action->interval);
+ }
+
+ pausedTime += currentActual.msecsTo(DateTimeMS::now());
+
+ currentlyDispatching = false;
+
+ // Work out when next event is to occur
+ setNextTimer();
+}
+
+DateTimeMS DateTimeMS::addMSecs(int s) const
+{
+ DateTimeMS c = *this;
+ c.mTime = TQT_TQTIME_OBJECT(mTime.addMSecs(s));
+ if (s > 0)
+ {
+ if (c.mTime < mTime)
+ c.mDate = TQT_TQDATE_OBJECT(mDate.addDays(1));
+ }
+ else
+ {
+ if (c.mTime > mTime)
+ c.mDate = TQT_TQDATE_OBJECT(mDate.addDays(-1));
+ }
+ return c;
+}
+
+bool DateTimeMS::operator >(const DateTimeMS &other) const
+{
+ if (mDate > other.mDate)
+ return true;
+
+ if (mDate < other.mDate)
+ return false;
+
+ return mTime > other.mTime;
+}
+
+bool DateTimeMS::operator >=(const DateTimeMS &other) const
+{
+ if (mDate > other.mDate)
+ return true;
+
+ if (mDate < other.mDate)
+ return false;
+
+ return mTime >= other.mTime;
+}
+
+int DateTimeMS::msecsTo(const DateTimeMS &other) const
+{
+ int d = mDate.daysTo(other.mDate);
+ int ms = mTime.msecsTo(other.mTime);
+ return d*24*60*60*1000 + ms;
+}
+
+
+DateTimeMS DateTimeMS::now()
+{
+ DateTimeMS t;
+ TQTime before = TQTime::currentTime();
+ t.mDate = TQDate::currentDate();
+ t.mTime = TQTime::currentTime();
+ if (t.mTime < before)
+ t.mDate = TQDate::currentDate(); // prevent race condition in hacky way :)
+ return t;
+}
+
+void WindowQObject::setNextTimer()
+{
+ if (currentlyDispatching)
+ return; // Will schedule at the end
+
+ if (scheduledActions.isEmpty())
+ return;
+
+ TQPtrListIterator<ScheduledAction> it(scheduledActions);
+ DateTimeMS nextTime = it.current()->nextTime;
+ for (++it; it.current(); ++it)
+ if (nextTime > it.current()->nextTime)
+ nextTime = it.current()->nextTime;
+
+ DateTimeMS nextTimeActual = nextTime.addMSecs(pausedTime);
+ int nextInterval = DateTimeMS::now().msecsTo(nextTimeActual);
+ if (nextInterval < 0)
+ nextInterval = 0;
+ startTimer(nextInterval);
+}
+
+void WindowQObject::timeoutClose()
+{
+ parent->closeNow();
+}
+
+Value FrameArray::get(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "FrameArray::get " << p.qstring() << " part=" << (void*)part << endl;
+#endif
+ if (part.isNull())
+ return Undefined();
+
+ TQPtrList<KParts::ReadOnlyPart> frames = part->frames();
+ unsigned int len = frames.count();
+ if (p == lengthPropertyName)
+ return Number(len);
+ else if (p== "location") // non-standard property, but works in NS and IE
+ {
+ Object obj = Object::dynamicCast( Window::retrieve( part ) );
+ if ( obj.isValid() )
+ return obj.get( exec, "location" );
+ return Undefined();
+ }
+
+ // check for the name or number
+ KParts::ReadOnlyPart *frame = part->findFramePart(p.qstring());
+ if (!frame) {
+ bool ok;
+ unsigned int i = p.toArrayIndex(&ok);
+ if (ok && i < len)
+ frame = frames.at(i);
+ }
+
+ // we are potentially fetching a reference to a another Window object here.
+ // i.e. we may be accessing objects from another interpreter instance.
+ // Therefore we have to be a bit careful with memory management.
+ if (frame) {
+ return Window::retrieve(frame);
+ }
+
+ // Fun IE quirk: name lookup in there is actually done by document.all
+ // hence, it can find non-frame things (and even let them hide frame ones!)
+ // We don't quite do that, but do this as a fallback.
+ DOM::DocumentImpl* doc = static_cast<DOM::DocumentImpl*>(part->document().handle());
+ if (doc) {
+ DOM::HTMLCollectionImpl docuAll(doc, DOM::HTMLCollectionImpl::DOC_ALL);
+ DOM::NodeImpl* node = docuAll.namedItem(p.string());
+ if (node) {
+ if (node->id() == ID_FRAME || node->id() == ID_IFRAME) {
+ //Return the Window object.
+ KHTMLPart* part = static_cast<DOM::HTMLFrameElementImpl*>(node)->contentPart();
+ if (part)
+ return Value(Window::retrieveWindow(part));
+ else
+ return Undefined();
+ } else {
+ //Just a regular node..
+ return getDOMNode(exec, node);
+ }
+ }
+ } else {
+ kdWarning(6070) << "Missing own document in FrameArray::get()" << endl;
+ }
+
+ return ObjectImp::get(exec, p);
+}
+
+Value FrameArray::call(ExecState *exec, Object &/*thisObj*/, const List &args)
+{
+ //IE supports a subset of the get functionality as call...
+ //... basically, when the return is a window, it supports that, otherwise it
+ //errors out. We do a cheap-and-easy emulation of that, and just do the same
+ //thing as get does.
+ if (args.size() == 1)
+ return get(exec, Identifier(args[0].toString(exec)));
+
+ return Undefined();
+}
+
+
+////////////////////// Location Object ////////////////////////
+
+const ClassInfo Location::info = { "Location", 0, &LocationTable, 0 };
+/*
+@begin LocationTable 11
+ hash Location::Hash DontDelete
+ host Location::Host DontDelete
+ hostname Location::Hostname DontDelete
+ href Location::Href DontDelete
+ pathname Location::Pathname DontDelete
+ port Location::Port DontDelete
+ protocol Location::Protocol DontDelete
+ search Location::Search DontDelete
+ [[==]] Location::EqualEqual DontDelete|ReadOnly
+ assign Location::Assign DontDelete|Function 1
+ toString Location::ToString DontDelete|Function 0
+ replace Location::Replace DontDelete|Function 1
+ reload Location::Reload DontDelete|Function 0
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(LocationFunc)
+Location::Location(tdehtml::ChildFrame *f) : m_frame(f)
+{
+ //kdDebug(6070) << "Location::Location " << this << " m_part=" << (void*)m_part << endl;
+}
+
+Location::~Location()
+{
+ //kdDebug(6070) << "Location::~Location " << this << " m_part=" << (void*)m_part << endl;
+}
+
+KParts::ReadOnlyPart *Location::part() const {
+ return m_frame ? static_cast<KParts::ReadOnlyPart *>(m_frame->m_part) : 0L;
+}
+
+Value Location::get(ExecState *exec, const Identifier &p) const
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Location::get " << p.qstring() << " m_part=" << (void*)m_frame->m_part << endl;
+#endif
+
+ if (m_frame.isNull() || m_frame->m_part.isNull())
+ return Undefined();
+
+ const HashEntry *entry = Lookup::findEntry(&LocationTable, p);
+
+ // properties that work on all Location objects
+ if ( entry && entry->value == Replace )
+ return lookupOrCreateFunction<LocationFunc>(exec,p,this,entry->value,entry->params,entry->attr);
+
+ // XSS check
+ const Window* window = Window::retrieveWindow( m_frame->m_part );
+ if ( !window || !window->isSafeScript(exec) )
+ return Undefined();
+
+ KURL url = m_frame->m_part->url();
+ if (entry)
+ switch (entry->value) {
+ case Hash:
+ return String( url.ref().isNull() ? TQString("") : "#" + url.ref() );
+ case Host: {
+ UString str = url.host();
+ if (url.port())
+ str += ":" + TQString::number((int)url.port());
+ return String(str);
+ // Note: this is the IE spec. The NS spec swaps the two, it says
+ // "The hostname property is the concatenation of the host and port properties, separated by a colon."
+ // Bleh.
+ }
+ case Hostname:
+ return String( url.host() );
+ case Href:
+ if (url.isEmpty())
+ return String("about:blank");
+ else if (!url.hasPath())
+ return String( url.prettyURL()+"/" );
+ else
+ return String( url.prettyURL() );
+ case Pathname:
+ if (url.isEmpty())
+ return String("");
+ return String( url.path().isEmpty() ? TQString("/") : url.path() );
+ case Port:
+ return String( url.port() ? TQString::number((int)url.port()) : TQString::fromLatin1("") );
+ case Protocol:
+ return String( url.protocol()+":" );
+ case Search:
+ return String( url.query() );
+ case EqualEqual: // [[==]]
+ return String(toString(exec));
+ case ToString:
+ return lookupOrCreateFunction<LocationFunc>(exec,p,this,entry->value,entry->params,entry->attr);
+ }
+ // Look for overrides
+ ValueImp * val = ObjectImp::getDirect(p);
+ if (val)
+ return Value(val);
+ if (entry && (entry->attr & Function))
+ return lookupOrCreateFunction<LocationFunc>(exec,p,this,entry->value,entry->params,entry->attr);
+
+ return Undefined();
+}
+
+void Location::put(ExecState *exec, const Identifier &p, const Value &v, int attr)
+{
+#ifdef KJS_VERBOSE
+ kdDebug(6070) << "Location::put " << p.qstring() << " m_part=" << (void*)m_frame->m_part << endl;
+#endif
+ if (m_frame.isNull() || m_frame->m_part.isNull())
+ return;
+
+ const Window* window = Window::retrieveWindow( m_frame->m_part );
+ if ( !window )
+ return;
+
+ KURL url = m_frame->m_part->url();
+
+ const HashEntry *entry = Lookup::findEntry(&LocationTable, p);
+
+ if (entry) {
+
+ // XSS check. Only new hrefs can be set from other sites
+ if (entry->value != Href && !window->isSafeScript(exec))
+ return;
+
+ TQString str = v.toString(exec).qstring();
+ switch (entry->value) {
+ case Href: {
+ KHTMLPart* p =::tqqt_cast<KHTMLPart*>(Window::retrieveActive(exec)->part());
+ if ( p )
+ url = p->htmlDocument().completeURL( str ).string();
+ else
+ url = str;
+ break;
+ }
+ case Hash:
+ // when the hash is already the same ignore it
+ if (str == url.ref()) return;
+ url.setRef(str);
+ break;
+ case Host: {
+ TQString host = str.left(str.find(":"));
+ TQString port = str.mid(str.find(":")+1);
+ url.setHost(host);
+ url.setPort(port.toUInt());
+ break;
+ }
+ case Hostname:
+ url.setHost(str);
+ break;
+ case Pathname:
+ url.setPath(str);
+ break;
+ case Port:
+ url.setPort(str.toUInt());
+ break;
+ case Protocol:
+ url.setProtocol(str);
+ break;
+ case Search:
+ url.setQuery(str);
+ break;
+ }
+ } else {
+ ObjectImp::put(exec, p, v, attr);
+ return;
+ }
+
+ Window::retrieveWindow(m_frame->m_part)->goURL(exec, url.url(), false /* don't lock history*/ );
+}
+
+Value Location::toPrimitive(ExecState *exec, Type) const
+{
+ if (m_frame) {
+ Window* window = Window::retrieveWindow( m_frame->m_part );
+ if ( window && window->isSafeScript(exec) )
+ return String(toString(exec));
+ }
+ return Undefined();
+}
+
+UString Location::toString(ExecState *exec) const
+{
+ if (m_frame) {
+ Window* window = Window::retrieveWindow( m_frame->m_part );
+ if ( window && window->isSafeScript(exec) )
+ {
+ KURL url = m_frame->m_part->url();
+ if (url.isEmpty())
+ return "about:blank";
+ else if (!url.hasPath())
+ return url.prettyURL()+"/";
+ else
+ return url.prettyURL();
+ }
+ }
+ return "";
+}
+
+Value LocationFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( Location, thisObj );
+ Location *location = static_cast<Location *>(thisObj.imp());
+ KParts::ReadOnlyPart *part = location->part();
+
+ if (!part) return Undefined();
+
+ Window* window = Window::retrieveWindow(part);
+
+ if ( !window->isSafeScript(exec) && id != Location::Replace)
+ return Undefined();
+
+ switch (id) {
+ case Location::Assign:
+ case Location::Replace:
+ Window::retrieveWindow(part)->goURL(exec, args[0].toString(exec).qstring(),
+ id == Location::Replace);
+ break;
+ case Location::Reload: {
+ KHTMLPart *tdehtmlpart = ::tqqt_cast<KHTMLPart *>(part);
+ if (tdehtmlpart)
+ tdehtmlpart->scheduleRedirection(-1, part->url().url(), true/*lock history*/);
+ else
+ part->openURL(part->url());
+ break;
+ }
+ case Location::ToString:
+ return String(location->toString(exec));
+ }
+ return Undefined();
+}
+
+////////////////////// External Object ////////////////////////
+
+const ClassInfo External::info = { "External", 0, 0, 0 };
+/*
+@begin ExternalTable 4
+ addFavorite External::AddFavorite DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(ExternalFunc)
+
+Value External::get(ExecState *exec, const Identifier &p) const
+{
+ return lookupGetFunction<ExternalFunc,ObjectImp>(exec,p,&ExternalTable,this);
+}
+
+Value ExternalFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( External, thisObj );
+ External *external = static_cast<External *>(thisObj.imp());
+
+ KHTMLPart *part = external->part;
+ if (!part)
+ return Undefined();
+
+ KHTMLView *widget = part->view();
+
+ switch (id) {
+ case External::AddFavorite:
+ {
+#ifndef KONQ_EMBEDDED
+ if (!widget->dialogsAllowed())
+ return Undefined();
+ part->xmlDocImpl()->updateRendering();
+ if (args.size() != 1 && args.size() != 2)
+ return Undefined();
+
+ TQString url = args[0].toString(exec).qstring();
+ TQString title;
+ if (args.size() == 2)
+ title = args[1].toString(exec).qstring();
+
+ // AK - don't do anything yet, for the moment i
+ // just wanted the base js handling code in cvs
+ return Undefined();
+
+ TQString question;
+ if ( title.isEmpty() )
+ question = i18n("Do you want a bookmark pointing to the location \"%1\" to be added to your collection?")
+ .arg(url);
+ else
+ question = i18n("Do you want a bookmark pointing to the location \"%1\" titled \"%2\" to be added to your collection?")
+ .arg(url).arg(title);
+
+ emit part->browserExtension()->requestFocus(part);
+
+ TQString caption;
+ if (!part->url().host().isEmpty())
+ caption = part->url().host() + " - ";
+ caption += i18n("JavaScript Attempted Bookmark Insert");
+
+ if (KMessageBox::warningYesNo(
+ widget, question, caption,
+ i18n("Insert"), i18n("Disallow")) == KMessageBox::Yes)
+ {
+ KBookmarkManager *mgr = KBookmarkManager::userBookmarksManager();
+ mgr->addBookmarkDialog(url,title);
+ }
+#else
+ return Undefined();
+#endif
+ break;
+ }
+ default:
+ return Undefined();
+ }
+
+ return Undefined();
+}
+
+////////////////////// History Object ////////////////////////
+
+const ClassInfo History::info = { "History", 0, 0, 0 };
+/*
+@begin HistoryTable 4
+ length History::Length DontDelete|ReadOnly
+ back History::Back DontDelete|Function 0
+ forward History::Forward DontDelete|Function 0
+ go History::Go DontDelete|Function 1
+@end
+*/
+IMPLEMENT_PROTOFUNC_DOM(HistoryFunc)
+
+Value History::get(ExecState *exec, const Identifier &p) const
+{
+ return lookupGet<HistoryFunc,History,ObjectImp>(exec,p,&HistoryTable,this);
+}
+
+Value History::getValueProperty(ExecState *, int token) const
+{
+ // if previous or next is implemented, make sure its not a major
+ // privacy leak (see i.e. http://security.greymagic.com/adv/gm005-op/)
+ switch (token) {
+ case Length:
+ {
+ if ( !part )
+ return Number( 0 );
+
+ KParts::BrowserExtension *ext = part->browserExtension();
+ if ( !ext )
+ return Number( 0 );
+
+ KParts::BrowserInterface *iface = ext->browserInterface();
+ if ( !iface )
+ return Number( 0 );
+
+ TQVariant length = iface->property( "historyLength" );
+
+ if ( length.type() != TQVariant::UInt )
+ return Number( 0 );
+
+ return Number( length.toUInt() );
+ }
+ default:
+ kdDebug(6070) << "WARNING: Unhandled token in History::getValueProperty : " << token << endl;
+ return Undefined();
+ }
+}
+
+Value HistoryFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ KJS_CHECK_THIS( History, thisObj );
+ History *history = static_cast<History *>(thisObj.imp());
+
+ Value v = args[0];
+ Number n;
+ if(v.isValid())
+ n = v.toInteger(exec);
+
+ int steps;
+ switch (id) {
+ case History::Back:
+ steps = -1;
+ break;
+ case History::Forward:
+ steps = 1;
+ break;
+ case History::Go:
+ steps = n.intValue();
+ break;
+ default:
+ return Undefined();
+ }
+
+ // Special case for go(0) from a frame -> reload only the frame
+ // go(i!=0) from a frame navigates into the history of the frame only,
+ // in both IE and NS (but not in Mozilla).... we can't easily do that
+ // in Konqueror...
+ if (!steps) // add && history->part->parentPart() to get only frames, but doesn't matter
+ {
+ history->part->openURL( history->part->url() ); /// ## need args.reload=true?
+ } else
+ {
+ // Delay it.
+ // Testcase: history.back(); alert("hello");
+ Window* window = Window::retrieveWindow( history->part );
+ window->delayedGoHistory( steps );
+ }
+ return Undefined();
+}
+
+/////////////////////////////////////////////////////////////////////////////
+
+#ifdef Q_WS_QWS
+
+const ClassInfo Konqueror::info = { "Konqueror", 0, 0, 0 };
+
+bool Konqueror::hasProperty(ExecState *exec, const Identifier &p) const
+{
+ if ( p.qstring().startsWith( "goHistory" ) ) return false;
+
+ return true;
+}
+
+Value Konqueror::get(ExecState *exec, const Identifier &p) const
+{
+ if ( p == "goHistory" || part->url().protocol() != "http" || part->url().host() != "localhost" )
+ return Undefined();
+
+ KParts::BrowserExtension *ext = part->browserExtension();
+ if ( ext ) {
+ KParts::BrowserInterface *iface = ext->browserInterface();
+ if ( iface ) {
+ TQVariant prop = iface->property( p.qstring().latin1() );
+
+ if ( prop.isValid() ) {
+ switch( prop.type() ) {
+ case TQVariant::Int:
+ return Number( prop.toInt() );
+ case TQVariant::String:
+ return String( prop.toString() );
+ default:
+ break;
+ }
+ }
+ }
+ }
+
+ return Value( new KonquerorFunc(exec, this, p.qstring().latin1() ) );
+}
+
+Value KonquerorFunc::tryCall(ExecState *exec, Object &, const List &args)
+{
+ KParts::BrowserExtension *ext = konqueror->part->browserExtension();
+
+ if (!ext)
+ return Undefined();
+
+ KParts::BrowserInterface *iface = ext->browserInterface();
+
+ if ( !iface )
+ return Undefined();
+
+ TQCString n = m_name.data();
+ n += "()";
+ iface->callMethod( n.data(), TQVariant() );
+
+ return Undefined();
+}
+
+UString Konqueror::toString(ExecState *) const
+{
+ return UString("[object Konqueror]");
+}
+
+#endif
+/////////////////////////////////////////////////////////////////////////////
+} //namespace KJS
+
+#include "kjs_window.moc"
diff --git a/tdehtml/ecma/kjs_window.h b/tdehtml/ecma/kjs_window.h
new file mode 100644
index 000000000..b9142f983
--- /dev/null
+++ b/tdehtml/ecma/kjs_window.h
@@ -0,0 +1,309 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000 Harri Porten (porten@kde.org)
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _KJS_WINDOW_H_
+#define _KJS_WINDOW_H_
+
+#include <tqobject.h>
+#include <tqguardedptr.h>
+#include <tqmap.h>
+#include <tqptrlist.h>
+#include <tqdatetime.h>
+
+#include "kjs_binding.h"
+#include "kjs_views.h"
+
+class TQTimer;
+class KHTMLView;
+class KHTMLPart;
+
+namespace KParts {
+ class ReadOnlyPart;
+}
+
+namespace tdehtml {
+ class ChildFrame;
+}
+
+namespace KJS {
+
+ class WindowFunc;
+ class WindowQObject;
+ class Location;
+ class History;
+ class External;
+ class FrameArray;
+ class JSEventListener;
+ class JSLazyEventListener;
+
+ class Screen : public ObjectImp {
+ public:
+ Screen(ExecState *exec);
+ enum {
+ Height, Width, ColorDepth, PixelDepth, AvailLeft, AvailTop, AvailHeight,
+ AvailWidth
+ };
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ private:
+ KHTMLView *view;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ };
+
+ class KDE_EXPORT Window : public ObjectImp {
+ friend TQGuardedPtr<KHTMLPart> getInstance();
+ friend class Location;
+ friend class WindowFunc;
+ friend class WindowQObject;
+ friend class ScheduledAction;
+ public:
+ Window(tdehtml::ChildFrame *p);
+ public:
+ ~Window();
+ /**
+ * Returns and registers a window object. In case there's already a Window
+ * for the specified part p this will be returned in order to have unique
+ * bindings.
+ */
+ static Value retrieve(KParts::ReadOnlyPart *p);
+ /**
+ * Returns the Window object for a given part
+ */
+ static Window *retrieveWindow(KParts::ReadOnlyPart *p);
+ /**
+ * returns a pointer to the Window object this javascript interpreting instance
+ * was called from.
+ */
+ static Window *retrieveActive(ExecState *exec);
+ KParts::ReadOnlyPart *part() const;
+ virtual void mark();
+ virtual bool hasProperty(ExecState *exec, const Identifier &p) const;
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual void put(ExecState *exec, const Identifier &propertyName, const Value &value, int attr = None);
+ virtual bool toBoolean(ExecState *exec) const;
+ virtual DOM::AbstractView toAbstractView() const;
+ void scheduleClose();
+ void closeNow();
+ void delayedGoHistory(int steps);
+ void goHistory(int steps);
+ void goURL(ExecState* exec, const TQString& url, bool lockHistory);
+ Value openWindow(ExecState *exec, const List &args);
+ Value executeOpenWindow(ExecState *exec, const KURL& url, const TQString& frameName, const TQString& features);
+ void resizeTo(TQWidget* tl, int width, int height);
+ void afterScriptExecution();
+ bool isSafeScript(ExecState *exec) const {
+ KParts::ReadOnlyPart *activePart = static_cast<KJS::ScriptInterpreter *>( exec->interpreter() )->part();
+ if ( activePart == part() ) return true;
+ return checkIsSafeScript( activePart );
+ }
+ Location *location() const;
+ ObjectImp* frames( ExecState* exec ) const;
+ JSEventListener *getJSEventListener(const Value &val, bool html = false);
+ JSLazyEventListener *getJSLazyEventListener(const TQString &code, const TQString &name, DOM::NodeImpl* node);
+ void clear( ExecState *exec );
+ virtual UString toString(ExecState *exec) const;
+
+ // Set the current "event" object
+ void setCurrentEvent( DOM::Event *evt );
+
+ TQPtrDict<JSEventListener> jsEventListeners;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Closed, Crypto, DefaultStatus, Status, Document, Node, EventCtor, Range,
+ NodeFilter, DOMException, CSSRule, Frames, _History, _External, Event, InnerHeight,
+ InnerWidth, Length, _Location, Navigate, Name, _Navigator, _Konqueror, ClientInformation,
+ OffscreenBuffering, Opener, OuterHeight, OuterWidth, PageXOffset, PageYOffset,
+ Parent, Personalbar, ScreenX, ScreenY, Scrollbars, Scroll, ScrollBy,
+ ScreenTop, ScreenLeft, AToB, BToA, FrameElement, GetComputedStyle,
+ ScrollTo, ScrollX, ScrollY, MoveBy, MoveTo, ResizeBy, ResizeTo, Self, _Window, Top, _Screen,
+ Image, Option, Alert, Confirm, Prompt, Open, SetTimeout, ClearTimeout,
+ XMLHttpRequest, XMLSerializer, DOMParser,
+ Focus, Blur, Close, SetInterval, ClearInterval, CaptureEvents, ReleaseEvents,
+ Print, AddEventListener, RemoveEventListener, SideBar,
+ ValueOf, ToString,
+ Onabort, Onblur,
+ Onchange, Onclick, Ondblclick, Ondragdrop, Onerror, Onfocus,
+ Onkeydown, Onkeypress, Onkeyup, Onload, Onmousedown, Onmousemove,
+ Onmouseout, Onmouseover, Onmouseup, Onmove, Onreset, Onresize,
+ Onselect, Onsubmit, Onunload,
+ MutationEventCtor, KeyboardEventCtor, EventExceptionCtor,
+ ElementCtor, DocumentCtor, HTMLDocumentCtor,
+ HTMLElementCtor, HTMLHtmlElementCtor, HTMLHeadElementCtor, HTMLLinkElementCtor,
+ HTMLTitleElementCtor, HTMLMetaElementCtor, HTMLBaseElementCtor, HTMLIsIndexElementCtor,
+ HTMLStyleElementCtor, HTMLBodyElementCtor, HTMLFormElementCtor, HTMLSelectElementCtor,
+ HTMLOptGroupElementCtor, HTMLOptionElementCtor, HTMLInputElementCtor, HTMLTextAreaElementCtor,
+ HTMLButtonElementCtor, HTMLLabelElementCtor, HTMLFieldSetElementCtor, HTMLLegendElementCtor,
+ HTMLUListElementCtor, HTMLOListElementCtor, HTMLDListElementCtor, HTMLDirectoryElementCtor,
+ HTMLMenuElementCtor, HTMLLIElementCtor, HTMLDivElementCtor, HTMLParagraphElementCtor,
+ HTMLHeadingElementCtor, HTMLBlockQuoteElementCtor, HTMLQuoteElementCtor, HTMLPreElementCtor,
+ HTMLBRElementCtor, HTMLBaseFontElementCtor, HTMLFontElementCtor, HTMLHRElementCtor, HTMLModElementCtor,
+ HTMLAnchorElementCtor, HTMLImageElementCtor, HTMLObjectElementCtor, HTMLParamElementCtor,
+ HTMLAppletElementCtor, HTMLMapElementCtor, HTMLAreaElementCtor, HTMLScriptElementCtor,
+ HTMLTableElementCtor, HTMLTableCaptionElementCtor, HTMLTableColElementCtor,
+ HTMLTableSectionElementCtor, HTMLTableRowElementCtor, HTMLTableCellElementCtor,
+ HTMLFrameSetElementCtor, HTMLLayerElementCtor, HTMLFrameElementCtor, HTMLIFrameElementCtor,
+ CSSStyleDeclarationCtor};
+ WindowQObject *winq;
+
+ void forgetSuppressedWindows();
+ void showSuppressedWindows();
+
+ protected:
+ enum DelayedActionId { NullAction, DelayedClose, DelayedGoHistory };
+
+ Value getListener(ExecState *exec, int eventId) const;
+ void setListener(ExecState *exec, int eventId, Value func);
+ private:
+ struct DelayedAction;
+ friend struct DelayedAction;
+
+ bool checkIsSafeScript( KParts::ReadOnlyPart* activePart ) const;
+
+ TQGuardedPtr<tdehtml::ChildFrame> m_frame;
+ Screen *screen;
+ History *history;
+ External *external;
+ FrameArray *m_frames;
+ Location *loc;
+ DOM::Event *m_evt;
+
+ struct DelayedAction {
+ DelayedAction() : actionId(NullAction) {} // for QValueList
+ DelayedAction( DelayedActionId id, TQVariant p = TQVariant() ) : actionId(id), param(p) {}
+ DelayedActionId actionId;
+ TQVariant param; // just in case
+ };
+ TQValueList<DelayedAction> m_delayed;
+
+ struct SuppressedWindowInfo {
+ SuppressedWindowInfo() {} // for QValueList
+ SuppressedWindowInfo( KURL u, TQString fr, TQString fe ) : url(u), frameName(fr), features(fe) {}
+ KURL url;
+ TQString frameName;
+ TQString features;
+ };
+ TQValueList<SuppressedWindowInfo> m_suppressedWindowInfo;
+ };
+
+ /**
+ * like TQDateTime, but properly handles milliseconds
+ */
+ class DateTimeMS
+ {
+ TQDate mDate;
+ TQTime mTime;
+ public:
+ DateTimeMS addMSecs(int s) const;
+ bool operator >(const DateTimeMS &other) const;
+ bool operator >=(const DateTimeMS &other) const;
+
+ int msecsTo(const DateTimeMS &other) const;
+
+ static DateTimeMS now();
+ };
+
+ /**
+ * An action (either function or string) to be executed after a specified
+ * time interval, either once or repeatedly. Used for window.setTimeout()
+ * and window.setInterval()
+ */
+ class ScheduledAction {
+ public:
+ ScheduledAction(Object _func, List _args, DateTimeMS _nextTime, int _interval, bool _singleShot, int _timerId);
+ ScheduledAction(TQString _code, DateTimeMS _nextTime, int _interval, bool _singleShot, int _timerId);
+ ~ScheduledAction();
+ bool execute(Window *window);
+ void mark();
+
+ ObjectImp *func;
+ List args;
+ TQString code;
+ bool isFunction;
+ bool singleShot;
+
+ DateTimeMS nextTime;
+ int interval;
+ bool executing;
+ int timerId;
+ };
+
+ class KDE_EXPORT WindowQObject : public TQObject {
+ Q_OBJECT
+ public:
+ WindowQObject(Window *w);
+ ~WindowQObject();
+ int installTimeout(const Identifier &handler, int t, bool singleShot);
+ int installTimeout(const Value &func, List args, int t, bool singleShot);
+ void clearTimeout(int timerId);
+ void mark();
+ bool hasTimers() const;
+ public slots:
+ void timeoutClose();
+ protected slots:
+ void parentDestroyed();
+ protected:
+ void timerEvent(TQTimerEvent *e);
+ void setNextTimer();
+ private:
+ Window *parent;
+ TQPtrList<ScheduledAction> scheduledActions;
+ int pausedTime;
+ int lastTimerId;
+ bool currentlyDispatching;
+ };
+
+ class Location : public ObjectImp {
+ public:
+ ~Location();
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual void put(ExecState *exec, const Identifier &propertyName, const Value &value, int attr = None);
+ virtual Value toPrimitive(ExecState *exec, Type preferred) const;
+ virtual UString toString(ExecState *exec) const;
+ enum { Hash, Href, Hostname, Host, Pathname, Port, Protocol, Search, EqualEqual,
+ Assign, Replace, Reload, ToString };
+ KParts::ReadOnlyPart *part() const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ private:
+ friend class Window;
+ Location(tdehtml::ChildFrame *f);
+ TQGuardedPtr<tdehtml::ChildFrame> m_frame;
+ };
+
+#ifdef Q_WS_QWS
+ class Konqueror : public ObjectImp {
+ friend class KonquerorFunc;
+ public:
+ Konqueror(KHTMLPart *p) : part(p) { }
+ virtual Value get(ExecState *exec, const Identifier &propertyName) const;
+ virtual bool hasProperty(ExecState *exec, const Identifier &p) const;
+ virtual UString toString(ExecState *exec) const;
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ private:
+ KHTMLPart *part;
+ };
+#endif
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/testecma.cpp b/tdehtml/ecma/testecma.cpp
new file mode 100644
index 000000000..44cd7ecb0
--- /dev/null
+++ b/tdehtml/ecma/testecma.cpp
@@ -0,0 +1,67 @@
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2000 Harri Porten (porten@kde.org)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+/**
+ * An interactive interpreter to test the ECMA Script language bindings
+ * for the DOM of KHTML.
+ * The 'document' property is preset to an instance of Document and serves
+ * as an entrypoint.
+ *
+ * Example session:
+ *
+ * KJS> text = document.createTextNode('foo');
+ * KJS> document.appendChild(text);
+ * KJS> debug(document.firstChild.nodeValue);
+ * ---> foo
+ */
+
+#include <stdio.h>
+#include <kjs/object.h>
+#include <kjs/interpreter.h>
+#include "dom/dom_doc.h"
+#include "dom/dom_string.h"
+#include "ecma/kjs_dom.h"
+
+
+using namespace KJS;
+
+int main(int, char **)
+{
+ KJScript kjs;
+ kjs.enableDebug();
+ DOM::Document doc;
+
+ DOMDocument *dd = new DOMDocument(&doc);
+ Global::current().put("document", KJSO(dd));
+
+ printf("Entering interactive mode.\n"
+ "You may access the DOM via the 'document' property.\n"
+ "Use debug() to print to the console. Press C-d or C-c to exit.\n\n");
+
+ char buffer[1000];
+ FILE *in = fdopen(0, "r");
+
+ while (1) {
+ printf("KJS> ");
+ if (!fgets(buffer, 999, in))
+ break;
+ kjs.evaluate(buffer);
+ }
+ printf("\n");
+}
diff --git a/tdehtml/ecma/xmlhttprequest.cpp b/tdehtml/ecma/xmlhttprequest.cpp
new file mode 100644
index 000000000..f3aec5492
--- /dev/null
+++ b/tdehtml/ecma/xmlhttprequest.cpp
@@ -0,0 +1,810 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "xmlhttprequest.h"
+#include "xmlhttprequest.lut.h"
+#include "kjs_window.h"
+#include "kjs_events.h"
+
+#include "dom/dom_doc.h"
+#include "dom/dom_exception.h"
+#include "dom/dom_string.h"
+#include "misc/loader.h"
+#include "html/html_documentimpl.h"
+#include "xml/dom2_eventsimpl.h"
+
+#include "tdehtml_part.h"
+#include "tdehtmlview.h"
+
+#include <kio/scheduler.h>
+#include <kio/job.h>
+#include <tqobject.h>
+#include <kdebug.h>
+
+#ifdef APPLE_CHANGES
+#include "KWQLoader.h"
+#else
+#include <kio/netaccess.h>
+using TDEIO::NetAccess;
+#endif
+
+#define BANNED_HTTP_HEADERS "authorization,proxy-authorization,"\
+ "content-length,host,connect,copy,move,"\
+ "delete,head,trace,put,propfind,proppatch,"\
+ "mkcol,lock,unlock,options,via,"\
+ "accept-charset,accept-encoding,expect,date,"\
+ "keep-alive,te,trailer,"\
+ "transfer-encoding,upgrade"
+
+using tdehtml::Decoder;
+
+namespace KJS {
+
+////////////////////// XMLHttpRequest Object ////////////////////////
+
+/* Source for XMLHttpRequestProtoTable.
+@begin XMLHttpRequestProtoTable 7
+ abort XMLHttpRequest::Abort DontDelete|Function 0
+ getAllResponseHeaders XMLHttpRequest::GetAllResponseHeaders DontDelete|Function 0
+ getResponseHeader XMLHttpRequest::GetResponseHeader DontDelete|Function 1
+ open XMLHttpRequest::Open DontDelete|Function 5
+ overrideMimeType XMLHttpRequest::OverrideMIMEType DontDelete|Function 1
+ send XMLHttpRequest::Send DontDelete|Function 1
+ setRequestHeader XMLHttpRequest::SetRequestHeader DontDelete|Function 2
+@end
+*/
+KJS_DEFINE_PROTOTYPE(XMLHttpRequestProto)
+IMPLEMENT_PROTOFUNC_DOM(XMLHttpRequestProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("XMLHttpRequest", XMLHttpRequestProto,XMLHttpRequestProtoFunc)
+
+
+XMLHttpRequestQObject::XMLHttpRequestQObject(XMLHttpRequest *_jsObject)
+{
+ jsObject = _jsObject;
+}
+
+#ifdef APPLE_CHANGES
+void XMLHttpRequestQObject::slotData( TDEIO::Job* job, const char *data, int size )
+{
+ jsObject->slotData(job, data, size);
+}
+#else
+void XMLHttpRequestQObject::slotData( TDEIO::Job* job, const TQByteArray &data )
+{
+ jsObject->slotData(job, data);
+}
+#endif
+
+void XMLHttpRequestQObject::slotFinished( TDEIO::Job* job )
+{
+ jsObject->slotFinished(job);
+}
+
+void XMLHttpRequestQObject::slotRedirection( TDEIO::Job* job, const KURL& url)
+{
+ jsObject->slotRedirection( job, url );
+}
+
+XMLHttpRequestConstructorImp::XMLHttpRequestConstructorImp(ExecState *, const DOM::Document &d)
+ : ObjectImp(), doc(d)
+{
+}
+
+bool XMLHttpRequestConstructorImp::implementsConstruct() const
+{
+ return true;
+}
+
+Object XMLHttpRequestConstructorImp::construct(ExecState *exec, const List &)
+{
+ return Object(new XMLHttpRequest(exec, doc));
+}
+
+const ClassInfo XMLHttpRequest::info = { "XMLHttpRequest", 0, &XMLHttpRequestTable, 0 };
+
+
+/* Source for XMLHttpRequestTable.
+@begin XMLHttpRequestTable 7
+ readyState XMLHttpRequest::ReadyState DontDelete|ReadOnly
+ responseText XMLHttpRequest::ResponseText DontDelete|ReadOnly
+ responseXML XMLHttpRequest::ResponseXML DontDelete|ReadOnly
+ status XMLHttpRequest::Status DontDelete|ReadOnly
+ statusText XMLHttpRequest::StatusText DontDelete|ReadOnly
+ onreadystatechange XMLHttpRequest::Onreadystatechange DontDelete
+ onload XMLHttpRequest::Onload DontDelete
+@end
+*/
+
+Value XMLHttpRequest::tryGet(ExecState *exec, const Identifier &propertyName) const
+{
+ return DOMObjectLookupGetValue<XMLHttpRequest,DOMObject>(exec, propertyName, &XMLHttpRequestTable, this);
+}
+
+Value XMLHttpRequest::getValueProperty(ExecState *exec, int token) const
+{
+ switch (token) {
+ case ReadyState:
+ return Number(state);
+ case ResponseText:
+ return getString(DOM::DOMString(response));
+ case ResponseXML:
+ if (state != Completed) {
+ return Null();
+ }
+ if (!createdDocument) {
+ TQString mimeType = "text/xml";
+
+ if (!m_mimeTypeOverride.isEmpty()) {
+ mimeType = m_mimeTypeOverride;
+ } else {
+ Value header = getResponseHeader("Content-Type");
+ if (header.type() != UndefinedType) {
+ mimeType = TQStringList::split(";", header.toString(exec).qstring())[0].stripWhiteSpace();
+ }
+ }
+
+ if (mimeType == "text/xml" || mimeType == "application/xml" || mimeType == "application/xhtml+xml") {
+ responseXML = DOM::Document(doc->implementation()->createDocument());
+
+ DOM::DocumentImpl *docImpl = static_cast<DOM::DocumentImpl *>(responseXML.handle());
+
+ docImpl->open();
+ docImpl->write(response);
+ docImpl->finishParsing();
+ docImpl->close();
+
+ typeIsXML = true;
+ } else {
+ typeIsXML = false;
+ }
+ createdDocument = true;
+ }
+
+ if (!typeIsXML) {
+ return Undefined();
+ }
+
+ return getDOMNode(exec,responseXML);
+ case Status:
+ return getStatus();
+ case StatusText:
+ return getStatusText();
+ case Onreadystatechange:
+ if (onReadyStateChangeListener && onReadyStateChangeListener->listenerObjImp()) {
+ return onReadyStateChangeListener->listenerObj();
+ } else {
+ return Null();
+ }
+ case Onload:
+ if (onLoadListener && onLoadListener->listenerObjImp()) {
+ return onLoadListener->listenerObj();
+ } else {
+ return Null();
+ }
+ default:
+ kdWarning() << "XMLHttpRequest::getValueProperty unhandled token " << token << endl;
+ return Value();
+ }
+}
+
+void XMLHttpRequest::tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr)
+{
+ DOMObjectLookupPut<XMLHttpRequest,DOMObject>(exec, propertyName, value, attr, &XMLHttpRequestTable, this );
+}
+
+void XMLHttpRequest::putValueProperty(ExecState *exec, int token, const Value& value, int /*attr*/)
+{
+ JSEventListener* newListener;
+ switch(token) {
+ case Onreadystatechange:
+ newListener = Window::retrieveActive(exec)->getJSEventListener(value, true);
+ if (newListener != onReadyStateChangeListener) {
+ if (onReadyStateChangeListener) onReadyStateChangeListener->deref();
+ onReadyStateChangeListener = newListener;
+ if (onReadyStateChangeListener) onReadyStateChangeListener->ref();
+ }
+ break;
+ case Onload:
+ newListener = Window::retrieveActive(exec)->getJSEventListener(value, true);
+ if (newListener != onLoadListener) {
+ if (onLoadListener) onLoadListener->deref();
+ onLoadListener = newListener;
+ if (onLoadListener) onLoadListener->ref();
+ }
+ break;
+ default:
+ kdWarning() << "XMLHttpRequest::putValue unhandled token " << token << endl;
+ }
+}
+
+XMLHttpRequest::XMLHttpRequest(ExecState *exec, const DOM::Document &d)
+ : DOMObject(XMLHttpRequestProto::self(exec)),
+ qObject(new XMLHttpRequestQObject(this)),
+ doc(static_cast<DOM::DocumentImpl*>(d.handle())),
+ async(true),
+ contentType(TQString::null),
+ job(0),
+ state(Uninitialized),
+ onReadyStateChangeListener(0),
+ onLoadListener(0),
+ decoder(0),
+ createdDocument(false),
+ aborted(false)
+{
+}
+
+XMLHttpRequest::~XMLHttpRequest()
+{
+ if (onReadyStateChangeListener)
+ onReadyStateChangeListener->deref();
+ if (onLoadListener)
+ onLoadListener->deref();
+ delete qObject;
+ qObject = 0;
+ delete decoder;
+ decoder = 0;
+}
+
+void XMLHttpRequest::changeState(XMLHttpRequestState newState)
+{
+ if (state != newState) {
+ state = newState;
+
+ ref();
+
+ if (onReadyStateChangeListener != 0 && doc->view() && doc->view()->part()) {
+ DOM::Event ev = doc->view()->part()->document().createEvent("HTMLEvents");
+ ev.initEvent("readystatechange", true, true);
+ onReadyStateChangeListener->handleEvent(ev);
+ }
+
+ if (state == Completed && onLoadListener != 0 && doc->view() && doc->view()->part()) {
+ DOM::Event ev = doc->view()->part()->document().createEvent("HTMLEvents");
+ ev.initEvent("load", true, true);
+ onLoadListener->handleEvent(ev);
+ }
+
+ deref();
+ }
+}
+
+bool XMLHttpRequest::urlMatchesDocumentDomain(const KURL& _url) const
+{
+ // No need to do work if _url is not valid...
+ if (!_url.isValid())
+ return false;
+
+ KURL documentURL(doc->URL());
+
+ // a local file can load anything
+ if (documentURL.protocol().lower() == "file") {
+ return true;
+ }
+
+ // but a remote document can only load from the same port on the server
+ if (documentURL.protocol().lower() == _url.protocol().lower() &&
+ documentURL.host().lower() == _url.host().lower() &&
+ documentURL.port() == _url.port()) {
+ return true;
+ }
+
+ return false;
+}
+
+void XMLHttpRequest::open(const TQString& _method, const KURL& _url, bool _async)
+{
+ abort();
+ aborted = false;
+
+ // clear stuff from possible previous load
+ requestHeaders.clear();
+ responseHeaders = TQString();
+ response = TQString();
+ createdDocument = false;
+ responseXML = DOM::Document();
+
+ changeState(Uninitialized);
+
+ if (aborted) {
+ return;
+ }
+
+ if (!urlMatchesDocumentDomain(_url)) {
+ return;
+ }
+
+
+ method = _method.lower();
+ url = _url;
+ async = _async;
+
+ changeState(Loading);
+}
+
+void XMLHttpRequest::send(const TQString& _body)
+{
+ aborted = false;
+
+ const TQString protocol = url.protocol().lower();
+ // Abandon the request when the protocol is other than "http",
+ // instead of blindly doing a TDEIO::get on other protocols like file:/.
+ if (!protocol.startsWith("http") && !protocol.startsWith("webdav"))
+ {
+ abort();
+ return;
+ }
+
+ if (method == "post") {
+
+ // FIXME: determine post encoding correctly by looking in headers
+ // for charset.
+ TQByteArray buf;
+ TQCString str = _body.utf8();
+ buf.duplicate(str.data(), str.size() - 1);
+
+ job = TDEIO::http_post( url, buf, false );
+ if(contentType.isNull())
+ job->addMetaData( "content-type", "Content-type: text/plain" );
+ else
+ job->addMetaData( "content-type", contentType );
+ }
+ else {
+ job = TDEIO::get( url, false, false );
+ }
+
+ if (!requestHeaders.isEmpty()) {
+ TQString rh;
+ TQMap<TQString, TQString>::ConstIterator begin = requestHeaders.begin();
+ TQMap<TQString, TQString>::ConstIterator end = requestHeaders.end();
+ for (TQMap<TQString, TQString>::ConstIterator i = begin; i != end; ++i) {
+ TQString key = i.key();
+ TQString value = i.data();
+ if (key == "accept") {
+ // The HTTP KIO slave supports an override this way
+ job->addMetaData("accept", value);
+ } else {
+ if (i != begin)
+ rh += "\r\n";
+ rh += key + ": " + value;
+ }
+ }
+
+ job->addMetaData("customHTTPHeader", rh);
+ }
+
+ job->addMetaData("PropagateHttpHeader", "true");
+
+ // Set the default referrer if one is not already supplied
+ // through setRequestHeader. NOTE: the user can still disable
+ // this feature at the protocol level (kio_http).
+ // ### does find() ever succeed? the headers are stored in lower case!
+ if (requestHeaders.find("Referer") == requestHeaders.end()) {
+ KURL documentURL(doc->URL());
+ documentURL.setPass(TQString::null);
+ documentURL.setUser(TQString::null);
+ job->addMetaData("referrer", documentURL.url());
+ // kdDebug() << "Adding referrer: " << documentURL << endl;
+ }
+
+ if (!async) {
+ TQByteArray data;
+ KURL finalURL;
+ TQString headers;
+
+#ifdef APPLE_CHANGES
+ data = KWQServeSynchronousRequest(tdehtml::Cache::loader(), doc->docLoader(), job, finalURL, headers);
+#else
+ TQMap<TQString, TQString> metaData;
+ if ( NetAccess::synchronousRun( job, 0, &data, &finalURL, &metaData ) ) {
+ headers = metaData[ "HTTP-Headers" ];
+ }
+#endif
+ job = 0;
+ processSyncLoadResults(data, finalURL, headers);
+ return;
+ }
+
+ qObject->connect( job, TQT_SIGNAL( result( TDEIO::Job* ) ),
+ TQT_SLOT( slotFinished( TDEIO::Job* ) ) );
+#ifdef APPLE_CHANGES
+ qObject->connect( job, TQT_SIGNAL( data( TDEIO::Job*, const char*, int ) ),
+ TQT_SLOT( slotData( TDEIO::Job*, const char*, int ) ) );
+#else
+ qObject->connect( job, TQT_SIGNAL( data( TDEIO::Job*, const TQByteArray& ) ),
+ TQT_SLOT( slotData( TDEIO::Job*, const TQByteArray& ) ) );
+#endif
+ qObject->connect( job, TQT_SIGNAL(redirection(TDEIO::Job*, const KURL& ) ),
+ TQT_SLOT( slotRedirection(TDEIO::Job*, const KURL&) ) );
+
+#ifdef APPLE_CHANGES
+ KWQServeRequest(tdehtml::Cache::loader(), doc->docLoader(), job);
+#else
+ TDEIO::Scheduler::scheduleJob( job );
+#endif
+}
+
+void XMLHttpRequest::abort()
+{
+ if (job) {
+ job->kill();
+ job = 0;
+ }
+ delete decoder;
+ decoder = 0;
+ aborted = true;
+}
+
+void XMLHttpRequest::overrideMIMEType(const TQString& override)
+{
+ m_mimeTypeOverride = override;
+}
+
+void XMLHttpRequest::setRequestHeader(const TQString& _name, const TQString &value)
+{
+ TQString name = _name.lower().stripWhiteSpace();
+
+ // Content-type needs to be set seperately from the other headers
+ if(name == "content-type") {
+ contentType = "Content-type: " + value;
+ return;
+ }
+
+ // Sanitize the referrer header to protect against spoofing...
+ if(name == "referer") {
+ KURL referrerURL(value);
+ if (urlMatchesDocumentDomain(referrerURL))
+ requestHeaders[name] = referrerURL.url();
+ return;
+ }
+
+ // Sanitize the request headers below and handle them as if they are
+ // calls to open. Otherwise, we will end up ignoring them all together!
+ // TODO: Do something about "put" which kio_http sort of supports and
+ // the webDAV headers such as PROPFIND etc...
+ if (name == "get" || name == "post") {
+ KURL reqURL (doc->URL(), value.stripWhiteSpace());
+ open(name, reqURL, async);
+ return;
+ }
+
+ // Reject all banned headers. See BANNED_HTTP_HEADERS above.
+ // kdDebug() << "Banned HTTP Headers: " << BANNED_HTTP_HEADERS << endl;
+ TQStringList bannedHeaders = TQStringList::split(',',
+ TQString::fromLatin1(BANNED_HTTP_HEADERS));
+
+ if (bannedHeaders.contains(name))
+ return; // Denied
+
+ requestHeaders[name] = value.stripWhiteSpace();
+}
+
+Value XMLHttpRequest::getAllResponseHeaders() const
+{
+ if (responseHeaders.isEmpty()) {
+ return Undefined();
+ }
+
+ int endOfLine = responseHeaders.find("\n");
+
+ if (endOfLine == -1) {
+ return Undefined();
+ }
+
+ return String(responseHeaders.mid(endOfLine + 1) + "\n");
+}
+
+Value XMLHttpRequest::getResponseHeader(const TQString& name) const
+{
+ if (responseHeaders.isEmpty()) {
+ return Undefined();
+ }
+
+ TQRegExp headerLinePattern(name + ":", false);
+
+ int matchLength;
+ int headerLinePos = headerLinePattern.search(responseHeaders, 0);
+ matchLength = headerLinePattern.matchedLength();
+ while (headerLinePos != -1) {
+ if (headerLinePos == 0 || responseHeaders[headerLinePos-1] == '\n') {
+ break;
+ }
+
+ headerLinePos = headerLinePattern.search(responseHeaders, headerLinePos + 1);
+ matchLength = headerLinePattern.matchedLength();
+ }
+
+
+ if (headerLinePos == -1) {
+ return Undefined();
+ }
+
+ int endOfLine = responseHeaders.find("\n", headerLinePos + matchLength);
+
+ return String(responseHeaders.mid(headerLinePos + matchLength, endOfLine - (headerLinePos + matchLength)).stripWhiteSpace());
+}
+
+static Value httpStatus(const TQString& response, bool textStatus = false)
+{
+ if (response.isEmpty()) {
+ return Undefined();
+ }
+
+ int endOfLine = response.find("\n");
+ TQString firstLine = (endOfLine == -1) ? response : response.left(endOfLine);
+ int codeStart = firstLine.find(" ");
+ int codeEnd = firstLine.find(" ", codeStart + 1);
+
+ if (codeStart == -1 || codeEnd == -1) {
+ return Undefined();
+ }
+
+ if (textStatus) {
+ TQString statusText = firstLine.mid(codeEnd + 1, endOfLine - (codeEnd + 1)).stripWhiteSpace();
+ return String(statusText);
+ }
+
+ TQString number = firstLine.mid(codeStart + 1, codeEnd - (codeStart + 1));
+
+ bool ok = false;
+ int code = number.toInt(&ok);
+ if (!ok) {
+ return Undefined();
+ }
+
+ return Number(code);
+}
+
+Value XMLHttpRequest::getStatus() const
+{
+ return httpStatus(responseHeaders);
+}
+
+Value XMLHttpRequest::getStatusText() const
+{
+ return httpStatus(responseHeaders, true);
+}
+
+void XMLHttpRequest::processSyncLoadResults(const TQByteArray &data, const KURL &finalURL, const TQString &headers)
+{
+ if (!urlMatchesDocumentDomain(finalURL)) {
+ abort();
+ return;
+ }
+
+ responseHeaders = headers;
+ changeState(Loaded);
+ if (aborted) {
+ return;
+ }
+
+#ifdef APPLE_CHANGES
+ const char *bytes = (const char *)data.data();
+ int len = (int)data.size();
+
+ slotData(0, bytes, len);
+#else
+ slotData(0, data);
+#endif
+
+ if (aborted) {
+ return;
+ }
+
+ slotFinished(0);
+}
+
+void XMLHttpRequest::slotFinished(TDEIO::Job *)
+{
+ if (decoder) {
+ response += decoder->flush();
+ }
+
+ // make sure to forget about the job before emitting completed,
+ // since changeState triggers JS code, which might e.g. call abort.
+ job = 0;
+ changeState(Completed);
+
+ delete decoder;
+ decoder = 0;
+}
+
+void XMLHttpRequest::slotRedirection(TDEIO::Job*, const KURL& url)
+{
+ if (!urlMatchesDocumentDomain(url)) {
+ abort();
+ }
+}
+
+#ifdef APPLE_CHANGES
+void XMLHttpRequest::slotData( TDEIO::Job*, const char *data, int len )
+#else
+void XMLHttpRequest::slotData(TDEIO::Job*, const TQByteArray &_data)
+#endif
+{
+ if (state < Loaded ) {
+ responseHeaders = job->queryMetaData("HTTP-Headers");
+
+ // NOTE: Replace a 304 response with a 200! Both IE and Mozilla do this.
+ // Problem first reported through bug# 110272.
+ int codeStart = responseHeaders.find("304");
+ if ( codeStart != -1) {
+ int codeEnd = responseHeaders.find("\n", codeStart+3);
+ if (codeEnd != -1)
+ responseHeaders.replace(codeStart, (codeEnd-codeStart), "200 OK");
+ }
+
+ changeState(Loaded);
+ }
+
+#ifndef APPLE_CHANGES
+ const char *data = (const char *)_data.data();
+ int len = (int)_data.size();
+#endif
+
+ if ( decoder == NULL ) {
+ int pos = responseHeaders.find("content-type:", 0, false);
+
+ if ( pos > -1 ) {
+ pos += 13;
+ int index = responseHeaders.find('\n', pos);
+ TQString type = responseHeaders.mid(pos, (index-pos));
+ index = type.find (';');
+ if (index > -1)
+ encoding = TQString(type.mid( index+1 ).remove(TQRegExp("charset[ ]*=[ ]*", false))).stripWhiteSpace();
+ }
+
+ decoder = new Decoder;
+ if (!encoding.isNull())
+ decoder->setEncoding(encoding.latin1(), Decoder::EncodingFromHTTPHeader);
+ else {
+ // Per section 2 of W3C working draft spec, fall back to "UTF-8".
+ decoder->setEncoding("UTF-8", Decoder::DefaultEncoding);
+ }
+ }
+ if (len == 0)
+ return;
+
+ if (len == -1)
+ len = strlen(data);
+
+ TQString decoded = decoder->decode(data, len);
+
+ response += decoded;
+
+ if (!aborted) {
+ changeState(Interactive);
+ }
+}
+
+Value XMLHttpRequestProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ if (!thisObj.inherits(&XMLHttpRequest::info)) {
+ Object err = Error::create(exec,TypeError);
+ exec->setException(err);
+ return err;
+ }
+
+ XMLHttpRequest *request = static_cast<XMLHttpRequest *>(thisObj.imp());
+ switch (id) {
+ case XMLHttpRequest::Abort:
+ request->abort();
+ return Undefined();
+ case XMLHttpRequest::GetAllResponseHeaders:
+ if (args.size() != 0) {
+ return Undefined();
+ }
+
+ return request->getAllResponseHeaders();
+ case XMLHttpRequest::GetResponseHeader:
+ if (args.size() != 1) {
+ return Undefined();
+ }
+
+ return request->getResponseHeader(args[0].toString(exec).qstring());
+ case XMLHttpRequest::Open:
+ {
+ if (args.size() < 2 || args.size() > 5) {
+ return Undefined();
+ }
+
+ TQString method = args[0].toString(exec).qstring();
+ KHTMLPart *part = ::tqqt_cast<KHTMLPart *>(Window::retrieveActive(exec)->part());
+ if (!part)
+ return Undefined();
+ KURL url = KURL(part->document().completeURL(args[1].toString(exec).qstring()).string());
+
+ bool async = true;
+ if (args.size() >= 3) {
+ async = args[2].toBoolean(exec);
+ }
+
+ if (args.size() >= 4) {
+ url.setUser(args[3].toString(exec).qstring());
+ }
+
+ if (args.size() >= 5) {
+ url.setPass(args[4].toString(exec).qstring());
+ }
+
+ request->open(method, url, async);
+
+ return Undefined();
+ }
+ case XMLHttpRequest::Send:
+ {
+ if (args.size() > 1) {
+ return Undefined();
+ }
+
+ if (request->state != Loading) {
+ return Undefined();
+ }
+
+ TQString body;
+ if (args.size() >= 1) {
+ Object obj = Object::dynamicCast(args[0]);
+ if (obj.isValid() && obj.inherits(&DOMDocument::info)) {
+ DOM::Node docNode = static_cast<KJS::DOMDocument *>(obj.imp())->toNode();
+ DOM::DocumentImpl *doc = static_cast<DOM::DocumentImpl *>(docNode.handle());
+
+ try {
+ body = doc->toString().string();
+ // FIXME: also need to set content type, including encoding!
+
+ } catch(DOM::DOMException& e) {
+ Object err = Error::create(exec, GeneralError, "Exception serializing document");
+ exec->setException(err);
+ }
+ } else {
+ body = args[0].toString(exec).qstring();
+ }
+ }
+
+ request->send(body);
+
+ return Undefined();
+ }
+ case XMLHttpRequest::SetRequestHeader:
+ if (args.size() != 2) {
+ return Undefined();
+ }
+
+ request->setRequestHeader(args[0].toString(exec).qstring(), args[1].toString(exec).qstring());
+
+ return Undefined();
+
+ case XMLHttpRequest::OverrideMIMEType:
+ if (args.size() < 1) {
+ Object err = Error::create(exec, SyntaxError, "Not enough arguments");
+ exec->setException(err);
+ return err;
+ }
+
+ request->overrideMIMEType(args[0].toString(exec).qstring());
+ return Undefined();
+ }
+
+ return Undefined();
+}
+
+} // end namespace
+
+
+#include "xmlhttprequest.moc"
diff --git a/tdehtml/ecma/xmlhttprequest.h b/tdehtml/ecma/xmlhttprequest.h
new file mode 100644
index 000000000..2dc89e227
--- /dev/null
+++ b/tdehtml/ecma/xmlhttprequest.h
@@ -0,0 +1,142 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _XMLHTTPREQUEST_H_
+#define _XMLHTTPREQUEST_H_
+
+#include "ecma/kjs_binding.h"
+#include "ecma/kjs_dom.h"
+#include "misc/decoder.h"
+#include "kio/jobclasses.h"
+
+namespace KJS {
+
+ class JSEventListener;
+ class XMLHttpRequestQObject;
+
+ // these exact numeric values are important because JS expects them
+ enum XMLHttpRequestState {
+ Uninitialized = 0,
+ Loading = 1,
+ Loaded = 2,
+ Interactive = 3,
+ Completed = 4
+ };
+
+ class XMLHttpRequestConstructorImp : public ObjectImp {
+ public:
+ XMLHttpRequestConstructorImp(ExecState *exec, const DOM::Document &d);
+ virtual bool implementsConstruct() const;
+ virtual Object construct(ExecState *exec, const List &args);
+ private:
+ DOM::Document doc;
+ };
+
+ class XMLHttpRequest : public DOMObject {
+ public:
+ XMLHttpRequest(ExecState *, const DOM::Document &d);
+ ~XMLHttpRequest();
+ virtual Value tryGet(ExecState *exec, const Identifier &propertyName) const;
+ Value getValueProperty(ExecState *exec, int token) const;
+ virtual void tryPut(ExecState *exec, const Identifier &propertyName, const Value& value, int attr = None);
+ void putValueProperty(ExecState *exec, int token, const Value& value, int /*attr*/);
+ virtual bool toBoolean(ExecState *) const { return true; }
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { Onload, Onreadystatechange, ReadyState, ResponseText, ResponseXML, Status, StatusText, Abort,
+ GetAllResponseHeaders, GetResponseHeader, Open, Send, SetRequestHeader,
+ OverrideMIMEType };
+
+ private:
+ friend class XMLHttpRequestProtoFunc;
+ friend class XMLHttpRequestQObject;
+
+ Value getStatusText() const;
+ Value getStatus() const;
+ bool urlMatchesDocumentDomain(const KURL&) const;
+
+ XMLHttpRequestQObject *qObject;
+
+#ifdef APPLE_CHANGES
+ void slotData( TDEIO::Job* job, const char *data, int size );
+#else
+ void slotData( TDEIO::Job* job, const TQByteArray &data );
+#endif
+ void slotFinished( TDEIO::Job* );
+ void slotRedirection( TDEIO::Job*, const KURL& );
+
+ void processSyncLoadResults(const TQByteArray &data, const KURL &finalURL, const TQString &headers);
+
+ void open(const TQString& _method, const KURL& _url, bool _async);
+ void send(const TQString& _body);
+ void abort();
+ void setRequestHeader(const TQString& name, const TQString &value);
+ void overrideMIMEType(const TQString& override);
+ Value getAllResponseHeaders() const;
+ Value getResponseHeader(const TQString& name) const;
+
+ void changeState(XMLHttpRequestState newState);
+
+ TQGuardedPtr<DOM::DocumentImpl> doc;
+
+ KURL url;
+ TQString method;
+ bool async;
+ TQMap<TQString,TQString> requestHeaders;
+ TQString m_mimeTypeOverride;
+ TQString contentType;
+
+ TDEIO::TransferJob * job;
+
+ XMLHttpRequestState state;
+ JSEventListener *onReadyStateChangeListener;
+ JSEventListener *onLoadListener;
+
+ tdehtml::Decoder *decoder;
+ TQString encoding;
+ TQString responseHeaders;
+
+ TQString response;
+ mutable bool createdDocument;
+ mutable bool typeIsXML;
+ mutable DOM::Document responseXML;
+
+ bool aborted;
+ };
+
+
+ class XMLHttpRequestQObject : public TQObject {
+ Q_OBJECT
+
+ public:
+ XMLHttpRequestQObject(XMLHttpRequest *_jsObject);
+
+ public slots:
+ void slotData( TDEIO::Job* job, const TQByteArray &data );
+ void slotFinished( TDEIO::Job* job );
+ void slotRedirection( TDEIO::Job* job, const KURL& url);
+
+ private:
+ XMLHttpRequest *jsObject;
+ };
+
+} // namespace
+
+#endif
diff --git a/tdehtml/ecma/xmlserializer.cpp b/tdehtml/ecma/xmlserializer.cpp
new file mode 100644
index 000000000..856f35e1f
--- /dev/null
+++ b/tdehtml/ecma/xmlserializer.cpp
@@ -0,0 +1,109 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include "xmlserializer.h"
+#include "xmlserializer.lut.h"
+
+#include "dom/dom_exception.h"
+#include "dom/dom_doc.h"
+#include "xml/dom_docimpl.h"
+
+#include <kdebug.h>
+
+
+////////////////////// XMLSerializer Object ////////////////////////
+
+/* Source for XMLSerializerProtoTable.
+@begin XMLSerializerProtoTable 1
+ serializeToString XMLSerializer::SerializeToString DontDelete|Function 1
+@end
+*/
+
+namespace KJS {
+
+KJS_DEFINE_PROTOTYPE(XMLSerializerProto)
+IMPLEMENT_PROTOFUNC_DOM(XMLSerializerProtoFunc)
+KJS_IMPLEMENT_PROTOTYPE("XMLSerializer", XMLSerializerProto, XMLSerializerProtoFunc)
+
+XMLSerializerConstructorImp::XMLSerializerConstructorImp(ExecState *)
+ : ObjectImp()
+{
+}
+
+bool XMLSerializerConstructorImp::implementsConstruct() const
+{
+ return true;
+}
+
+Object XMLSerializerConstructorImp::construct(ExecState *exec, const List &)
+{
+ return Object(new XMLSerializer(exec));
+}
+
+const ClassInfo XMLSerializer::info = { "XMLSerializer", 0, 0, 0 };
+
+XMLSerializer::XMLSerializer(ExecState *exec)
+ : DOMObject(XMLSerializerProto::self(exec))
+{
+}
+
+Value XMLSerializerProtoFunc::tryCall(ExecState *exec, Object &thisObj, const List &args)
+{
+ if (!thisObj.inherits(&XMLSerializer::info)) {
+ Object err = Error::create(exec,TypeError);
+ exec->setException(err);
+ return err;
+ }
+
+ switch (id) {
+ case XMLSerializer::SerializeToString:
+ {
+ if (args.size() != 1) {
+ return Undefined();
+ }
+
+ if (!args[0].toObject(exec).inherits(&DOMNode::info)) {
+ return Undefined();
+ }
+
+ DOM::NodeImpl *node = static_cast<DOM::NodeImpl *>(static_cast<KJS::DOMNode *>(args[0].toObject(exec).imp())->toNode().handle());
+
+ if (!node) {
+ return Undefined();
+ }
+
+ TQString body;
+
+ try {
+ body = node->toString().string();
+ } catch(DOM::DOMException& e) {
+ Object err = Error::create(exec, GeneralError, "Exception serializing document");
+ exec->setException(err);
+ return err;
+ }
+
+ return getString(body);
+ }
+ }
+
+ return Undefined();
+}
+
+} // end namespace
diff --git a/tdehtml/ecma/xmlserializer.h b/tdehtml/ecma/xmlserializer.h
new file mode 100644
index 000000000..629d09afe
--- /dev/null
+++ b/tdehtml/ecma/xmlserializer.h
@@ -0,0 +1,54 @@
+// -*- c-basic-offset: 2 -*-
+/*
+ * This file is part of the KDE libraries
+ * Copyright (C) 2003 Apple Computer, Inc.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#ifndef _XMLSERIALIZER_H_
+#define _XMLSERIALIZER_H_
+
+#include "ecma/kjs_binding.h"
+#include "ecma/kjs_dom.h"
+#include "misc/decoder.h"
+#include "kio/jobclasses.h"
+
+namespace KJS {
+
+ class JSEventListener;
+
+ class XMLSerializerConstructorImp : public ObjectImp {
+ public:
+ XMLSerializerConstructorImp(ExecState *);
+ virtual bool implementsConstruct() const;
+ virtual Object construct(ExecState *exec, const List &args);
+ };
+
+ class XMLSerializer : public DOMObject {
+ public:
+ XMLSerializer(ExecState *);
+ virtual bool toBoolean(ExecState *) const { return true; }
+ virtual const ClassInfo* classInfo() const { return &info; }
+ static const ClassInfo info;
+ enum { SerializeToString };
+
+ private:
+ friend class XMLSerializerProtoFunc;
+ };
+
+} // namespace
+
+#endif