/*

* Copyright (c) 2006-2009 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the License "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: 

* CTestStep derived implementation

*

*/

#include "tAuthSvrStep.h"

#include <test/testexecutelog.h>

#ifndef __INIPARSER_H__

	#include <cinidata.h>

#endif // __INIPARSER_H__

#include <s32file.h>

#include <f32file.h>

#include "authrepository.h"

using namespace AuthServer;

CTAuthSvrStepBase::CTAuthSvrStepBase()

	{

	}

TInt CTAuthSvrStepBase::writeToNamedConfig(CIniData* aFile, const TDesC& aSectName,const TDesC& aKeyName,const TPtrC& aResult)

	{

	TInt retValue = KErrNone;

	// Look for a key under a named section, retrieve text value	

	TInt ret = KErrNone;	//return value from FindVar functions

	ret=aFile->SetValue(aSectName, aKeyName ,aResult);

	if(ret != KErrNone)

		{			

		if(ret == KErrNotFound)

			{

			RDebug::Print(_L("Key not found. Unable to set value in ini file.  SectionName = %S, KeyName = %S, value = %S."),  &aSectName, &aKeyName, &aResult);

			}

		else

			{

			RDebug::Print(_L("Unable to set value in ini file. SectionName = %S, KeyName = %S, value = %S."), &aSectName, &aKeyName, &aResult);

			}							

		retValue = ret;

		}

	return retValue;	

	}

TInt CTAuthSvrStepBase::writeToNamedConfig(CIniData* aFile, const TDesC& aKeyName,const TPtrC& aResult)

	{

	TInt retValue = KErrNone;

	// Look for a key under no named section, retrieve text value	

	TInt ret = KErrNone;	//return value from FindVar functions

	ret=aFile->SetValue(aKeyName ,aResult);

	if(ret != KErrNone)

		{

		if(ret == KErrNotFound)

			{

			RDebug::Print(_L("Key not found. Unable to set value in ini file. KeyName = %S, value = %S."), &aKeyName, &aResult);

			}			

		else

			{

			RDebug::Print(_L("Unable to set value in ini file. KeyName = %S, value = %S."), &aKeyName, &aResult);

			}

		retValue = ret;

		}

	return retValue;	

	}

TInt CTAuthSvrStepBase::readFromNamedConfigL(const TDesC& aFileName, const TDesC& aSectName,const TDesC& aKeyName, HBufC*& aResult)

	{

	TInt retValue = KErrNone;	

	CIniData* file;

	file = CIniData::NewL(aFileName);	

	CleanupStack::PushL(file);

	// Look for a key under a named section, retrieve text value	

	TBool ret=EFalse;	//return value from FindVar functions	

	TPtrC resultPtr;

	ret=file->FindVar(aSectName, aKeyName ,resultPtr);	

	if(ret == EFalse)

		{		

		RDebug::Print(_L("Unable to read value in ini file. Filename: %S, SectionName = %S, value = %S."), &aFileName, &aSectName, &aResult);

		retValue = ret;

		}

	else

		{

		aResult = resultPtr.AllocL();

		CleanupStack::PushL(aResult);

		file->WriteToFileL(); //apply the implementation

		CleanupStack::Pop(aResult);

		}

	CleanupStack::PopAndDestroy(file);

	return retValue;

	}

TInt CTAuthSvrStepBase::readFromNamedConfigL(const TDesC& aFileName,const TDesC& aKeyName, HBufC*& aResult)

	{

	TInt retValue = KErrNone;	

	CIniData* file=NULL;

	file = CIniData::NewL(aFileName);	

	CleanupStack::PushL(file);

	TBool ret=EFalse;	//return value from FindVar functions

	TPtrC resultPtr;

	ret=file->FindVar(aKeyName, resultPtr);

	if(ret == EFalse)

		{

	    RDebug::Print(_L("Unable to read value in ini file. Filename: %S, SectionName = %S, value = %S."), &aFileName, &aKeyName, &aResult);

		retValue = ret;

		}

	else

		{			

		aResult = resultPtr.AllocL();

		CleanupStack::PushL(aResult);

		file->WriteToFileL(); //apply the implementation

		CleanupStack::Pop(aResult);

		}	

	CleanupStack::PopAndDestroy(file);

	return retValue;

	}

void CTAuthSvrStepBase::SetDefaultPluginIdL(TInt aDefault)

	{

	//Read the default plugin value from the configuration file.

	CRepository* repository = CRepository::NewL(KUidAuthServerRepository);

	CleanupStack::PushL(repository);

	User::LeaveIfError(repository->Set(KAuthDefaultPlugin, aDefault));

	//Retrieve from file

	TInt defaultPlugin(0);

	User::LeaveIfError(repository->Get(KAuthDefaultPlugin, defaultPlugin));

	INFO_PRINTF2(_L("Default plugin value set in cenrep to %d"),defaultPlugin);

	CleanupStack::PopAndDestroy(repository);

	}	

/**

 Read data from testexecute ini file that will be used to initialise the Authentication Server

*/

TInt CTAuthSvrStepBase::InitAuthServerFromFileL()

	{

	//Set a default plugin using an ini file. Read this value from a file if it is specified	

	//Set this to be the default plugin (update the policy file) if the test case specifies it (in the script's ini file).

	TPtrC defaultPluginFromFile;

	TDriveUnit sysDrive (RFs::GetSystemDrive());

	TDriveName sysDriveName (sysDrive.Name());

	TBuf<128> fileName (sysDriveName);

	fileName.Append(KAuthSvrPolicyFile);

	CIniData* policyFile=NULL;

	TRAPD(r,policyFile=CIniData::NewL(fileName));

	CleanupStack::PushL(policyFile);

	fileName.Copy(sysDriveName);

	fileName.Append(KPluginIniFile);

	CIniData* pluginFile=NULL;

	TRAP(r,pluginFile=CIniData::NewL(fileName));

	CleanupStack::PushL(pluginFile);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin3100File);

	CIniData* p3100File=NULL;

	TRAP(r,p3100File=CIniData::NewL(fileName));

	CleanupStack::PushL(p3100File);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin3101File);

	CIniData* p3101File=NULL;

	TRAP(r,p3101File=CIniData::NewL(fileName));

	CleanupStack::PushL(p3101File);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin3102File);

	CIniData* p3102File=NULL;

	TRAP(r,p3102File=CIniData::NewL(fileName));

	CleanupStack::PushL(p3102File);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin3103File);

	CIniData* p3103File=NULL;

	TRAP(r,p3103File=CIniData::NewL(fileName));

	CleanupStack::PushL(p3103File);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin3104File);

	CIniData* p3104File=NULL;

	TRAP(r,p3104File=CIniData::NewL(fileName));

	CleanupStack::PushL(p3104File);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin4100File);

	CIniData* p4100File=NULL;

	TRAP(r,p4100File=CIniData::NewL(fileName));

	CleanupStack::PushL(p4100File);

	if (GetStringFromConfig(ConfigSection(),_L("defaultPlugin"), defaultPluginFromFile) != EFalse) // the tag 'defaultPlugin' was present

		{ 

		//Write this value to the policy file

		writeToNamedConfig(policyFile, KDefaultPluginTag, defaultPluginFromFile);

	//	SetDefaultPluginIdL(defaultPluginFromFile);

		}

	TInt defaultPluginId(0);

	if (GetIntFromConfig(ConfigSection(),_L("defaultPluginId"), defaultPluginId) != EFalse) // the tag 'defaultPlugin' was present

		{ 

		//Write this value to the policy file

		//writeToNamedConfig(policyFile, KDefaultPluginTag, defaultPluginFromFile);

		SetDefaultPluginIdL(defaultPluginId);

		}

	//Set whether a plugin supports default data. Read this value from a file if it is specified

	_LIT(KTrueText,"true");

	_LIT(KFalseText,"false");

	TBool iSupportsDefaultDataFromFile(ETrue);	//Default case - the plugin supports default data

	TBufC<16> trueBuf1(KTrueText);

	TBufC<16> falseBuf1(KFalseText);

	TPtr valueToWrite = trueBuf1.Des();			//Default case - the plugin supports default data

	if (GetBoolFromConfig(ConfigSection(),_L("iSupportsDefaultData"), iSupportsDefaultDataFromFile) != EFalse) // the tag 'isTrusted' was present

		{

		//Set the value that will be picked up by the constructor of the plugin		

		if (iSupportsDefaultDataFromFile)

			{ valueToWrite = trueBuf1.Des();	}

		else

			{ valueToWrite = falseBuf1.Des();	}			

		writeToNamedConfig(pluginFile, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);	

		writeToNamedConfig(p3100File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p3101File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p3102File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p3103File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p4100File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		}

	else

		{

		INFO_PRINTF1(_L("The iSupportsDefaultData tag was not specified in the testexecute ini file."));

		//Use the default value of TRUE		

		valueToWrite = trueBuf1.Des();

		writeToNamedConfig(pluginFile, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p3100File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p3101File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p3102File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p3103File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		writeToNamedConfig(p4100File, KPluginIniSection, _L("iSupportsDefaultData"), valueToWrite);

		}

	//Set a value for the training input that will be used by the CTPinAuthPlugin

	//in the file AuthSvrPolicy.ini

	TPtrC userPinInputFromFile;

	TPtrC supportsDefaultFromFile;

	TPtrC activeStateFromFile;

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113100InputId"), userPinInputFromFile) != EFalse) // the tag 'Pin11113100Input' was present

		{ writeToNamedConfig(p3100File, KIdEnteredPinTag, userPinInputFromFile); }	

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113101InputId"), userPinInputFromFile) != EFalse) // the tag 'Pin11113101Input' was present

		{ writeToNamedConfig(p3101File, KIdEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113102InputId"), userPinInputFromFile) != EFalse) // the tag 'Pin11113102Input' was present

		{ writeToNamedConfig(p3102File, KIdEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113103InputId"), userPinInputFromFile) != EFalse) // the tag 'Pin11113103Input' was present

		{ writeToNamedConfig(p3103File, KIdEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113104InputId"), userPinInputFromFile) != EFalse) // the tag 'Pin11113104Input' was present

		{ writeToNamedConfig(p3104File, KIdEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin10234100InputId"), userPinInputFromFile) != EFalse) // the tag 'Pin10234100Input' was present

		{ writeToNamedConfig(p4100File, KIdEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113100InputTrain"), userPinInputFromFile) != EFalse) // the tag 'Pin11113100Input' was present

		{ writeToNamedConfig(p3100File, KTrainEnteredPinTag, userPinInputFromFile); }	

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113101InputTrain"), userPinInputFromFile) != EFalse) // the tag 'Pin11113101Input' was present

		{ writeToNamedConfig(p3101File, KTrainEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113102InputTrain"), userPinInputFromFile) != EFalse) // the tag 'Pin11113102Input' was present

		{ writeToNamedConfig(p3102File, KTrainEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113103InputTrain"), userPinInputFromFile) != EFalse) // the tag 'Pin11113103Input' was present

		{ writeToNamedConfig(p3103File, KTrainEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113104InputTrain"), userPinInputFromFile) != EFalse) // the tag 'Pin11113104Input' was present

		{ writeToNamedConfig(p3104File, KTrainEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin10234100InputTrain"), userPinInputFromFile) != EFalse) // the tag 'Pin10234100Input' was present

		{ writeToNamedConfig(p4100File, KTrainEnteredPinTag, userPinInputFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113100Default"), supportsDefaultFromFile) != EFalse) // the tag 'Pin11113102Default' was present

		{ writeToNamedConfig(p3100File, KSupportsDefaultTag, supportsDefaultFromFile); }	

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113101Default"), supportsDefaultFromFile) != EFalse) // the tag 'Pin11113101Default' was present

		{ writeToNamedConfig(p3101File, KSupportsDefaultTag, supportsDefaultFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113102Default"), supportsDefaultFromFile) != EFalse) // the tag 'Pin11113102Default' was present

		{ writeToNamedConfig(p3102File, KSupportsDefaultTag, supportsDefaultFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113104Default"), supportsDefaultFromFile) != EFalse) // the tag 'Pin11113104Default' was present

		{ writeToNamedConfig(p3104File, KSupportsDefaultTag, supportsDefaultFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin10234100Default"), supportsDefaultFromFile) != EFalse) // the tag 'Pin10234100Default' was present

		{ writeToNamedConfig(p4100File, KSupportsDefaultTag, supportsDefaultFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113103Default"), supportsDefaultFromFile) != EFalse) // the tag 'Pin11113103Default' was present

		{ writeToNamedConfig(p3103File, KSupportsDefaultTag, supportsDefaultFromFile); }

	else 

		{ writeToNamedConfig(p3103File, KSupportsDefaultTag, falseBuf1.Des()); }	

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113100Active"), activeStateFromFile) != EFalse) // the tag 'Pin11113100Active' was present

		{ writeToNamedConfig(p3100File, KActiveStateTag, activeStateFromFile); }	

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113101Active"), activeStateFromFile) != EFalse) // the tag 'Pin11113101Active' was present

		{ writeToNamedConfig(p3101File, KActiveStateTag, activeStateFromFile); }

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113102Active"), activeStateFromFile) != EFalse) // the tag 'Pin11113102Active' was present

		{ writeToNamedConfig(p3102File, KActiveStateTag, activeStateFromFile); }	

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113104Active"), activeStateFromFile) != EFalse) // the tag 'Pin11113104Active' was present

		{ writeToNamedConfig(p3104File, KActiveStateTag, activeStateFromFile); }	

	if (GetStringFromConfig(ConfigSection(),_L("Pin10234100Active"), activeStateFromFile) != EFalse) // the tag 'Pin10234100Active' was present

		{ writeToNamedConfig(p4100File, KActiveStateTag, activeStateFromFile); }	

	if (GetStringFromConfig(ConfigSection(),_L("Pin11113103Active"), activeStateFromFile) != EFalse) // the tag 'Pin11113103Active' was present

		{ writeToNamedConfig(p3103File, KActiveStateTag, activeStateFromFile); }	

	else 

		{ writeToNamedConfig(p3103File, KActiveStateTag, falseBuf1.Des()); }	

	// ... Other PinPluginDb's can be added

	//Else the data is set in the 'Defaultdata() function'

	policyFile->WriteToFileL();

	pluginFile->WriteToFileL();

	p3100File->WriteToFileL();

	p3101File->WriteToFileL();

	p3102File->WriteToFileL();

	p3103File->WriteToFileL();

	p3104File->WriteToFileL();

	p4100File->WriteToFileL();

	CleanupStack::PopAndDestroy(8,policyFile);

	return KErrNone;

	}

/**

 Read plugin input train data from testexecute ini file , when aInitTrainInput

 is set to true, or plugin input id when set to false.This data will be used to 

 initialise the Authentication Server.

*/	

TInt CTAuthSvrStepBase::InitPluginDataFromFileL(TBool aInitTrainInput)

	{

	TDriveUnit sysDrive (RFs::GetSystemDrive());

	TDriveName sysDriveName (sysDrive.Name());

	TBuf<128> fileName (sysDriveName);

	fileName.Append(KPlugin3100File);

	CIniData* p3100File = NULL;

	TRAPD(r,p3100File = CIniData::NewL(fileName));

	if(r != KErrNone)

		{

		RDebug::Print(_L("Unable to create CIniData object. Error = %d, File = %S"), r, &fileName);

		return r;

		}

	CleanupStack::PushL(p3100File);

	TPtrC userPinInputFromFile;

	if(aInitTrainInput)

		{

		if (GetStringFromConfig(ConfigSection(),_L("PinInputTrain"), userPinInputFromFile) != EFalse) // the tag 'Pin11113100Input' was present

			{ writeToNamedConfig(p3100File, KTrainEnteredPinTag, userPinInputFromFile); }

		}

	else

		{

		if (GetStringFromConfig(ConfigSection(),_L("PinInputRetrain"), userPinInputFromFile) != EFalse) // the tag 'Pin11113100Input' was present

			{ writeToNamedConfig(p3100File, KIdEnteredPinTag, userPinInputFromFile); }

		}

	p3100File->WriteToFileL();

	CleanupStack::PopAndDestroy(p3100File);

	return KErrNone;

	}

/**

 Wait for the server to shut down and so release the authentication database.

*/

void CTAuthSvrStepBase::WaitForServerToReleaseDb()

	{

	TFullName name;

	for (;;)

		{

		TFindServer find(::KAuthServerName);

		if (find.Next(name) != KErrNone)

			{

			break;

			}

		// Wait for server to terminate

		User::After(1 * 1000 * 1000);

		}

	}

/**

 	Remove any existing database file.

*/

void CTAuthSvrStepBase::RemoveExistingDbL()

	{

	WaitForServerToReleaseDb();

	TInt r = KErrNone;

	TBuf<80> dbName(AuthServer::KDbName);

	dbName[0] = 'A' + static_cast<TInt>(RFs::GetSystemDrive());				

	while ((r = iFs.Delete(dbName)) == KErrInUse)

		{

		User::After(50000);

		}

	if ((KErrPathNotFound == r) || (KErrNotFound == r))  //-12 or -1

		{

		INFO_PRINTF1(_L("The database file was absent when I tried to delete it. \

			Ignoring..."));

		r = KErrNone;	//Not Important

		}

		User::LeaveIfError(r);

	TBuf<80> pinDbName(_L("!:\\private\\102740FC\\plugin.store"));

	pinDbName[0] = 'A' + static_cast<TInt>(RFs::GetSystemDrive());				

	while ((r = iFs.Delete(pinDbName)) == KErrInUse)

		{

		User::After(50000);

		}

	if ((KErrPathNotFound == r) || (KErrNotFound == r))  //-12 or -1

		{

		INFO_PRINTF1(_L("The pin plugin database file was absent when I tried to delete it. \

					Ignoring..."));

		r = KErrNone;	//Not Important

		}

	User::LeaveIfError(r);

	TBuf<80> pinDbName1(_L("!:\\t_pinplugindlg_in.dat"));

	pinDbName1[0] = 'A' + static_cast<TInt>(RFs::GetSystemDrive());				

	while ((r = iFs.Delete(pinDbName1)) == KErrInUse)

		{

	User::After(50000);

		}

	if ((KErrPathNotFound == r) || (KErrNotFound == r))  //-12 or -1

		{

		INFO_PRINTF1(_L("The pin plugin database file (t_pinplugindlg_in.dat)was absent when I tried to delete it. \

						Ignoring..."));

		r = KErrNone;	//Not Important

	}

	User::LeaveIfError(r);

	TBuf<80> pinDbName2(_L("!:\\t_pinplugindlg_out.dat"));

	pinDbName2[0] = 'A' + static_cast<TInt>(RFs::GetSystemDrive());				

	while ((r = iFs.Delete(pinDbName2)) == KErrInUse)

		{

		User::After(50000);

		}

	if ((KErrPathNotFound == r) || (KErrNotFound == r))  //-12 or -1

		{

		INFO_PRINTF1(_L("The pin plugin database file (t_pinplugindlg_out.dat)was absent when I tried to delete it. \

						Ignoring..."));

		r = KErrNone;	//Not Important

		}

	User::LeaveIfError(r);

	//Reset the data 'AllUserID&PinValues' in AuthSvrPolicy.ini & the 

	// individual plugin Db files

	TBufC<16> initPinDbBuffer(KInitPinDatabaseValue);

	TPtr valueToWrite = initPinDbBuffer.Des();

	TBufC<16> initEnteredPinBuffer(KDefaultInput);

	TPtr defaultInputValue = initEnteredPinBuffer.Des();

	TBuf<2> noIdentityVal;

	_LIT16(KFormatLastAuth,"%u");

	noIdentityVal.Format(KFormatLastAuth, KErrNone); //generates:

	TDriveUnit sysDrive (RFs::GetSystemDrive());

	TDriveName sysDriveName (sysDrive.Name());

	TBuf<128> fileName (sysDriveName);

	fileName.Append(KAuthSvrPolicyFile);

	CIniData* policyFile=NULL;

	TRAP(r,policyFile=CIniData::NewL(fileName));

	CleanupStack::PushL(policyFile);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin3100File);

	CIniData* p3100File=NULL;

	TRAP(r,p3100File=CIniData::NewL(fileName));

	CleanupStack::PushL(p3100File);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin3101File);

	CIniData* p3101File=NULL;

	TRAP(r,p3101File=CIniData::NewL(fileName));

	CleanupStack::PushL(p3101File);

	fileName.Copy(sysDriveName);

	fileName.Append(KPlugin3102File);