/*
* Copyright (c) 1997-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: 
* Main
*
*/


#include <T_PMLPAR.H>
#include <T_RTPAR.H>
#include <E32TWIN.H>


TInt E32Main()
	{
	__UHEAP_MARK;
	CTrapCleanup* cleanup=CTrapCleanup::New();

	// create console
	RConsole theConsole;
	TSize consSize(KConsFullScreen, KConsFullScreen);
	TInt err;
	err = theConsole.Create();
	err = theConsole.Control(_L("-Visibility"));
	err = theConsole.Set(_L("The Epoc RichText Parser (c)"), consSize);
	err = theConsole.Control(_L("Visibility Newline Max_win_size"));
 
	// Parse PML
	CParser* myParser;
	CRichText* richTextDoc;
	TRAPD(ret, myParser=CParser::NewL());
	TRAP(ret, richTextDoc = myParser->ParseL(theConsole));
	TInt dum=ret;

/* 	//enable this bit for a pause before executing test code
	// wait for keypress
	theConsole.Write(_L("\n\nPress space to execute test code & parse back to PML\n"));
	TConsoleKey keystroke;
	while (keystroke.Code() != EKeySpace)
		theConsole.Read(keystroke);
*/

// *********** insert test code here ****************


/*	TInt para=richTextDoc->CountParas();
	TInt length=richTextDoc->DocumentLength();
	CParaFormat* myformat;
	TRAP(ret,myformat=CParaFormat::NewL());
	TCharFormat charFormat; CPicture* picture; TPtrC view;
	TRAP(ret,richTextDoc->SenseParaFormatL(length,myformat));
	TRAP(ret,richTextDoc->SenseChars(0,view,charFormat,picture));
	TRAP(ret,richTextDoc->SenseChars(10,view,charFormat,picture));
	richTextDoc->Delete(4,6);
	//TRAP(ret,richTextDoc->InsertL(richTextDoc->DocumentLength(),EParagraphDelimiter));
*/

	// make rich text reader & read rich text doc & parse back to PML
	CRichTextReader* myRTReader;
	CBufSeg* returnedPmlDoc; 
	TRAP(ret, myRTReader = CRichTextReader::NewL());
	TRAP(ret, returnedPmlDoc = myRTReader->ConvertRichText(richTextDoc,theConsole));

	// save to disc
	CFileApp* myFileApp;
	TRAP(ret, myFileApp = CFileApp::NewL());
	TInt errorLevel = myFileApp->SaveFile(returnedPmlDoc,myParser->iFileName);
	if (errorLevel == 0)
		theConsole.Write(_L("\n\nFile Saved"));
	else
		theConsole.Write(_L("\n\nFile Save unsuccessful!!"));

	// wait for keypress
	theConsole.Write(_L("\n\nPress space to quit\n"));
	TConsoleKey keystroke;
	while (keystroke.Code() != EKeySpace)
		theConsole.Read(keystroke);

	// finish up
	Adt::Destroy(myFileApp);
	Adt::Destroy(myRTReader);
	Adt::Destroy(myParser);
	theConsole.Destroy();
	Adt::Destroy(cleanup);
	__UHEAP_MARKEND;
	return 0;
	}