//
//  MarketplaceItemUploader.cpp
//
//
//  Created by Ryan Huffman on 12/10/2018
//  Copyright 2018 High Fidelity, Inc.
//
//  Distributed under the Apache License, Version 2.0.
//  See the accompanying file LICENSE or http://www.apache.org/licenses/LICENSE-2.0.html
//

#include "MarketplaceItemUploader.h"

#include <AccountManager.h>
#include <DependencyManager.h>

#ifndef Q_OS_ANDROID
#include <quazip5/quazip.h>
#include <quazip5/quazipfile.h>
#endif

#include <QTimer>
#include <QBuffer>

#include <QFile>
#include <QFileInfo>

#include <QJsonArray>
#include <QJsonDocument>
#include <QJsonObject>
#include <QUuid>

MarketplaceItemUploader::MarketplaceItemUploader(QString title,
                                                 QString description,
                                                 QString rootFilename,
                                                 QUuid marketplaceID,
                                                 QList<ProjectFilePath> filePaths) :
    _title(title),
    _description(description),
    _rootFilename(rootFilename),
    _marketplaceID(marketplaceID),
    _filePaths(filePaths) {
}

void MarketplaceItemUploader::setState(State newState) {
    Q_ASSERT(_state != State::Complete);
    Q_ASSERT(_error == Error::None);
    Q_ASSERT(newState != _state);

    _state = newState;
    emit stateChanged(newState);
    if (newState == State::Complete) {
        emit completed();
        emit finishedChanged();
    }
}

void MarketplaceItemUploader::setError(Error error) {
    Q_ASSERT(_state != State::Complete);
    Q_ASSERT(_error == Error::None);

    _error = error;
    emit errorChanged(error);
    emit finishedChanged();
}

void MarketplaceItemUploader::send() {
    doGetCategories();
}

void MarketplaceItemUploader::doGetCategories() {
    setState(State::GettingCategories);

    static const QString path = "/api/v1/marketplace/categories";

    auto accountManager = DependencyManager::get<AccountManager>();
    auto request = accountManager->createRequest(path, AccountManagerAuth::None);

    qWarning() << "Request url is: " << request.url();

    QNetworkAccessManager& networkAccessManager = NetworkAccessManager::getInstance();

    QNetworkReply* reply = networkAccessManager.get(request);

    connect(reply, &QNetworkReply::finished, this, [this, reply]() {
        auto error = reply->error();
        if (error == QNetworkReply::NoError) {
            auto doc = QJsonDocument::fromJson(reply->readAll());
            auto extractCategoryID = [&doc]() -> std::pair<bool, int> {
                auto items = doc.object()["data"].toObject()["categories"];
                if (!items.isArray()) {
                    qWarning() << "Categories parse error: data.items is not an array";
                    return { false, 0 };
                }

                auto itemsArray = items.toArray();
                for (const auto item : itemsArray) {
                    if (!item.isObject()) {
                        qWarning() << "Categories parse error: item is not an object";
                        return { false, 0 };
                    }

                    auto itemObject = item.toObject();
                    if (itemObject["name"].toString() == "Avatars") {
                        auto idValue = itemObject["id"];
                        if (!idValue.isDouble()) {
                            qWarning() << "Categories parse error: id is not a number";
                            return { false, 0 };
                        }
                        return { true, (int)idValue.toDouble() };
                    }
                }

                qWarning() << "Categories parse error: could not find a category for 'Avatar'";
                return { false, 0 };
            };

            bool success;
            std::tie(success, _categoryID) = extractCategoryID();
            if (!success) {
                qWarning() << "Failed to find marketplace category id";
                setError(Error::Unknown);
            } else {
                qDebug() << "Marketplace Avatar category ID is" << _categoryID;
                doUploadAvatar();
            }
        } else {
            setError(Error::Unknown);
        }
    });
}

void MarketplaceItemUploader::doUploadAvatar() {
#ifdef Q_OS_ANDROID
    qWarning() << "Marketplace uploading is not supported on Android";
    setError(Error::Unknown);
    return;
#else
    QBuffer buffer{ &_fileData };
    QuaZip zip{ &buffer };
    if (!zip.open(QuaZip::Mode::mdAdd)) {
        qWarning() << "Failed to open zip";
        setError(Error::Unknown);
        return;
    }

    for (auto& filePath : _filePaths) {
        qWarning() << "Zipping: " << filePath.absolutePath << filePath.relativePath;
        QFileInfo fileInfo{ filePath.absolutePath };

        QuaZipFile zipFile{ &zip };
        if (!zipFile.open(QIODevice::WriteOnly, QuaZipNewInfo(filePath.relativePath))) {
            qWarning() << "Could not open zip file:" << zipFile.getZipError();
            setError(Error::Unknown);
            return;
        }
        QFile file{ filePath.absolutePath };
        if (file.open(QIODevice::ReadOnly)) {
            zipFile.write(file.readAll());
        } else {
            qWarning() << "Failed to open: " << filePath.absolutePath;
        }
        file.close();
        zipFile.close();
        if (zipFile.getZipError() != UNZ_OK) {
            qWarning() << "Could not close zip file: " << zipFile.getZipError();
            setState(State::Complete);
            return;
        }
    }

    zip.close();

    qDebug() << "Finished zipping, size: " << (buffer.size() / (1000.0f)) << "KB";

    QString path = "/api/v1/marketplace/items";
    bool creating = true;
    if (!_marketplaceID.isNull()) {
        creating = false;
        auto idWithBraces = _marketplaceID.toString();
        auto idWithoutBraces = idWithBraces.mid(1, idWithBraces.length() - 2);
        path += "/" + idWithoutBraces;
    }
    auto accountManager = DependencyManager::get<AccountManager>();
    auto request = accountManager->createRequest(path, AccountManagerAuth::Required);
    request.setHeader(QNetworkRequest::KnownHeaders::ContentTypeHeader, "application/json");

    // TODO(huffman) add JSON escaping
    auto escapeJson = [](QString str) -> QString { return str; };

    QString jsonString = "{\"marketplace_item\":{";
    jsonString += "\"title\":\"" + escapeJson(_title) + "\"";

    // Items cannot have their description updated after they have been submitted.
    if (creating) {
        jsonString += ",\"description\":\"" + escapeJson(_description) + "\"";
    }

    jsonString += ",\"root_file_key\":\"" + escapeJson(_rootFilename) + "\"";
    jsonString += ",\"category_ids\":[" + QStringLiteral("%1").arg(_categoryID) + "]";
    jsonString += ",\"license\":0";
    jsonString += ",\"files\":\"" + QString::fromLatin1(_fileData.toBase64()) + "\"}}";

    QNetworkAccessManager& networkAccessManager = NetworkAccessManager::getInstance();

    QNetworkReply* reply{ nullptr };
    if (creating) {
        reply = networkAccessManager.post(request, jsonString.toUtf8());
    } else {
        reply = networkAccessManager.put(request, jsonString.toUtf8());
    }

    connect(reply, &QNetworkReply::uploadProgress, this, [this](float bytesSent, float bytesTotal) {
        if (_state == State::UploadingAvatar) {
            emit uploadProgress(bytesSent, bytesTotal);
            if (bytesSent >= bytesTotal) {
                setState(State::WaitingForUploadResponse);
            }
        }
    });

    connect(reply, &QNetworkReply::finished, this, [this, reply]() {
        _responseData = reply->readAll();

        auto error = reply->error();
        if (error == QNetworkReply::NoError) {
            auto doc = QJsonDocument::fromJson(_responseData.toLatin1());
            auto status = doc.object()["status"].toString();
            if (status == "success") {
                _marketplaceID = QUuid::fromString(doc["data"].toObject()["marketplace_id"].toString());
                _itemVersion = doc["data"].toObject()["version"].toDouble();
                setState(State::WaitingForInventory);
                doWaitForInventory();
            } else {
                qWarning() << "Got error response while uploading avatar: " << _responseData;
                setError(Error::Unknown);
            }
        } else {
            qWarning() << "Got error while uploading avatar: " << reply->error() << reply->errorString() << _responseData;
            setError(Error::Unknown);
        }
    });

    setState(State::UploadingAvatar);
#endif
}

void MarketplaceItemUploader::doWaitForInventory() {
    static const QString path = "/api/v1/commerce/inventory";

    auto accountManager = DependencyManager::get<AccountManager>();
    auto request = accountManager->createRequest(path, AccountManagerAuth::Required);

    QNetworkAccessManager& networkAccessManager = NetworkAccessManager::getInstance();

    QNetworkReply* reply = networkAccessManager.post(request, "");

    _numRequestsForInventory++;

    connect(reply, &QNetworkReply::finished, this, [this, reply]() {
        auto data = reply->readAll();

        bool success = false;

        auto error = reply->error();
        if (error == QNetworkReply::NoError) {
            // Parse response data
            auto doc = QJsonDocument::fromJson(data);
            auto isAssetAvailable = [this, &doc]() -> bool {
                if (!doc.isObject()) {
                    return false;
                }
                auto root = doc.object();
                auto status = root["status"].toString();
                if (status != "success") {
                    return false;
                }
                auto data = root["data"];
                if (!data.isObject()) {
                    return false;
                }
                auto assets = data.toObject()["assets"];
                if (!assets.isArray()) {
                    return false;
                }
                for (auto asset : assets.toArray()) {
                    auto assetObject = asset.toObject();
                    auto id = QUuid::fromString(assetObject["id"].toString());
                    if (id.isNull()) {
                        continue;
                    }
                    if (id == _marketplaceID) {
                        auto version = assetObject["version"];
                        auto valid = assetObject["valid"];
                        if (version.isDouble() && valid.isBool()) {
                            if ((int)version.toDouble() >= _itemVersion && valid.toBool()) {
                                return true;
                            }
                        }
                    }
                }
                return false;
            };

            success = isAssetAvailable();
        }
        if (success) {
            qDebug() << "Found item in inventory";
            setState(State::Complete);
        } else {
            constexpr int MAX_INVENTORY_REQUESTS { 8 };
            constexpr int TIME_BETWEEN_INVENTORY_REQUESTS_MS { 5000 };
            if (_numRequestsForInventory > MAX_INVENTORY_REQUESTS) {
                qDebug() << "Failed to find item in inventory";
                setError(Error::Unknown);
            } else {
                QTimer::singleShot(TIME_BETWEEN_INVENTORY_REQUESTS_MS, [this]() { doWaitForInventory(); });
            }
        }
    });
}