/*

* 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_CPosTp55.h"

#include "FT_LandmarkConstants.h"

//#include <eposlmintservices.rsg>

#include <centralrepository.h>

#include <UiklafInternalCRKeys.h>

#include <utfw.h>

#include <f32file.h>

#include <coemain.h>

#include <EPos_CPosLandmarkEncoder.h>

#include <EPos_CPosLandmarkParser.h>

#include <barsread.h>

#include <bautils.h>

// CONSTANTS

_LIT(KFile1, "c:\\documents\\Tp55_1.txt");

_LIT(KFile2, "c:\\documents\\Tp55_2.txt");

_LIT(KFile3, "c:\\documents\\Tp55_3.txt");

const TInt KOneK = 1024;

const TInt KNrOfLandmarksToExport = 10;

//_LIT(KPosResourceFile, "\\resource\\eposlmintservices.rsc");

#ifdef __WINS__

_LIT(KXmlInputFile, "z:\\system\\test\\testdata\\TP55-DiskFullDuringExportImport.xml"); 

#else

_LIT(KXmlInputFile, "c:\\system\\test\\testdata\\TP55-DiskFullDuringExportImport.xml"); 

#endif

_LIT(KXmlOutputFile, "c:\\documents\\TP55-ExportedLandmarks.xml"); 

_LIT(KXmlBufferDumpFile, "c:\\documents\\BufferDump.xml");

_LIT(KInternalServicesResFileRom, "z:\\resource\\eposlmintservices.rsc");

_LIT(KInternalServicesResFileBackup, "c:\\resource\\copy_of_eposlmintservices.rsc");

_LIT(KInternalServicesResFileCdrive, "c:\\resource\\eposlmintservices.rsc");

//_LIT(KInternalServicesLargeResFile, "c:\\system\\test\\testdata\\eposlmintservices_453KB.rsc");

//_LIT(KInternalServicesSmallResFile, "c:\\system\\test\\testdata\\eposlmintservices_198KB.rsc");

// Approx 2141 bytes

_LIT8(KNonsense, "nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense\

sensenonsensenonsensenonsensenonsensenonsensenonsense");

_LIT8(K64B, "nonsensenonsensenonsensenonsensenonsensenonsensenonsensenonsense");

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

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

// CPosTp55::GetName

//

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

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

//

void CPosTp55::GetName(TDes& aName) const

    {

    _LIT(KTestName, "Tp55 - Disk Full Checking during Import/Export");

    aName = KTestName;

    }

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

// CPosTp55::CloseTest

//

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

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

//

void CPosTp55::CloseTest()

    {

    delete iDatabase;

    iDatabase = NULL;

    delete iOperationWrapper;

    delete iLandmarkEncoder;

    delete iLandmarkParser;

    delete iOutputBuffer;

    delete iInputBuffer;

    iFile1.Close();

    iFile2.Close();

    iFile3.Close();

    iFileServer.Delete(KFile1);

    iFileServer.Delete(KFile2);

    iFileServer.Delete(KFile3);

    //TryRestoreResourceFile();

    iXmlOutputFile.Close();

    iFileServer.Delete(KXmlOutputFile);

    iFileServer.Delete(KXmlBufferDumpFile);

    iFileServer.Close();

    }

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

// CPosTp55::InitTestL

//

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

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

//

void CPosTp55::InitTestL()

    {

    // File setup, create two files

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

    // Try to restore if previous execution of Tp55 panicked or was killed.

    //TryRestoreResourceFile();

    iOperationWrapper = new (ELeave) CActiveLmOperation(iLog);

    }

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

// CPosTp55::StartL

//

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

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

//

void CPosTp55::StartL()

    {

    // Retreive threshold from centralrepository

    CRepository* repository = CRepository::NewLC(KCRUidUiklaf);

    User::LeaveIfError(repository->Get(KUikOODDiskCriticalThreshold, iCriticalThreshold));

    CleanupStack::PopAndDestroy(repository);

    // Test import/export LMs when critical level is set to MLFW defined value.

    InitiateCriticalLevelL();

    TestCriticalLevelL();

/*

    // Test import/export LMs when critical level is set to a large value.

    iLog->Put(_L("\r\nRedefining critical level to 453 KB and running all tests again...."));

    CopyResourceFileL(KInternalServicesLargeResFile);

    InitiateCriticalLevelL();

    TestCriticalLevelL();

    // Test import/export LMs when critical level is set to a small value.

    iLog->Put(_L("\r\nRedefining critical level to 198 KB and running all tests again...."));

    CopyResourceFileL(KInternalServicesSmallResFile);

    InitiateCriticalLevelL();

    TestCriticalLevelL();

    */

    }

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

// CPosTp55::NotifyProgress

//

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

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

//

void CPosTp55::NotifyProgress(TReal aProgress)

    {

    iProgress = (TInt) (aProgress * 100);

//    iMsg.Format(_L("Progress = %d"), iProgress);

//    iLog->Put(iMsg);

//    LogVolumeInfoL();

    }

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

// CPosTp55::TestCriticalLevelL

//

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

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

//

void CPosTp55::TestCriticalLevelL()

    {

    // Restore disk space

    RecreateAndOpenFilesL();

    // ************ 1. Open database ************

    delete iDatabase;

    iDatabase = NULL;

    iDatabase = UseGeneratedDbFileL();

    if (iDatabase->IsInitializingNeeded())

       {

       ExecuteAndDeleteLD(iDatabase->InitializeL());

       }

    // ************ 2. Fill up disk space ************

    iLog->Put(_L("Consuming disk space..."));

    ConsumeDiskSpaceL(iFile1, iCriticalLevel + 3 * KOneK);

    LogVolumeInfoL();

//// Test importing landmarks

    iLog->Put(_L("Testing Importing..."));

    iLog->Put(_L("-- Testing import below critical level"));

    TBool testBeyondCriticalLevel = ETrue;

    ImportLandmarksTestL(!testBeyondCriticalLevel);

    // ************ 11. Repeat steps 3-10 ************

    iLog->Put(_L("\r\n-- Testing import beyond critical level"));

    ExecuteAndDeleteLD(iDatabase->CompactL());

    iLog->Put(_L("Consuming disk space..."));

    User::LeaveIfError(iFile2.Create(iFileServer, KFile2, EFileWrite));

    ConsumeDiskSpaceL(iFile2, iSizeLimit2);

    LogVolumeInfoL();

    ImportLandmarksTestL(testBeyondCriticalLevel);

    // Restore disk space

    RecreateAndOpenFilesL();

    // Use suitable database for exporting LMs

    delete iDatabase;

    iDatabase = NULL;

    iDatabase = UseGeneratedDbFileL();

    if (iDatabase->IsInitializingNeeded())

       {

       ExecuteAndDeleteLD(iDatabase->InitializeL());

       }

    // ************ 12. Fill up disk space ************

    iLog->Put(_L("Consuming disk space..."));

    ConsumeDiskSpaceL(iFile1, iSizeLimit1);

    LogVolumeInfoL();

//// Test importing landmarks

    iLog->Put(_L("Testing Exporting..."));

    ExportLandmarksTestL();

    }

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

// CPosTp55::RecreateAndOpenFilesL

//

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

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

//

void CPosTp55::RecreateAndOpenFilesL()

    {

    iLog->Put(_L("Removing large files..."));

    // Delete files

    iFile1.Close();

    iFileServer.Delete(KFile1);

    iFile2.Close();

    iFileServer.Delete(KFile2);

    iFile3.Close();

    iFileServer.Delete(KFile3);

    // Create and open files

    User::LeaveIfError(iFile1.Create(iFileServer, KFile1, EFileWrite));

    User::LeaveIfError(iFile2.Create(iFileServer, KFile2, EFileWrite));

    User::LeaveIfError(iFile3.Create(iFileServer, KFile3, EFileWrite));

    }

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

// CPosTp55::ExportLandmarksTestL

//

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

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

//

void CPosTp55::ExportLandmarksTestL()

    {

    TInt result(0);

    TBool doAddAllLandmarks = ETrue;

    TBool doExecuteIncrementally = ETrue;

//// Testing Disk full during addition of LMs to encoder

    iLog->Put(_L("\r\n--- Testing Disk full during addition of LMs to encoder"));

    // 13. ************ Export to file using encoder stand-alone ************

    iLog->Put(_L("------ Export to file incrementally using encoder stand-alone"));

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    AddLandmarksToEncoderL(doAddAllLandmarks);

    // ************ Export to buffer incrementally using encoder stand-alone ************

//    iLog->Put(_L("------ Export to buffer incrementally using encoder stand-alone"));

// Not tested here since it does not result in KErrDiskFull but in KErrNoMemory. Time-consuming test

/*    ReInitializeEncoderEtcL();

    delete iOutputBuffer;

    iOutputBuffer = NULL;

    iOutputBuffer = iLandmarkEncoder->SetUseOutputBufferL();

    AddCollectionDataToEncoderL();

    while (result == KErrNone)

        {

        TRAP(result, AddLandmarksToEncoderL(!doAddAllLandmarks));

        iMsg.Format(_L("Size of output buffer: %d"), iOutputBuffer->Size());

        iLog->Put(iMsg);

        }

    iMsg.Format(_L("Export to buffer left with error code %d"), result);

    iLog->Put(iMsg);

    */

//// Testing Disk full during ExportLandmarksL()

    iLog->Put(_L("\r\n--- Testing Disk full during ExportLandmarksL()"));

    // Create array of all IDs in database

    RArray<TPosLmItemId> itemIds;

    CleanupClosePushL(itemIds);

    PopulateArrayL(itemIds, doAddAllLandmarks);

    // ************ 14. Export to file incrementally using ExportLandmarksL() ************

    iLog->Put(_L("------ Export to file incrementally using ExportLandmarksL()"));

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    ExportWithExportLandmarksMethodL(itemIds, doExecuteIncrementally);

    // ************ 15. Export to file synchronously using ExportLandmarksL() ************

    iLog->Put(_L("------ Export to file synchronously using ExportLandmarksL()"));

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    ExportWithExportLandmarksMethodL(itemIds, !doExecuteIncrementally);

    // ************ Export to buffer incrementally using ExportLandmarksL() ************

//    iLog->Put(_L("------ Export to buffer incrementally using ExportLandmarksL()"));

// Not tested here since it does not result in KErrDiskFull but in KErrNoMemory. Time-consuming test

    // ************ Export to buffer synchronously ExportLandmarksL() ************

//    iLog->Put(_L("------ Export to buffer synchronously ExportLandmarksL() ------"));

// Not tested here since it does not result in KErrDiskFull but in KErrNoMemory. Time-consuming test

    CleanupStack::PopAndDestroy(&itemIds);

//// Testing Disk full during finalizing of encoder

    iLog->Put(_L("\r\n--- Testing Disk full during finalizing of encoder"));

    // ************ 16. Export to file using encoder stand-alone and finalizing incrementally ************

    iLog->Put(_L("------ Export to file using encoder stand-alone and finalizing incrementally"));

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    AddLandmarksToEncoderL(!doAddAllLandmarks);

    FillFile3L(); // Fill up disk space so much that next call to FinalizeL results in KErrDiskFull.

    FinalizeEncoderL(doExecuteIncrementally);

    // ************ 17. Export to file using encoder stand-alone and finalizing synchronously ************

    iLog->Put(_L("------ Export to file using encoder stand-alone and finalizing synchronously"));

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    AddLandmarksToEncoderL(!doAddAllLandmarks);

    FillFile3L(); // Fill up disk space so much that next call to FinalizeL results in KErrDiskFull.

    FinalizeEncoderL(!doExecuteIncrementally);

    // Create array of some IDs in database

    CleanupClosePushL(itemIds);

    PopulateArrayL(itemIds, !doAddAllLandmarks);

    // ************ 18. Export to file using ExportLandmarksL() and finalizing incrementally ************

    iLog->Put(_L("------ Export to file using ExportLandmarksL() and finalizing incrementally"));

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    ExportWithExportLandmarksMethodL(itemIds, doExecuteIncrementally);

    FillFile3L(); // Fill up disk space so much that next call to FinalizeL results in KErrDiskFull.

    FinalizeEncoderL(doExecuteIncrementally);

    // ************ 19. Export to file using ExportLandmarksL() and finalizing synchronously ************

    iLog->Put(_L("------ Export to file using ExportLandmarksL() and finalizing synchronously"));

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    ExportWithExportLandmarksMethodL(itemIds, !doExecuteIncrementally);

    FillFile3L(); // Fill up disk space so much that next call to FinalizeL results in KErrDiskFull.

    FinalizeEncoderL(!doExecuteIncrementally);

    CleanupStack::PopAndDestroy(&itemIds);

//// Testing when disk is already full

    iLog->Put(_L("\r\n--- Testing when disk is already full"));

    TVolumeInfo volumeInfoBeforeTest, volumeInfoAfterTest;

    // ************ 20. CPosLandmarkEncoder::SetOutPutFileL() ************

    iLog->Put(_L("------ CPosLandmarkEncoder::SetOutPutFileL()"));

    iFile2.Close();

    DeleteFileL(KFile2);

    ReInitializeEncoderEtcL();

    User::LeaveIfError(iFile2.Create(iFileServer, KFile2, EFileWrite));

    ConsumeDiskSpaceL(iFile2, iSizeLimit2);

    User::LeaveIfError(iFileServer.Volume(volumeInfoBeforeTest, EDriveC));

    TRAP(result, iLandmarkEncoder->SetOutputFileL(KXmlOutputFile));

    User::LeaveIfError(iFileServer.Volume(volumeInfoAfterTest, EDriveC));

    // Verify

    _LIT(KSetFile1, "SetOutPutFileL() didn't result in KErrDiskFull but in %d");

    AssertTrueSecL(result == KErrDiskFull, KSetFile1, result);

    iLog->Put(_L("SetOutputFileL() left with KErrDiskFull"));

    _LIT(KSetFile2, "SetOutPutFileL() consumed disk space even if critical level has been passed. %d");

    AssertTrueSecL(volumeInfoBeforeTest.iFree == volumeInfoAfterTest.iFree, KSetFile2);

    // ************ 21. CPosLandmarkEncoder::AddLandmarkL() ************

    iLog->Put(_L("------ CPosLandmarkEncoder::AddLandmarkL()"));

    iFile2.Close();

    DeleteFileL(KFile2);

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    CPosLmItemIterator* iterator = iDatabase->LandmarkIteratorL();

    CleanupStack::PushL(iterator);

    CPosLandmark* landmark = iDatabase->ReadLandmarkLC(iterator->NextL());

    User::LeaveIfError(iFile2.Create(iFileServer, KFile2, EFileWrite));

    ConsumeDiskSpaceL(iFile2, iSizeLimit2);

    User::LeaveIfError(iFileServer.Volume(volumeInfoBeforeTest, EDriveC));

    TRAP(result, iLandmarkEncoder->AddLandmarkL(*landmark));

    User::LeaveIfError(iFileServer.Volume(volumeInfoAfterTest, EDriveC));

    CleanupStack::PopAndDestroy(2, iterator);

    // Verify

    _LIT(KAddLmErr1, "Adding LM to encoder didn't result in KErrDiskFull but in %d when beyond critical level");

    AssertTrueSecL(result == KErrDiskFull, KAddLmErr1, result);

    iLog->Put(_L("AddLandmarkL() left with KErrDiskFull"));

    _LIT(KAddLmErr2, "AddLandmarkL() consumed disk space even if critical level has been passed. %d");

    AssertTrueSecL(volumeInfoBeforeTest.iFree == volumeInfoAfterTest.iFree, KAddLmErr2);

    // ************ 22. CPosLandmarkEncoder::FinalizeL() ************

    iLog->Put(_L("------ CPosLandmarkEncoder::FinalizeL()"));

    iFile2.Close();

    DeleteFileL(KFile2);

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    AddLandmarksToEncoderL(!doAddAllLandmarks);

    User::LeaveIfError(iFile2.Create(iFileServer, KFile2, EFileWrite));

    ConsumeDiskSpaceL(iFile2, iSizeLimit2);

    delete iOperation;

    iOperation = NULL;

    User::LeaveIfError(iFileServer.Volume(volumeInfoBeforeTest, EDriveC));

    TRAP(result, iOperation = iLandmarkEncoder->FinalizeEncodingL());

    User::LeaveIfError(iFileServer.Volume(volumeInfoAfterTest, EDriveC));

    // Verify

    _LIT(KFinalizeErr1, "FinalizeL() didn't result in KErrDiskFull but in %d");

    AssertTrueSecL(result == KErrDiskFull, KFinalizeErr1, result);

    iLog->Put(_L("FinalizeEncodingL() left with KErrDiskFull"));

    _LIT(KFinalizeErr2, "FinalizeL() consumed disk space even if critical level has been passed. %d");

    AssertTrueSecL(volumeInfoBeforeTest.iFree == volumeInfoAfterTest.iFree, KFinalizeErr2);

    // ************ 23. CPosLandmarkEncoder::SetOutPutFileL() - Bonus test 1 ************

    iLog->Put(_L("------ CPosLandmarkEncoder::SetOutPutFileL() - Bonus test 1"));

    iFile2.Close();

    DeleteFileL(KFile2);

    ReInitializeEncoderEtcL();

    User::LeaveIfError(iFile2.Create(iFileServer, KFile2, EFileWrite));

    ConsumeDiskSpaceL(iFile2, iSizeLimit2);

    TRAP(result, iLandmarkEncoder->SetOutputFileL(KXmlOutputFile));

    // Verify

    AssertTrueSecL(result == KErrDiskFull, KSetFile1, result);

    iLog->Put(_L("SetOutputFileL() left with KErrDiskFull"));

    // Try it again

    TRAP(result, iLandmarkEncoder->SetOutputFileL(KXmlOutputFile));

    // Verify

    _LIT(KSetFile3, "SetOutPutFileL() didn't result in KErrAlreadyExists but in %d");

    AssertTrueSecL(result == KErrAlreadyExists, KSetFile3, result);

    iLog->Put(_L("SetOutputFileL() left with KErrAlreadyExists"));

    // ************ 24. CPosLandmarkEncoder::FinalizeL() - Bonus test 2 ************

    // This test tests if it is possible to finalize when adding LMs to encoder has 

    // been interrupted due to KErrDiskFull.

    iLog->Put(_L("------ CPosLandmarkEncoder::FinalizeL() - Bonus test 2"));

    iFile2.Close();

    DeleteFileL(KFile2);

    ReInitializeEncoderEtcL();

    iLandmarkEncoder->SetOutputFileL(KXmlOutputFile);

    AddCollectionDataToEncoderL();

    // Add landmarks will result in KErrDiskFull

    AddLandmarksToEncoderL(doAddAllLandmarks);

    // Restore some disk space

    iFile1.Close();

    DeleteFileL(KFile1);

    // Try to finalize

    delete iOperation;

    iOperation = NULL;

    TRAP(result, ExecuteAndDeleteLD(iLandmarkEncoder->FinalizeEncodingL()));

    AssertTrueSecL(result == KErrNone, _L("FinalizeL() left with %d"), result);

    iLog->Put(_L("FinalizeL() successful"));

    // ************ CPosLandmarkEncoder::SetOutPutFileL() - Bonus test 3 ************

//  Not tested here since this is a panic test. (Not tested anywhere else)

/*    iLog->Put(_L("------ CPosLandmarkEncoder::SetOutPutFileL() - Bonus test 3"));

    iFile2.Close();

    DeleteFileL(KFile2);

    ReInitializeEncoderEtcL();

    User::LeaveIfError(iFile2.Create(iFileServer, KFile2, EFileWrite));

    ConsumeDiskSpaceL(iFile2, iSizeLimit2);

    TRAP(result, iLandmarkEncoder->SetOutputFileL(KXmlOutputFile));

    // Verify

    AssertTrueSecL(result == KErrDiskFull, KSetFile1, result);