/*

* Copyright (c) 2000 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: Implementation of terminalsecurity components

*

*/

// INCLUDE FILES

#include <e32svr.h>

#include <e32math.h>

#include <e32uid.h>

#include <AknGlobalNote.h>

#include <aknnotewrappers.h> 

#include <AknQueryDialog.h>

#include <AknGlobalConfirmationQuery.h>

#include "SCPClient.h"

#include "SCPQueryDialog.h"

#include "SCPParamObject.h"

#include <SCPNotifier.rsg>

#include "SCP_IDs.h"

#include <centralrepository.h>

#include "SCPLockCode.h"

//#ifdef __SAP_DEVICE_LOCK_ENHANCEMENTS

#include <TerminalControl3rdPartyAPI.h>

#include <SCPServerInterface.h>

#include <SecUi.rsg>

#include <StringLoader.h>

#include <bautils.h>

//#endif // DEVICE_LOCK_ENHANCEMENTS

#include <featmgr.h>

#include "SCPDebug.h"

#include <e32property.h>

/*#ifdef _DEBUG

#define __SCP_DEBUG

#endif // _DEBUG

// Define this so the precompiler in CW 3.1 won't complain about token pasting,

// the warnings are not valid

#pragma warn_illtokenpasting off

#ifdef __SCP_DEBUG

#define Dprint(a) RDebug::Print##a

#else

#define Dprint(a)

#endif // _DEBUG*/

static const TUint KDefaultMessageSlots = 3;

static const TInt KSCPConnectRetries( 2 );

//#ifdef __SAP_DEVICE_LOCK_ENHANCEMENTS

_LIT( KDriveZ, "Z:" );

_LIT( KSCPResourceFilename, "\\Resource\\SCPNotifier.RSC" );

_LIT( KSCPSecUIResourceFilename, "\\Resource\\SecUi.RSC" );

//#endif // __SAP_DEVICE_LOCK_ENHANCEMENTS

// Uid for the application; this should match the mmp file

const TUid KServerUid3 = {0x10207836};

#ifdef __WINS__

static const TUint KServerMinHeapSize =  0x1000;  //  4K

static const TUint KServerMaxHeapSize = 0x10000;  // 64K

#endif

static TInt StartServer();

static TInt CreateServerProcess();

// LOCAL FUNCTION PROTOTYPES

// ==================== LOCAL FUNCTIONS ====================

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

// StartServer() Server starter check

// Determines if the server is running, if not, calls the starter function

// Returns: TInt: Operation status, a standard error code

//

// Status : Approved

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

//

static TInt StartServer()

    {

    Dprint( (_L("--> SCPClient::StartServer()") ));        

    TInt result;

    TFindServer findSCPServer( KSCPServerName );

    TFullName name;

    result = findSCPServer.Next( name );

    if ( result != KErrNone )

        {

        // The server is not running, try to create the server process

        result = CreateServerProcess();

        } 

    Dprint( (_L("<-- SCPClient::StartServer(): Exit code: %d"), result ));

    return result;

    }

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

// CreateServerProcess() Server starter function

// Starts the SCP server

// Returns: TInt: Operation status, a standard error code

//

// Status : Approved

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

//

static TInt CreateServerProcess()

    {

    Dprint( (_L("--> SCPClient::CreateServerProcess()") ));

    TInt result;

    const TUidType serverUid( KNullUid, KNullUid, KServerUid3 );

    RProcess server;

    _LIT( KEmpty, "");   

    result = server.Create( KSCPServerFileName, KEmpty );

    if ( result != KErrNone )

        {

        Dprint( (_L("<-- SCPClient::CreateServerProcess(), process creation error!") ));

        return result;

        }

    TRequestStatus stat;

    server.Rendezvous(stat);

    if ( stat != KRequestPending )

        {

        server.Kill(0);    // abort startup

        }    

    else

        {

        server.Resume(); // logon OK - start the server

        }

    User::WaitForRequest(stat); // wait for start or death

    // we can't use the 'exit reason' if the server panicked as this

    // is the panic 'reason' and may be '0' which cannot be distinguished

    // from KErrNone

    result = ( server.ExitType() == EExitPanic ) ? KErrGeneral : stat.Int();

    server.Close();

    Dprint( (_L("<-- SCPClient::CreateServerProcess(): %d"), result ));

    return result;

    }

//#ifdef __SAP_DEVICE_LOCK_ENHANCEMENTS

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

// RunDialog() Dialog execution wrapper

// Initialize and run the query dialog

// Returns: TInt: The return code from the dialog.

//          Can leave with a generic error code.

//

// Status : Approved

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

//

TInt RunDialogL( TDes& aReplyBuf,

                RSCPClient::TSCPButtonConfig aButtonsShown,

                TInt aMinLen,

                TInt aMaxLen,

                TUint aResId = 0,

                TDesC* aPrompt = NULL,

                TBool aECSSupport = EFalse         

              )

    {

    Dprint(_L("[RSCPClient]-> RunDialogL() >>> "));

    FeatureManager::InitializeLibL();

    if(!FeatureManager::FeatureSupported(KFeatureIdSapDeviceLockEnhancements))

	{

			FeatureManager::UnInitializeLib();

		return KErrNotSupported;

	}

		FeatureManager::UnInitializeLib();

    if ( ( aPrompt == NULL ) && ( aResId == 0 ) )

        {

        return KErrArgument;

        }

    Dprint((_L("--> SCPClient::RunDialogL() start the dialog")));    

    CSCPQueryDialog* dialog = new (ELeave) CSCPQueryDialog( 

        aReplyBuf,

        aButtonsShown,

        aMinLen,

        aMaxLen,

        aECSSupport

        ); 

    CleanupStack::PushL( dialog );            

    if ( aResId != 0 )

        {

        // Load and set the prompt from a resource ID

        HBufC* prompt;

        prompt = StringLoader::LoadLC( aResId );   

        dialog->SetPromptL( *prompt ); 

        CleanupStack::PopAndDestroy( prompt );       

        }

    else

        {

        // Set the given prompt

        dialog->SetPromptL( *aPrompt );

        }        

    Dprint((_L("-- SCPClient::RunDialogL() dialog->ExecuteLD")));

    TInt ret = dialog->ExecuteLD( R_SCP_CODE_QUERY );

    CleanupStack::Pop( dialog );

    Dprint( (_L("-- SCPClient::RunDialogL(): ret val %d"), ret));

    return ret;

    }

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

// LoadResources() Resource loader

// Load the resources for the library

// Returns: TInt: A generic error code.

//

// Status : Approved

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

//

TInt LoadResources( TInt& aRes1, TInt& aRes2 )

    {

   TRAPD ( err, FeatureManager::InitializeLibL() );   

   if ( err == KErrNone )

   {

    if(!FeatureManager::FeatureSupported(KFeatureIdSapDeviceLockEnhancements))

	{

			FeatureManager::UnInitializeLib();

		return KErrNotSupported;

	}

		FeatureManager::UnInitializeLib();

    // Load the resource files for this DLL

    TInt err = KErrNone;

    TInt err2 = KErrNone;

    // Localize the file name, and load the SCP resources

    TFileName resFile;

    resFile.Copy( KDriveZ );

    resFile.Append( KSCPResourceFilename );

    BaflUtils::NearestLanguageFile( CCoeEnv::Static()->FsSession(), resFile );    

    TRAP( err, aRes1 = CCoeEnv::Static()->AddResourceFileL( resFile ) );

    if ( err == KErrNone )

        {

        // Localize the file name, and load the SecUi resources

        resFile.Copy( KDriveZ );

        resFile.Append( KSCPSecUIResourceFilename );

        BaflUtils::NearestLanguageFile( CCoeEnv::Static()->FsSession(), resFile );

        TRAP( err2, aRes2 = CCoeEnv::Static()->AddResourceFileL( resFile ) );

        }   

    if ( ( err != KErrNone ) || ( err2 != KErrNone ) )

        {        

        if ( err == KErrNone )             

            {

            // First resource was loaded OK, remove it

            CCoeEnv::Static()->DeleteResourceFile( aRes1 );

            err = err2;

            }

        } 

    }        

    return err;           

    }     

//#endif //  __SAP_DEVICE_LOCK_ENHANCEMENTS

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

// C++ default constructor can NOT contain any code, that

// might leave.

//

EXPORT_C RSCPClient::RSCPClient()

:   RSessionBase()

    {

    // No implementation required

    }

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

// TInt RSCPClient::Connect()

// Creates a new session, and starts the server, if required.

// 

// Status : Approved

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

//

EXPORT_C TInt RSCPClient::Connect()

    {

    Dprint( (_L("--> RSCPClient::Connect()") ));

    // Use a mutex-object so that two processes cannot start the server at the same time

    RMutex startMutex;

    TRAPD( errf, FeatureManager::InitializeLibL() );

	if( errf != KErrNone )

		{

		return errf;

		}

		if(FeatureManager::FeatureSupported(KFeatureIdSapDeviceLockEnhancements))

		{

			isFlagEnabled = ETrue;

		}

		else

		{

			isFlagEnabled = EFalse;

		}

		FeatureManager::UnInitializeLib();

    TInt mRet = startMutex.OpenGlobal( KSCPServerName );

    if ( mRet == KErrNotFound )

        {

        mRet = startMutex.CreateGlobal( KSCPServerName );

        }

    if ( mRet != KErrNone )

        {        

        return mRet;

        }

    // Acquire the mutex

    startMutex.Wait();

    TInt retry = KSCPConnectRetries;

    TInt r;

    for (;;)

        {        

        r = CreateSession( KSCPServerName, Version(), KDefaultMessageSlots );

        if ( ( r != KErrNotFound ) && ( r != KErrServerTerminated  ) )

            {

            break;

            }

        if ( --retry == 0 )

            {

            break;

            }

        r = StartServer();

        if ( ( r != KErrNone ) && ( r != KErrAlreadyExists ) )

            {

            break;   

            }

        }

    Dprint( (_L("<-- RSCPClient::Connect(), exiting: %d"), r ));

    // Release the mutex

    startMutex.Signal();

    startMutex.Close();

    return r;

    }

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

// TVersion RSCPClient::Version()

// Constructs a TVersion object containing the defined version

// numbers, and returns it

// 

// Status : Approved

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

//

EXPORT_C TVersion RSCPClient::Version() const

    {

    Dprint( (_L("<--> RSCPClient::Version()") ));

    return( TVersion( KSCPServMajorVersionNumber,

                      KSCPServMinorVersionNumber,

                      KSCPServBuildVersionNumber ) );

    }

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

// TInt RSCPClient::GetCode( TSCPSecCode& aCode )

// Requests the stored ISA code.

// 

// Status : Approved

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

//

EXPORT_C TInt RSCPClient::GetCode( TSCPSecCode& aCode )

    {

    Dprint( (_L("--> RSCPClient::GetCode()") ));

    TInt ret = SendReceive(ESCPServGetCode, TIpcArgs( &aCode ) );

    Dprint( (_L("<-- RSCPClient::GetCode(): %d"), ret ));

    return ret;

    }

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

// TInt RSCPClient::StoreCode( TSCPSecCode& aCode )

// Propagates the store code -request to the server along

// with the buffer parameter.

// 

// Status : Approved

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

//

EXPORT_C TInt RSCPClient::StoreCode( TSCPSecCode& aCode )

    {

    Dprint( (_L("--> RSCPClient::StoreCode()") ));

    TInt ret = SendReceive(ESCPServSetCode, TIpcArgs( &aCode ) );

    Dprint( (_L("<-- RSCPClient::StoreCode(): %d"), ret ));

    return ret;

    }   

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

// TInt RSCPClient::ChangeCode( TDes& aNewCode )

// Propagates the change code -request to the server, along with

// the code parameter.

// 

// Status : Approved

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

//

EXPORT_C TInt RSCPClient::ChangeCode( TDes& aNewCode )

    {

    Dprint( (_L("--> RSCPClient::ChangeCode()") ));

    TInt ret = SendReceive(ESCPServChangeCode, TIpcArgs( &aNewCode ) );

    Dprint( (_L("<-- RSCPClient::ChangeCode(): %d"), ret ));  

    return ret;

    }   

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

// TInt RSCPClient::SetPhoneLock()

// Propagates the lock/unlock phone -request to the server

// 

// Status : Approved

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

//

EXPORT_C TInt RSCPClient::SetPhoneLock( TBool aLocked )

    {

    Dprint( (_L("--> RSCPClient::SetPhoneLock( %d)"), aLocked ));

    TInt ret = SendReceive(ESCPServSetPhoneLock, TIpcArgs( aLocked ) );

    Dprint( (_L("<-- RSCPClient::SetPhoneLock(): %d"), ret ));

    return ret;

    }   

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

// TBool RSCPClient::QueryAdminCmd( TSCPAdminCommand aCommand )

// Packs the command parameter into a buffer, and propagates

// the call to the server, the response is received in the

// same buffer.

// 

// Status : Approved

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

//

EXPORT_C TBool RSCPClient::QueryAdminCmd( TSCPAdminCommand aCommand )

    {

    Dprint( (_L("--> RSCPClient::QueryAdminCmd()") ));

    TInt status = 0;

    TPckg<TInt> retPackage(status);

    TInt ret = SendReceive( ESCPServQueryAdminCmd, TIpcArgs( aCommand, &retPackage ) );

    Dprint( (_L("<-- RSCPClient::QueryAdminCmd(): %d"), retPackage() ));

    return static_cast<TBool>( status );

    }   

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

// TInt RSCPClient::GetLockState( TBool& aState )

// Package the parameter, and send it to the server.

// 

// Status : Approved

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

//

EXPORT_C TInt RSCPClient::GetLockState( TBool& aState )

    {

    Dprint( (_L("--> RSCPClient::GetLockState()") )); 

    TPckg<TBool> retPackage(aState);

    TInt ret = SendReceive( ESCPServGetLockState, TIpcArgs( &retPackage ) );

    Dprint( (_L("<-- RSCPClient::GetLockState(): %d"), retPackage() ));

    return ret;            

    }

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

// TInt RSCPClient::GetParamValue( TInt aParamID, TDes& aValue )

// The server contains all the logic for the parameters, just 

// propagate the call.

// 

// Status : Approved

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

//

EXPORT_C TInt RSCPClient::GetParamValue( TInt aParamID, TDes& aValue )

    {

    Dprint( (_L("--> RSCPClient::GetParamValue()") ));  

    TInt ret = SendReceive( ESCPServGetParam, TIpcArgs( aParamID, &aValue ) );

    Dprint( (_L("<-- RSCPClient::GetParamValue(): %d"), ret));