/*
 *   Copyright (C) 2015 Christian Mollekopf <chrigi_1@fastmail.fm>
 *
 *   This program 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 2 of the License, or
 *   (at your option) any later version.
 *
 *   This program 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 this program; if not, write to the
 *   Free Software Foundation, Inc.,
 *   51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA.
 */
#include "threadindexer.h"

#include "typeindex.h"
#include "log.h"
#include "utils.h"

using namespace Sink;
using namespace Sink::ApplicationDomain;

void ThreadIndexer::updateThreadingIndex(const ApplicationDomain::ApplicationDomainType &entity, Sink::Storage::DataStore::Transaction &transaction)
{
    auto messageId = entity.getProperty(Mail::MessageId::name);
    auto parentMessageId = entity.getProperty(Mail::ParentMessageId::name);
    if (messageId.toByteArray().isEmpty()) {
        SinkWarning() << "Found an email without messageId. This is illegal and threading will break. Entity id: " << entity.identifier();
    }

    SinkTrace() << "Indexing thread. Entity: " << entity.identifier() << "Messageid: " << messageId << "ParentMessageId: " << parentMessageId;

    //check if a child already registered our thread.
    QVector<QByteArray> thread = index().secondaryLookup<Mail::MessageId, Mail::ThreadId>(messageId);

    if (!thread.isEmpty() && parentMessageId.isValid()) {
        //A child already registered our thread so we merge the childs thread
        //* check if we have a parent thread, if not just continue as usual
        //* get all messages that have the same threadid as the child
        //* switch all to the parents thread
        Q_ASSERT(!parentMessageId.toByteArray().isEmpty());
        auto parentThread = index().secondaryLookup<Mail::MessageId, Mail::ThreadId>(parentMessageId);
        if (!parentThread.isEmpty()) {
            auto childThreadId = thread.first();
            auto parentThreadId = parentThread.first();
            //Can happen if the message is already available locally.
            if (childThreadId == parentThreadId) {
                //Nothing to do
                return;
            }
            SinkTrace() << "Merging child thread: " << childThreadId << " into parent thread: " << parentThreadId;

            //Ensure this mail ends up in the correct thread
            index().unindex<Mail::MessageId, Mail::ThreadId>(messageId, childThreadId, transaction);
            //We have to copy the id here, otherwise it doesn't survive the subsequent writes
            thread = QVector<QByteArray>() << QByteArray{parentThreadId.data(), parentThreadId.size()};

            //Merge all child messages into the correct thread
            auto childThreadMessageIds = index().secondaryLookup<Mail::ThreadId, Mail::MessageId>(childThreadId);
            for (const auto &msgId : childThreadMessageIds) {
                SinkTrace() << "Merging child message: " << msgId;
                index().unindex<Mail::MessageId, Mail::ThreadId>(msgId, childThreadId, transaction);
                index().unindex<Mail::ThreadId, Mail::MessageId>(childThreadId, msgId, transaction);
                index().index<Mail::MessageId, Mail::ThreadId>(msgId, parentThreadId, transaction);
                index().index<Mail::ThreadId, Mail::MessageId>(parentThreadId, msgId, transaction);
            }
        }
    }

    //If parent is already available, add to thread of parent
    if (thread.isEmpty() && parentMessageId.isValid()) {
        thread = index().secondaryLookup<Mail::MessageId, Mail::ThreadId>(parentMessageId);
        SinkTrace() << "Found parent: " << thread;
    }
    if (thread.isEmpty()) {
        thread << Sink::createUuid();
        SinkTrace() << "Created a new thread: " << thread;
    }

    Q_ASSERT(!thread.isEmpty());

    if (parentMessageId.isValid()) {
        Q_ASSERT(!parentMessageId.toByteArray().isEmpty());
        //Register parent with thread for when it becomes available
        index().index<Mail::MessageId, Mail::ThreadId>(parentMessageId, thread.first(), transaction);
    }
    index().index<Mail::MessageId, Mail::ThreadId>(messageId, thread.first(), transaction);
    index().index<Mail::ThreadId, Mail::MessageId>(thread.first(), messageId, transaction);
}


void ThreadIndexer::add(const ApplicationDomain::ApplicationDomainType &entity)
{
    updateThreadingIndex(entity, transaction());
}

void ThreadIndexer::modify(const ApplicationDomain::ApplicationDomainType &oldEntity, const ApplicationDomain::ApplicationDomainType &newEntity)
{
    //FIXME Implement to support thread changes.
    //Emails are immutable (for everything threading relevant), so we don't care about it so far.
}

void ThreadIndexer::remove(const ApplicationDomain::ApplicationDomainType &entity)
{
    auto messageId = entity.getProperty(Mail::MessageId::name);
    auto thread = index().secondaryLookup<Mail::MessageId, Mail::ThreadId>(messageId);
    if (thread.isEmpty()) {
        SinkWarning() << "Failed to find the threadId for the entity " << entity.identifier() << messageId;
    }
    index().unindex<Mail::MessageId, Mail::ThreadId>(messageId.toByteArray(), thread.first(), transaction());
    index().unindex<Mail::ThreadId, Mail::MessageId>(thread.first(), messageId.toByteArray(), transaction());
}

QMap<QByteArray, int> ThreadIndexer::databases()
{
    return {{"mail.index.messageIdthreadId", 1},
            {"mail.index.threadIdmessageId", 1}};
}