|
|
|
/*
|
|
|
|
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, TQ_SIGNAL(data(TDEIO::Job *, const TQByteArray &)), this, TQ_SLOT(slotData(TDEIO::Job *, const TQByteArray &)));
|
|
|
|
connect(m_job, TQ_SIGNAL(result(TDEIO::Job *)), this, TQ_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(&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;
|
|
|
|
}
|
|
|
|
}
|