// 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;	
    	
	}