/*

* Copyright (c) 2005 Nokia Corporation and/or its subsidiary(-ies). 

* All rights reserved.

* This component and the accompanying materials are made available

* which accompanies this distribution, and is available

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description: 

*   ?description_line

*

*/

//  INCLUDES

#include "FT_CPosTp105.h"

#include <EPos_CPosLandmarkDatabase.h>

#include "FT_LandmarkConstants.h"

#include <centralrepository.h>

#include <bautils.h>

// CONSTANTS

_LIT(KResourceFileROM, "z:\\resource\\eposlmdefaultdbname.R");

_LIT(KResourceFile, "c:\\resource\\eposlmdefaultdbname.R");

_LIT(KResourceFileCOPY, "c:\\resource\\COPY_eposlmdefaultdbname.R");

#ifdef __WINS__

	_LIT(KResourceFileTEST, "z:\\system\\test\\testdata\\tp105_eposlmdefaultdbname.R");

#else

	_LIT(KResourceFileTEST, "c:\\system\\test\\testdata\\tp105_eposlmdefaultdbname.R");

#endif

_LIT(KDefaultName_En, "TP105 Default Landmarks");

_LIT(KDefaultName_Sw, "Mina små landmarks");

_LIT(KEnglish, "English");

_LIT(KSwedish, "Swedish");

// ================= MEMBER FUNCTIONS =======================

// ---------------------------------------------------------

// CPosTp105::StartL

//

// (other items were commented in a header).

// ---------------------------------------------------------

//

void CPosTp105::StartL()

    {

#ifdef __WINS__

    _LIT(KNotSupported, "Test case is not supported on WINS, execute on target!");

    LogErrorAndLeave(KNotSupported);

#endif

    _LIT(KCancelled, "Test cancelled");

    _LIT(KLangChanged, "Have you changed the language to swedish in the phone ? (Should be English currently.)");

    _LIT(KChangeLang, "Change language to Swedish in phone (you will need to reboot the phone)");

    _LIT(KWrongLanguageEnglish, "Wrong language on phone, should be English");

    _LIT(KWrongLanguageSwedish, "Wrong language on phone, should be Swedish");

    /*

LMREQ200: Display Name for Default Database

If the display name has not been set for the default database, 

a localized default display name shall be used. The localized display name 

is read from a resource file and it is language dependent. 

If the user changes language for the phone, the localized display name shall change accordingly.

*/

    TUtfwUserAnswer answer = iUserInfo->ShowDialog(KLangChanged, EUtfwDialogTypeYesNo, EFalse);

    //TUtfwUserAnswer answer = EUtfwUserAnswerNo;

    if(answer == EUtfwUserAnswerNo)

        {

        RemoveAllLmDatabasesL();

        // Copy the default display name resource file with english name to

        // c:\\resource

        // This file should be used when language is english

		CopyResourceFileL(_L("01"));

        // Create a database and set it to be default

        // Since the display name has not been set for this db it should be read

        // from localiased resource file

        _LIT(KDB, "TP105_Db.ldb");

        iDbMan = CPosLmDatabaseManager::NewL();

        HPosLmDatabaseInfo* dbInfo01 = HPosLmDatabaseInfo::NewLC(KDB);

        iDbMan->CreateDatabaseL(*dbInfo01);

        CleanupStack::PopAndDestroy(dbInfo01);

        iDbMan->SetDefaultDatabaseUriL(KDB);

        delete iDbMan;

        iDbMan = NULL;

        TBuf<50> buf;

		TInt lang = User::Language();

		buf.Format(_L("***** Language %d ******"), lang);

		iLog->Put(buf);

		if (lang != 1) 

		    {

		    LogErrorAndLeave(KWrongLanguageEnglish, KErrGeneral);

		    }

		CheckDisplayNameL(KEnglish, KDefaultName_En);

	    answer = iUserInfo->ShowDialog(KChangeLang, EUtfwDialogTypeOkCancel, EFalse);

	    //answer = EUtfwUserAnswerOk;

        AssertTrueSecL(answer == EUtfwUserAnswerOk, KCancelled, KErrCancel);

        }

    else

        {

        TInt lang = User::Language();

		TBuf<50> buf;

		buf.Format(_L("***** Language %d ******"), lang);

		iLog->Put(buf);

		if (lang != 6)

		    {

		    LogErrorAndLeave(KWrongLanguageSwedish, KErrGeneral);

		    }

        // Copy the default display name resource file with swedish name to

        // c:\\resource

        // This file should be used when language is changed into swedish

		CopyResourceFileL(_L("06"));

        CheckDisplayNameL(KSwedish, KDefaultName_Sw);

        _LIT(KTestSucceeded, "Localization test for displayname succeeded!");

        //iUserInfo->ShowDialog(KTestSucceeded, EUtfwDialogTypeOk, EFalse);

        // Remove both swedish and english test resource files

		// used in this test, also restores the original resource files

		RemoveResourceFileL(_L("01"));

		RemoveResourceFileL(_L("06"));

		iLog->Put(KTestSucceeded);

        }

    }

// ---------------------------------------------------------

// CPosTp105::CheckDisplayNameL

//

// (other items were commented in a header).

// ---------------------------------------------------------

//

void CPosTp105::CheckDisplayNameL(const TDesC& aLanguage, const TDesC& aDisplayName)

    {

    iLog->Put(_L("CheckDisplayNameL"));

    _LIT(KQuestionFormat, "Does the language look like %S?: %S");

    _LIT(KErrLangError, "The language of the displayname is not correct.");

    _LIT(KMatchCriteria, "://");

    _LIT(KErrMatch, "Error. Displayname matches filename.");

	_LIT(KErrMatchUri, "Error. Displayname matches URI.");

	_LIT(KErrMatchDisplay, "Error. Displayname does not match localised name");

    // Get the display name:

	iDbMan = CPosLmDatabaseManager::NewL();

	HBufC* defaultUri = iDbMan->DefaultDatabaseUriLC();

	HPosLmDatabaseInfo* dbInfo = HPosLmDatabaseInfo::NewLC(defaultUri->Des());

	iDbMan->GetDatabaseInfoL(*dbInfo);

    TPosLmDatabaseSettings settings = dbInfo->Settings();

    TPtrC defaultDisplayName = settings.DatabaseName();

    CleanupStack::PopAndDestroy(dbInfo);

	TInt stringPos = defaultUri->Find(KMatchCriteria);

	TBuf<50> uriFileName = defaultUri->Right(defaultUri->Length() - (stringPos + 5));

	AssertTrueSecL(uriFileName != defaultDisplayName, KErrMatch);

	AssertTrueSecL(defaultUri->Des() != defaultDisplayName, KErrMatchUri);

	AssertTrueSecL(defaultDisplayName.CompareC(aDisplayName) == 0, KErrMatchDisplay);

	iLog->Put(defaultDisplayName);

	iLog->Put(uriFileName);

	iLog->Put(defaultUri->Des());

	TBuf<100> question;

	question.Format(KQuestionFormat, &aLanguage, &defaultDisplayName);

	TUtfwUserAnswer answer = iUserInfo->ShowDialog(question, EUtfwDialogTypeYesNo, EFalse);

	CleanupStack::PopAndDestroy(defaultUri);

	//TUtfwUserAnswer answer = EUtfwUserAnswerYes;

	AssertTrueSecL(answer == EUtfwUserAnswerYes, KErrLangError);

	delete iDbMan;

    iDbMan = NULL;

    }

// ---------------------------------------------------------

// CPosTp105::CloseTest

//

// (other items were commented in a header).

// ---------------------------------------------------------

//

void CPosTp105::CloseTest()

	{

	iLog->Put(_L("CloseTest"));

	delete iDbMan;

    iDbMan = NULL;

	}

// ---------------------------------------------------------

// CPosTp105::CopyResourceFileL

// 

// (other items were commented in a header).

// ---------------------------------------------------------

//

void CPosTp105::CopyResourceFileL(const TDesC& aResourceNr)

    {

	iLog->Put(_L("CopyResourceFileL"));

    RFs fs;

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

    CleanupClosePushL(fs);

    CFileMan* fileMan = CFileMan::NewL(fs);

    CleanupStack::PushL(fileMan);

	TBuf<55> pathROM;

	TBuf<55> pathWINS;

	TBuf<55> pathCOPY;

	TBuf<55> pathTEST;

	pathROM.Append(KResourceFileROM);

	pathWINS.Append(KResourceFile);

	pathCOPY.Append(KResourceFileCOPY);

	pathTEST.Append(KResourceFileTEST);

	pathROM.Append(aResourceNr);

	pathWINS.Append(aResourceNr);

	pathCOPY.Append(aResourceNr);

	pathTEST.Append(aResourceNr);

	iLog->Put(pathROM);

    //check if landmark is flashed

	if (!BaflUtils::FileExists(fs, pathROM))

		{

        iLog->Put(_L("Landmark is NOT flashed, rename resource file"));

        //Landmark is not flashed rename the file before copy a own defiend file.

        //since landmark is not flashed the file should exist hence leaving if it is not found!	

		iLog->Put(pathWINS);

		iLog->Put(pathCOPY);

		TInt err = fileMan->Rename(pathWINS, pathCOPY, CFileMan::EOverWrite);

		if (err != KErrNone && err != KErrNotFound)

			iLog->Put(_L("Problem renaming original global categories file"));

        }

     else

        {

        iLog->Put(_L("Landmark is flashed, copy resource file"));

        }

	iLog->Put(pathTEST);

	iLog->Put(pathWINS);

    User::LeaveIfError(fileMan->Copy(pathTEST, pathWINS, CFileMan::EOverWrite));

    CleanupStack::PopAndDestroy(2, &fs);

	iLog->Put(_L("CopyResourceFileL Done"));

    }

// ---------------------------------------------------------

// CPosTp105::RemoveResourceFileL

//

// (other items were commented in a header).

// ---------------------------------------------------------

//

void CPosTp105::RemoveResourceFileL(const TDesC& aResourceNr)

    {

	iLog->Put(_L("RemoveResourceFileL"));

    RFs fs;

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

    CleanupClosePushL(fs);

    CFileMan* fileMan = CFileMan::NewL(fs);

    CleanupStack::PushL(fileMan);

	TBuf<55> pathROM;

	TBuf<55> pathWINS;

	TBuf<55> pathCOPY;

	TBuf<55> pathTEST;

	pathROM.Append(KResourceFileROM);

	pathWINS.Append(KResourceFile);

	pathCOPY.Append(KResourceFileCOPY);

	pathTEST.Append(KResourceFileTEST);

	pathROM.Append(aResourceNr);

	pathWINS.Append(aResourceNr);

	pathCOPY.Append(aResourceNr);

	pathTEST.Append(aResourceNr);

    //check if the default display name resource file exist in rom

    //if landmarks is flashed it is just okej to remove

    // file in on the c drive.

	iLog->Put(pathROM);

    if (BaflUtils::FileExists(fs, pathROM))

       {

        iLog->Put(_L("Landmark is flashed, delete resource file"));

        //in this case it is same just to remove it form c if it exists:

		iLog->Put(pathWINS);

        if (BaflUtils::FileExists(fs, pathWINS))

            {

            User::LeaveIfError(fileMan->Delete(pathWINS));

            }

        }

    else

        {

        iLog->Put(_L("Landmark is NOT flashed, delete resource file and rename the old file"));

        //If a copy exist this should be used, but if it does not

        //exist the file is not removed since it is hard to know

        //if anything has gone wrong.

		iLog->Put(pathCOPY);

		iLog->Put(pathWINS);

        if(BaflUtils::FileExists(fs, pathCOPY))

            {

            //first delete the used file, if it exist

            if (BaflUtils::FileExists(fs, pathWINS))

                {

                User::LeaveIfError(fileMan->Delete(pathWINS));

                }

            //Rename the copy file

            User::LeaveIfError(fileMan->Rename(pathCOPY, pathWINS, CFileMan::EOverWrite));

            }

        }  

    CleanupStack::PopAndDestroy(2);

	iLog->Put(_L("RemoveResourceFileL Done"));

    }

//  End of File