// 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 <f32file.h>

#include <hal.h>

#include <e32std.h>

#include <langutil.h>

#include "LangUtilImpl.h"

#include "T_LangUtilsTestShareFunc.h"

#include "t_langutilslang.h"

#define test(cond)                                          \

    {                                                       \

    TBool __bb = (cond);                                    \

    TEST(__bb);                                             \

    if (!__bb)                                              \

        {                                                   \

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

        User::Leave(1);                                     \

        }                                                   \

    }

LOCAL_D RFs                 TheFs;

// Our test diectory and files...

_LIT (KNullFilename, "");

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

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

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

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

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

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

LOCAL_C void DeleteTestFiles()

{

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

    ::CleanupClosePushL (TheFs);

    LangUtilsTest::DeleteFile (TheFs, KRscFilename);

    LangUtilsTest::DeleteFile (TheFs, KAmericanLang);

    LangUtilsTest::DeleteFile (TheFs, KFrenchLang);

    LangUtilsTest::DeleteFile (TheFs, KJapanEnglishLang);

    LangUtilsTest::DeleteFile (TheFs, KEnglishLang);

    CleanupStack::PopAndDestroy (&::TheFs);

}

void CT_LANGUTILSLANG::CreateTestFiles()

{

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

    ::CleanupClosePushL (TheFs);

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

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

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

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

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

    // Create the files...

    RFile rFile;

    // KFilename1 can't be created

    rFile.Create (TheFs, KRscFilename, EFileRead);

    rFile.Close ();

    rFile.Create (TheFs, KAmericanLang, EFileRead);

    rFile.Close ();

    rFile.Create (TheFs, KFrenchLang, EFileRead);

    rFile.Close ();

    CleanupStack::PopAndDestroy (&::TheFs);

}

/**

@SYMTestCaseID SYSLIB-BAFL-CT-0070

@SYMTestCaseDesc Tests the configuration of the ideal language.

@SYMTestPriority High

@SYMTestActions  Set the ideal language and look for nearest language files.

@SYMTestExpectedResults The test must not fail.

@SYMREQ 3770: Configurable "ideal language" in LangUtil::NearestLanguageFile.

*/

void CT_LANGUTILSLANG::TestIdeaLang()

    {

    INFO_PRINTF1 (_L (" @SYMTestCaseID SYSLIB-BAFL-CT-0070 TestIdeaLang "));

    __UHEAP_MARK;

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

    ::CleanupClosePushL (TheFs);

    TBuf <256> filename;

    TLanguage language;

    // Test ideal language code

    // Check initial value of ideal language

    language=LangUtil::IdealLanguage();

    test(language == ELangNone);

    // Set and read back the ideal language

    LangUtil::SetIdealLanguage( ELangGerman);

    language=LangUtil::IdealLanguage();

    test(language == ELangGerman);

    LangUtil::SetIdealLanguage( ELangAmerican);

    language=LangUtil::IdealLanguage();

    test(language == ELangAmerican);

    // Test NearestLanguageFile with empty name

    TFileName resPath;

    LangUtil::NearestLanguageFile (TheFs, resPath);

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

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

    // Test NearestLanguageFile with no suffix

    filename.Copy (KRscFilenameNoSuffix);

    LangUtil::NearestLanguageFile (TheFs, filename);

    test(filename==KRscFilenameNoSuffix);

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

    // Test NearestLanguageFile

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFile (TheFs, filename);

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

    test(filename == KAmericanLang);

    // Set ideal language to one we don't have

    LangUtil::SetIdealLanguage( ELangGerman);

    language=LangUtil::IdealLanguage();

    test(language == ELangGerman);

    // Test NearestLanguageFile

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFile (TheFs, filename);

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

    test(filename == KRscFilename);

    // Restore ideal language to default

    LangUtil::SetIdealLanguage( ELangNone);

    language=LangUtil::IdealLanguage();

    test(language == ELangNone);

    // Test NearestLanguageFile

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFile (TheFs, filename);

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

    test(filename == KRscFilename);

    // Set ideal language to French

    LangUtil::SetIdealLanguage( ELangFrench);

    language=LangUtil::IdealLanguage();

    test(language == ELangFrench);

    // Test NearestLanguageFile

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFile (TheFs, filename);

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

    test(filename == KFrenchLang);

    // Restore ideal language to default

    LangUtil::SetIdealLanguage( ELangNone);

    language=LangUtil::IdealLanguage();

    test(language == ELangNone);

    // Release ideal language - free's TLS

    LangUtil::ReleaseIdealLanguage();

    CleanupStack::PopAndDestroy (&::TheFs);

    __UHEAP_MARKEND;

    }

/**

@SYMTestCaseID SYSLIB-BAFL-CT-0071

@SYMTestCaseDesc Tests the overload of LangUtil::NearestLanguageFile.

@SYMTestPriority High

@SYMTestActions  Calls the overload of LangUtil::NearestLanguageFile and checks the returned language.

@SYMTestExpectedResults The test must not fail.

@SYMREQ 3785: Overload of LangUtil::NearestLanguageFile.

*/

void CT_LANGUTILSLANG::TestNearestLang()

    {

    INFO_PRINTF1 (_L (" @SYMTestCaseID SYSLIB-BAFL-CT-0071 TestNearestLang "));

    __UHEAP_MARK;

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

    ::CleanupClosePushL (TheFs);

    TBuf <256> filename;

    TLanguage language;

    // Ensure that ideal language is default

    LangUtil::SetIdealLanguage( ELangNone);

    language=LangUtil::IdealLanguage();

    test(language == ELangNone);

    // Test NearestLanguageFile overload with language returned

    language=ELangAmerican;

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFile (TheFs, filename, language);

    INFO_PRINTF4(_L ("The NearestLanguageFile for %S is %S, language = %d\n"), &KRscFilename, &filename, language);

    test(language == ELangNone);

    test(filename == KRscFilename);

    // Set ideal language to American

    LangUtil::SetIdealLanguage( ELangAmerican);

    language=LangUtil::IdealLanguage();

    test(language == ELangAmerican);

    // Test NearestLanguageFile overload with language returned

    language=ELangNone;

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFile (TheFs, filename, language);

    INFO_PRINTF4 (_L ("The NearestLanguageFile for %S is %S, language = %d\n"), &KRscFilename, &filename, language);

    test(language == ELangAmerican);

    test(filename == KAmericanLang);

    // Set ideal language to French

    LangUtil::SetIdealLanguage( ELangFrench);

    language=LangUtil::IdealLanguage();

    test(language == ELangFrench);

    // Test NearestLanguageFile overload with language returned

    language=ELangNone;

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFile (TheFs, filename, language);

    INFO_PRINTF4 (_L ("The NearestLanguageFile for %S is %S, language = %d\n"), &KRscFilename, &filename, language);

    test(language == ELangFrench);

    test(filename == KFrenchLang);

    // Set ideal language to one we don't have

    LangUtil::SetIdealLanguage( ELangGerman);

    language=LangUtil::IdealLanguage();

    test(language == ELangGerman);

    // Test NearestLanguageFile overload with language returned

    language=ELangAmerican;

    filename.Copy (KRscFilename);

    LangUtil::NearestLanguageFile (TheFs, filename, language);

    INFO_PRINTF4 (_L ("The NearestLanguageFile for %S is %S, language = %d\n"), &KRscFilename, &filename, language);

    test(language == ELangNone);

    test(filename == KRscFilename);

    // Restore ideal language to default

    LangUtil::SetIdealLanguage( ELangNone);

    language=LangUtil::IdealLanguage();

    test(language == ELangNone);

    // Release ideal language - free's TLS

    LangUtil::ReleaseIdealLanguage();

    CleanupStack::PopAndDestroy (&::TheFs);

    __UHEAP_MARKEND;

    }

void CT_LANGUTILSLANG::TestLANGUTILSLANG ()

    {

    CreateTestFiles();

    TestIdeaLang ();

    TestNearestLang ();

    DeleteTestFiles();

    }

CT_LANGUTILSLANG::CT_LANGUTILSLANG()

    {

    SetTestStepName(KTestStep_T_LANGUTILSLANG);

    }

TVerdict CT_LANGUTILSLANG::doTestStepL()

    {

    SetTestStepResult(EFail);

    __UHEAP_MARK;

    TRAPD(error1, TestLANGUTILSLANG());

    __UHEAP_MARKEND;

    if(error1 == KErrNone )

        {

        SetTestStepResult(EPass);

        }

    return TestStepResult();

    }