/*

* 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: 

*

*/

#include <s32file.h>

#include <f32file.h>

#include <txtrich.h>

#include <frmprint.h>

#include <coeutils.h>

#include <clock.h>  // RMessageWindow::EMaxTextLength

#include <barsread.h>

#include <prnsetup.h>

#include <eikenv.h>

#include <techview/eikrted.h>

#include <eikfutil.h>

#include <techview/eikcfdlg.h>

#include <techview/eikon.rsg>

#include "WPAPPUI.H"

#include "WPDIALGS.H"

#include "WPDOC.H"

#include "WPPANIC.H"

#include "wpresources.h"

#include <word.rsg>

#include "WORD.HRH"

const TInt KExportTextWrapWidth=78;

const TInt KMaxTemplateMsgLen = KMaxFileName+32*2; // file name and a pre + post string

void CWordAppUi::CreateFileL(const TDesC& aFileName)

	{

	TFileName templateFileName=NormalTemplateFileNameL();

	CreateFileL(aFileName, templateFileName);

	}

void CWordAppUi::CreateFileL(const TDesC& aFileName, const TDesC& aTemplateFileName)

// Support a *switch file* create message from the shell

//

	{

	DoFileSaveL(EFalse);  // do not echo any file save info message

	Document()->DoFileNewL(aFileName, aTemplateFileName);

	iEikonEnv->UpdateTaskNameL();

	HandleModelChangeL();

	iRichEd->ResetUndo();

	iRichEd->SetBookmark();

	}

void CWordAppUi::CmdFileNewL()

// Get a filename and create that file

//

	{

	TFileName fileName;

	SetInitialPathL(fileName);

	TFileName templateFileName;

	CEikDialog* dialog=new(ELeave) CWordTemplateNewFileDialog(&fileName, templateFileName, TUidType(KNullUid, KUidAppDllDoc, KUidWordAppValue));

	if (dialog->ExecuteLD(R_WORD_TEMPLATE_FILE_NEW))  // confirms action if file already exists

		CreateFileL(fileName, templateFileName);

	}

void CWordAppUi::OpenFileL(const TDesC& aFileName)

// Supporta a *switch file* open message from the shell

//

	{

	DoFileSaveL(EFalse);  // do not echo any file save info message

	DoFileOpenL(aFileName);

	Document()->SetChanged(EFalse);

	iRichEd->ResetUndo();

	iRichEd->SetBookmark();

	}

void CWordAppUi::CmdFileOpenL()

// Get a filename from and open that file

//

	{

	TFileName filename;

	SetInitialPathL(filename);

	CEikFileOpenDialog* dialog=new(ELeave) CEikFileOpenDialog(&filename);

	dialog->RestrictToNativeDocumentFiles();

	if (dialog->ExecuteLD(R_EIK_DIALOG_FILE_OPEN))

		OpenFileL(filename);

	}

TFileName CWordAppUi::CurrentFilePath()const

	{

	TParsePtrC parser(Document()->Process()->MainDocFileName());

	return parser.DriveAndPath();

	}

void CWordAppUi::SetInitialPathL(TFileName& aFileName)const

// checks that the initial path exists, creating it if not

// if the path was read-only a default is used instead

	{

	aFileName=CurrentFilePath();

	TRAPD(ret,ConeUtils::EnsurePathExistsL(aFileName) );

	if (ret!=KErrNone)

		{// if the path is eg read-only default to C:

		TWordFilePath::GetWordDefaultFilePath(aFileName);		

		ConeUtils::EnsurePathExistsL(aFileName);

		}

	}

TFileName CWordAppUi::NormalTemplateFileNameL()const

// Returns the name of the normal template

//

	{

	TFindFile ff(iEikonEnv->FsSession());

	TFileName templateFileName;

	TWordFilePath::GetNormalTemplateFolderName(templateFileName);

	TFileName tempFileName;

	iEikonEnv->ReadResource(tempFileName, R_WORD_NORMAL_TEMPLATE_FILE_NAME);

	templateFileName.Append(tempFileName);

	TParsePtr parse(templateFileName);

	templateFileName[0] = 'Y';

	TInt err = ff.FindByDir(parse.NameAndExt(),parse.DriveAndPath());

	if(err)

		{

		// no normal template, search ROM for blank

		TWordFilePath::GetNormalTemplateFolderName(templateFileName);

		iEikonEnv->ReadResource(tempFileName, R_WORD_BLANK_TEMPLATE_FILE_NAME);

		templateFileName.Append(tempFileName);

		templateFileName[0] = 'Z';

		TParsePtr blankParse(templateFileName);

		User::LeaveIfError(ff.FindByDir(blankParse.NameAndExt(),blankParse.DriveAndPath()));

		}

	return ff.File();

	}

void CWordAppUi::DoFileOpenL(const TFileName& aFileName)

	{

	Document()->DoFileOpenL(aFileName,EFileWrite);

	iRichEd->ResetUndo();

	iRichEd->SetBookmark();

	iEikonEnv->UpdateTaskNameL();

	HandleModelChangeL();

	}

void CWordAppUi::CmdFileSaveL()

// Ascertain whether the document should be saved.

// If so, then save; otherwise do nothing.

//

	{DoFileSaveL(ETrue);}

void CWordAppUi::DoFileSaveL(TBool aEchoFileSaved)

// If the current document has changed, then save it.

// An info message confirmation is only required when not running as embedded.

//

	{

	if (iRichEd->IsReadOnly())

		return;  // all changes are lost - allow print model etc.. to be changed.

	if (DocHasChanged())

		{

		__ASSERT_DEBUG(iDocument->AppFileMode()&EFileWrite,Panic(EWordSaveReadOnlyFile));

		SaveL();

		iRichEd->SetBookmark();

		if (!iContainerAppUi && aEchoFileSaved)

			iEikonEnv->InfoMsg(R_EIK_TBUF_FILE_SAVED);

		}

	else

		{

		if (aEchoFileSaved)

			iEikonEnv->InfoMsg(R_WORD_DOCUMENT_UNCHANGED);

		}

	}

void CWordAppUi::CmdFileSaveAsL()

	{

	TFileName fileName;

	SetInitialPathL(fileName);

	CEikDialog* dialog=new(ELeave) CEikFileSaveAsDialog(&fileName,NULL,NULL);

	if (dialog->ExecuteLD(R_EIK_DIALOG_FILE_SAVEAS))

		{

		if (Document()->FileNameExists(fileName))

			{

			CmdFileSaveL();

			return;

			}

		TEntry entry;

		if (!iEikonEnv->FsSession().Entry(fileName,entry))

			User::LeaveIfError(iEikonEnv->FsSession().Delete(fileName));

		Document()->DoFileSaveToNewL(fileName);

		iEikonEnv->InfoMsg(R_EIK_TBUF_FILE_SAVED);

		// set the filename label to read correctly

		iEikonEnv->UpdateTaskNameL();

		UpdateFileNameLabelL();

		SetReadOnly(EFalse);

		iRichEd->SetBookmark();

		}

	}

void CWordAppUi::CmdFileRevertL()

	{

	if (DocHasChanged())

		{

		if (ConfirmationDialogL(ERevertTitle,ERevertText))

			{

			Document()->DoFileRevertL();

			TRAPD(ret,

			HandleModelChangeL());  // resets document to not saved yet.

				if (ret!=KErrNone)

					{// Just clear the screen cos we have new content but cannot draw it.

					CWindowGc& gc=iEikonEnv->SystemGc();

					gc.Activate(*iRichEd->DrawableWindow());

					gc.Clear(iRichEd->TextView()->ViewRect());

					gc.Deactivate();

					User::Leave(ret);

					}

			Document()->SetChanged(EFalse);

			iRichEd->ResetUndo();

			iRichEd->SetBookmark();

			}

		}

	else

		iEikonEnv->InfoMsg(R_WORD_DOCUMENT_UNCHANGED);

	}

void CWordAppUi::CmdFileSaveAsTemplateL()

	{

	TFileName filename;

	CEikDialog* dialog=new(ELeave) CWordSaveAsTemplateDialog(filename, TUidType(KNullUid, KUidAppDllDoc, KUidWordAppValue));

	if (dialog->ExecuteLD(R_WORD_TEMPLATE_SAVE_AS))

		{

		iEikonEnv->BusyMsgL(R_WORD_TEMPLATE_SAVING_FILE,KFileBusyInitialDelayInMicroSeconds);

		TParse parse;

		parse.Set(filename,NULL,NULL);

		if (!EikFileUtils::FolderExists(parse.DriveAndPath()))

			iEikonEnv->FsSession().MkDirAll(parse.DriveAndPath());

		if(ConeUtils::FileExists(filename))

			iEikonEnv->FsSession().Delete(filename);

		Document()->DoFileSaveToNewNoSwitchL(filename);

		iEikonEnv->BusyMsgCancel();

		TFileName file = parse.Name(); // can CEikUnifiedFileNameSelector has guaranteed the extra will fit

		TBuf<32> msg;

		iEikonEnv->ReadResource(msg,R_EIK_TBUF_UNIFIED_PRE_DRIVE);

		file.Append(msg);

		file.Append(parse.Drive()[0]);

		iEikonEnv->ReadResource(msg,R_EIK_TBUF_UNIFIED_POST_DRIVE);

		file.Append(msg);

		iEikonEnv->ReadResource(msg,R_WORD_TEMPLATE_SAVED_MESSAGE);

		TBuf<KMaxTemplateMsgLen> fullmsg;

		fullmsg.Format(msg,&file);

		iEikonEnv->InfoMsg(fullmsg);

		}

	}

void CWordAppUi::CmdFileDeleteTemplateL()

	{

	TFileName filename=NormalTemplateFileNameL();

	CEikDialog* dialog=new(ELeave) CWordDeleteTemplateDialog(filename, TUidType(KNullUid, KUidAppDllDoc, KUidWordAppValue));

	if (dialog->ExecuteLD(R_WORD_TEMPLATE_DELETE))

		{

		if (filename.Length())

			iEikonEnv->FsSession().Delete(filename);

		}

	}

void CWordAppUi::CmdFileTextImportL()

	{

    TFileName filename=CurrentFilePath();

    CEikDialog* dialog=new(ELeave) CEikFileOpenDialog(&filename,R_WORD_TEXT_IMPORT_DIALOG_TITLE);

    if (dialog->ExecuteLD(R_EIK_DIALOG_FILE_OPEN))

		{

		iCoeEnv->WsSession().Flush();  // !! check this out

		iEikonEnv->BusyMsgL(R_EIK_TBUF_IMPORTING,KFileBusyInitialDelayInMicroSeconds);

		iRichEd->InsertFromTextFileL(filename,CPlainText::EOrganiseByParagraph);

		SetPaginationOutOfDate(ETrue);

		SetDocChanged();

		iEikonEnv->BusyMsgCancel();

		}

	}

void CWordAppUi::CmdFileTextExportL()const

	{

	TFileName filename=CurrentFilePath();

	filename.Append(_L(".txt"));

	ConeUtils::EnsurePathExistsL(filename);

	CEikDialog* dialog=new(ELeave) CEikFileSaveAsDialog(&filename,NULL,R_WORD_TEXT_EXPORT_DIALOG_TITLE);

	if (dialog->ExecuteLD(R_EIK_DIALOG_FILE_SAVEAS))

		{

		iEikonEnv->BusyMsgL(R_EIK_TBUF_EXPORTING,KFileBusyInitialDelayInMicroSeconds);

		Text()->ExportAsTextL(filename,CPlainText::EOrganiseByParagraph,KExportTextWrapWidth); 

		iEikonEnv->BusyMsgCancel();

		}

	}

void CWordAppUi::CmdFileHtmlImportL()

	{

    TFileName filename=CurrentFilePath();

    CEikDialog* dialog=new(ELeave) CEikFileOpenDialog(&filename,R_WORD_HTML_IMPORT_DIALOG_TITLE);

    if (dialog->ExecuteLD(R_EIK_DIALOG_FILE_OPEN))

		{

		iCoeEnv->WsSession().Flush();

		iEikonEnv->BusyMsgL(R_EIK_TBUF_IMPORTING,KFileBusyInitialDelayInMicroSeconds);

		iRichEd->InsertFromHtmlFileL(filename);

		SetPaginationOutOfDate(ETrue);

		SetDocChanged();

		iEikonEnv->BusyMsgCancel();

		}

	}