/*
 * Copyright (C) 2014-2024 CZ.NIC
 *
 * 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 3 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, see <http://www.gnu.org/licenses/>.
 *
 * In addition, as a special exception, the copyright holders give
 * permission to link the code of portions of this program with the
 * OpenSSL library under certain conditions as described in each
 * individual source file, and distribute linked combinations including
 * the two.
 */

#include <cinttypes>
#include <QThread>

#include "src/datovka_shared/isds/error.h"
#include "src/datovka_shared/isds/type_description.h"
#include "src/datovka_shared/isds/types.h"
#include "src/datovka_shared/log/log.h"
#include "src/global.h"
#include "src/io/isds_sessions.h"
#include "src/io/message_db_set.h"
#include "src/isds/services.h"
#include "src/worker/message_emitter.h"
#include "src/worker/task_erase_message.h"

TaskEraseMessage::TaskEraseMessage(const AcntIdDb &acntIdDb, const MsgId &msgId,
    enum MessageDirection msgDirect, bool delFromIsds)
    : m_result(NOT_DELETED),
    m_isdsError(),
    m_isdsLongError(),
    m_acntIdDb(acntIdDb),
    m_msgId(msgId),
    m_msgDirect(msgDirect),
    m_delFromIsds(delFromIsds)
{
	Q_ASSERT(m_acntIdDb.isValid());
	Q_ASSERT(m_msgId.dmId() >= 0);
}

void TaskEraseMessage::run(void)
{
	if (Q_UNLIKELY(!m_acntIdDb.isValid())) {
		Q_ASSERT(0);
		return;
	}

	if (Q_UNLIKELY(0 > m_msgId.dmId())) {
		Q_ASSERT(0);
		return;
	}

	logDebugLv0NL("Starting erase message task in thread '%p'",
	    (void *) QThread::currentThreadId());

	/* ### Worker task begin. ### */

	m_result = eraseMessage(m_acntIdDb, m_msgId, m_msgDirect,
	    m_delFromIsds, m_isdsError, m_isdsLongError);

	emit GlobInstcs::msgProcEmitterPtr->progressChange(PL_IDLE, 0);

	/* ### Worker task end. ### */

	logDebugLv0NL("Erase message task finished in thread '%p'",
	    (void *) QThread::currentThreadId());
}

enum TaskEraseMessage::Result TaskEraseMessage::eraseMessage(
    const AcntIdDb &acntIdDb, const MsgId &msgId,
    enum MessageDirection msgDirect, bool delFromIsds, QString &error,
    QString &longError)
{
#define TRANSACTION_ENABLE true

	Q_ASSERT(acntIdDb.isValid());
	Q_ASSERT(msgId.dmId() >= 0);

	Isds::Error err;
	err.setCode(Isds::Type::ERR_SUCCESS);

	MessageDb *messageDb = acntIdDb.messageDbSet()->accessMessageDb(
	    msgId.deliveryTime(), false);
	if (Q_UNLIKELY(Q_NULLPTR == messageDb)) {
		Q_ASSERT(0);
		return NOT_DELETED;
	}

	/* First delete message in ISDS. */
	if (delFromIsds) {
		Isds::Session *session =
		    GlobInstcs::isdsSessionsPtr->session(acntIdDb.username());
		if (Q_UNLIKELY(Q_NULLPTR == session)) {
			logErrorNL("Missing active session for username '%s'.",
			    acntIdDb.username().toUtf8().constData());
			return NOT_DELETED;
		}

		err = Isds::Service::eraseMessage(session, msgId.dmId(),
		    msgDirect == MSG_RECEIVED);

		if (err.code() == Isds::Type::ERR_SUCCESS) {
			logDebugLv1NL(
			    "Message '%" PRId64 "' was deleted from ISDS.",
			    UGLY_QINT64_CAST msgId.dmId());
		} else {
			error = Isds::Description::descrError(err.code());
			longError = err.longDescr();

			logErrorNL(
			    "Erasing message '%" PRId64 "'from ISDS returned status '%d': '%s'",
			    UGLY_QINT64_CAST msgId.dmId(), err.code(),
			    error.toUtf8().constData());
		}
	}

	if ((err.code() != Isds::Type::ERR_SUCCESS) && (err.code() != Isds::Type::ERR_INVAL)) {
		return NOT_DELETED;
	}

	if (Q_UNLIKELY(GlobInstcs::req_halt)) {
		return (delFromIsds && (Isds::Type::ERR_SUCCESS == err.code())) ? DELETED_ISDS : NOT_DELETED;
	}

	if (messageDb->msgsDeleteMessageData(msgId.dmId(), TRANSACTION_ENABLE)) {
		logDebugLv1NL(
		    "Message '%" PRId64 "' was deleted from local database.",
		    UGLY_QINT64_CAST msgId.dmId());
		return (delFromIsds && (Isds::Type::ERR_SUCCESS == err.code())) ? DELETED_ISDS_LOCAL : DELETED_LOCAL;
	} else {
		logErrorNL(
		    "Could not delete message '%" PRId64 "' from local database.",
		    UGLY_QINT64_CAST msgId.dmId());
		return (delFromIsds && (Isds::Type::ERR_SUCCESS == err.code())) ? DELETED_ISDS : NOT_DELETED;
	}

#undef TRANSACTION_ENABLE
}
