/*
 * 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());
	App::getInstance()->mEngine->setObjectOwnership(this, QQmlEngine::CppOwnership);
	mSourceFlags = (int)linphone::MagicSearch::Source::Friends | (int)linphone::MagicSearch::Source::LdapServers;
	mAggregationFlag = LinphoneEnums::MagicSearchAggregation::Friend;
	mSearchFilter = "*";
}

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

void MagicSearchList::setSelf(QSharedPointer<MagicSearchList> me) {
	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);
			    emit friendCreated(getCount() - 1);
		    }
	    });
	mCoreModelConnection->invokeToModel([this] {
		auto linphoneSearch = CoreModel::getInstance()->getCore()->createMagicSearch();
		linphoneSearch->setLimitedSearch(false);
		auto magicSearch = Utils::makeQObject_ptr<MagicSearchModel>(linphoneSearch);
		mCoreModelConnection->invokeToCore([this, magicSearch] {
			mMagicSearch = magicSearch;
			mMagicSearch->mSourceFlags = mSourceFlags;
			mMagicSearch->mAggregationFlag = mAggregationFlag;
			mMagicSearch->setSelf(mMagicSearch);
			mModelConnection = QSharedPointer<SafeConnection<MagicSearchList, MagicSearchModel>>(
			    new SafeConnection<MagicSearchList, MagicSearchModel>(mCoreModelConnection->mCore.mQData, 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->makeConnectToCore(&MagicSearchList::lSetAggregationFlag,
			                                    [this](LinphoneEnums::MagicSearchAggregation aggregation) {
				                                    mModelConnection->invokeToModel([this, aggregation]() {
					                                    mMagicSearch->setAggregationFlag(aggregation);
				                                    });
			                                    });
			mModelConnection->makeConnectToCore(
			    &MagicSearchList::lSetAggregationFlag, [this](LinphoneEnums::MagicSearchAggregation flag) {
				    mModelConnection->invokeToModel([this, flag]() { mMagicSearch->setAggregationFlag(flag); });
			    });
			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);
					    }
					    bool isLdap = (it->getSourceFlags() & (int)LinphoneEnums::MagicSearchSource::LdapServers) != 0;
					    if (contact) contact->setIsLdap(isLdap);
				    }
				    mModelConnection->invokeToCore([this, contacts]() {
					    setResults(*contacts);
					    delete contacts;
				    });
			    });
			qDebug() << log().arg("Initialized");
			emit initialized();
		});
	});
}

void MagicSearchList::setResults(const QList<QSharedPointer<FriendCore>> &contacts) {
	for (auto item : mList) {
		auto isFriendCore = item.objectCast<FriendCore>();
		if (!isFriendCore) continue;
		disconnect(isFriendCore.get());
	}
	resetData();
	for (auto it : contacts) {
		connect(it.get(), &FriendCore::removed, this, qOverload<QObject *>(&MagicSearchList::remove));
		connect(it.get(), &FriendCore::starredChanged, this, [this] { lSearch(mSearchFilter); });
	}
	add(contacts);
}

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

void MagicSearchList::setSearch(const QString &search) {
	mSearchFilter = 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;
	for (int i = 0; i < getCount();) {
		auto friendCore = getAt<FriendCore>(i);
		if (!friendCore) continue;
		for (auto &friendAddress : friendCore->getAllAddresses()) {
			auto map = friendAddress.toMap();
			if (map["address"].toString() == address) {
				return i;
			}
		}
		++i;
	}
	return -1;
}