/*
 * Copyright 2012 Canonical Ltd.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License as published by
 * the Free Software Foundation; version 3.
 *
 * 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 Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *
 * Authors:
 *      Renato Araujo Oliveira Filho <renato@canonical.com>
 */

extern "C" {
#include <glib.h>
}

#include "converter.h"

#include <QObject>
#include <QtTest>
#include <QDebug>

class ConverterTest : public QObject
{
    Q_OBJECT

private:
    bool compare(const QVariant &qv, const GVariantType *type)
    {
        bool result;
        GVariant *gv = Converter::toGVariant(qv);
        result = g_variant_type_equal(g_variant_get_type(gv), type);
        if (!result) {
            qWarning() << "types are different: QVariant:" << qv.typeName()
                       << "Result:" << g_variant_type_peek_string (g_variant_get_type(gv))
                       << "Expected:"<< g_variant_type_peek_string (type);
        }
        g_variant_unref(gv);
        return result;
    }
    bool compare(GVariant *gv, const QVariant::Type type)
    {
        g_variant_ref_sink(gv);
        const QVariant& qv = Converter::toQVariant(gv);
        bool result = (qv.type() == type);
        if (!result) {
            qWarning() << "types are different: GVariant:" << g_variant_type_peek_string (g_variant_get_type(gv))
                       << "Result:" << qv.type()
                       << "Expected:"<< type;
        }
        g_variant_unref(gv);
        return result;
    }
    bool compare(GVariant *gv, const QMetaType::Type type)
    {
        return compare(gv, (QVariant::Type) type);
    }
    bool compareWithSchema(const QVariant &qv, const QString strType)
    {
        GVariantType* expected_type;
        expected_type = g_variant_type_new(strType.toUtf8().data());

        bool result;
        GVariant *gv = Converter::toGVariantWithSchema(qv, strType.toUtf8().data());
        result = g_variant_type_equal(g_variant_get_type(gv), expected_type);
        if (!result) {
            qWarning() << "types are different: QVariant:" << qv.typeName()
                       << "Result:" << (const char*) g_variant_get_type(gv)
                       << "Expected:"<< (const char*) expected_type;
        }
        g_variant_unref(gv);
        return result;
    }

private Q_SLOTS:

    /*
     * Test converter QVariant to GVariant
     */

    void testBooleanToGVariant()
    {
        // Boolean
        QVERIFY(compare(QVariant(true), G_VARIANT_TYPE_BOOLEAN));
    }

    void testByteToGVariant()
    {
        // Byte
        QVERIFY(compare(QVariant::fromValue<uchar>(42), G_VARIANT_TYPE_BYTE));
    }

    void testInt16ToGVariant()
    {
        // Int16
        QVERIFY(compare(QVariant::fromValue<short>(-42), G_VARIANT_TYPE_INT16));
    }

    void testUInt16ToGVariant()
    {
        // UInt16
        QVERIFY(compare(QVariant::fromValue<ushort>(42), G_VARIANT_TYPE_UINT16));
    }

    void testInt32ToGVariant()
    {
        // Int32
        QVERIFY(compare(QVariant(-42), G_VARIANT_TYPE_INT32));
    }

    void testUInt32ToGVariant()
    {
        // UInt32
        QVERIFY(compare(QVariant((uint)42), G_VARIANT_TYPE_UINT32));
    }

    void testInt64ToGVariant()
    {
        // Int64
        QVERIFY(compare(QVariant::fromValue<long>(-42), G_VARIANT_TYPE_INT64));
    }

    void testUInt64ToGVariant()
    {
        // UInt64
        QVERIFY(compare(QVariant::fromValue<ulong>(42), G_VARIANT_TYPE_UINT64));
    }

    void testQlongLongToGVariant()
    {
        // Int64
        QVERIFY(compare(QVariant::fromValue<qlonglong>(-42), G_VARIANT_TYPE_INT64));
    }

    void testUQlongLongToGVariant()
    {
        // UInt64
        QVERIFY(compare(QVariant::fromValue<qulonglong>(42), G_VARIANT_TYPE_UINT64));
    }

    void testDoubleToGVariant()
    {
        // Double
        QVERIFY(compare(QVariant((double)42.42), G_VARIANT_TYPE_DOUBLE));
    }

    void testStringToGVariant()
    {
        // String
        QVERIFY(compare(QVariant(QString("42")), G_VARIANT_TYPE_STRING));
    }

    void testByteArrayToGVariant()
    {
        // ByteArray
        QVERIFY(compare(QVariant(QByteArray("42")), G_VARIANT_TYPE_BYTESTRING));
    }

    void testByteArrayListToGVariant()
    {
        // ByteArrayList
        QVariant result;
        result.setValue(QByteArrayList({"42", "53"}));
        QVERIFY(compare(result, G_VARIANT_TYPE_BYTESTRING_ARRAY));
    }

    void testMapToGVariant()
    {
        // Map
        QVERIFY(compare(QVariantMap({{"fooBar", 0xdeadbeef}}), G_VARIANT_TYPE_VARDICT));
    }

    void testListToGVariant()
    {
        // List
        QVERIFY(compare(QVariantList({"42", 53}), G_VARIANT_TYPE("(si)")));
    }

    void testBooleanToQVariant()
    {
        // Boolean
        QVERIFY(compare(g_variant_new_boolean(TRUE), QVariant::Bool));
    }

    void testByteToQVariant()
    {
        // Byte
        QVERIFY(compare(g_variant_new_byte(53), QMetaType::UChar));
    }

    void testInt16ToQVariant()
    {
        // Int16
        QVERIFY(compare(g_variant_new_int16(-53), QMetaType::Short));
    }

    void testUInt16ToQVariant()
    {
        // UInt16
        QVERIFY(compare(g_variant_new_uint16(53), QMetaType::UShort));
    }

    void testInt32ToQVariant()
    {
        // Int32
        QVERIFY(compare(g_variant_new_int32(-53), QVariant::Int));
    }

    void testUInt32ToQVariant()
    {
        // UInt32
        QVERIFY(compare(g_variant_new_uint32(53), QVariant::UInt));
    }

    void testInt64ToQVariant()
    {
        // Int64
        QVERIFY(compare(g_variant_new_int64(-53), QVariant::LongLong));
    }

    void testUInt64ToQVariant()
    {
        // UInt64
        QVERIFY(compare(g_variant_new_uint64(53), QVariant::ULongLong));
    }

    void testDoubleToQVariant()
    {
        // Double
        QVERIFY(compare(g_variant_new_double(53.53), QVariant::Double));
    }

    void testStringToQVariant()
    {
        // String
        QVERIFY(compare(g_variant_new_string("53"), QVariant::String));
    }

    void testByteArrayToQVariant()
    {
        // ByteArray
        QVERIFY(compare(g_variant_new_bytestring("53"), QVariant::ByteArray));
    }

    void testByteArrayListToQVariant()
    {
        // ByteArrayList
        const gchar *byteArray[] = {"42", "53", NULL};
        QVERIFY(compare(g_variant_new_bytestring_array(byteArray, -1), QMetaType::QByteArrayList));
    }

    void testMapToQVariant()
    {
        // Map
        GVariantBuilder *b = g_variant_builder_new(G_VARIANT_TYPE_VARDICT);
        g_variant_builder_add(b, "{sv}", "Foo", g_variant_new_int32(53));
        QVERIFY(compare(g_variant_builder_end(b), QVariant::Map));
        g_variant_builder_unref(b);
    }

    void testTupleConversion()
    {
        QVariantList qTuple;
        qTuple << 1 << "2" << 3.3;

        GVariant *gTuple = Converter::toGVariant(qTuple);
        QVERIFY(g_variant_type_is_tuple(g_variant_get_type(gTuple)));
        QCOMPARE(g_variant_n_children(gTuple), (gsize)3);

        GVariant *v = g_variant_get_child_value(gTuple, 0);
        int v0 = g_variant_get_int32(v);
        QCOMPARE(v0, 1);
        g_variant_unref(v);

        v = g_variant_get_child_value(gTuple, 1);
        const gchar *v1 = g_variant_get_string(v, NULL);
        QCOMPARE(QString(v1), QString("2"));
        g_variant_unref(v);

        v = g_variant_get_child_value(gTuple, 2);
        gdouble v2 = g_variant_get_double(v);
        QCOMPARE(v2, 3.3);
        g_variant_unref(v);

        g_variant_unref(gTuple);
    }

    void testSchemaConvert()
    {
        // convert to integer
        QVERIFY(compareWithSchema(QVariant::fromValue<int>(1), "i"));
        QVERIFY(compareWithSchema(QVariant::fromValue<double>(1.1), "i"));

        // convert to integer
        QVERIFY(compareWithSchema(QVariant::fromValue<bool>(true), "b"));
        QVERIFY(compareWithSchema(QVariant::fromValue<int>(1), "b"));

        // convert to double
        QVERIFY(compareWithSchema(QVariant::fromValue<double>(1.0), "d"));
        QVERIFY(compareWithSchema(QVariant::fromValue<int>(1), "d"));

        // convert to string
        QVERIFY(compareWithSchema(QVariant::fromValue<int>(1), "s"));
        QVERIFY(compareWithSchema(QVariant::fromValue<double>(1.1), "s"));

        // convert to tuple
        QVERIFY(compareWithSchema(QVariantList() << QVariant::fromValue<bool>(true) << QVariant::fromValue<int>(1) << QVariant::fromValue<int>(1) << QVariant::fromValue<QString>("test1"), "(bdis)"));

        // convert to array
        QVERIFY(compareWithSchema(QVariantList() << QVariant::fromValue<int>(1) << QVariant::fromValue<int>(1), "ad"));
        QVERIFY(compareWithSchema(QVariantList() << QVariant::fromValue<QString>("test1") << QVariant::fromValue<QString>("test2"), "as"));

        // convert to array of tuple
        QVariantList si1(QVariantList() << QVariant::fromValue<QString>("test1") << QVariant::fromValue<int>(1));
        QVariantList si2(QVariantList() << QVariant::fromValue<QString>("test1") << QVariant::fromValue<int>(1));
        QVERIFY(compareWithSchema(QVariantList() << QVariant::fromValue(si1) << QVariant::fromValue(si2), "a(sd)"));

        // convert to vardict
        QVariantMap map;
        map["test1"] = QVariant::fromValue<int>(1);
        map["test2"] = QVariant::fromValue<double>(1);
        QVERIFY(compareWithSchema(map, "a{sv}"));
    }

};

QTEST_MAIN(ConverterTest)

#include "convertertest.moc"