// Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).

// All rights reserved.

// This component and the accompanying materials are made available

// under the terms of "Eclipse Public License v1.0"

// which accompanies this distribution, and is available

// at the URL "http://www.eclipse.org/legal/epl-v10.html".

//

// Initial Contributors:

// Nokia Corporation - initial contribution.

//

// Contributors:

//

// Description:

//

#include <baclipb.h>

#include <f32file.h>

#include <s32strm.h>

#include <s32file.h>

#include <e32lang.h>

#include <langutil.h>

#include "LangUtilImpl.h"

#include "T_LangUtilsTestShareFunc.h"

#include "t_langutils.h"

#define test(cond)                                          \

    {                                                       \

    TBool __bb = (cond);                                    \

    TEST(__bb);                                             \

    if (!__bb)                                              \

        {                                                   \

        ERR_PRINTF1(_L("ERROR: Test Failed"));              \

        User::Leave(1);                                     \

        }                                                   \

    }

// File names for copying

const TPtrC KSystem1Folder              =_L("C:\\System1\\");

const TPtrC KSystem1Data1Folder         =_L("C:\\System1\\data1\\");

const TPtrC KSystem1Data1File1          =_L("C:\\System1\\data1\\file1.txt");

const TPtrC KFile1                      =_L("C:\\file1.txt");

const TPtrC KSystem1Data1SrcFile1       =_L("C:\\System1\\data1\\src\\file1.txt");

const TPtrC KSystem1Data1DstFile2       =_L("C:\\System1\\data1\\dst\\file2.txt");

const TPtrC KSystem1Data1File123456789  =_L("C:\\System1\\data1\\file123456789.txt");

const TPtrC KSystem1Data1File2          =_L("C:\\System1\\data1\\file2.txt");

const TPtrC KSystem1Data1File5          =_L("C:\\System1\\data1\\file5.txt");

const TPtrC KSystem1Data1SrcFolder      =_L("C:\\System1\\data1\\src\\");

const TPtrC KSystem1Data1DstFolder      =_L("C:\\System1\\data1\\dst\\");

const TPtrC KZFile1                     =_L("Z:\\file1.txt");

///////////////////////////////////////////////////////////////////////////////////////

//LangUtil::GetEquivalentLanguageList

//LangUtil::NearestLanguageFileV2 

//test data

_LIT (KNullFilename, "");

_LIT (KRscFilename,  "C:\\geltest.rsc");

_LIT (KRscFilenameNoSuffix,  "C:\\geltest.");

_LIT (KAmericanLang, "C:\\geltest.r10");

_LIT (KFrenchLang,   "C:\\geltest.r02");

_LIT (KJapanEnglishLang, "C:\\geltest.r160");

_LIT (KEnglishLang, "C:\\geltest.r01");

_LIT (KInvalidDriveLetterV2, "q:\\geltest.rsc");

_LIT (KNoSuchLangFile, "c:\\geltest.r54");

//Delete "aFullName" file.

void CT_LANGUTILS::DeleteTestFile(const TDesC& aFullName)

    {

    RFs fsSession;

    TInt err = fsSession.Connect();

    if(err == KErrNone)

        {

        TEntry entry;

        if(fsSession.Entry(aFullName, entry) == KErrNone)

            {

            INFO_PRINTF2(_L("Deleting \"%S\" file.\n"), &aFullName);

            err = fsSession.SetAtt(aFullName, 0, KEntryAttReadOnly);

            if(err != KErrNone)

                {

                INFO_PRINTF3(_L("Error %d changing \"%S\" file attributes.\n"), err, &aFullName);

                }

            err = fsSession.Delete(aFullName);

            if(err != KErrNone)

                {

                INFO_PRINTF3(_L("Error %d deleting \"%S\" file.\n"), err, &aFullName);

                }

            }

        fsSession.Close();

        }

    else

        {

        INFO_PRINTF3(_L("Error %d connecting file session. File: %S.\n"), err, &aFullName);

        }

    }

//Delete "aFullName" dir.

void CT_LANGUTILS::DeleteTestDir(const TDesC& aFullName)

    {

    RFs fsSession;

    TInt err = fsSession.Connect();

    if(err == KErrNone)

        {

        TEntry entry;

        if(fsSession.Entry(aFullName, entry) == KErrNone)

            {

            INFO_PRINTF2(_L("Deleting \"%S\" dir.\n"), &aFullName);

            err = fsSession.SetAtt(aFullName, 0, KEntryAttReadOnly);

            if(err != KErrNone)

                {

                INFO_PRINTF3(_L("Error %d changing \"%S\" dir attributes.\n"), err, &aFullName);

                }

            err = fsSession.RmDir(aFullName);

            if(err != KErrNone)

                {

                INFO_PRINTF3(_L("Error %d deleting \"%S\" dir.\n"), err, &aFullName);

                }

            }

        fsSession.Close();

        }

    else

        {

        INFO_PRINTF3(_L("Error %d connecting file session. Dir: %S.\n"), err, &aFullName);

        }

    }

//Delete data files used by the test

void CT_LANGUTILS::DeleteTestFiles()

    {

        DeleteTestFile(KSystem1Data1File1);

        DeleteTestFile(KFile1);

        DeleteTestFile(KSystem1Data1SrcFile1);

        DeleteTestFile(KSystem1Data1DstFile2);

        DeleteTestFile(KSystem1Data1File123456789);

        DeleteTestFile(KSystem1Data1File2);

        DeleteTestFile(KSystem1Data1File5);

        DeleteTestDir(KSystem1Data1SrcFolder);

        DeleteTestDir(KSystem1Data1DstFolder);

        DeleteTestDir(KSystem1Data1Folder);

        DeleteTestDir(KSystem1Folder);

    }

void CT_LANGUTILS::DeleteTestFiles2(RFs &aFs)

{

    LangUtilsTest::DeleteFile (aFs, KRscFilename);

    LangUtilsTest::DeleteFile (aFs, KAmericanLang);

    LangUtilsTest::DeleteFile (aFs, KFrenchLang);

    LangUtilsTest::DeleteFile (aFs, KJapanEnglishLang);

    LangUtilsTest::DeleteFile (aFs, KEnglishLang);

}

void CT_LANGUTILS::CreateTestFiles2(RFs &aFs)

{

    test(LangUtilsTest::FileExists (aFs, KRscFilename) == EFalse);

    test(LangUtilsTest::FileExists (aFs, KAmericanLang) == EFalse);

    test(LangUtilsTest::FileExists (aFs, KFrenchLang) == EFalse);

    test(LangUtilsTest::FileExists (aFs, KJapanEnglishLang) == EFalse);

    test(LangUtilsTest::FileExists (aFs, KEnglishLang) == EFalse);

    // Create the files...

    RFile rFile;

    test(KErrNone == rFile.Create (aFs, KRscFilename, EFileRead));

    rFile.Close ();

    test(KErrNone == rFile.Create (aFs, KAmericanLang, EFileRead));

    rFile.Close ();

    test (KErrNone == rFile.Create (aFs, KFrenchLang, EFileRead));

    rFile.Close ();

    test(KErrNone == rFile.Create (aFs, KEnglishLang, EFileRead));

    rFile.Close ();

}

///////////////////////////////////////////////////////////////////////////////////////

//Copy test file from Z: to C: drive.

void CT_LANGUTILS::CopyTestFiles()

    {

    RFs fsSession;

    TInt err = fsSession.Connect();

    if(err == KErrNone)

        {

        User::LeaveIfError(fsSession.MkDir(KSystem1Folder));

        User::LeaveIfError(fsSession.MkDir(KSystem1Data1Folder));

        test( LangUtilsTest::CopyFile(fsSession, KZFile1, KSystem1Data1File1) == KErrNone);

        test( LangUtilsTest::CopyFile(fsSession, KZFile1, KFile1) == KErrNone);

        test( LangUtilsTest::CopyFile(fsSession, KZFile1, KSystem1Data1File123456789) == KErrNone);

        test( LangUtilsTest::CopyFile(fsSession, KZFile1, KSystem1Data1File2) == KErrNone);

        test( LangUtilsTest::CopyFile(fsSession, KZFile1, KSystem1Data1File5) == KErrNone);

        User::LeaveIfError(fsSession.MkDir(KSystem1Data1SrcFolder));

        User::LeaveIfError(fsSession.MkDir(KSystem1Data1DstFolder));

        test( LangUtilsTest::CopyFile(fsSession, KZFile1, KSystem1Data1SrcFile1) == KErrNone);

        test( LangUtilsTest::CopyFile(fsSession, KZFile1, KSystem1Data1DstFile2) == KErrNone);

        fsSession.Close();

        }

    else

        {

        INFO_PRINTF2(_L("Error %d connecting file session.\n"), err);

        }

    }

/**

@SYMTestCaseID TI18N-BAFL-CT-4003

@SYMTestCaseDesc Tests Baflutils::TestNearestLanguageFileV2.

@SYMTestPriority Medium

@SYMTestActions Pass in various resource file names and change system locale setting, check the return values.

@SYMTestExpectedResults The test must not fail.

@SYMPREQ 2525 Install device equivalent languages from SIS files

*/

void CT_LANGUTILS::TestNearestLanguageFileV2(RFs& aFs)

    {

    /* test case ID to be added */

    INFO_PRINTF1(_L (" @SYMTestCaseID TI18N-BAFL-CT-4003 "));

    __UHEAP_MARK;

    CleanupClosePushL (aFs);

    User::LeaveIfError (aFs.Connect ());

    DeleteTestFiles2(aFs);

    CreateTestFiles2(aFs);

    TBuf <256> filename;

    TLanguage lang = ELangNone;

    INFO_PRINTF2 (_L("lang initial value is %d\n"), lang);

    // Test NearestLanguageFile with empty name

    TFileName resPath;

    LangUtil::NearestLanguageFileV2(aFs, resPath, lang);

    test(resPath.Length()==0);

    INFO_PRINTF2 (_L("lang returned by NLFV2 is %d\n"), lang);

    test(ELangNone == lang);

    INFO_PRINTF3 (_L ("The NearestLanguageFile for the null file - %S - is - %S -\n"), &KNullFilename, &filename);

    // Test NearestLanguageFile with invalid drive letter

    filename.Copy (KInvalidDriveLetterV2);

    LangUtil::NearestLanguageFileV2(aFs, filename, lang);

    //test(filename==KRscFilenameNoSuffix);

    INFO_PRINTF4 (_L ("The NearestLanguageFile for %S is %S, lang is %d\n"), &KInvalidDriveLetterV2, &filename, lang);

    //test(ELangNone == lang);

    // Test NearestLanguageFile with incorrect ext

    DeleteTestFiles2(aFs);

    RFile rFile;

    test (KErrNone == rFile.Create (aFs, KFrenchLang, EFileRead));

    rFile.Close ();

    filename.Copy (KNoSuchLangFile);

    LangUtil::NearestLanguageFileV2(aFs, filename, lang);

    //test(filename==KRscFilenameNoSuffix);

    INFO_PRINTF4 (_L ("The NearestLanguageFile for %S is %S, lang is %d\n"), &KNoSuchLangFile, &filename, lang);

    //test(ELangNone == lang);

    LangUtilsTest::DeleteFile (aFs, KFrenchLang);

    CreateTestFiles2(aFs);

    // Test NearestLanguageFile with no suffix

    filename.Copy (KRscFilenameNoSuffix);

    LangUtil::NearestLanguageFileV2(aFs, filename, lang);

    test(filename==KRscFilenameNoSuffix);

    INFO_PRINTF3 (_L ("The NearestLanguageFile for %S is %S\n"), &KRscFilenameNoSuffix, &filename);

    test(ELangNone == lang);

    // change locale to American

	/*

    TExtendedLocale loc;

    loc.LoadSystemSettings();

    TInt ret = loc.LoadLocaleAspect(_L ("elocl_lan.010"));

    INFO_PRINTF2(_L("LoadLocale returns %d\n"), ret);

    test(KErrNone == ret);

    ret = loc.SaveSystemSettings();

    test(KErrNone == ret);

    // Test NearestLanguageFile: AmE is supported

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFileV2(aFs, filename, lang);

    INFO_PRINTF3 (_L ("The NearestLanguageFile for %S is %S\n"), &KRscFilename, &filename);

    //test(filename == KEnglishLang);

    test(filename == KAmericanLang);

    test(lang == ELangAmerican);

    // Delete geltest.r10, AmE downgrades to En_GB.

    LangUtilsTest::DeleteFile (aFs, KAmericanLang);

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFileV2(aFs, filename, lang);

    INFO_PRINTF3 (_L ("The NearestLanguageFile for %S is %S\n"), &KRscFilename, &filename);

    test(filename == KEnglishLang);

    test(lang == ELangEnglish);

    // Delete geltest.r01, AmE downgrades to en_GB, to ELangNone.

    LangUtilsTest::DeleteFile (aFs, KEnglishLang);

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFileV2(aFs, filename, lang);

    INFO_PRINTF3 (_L ("The NearestLanguageFile for %S is %S\n"), &KRscFilename, &filename);

    test(filename == KRscFilename); // filename remains unchanged.

    test(lang == ELangNone);

    // restore locale settings

    INFO_PRINTF1(_L("Restoring locale settings.\n"));

    loc.LoadSystemSettings();

    ret = loc.LoadLocaleAspect(_L("elocl_lan.001"));

    test(KErrNone == ret);

    ret = loc.SaveSystemSettings();

    test(KErrNone == ret);

	*/

    CleanupStack::PopAndDestroy (&aFs);

    __UHEAP_MARKEND;

    }

/**

@SYMTestCaseID TI18N-BAFL-CT-4004

@SYMTestCaseDesc Tests Baflutils::TestGetEquivalentLanguageList.

@SYMTestPriority Medium

@SYMTestActions Pass in various language ID's and check the returned list.

@SYMTestExpectedResults The test must not fail.

@SYMPREQ 2525 Install device equivalent languages from SIS files

*/

void CT_LANGUTILS::TestGetEquivalentLanguageList()

    {

    /* test case ID to be added */

    INFO_PRINTF1 (_L (" @SYMTestCaseID TI18N-BAFL-CT-4004 "));

    __UHEAP_MARK;

    TLanguagePath lp;

    // Test GetNearestLanguageFile();

    // 1- There is an entry in the table for the given language

    LangUtil::GetEquivalentLanguageList(ELangCyprusGreek, lp);

    test(ELangCyprusGreek == lp[0]);

    test(ELangGreek == lp[1]);

    test(ELangNone == lp[2]);

    // 2- There is no entry for the given language

    LangUtil::GetEquivalentLanguageList(ELangFarsi, lp);

    test(ELangFarsi == lp[0]);

    test(ELangNone == lp[1]);

    __UHEAP_MARKEND;

    }

/**

@SYMTestCaseID TI18N-BAFL-CT-4004

@SYMTestCaseDesc Tests Baflutils::TestGetDowngradePathL.

@SYMTestPriority Medium

@SYMTestActions Pass in various language ID's and check the returned list.

@SYMTestExpectedResults The test must not fail.

@SYMPREQ 2525 Install device equivalent languages from SIS files

*/

void CT_LANGUTILS::TestGetDowngradePathL()

    {

    RFs fsSession;

    TInt err = fsSession.Connect();

    if(err == KErrNone)

        {

        TLanguage currentLang = ELangPrcChinese;

        RArray<TLanguage> languageArray;

        LangUtil::GetDowngradePathL(fsSession, currentLang,languageArray);

        fsSession.Close();

        test(ELangPrcChinese == languageArray[0]);

        test(1 == languageArray.Count());

        languageArray.Close();

        }

    else

        {

        INFO_PRINTF2(_L("Error %d connecting file session. "), err);

        }

    }

/**

@SYMTestCaseID SYSLIB-BAFL-CT-0038

@SYMTestCaseDesc Tests Baflutils.

@SYMTestPriority Medium

@SYMTestActions Executes all T_baflutils tests.

@SYMTestExpectedResults The test must not fail.

@SYMDEF DEF050397 - Crimson test code improvement to be propagated into MCL

*/

void CT_LANGUTILS::TestLANGUTILS()

    {

    RFs fs;

    CopyTestFiles();

    TestNearestLanguageFileV2(fs);

    TestGetEquivalentLanguageList();

    TestGetDowngradePathL();

    DeleteTestFiles();

    }

CT_LANGUTILS::CT_LANGUTILS()

    {

    SetTestStepName(KTestStep_T_LANGUTILS);

    }

TVerdict CT_LANGUTILS::doTestStepL()

    {

    SetTestStepResult(EFail);

    __UHEAP_MARK;

    TRAPD(error1, TestLANGUTILS());

    __UHEAP_MARKEND;

    if(error1 == KErrNone )

        {

        SetTestStepResult(EPass);

        }

    return TestStepResult();

    }