// SPDX-FileCopyrightText: Copyright (C) 2013 swift Project Community / Contributors
// SPDX-License-Identifier: GPL-3.0-or-later OR LicenseRef-swift-pilot-client-1

//! \cond PRIVATE_TESTS

/*!
 * \file
 * \ingroup testblackmisc
 */

#include "blackmisc/aviation/airlineicaocodelist.h"
#include "blackmisc/aviation/atcstation.h"
#include "blackmisc/aviation/callsign.h"
#include "blackmisc/mixin/mixincompare.h"
#include "blackmisc/mixin/mixinmetatype.h"
#include "blackmisc/geo/coordinategeodetic.h"
#include "blackmisc/network/user.h"
#include "blackmisc/pq/frequency.h"
#include "blackmisc/pq/length.h"
#include "blackmisc/pq/physicalquantity.h"
#include "blackmisc/pq/units.h"
#include "blackmisc/propertyindexvariantmap.h"
#include "blackmisc/registermetadata.h"
#include "blackmisc/variantlist.h"
#include "blackmisc/variant.h"
#include "test.h"

#include <QDBusArgument>
#include <QObject>
#include <QDateTime>
#include <QTest>

using namespace BlackMisc;
using namespace BlackMisc::Aviation;
using namespace BlackMisc::PhysicalQuantities;
using namespace BlackMisc::Geo;
using namespace BlackMisc::Network;

namespace BlackMiscTest
{
    //! Variant and map related tests
    class CTestVariantAndMap : public QObject
    {
        Q_OBJECT

    private slots:
        //! Init test case data
        void initTestCase();

        //! Basic unit tests for value objects and variants
        void variant();

        //! Unit tests for variant lists
        void variantList();

        //! Unit tests for matches feature
        void matches();

        //! Unit tests for value maps and value objects
        void valueMap();
    };

    //! \private
    class CTestMatcher : public BlackMisc::Mixin::MetaType<CTestMatcher>
    {
    public:
        bool matches(const BlackMisc::CVariant &) const { return true; }

        // methods needed for metatype registration
        QString toQString(bool) const { return {}; }
        friend QDBusArgument &operator<<(QDBusArgument &arg, const CTestMatcher &) { return arg; }
        friend const QDBusArgument &operator>>(const QDBusArgument &arg, CTestMatcher &) { return arg; }
        friend QDataStream &operator<<(QDataStream &ds, const CTestMatcher &) { return ds; }
        friend QDataStream &operator>>(QDataStream &ds, CTestMatcher &) { return ds; }
    };
} // namespace

Q_DECLARE_METATYPE(BlackMiscTest::CTestMatcher)

namespace BlackMiscTest
{
    void CTestVariantAndMap::initTestCase()
    {
        BlackMisc::registerMetadata();
    }

    void CTestVariantAndMap::variant()
    {
        // ATC station
        QDateTime dtFrom = QDateTime::currentDateTimeUtc();
        QDateTime dtUntil = dtFrom.addSecs(60 * 60); // 1 hour
        QDateTime dtFrom2 = dtUntil;
        QDateTime dtUntil2 = dtUntil.addSecs(60 * 60);
        CCoordinateGeodetic geoPos =
            CCoordinateGeodetic::fromWgs84("48° 21′ 13″ N", "11° 47′ 09″ E", { 1487, CLengthUnit::ft() });
        CAtcStation station1(CCallsign("eddm_twr"), CUser("123456", "Joe Doe"),
                             CFrequency(118.7, CFrequencyUnit::MHz()),
                             geoPos, CLength(50, CLengthUnit::km()), false, dtFrom, dtUntil);
        CAtcStation station2(station1);
        CAtcStation station3(CCallsign("eddm_app"), CUser("654321", "Jen Doe"),
                             CFrequency(120.7, CFrequencyUnit::MHz()),
                             geoPos, CLength(100, CLengthUnit::km()), false, dtFrom2, dtUntil2);

        // compare
        CLength l1(0, nullptr);
        CLength l2(0, nullptr);
        QVERIFY2(l1 == l2, "Null lengths should be equal");

        CLength l3(0, CLengthUnit::m());
        CLength l4(-1, CLengthUnit::m());
        QVERIFY2(l1 != l3, "Null length and non-null length should not be equal");
        QVERIFY2(l1 != l4, "Null length and non-null length should not be equal");
        QVERIFY2((l1 < l4) != (l1 > l4), "Null length and non-null length should be comparable");
        QVERIFY2(compare(l1, l4) != 0, "Null length and non-null length should be sortable");

        CVariant station1qv = CVariant::fromValue(station1);
        QVERIFY2(station1 == station1, "Station should be equal");

        QVERIFY(station1.getController() == station2.getController());
        QVERIFY(station1.getRelativeDistance() == station2.getRelativeDistance());

        QVERIFY2(station1 == station2, "Station should be equal");
        QVERIFY2(station1 != station3, "Station should not be equal");
        QVERIFY2(station1qv == CVariant::from(station1), "Station should be equal (CVariant)");
        QVERIFY2(CVariant::from(station1) == station1qv, "Station should be equal (CVariant)");
        QVERIFY2(CVariant::from(station2) == station1qv, "Station should be equal (CVariant)");
        QVERIFY2(CVariant::from(station3) != station1qv, "Station should be equal (CVariant)");

        QVERIFY2(compare(station1, station1) == 0, "Station should be equal");
        QVERIFY2(compare(station1, station2) == 0, "Station should be equal");
        QVERIFY2(compare(station1, station3) != 0, "Station should not be equal");
    }

    void CTestVariantAndMap::variantList()
    {
        const CSequence<int> ints { 1, 2, 3 };
        CVariant variant = CVariant::from(ints);
        QVERIFY2(variant.canConvert<CVariantList>(), "Variant containing list can convert to CVariantList");
        QVERIFY2(variant.convert(qMetaTypeId<CVariantList>()), "Variant containing list can convert to CVariantList");
        const CVariantList variantInts = variant.to<CVariantList>();
        QVERIFY2(ints.size() == variantInts.size(), "Variant list has same size as original list");
        QVERIFY2(ints[0] == variantInts[0].to<int>(), "Variant list has same element");
        QVERIFY2(variant.canConvert<CSequence<int>>(), "Variant containing can convert back");
        QVERIFY2(ints == variant.to<CSequence<int>>(), "Variant list converted back compares equal");

        const CAirlineIcaoCodeList list { CAirlineIcaoCode("BAW"), CAirlineIcaoCode("DLH"), CAirlineIcaoCode("AAL") };
        variant = CVariant::from(list);
        QVERIFY2(variant.canConvert<CVariantList>(), "Variant containing list can convert to CVariantList");
        QVERIFY2(variant.convert(qMetaTypeId<CVariantList>()), "Variant containing list can convert to CVariantList");
        CVariantList variantList = variant.to<CVariantList>();
        QVERIFY2(list.size() == variantList.size(), "Variant list has same size as original list");
        QVERIFY2(list[0] == variantList[0].to<CAirlineIcaoCode>(), "Variant list has same element");
        QVERIFY2(variant.canConvert<CAirlineIcaoCodeList>(), "Variant containing can convert back");
        QVERIFY2(list == variant.to<CAirlineIcaoCodeList>(), "Variant list converted back compares equal");
    }

    void CTestVariantAndMap::matches()
    {
        CTestMatcher::registerMetadata();
        const CTestMatcher matcher {};
        const CVariant variant = CVariant::from(matcher);
        QVERIFY2(variant.matches(CVariant()), "Variant provides access to stored object's matches() method");
    }

    void CTestVariantAndMap::valueMap()
    {
        // ATC station
        QDateTime dtFrom = QDateTime::currentDateTimeUtc();
        QDateTime dtUntil = dtFrom.addSecs(60 * 60); // 1 hour
        CCoordinateGeodetic geoPos =
            CCoordinateGeodetic::fromWgs84("48° 21′ 13″ N", "11° 47′ 09″ E", { 1487, CLengthUnit::ft() });
        CAtcStation station1(CCallsign("eddm_twr"), CUser("123456", "Joe Doe"),
                             CFrequency(118.7, CFrequencyUnit::MHz()),
                             geoPos, CLength(50, CLengthUnit::km()), false, dtFrom, dtUntil);

        // value maps
        CPropertyIndexVariantMap vmWildcard(true);
        CPropertyIndexVariantMap vmNoWildcard(false);
        CPropertyIndexVariantMap vm;
        CPropertyIndexVariantMap vmCopy(vmWildcard);

        // Remark: Shortcoming here, as the callsign will be automatically set for user in station
        // I have to set this as well, otherwise, no match.
        vm.addValue(CAtcStation::IndexController, CUser("123456", "Joe Doe", CCallsign("EDDM_TWR")));

        // compare

        QVERIFY2(vmWildcard.matches(station1), "Station should be equal to wildcard");
        QVERIFY2(!vmNoWildcard.matches(station1), "Station should not be equal to empty list");
        QVERIFY2(vm.matches(station1), "Controller should match");
        QVERIFY2(vmWildcard == vmCopy, "Maps should be equal");
        QVERIFY2(qHash(vmWildcard) == qHash(vmCopy), "Hashs should be equal (simple)");

        vm.addValue(CAtcStation::IndexFrequency, CFrequency(118.7, CFrequencyUnit::MHz()));
        vm.addValue(CAtcStation::IndexPosition, geoPos);
        vmCopy = vm;
        QVERIFY2(qHash(vm) == qHash(vmCopy), "Hashs should be equal (detailed)");
        vmCopy.setWildcard(!vm.isWildcard());
        QVERIFY2(qHash(vm) != qHash(vmCopy), "Hashs should not be equal (detailed)");
    }
} // namespace

//! main
BLACKTEST_APPLESS_MAIN(BlackMiscTest::CTestVariantAndMap);

#include "testvariantandmap.moc"

//! \endcond