/*

    Copyright (C) 2008,2009 Nokia Corporation and/or its subsidiary(-ies)

    Copyright (C) 2007 Staikos Computing Services 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; 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 "config.h"

#include "qwebframe.h"

#include "CallFrame.h"

#include "Document.h"

#include "DocumentLoader.h"

#include "DragData.h"

#include "Element.h"

#include "FocusController.h"

#include "Frame.h"

#include "FrameLoaderClientQt.h"

#include "FrameTree.h"

#include "FrameView.h"

#include "GCController.h"

#include "GraphicsContext.h"

#include "HTMLMetaElement.h"

#include "HitTestResult.h"

#include "IconDatabase.h"

#include "InspectorController.h"

#include "JSDOMBinding.h"

#include "JSDOMWindowBase.h"

#include "JSLock.h"

#include "JSObject.h"

#include "NodeList.h"

#include "Page.h"

#include "PlatformMouseEvent.h"

#include "PlatformWheelEvent.h"

#include "PrintContext.h"

#include "PutPropertySlot.h"

#include "RenderTreeAsText.h"

#include "RenderView.h"

#include "ResourceRequest.h"

#include "ScriptController.h"

#include "ScriptSourceCode.h"

#include "ScriptValue.h"

#include "Scrollbar.h"

#include "SelectionController.h"

#include "SubstituteData.h"

#include "htmlediting.h"

#include "markup.h"

#include "qt_instance.h"

#include "qt_runtime.h"

#include "qwebelement.h"

#include "qwebframe_p.h"

#include "qwebpage.h"

#include "qwebpage_p.h"

#include "qwebsecurityorigin.h"

#include "qwebsecurityorigin_p.h"

#include "runtime.h"

#include "runtime_object.h"

#include "runtime_root.h"

#include "wtf/HashMap.h"

#include <QMultiMap>

#include <qdebug.h>

#include <qevent.h>

#include <qfileinfo.h>

#include <qpainter.h>

#include <qprinter.h>

#include <qregion.h>

#if QT_VERSION < 0x040400

#include "qwebnetworkinterface.h"

#endif

#if QT_VERSION >= 0x040400

#include <qnetworkrequest.h>

#endif

using namespace WebCore;

// from text/qfont.cpp

QT_BEGIN_NAMESPACE

extern Q_GUI_EXPORT int qt_defaultDpi();

QT_END_NAMESPACE

void QWEBKIT_EXPORT qt_drt_setJavaScriptProfilingEnabled(QWebFrame* qframe, bool enabled)

{

#if ENABLE(JAVASCRIPT_DEBUGGER)

    Frame* frame = QWebFramePrivate::core(qframe);

    InspectorController* controller = frame->page()->inspectorController();

    if (!controller)

        return;

    if (enabled)

        controller->enableProfiler();

    else

        controller->disableProfiler();

#endif

}

// Pause a given CSS animation or transition on the target node at a specific time.

// If the animation or transition is already paused, it will update its pause time.

// This method is only intended to be used for testing the CSS animation and transition system.

bool QWEBKIT_EXPORT qt_drt_pauseAnimation(QWebFrame *qframe, const QString &animationName, double time, const QString &elementId)

{

    Frame* frame = QWebFramePrivate::core(qframe);

    if (!frame)

        return false;

    AnimationController* controller = frame->animation();

    if (!controller)

        return false;

    Document* doc = frame->document();

    Q_ASSERT(doc);

    Node* coreNode = doc->getElementById(elementId);

    if (!coreNode || !coreNode->renderer())

        return false;

    return controller->pauseAnimationAtTime(coreNode->renderer(), animationName, time);

}

bool QWEBKIT_EXPORT qt_drt_pauseTransitionOfProperty(QWebFrame *qframe, const QString &propertyName, double time, const QString &elementId)

{

    Frame* frame = QWebFramePrivate::core(qframe);

    if (!frame)

        return false;

    AnimationController* controller = frame->animation();

    if (!controller)

        return false;

    Document* doc = frame->document();

    Q_ASSERT(doc);

    Node* coreNode = doc->getElementById(elementId);

    if (!coreNode || !coreNode->renderer())

        return false;

    return controller->pauseTransitionAtTime(coreNode->renderer(), propertyName, time);

}

// Returns the total number of currently running animations (includes both CSS transitions and CSS animations).

int QWEBKIT_EXPORT qt_drt_numberOfActiveAnimations(QWebFrame *qframe)

{

    Frame* frame = QWebFramePrivate::core(qframe);

    if (!frame)

        return false;

    AnimationController* controller = frame->animation();

    if (!controller)

        return false;

    return controller->numberOfActiveAnimations();

}

void QWEBKIT_EXPORT qt_drt_clearFrameName(QWebFrame* qFrame)

{

    Frame* frame = QWebFramePrivate::core(qFrame);

    frame->tree()->clearName();

}

int QWEBKIT_EXPORT qt_drt_javaScriptObjectsCount()

{

    return JSDOMWindowBase::commonJSGlobalData()->heap.globalObjectCount();

}

void QWEBKIT_EXPORT qt_drt_garbageCollector_collect()

{

    gcController().garbageCollectNow();

}

void QWEBKIT_EXPORT qt_drt_garbageCollector_collectOnAlternateThread(bool waitUntilDone)

{

    gcController().garbageCollectOnAlternateThreadForDebugging(waitUntilDone);

}

// Returns the value of counter in the element specified by \a id.

QString QWEBKIT_EXPORT qt_drt_counterValueForElementById(QWebFrame* qFrame, const QString& id)

{

    Frame* frame = QWebFramePrivate::core(qFrame);

    if (Document* document = frame->document()) {

        Element* element = document->getElementById(id);

        return WebCore::counterValueForElement(element);

    }

    return QString();

}

// Suspend active DOM objects in this frame.

void QWEBKIT_EXPORT qt_suspendActiveDOMObjects(QWebFrame* qFrame)

{

    Frame* frame = QWebFramePrivate::core(qFrame);

    if (frame->document())

        frame->document()->suspendActiveDOMObjects();

}

// Resume active DOM objects in this frame.

void QWEBKIT_EXPORT qt_resumeActiveDOMObjects(QWebFrame* qFrame)

{

    Frame* frame = QWebFramePrivate::core(qFrame);

    if (frame->document())

        frame->document()->resumeActiveDOMObjects();

}                        

QWebFrameData::QWebFrameData(WebCore::Page* parentPage, WebCore::Frame* parentFrame,

                             WebCore::HTMLFrameOwnerElement* ownerFrameElement,

                             const WebCore::String& frameName)

    : name(frameName)

    , ownerElement(ownerFrameElement)

    , page(parentPage)

    , allowsScrolling(true)

    , marginWidth(0)

    , marginHeight(0)

{

    frameLoaderClient = new FrameLoaderClientQt();

    frame = Frame::create(page, ownerElement, frameLoaderClient);

    // FIXME: All of the below should probably be moved over into WebCore

    frame->tree()->setName(name);

    if (parentFrame)

        parentFrame->tree()->appendChild(frame);

}

void QWebFramePrivate::init(QWebFrame *qframe, QWebFrameData *frameData)

{

    q = qframe;

    allowsScrolling = frameData->allowsScrolling;

    marginWidth = frameData->marginWidth;

    marginHeight = frameData->marginHeight;

    frame = frameData->frame.get();

    frameLoaderClient = frameData->frameLoaderClient;

    frameLoaderClient->setFrame(qframe, frame);

    frame->init();

}

WebCore::Scrollbar* QWebFramePrivate::horizontalScrollBar() const

{

    if (!frame->view())

        return 0;

    return frame->view()->horizontalScrollbar();

}

WebCore::Scrollbar* QWebFramePrivate::verticalScrollBar() const

{

    if (!frame->view())

        return 0;

    return frame->view()->verticalScrollbar();

}

void QWebFramePrivate::renderPrivate(QPainter *painter, QWebFrame::RenderLayer layer, const QRegion &clip)

{

    if (!frame->view() || !frame->contentRenderer())

        return;

    QVector<QRect> vector = clip.rects();

    if (vector.isEmpty())

        return;

    GraphicsContext context(painter);

    if (context.paintingDisabled() && !context.updatingControlTints())

        return;

    WebCore::FrameView* view = frame->view();

    view->layoutIfNeededRecursive();

    for (int i = 0; i < vector.size(); ++i) {

        const QRect& clipRect = vector.at(i);

        QRect intersectedRect = clipRect.intersected(view->frameRect());

        painter->save();

        painter->setClipRect(clipRect, Qt::IntersectClip);

        int x = view->x();

        int y = view->y();

        if (layer & QWebFrame::ContentsLayer) {

            context.save();

            int scrollX = view->scrollX();

            int scrollY = view->scrollY();

            QRect rect = intersectedRect;

            context.translate(x, y);

            rect.translate(-x, -y);

            context.translate(-scrollX, -scrollY);

            rect.translate(scrollX, scrollY);

            context.clip(view->visibleContentRect());

            view->paintContents(&context, rect);

            context.restore();

        }

        if (layer & QWebFrame::ScrollBarLayer

            && !view->scrollbarsSuppressed()

            && (view->horizontalScrollbar() || view->verticalScrollbar())) {

            context.save();

            QRect rect = intersectedRect;

            context.translate(x, y);

            rect.translate(-x, -y);

            view->paintScrollbars(&context, rect);

            context.restore();

        }

        if (layer & QWebFrame::PanIconLayer)

            view->paintPanScrollIcon(&context);

        painter->restore();

    }

}

{

    if (!frame || !frame->document() || !frame->eventHandler())

        return false;

    if (!node)

        return false;

    RenderObject* renderer = node->renderer();

    if (!renderer)

        return false;

    if (renderer->isListBox())

        return false;

    RenderLayer* renderLayer = renderer->enclosingLayer();

    if (!renderLayer)

        return false;

    bool scrolledHorizontal = false;

    bool scrolledVertical = false;

    if (dx > 0)

        scrolledHorizontal = renderLayer->scroll(ScrollRight, ScrollByPixel, dx);

    else if (dx < 0)

        scrolledHorizontal = renderLayer->scroll(ScrollLeft, ScrollByPixel, qAbs(dx));

    if (dy > 0)

        scrolledVertical = renderLayer->scroll(ScrollDown, ScrollByPixel, dy);

    else if (dy < 0)

        scrolledVertical = renderLayer->scroll(ScrollUp, ScrollByPixel, qAbs(dy));

    return (scrolledHorizontal || scrolledVertical);

}

/*!

    \class QWebFrame

    \since 4.4

    \brief The QWebFrame class represents a frame in a web page.

    \inmodule QtWebKit

    QWebFrame represents a frame inside a web page. Each QWebPage

    object contains at least one frame, the main frame, obtained using

    QWebPage::mainFrame(). Additional frames will be created for HTML

    \c{<frame>} or \c{<iframe>} elements.

    A frame can be loaded using load() or setUrl(). Alternatively, if you have

    the HTML content readily available, you can use setHtml() instead.

    The page() function returns a pointer to the web page object. See

    \l{QWebView}{Elements of QWebView} for an explanation of how web

    frames are related to a web page and web view.

    The QWebFrame class also offers methods to retrieve both the URL currently

    loaded by the frame (see url()) as well as the URL originally requested

    to be loaded (see requestedUrl()). These methods make possible the retrieval

    of the URL before and after a DNS resolution or a redirection occurs during

    the load process. The requestedUrl() also matches to the URL added to the

    frame history (\l{QWebHistory}) if load is successful.

    The title of an HTML frame can be accessed with the title() property.

    Additionally, a frame may also specify an icon, which can be accessed

    using the icon() property. If the title or the icon changes, the

    corresponding titleChanged() and iconChanged() signals will be emitted.

    The zoomFactor() property can be used to change the overall size

    of the content displayed in the frame.

    QWebFrame objects are created and controlled by the web page. You

    can connect to the web page's \l{QWebPage::}{frameCreated()} signal

    to be notified when a new frame is created.

    The hitTestContent() function can be used to programmatically examine the

    contents of a frame.

    A QWebFrame can be printed onto a QPrinter using the print() function.

    This function is marked as a slot and can be conveniently connected to

    \l{QPrintPreviewDialog}'s \l{QPrintPreviewDialog::}{paintRequested()}

    signal.

    \sa QWebPage

*/

/*!

    \enum QWebFrame::RenderLayer

    This enum describes the layers available for rendering using \l{QWebFrame::}{render()}.

    The layers can be OR-ed together from the following list:

    \value ContentsLayer The web content of the frame

    \value ScrollBarLayer The scrollbars of the frame

    \value PanIconLayer The icon used when panning the frame

    \value AllLayers Includes all the above layers

*/

QWebFrame::QWebFrame(QWebPage *parent, QWebFrameData *frameData)

    : QObject(parent)

    , d(new QWebFramePrivate)

{

    d->page = parent;

    d->init(this, frameData);

    if (!frameData->url.isEmpty()) {

        WebCore::ResourceRequest request(frameData->url, frameData->referrer);

        d->frame->loader()->load(request, frameData->name, false);

    }

}

QWebFrame::QWebFrame(QWebFrame *parent, QWebFrameData *frameData)

    : QObject(parent)

    , d(new QWebFramePrivate)

{

    d->page = parent->d->page;

    d->init(this, frameData);

}

QWebFrame::~QWebFrame()

{

    if (d->frame && d->frame->loader() && d->frame->loader()->client())

        static_cast<FrameLoaderClientQt*>(d->frame->loader()->client())->m_webFrame = 0;

    delete d;

}

/*!

    Make \a object available under \a name from within the frame's JavaScript

    context. The \a object will be inserted as a child of the frame's window

    object.

    Qt properties will be exposed as JavaScript properties and slots as

    JavaScript methods.

    If you want to ensure that your QObjects remain accessible after loading a

    new URL, you should add them in a slot connected to the

    javaScriptWindowObjectCleared() signal.

    If Javascript is not enabled for this page, then this method does nothing.

    The \a object will never be explicitly deleted by QtWebKit.

*/

void QWebFrame::addToJavaScriptWindowObject(const QString &name, QObject *object)

{

    addToJavaScriptWindowObject(name, object, QScriptEngine::QtOwnership);

}

/*!

    \fn void QWebFrame::addToJavaScriptWindowObject(const QString &name, QObject *object, QScriptEngine::ValueOwnership own)

    \overload

    Make \a object available under \a name from within the frame's JavaScript

    context. The \a object will be inserted as a child of the frame's window

    object.

    Qt properties will be exposed as JavaScript properties and slots as

    JavaScript methods.

    If you want to ensure that your QObjects remain accessible after loading a

    new URL, you should add them in a slot connected to the

    javaScriptWindowObjectCleared() signal.

    If Javascript is not enabled for this page, then this method does nothing.

    The ownership of \a object is specified using \a own.

*/

void QWebFrame::addToJavaScriptWindowObject(const QString &name, QObject *object, QScriptEngine::ValueOwnership ownership)

{

    if (!page()->settings()->testAttribute(QWebSettings::JavascriptEnabled))

        return;

    JSC::JSLock lock(JSC::SilenceAssertionsOnly);

    JSDOMWindow* window = toJSDOMWindow(d->frame, mainThreadNormalWorld());

    JSC::Bindings::RootObject* root = d->frame->script()->bindingRootObject();

    if (!window) {

        qDebug() << "Warning: couldn't get window object";

        return;

    }

    JSC::ExecState* exec = window->globalExec();

    JSC::JSObject* runtimeObject =

            JSC::Bindings::QtInstance::getQtInstance(object, root, ownership)->createRuntimeObject(exec);

    JSC::PutPropertySlot slot;

    window->put(exec, JSC::Identifier(exec, (const UChar *) name.constData(), name.length()), runtimeObject, slot);

}