/*

* Copyright (c) 1997-2010 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 "TSTCLIPB.H"

#include <txtrich.h>

#include "TXTMRTSR.H"

#include <s32mem.h>

#include <s32file.h>

#include <gdi.h>

#include <conpics.h>

#include "../incp/T_PMLPAR.H"

#include "T_RTCLIP.h"

LOCAL_D CTestStep *pTestStep = NULL;

#define test(cond)											\

	{														\

	TBool __bb = (cond);									\

	pTestStep->TEST(__bb);									\

	if (!__bb)												\

		{													\

		pTestStep->ERR_PRINTF1(_L("ERROR: Test Failed"));	\

		User::Leave(1);										\

		}													\

	}

#undef INFO_PRINTF1

#undef INFO_PRINTF2

// copy from tefexportconst.h

#define INFO_PRINTF1(p1)        pTestStep->Logger().LogExtra(((TText8*)__FILE__), __LINE__, ESevrInfo, (p1))

#define INFO_PRINTF2(p1, p2)    pTestStep->Logger().LogExtra(((TText8*)__FILE__), __LINE__, ESevrInfo, (p1), (p2))

#define UNUSED_VAR(a) a = a

const TInt KTestCleanupStack=0x80;

LOCAL_D CTrapCleanup* TheTrapCleanup=NULL;

LOCAL_D CRichText* TheText=NULL;

LOCAL_D CParaFormatLayer* TheGlobalParaLayer=NULL;

LOCAL_D CCharFormatLayer* TheGlobalCharLayer=NULL;

LOCAL_D CClipboard* TheWriteBoard=NULL;

LOCAL_D CClipboard* TheReadBoard=NULL;

LOCAL_D TFileName TheFileName = _L("z:\\test\\app-framework\\etext\\rtclipb.pml");

LOCAL_D RFs TheSession;

class TDemStoreResolver : public MRichTextStoreResolver

	{

public:

	TDemStoreResolver(CStreamStore& aStore);

	//

	virtual const CStreamStore& StreamStoreL(TInt aPos)const;

private:

	CStreamStore* iStore;

	};

TDemStoreResolver::TDemStoreResolver(CStreamStore& aStore)

: iStore(&aStore)

	{}

const CStreamStore& TDemStoreResolver::StreamStoreL(TInt /*aPos*/)const

	{return *iStore;}

LOCAL_C void OpenWriteClipboardLC()

// Initialize a new write clipboard, after

// deleting any existing read clipboard.

//

	{

	if (TheReadBoard)

		{

		CleanupStack::PopAndDestroy();

		TheReadBoard=NULL;

		TheSession.Close();

		}

	User::LeaveIfError(TheSession.Connect());

	TheWriteBoard=CClipboard::NewForWritingLC(TheSession);

	}

LOCAL_C void OpenReadClipboardLC()

// Initialize a new read clipboard, after

// deleting any existing write clipboard.

//

	{

	if (TheWriteBoard)

		{

		TheWriteBoard->CommitL();

		CleanupStack::PopAndDestroy();

		TheWriteBoard=NULL;

		TheSession.Close();

		}

	User::LeaveIfError(TheSession.Connect());

	TheReadBoard=CClipboard::NewForReadingLC(TheSession);

	}

LOCAL_C void ParseRichTextDocumentLC()

//

	{

	CParser* myParser=CParser::NewL();

	CleanupStack::PushL(myParser);

	TheText=myParser->ParseL(TheFileName);

	TheGlobalParaLayer=(CParaFormatLayer*)TheText->GlobalParaFormatLayer();

	TheGlobalCharLayer=(CCharFormatLayer*)TheText->GlobalCharFormatLayer();

	CleanupStack::PopAndDestroy();

	//

	CleanupStack::PushL(TheText);

	}

LOCAL_C void testRichTextCutPaste1a()

//

//

	{

	INFO_PRINTF1(_L("Cut & paste, preserving formatting into non-empty document"));

	TheFileName=_L("z:\\test\\app-framework\\etext\\rtclipb2.pml");

	ParseRichTextDocumentLC();

	TheText->DeleteL(0,TheText->DocumentLength());

	TPtrC buf1(_L("ab"));

	TheText->InsertL(0,buf1);

	TheText->InsertL(1,CEditableText::EParagraphDelimiter);

	TheReadBoard=NULL;

	TheWriteBoard=NULL;

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),0,TheText->DocumentLength());

	TheText->DeleteL(1,2);  // Just leaves the single character 'a' as content.

	//

	OpenReadClipboardLC();

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),1);

	//

	CleanupStack::PopAndDestroy();  // Last clipboard object

	CleanupStack::PopAndDestroy();  // TheTextObject

	delete TheGlobalParaLayer;

	delete TheGlobalCharLayer;

	}

_LIT(KOutputFile, "c:\\etext\\t_rtclip.doc");

LOCAL_C void testRichTextCutPaste1b()

//

//

	{

	TheReadBoard=NULL;

	TheWriteBoard=NULL;

	INFO_PRINTF1(_L("Copy to Clipboard with pictures, with missing host applications."));

	TheFileName=_L("z:\\test\\app-framework\\etext\\rtclipb2.pml");  // dummy - just to get global layers

	ParseRichTextDocumentLC();

	TheText->Reset();

	//

	CXzeDoor* pic1=CXzeDoor::NewL('1',EFalse);  // never fail to detach

	CXzePicture* pic2=CXzePicture::NewL('2');

	CXzeDoor* pic3=CXzeDoor::NewL('1',EFalse);  // never fail to detach

	CXzePicture* pic4=CXzePicture::NewL('2');

	//

	TPictureHeader hdr1;

	TPictureHeader hdr2;

	TPictureHeader hdr3;

	TPictureHeader hdr4;

	//

	hdr1.iPictureType=KUidXzeDoorType;

	hdr2.iPictureType=KUidXzePictureType;

	hdr3.iPictureType=KUidXzeDoorType;

	hdr4.iPictureType=KUidXzePictureType;

	//

	hdr1.iPicture=pic1;

	hdr2.iPicture=pic2;

	hdr3.iPicture=pic3;

	hdr4.iPicture=pic4;

	//

	TheText->InsertL(0,hdr4);

	TheText->InsertL(0,hdr3);

	TheText->InsertL(0,hdr2);

	TheText->InsertL(0,hdr1);

	test(TheText->PictureCount()==4);

	//

	// Now save and reload this to get the pictures into a deferred picture store.

	RFs session;

	session.Connect();

	session.Delete(KOutputFile);

	session.MkDirAll(KOutputFile);

	CFileStore* store=CDirectFileStore::CreateLC(session,KOutputFile,EFileRead|EFileWrite);

	store->SetTypeL(KDirectFileStoreLayoutUid);

	TStreamId id=KNullStreamId;

	TRAPD(r,	

	id=TheText->StoreL(*store));

		test(r==KErrNone);

	//

	TheText->Reset();

	TheText->RestoreL(*store,id);

	MDemPictureFactory* factory=new(ELeave) MDemPictureFactory;

	TDemStoreResolver resolver(*store);

	TheText->SetPictureFactory(factory,&resolver);

	//

	// Now the tests.

	OpenWriteClipboardLC();

	TInt documentLength=TheText->DocumentLength();

	TRAP(r,

	TheText->DetachFromStoreL(CPicture::EDetachFull,0,documentLength));

	if (r==KErrNotSupported)

	    INFO_PRINTF1(_L("    SIMULATION: Some picture data has been removed\n"));

	else if (r!=KErrNone)

		User::Leave(r);

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),0,documentLength);

	//

	TheText->Reset();

	TheText->SetPictureFactory(factory,&resolver);

	documentLength=TheText->DocumentLength();

	test(documentLength==0);

	OpenReadClipboardLC();

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),documentLength);

		test(TheText->DocumentLength()==4);

		test(TheText->ParagraphCount()==1);

		test(TheText->PictureCount()==4);

	/////////////////////////////////////////////////////////////////////////////

	CleanupStack::PopAndDestroy();  // Last clipboard object

	CleanupStack::PopAndDestroy();  // store

	CleanupStack::PopAndDestroy();  // TheTextObject

	delete factory;

	delete TheGlobalParaLayer;

	delete TheGlobalCharLayer;

	session.Close();

	}

	LOCAL_C void testRichTextCutPaste1()

//

//

	{

	INFO_PRINTF1(_L("Cut&Paste - preserving formatting"));

	TheFileName=_L("z:\\test\\app-framework\\etext\\rtclipb2.pml");

	ParseRichTextDocumentLC();

	//

	CRichText* copiedText=CRichText::NewL(TheGlobalParaLayer,TheGlobalCharLayer);

	////////////////////////////////////////////////////////////////////////////

	TheReadBoard=NULL;

	TheWriteBoard=NULL;

	//

	// Scenario 1

	INFO_PRINTF1(_L("multiple partial phrases"));

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),36,73);

	OpenReadClipboardLC();

	copiedText->Reset();

	TInt pasted=0;

	TRAPD(ret,

	pasted=copiedText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),0));

	test(ret==KErrNone);

	test(pasted==73);

	test(copiedText->DocumentLength()==73);

	test(copiedText->ParagraphCount()==3);

	//

	// Scenario 2

	INFO_PRINTF1(_L("multiple whole phrases"));

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),51,60);

	copiedText->Reset();

	OpenReadClipboardLC();

	pasted=copiedText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),0);

	test(pasted==60);

	test(copiedText->DocumentLength()==60);

	test(copiedText->ParagraphCount()==3);

	//

	// Scenario 3

	INFO_PRINTF1(_L("single middle portion of a phrase"));

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),53,2);

	copiedText->Reset();

	OpenReadClipboardLC();

	pasted=copiedText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),0);

	test(pasted==2);

	test(copiedText->DocumentLength()==2);

	test(copiedText->ParagraphCount()==1);

	//

	// Scenario 4

	INFO_PRINTF1(_L("multiple phrases, starting/ending on shared paragraphs"));

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),0,140);

	copiedText->Reset();

	OpenReadClipboardLC();

	pasted=copiedText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),0);

	test(pasted==140);

	test(copiedText->DocumentLength()==140);

	test(copiedText->ParagraphCount()==5);

	//

	// Scenario 5

	INFO_PRINTF1(_L("zero phrases"));

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),70,10);

	copiedText->Reset();

	OpenReadClipboardLC();

	pasted=copiedText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),0);

	test(pasted==10);

	test(copiedText->DocumentLength()==10);

	test(copiedText->ParagraphCount()==1);

	//

	CleanupStack::PopAndDestroy();  // Last clipboard object

	CleanupStack::PopAndDestroy();  // TheTextObject

	delete copiedText;

	delete TheGlobalParaLayer;

	delete TheGlobalCharLayer;

	}

/**

@SYMTestCaseID          SYSLIB-ETEXT-CT-4001

@SYMTestCaseDesc        Pasted final paragraph formatting should match copied final paragraph

                        formatting.

@SYMTestPriority        High

@SYMTestActions         Enter three paragraphs into an empty document with the last paragraph

                        *not* terminated by a paragraph delimiter.  Apply some custom

                        formatting to the last paragraph then copy and paste all of the text

                        into a new empty document.

@SYMTestExpectedResults The formatting in the pasted final paragraph should match the copied.

@SYMDEF                 INC115783

*/

LOCAL_C void testRichTextCutPaste2()

	{

	INFO_PRINTF1(_L(" @SYMTestCaseID:SYSLIB-ETEXT-CT-4001 Pasted final paragraph format should match copied final paragraph format "));	

	TheReadBoard=NULL;

	TheWriteBoard=NULL;

	TheFileName=_L("z:\\test\\app-framework\\etext\\rtclipb2.pml");  // dummy - just to get global layers

	ParseRichTextDocumentLC();

	TheText->Reset();

	TheText->InsertL(0,_L("\x2029\x2029SomeData")); //3 paras, last has no ending para delimiter);

	//create paragraph formatting (yellow bkg, indent & bullets)

	CParaFormat* paraFormatIn = CParaFormat::NewLC();

	paraFormatIn->iBullet=new(ELeave)TBullet;  

	paraFormatIn->iBullet->iHeightInTwips=240;

	paraFormatIn->iFillColor = 0xffffff00;

	paraFormatIn->iIndentInTwips = 600;

	TParaFormatMask paraFormatMask;

	paraFormatMask.SetAttrib(EAttBullet);

	paraFormatMask.SetAttrib(EAttFillColor);

	paraFormatMask.SetAttrib(EAttIndent);

	TheText->ApplyParaFormatL(paraFormatIn,paraFormatMask,3,0); //Apply format to last para only

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),0,TheText->DocumentLength());

	TheText->Reset();

	test(TheText->DocumentLength()==0);

	OpenReadClipboardLC();

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),TheText->DocumentLength());

	test(TheText->DocumentLength()==_L("\x2029\x2029SomeData").Length());

	test(TheText->ParagraphCount()==3);

	CParaFormat* paraFormatOut = CParaFormat::NewLC();

	TheText->GetParagraphFormatL(paraFormatOut,3);

	test(paraFormatOut->IsEqual(*paraFormatIn,paraFormatMask));// in and out should match

	CleanupStack::PopAndDestroy(4);

	delete TheGlobalParaLayer;

	delete TheGlobalCharLayer;

	}

LOCAL_C void testRichTextCutPaste3()

// 

//

    {

	INFO_PRINTF1(_L("Cutting paragraph of constant character formatting"));

	TheFileName=_L("z:\\test\\app-framework\\etext\\rtclipb3.pml");

	ParseRichTextDocumentLC();

	//

	TheReadBoard=NULL;

	TheWriteBoard=NULL;

	//

	INFO_PRINTF1(_L("Copying to clipboard"));

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),4,3);

	//

	CleanupStack::PopAndDestroy();  // Last clipboard object

	CleanupStack::PopAndDestroy();  // TheTextObject

	delete TheGlobalParaLayer;

	delete TheGlobalCharLayer;

	}

LOCAL_C void testRichTextCutPaste()

// 

//

    {

	INFO_PRINTF1(_L("Cut&Paste - with Rich Text"));

	ParseRichTextDocumentLC();

	OpenWriteClipboardLC();

	INFO_PRINTF1(_L("Copy zero-length text to the clipboard"));

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),0,0);

	OpenReadClipboardLC();

	INFO_PRINTF1(_L("Paste from empty clipboard"));

	TInt err=0;

	TRAPD(ret,

	err=TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),TheText->DocumentLength()));

    UNUSED_VAR(ret);

	if (err==KErrNotFound)

	    INFO_PRINTF1(_L("        No recognised data to paste or clipboard empty\n\r"));

	TInt fieldCount=TheText->FieldCount();

	test(fieldCount==0);

	////////////////////////////////////////////////////////////////////////////

	INFO_PRINTF1(_L("Paste into empty RichText"));

	TheText->Reset();

	TheText->InsertL(TheText->DocumentLength(),_L("SomeData"));

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),0,TheText->DocumentLength());

	TheText->Reset();

		test(TheText->DocumentLength()==0);

	OpenReadClipboardLC();

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),TheText->DocumentLength());

		test(TheText->DocumentLength()==_L("SomeData").Length());

		test(TheText->ParagraphCount()==1);

		fieldCount=TheText->FieldCount();

		test(fieldCount==0);

	/////////////////////////////////////////////////////////////////////////////

	INFO_PRINTF1(_L("Pasting text only - no paragraph delimiter"));

	TheText->Reset();

	TheText->InsertL(0,_L("the  end"));

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),4);

	test(TheText->DocumentLength()==16);

	//////////////////////////////////////////////////////////////////////////

	INFO_PRINTF1(_L("Paste @ start (pos=0)"));

	TheText->Reset();

	TheText->InsertL(TheText->DocumentLength(),_L("SomeData"));

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),0);

		test(TheText->DocumentLength()==_L("SomeDataSomeData").Length());

		test(TheText->ParagraphCount()==1);

		fieldCount=TheText->FieldCount();

		test(fieldCount==0);

	////////////////////////////////////////////////////////////////////////////

	INFO_PRINTF1(_L("Paste @ end   (DocumentLength())"));

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),TheText->DocumentLength());

		test(TheText->DocumentLength()==_L("SomeDataSomeDataSomeData").Length());

		test(TheText->ParagraphCount()==1);

		fieldCount=TheText->FieldCount();

		test(fieldCount==0);

	////////////////////////////////////////////////////////////////////////////

	INFO_PRINTF1(_L("Paste @ middle"));

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),4);

	fieldCount=TheText->FieldCount();

		test(fieldCount==0);

		TBuf<33> buf(_L("SomeSomeDataDataSomeDataSomeData"));

		test(TheText->DocumentLength()==buf.Length());

		buf.Append(CEditableText::EParagraphDelimiter);

		test(TheText->Read(0)==buf);

		test(TheText->ParagraphCount()==1);

	/////////////////////////////////////////////////////////////////////////////

	/////////////////////////////////////////////////////////////////////////////

	INFO_PRINTF1(_L("Pasting rich text inbetween 2 pictures"));

	TheText->Reset();

	//

	CXzePicture* pic1=CXzePicture::NewL('1');

	CXzePicture* pic2=CXzePicture::NewL('2');

	//

	TPictureHeader hdr1;

	TPictureHeader hdr2;

	//

	hdr1.iPictureType=KUidXzePictureType;

	hdr2.iPictureType=KUidXzePictureType;

	//

	hdr1.iPicture=pic1;

	hdr2.iPicture=pic2;

	//

	TheText->InsertL(0,hdr2);

	TheText->InsertL(0,hdr1);

	//

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),0,TheText->DocumentLength());

	//

	OpenReadClipboardLC();

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),1);

		test(TheText->DocumentLength()==4);

		test(TheText->ParagraphCount()==1);

	/////////////////////////////////////////////////////////////////////////////

	INFO_PRINTF1(_L("Pasting rich text with para delimiters"));

	TheText->InsertL(1,CEditableText::EParagraphDelimiter);

	//

	OpenWriteClipboardLC();

	TheText->CopyToStoreL(TheWriteBoard->Store(),TheWriteBoard->StreamDictionary(),0,TheText->DocumentLength());

	//

	OpenReadClipboardLC();

	TheText->PasteFromStoreL(TheReadBoard->Store(),TheReadBoard->StreamDictionary(),1);

		test(TheText->DocumentLength()==10);

		test(TheText->ParagraphCount()==3);

	/////////////////////////////////////////////////////////////////////////////	

	CleanupStack::PopAndDestroy();  // Last clipboard object

	CleanupStack::PopAndDestroy();  // TheTextObject

	delete TheGlobalParaLayer;

	delete TheGlobalCharLayer;

	}

LOCAL_C void setupCleanup()

//

// Initialise the cleanup stack.

//

    {

	TheTrapCleanup=CTrapCleanup::New();

	TRAPD(r,\

		{\

		for (TInt i=KTestCleanupStack;i>0;i--)\

			CleanupStack::PushL((TAny*)1);\

		test(r==KErrNone);\

		CleanupStack::Pop(KTestCleanupStack);\

		});

	}

LOCAL_C void DeleteDataFile(const TDesC& aFullName)

	{

	RFs fsSession;

	TInt err = fsSession.Connect();

	if(err == KErrNone)

		{

		TEntry entry;

		if(fsSession.Entry(aFullName, entry) == KErrNone)

			{

			RDebug::Print(_L("Deleting \"%S\" file.\n"), &aFullName);

			err = fsSession.SetAtt(aFullName, 0, KEntryAttReadOnly);

			if(err != KErrNone) 

				{

				RDebug::Print(_L("Error %d changing \"%S\" file attributes.\n"), err, &aFullName);

				}

			err = fsSession.Delete(aFullName);

			if(err != KErrNone) 

				{

				RDebug::Print(_L("Error %d deleting \"%S\" file.\n"), err, &aFullName);

				}

			}

		fsSession.Close();

		}

	else

		{

		RDebug::Print(_L("Error %d connecting file session. File: %S.\n"), err, &aFullName);

		}

	}

CT_RTCLIP::CT_RTCLIP()

    {

    SetTestStepName(KTestStep_T_RTCLIP);

    pTestStep = this;

    }

TVerdict CT_RTCLIP::doTestStepL()

    {

    SetTestStepResult(EFail);

    INFO_PRINTF1(_L("Cut & Paste"));

    __UHEAP_MARK;

    setupCleanup();

    TRAPD(r1, testRichTextCutPaste());

    TRAPD(r2, testRichTextCutPaste1());

    TRAPD(r3, testRichTextCutPaste1a());

    TRAPD(r4, testRichTextCutPaste1b());

    TRAPD(r5, testRichTextCutPaste2());

    TRAPD(r6, testRichTextCutPaste3());

    delete TheTrapCleanup;

    __UHEAP_MARKEND;

    ::DeleteDataFile(KOutputFile);      //deletion of data files must be before call to End() - DEF047652

    if (r1 == KErrNone && r2 == KErrNone && r3 == KErrNone && r4 == KErrNone && r5 == KErrNone && r6 == KErrNone)

        {

        SetTestStepResult(EPass);

        }

    return TestStepResult();

    }