/*
 * Copyright (c) 2010-2024 Belledonne Communications SARL.
 *
 * This file is part of linphone-desktop
 * (see https://www.linphone.org).
 *
 * 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/>.
 */

#include "MagicSearchList.hpp"
#include "core/App.hpp"
#include "core/friend/FriendCore.hpp"
#include "core/friend/FriendGui.hpp"
#include "tool/Utils.hpp"
#include <QSharedPointer>
#include <linphone++/linphone.hh>

// =============================================================================

DEFINE_ABSTRACT_OBJECT(MagicSearchList)

QSharedPointer<MagicSearchList> MagicSearchList::create() {
	auto model = QSharedPointer<MagicSearchList>(new MagicSearchList(), &QObject::deleteLater);
	model->moveToThread(App::getInstance()->thread());
	model->setSelf(model);
	return model;
}

MagicSearchList::MagicSearchList(QObject *parent) : ListProxy(parent) {
	mustBeInMainThread(getClassName());
	mSourceFlags = (int)linphone::MagicSearch::Source::Friends | (int)linphone::MagicSearch::Source::LdapServers;
	mAggregationFlag = LinphoneEnums::MagicSearchAggregation::Friend;
	App::postModelSync([this]() {
		mustBeInLinphoneThread(log().arg(Q_FUNC_INFO));
		auto linphoneSearch = CoreModel::getInstance()->getCore()->createMagicSearch();
		linphoneSearch->setLimitedSearch(false);
		mMagicSearch = Utils::makeQObject_ptr<MagicSearchModel>(linphoneSearch);
		mMagicSearch->mSourceFlags = mSourceFlags;
		mMagicSearch->mAggregationFlag = mAggregationFlag;
		mMagicSearch->setSelf(mMagicSearch);
	});
}

MagicSearchList::~MagicSearchList() {
	mustBeInMainThread("~" + getClassName());
}

void MagicSearchList::setSelf(QSharedPointer<MagicSearchList> me) {
	mModelConnection = QSharedPointer<SafeConnection<MagicSearchList, MagicSearchModel>>(
	    new SafeConnection<MagicSearchList, MagicSearchModel>(me, mMagicSearch), &QObject::deleteLater);
	mModelConnection->makeConnectToCore(&MagicSearchList::lSearch, [this](QString filter) {
		mModelConnection->invokeToModel([this, filter]() { mMagicSearch->search(filter); });
	});
	mModelConnection->makeConnectToCore(&MagicSearchList::lSetSourceFlags, [this](int flags) {
		mModelConnection->invokeToModel([this, flags]() { mMagicSearch->setSourceFlags(flags); });
	});
	mModelConnection->makeConnectToModel(&MagicSearchModel::sourceFlagsChanged, [this](int flags) {
		mModelConnection->invokeToCore([this, flags]() { setSourceFlags(flags); });
	});
	mModelConnection->makeConnectToModel(
	    &MagicSearchModel::aggregationFlagChanged, [this](LinphoneEnums::MagicSearchAggregation flag) {
		    mModelConnection->invokeToCore([this, flag]() { setAggregationFlag(flag); });
	    });
	mModelConnection->makeConnectToModel(
	    &MagicSearchModel::searchResultsReceived,
	    [this](const std::list<std::shared_ptr<linphone::SearchResult>> &results) {
		    auto *contacts = new QList<QSharedPointer<FriendCore>>();
		    for (auto it : results) {
			    QSharedPointer<FriendCore> contact;
			    if (it->getFriend()) {
				    contact = FriendCore::create(it->getFriend());
				    contacts->append(contact);
			    } else if (auto address = it->getAddress()) {
				    auto linphoneFriend = CoreModel::getInstance()->getCore()->createFriend();
				    contact = FriendCore::create(linphoneFriend);
				    contact->setGivenName(Utils::coreStringToAppString(address->asStringUriOnly()));
				    contact->appendAddress(Utils::coreStringToAppString(address->asStringUriOnly()));
				    contacts->append(contact);
			    } else if (!it->getPhoneNumber().empty()) {
				    auto linphoneFriend = CoreModel::getInstance()->getCore()->createFriend();
				    contact = FriendCore::create(linphoneFriend);
				    contact->setGivenName(Utils::coreStringToAppString(it->getPhoneNumber()));
				    contact->appendPhoneNumber(tr("Phone"), Utils::coreStringToAppString(it->getPhoneNumber()));
				    contacts->append(contact);
			    }
		    }
		    mModelConnection->invokeToCore([this, contacts]() {
			    setResults(*contacts);
			    delete contacts;
		    });
	    });

	mCoreModelConnection = QSharedPointer<SafeConnection<MagicSearchList, CoreModel>>(
	    new SafeConnection<MagicSearchList, CoreModel>(me, CoreModel::getInstance()), &QObject::deleteLater);
	mCoreModelConnection->makeConnectToModel(
	    &CoreModel::friendCreated, [this](const std::shared_ptr<linphone::Friend> &f) {
		    auto friendCore = FriendCore::create(f);
		    auto haveContact =
		        std::find_if(mList.begin(), mList.end(), [friendCore](const QSharedPointer<QObject> &item) {
			        return item.objectCast<FriendCore>()->getDefaultAddress() == friendCore->getDefaultAddress();
		        });
		    if (haveContact == mList.end()) {
			    connect(friendCore.get(), &FriendCore::removed, this, qOverload<QObject *>(&MagicSearchList::remove));
			    add(friendCore);
			    int index = -1;
			    get(friendCore.get(), &index);
			    if (index != -1) {
				    emit friendCreated(index);
			    }
		    }
	    });
}

void MagicSearchList::setResults(const QList<QSharedPointer<FriendCore>> &contacts) {
	resetData();
	for (auto it : contacts) {
		connect(it.get(), &FriendCore::removed, this, qOverload<QObject *>(&MagicSearchList::remove));
	}
	add(contacts);
}

void MagicSearchList::addResult(const QSharedPointer<FriendCore> &contact) {
}

void MagicSearchList::setSearch(const QString &search) {
	if (!search.isEmpty()) {
		lSearch(search);
	} else {
		beginResetModel();
		mList.clear();
		endResetModel();
	}
}

int MagicSearchList::getSourceFlags() const {
	return mSourceFlags;
}

void MagicSearchList::setSourceFlags(int flags) {
	if (mSourceFlags != flags) {
		mSourceFlags = flags;
		emit sourceFlagsChanged(mSourceFlags);
	}
}

LinphoneEnums::MagicSearchAggregation MagicSearchList::getAggregationFlag() const {
	return mAggregationFlag;
}

void MagicSearchList::setAggregationFlag(LinphoneEnums::MagicSearchAggregation flags) {
	if (mAggregationFlag != flags) {
		mAggregationFlag = flags;
		emit aggregationFlagChanged(mAggregationFlag);
	}
}

QVariant MagicSearchList::data(const QModelIndex &index, int role) const {
	int row = index.row();
	if (!index.isValid() || row < 0 || row >= mList.count()) return QVariant();
	if (role == Qt::DisplayRole) {
		return QVariant::fromValue(new FriendGui(mList[row].objectCast<FriendCore>()));
	}
	return QVariant();
}

int MagicSearchList::findFriendIndexByAddress(const QString &address) {
	int i = 0;
	qDebug() << "[MagicSearchList] LOOKING FOR ADDRESS" << address;
	for (auto &item : mList) {
		qDebug() << "item" << item;
		auto isFriendCore = item.objectCast<FriendCore>();
		if (!isFriendCore) continue;
		qDebug() << "[MagicSearchList] SEARCH IN FRIEND" << isFriendCore->getDisplayName();
		for (auto &friendAddress : isFriendCore->getAllAddresses()) {
			auto map = friendAddress.toMap();
			// qDebug() << "COMPARE" << map["address"].toString();
			if (map["address"].toString() == address) {
				return i;
			}
		}
		++i;
	}
	return -1;
}