/*
* 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();
		}
	}