/*

* 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:

*

*/

//  CLASS HEADER

#include "mt_basicoperationsplugin.h"

//  EXTERNAL INCLUDES

#include <EUnitMacros.h>

#include <EUnitDecorators.h>

#include <ECom/ECom.h>

#include <bautils.h>

#include "CFContextSubscription.h"

#include "CFContextSubscriptionImpl.h"

#include "CFContextObject.h"

#include "CFContextObjectImpl.h"

#include "CFScriptHandler.h"

//  INTERNAL INCLUDES

#include "CFTestDelay.h"

#include "cffakeenv.h"

#include "ScriptEventNotifierSession.h"

// CONSTANTS

const TUid KMT_CfScriptEngineUid = {0x7E577E57};

//const TUid KMT_CfScriptEngineOtherUid = {0x074E074E};

_LIT8( KScriptStartTag, "<script" );

// CONSTRUCTION

mt_basicoperationsplugin* mt_basicoperationsplugin::NewL()

    {

    mt_basicoperationsplugin* self = mt_basicoperationsplugin::NewLC();

    CleanupStack::Pop();

    return self;

    }

mt_basicoperationsplugin* mt_basicoperationsplugin::NewLC()

    {

    mt_basicoperationsplugin* self = new( ELeave ) mt_basicoperationsplugin();

    CleanupStack::PushL( self );

    self->ConstructL();

    return self;

    }

// Destructor (virtual by CBase)

mt_basicoperationsplugin::~mt_basicoperationsplugin()

    {

    }

// Default constructor

mt_basicoperationsplugin::mt_basicoperationsplugin()

    {

    }

// Second phase construct

void mt_basicoperationsplugin::ConstructL()

    {

    // The ConstructL from the base class CEUnitTestSuiteClass must be called.

    // It generates the test case table.

    CEUnitTestSuiteClass::ConstructL();

    }

//  METHODS

void mt_basicoperationsplugin::SetupEmptyL(  )

    {

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

    iTestDelay = CCFTestDelay::NewL();

    }

void mt_basicoperationsplugin::SetupL(  )

    {

    SetupEmptyL();

    iDummyScriptEngineSession = CScriptEventNotifierSession::NewL();

    iCFFakeEnv = CCFFakeEnv::NewL();

    }

void mt_basicoperationsplugin::SetupMidtestL( CCFContextObject& aContext1,

    CCFContextObject& aContext2,

    const TDesC& aScriptFile )

    {

    iDummyScriptEngineSession = CScriptEventNotifierSession::NewL();

    iCFFakeEnv = CCFFakeEnv::NewL();

    RThread thread;

    CleanupClosePushL( thread );

    // Define contexts

    static _LIT_SECURITY_POLICY_PASS( alwaysPass );

    TInt err = iCFFakeEnv->DefineContext( aContext1.Source(),

            aContext1.Type(), alwaysPass, alwaysPass );

    EUNIT_ASSERT_DESC( err == KErrNone, "DefineContext failed!" );

    err = iCFFakeEnv->DefineContext( aContext2.Source(),

            aContext2.Type(), alwaysPass, alwaysPass );

    EUNIT_ASSERT_DESC( err == KErrNone, "DefineContext failed!" );

    // Publish context before loading so that subscribing will find the initial

    // value used to evaluate the operation

    aContext1.SetValueL(_L("A"));

    err = iCFFakeEnv->PublishContext( aContext1, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( !iCFFakeEnv->ClientEventFired(),

        "Script did cause event!" );

    aContext2.SetValueL(_L("True"));

    err = iCFFakeEnv->PublishContext( aContext2, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( !iCFFakeEnv->ClientEventFired(),

        "Script did cause event!" );

    // load script

    HBufC8* script = LoadScriptFromFile( aScriptFile );

    TInt id = iCFFakeEnv->AddScript( aScriptFile, *script,

            KMT_CfScriptEngineUid, thread );

    EUNIT_ASSERT_DESC( id >= 0, "Parse error!" );

    delete script;

    iCFFakeEnv->ClearFireClientEventCount();

    CleanupStack::PopAndDestroy( &thread );

    }

void mt_basicoperationsplugin::TeardownMidtest(  )

    {

    iTestDelay->Start(100000); // 0.1 seconds

    delete iDummyScriptEngineSession;

    iDummyScriptEngineSession = NULL;

    delete iCFFakeEnv;

    iCFFakeEnv = NULL;

#ifdef __WINS__    

    REComSession::FinalClose();

#endif

    }

void mt_basicoperationsplugin::Teardown(  )

    {

    iTestDelay->Start(100000); // 0.1 seconds

    delete iDummyScriptEngineSession;

    iDummyScriptEngineSession = NULL;

    iTestDelay->Start(100000); // 0.1 seconds

    delete iTestDelay;

    iTestDelay = NULL;

    delete iCFFakeEnv;

    iCFFakeEnv = NULL;

    iFs.Close();

#ifdef __WINS__    

    REComSession::FinalClose();

#endif

    }

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

// mt_basicoperationsplugin::LoadScriptFromFile

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

//

HBufC8* mt_basicoperationsplugin::LoadScriptFromFile( const TDesC& aFilePath )

    {

    HBufC8* script = NULL;

    RFile file;

    TFileName fileName;

    fileName.Copy(_L("z:\\data\\cftestdata\\testscripts\\"));

    fileName.Append(aFilePath);

    TInt err = file.Open( iFs, fileName, EFileRead );

    if( err == KErrNone )

        {

        TInt size = 0;

        err = file.Size( size );

        if( err == KErrNone )

            {

            script = HBufC8::New( size );

            if( script )

                {

                TPtr8 scriptPtr = script->Des();

                err = file.Read( scriptPtr );

                if( err == KErrNone )

                    {

                    // Strip all unnecassary data from script

                    TInt pos = scriptPtr.FindF( KScriptStartTag );

                    if( pos != KErrNotFound )

                        {

                        scriptPtr.Copy( scriptPtr.MidTPtr( pos ) );

                        }

                    else

                        {

                        // Incorrect script

                        delete script;

                        script = NULL;

                        }

                    }

                else

                    {

                    delete script;

                    script = NULL;

                    }

                }

            }

        }

    // Cleanup

    file.Close();

    return script;

    }

// Format string to create persistent data file from:

// - Owner uid

// - Script name

// - Persistent data name

_LIT( KCFPersistenDataFormat, "c:\\private\\10282bc4\\rules\\%x\\%S-%S.dat" );

void mt_basicoperationsplugin::DeletePersistencyFile( const TDesC& aScriptName,

    const TDesC& aPersistencyFilename )

    {

    // Format name

    TParsePtrC parse( aScriptName );

    TPtrC scriptFilename( parse.Name() );

    TParsePtrC parsePersistency( aPersistencyFilename );

    TPtrC persistencyFilename( parsePersistency.Name() );

    TFileName fileName;

    fileName.Format( KCFPersistenDataFormat,

            KMT_CfScriptEngineUid, &scriptFilename, &persistencyFilename );

    TInt err = BaflUtils::DeleteFile( iFs, fileName );

    EUNIT_ASSERT_DESC(

            err == KErrNone || err == KErrNotFound || err == KErrPathNotFound, 

            "Persistency file delete error!");

    }

TInt mt_basicoperationsplugin::FindParameter(const RKeyValueArray& aArray,

    const TDesC& aKey, const TDesC& aValue)

    {

    TInt index = KErrNotFound;

    TBool found = EFalse;

    for (TInt i = 0; i < aArray.Count(); i++)

        {

        if ( aArray[i]->Key() == aKey )

            {

            if ( index == KErrNotFound )

                {

                index = i;

                if ( aArray[i]->Value() == aValue )

                    {

                    found = ETrue;

                    }

                else

                    {

                    return -3; // found but wrong value!

                    }

                }

            else

                {

                index = -2; // Duplicate found!

                }

            }

        }

    if (found)

        {

        return index;

        }

    return KErrNotFound;

    }

TInt mt_basicoperationsplugin::FindIndex( const RArray<TInt>& aArray, TInt aIndex )

    {

    TInt index = KErrNotFound;

    TBool found = EFalse;

    for (TInt i = 0; i < aArray.Count(); i++)

        {

        if ( aArray[i] == aIndex )

            {

            if ( index == KErrNotFound )

                {

                index = i;

                found = ETrue;

                }

            else

                {

                index = -2; // Duplicate found!

                }

            }

        }

    if (found)

        {

        return index;

        }

    return KErrNotFound;

    }

void mt_basicoperationsplugin::MT_ScriptTest_equals_L(  )

    {

    RThread thread;

    CleanupClosePushL(thread);

    TInt id = iCFFakeEnv->AddScript(_L("dummyscript"),

            _L8("dummyscript"), KMT_CfScriptEngineUid, thread);

    EUNIT_ASSERT_DESC( id < 0, "No parse error of dummy script" );

    // Define and publish context

    CCFContextObject* co = CCFContextObject::NewLC();

    static _LIT_SECURITY_POLICY_PASS( alwaysPass );

    co->SetSourceL(_L("t"));

    co->SetTypeL(_L("t.p.app"));

    TInt err = iCFFakeEnv->DefineContext( co->Source(),

            co->Type(), alwaysPass, alwaysPass );

    EUNIT_ASSERT_DESC( err == KErrNone, "DefineContext failed!" );

    iCFFakeEnv->ClearFireClientEvent();

    // load script

    HBufC8* script = LoadScriptFromFile(_L("test-equals.xml"));

    id = iCFFakeEnv->AddScript(

            _L("test-equals.xml"), *script, KMT_CfScriptEngineUid, thread);

    EUNIT_ASSERT_DESC( id >= 0, "Parse error!" );

    delete script;

    // publish context

    co->SetValueL(_L("ok"));

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ClientEventFired(), "Script did not fire event!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ScriptEventScriptId() == id,

         "Script ID does not match!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ScriptEventIdentifier() == _L("startApp"),

        "Identifier does not match!" );

    // Check parameters:

    // appUid='10005901' viewUid='00000001' msgUid='00000000' msg='msg'

    EUNIT_ASSERT(iCFFakeEnv->ScriptEventParameters().Count() == 4);

    EUNIT_ASSERT( FindParameter(iCFFakeEnv->ScriptEventParameters(),

        _L("appUid"), _L("10005901")) >= 0 );

    EUNIT_ASSERT( FindParameter(iCFFakeEnv->ScriptEventParameters(),

        _L("viewUid"), _L("00000001")) >= 0 );

    EUNIT_ASSERT( FindParameter(iCFFakeEnv->ScriptEventParameters(),

        _L("msgUid"), _L("00000000")) >= 0 );

    EUNIT_ASSERT( FindParameter(iCFFakeEnv->ScriptEventParameters(),

        _L("msg"), _L("msg")) >= 0 );

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( !iCFFakeEnv->ClientEventFired(),

         "Script did fired although context value did not change!" );

    co->SetValueL(_L("notok"));

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( !iCFFakeEnv->ClientEventFired(),

         "Script did fired although wrong context value!" );

    co->SetValueL(_L("ok"));

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ClientEventFired(),

         "Script did not fire event!" );

    CleanupStack::PopAndDestroy( co );

    CleanupStack::PopAndDestroy( &thread );

    }

void mt_basicoperationsplugin::MT_ScriptTest_notEqual_L(  )

    {

    RThread thread;

    CleanupClosePushL(thread);

    // Define context

    CCFContextObject* co = CCFContextObject::NewLC();

    static _LIT_SECURITY_POLICY_PASS( alwaysPass );

    co->SetSourceL(_L("t"));

    co->SetTypeL(_L("t.p.app"));

    TInt err = iCFFakeEnv->DefineContext( co->Source(),

            co->Type(), alwaysPass, alwaysPass );

    EUNIT_ASSERT_DESC( err == KErrNone, "DefineContext failed!" );

    // load script

    HBufC8* script = LoadScriptFromFile(_L("test-notEqual.xml"));

    TInt id = iCFFakeEnv->AddScript(

            _L("test-notEqual.xml"), *script, KMT_CfScriptEngineUid, thread);

    EUNIT_ASSERT_DESC( id >= 0, "Parse error!" );

    delete script;

    // TEST 1: Should fire event if not ok value

    co->SetValueL(_L("notok"));

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ClientEventFired(), "Script did not fire event!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ScriptEventScriptId() == id,

         "Script ID does not match!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ScriptEventIdentifier() == _L("startApp"),

        "Identifier does not match!" );

    // TEST 2: Should not fire event if the context value did not change

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( !iCFFakeEnv->ClientEventFired(),

         "Script did fired although context value did not change!" );

    // TEST 3: Should not fire event if context value ok

    co->SetValueL(_L("ok"));

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( !iCFFakeEnv->ClientEventFired(),

         "Script did fired although wrong context value!" );

    // TEST 4: Should fire event if context value not ok

    co->SetValueL(_L("notok"));

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ClientEventFired(),

         "Script did not fire event!" );

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    CleanupStack::PopAndDestroy( co );

    CleanupStack::PopAndDestroy( &thread );

    }

void mt_basicoperationsplugin::MT_ScriptTest_less_L(  )

    {

    RThread thread;

    CleanupClosePushL(thread);

    // Define context

    CCFContextObject* co = CCFContextObject::NewLC();

    static _LIT_SECURITY_POLICY_PASS( alwaysPass );

    co->SetSourceL(_L("Sensor"));

    co->SetTypeL(_L("X.RawValue"));

    TInt err = iCFFakeEnv->DefineContext( co->Source(),

            co->Type(), alwaysPass, alwaysPass );

    EUNIT_ASSERT_DESC( err == KErrNone, "DefineContext failed!" );

    HBufC8* script = LoadScriptFromFile(_L("test-less.xml"));

    TInt id = iCFFakeEnv->AddScript(

            _L("test-less.xml"), *script, KMT_CfScriptEngineUid, thread);

    EUNIT_ASSERT_DESC( id >= 0, "Parse error!" );

    delete script;

    // TEST 1: Should fire event if value < 150

    co->SetValueL(_L("149")); // value in script: 150

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ClientEventFired(), "Script did not fire event!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ScriptEventScriptId() == id,

         "Script ID does not match!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ScriptEventIdentifier() == _L("startApp"),

        "Identifier does not match!" );

    // TEST 2: Should not fire event if the context value did not change

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( !iCFFakeEnv->ClientEventFired(),

         "Script did fired although context value did not change!" );

    // TEST 3: Should not fire event if context value = 150

    co->SetValueL(_L("150"));

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( !iCFFakeEnv->ClientEventFired(),

         "Script did fired although wrong context value!" );

    // TEST 4: Should fire event if context value < 150

    co->SetValueL(_L("-1"));

    iCFFakeEnv->ClearFireClientEvent();

    err = iCFFakeEnv->PublishContext( *co, thread );

    EUNIT_ASSERT_DESC( err == KErrNone, "PublishContext failed!" );

    EUNIT_ASSERT_DESC( iCFFakeEnv->ClientEventFired(),

         "Script did not fire event!" );

    CleanupStack::PopAndDestroy( co );

    CleanupStack::PopAndDestroy( &thread );

    }

void mt_basicoperationsplugin::MT_ScriptTest_greater_L(  )

    {

    RThread thread;

    CleanupClosePushL(thread);