/*

* Copyright (c) 2008 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

*

*/

#include "MCEConstants.h"

#include "TCmdSetProperty.h"

#include "CTcMCEContext.h"

#include "mcetesterpskeys.h"

#include <e32property.h>

void TCmdSetProperty::ExecuteL()

	{

	// ---------- Setup --------------------------------------------------------

    // Getting Uids and value

    TInt uidValue = ExtractIntegerL( KParamPropertyUid, 0, EFalse );

    TInt key = ExtractIntegerL( KParamPropertyKey, 0, ETrue );

    TInt propertyAttr = RProperty::EText;

    TInt intValue( 0 );

    TPtrC8 descrValue = ExtractTextL( KParamPropertyTextValue, EFalse );

    if ( descrValue == KNullDesC8 )

    	{

    	// As text parameter was not specified, integer parameter is now

		// mandatory, except for KMceTesterNatPluginResourceReservationStatus

		// which does not require a value.

		TBool isMandatory = ( key != KMceTesterNatPluginResourceReservationStatus );

		intValue = ExtractIntegerL( KParamPropertyValue, 0, isMandatory );

    	propertyAttr = RProperty::EInt;

    	}

    TUid uidkey = KUidMceTesterPSKeys;

    if ( uidValue != 0 )

        {

        uidkey = TUid::Uid( uidValue );

        }

    // ---------- Execution ----------------------------------------------------

    _LIT_SECURITY_POLICY_PASS( KAllowAllPolicy );

    User::LeaveIfError( RProperty::Define( uidkey, key, propertyAttr,

    									   KAllowAllPolicy, KAllowAllPolicy ) );

    if ( propertyAttr == RProperty::EInt )

    	{

    	User::LeaveIfError( RProperty::Set( uidkey, key, intValue ) );

    	}

    else

    	{

    	User::LeaveIfError( RProperty::Set( uidkey, key, descrValue ) );

    	}

    // ---------- Response creation --------------------------------------------

    }

TBool TCmdSetProperty::Match( const TTcIdentifier& aId )

	{

	return TTcMceCommandBase::Match( aId, _L8("SetProperty") );

	}

TTcCommandBase* TCmdSetProperty::CreateL( MTcTestContext& aContext )

	{

	return new( ELeave ) TCmdSetProperty( aContext );

	}