/****************************************************************************

**

** Copyright (C) 2008-2010 Nokia Corporation and/or its subsidiary(-ies).

** All rights reserved.

** Contact: Nokia Corporation (developer.feedback@nokia.com)

**

** This file is part of the HbCore module of the UI Extensions for Mobile.

**

** GNU Lesser General Public License Usage

** This file may be used under the terms of the GNU Lesser General Public

** License version 2.1 as published by the Free Software Foundation and

** appearing in the file LICENSE.LGPL included in the packaging of this file.

** Please review the following information to ensure the GNU Lesser General

** Public License version 2.1 requirements will be met:

** http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.

**

** In addition, as a special exception, Nokia gives you certain additional

** rights.  These rights are described in the Nokia Qt LGPL Exception

** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.

**

** If you have questions regarding the use of this file, please contact

** Nokia at developer.feedback@nokia.com.

**

****************************************************************************/

#include <QFile>

#include <QLocale>

#include <QTimer>

#include <QHash>

#include <QHashIterator>

#include <QTextStream>

#include <QTranslator>

#include <QTextCodec>

#include <QCoreApplication>

#include <QStringList>

#if defined(Q_OS_SYMBIAN)

#include <e32lang.h>

#include <e32property.h>

#include <centralrepository.h> 

#include <hal.h>

#include <syslangutil.h>

#include <CommonEngineDomainCRKeys.h> //Ui language

#endif // Q_OS_SYMBIAN

#include <hbglobal.h>

#include <hblocaleutil.h>

#if defined(Q_OS_SYMBIAN)

#define LANGUAGE_LIST_FILE "/resource/hbi18n/translations/language_list.txt"

#define LANGUAGE_MAPPINGS_FILE "/resource/hbi18n/translations/locale_mappings.txt"

#define LANGUAGE_TRANSLATOR_PATH "/resource/hbi18n/translations/languages"

#define REGION_LIST_FILE "z:/resource/bootdata/regions.txt"

#define REGION_TRANSLATOR_PATH "/resource/hbi18n/translations/regions"

#define REGION_DLL_PREFIX "elocl_reg."

#define COLLATION_LIST_FILE "z:/resource/bootdata/collations.txt"

#define COLLATION_TRANSLATOR_PATH "/resource/hbi18n/translations/collations"

#define COLLATION_DLL_PREFIX "elocl_col."

#define COLLATION_DLL_PREFIX_POSITION 3

#endif // Q_OS_SYMBIAN

/*!

    @beta

    @hbcore

    \class HbLocaleUtil

*/

#if defined(Q_OS_SYMBIAN)

struct HbLocaleMapping

{

    int symLangValue;

    QString languageDllId;

    QString collationDllId;

    QString regionDllId;

    QString langName;

    QString regName;

    QString collName;

};

QList<HbLocaleMapping> mappingList;

QList<int> regions;

QStringList availRegions;

QHash<QString, QString> locRegionNames;

QList<int> collations;

QStringList availCollations;

QHash<QString, QString> locCollationNames;

/*!

*/

void readMappings()

{

    QString path = "c:";

    path += QString(LANGUAGE_MAPPINGS_FILE);

    QFile* file = new QFile(path);

    if (!file->exists() ) {

        path = "z:";

        path += QString(LANGUAGE_MAPPINGS_FILE);

        delete file;

        file = new QFile(path);

    }

    if (!file->open(QIODevice::ReadOnly | QIODevice::Text)) {

        delete file;

        return;

    }

    QTextStream in(file);

    while (!in.atEnd()) {

        QString line = in.readLine(256);

        if (!line.isEmpty()) {

            QStringList list = line.split(',', QString::SkipEmptyParts);

            if (list.count() < 7) {

                continue;

            }

            QString strCode = list[0];

            QString strLang = list[1];

            QString strRegion = list[2];

            QString strCollation = list[3];

            QString lanName = list[4]; //en_GB

            QString region = list[5]; //en_GB

            QString collation = list[6]; //en_GB

            bool ok;

            int code = strCode.toUInt(&ok);

            if (!ok) {

                continue;

            }

            HbLocaleMapping map;

            map.symLangValue = code;

            map.languageDllId = strLang;

            map.collationDllId = strCollation;

            map.regionDllId = strRegion;

            map.langName = lanName;

            map.regName = region;

            map.collName = collation;

            mappingList.append(map);

        }

    }

    delete file;

    return;

}

#endif // Q_OS_SYMBIAN

#if defined(Q_OS_SYMBIAN)

/*!

*/

bool setLocale( const QString &dllExtension )

{

    TExtendedLocale dummy;

    dummy.LoadSystemSettings();

    QString name = QString( "elocl_lan." ).append( dllExtension );

    TPtrC nameptr(name.utf16());

    TInt err = dummy.LoadLocaleAspect( nameptr );

    if( err != KErrNone )

        return false;

    dummy.SaveSystemSettings();

    // cause localeprivate update on next qlocale object( glp->m_language_id = 0 )

    QSystemLocale dummy2;

    return true;

}

#endif //Q_OS_SYMBIAN

/*!

*/ 

QString HbLocaleUtil::currentLanguage()

{

#if defined(Q_OS_SYMBIAN)

    TLanguage l = User::Language();

    if(mappingList.isEmpty()) {

        readMappings();

    }

    for (int i = 0; i < mappingList.count(); ++i) {

        HbLocaleMapping mapping = mappingList.at(i);

        if (mapping.symLangValue == l) {

            return mapping.langName;

        }

    }

#endif

   return QString();

}

/*!

*/

QStringList HbLocaleUtil::supportedLanguages()

{

#if defined(Q_OS_SYMBIAN)   

    QStringList languages; 

    CArrayFixFlat<TInt>* systemEpocLanguageCodes = 0;

    TInt error = SysLangUtil::GetInstalledLanguages( systemEpocLanguageCodes );

    if ( error != KErrNone ) {

        delete systemEpocLanguageCodes;

        return languages;

    }

    if(mappingList.isEmpty()) {

        readMappings();

    }

    for (int i = 0; i < systemEpocLanguageCodes->Count(); ++i) {

        int code = systemEpocLanguageCodes->At(i);

        for (int j = 0; j < mappingList.count(); ++j) {

            HbLocaleMapping map = mappingList.at(j);

            if (map.symLangValue == code) {

                languages.append(map.langName);

                break;

            }

        }

    }

    delete systemEpocLanguageCodes;

    return languages;

#else 

    return QStringList();

#endif

}

/*!

*/ 

QString HbLocaleUtil::localisedLanguageName( const QString &language )

{

#if defined(Q_OS_SYMBIAN)   

    QTranslator translator;

    QString path = "c:";

    path += QString(LANGUAGE_TRANSLATOR_PATH);

    if (!translator.load(path)) {

        path = "z:";

        path += QString(LANGUAGE_TRANSLATOR_PATH);

        if (!translator.load(path)) {

            return QString("");

        } 

    } 

    QCoreApplication::installTranslator(&translator);

    QString languageName = QString(LANGUAGE_ID_PREFIX);

    languageName += '_';

    languageName += language;

    QString translated = hbTrId(languageName.toAscii().constData());  

    if (translated == languageName) {

        return QString("");

    }

    return translated;

#else 

    Q_UNUSED(language); 

    return QString();

#endif

}

/*!

*/ 

bool HbLocaleUtil::changeLanguage( const QString &language )

{

#if defined(Q_OS_SYMBIAN)

    if(mappingList.isEmpty()) {

        readMappings();

    }

    int lanCode = -1;

    QString dllExt = "";

    for (int i = 0;  i < mappingList.count(); ++i) {

        HbLocaleMapping map = mappingList.at(i);

        if (map.langName == language) {

            lanCode = map.symLangValue;

            dllExt = map.languageDllId;

            break;

        }

    }

    if (lanCode == -1) {

        return false;

    }

    CRepository* commonEngineRepository = 0;

    TRAPD( err1, commonEngineRepository = CRepository::NewL( KCRUidCommonEngineKeys ) );    

    if ( err1 != KErrNone ) { 

        return false;

    }

    if (!setLocale(dllExt)) {

        delete commonEngineRepository;

        return false;

    }

    // Never set Language code 0 to HAL

    if ( language !=0 ) {

        if ( HAL::Set( HAL::ELanguageIndex, lanCode ) != KErrNone ) {

            delete commonEngineRepository;

            return false;

        }

    }

    if ( commonEngineRepository->Set( KGSDisplayTxtLang, lanCode ) != KErrNone ) {

        delete commonEngineRepository;

        return false;

    }

    delete commonEngineRepository;

    return true;

#else

    Q_UNUSED(language);

    return false;

#endif

}

#if defined(Q_OS_SYMBIAN)  

/*!

    \brief reads the regions.txt file and reads the list of symbian region codes 

*/

void readRegions()

{

    QFile* file = new QFile(REGION_LIST_FILE);

    if (!file->exists() ) 

    {

        delete file;

        return;

    }

    if (!file->open(QIODevice::ReadOnly | QIODevice::Text))

    {

        delete file;

        return;

    } 

    QTextStream in(file);

    while (!in.atEnd())

    {

        QString line = in.readLine(256);

        if (!line.isEmpty())

        {

            int regCode = line.toUInt();

            regions.append(regCode);

        }

    }

    return;

}

#endif

/*!

*/

QStringList HbLocaleUtil::supportedRegions()

{

#if defined(Q_OS_SYMBIAN)

    if(!availRegions.isEmpty())

    {

        return availRegions;

    }

    if(regions.isEmpty())

    {

        readRegions();

    }

    if(mappingList.isEmpty())

    {

        readMappings();

    }

    int regCount = regions.count();

    for(int i = 0; i < regCount; i++)

    {

        int region = regions.at(i);

        int count = mappingList.count();

        for (int j = 0; j < count; j++)

        {

            HbLocaleMapping mapping = mappingList.at(j);

            QString regCode = mapping.regionDllId;

            if(region == regCode.toUInt())

            {

                availRegions.append(mapping.regName);

                break;

            }

        }

    }

    return availRegions;

#else

    return QStringList();

#endif

}

/*!

*/ 

QString HbLocaleUtil::localisedRegionName( const QString &region ) 

{

#if defined(Q_OS_SYMBIAN)       

    if(locRegionNames.isEmpty())

    {

        QTranslator translator;

        QString path = "c:";

        path += QString(REGION_TRANSLATOR_PATH);

        if (!translator.load(path)) {

            path = "z:";

            path += QString(REGION_TRANSLATOR_PATH);

            if (!translator.load(path)) {

                return QString("");

            } 

        } 

        QCoreApplication::installTranslator(&translator);

        if(mappingList.isEmpty()) 

        {

            readMappings();

        }

        int cnt = mappingList.count();

        for(int i = 0 ; i < cnt; i++ )

        {

            HbLocaleMapping map = mappingList.at(i);

            QString regionName = QString(REGION_ID_PREFIX);

            regionName += '_';

            regionName += map.regName;