// Copyright (c) 2007-2009 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:

 //

 #include <e32base.h>

 #include <e32property.h>

 #include <e32debug.h>

 #include "TPropertyManager.h"

 _LIT(KSeparator, "|"); // Char used to separate arguments

 static TInt DefineProperty(TUid aCategory, TUint aKey, TInt aAttr,TInt aPreallocated)

 	{

 	_LIT_SECURE_ID(mySid,0X10204FC5);

 	TSecurityPolicy readPolicy = TSecurityPolicy::EAlwaysPass;

 	TSecurityPolicy writePolicy = TSecurityPolicy(mySid);

 	TInt err = RProperty::Define(aCategory, aKey, aAttr, readPolicy, writePolicy, aPreallocated);

 	//If the variable is already defined then return KErrNone as this is fine,

 	if(err == KErrAlreadyExists)

 		{

 		err = KErrNone;	

 		}

 	RDebug::Print(_L("Property Manager - Define Property Cat = %d Key = %d err = %d\n"), aCategory,aKey, err);

 	return err;

 	}

 static TInt DeleteProperty(TUid aCategory, TUint aKey)

 	{

 	TInt err = RProperty::Delete(aCategory, aKey);

 	//If the variable is not found then return KErrNone as this is fine

 	if(err == KErrNotFound)

 		{

 		err = KErrNone;	

 		}

 	RDebug::Print(_L("Property Manager - Delete Property Cat = %d Key = %d err = %d\n"), aCategory,aKey, err);

 	return err;

 	}

 static TInt SetProperty(TUid aCategory, TUint aKey, TInt aValue)

 	{

 	TInt err = RProperty::Set(aCategory, aKey, aValue);

 	RDebug::Print(_L("Property Manager - Set Property Cat = %d Key = %d Value = %d  err = %d\n"), aCategory,aKey,aValue,err);

 	return err;

 	}

 static TInt SetProperty(TUid aCategory, TUint aKey, const TDesC8 &aValue)

 	{

 	TInt err = RProperty::Set(aCategory, aKey, aValue);

 	RDebug::Print(_L("Property Manager - Set Property Cat = %d Key = %d Value = %S  err = %d\n"), aCategory,aKey,&aValue,err);

 	return err;

 	}

 static TInt SetProperty(TUid aCategory, TUint aKey, const TDesC16 &aValue)

 	{

 	TInt err = RProperty::Set(aCategory, aKey, aValue);

 	RDebug::Print(_L("Property Manager - Set Property Cat = %d Key = %d Value = %S  err = %d\n"), aCategory,aKey,&aValue,err);

 	return err;

 	}

 TInt GetNumber(const TPtrC& aText, TInt& aLength)

 	{

 	TInt total = 0;

 	aLength = 0;

 	TInt textLength = aText.Length();

 	//Loop through each character and verify that it is a valid digit

 	//before converting to a decimal representation and adding to the total

 	while (aLength < textLength)

 		{

 		TChar currentChar = aText[aLength];

 		if (currentChar < '0' || currentChar > '9')

 			{

 			return total;

 			}

 		TInt digit = 0;

 		TUint charValue = currentChar;

 		//Convert from character value to decimal

 		digit = charValue - 0x30; //(offset for western digit characters

 		total = (total * 10) + digit;

 		aLength++;

 		}

 	return total;

 	}

 static TInt ParseArgs(TDesC& aArgs, TInt& aStartIndex)

 	{

 	TInt length;

 	TInt value;

 	//Get a substrng of aArgs begining at aStartIndex

 	TPtrC string = aArgs.Mid(aStartIndex,aArgs.Length() - aStartIndex);

 	//Find the position of the first separator

 	TInt pos = string.Find(KSeparator);

 	if(pos > 0)

 		{

 		//Get the number that exists in the substring before the separator

 		value = GetNumber(string.Mid(0,pos),length);	

 		}

 	//If a separator is not found, then this must be the last number in aArgs

 	else

 		{

 		value = GetNumber(string,length);

 		}

 	//Update the start index to the character following the separator

 	aStartIndex += (pos +1);

 	return value;

 	}

 static TInt ProcessCommandLine(TDesC& aArgs)

 	{

 	TInt error;

 	TInt pos = 0;

 	TInt length = aArgs.Length();

 	//Pull out the common elements of all commands - Op, Cat & Key

 	PropertyManager::TOperation operation = PropertyManager::TOperation(ParseArgs(aArgs,pos));

 	TInt category = ParseArgs(aArgs,pos);

 	TUid categoryUid = TUid::Uid(category);

 	TUint key =	ParseArgs(aArgs,pos);

 	TInt attr;

 	TInt preallocated;

 	TInt intVal;

 	TBuf8<64> value;

 	//Handle each operation separately to pull out the remaining arguments

 	//and process the request.

 	switch(operation)

 		{		

 		case PropertyManager::EDefineProperty:

 		attr = ParseArgs(aArgs,pos);

 		preallocated = ParseArgs(aArgs,pos);

 		error = DefineProperty(categoryUid,key,attr,preallocated);

 		break;

 		case PropertyManager::EDeleteProperty:

 		error = DeleteProperty(categoryUid,key);

 		break;

 		case PropertyManager::ESetPropertyInt:

 		intVal = ParseArgs(aArgs,pos);

 		error = SetProperty(categoryUid,key,intVal);

 		break;

 		case PropertyManager::ESetPropertyDes8:

 		value.Copy(aArgs.Mid(pos,(aArgs.Length()-pos)));

 		error = SetProperty(categoryUid,key,value);

 		break;

 		case PropertyManager::ESetPropertyDes16:

 		error = SetProperty(categoryUid,key,aArgs.Mid(pos,(aArgs.Length()-pos)));

 		break;

 		default:

 		error = KErrArgument;

 		break;

 		}

 	return error;

 	}

 GLDEF_C TInt E32Main()

     {

     CTrapCleanup* cleanup = CTrapCleanup::New(); 

 	TBuf<64> args;

 	User::CommandLine(args);

 	TInt error = ProcessCommandLine(args);

 	delete cleanup;

 	return error;	

 	}