/*

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

    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 "qdeclarativewebview_p.h"

#include <QtCore/QDebug>

#include <QtCore/QEvent>

#include <QtCore/QFile>

#include <QtDeclarative/QDeclarativeContext>

#include <QtDeclarative/QDeclarativeEngine>

#include <QtDeclarative/qdeclarative.h>

#include <QtGui/QApplication>

#include <QtGui/QGraphicsSceneMouseEvent>

#include <QtGui/QKeyEvent>

#include <QtGui/QMouseEvent>

#include <QtGui/QPen>

#include "qwebelement.h"

#include "qwebframe.h"

#include "qwebpage.h"

#include "qwebsettings.h"

QT_BEGIN_NAMESPACE

class QDeclarativeWebViewPrivate {

public:

    QDeclarativeWebViewPrivate(QDeclarativeWebView* qq)

      : q(qq)

      , preferredwidth(0)

      , preferredheight(0)

      , progress(1.0)

      , status(QDeclarativeWebView::Null)

      , pending(PendingNone)

      , newWindowComponent(0)

      , newWindowParent(0)

      , rendering(true)

    {

    }

    QDeclarativeWebView* q;

    QUrl url; // page url might be different if it has not loaded yet

    GraphicsWebView* view;

    int preferredwidth, preferredheight;

    qreal progress;

    QDeclarativeWebView::Status status;

    QString statusText;

    enum { PendingNone, PendingUrl, PendingHtml, PendingContent } pending;

    QUrl pendingUrl;

    QString pendingString;

    QByteArray pendingData;

    mutable QDeclarativeWebSettings settings;

    QDeclarativeComponent* newWindowComponent;

    QDeclarativeItem* newWindowParent;

    static void windowObjectsAppend(QDeclarativeListProperty<QObject>* prop, QObject* o)

    {

        static_cast<QDeclarativeWebViewPrivate*>(prop->data)->windowObjects.append(o);

        static_cast<QDeclarativeWebViewPrivate*>(prop->data)->updateWindowObjects();

    }

    void updateWindowObjects();

    QObjectList windowObjects;

    bool rendering;

};

GraphicsWebView::GraphicsWebView(QDeclarativeWebView* parent)

    : QGraphicsWebView(parent)

    , parent(parent)

    , pressTime(400)

{

}

void GraphicsWebView::mousePressEvent(QGraphicsSceneMouseEvent* event)

{

    setFocus();

    pressPoint = event->pos();

    if (pressTime) {

        pressTimer.start(pressTime, this);

        parent->setKeepMouseGrab(false);

    } else {

        grabMouse();

        parent->setKeepMouseGrab(true);

    }

    QGraphicsWebView::mousePressEvent(event);

}

void GraphicsWebView::mouseReleaseEvent(QGraphicsSceneMouseEvent* event)

{

    QGraphicsWebView::mouseReleaseEvent(event);

    pressTimer.stop();

    parent->setKeepMouseGrab(false);

    ungrabMouse();

}

void GraphicsWebView::mouseDoubleClickEvent(QGraphicsSceneMouseEvent* event)

{

    QMouseEvent* me = new QMouseEvent(QEvent::MouseButtonDblClick, (event->pos() / parent->contentsScale()).toPoint(), event->button(), event->buttons(), 0);

    emit doubleClick(event->pos().x(), event->pos().y());

    delete me;

}

void GraphicsWebView::timerEvent(QTimerEvent* event)

{

    if (event->timerId() == pressTimer.timerId()) {

        pressTimer.stop();

        grabMouse();

        parent->setKeepMouseGrab(true);

    }

}

void GraphicsWebView::mouseMoveEvent(QGraphicsSceneMouseEvent* event)

{

    if (pressTimer.isActive()) {

        if ((event->pos() - pressPoint).manhattanLength() > QApplication::startDragDistance())

            pressTimer.stop();

    }

    if (parent->keepMouseGrab())

        QGraphicsWebView::mouseMoveEvent(event);

}

/*!

    \qmlclass WebView QDeclarativeWebView

    \since 4.7

    \brief The WebView item allows you to add web content to a canvas.

    \inherits Item

    A WebView renders web content based on a URL.

    This type is made available by importing the \c QtWebKit module:

    \bold{import QtWebKit 1.0}

    If the width and height of the item is not set, they will

    dynamically adjust to a size appropriate for the content.

    This width may be large for typical online web pages.

    If the width or height is explictly set, the rendered website

    will be clipped, not scaled, to fit into the set dimensions.

    If the preferredWidth is set, the width will be this amount or larger,

    usually laying out the web content to fit the preferredWidth.

    \qml

    import QtWebKit 1.0

    WebView {

        url: "http://www.nokia.com"

        preferredWidth: 490

        preferredHeight: 400

        scale: 0.5

        smooth: false

        smoothCache: true

    }

    \endqml

    \image webview.png

    The item includes no scrolling, scaling,

    toolbars, etc., those must be implemented around WebView. See the WebBrowser example

    for a demonstration of this.

    When this item has keyboard focus, all keyboard input will be sent directly to the

    web page within.

    \sa {declarative/modelviews/webview}{WebView example}, {demos/declarative/webbrowser}{Web Browser demo}

*/

/*!

    \internal

    \class QDeclarativeWebView

    \brief The QDeclarativeWebView class allows you to add web content to a QDeclarativeView.

    A WebView renders web content base on a URL.

    \image webview.png

    The item includes no scrolling, scaling,

    toolbars, etc., those must be implemented around WebView. See the WebBrowser example

    for a demonstration of this.

    A QDeclarativeWebView object can be instantiated in Qml using the tag \l WebView.

*/

QDeclarativeWebView::QDeclarativeWebView(QDeclarativeItem *parent) : QDeclarativeItem(parent)

{

    init();

}

QDeclarativeWebView::~QDeclarativeWebView()

{

    delete d;

}

void QDeclarativeWebView::init()

{

    d = new QDeclarativeWebViewPrivate(this);

    QWebSettings::enablePersistentStorage();

    setAcceptedMouseButtons(Qt::LeftButton);

    setFlag(QGraphicsItem::ItemHasNoContents, true);

    setClip(true);

    d->view = new GraphicsWebView(this);

    d->view->setResizesToContents(true);

    QWebPage* wp = new QDeclarativeWebPage(this);

    setPage(wp);

    connect(d->view, SIGNAL(geometryChanged()), this, SLOT(updateDeclarativeWebViewSize()));

    connect(d->view, SIGNAL(doubleClick(int, int)), this, SIGNAL(doubleClick(int, int)));

    connect(d->view, SIGNAL(scaleChanged()), this, SIGNAL(contentsScaleChanged()));

}

void QDeclarativeWebView::componentComplete()

{

    QDeclarativeItem::componentComplete();

    page()->setNetworkAccessManager(qmlEngine(this)->networkAccessManager());

    switch (d->pending) {

    case QDeclarativeWebViewPrivate::PendingUrl:

        setUrl(d->pendingUrl);

        break;

    case QDeclarativeWebViewPrivate::PendingHtml:

        setHtml(d->pendingString, d->pendingUrl);

        break;

    case QDeclarativeWebViewPrivate::PendingContent:

        setContent(d->pendingData, d->pendingString, d->pendingUrl);

        break;

    default:

        break;

    }

    d->pending = QDeclarativeWebViewPrivate::PendingNone;

    d->updateWindowObjects();

}

QDeclarativeWebView::Status QDeclarativeWebView::status() const

{

    return d->status;

}

/*!

    \qmlproperty real WebView::progress

    This property holds the progress of loading the current URL, from 0 to 1.

    If you just want to know when progress gets to 1, use

    WebView::onLoadFinished() or WebView::onLoadFailed() instead.

*/

qreal QDeclarativeWebView::progress() const

{

    return d->progress;

}

void QDeclarativeWebView::doLoadStarted()

{

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

        d->status = Loading;

        emit statusChanged(d->status);

    }

    emit loadStarted();

}

void QDeclarativeWebView::doLoadProgress(int p)

{

    if (d->progress == p / 100.0)

        return;

    d->progress = p / 100.0;

    emit progressChanged();

}

void QDeclarativeWebView::pageUrlChanged()

{

    updateContentsSize();

    if ((d->url.isEmpty() && page()->mainFrame()->url() != QUrl(QLatin1String("about:blank")))

        || (d->url != page()->mainFrame()->url() && !page()->mainFrame()->url().isEmpty()))

    {

        d->url = page()->mainFrame()->url();

        if (d->url == QUrl(QLatin1String("about:blank")))

            d->url = QUrl();

        emit urlChanged();

    }

}

void QDeclarativeWebView::doLoadFinished(bool ok)

{

    if (ok) {

        d->status = d->url.isEmpty() ? Null : Ready;

        emit loadFinished();

    } else {

        d->status = Error;

        emit loadFailed();

    }

    emit statusChanged(d->status);

}

/*!

    \qmlproperty url WebView::url

    This property holds the URL to the page displayed in this item. It can be set,

    but also can change spontaneously (eg. because of network redirection).

    If the url is empty, the page is blank.

    The url is always absolute (QML will resolve relative URL strings in the context

    of the containing QML document).

*/

QUrl QDeclarativeWebView::url() const

{

    return d->url;

}

void QDeclarativeWebView::setUrl(const QUrl& url)

{

    if (url == d->url)

        return;

    if (isComponentComplete()) {

        d->url = url;

        updateContentsSize();

        QUrl seturl = url;

        if (seturl.isEmpty())

            seturl = QUrl(QLatin1String("about:blank"));

        Q_ASSERT(!seturl.isRelative());

        page()->mainFrame()->load(seturl);

        emit urlChanged();

    } else {

        d->pending = d->PendingUrl;

        d->pendingUrl = url;

    }

}

/*!

    \qmlproperty int WebView::preferredWidth

    This property holds the ideal width for displaying the current URL.

*/

int QDeclarativeWebView::preferredWidth() const

{

    return d->preferredwidth;

}

void QDeclarativeWebView::setPreferredWidth(int width)

{

    if (d->preferredwidth == width)

        return;

    d->preferredwidth = width;

    updateContentsSize();

    emit preferredWidthChanged();

}

/*!

    \qmlproperty int WebView::preferredHeight

    This property holds the ideal height for displaying the current URL.

    This only affects the area zoomed by heuristicZoom().

*/

int QDeclarativeWebView::preferredHeight() const

{

    return d->preferredheight;

}

void QDeclarativeWebView::setPreferredHeight(int height)

{

    if (d->preferredheight == height)

        return;

    d->preferredheight = height;

    updateContentsSize();

    emit preferredHeightChanged();

}

/*!

    \qmlmethod bool WebView::evaluateJavaScript(string)

    Evaluates the \a scriptSource JavaScript inside the context of the

    main web frame, and returns the result of the last executed statement.

    Note that this JavaScript does \e not have any access to QML objects

    except as made available as windowObjects.

*/

QVariant QDeclarativeWebView::evaluateJavaScript(const QString& scriptSource)

{

    return this->page()->mainFrame()->evaluateJavaScript(scriptSource);

}

void QDeclarativeWebView::updateDeclarativeWebViewSize()

{

    QSizeF size = d->view->geometry().size() * contentsScale();

    setImplicitWidth(size.width());

    setImplicitHeight(size.height());

}

void QDeclarativeWebView::initialLayout()

{

    // nothing useful to do at this point

}

void QDeclarativeWebView::updateContentsSize()

{

    if (page()) {

        page()->setPreferredContentsSize(QSize(

            d->preferredwidth>0 ? d->preferredwidth : width(),

            d->preferredheight>0 ? d->preferredheight : height()));

    }

}

void QDeclarativeWebView::geometryChanged(const QRectF& newGeometry, const QRectF& oldGeometry)

{

    QWebPage* webPage = page();

    if (newGeometry.size() != oldGeometry.size() && webPage) {

        QSize contentSize = webPage->preferredContentsSize();

        if (widthValid())

            contentSize.setWidth(width());

        if (heightValid())

            contentSize.setHeight(height());

        if (contentSize != webPage->preferredContentsSize())

            webPage->setPreferredContentsSize(contentSize);

    }

    QDeclarativeItem::geometryChanged(newGeometry, oldGeometry);

}

/*!

    \qmlproperty list<object> WebView::javaScriptWindowObjects

    A list of QML objects to expose to the web page.

    Each object will be added as a property of the web frame's window object.  The

    property name is controlled by the value of \c WebView.windowObjectName

    attached property.

    Exposing QML objects to a web page allows JavaScript executing in the web

    page itself to communicate with QML, by reading and writing properties and

    by calling methods of the exposed QML objects.

    This example shows how to call into a QML method using a window object.

    \qml

    WebView {

        javaScriptWindowObjects: QtObject {

            WebView.windowObjectName: "qml"

            function qmlCall() {

                console.log("This call is in QML!");

            }

        }

        html: "<script>console.log(\"This is in WebKit!\"); window.qml.qmlCall();</script>"

    }

    \endqml

    The output of the example will be:

    \code

    This is in WebKit!

    This call is in QML!

    \endcode

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

*/

QDeclarativeListProperty<QObject> QDeclarativeWebView::javaScriptWindowObjects()

{

    return QDeclarativeListProperty<QObject>(this, d, &QDeclarativeWebViewPrivate::windowObjectsAppend);

}

QDeclarativeWebViewAttached* QDeclarativeWebView::qmlAttachedProperties(QObject* o)

{

    return new QDeclarativeWebViewAttached(o);

}

void QDeclarativeWebViewPrivate::updateWindowObjects()

{

    if (!q->isComponentCompletePublic() || !q->page())

        return;

    for (int i = 0; i < windowObjects.count(); ++i) {

        QObject* object = windowObjects.at(i);

        QDeclarativeWebViewAttached* attached = static_cast<QDeclarativeWebViewAttached *>(qmlAttachedPropertiesObject<QDeclarativeWebView>(object));

        if (attached && !attached->windowObjectName().isEmpty())

            q->page()->mainFrame()->addToJavaScriptWindowObject(attached->windowObjectName(), object);

    }

}

bool QDeclarativeWebView::renderingEnabled() const

{

    return d->rendering;

}

void QDeclarativeWebView::setRenderingEnabled(bool enabled)

{

    if (d->rendering == enabled)

        return;

    d->rendering = enabled;

    emit renderingEnabledChanged();

    d->view->setTiledBackingStoreFrozen(!enabled);

}

/*!

    \qmlsignal WebView::onDoubleClick(clickx, clicky)

    The WebView does not pass double-click events to the web engine, but rather

    emits this signals.

*/

/*!

    \qmlmethod bool WebView::heuristicZoom(clickX,clickY,maxzoom)

    Finds a zoom that:

    \list

    \i shows a whole item

    \i includes (\a clickX, \a clickY)

    \i fits into the preferredWidth and preferredHeight