/* Webcamoid, webcam capture application.
 * Copyright (C) 2015  Gonzalo Exequiel Pedone
 *
 * Webcamoid is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * Webcamoid 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 General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with Webcamoid. If not, see <http://www.gnu.org/licenses/>.
 *
 * Web-Site: http://webcamoid.github.io/
 */

#include <QMutex>
#include <QQuickWindow>
#include <QReadWriteLock>
#include <QSGSimpleTextureNode>
#include <akfrac.h>
#include <akvideoconverter.h>
#include <akvideopacket.h>

#include "videodisplay.h"

class VideoDisplayPrivate
{
    public:
        AkVideoConverter m_videoConverter {{AkVideoCaps::Format_argbpack, 0, 0, {}}};
        QImage m_frame;
        QMutex m_inputMutex;
        QReadWriteLock m_updateMutex;
        bool m_fillDisplay {false};
};

VideoDisplay::VideoDisplay(QQuickItem *parent):
    QQuickItem(parent)
{
    this->d = new VideoDisplayPrivate;
    this->setFlag(ItemHasContents, true);
    this->setImplicitWidth(640);
    this->setImplicitHeight(480);
}

VideoDisplay::~VideoDisplay()
{
    delete this->d;
}

bool VideoDisplay::fillDisplay() const
{
    return this->d->m_fillDisplay;
}

QSGNode *VideoDisplay::updatePaintNode(QSGNode *oldNode,
                                       QQuickItem::UpdatePaintNodeData *updatePaintNodeData)
{
    Q_UNUSED(updatePaintNodeData)

    this->d->m_updateMutex.lockForRead();

    if (this->d->m_frame.isNull()) {
        this->d->m_updateMutex.unlock();

        return nullptr;
    }

    auto frame = this->d->m_frame.copy();
    this->d->m_updateMutex.unlock();

    if (this->window()->rendererInterface()->graphicsApi() == QSGRendererInterface::Software) {
        Qt::TransformationMode mode = this->smooth()?
                                          Qt::SmoothTransformation:
                                          Qt::FastTransformation;
        frame = frame.scaled(this->boundingRect().size().toSize(),
                             this->d->m_fillDisplay?
                                 Qt::IgnoreAspectRatio:
                                 Qt::KeepAspectRatio,
                             mode);
    }

    auto videoFrame = this->window()->createTextureFromImage(frame);

    if (!videoFrame)
        return nullptr;

    if (videoFrame->textureSize().isEmpty()) {
        delete videoFrame;

        return nullptr;
    }

    QSGSimpleTextureNode *node = nullptr;

    if (oldNode)
        node = dynamic_cast<QSGSimpleTextureNode *>(oldNode);
    else
        node = new QSGSimpleTextureNode();

    node->setOwnsTexture(true);
    node->setFiltering(QSGTexture::Linear);

    if (this->d->m_fillDisplay)
        node->setRect(this->boundingRect());
    else {
        QSizeF size(videoFrame->textureSize());
        size.scale(this->boundingRect().size(), Qt::KeepAspectRatio);
        QRectF rect(QPointF(), size);
        rect.moveCenter(this->boundingRect().center());
        node->setRect(rect);
    }

    node->setTexture(videoFrame);

    return node;
}

void VideoDisplay::iStream(const AkPacket &packet)
{
    if (this->d->m_inputMutex.tryLock()) {
        this->d->m_videoConverter.begin();
        auto src = this->d->m_videoConverter.convert(packet);
        this->d->m_videoConverter.end();

        this->d->m_updateMutex.lockForWrite();
        this->d->m_frame = QImage(src.caps().width(),
                                  src.caps().height(),
                                  QImage::Format_ARGB32);
        auto lineSize =
            qMin<size_t>(src.lineSize(0), this->d->m_frame.bytesPerLine());

        for (int y = 0; y < src.caps().height(); y++) {
            auto srcLine = src.constLine(0, y);
            auto dstLine = this->d->m_frame.scanLine(y);
            memcpy(dstLine, srcLine, lineSize);
        }

        this->d->m_updateMutex.unlock();

        QMetaObject::invokeMethod(this, "update");
        this->d->m_inputMutex.unlock();
    }
}

void VideoDisplay::setFillDisplay(bool fillDisplay)
{
    if (this->d->m_fillDisplay == fillDisplay)
        return;

    this->d->m_fillDisplay = fillDisplay;
    emit this->fillDisplayChanged();
}

void VideoDisplay::resetFillDisplay()
{
    this->setFillDisplay(false);
}

void VideoDisplay::registerTypes()
{
    // @uri Webcamoid
    qmlRegisterType<VideoDisplay>("Webcamoid", 1, 0, "VideoDisplay");
}

#include "moc_videodisplay.cpp"