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

// TSPConvUtil class

// 

//

#include <f32file.h>

#include <e32cons.h>

#include "D32Assert.h"

#include "cn_util.h"

#include "cn_main.h"

#include "cn_cmdparse.h"

TBool TSPConvUtil::iPromptOnError = ETrue;

_LIT(KTxt0, "Program information");

_LIT(KTxt1, "EDbSpConv version 1.0\n");

_LIT(KTxt2, "Symbian OS text policy file/binary policy file converter\n");

_LIT(KTxt3, "Copyright (c) 2004 Symbian Software Ltd. All rights reserved.\n");

_LIT(KTxt4, "\nUsage:\n");

_LIT(KTxt5, "EDbSpConv /h\n");

_LIT(KTxt6, "EDbSpConv /f=<text file> /b=[path]\\<uid>[.spd] [/s]\n");

_LIT(KTxt7, "\nWhere:\n");

_LIT(KTxt8, "/h          - displays program information\n");

_LIT(KTxt9, "<text file> - security policy text file, including path\n");

_LIT(KTxt10,"<uid>[.spd] - security policy binary file\n");

_LIT(KTxt11,"[path]      - optional - binary policy file path.\n");

_LIT(KTxt12,"              By default the file will be placed in the current directory.\n");

_LIT(KTxt13,"<uid>       - database format uid - hex\n");

_LIT(KTxt14,"[/s]        - optional - does not wait for a button pressing in case\n");

_LIT(KTxt15,"              of an error (when an error message is displayed).\n");

/**

Prints program information.

*/

static void PrintInfoL()

	{

	CConsoleBase* con = Console::NewL(KTxt0, TSize(KConsFullScreen, KConsFullScreen));

	CleanupStack::PushL(con);

	con->Printf(KTxt1);

	con->Printf(KTxt2);

	con->Printf(KTxt3);

	con->Printf(KTxt4);

	con->Printf(KTxt5);

	con->Printf(KTxt6);

	con->Printf(KTxt7);

	con->Printf(KTxt8);

	con->Printf(KTxt9);

	con->Printf(KTxt10);

	con->Printf(KTxt11);

	con->Printf(KTxt12);

	con->Printf(KTxt13);

	con->Printf(KTxt14);

	con->Printf(KTxt15);

	con->Getch();

	CleanupStack::PopAndDestroy(con);

	}

/**

Parses command line arguments and fills TCmdLinePrm structure with the parsed data.

A a result of method's execution, the following items will be stored in aCmdLinePrm:

requested action: (BIN->TXT) or (TXT->BIN), text policy file path and

binary policy file path.

If there is a "/s" command line argument and there are parsing errors, the error message

will be stored in epocwind.out file only. By default (no "/s" command) the error messages 

will be displayed on the screen and stored in epocwind.out file.

@param aCmdLineParser A reference to a command line argument parser instance.

@param aCmdLinePrm A reference to a TCmdLinePrm instance. Output parameter. The parsed

                   command line arguments will be stored there.

@leave KErrArgument Not enough command line arguments, bad argument, non-recognizable argument.

@leave KErrNotFound Missing command line argument.

*/

void TSPConvUtil::ParseL(const CCommandLineArguments& aCmdLineParser, 

						 TCmdLinePrm& aCmdLinePrm)

	{

	aCmdLinePrm.Zero();

	TInt prmCnt = aCmdLineParser.Count();

	if(prmCnt < 2)

		{//Print program information and exit

		::PrintInfoL();

		User::Exit(KErrNone);

		}

	else

		{

		//The comand is fixed explicitly, because now there is only one conversion:

		//from text policy file to binary policy file.

		aCmdLinePrm.iAction = TCmdLinePrm::ETxt2Bin;

		for(TInt i=0;i<prmCnt;++i)

			{

			TPtrC arg = aCmdLineParser.Arg(i);

			_LIT(KPrintInfoCmd, "/H");

			_LIT(KSuppressPromptCmd, "/S");

			_LIT(KTextFilePrm, "/F=");

			_LIT(KBinFilePrm, "/B=");

			TInt pos;

			if(arg == KPrintInfoCmd)

				{//Print program information and exit

				::PrintInfoL();

				User::Exit(KErrNone);

				}

			else if(arg == KSuppressPromptCmd)

				{

				TSPConvUtil::iPromptOnError = EFalse;

				}

			if((pos = arg.Find(KTextFilePrm)) != KErrNotFound)

				{

				if(pos != 0)

					{

					__LEAVE(KErrArgument);

					}

				aCmdLinePrm.iTxtFile.Copy(arg.Right(arg.Length() - KTextFilePrm().Length()));

				}

			else if((pos = arg.Find(KBinFilePrm)) != KErrNotFound)

				{

				if(pos != 0)

					{

					__LEAVE(KErrArgument);

					}

				aCmdLinePrm.iBinFile.Copy(arg.Right(arg.Length() - KBinFilePrm().Length()));

				}

			}//end of - for(TInt i=0;i<prmCnt;++i)

		}//end of else - if(prmCnt < 2)

	if(aCmdLinePrm.iAction == TCmdLinePrm::ENone)

		{

		_LIT(KText, "Invalid command line arguments, use \"/h\" option for help\n");

		TSPConvUtil::Print(KText);

		__LEAVE(KErrArgument);

		}

	if(aCmdLinePrm.iTxtFile.Length() == 0)

		{

		_LIT(KText, "No text file, use \"/h\" option for help\n");

		TSPConvUtil::Print(KText);

		__LEAVE(KErrArgument);

		}

	if(aCmdLinePrm.iBinFile.Length() == 0)

		{

		_LIT(KText, "No UID, use \"/h\" option for help\n");

		TSPConvUtil::Print(KText);

		__LEAVE(KErrArgument);

		}

	}

/**

The method checks if the file path (aFile parameter) exists.

@param aFs File server session.

@param aFile File path.

@return ETrue - file exists, EFalse - file not found. EFalse may also reflect some kind of

        file system error.

*/

TBool TSPConvUtil::FileExists(RFs& aFs, const TDesC& aFile)

	{

	TEntry fileEntry;

	return aFs.Entry(aFile, fileEntry) == KErrNone;

	}

/**

The method checks and constructs full binary policy file path from aFile parameter.

@param aFile The expected format is:

             1) <drive:>\<path>\<UID string>

             2) <drive:>\<path>\<UID string>.spd

             3) <UID string>

             4) <UID string>.spd

			 '/' symbol might be used as a directory separator as well.

			 Output parameter - the created binary policy file path will be stored there.

@leave KErrArgument Bad format of aFile input parameter.

*/

void TSPConvUtil::ConstructBinFileNameL(TDes& aFile)

	{

	//Replace all '/' in aFile with '\', otherwise TParse won't work properly.

	TInt pos;

	while((pos = aFile.Locate('/')) != KErrNotFound)

		{

		aFile[pos] = '\\';

		}

	TParse fileNameParser;

	__LEAVE_IF_ERROR(fileNameParser.Set(aFile, NULL, NULL));

	TPtrC fileName = fileNameParser.Name();

	TUid dbUid;

	TLex lex(fileName);

	if(lex.Val(*(TUint32*)&dbUid, EHex) == KErrNone && lex.Eos())

		{

		if(dbUid != KNullUid)

			{

			_LIT(KExt, ".SPD");

			TPtrC fileExt = fileNameParser.Ext();

			if(fileExt.Length() == 0)

				{

				aFile.Append(KExt);

				}

			else if(fileExt != KExt)

				{

				_LIT(KText, "Invalid \"UID\" file extension: \"%S\"\n");

				TSPConvUtil::Print(KText, fileExt);

				__LEAVE(KErrArgument);

				}

			return;

			}

		}

	_LIT(KText, "Invalid \"UID\" file: \"%S\"\n");

	TSPConvUtil::Print(KText, aFile);

	__LEAVE(KErrArgument);

	}

/**

The method extracts the UID from aFile parameter, which is expected to represent 

binary security policy file path.

The method asserts that the extracted UID is not KNullUid.

@param aFile Binary policy file path

@leave System-wide error codes from file name parsing or KErrNoMemory (from the parser creation).

*/

TUid TSPConvUtil::UidFromFileNameL(const TDesC& aFile)

	{

	TParse* parser = new (ELeave) TParse;

	CleanupStack::PushL(parser);

	__LEAVE_IF_ERROR(parser->Set(aFile, NULL, NULL));

	TPtrC fileName = parser->Name();

	TUid domainUid;

	TLex lex(fileName);

	if(lex.Val(*(TUint32*)&domainUid, EHex) == KErrNone && lex.Eos() && domainUid != KNullUid)

		{

		}

	CleanupStack::PopAndDestroy(parser);

	__ASSERT(domainUid != KNullUid);

	return domainUid;

	}

/**

The method prints aText string to epocwnd.out file and on the screen and waits for

a button pressing.

If "/s" command line argument is presented, the method won't wait for a button pressing.

@param aText The text which has to be printed.

*/

void TSPConvUtil::Print(const TDesC& aText)

	{

	RDebug::Print(aText);

	if(TSPConvUtil::iPromptOnError)

		{

		RNotifier notify;

		TInt err = notify.Connect();

		if(err == KErrNone)

			{

			TRequestStatus stat;

			TInt but;

			_LIT(KNotify,"EDBSPConv");

			_LIT(KContinue,"Continue");

			notify.Notify(KNotify, aText, KContinue, KNullDesC, but, stat);

			User::WaitForRequest(stat);

			notify.Close();

			}

		else

			{

			RDebug::Print(_L("Error=%d connecting notifier session!\n"), err);

			}

		}

	User::InfoPrint(aText);

	}

/**

The method outputs a formatted text to epocwnd.out file and on the screen using aFormat 

parameter as a format string and aNumber as a number which has to be printed out with 

the supplied format string.

If "/s" command line argument is presented, the method won't wait for a button pressing.

@param aFormat The number format string.

@param aNumber The number, which has to be printed together with the text. There must be a "%d"

               format specification somewhere in aFormat parameter.

*/

void TSPConvUtil::Print(const TDesC& aFormat, TInt aNumber)

	{

	TBuf<300> buf;

	buf.Format(aFormat, aNumber);

	TSPConvUtil::Print(buf);

	}

/**

The method outputs a formatted text to epocwnd.out file and on the screen using aFormat 

parameter as a format string and aText as a text which has to be printed out with the 

supplied format string.

If "/s" command line argument is presented, the method won't wait for a button pressing.

@param aFormat The number format string.

@param aText The text, which has to be formatted. There must be a "%S"

               format specification somewhere in aFormat parameter.

*/

void TSPConvUtil::Print(const TDesC& aFormat, const TDesC& aText)

	{

	TBuf<300> buf;

	buf.Format(aFormat, &aText);

	TSPConvUtil::Print(buf);

	}

/**

The method outputs a formatted text to epocwnd.out file and on the screen using aFormat 

parameter as a format string and aText1 and aText2 as texts which have to be printed 

out with the supplied format string.

If "/s" command line argument is presented, the method won't wait for a button pressing.

@param aFormat The number format string.

@param aText1 The text, which has to be printed out. There must be a "%S"

               format specification somewhere in aFormat parameter.

@param aText2 The text, which has to be printed out. There must be a "%S"

               format specification somewhere in aFormat parameter.

*/

void TSPConvUtil::Print(const TDesC& aFormat, const TDesC& aText1, const TDesC& aText2)

	{

	TBuf<500> buf;

	buf.Format(aFormat, &aText1, &aText2);

	TSPConvUtil::Print(buf);

	}