/*
    Copyright (c) 2009 John Layt <john@layt.net>

    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Library General Public
    License as published by the Free Software Foundation; either
    version 2 of the License, or (at your option) any later version.

    This library 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
    Library General Public License for more details.

    You should have received a copy of the GNU Library General Public License
    along with this library; see the file COPYING.LIB.  If not, write to
    the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
    Boston, MA 02110-1301, USA.
*/

#include "kcurrencycode.h"

#include <KConfigCore/kconfig.h>
#include <KConfigCore/kconfiggroup.h>
#include <KI18n/klocalizedstring.h>

#include <QDate>
#include <QDir>
#include <QFileInfo>
#include <QSharedData>
#include <QStandardPaths>
#include <QString>
#include <QStringList>

class KCurrencyCodePrivate : public QSharedData
{
public:
    KCurrencyCodePrivate(const QString &isoCurrencyCode, const QString &language = QString());
    KCurrencyCodePrivate(const QFileInfo &currencyCodeFile, const QString &language = QString());
    KCurrencyCodePrivate(const KCurrencyCodePrivate &other);
    virtual ~KCurrencyCodePrivate();

    void loadCurrency(const QFileInfo &currencyCodeFile, const QString &language);

    QString     m_currencyCodeIsoAlpha3;
    QString     m_currencyCodeIsoNumeric3;
    QString     m_currencyNameIso;
    QString     m_currencyNameDisplay;
    QStringList m_currencyUnitSymbols;
    QString     m_currencyUnitSymbolDefault;
    QString     m_currencyUnitSymbolUnambiguous;
    QString     m_currencyUnitSingular;
    QString     m_currencyUnitPlural;
    QString     m_currencySubunitSymbol;
    QString     m_currencySubunitSingular;
    QString     m_currencySubunitPlural;
    QDate       m_currencyIntroducedDate;
    QDate       m_currencySuspendedDate;
    QDate       m_currencyWithdrawnDate;
    int         m_currencySubunits;
    int         m_currencySubunitsPerUnit;
    bool        m_currencySubunitsInCirculation;
    int         m_currencyDecimalPlacesDisplay;
    QStringList m_currencyCountriesInUse;
};

KCurrencyCodePrivate::KCurrencyCodePrivate(const QString &isoCurrencyCode, const QString &language)
{
    QFileInfo file(QStandardPaths::locate(QStandardPaths::GenericDataLocation, QLatin1String("kf5/locale/currency/") + QString::fromLatin1("%1.desktop").arg(isoCurrencyCode.toLower())));

    loadCurrency(file, language);
}

KCurrencyCodePrivate::KCurrencyCodePrivate(const QFileInfo &currencyCodeFile, const QString &language)
{
    loadCurrency(currencyCodeFile, language);
}

KCurrencyCodePrivate::KCurrencyCodePrivate(const KCurrencyCodePrivate &other)
    : QSharedData(other),
      m_currencyCodeIsoAlpha3(other.m_currencyCodeIsoAlpha3),
      m_currencyCodeIsoNumeric3(other.m_currencyCodeIsoNumeric3),
      m_currencyNameIso(other.m_currencyNameIso),
      m_currencyNameDisplay(other.m_currencyNameDisplay),
      m_currencyUnitSymbols(other.m_currencyUnitSymbols),
      m_currencyUnitSymbolDefault(other.m_currencyUnitSymbolDefault),
      m_currencyUnitSymbolUnambiguous(other.m_currencyUnitSymbolUnambiguous),
      m_currencyUnitSingular(other.m_currencyUnitSingular),
      m_currencyUnitPlural(other.m_currencyUnitPlural),
      m_currencySubunitSymbol(other.m_currencySubunitSymbol),
      m_currencySubunitSingular(other.m_currencySubunitSingular),
      m_currencySubunitPlural(other.m_currencySubunitPlural),
      m_currencyIntroducedDate(other.m_currencyIntroducedDate),
      m_currencySuspendedDate(other.m_currencySuspendedDate),
      m_currencyWithdrawnDate(other.m_currencyWithdrawnDate),
      m_currencySubunits(other.m_currencySubunits),
      m_currencySubunitsPerUnit(other.m_currencySubunitsPerUnit),
      m_currencySubunitsInCirculation(other.m_currencySubunitsInCirculation),
      m_currencyDecimalPlacesDisplay(other.m_currencyDecimalPlacesDisplay),
      m_currencyCountriesInUse(other.m_currencyCountriesInUse)
{
}

KCurrencyCodePrivate::~KCurrencyCodePrivate()
{
}

void KCurrencyCodePrivate::loadCurrency(const QFileInfo &currencyCodeFile, const QString &language)
{
    KConfig cgFile(currencyCodeFile.absoluteFilePath());

    // If language is empty, means to stick with the global default, which is the default for any new KConfig
    if (!language.isEmpty()) {
        cgFile.setLocale(language);
    }

    KConfigGroup cg(&cgFile, "Currency Code");

    m_currencyCodeIsoAlpha3         = cg.readEntry("CurrencyCodeIsoAlpha3",         QString());
    m_currencyCodeIsoNumeric3       = cg.readEntry("CurrencyCodeIsoNumeric3",       QString());
    m_currencyNameIso               = cg.readEntry("CurrencyNameIso",               QString());
    m_currencyNameDisplay           = cg.readEntry("Name",                          QString());
    m_currencyUnitSymbols           = cg.readEntry("CurrencyUnitSymbols",           QStringList());
    m_currencyUnitSymbolDefault     = cg.readEntry("CurrencyUnitSymbolDefault",     QString());
    m_currencyUnitSymbolUnambiguous = cg.readEntry("CurrencyUnitSymbolUnambiguous", QString());
    m_currencyUnitSingular          = cg.readEntry("CurrencyUnitSingular",          QString());
    m_currencyUnitPlural            = cg.readEntry("CurrencyUnitPlural",            QString());
    m_currencySubunitSymbol         = cg.readEntry("CurrencySubunitSymbol",         QString());
    m_currencySubunitSingular       = cg.readEntry("CurrencySubunitSingular",       QString());
    m_currencySubunitPlural         = cg.readEntry("CurrencySubunitPlural",         QString());
    m_currencyIntroducedDate        = cg.readEntry("CurrencyIntroducedDate",        QDate());
    m_currencySuspendedDate         = cg.readEntry("CurrencySuspendedDate",         QDate());
    m_currencyWithdrawnDate         = cg.readEntry("CurrencyWithdrawnDate",         QDate());
    m_currencySubunits              = cg.readEntry("CurrencySubunits",              1);
    m_currencySubunitsInCirculation = cg.readEntry("CurrencySubunitsInCirculation", true);
    m_currencySubunitsPerUnit       = cg.readEntry("CurrencySubunitsPerUnit",       100);
    m_currencyDecimalPlacesDisplay  = cg.readEntry("CurrencyDecimalPlacesDisplay",  2);
    m_currencyCountriesInUse        = cg.readEntry("CurrencyCountriesInUse",        QStringList());
}

KCurrencyCode::KCurrencyCode(const QString &isoCurrencyCode, const QString &language)
    : d(new KCurrencyCodePrivate(isoCurrencyCode, language))
{
}

KCurrencyCode::KCurrencyCode(const QFileInfo &currencyCodeFile, const QString &language)
    : d(new KCurrencyCodePrivate(currencyCodeFile, language))
{
}

KCurrencyCode::KCurrencyCode(const KCurrencyCode &rhs)
    : d(rhs.d)
{
}

KCurrencyCode &KCurrencyCode::operator=(const KCurrencyCode &rhs)
{
    if (&rhs != this) {
        d = rhs.d;
    }
    return *this;
}

KCurrencyCode::~KCurrencyCode()
{
}

QString KCurrencyCode::isoCurrencyCode() const
{
    return d->m_currencyCodeIsoAlpha3;
}

QString KCurrencyCode::isoCurrencyCodeNumeric() const
{
    return d->m_currencyCodeIsoNumeric3;
}

QString KCurrencyCode::name() const
{
    return d->m_currencyNameDisplay;
}

QString KCurrencyCode::isoName() const
{
    return d->m_currencyNameIso;
}

KCurrencyCode::CurrencyStatus KCurrencyCode::status() const
{
    if (dateWithdrawn() != QDate()) {
        return ObsoleteCurrency;
    } else if (dateSuspended() != QDate()) {
        return SuspendedCurrency;
    } else {
        return ActiveCurrency;
    }
}

QDate KCurrencyCode::dateIntroduced() const
{
    return d->m_currencyIntroducedDate;
}

QDate KCurrencyCode::dateSuspended() const
{
    return d->m_currencySuspendedDate;
}

QDate KCurrencyCode::dateWithdrawn() const
{
    return d->m_currencyWithdrawnDate;
}

QStringList KCurrencyCode::symbolList() const
{
    return d->m_currencyUnitSymbols;
}

QString KCurrencyCode::defaultSymbol() const
{
    return d->m_currencyUnitSymbolDefault;
}

QString KCurrencyCode::unambiguousSymbol() const
{
    if (d->m_currencyUnitSymbolUnambiguous.isEmpty()) {
        return d->m_currencyUnitSymbolDefault;
    } else {
        return d->m_currencyUnitSymbolUnambiguous;
    }
}

bool KCurrencyCode::hasSubunits() const
{
    if (d->m_currencySubunits > 0) {
        return true;
    } else {
        return false;
    }
}

bool KCurrencyCode::hasSubunitsInCirculation() const
{
    return (hasSubunits() && d->m_currencySubunitsInCirculation);
}

QString KCurrencyCode::subunitSymbol() const
{
    return d->m_currencySubunitSymbol;
}

int KCurrencyCode::subunitsPerUnit() const
{
    return d->m_currencySubunitsPerUnit;
}

int KCurrencyCode::decimalPlaces() const
{
    return d->m_currencyDecimalPlacesDisplay;
}

QStringList KCurrencyCode::countriesUsingCurrency() const
{
    return d->m_currencyCountriesInUse;
}

bool KCurrencyCode::isValid() const
{
    return !d->m_currencyCodeIsoAlpha3.isEmpty();
}

bool KCurrencyCode::isValid(const QString &isoCurrencyCode, CurrencyStatusFlags currencyStatusFlags)
{
    KCurrencyCode test = KCurrencyCode(isoCurrencyCode);
    return test.isValid() && (currencyStatusFlags & test.status());
}

QStringList KCurrencyCode::allCurrencyCodesList(CurrencyStatusFlags currencyStatus)
{
    QStringList currencyCodes;

    const QStringList dirs = QStandardPaths::locateAll(QStandardPaths::GenericDataLocation, QLatin1String("kf5/locale/currency/"), QStandardPaths::LocateDirectory);
    Q_FOREACH (const QString &dir, dirs) {
        Q_FOREACH (const QString &path, QDir(dir).entryList(QStringList() << QLatin1String("*.desktop"))) {
            const QString code = path.mid(path.length() - 11, 3).toUpper();
            if (KCurrencyCode::isValid(code, currencyStatus)) {
                currencyCodes.append(code);
            }
        }
    }

    return currencyCodes;
}

QString KCurrencyCode::currencyCodeToName(const QString &isoCurrencyCode, const QString &language)
{
    KCurrencyCode temp = KCurrencyCode(isoCurrencyCode, language);
    if (temp.isValid()) {
        return temp.name();
    } else {
        return QString();
    }
}
