/****************************************************************************

**

** Copyright (C) 2010 Nokia Corporation and/or its subsidiary(-ies).

** All rights reserved.

** Contact: Nokia Corporation (qt-info@nokia.com)

**

** This file is part of the QtNetwork module of the Qt Toolkit.

**

** $QT_BEGIN_LICENSE:LGPL$

** No Commercial Usage

** This file contains pre-release code and may not be distributed.

** You may use this file in accordance with the terms and conditions

** contained in the Technology Preview License Agreement accompanying

** this package.

**

** GNU Lesser General Public License Usage

** Alternatively, this file may be used under the terms of the GNU Lesser

** General Public License version 2.1 as published by the Free Software

** Foundation and appearing in the file LICENSE.LGPL included in the

** packaging of this file.  Please review the following information to

** ensure the GNU Lesser General Public License version 2.1 requirements

** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.

**

** In addition, as a special exception, Nokia gives you certain additional

** rights.  These rights are described in the Nokia Qt LGPL Exception

** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.

**

** If you have questions regarding the use of this file, please contact

** Nokia at qt-info@nokia.com.

**

**

**

**

**

**

**

**

** $QT_END_LICENSE$

**

****************************************************************************/

#include "qnetworkreplyimpl_p.h"

#include "qnetworkaccessbackend_p.h"

#include "qnetworkcookie.h"

#include "qabstractnetworkcache.h"

#include "QtCore/qcoreapplication.h"

#include "QtCore/qdatetime.h"

#include "QtNetwork/qsslconfiguration.h"

#include "QtNetwork/qnetworksession.h"

#include "qnetworkaccesshttpbackend_p.h"

#include "qnetworkaccessmanager_p.h"

#include <QtCore/QCoreApplication>

QT_BEGIN_NAMESPACE

inline QNetworkReplyImplPrivate::QNetworkReplyImplPrivate()

    : backend(0), outgoingData(0), outgoingDataBuffer(0),

      copyDevice(0),

      cacheEnabled(false), cacheSaveDevice(0),

      notificationHandlingPaused(false),

      bytesDownloaded(0), lastBytesDownloaded(-1), bytesUploaded(-1), preMigrationDownloaded(-1),

      httpStatusCode(0),

      state(Idle)

{

}

void QNetworkReplyImplPrivate::_q_startOperation()

{

    // ensure this function is only being called once

    if (state == Working) {

        qDebug("QNetworkReplyImpl::_q_startOperation was called more than once");

        return;

    }

    state = Working;

    // note: if that method is called directly, it cannot happen that the backend is 0,

    // because we just checked via a qobject_cast that we got a http backend (see

    // QNetworkReplyImplPrivate::setup())

    if (!backend) {

        error(QNetworkReplyImpl::ProtocolUnknownError,

              QCoreApplication::translate("QNetworkReply", "Protocol \"%1\" is unknown").arg(url.scheme())); // not really true!;

        finished();

        return;

    }

#ifndef QT_NO_BEARERMANAGEMENT

    if (!backend->start()) {

        // backend failed to start because the session state is not Connected.

        // QNetworkAccessManager will call reply->backend->start() again for us when the session

        // state changes.

        state = WaitingForSession;

        QNetworkSession *session = manager->d_func()->networkSession;

        if (session) {

            Q_Q(QNetworkReplyImpl);

            QObject::connect(session, SIGNAL(error(QNetworkSession::SessionError)),

                             q, SLOT(_q_networkSessionFailed()));

            if (!session->isOpen())

                session->open();

        } else {

            qWarning("Backend is waiting for QNetworkSession to connect, but there is none!");

        }

        return;

    }

#endif

    if (state != Finished) {

        if (operation == QNetworkAccessManager::GetOperation)

            pendingNotifications.append(NotifyDownstreamReadyWrite);

        handleNotifications();

    }

}

void QNetworkReplyImplPrivate::_q_copyReadyRead()

{

    Q_Q(QNetworkReplyImpl);

    if (state != Working)

        return;

    if (!copyDevice || !q->isOpen())

        return;

    forever {

        qint64 bytesToRead = nextDownstreamBlockSize();

        if (bytesToRead == 0)

            // we'll be called again, eventually

            break;

        bytesToRead = qBound<qint64>(1, bytesToRead, copyDevice->bytesAvailable());

        QByteArray byteData;

        byteData.resize(bytesToRead);

        qint64 bytesActuallyRead = copyDevice->read(byteData.data(), byteData.size());

        if (bytesActuallyRead == -1) {

            byteData.clear();

            backendNotify(NotifyCopyFinished);

            break;

        }

        byteData.resize(bytesActuallyRead);

        readBuffer.append(byteData);

        if (!copyDevice->isSequential() && copyDevice->atEnd()) {

            backendNotify(NotifyCopyFinished);

            bytesDownloaded += bytesActuallyRead;

            break;

        }

        bytesDownloaded += bytesActuallyRead;

    }

    if (bytesDownloaded == lastBytesDownloaded) {

        // we didn't read anything

        return;

    }

    lastBytesDownloaded = bytesDownloaded;

    QVariant totalSize = cookedHeaders.value(QNetworkRequest::ContentLengthHeader);

    if (preMigrationDownloaded != Q_INT64_C(-1))

        totalSize = totalSize.toLongLong() + preMigrationDownloaded;

    pauseNotificationHandling();

    emit q->downloadProgress(bytesDownloaded,

                             totalSize.isNull() ? Q_INT64_C(-1) : totalSize.toLongLong());

    emit q->readyRead();

    resumeNotificationHandling();

}

void QNetworkReplyImplPrivate::_q_copyReadChannelFinished()

{

    _q_copyReadyRead();

}

void QNetworkReplyImplPrivate::_q_bufferOutgoingDataFinished()

{

    Q_Q(QNetworkReplyImpl);

    // make sure this is only called once, ever.

    //_q_bufferOutgoingData may call it or the readChannelFinished emission

    if (state != Buffering)

        return;

    // disconnect signals

    QObject::disconnect(outgoingData, SIGNAL(readyRead()), q, SLOT(_q_bufferOutgoingData()));

    QObject::disconnect(outgoingData, SIGNAL(readChannelFinished()), q, SLOT(_q_bufferOutgoingDataFinished()));

    // finally, start the request

    QMetaObject::invokeMethod(q, "_q_startOperation", Qt::QueuedConnection);

}

void QNetworkReplyImplPrivate::_q_bufferOutgoingData()

{

    Q_Q(QNetworkReplyImpl);

    if (!outgoingDataBuffer) {

        // first call, create our buffer

        outgoingDataBuffer = new QRingBuffer();

        QObject::connect(outgoingData, SIGNAL(readyRead()), q, SLOT(_q_bufferOutgoingData()));

        QObject::connect(outgoingData, SIGNAL(readChannelFinished()), q, SLOT(_q_bufferOutgoingDataFinished()));

    }

    qint64 bytesBuffered = 0;

    qint64 bytesToBuffer = 0;

    // read data into our buffer

    forever {

        bytesToBuffer = outgoingData->bytesAvailable();

        // unknown? just try 2 kB, this also ensures we always try to read the EOF

        if (bytesToBuffer <= 0)

            bytesToBuffer = 2*1024;

        char *dst = outgoingDataBuffer->reserve(bytesToBuffer);

        bytesBuffered = outgoingData->read(dst, bytesToBuffer);

        if (bytesBuffered == -1) {

            // EOF has been reached.

            outgoingDataBuffer->chop(bytesToBuffer);

            _q_bufferOutgoingDataFinished();

            break;

        } else if (bytesBuffered == 0) {

            // nothing read right now, just wait until we get called again

            outgoingDataBuffer->chop(bytesToBuffer);

            break;

        } else {

            // don't break, try to read() again

            outgoingDataBuffer->chop(bytesToBuffer - bytesBuffered);

        }

    }

}

#ifndef QT_NO_BEARERMANAGEMENT

void QNetworkReplyImplPrivate::_q_networkSessionConnected()

{

    Q_Q(QNetworkReplyImpl);

    if (manager.isNull())

        return;

    QNetworkSession *session = manager->d_func()->networkSession;

    if (!session)

        return;

    if (session->state() != QNetworkSession::Connected)

        return;

    switch (state) {

    case QNetworkReplyImplPrivate::Buffering:

    case QNetworkReplyImplPrivate::Working:

    case QNetworkReplyImplPrivate::Reconnecting:

        // Migrate existing downloads to new network connection.

        migrateBackend();

        break;

    case QNetworkReplyImplPrivate::WaitingForSession:

        // Start waiting requests.

        QMetaObject::invokeMethod(q, "_q_startOperation", Qt::QueuedConnection);

        break;

    default:

        ;

    }

}

void QNetworkReplyImplPrivate::_q_networkSessionFailed()

{

    // Abort waiting replies.

    if (state == WaitingForSession) {

        state = Working;

        error(QNetworkReplyImpl::UnknownNetworkError,

              QCoreApplication::translate("QNetworkReply", "Network session error."));

        finished();

    }

}

#endif

void QNetworkReplyImplPrivate::setup(QNetworkAccessManager::Operation op, const QNetworkRequest &req,

                                     QIODevice *data)

{

    Q_Q(QNetworkReplyImpl);

    outgoingData = data;

    request = req;

    url = request.url();

    operation = op;

    if (outgoingData && backend) {

        // there is data to be uploaded, e.g. HTTP POST.

        if (!backend->needsResetableUploadData() || !outgoingData->isSequential()) {

            // backend does not need upload buffering or

            // fixed size non-sequential

            // just start the operation

            QMetaObject::invokeMethod(q, "_q_startOperation", Qt::QueuedConnection);

        } else {

            bool bufferingDisallowed =

                    req.attribute(QNetworkRequest::DoNotBufferUploadDataAttribute,

                                             false).toBool();

            if (bufferingDisallowed) {

                // if a valid content-length header for the request was supplied, we can disable buffering

                // if not, we will buffer anyway

                if (req.header(QNetworkRequest::ContentLengthHeader).isValid()) {

                    QMetaObject::invokeMethod(q, "_q_startOperation", Qt::QueuedConnection);

                } else {

                    state = Buffering;

                    QMetaObject::invokeMethod(q, "_q_bufferOutgoingData", Qt::QueuedConnection);

                }

            } else {

                // _q_startOperation will be called when the buffering has finished.

                state = Buffering;

                QMetaObject::invokeMethod(q, "_q_bufferOutgoingData", Qt::QueuedConnection);

            }

        }

    } else {

        // No outgoing data (e.g. HTTP GET request)

        // or no backend

        // if no backend, _q_startOperation will handle the error of this

        // for HTTP, we want to send out the request as fast as possible to the network, without

        // invoking methods in a QueuedConnection

#ifndef QT_NO_HTTP

        if (qobject_cast<QNetworkAccessHttpBackend *>(backend)) {

            _q_startOperation();

        } else {

            QMetaObject::invokeMethod(q, "_q_startOperation", Qt::QueuedConnection);

        }

#else

        QMetaObject::invokeMethod(q, "_q_startOperation", Qt::QueuedConnection);

#endif // QT_NO_HTTP

    }

    q->QIODevice::open(QIODevice::ReadOnly);

}

void QNetworkReplyImplPrivate::backendNotify(InternalNotifications notification)

{

    Q_Q(QNetworkReplyImpl);

    if (!pendingNotifications.contains(notification))

        pendingNotifications.enqueue(notification);

    if (pendingNotifications.size() == 1)

        QCoreApplication::postEvent(q, new QEvent(QEvent::NetworkReplyUpdated));

}

void QNetworkReplyImplPrivate::handleNotifications()

{

    if (notificationHandlingPaused)

        return;

    NotificationQueue current = pendingNotifications;

    pendingNotifications.clear();

    if (state != Working)

        return;

    while (state == Working && !current.isEmpty()) {

        InternalNotifications notification = current.dequeue();

        switch (notification) {

        case NotifyDownstreamReadyWrite:

            if (copyDevice)

                _q_copyReadyRead();

            else

                backend->downstreamReadyWrite();

            break;

        case NotifyCloseDownstreamChannel:

            backend->closeDownstreamChannel();

            break;

        case NotifyCopyFinished: {

            QIODevice *dev = copyDevice;

            copyDevice = 0;

            backend->copyFinished(dev);

            break;

        }

        }

    }

}

// Do not handle the notifications while we are emitting downloadProgress

// or readyRead

void QNetworkReplyImplPrivate::pauseNotificationHandling()

{

    notificationHandlingPaused = true;

}

// Resume notification handling

void QNetworkReplyImplPrivate::resumeNotificationHandling()

{

    Q_Q(QNetworkReplyImpl);

    notificationHandlingPaused = false;

    if (pendingNotifications.size() >= 1)

        QCoreApplication::postEvent(q, new QEvent(QEvent::NetworkReplyUpdated));

}

QAbstractNetworkCache *QNetworkReplyImplPrivate::networkCache() const

{

    if (!backend)

        return 0;

    return backend->networkCache();

}

void QNetworkReplyImplPrivate::createCache()

{

    // check if we can save and if we're allowed to

    if (!networkCache()

        || !request.attribute(QNetworkRequest::CacheSaveControlAttribute, true).toBool()

        || request.attribute(QNetworkRequest::CacheLoadControlAttribute,

                             QNetworkRequest::PreferNetwork).toInt()

            == QNetworkRequest::AlwaysNetwork)

        return;

    cacheEnabled = true;

}

bool QNetworkReplyImplPrivate::isCachingEnabled() const

{

    return (cacheEnabled && networkCache() != 0);

}

void QNetworkReplyImplPrivate::setCachingEnabled(bool enable)

{

    if (!enable && !cacheEnabled)

        return;                 // nothing to do

    if (enable && cacheEnabled)

        return;                 // nothing to do either!

    if (enable) {

        if (bytesDownloaded) {

            // refuse to enable in this case

            qCritical("QNetworkReplyImpl: backend error: caching was enabled after some bytes had been written");

            return;

        }

        createCache();

    } else {

        // someone told us to turn on, then back off?

        // ok... but you should make up your mind

        qDebug("QNetworkReplyImpl: setCachingEnabled(true) called after setCachingEnabled(false) -- "

               "backend %s probably needs to be fixed",

               backend->metaObject()->className());

        networkCache()->remove(url);

        cacheSaveDevice = 0;

        cacheEnabled = false;

    }

}

void QNetworkReplyImplPrivate::completeCacheSave()

{

    if (cacheEnabled && errorCode != QNetworkReplyImpl::NoError) {

        networkCache()->remove(url);

    } else if (cacheEnabled && cacheSaveDevice) {

        networkCache()->insert(cacheSaveDevice);

    }

    cacheSaveDevice = 0;

    cacheEnabled = false;

}

void QNetworkReplyImplPrivate::emitUploadProgress(qint64 bytesSent, qint64 bytesTotal)

{

    Q_Q(QNetworkReplyImpl);

    bytesUploaded = bytesSent;

    pauseNotificationHandling();

    emit q->uploadProgress(bytesSent, bytesTotal);

    resumeNotificationHandling();

}

qint64 QNetworkReplyImplPrivate::nextDownstreamBlockSize() const

{

    enum { DesiredBufferSize = 32 * 1024 };

    if (readBufferMaxSize == 0)

        return DesiredBufferSize;

    return qMax<qint64>(0, readBufferMaxSize - readBuffer.byteAmount());

}

void QNetworkReplyImplPrivate::initCacheSaveDevice()

{

    Q_Q(QNetworkReplyImpl);

    // save the meta data

    QNetworkCacheMetaData metaData;

    metaData.setUrl(url);

    metaData = backend->fetchCacheMetaData(metaData);

    // save the redirect request also in the cache

    QVariant redirectionTarget = q->attribute(QNetworkRequest::RedirectionTargetAttribute);

    if (redirectionTarget.isValid()) {

        QNetworkCacheMetaData::AttributesMap attributes = metaData.attributes();

        attributes.insert(QNetworkRequest::RedirectionTargetAttribute, redirectionTarget);

        metaData.setAttributes(attributes);

    }

    cacheSaveDevice = networkCache()->prepare(metaData);

    if (!cacheSaveDevice || (cacheSaveDevice && !cacheSaveDevice->isOpen())) {

        if (cacheSaveDevice && !cacheSaveDevice->isOpen())

            qCritical("QNetworkReplyImpl: network cache returned a device that is not open -- "

                  "class %s probably needs to be fixed",

                  networkCache()->metaObject()->className());

        networkCache()->remove(url);

        cacheSaveDevice = 0;

        cacheEnabled = false;

    }

}

// we received downstream data and send this to the cache

// and to our readBuffer (which in turn gets read by the user of QNetworkReply)

void QNetworkReplyImplPrivate::appendDownstreamData(QByteDataBuffer &data)

{

    Q_Q(QNetworkReplyImpl);

    if (!q->isOpen())

        return;