/* Copyright (C) 2001-2003 KSVG Team This file is part of the KDE project 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. */ #include <kdebug.h> #include <tdeio/job.h> #include <kfilterdev.h> #include <tqbuffer.h> #include "SVGDocumentImpl.h" #include "SVGAnimatedStringImpl.h" #include "SVGScriptElementImpl.moc" using namespace KSVG; #include "SVGScriptElementImpl.lut.h" #include "ksvg_scriptinterpreter.h" #include "ksvg_bridge.h" #include "ksvg_ecma.h" SVGScriptElementImpl::SVGScriptElementImpl(DOM::ElementImpl *impl) : TQObject(), SVGElementImpl(impl), SVGURIReferenceImpl(), SVGExternalResourcesRequiredImpl() { KSVG_EMPTY_FLAGS m_job = 0; m_added = false; } SVGScriptElementImpl::~SVGScriptElementImpl() { } void SVGScriptElementImpl::setType(const DOM::DOMString &type) { setAttribute("type", type); } DOM::DOMString SVGScriptElementImpl::type() const { return getAttribute("type"); } void SVGScriptElementImpl::setAttributes() { SVGElementImpl::setAttributes(); // Spec: provide a default type if(KSVG_TOKEN_NOT_PARSED(Type)) KSVG_SET_ALT_ATTRIBUTE(Type, "text/ecmascript") // Remote downloading TQString href = m_href->baseVal().string(); if(!href.isEmpty()) { KURL url(ownerDoc()->baseUrl(), href); if(m_job == 0) m_job = TDEIO::get(url, false, false); connect(m_job, TQT_SIGNAL(data(TDEIO::Job *, const TQByteArray &)), this, TQT_SLOT(slotData(TDEIO::Job *, const TQByteArray &))); connect(m_job, TQT_SIGNAL(result(TDEIO::Job *)), this, TQT_SLOT(slotResult(TDEIO::Job *))); } } void SVGScriptElementImpl::slotData(TDEIO::Job *, const TQByteArray &data) { TQDataStream dataStream(m_data, IO_WriteOnly | IO_Append); dataStream.writeRawBytes(data.data(), data.size()); } void SVGScriptElementImpl::slotResult(TDEIO::Job *) { m_job = 0; // Append a NULL terminator so we don't die m_data.resize(m_data.size() + 1); m_data[m_data.size() - 1] = '\0'; TQBuffer buf(m_data); TQIODevice *dev = KFilterDev::device(TQT_TQIODEVICE(&buf), "application/x-gzip", false); TQByteArray contents; if(dev->open(IO_ReadOnly)) contents = dev->readAll(); delete dev; m_text = TQString::fromUtf8(contents.data()); m_data.resize(0); } bool SVGScriptElementImpl::canExecuteScript() { if(!m_added) { m_added = true; m_text += collectText(); } if(m_text.isEmpty() && !getAttribute("href").isNull() && !getAttribute("href").string().isEmpty()) return false; return true; } bool SVGScriptElementImpl::executeScript(DOM::Node node) { return SVGScriptElementImpl::executeScript(node, ownerDoc(), m_text); } bool SVGScriptElementImpl::executeScript(DOM::Node node, SVGDocumentImpl *document, const TQString &text) { #ifdef KJS_VERBOSE kdDebug(6070) << "SVGScriptElementImpl::executeScript n=" << node.nodeName().string().latin1() << "(" << (node.isNull() ? 0 : node.nodeType()) << ") " << text << endl; #endif KSVGEcma *ecmaEngine = document->ecmaEngine(); if(!ecmaEngine->initialized()) ecmaEngine->setup(); KJS::Value thisNode = node.isNull() ? ecmaEngine->globalObject() : getDOMNode(ecmaEngine->globalExec(), node); KJS::UString code(text); KJS::Completion comp = ecmaEngine->evaluate(code, thisNode); // TODO: If that's needed find a better solution which // doesn't cause endless loops if the func, specified in // onerror="..." isn't yet available // onerror support // if(comp.complType() == Throw) // document->rootElement()->dispatchEvent(SVGEventImpl::ERROR_EVENT, false, false); return (comp.complType() == KJS::Normal) || (comp.complType() == KJS::ReturnValue); } // Ecma stuff /* @namespace KSVG @begin SVGScriptElementImpl::s_hashTable 2 type SVGScriptElementImpl::Type DontDelete @end */ Value SVGScriptElementImpl::getValueProperty(ExecState *, int token) const { switch(token) { case Type: return String(type()); default: kdWarning() << "Unhandled token in " << k_funcinfo << " : " << token << endl; return Undefined(); } } void SVGScriptElementImpl::putValueProperty(KJS::ExecState *exec, int token, const KJS::Value &value, int) { switch(token) { case Type: setType(value.toString(exec).string()); break; default: kdWarning() << "Unhandled token in " << k_funcinfo << " : " << token << endl; } } // vim:ts=4:noet