// 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 <eikapp.h>
#include <s32file.h>	// class CDictionaryFileStore
#include <coemain.h>
#include <eikenv.h>
#include <bautils.h>
#include <coeutils.h>
#include <apgicnfl.h>
#include "APFDEF.H"
#include <apgcli.h>
#include <barsc2.h>
#include <barsread2.h>

_LIT(KAppResourcePath,"\\Resource\\Apps\\");

/** Default constructor.

The default constructor is empty, and there are no NewL() or NewLC() functions 
as Uikon applications are created automatically by the application DLL framework 
when applications are started. */
EXPORT_C CEikApplication::CEikApplication() : iCoeEnv (CCoeEnv::Static())
	{
	}

/** Destructor. 

Deletes any resources acquired by this CEikApplication during its construction 
phases. */
EXPORT_C CEikApplication::~CEikApplication()
	{
	iCoeEnv->DeleteResourceFile(iResourceFileOffset);
	delete iCapabilityBuf;
	iProcess = NULL;	// Not owned
	}

/**
Initiates the aParser object with the name of the application and the 
aPath and aExt specified.

@internalTechnology
*/
void CEikApplication::InitAppNameParserWithPathAndExt(TParse& aParser, const TDesC& aPath, const TDesC& aExt) const
	{
	const TFileName libPath = AppFullName();
	const TParsePtrC parsePtr(libPath);
	const TDriveName driveName = parsePtr.Drive();
	const TPtrC appName = parsePtr.Name();
	
	TParse parse;
	parse.Set(appName,&aExt, NULL);
	aParser.Set(parse.FullName(),&driveName,&aPath);
	}

/** Gets the localized name of the resource file used by this application. 

By default, this file has an extension of .rsc and uses the same name 
as the application file located in the same directory. Language variants 
are supported through BaflUtils::NearestLanguageFile().

@return The name of the resource file. Used by PreDocConstructL(). */
EXPORT_C TFileName CEikApplication::ResourceFileName() const
	{ // !! needs to cope with multi-lingual apps
	TParse parse;
	_LIT(KResFileDefaultExt,".rsc");
	InitAppNameParserWithPathAndExt(parse, KAppResourcePath, KResFileDefaultExt);

	TFileName name = parse.FullName();
	BaflUtils::NearestLanguageFile(iEikonEnv->FsSession(), name);
	return name;
	}

/** Gets the localized name of the bitmap file used by this application. 

By default, this file has an extension of .mbm and uses the same name 
as the application file in the same directory. Language variants 
are supported using BaflUtils::NearestLanguageFile().

@return The name of the bitmap store for this application. */
EXPORT_C TFileName CEikApplication::BitmapStoreName() const
	{ // !! needs to cope with multi-lingual apps
	TParse parse;
	_LIT(KBmpFileDefaultExt,".mbm");
	InitAppNameParserWithPathAndExt(parse, KAppResourcePath, KBmpFileDefaultExt);

	TFileName name = parse.FullName();
	BaflUtils::NearestLanguageFile(iEikonEnv->FsSession(),name);
	return name;
	}

/** Creates a new document.

This function is called by the application DLL framework during application startup
to create a new instance of the document associated with this application. 
This implementation of the function makes a record of the CApaProcess argument, 
and returns a document created by the un-parameterised, private, overload. */
EXPORT_C CApaDocument* CEikApplication::CreateDocumentL(CApaProcess* aProcess)
	{
	ASSERT(!iProcess);
	iProcess = aProcess;
	return CreateDocumentL();	// pure virtual implemented by each application
	}

/** Prepares for document creation.

This function is called by the application DLL framework to complete construction and 
initialise the new application object. After this function has been called, the 
CEikApplication can create document objects. If there is a default resource file for 
this app, then it is added to the control environment.

If this function leaves, this should be treated as if construction had failed, 
and the object should be destroyed by the caller. */
EXPORT_C void CEikApplication::PreDocConstructL()
	{
	// Import the application's default resource file, if any
	TFileName* fileName=new(ELeave) TFileName;
	CleanupStack::PushL(fileName);
	*fileName=ResourceFileName();
	if (fileName->Length() && ConeUtils::FileExists(*fileName))
	   	iResourceFileOffset=iCoeEnv->AddResourceFileL(*fileName);
	RApaLsSession ls;
	CleanupClosePushL(ls);
	if(ls.Connect() == KErrNone)
		{
	// Try to get the localized application caption from AppArc.
	// Fall back to the old way if we can't get a localized caption.
		if ((iAppFlags&EFlagCaptionCorrectlyLocalised)==0)
			{
			TApaAppInfo info;
			User::LeaveIfError(ls.GetAppInfo(info, AppDllUid()));
			if (info.iCaption.Length()>0)
				{
				iCaption=info.iCaption;
				iAppFlags|=EFlagCaptionCorrectlyLocalised; 
				}
			}
		delete iCapabilityBuf;
		iCapabilityBuf=NULL;
		iCapabilityBuf=new(ELeave) TApaAppCapabilityBuf();
		User::LeaveIfError(ls.GetAppCapability(*iCapabilityBuf, AppDllUid()));
		}
	CleanupStack::PopAndDestroy(&ls); 
	if ((iAppFlags&EFlagCaptionCorrectlyLocalised)==0)
		{
		*fileName=AppFullName();
		TParsePtrC parse(*fileName);
		iCaption=parse.Name();
	 	}		
	CleanupStack::PopAndDestroy(fileName);
	}


/** Gets the default document name for this application.

@param aDocumentName On return, contains the default document file name. */
EXPORT_C void CEikApplication::GetDefaultDocumentFileName(TFileName& aDocumentName) const
	{
	TApaAppCaption candidate;
	
	// Try to get the application's default document file name from the application's
	// resource file. By convension, the default document file name TBUF is always located 
	// at the beginning of the applicaton's resource file, after the RSS_SIGNATURE and 
	// before the EIK_APP_INFO (i.e. with an offset of EDefaultNameResourceOffset).
	if (iResourceFileOffset)
	    {
		iCoeEnv->ReadResource(candidate, EDefaultNameResourceOffset+iResourceFileOffset);
		if (!candidate.Length())
			{
			aDocumentName.Zero();
			return;
			}
		}
	//If this application has no resource file, use the same behavior as above.
	else		
		{
		aDocumentName.Zero();
		return;
		}
	
	// Make sure we got the full document name including drive and path
	TParse parse;
	parse.Set(candidate, &aDocumentName, NULL);
	aDocumentName = parse.FullName();
	}

EXPORT_C CDictionaryStore* CEikApplication::OpenIniFileLC(RFs& aFs) const
/** Opens the application's .ini file, if one exists. 

If a .ini file does not exist for this application, or if it is corrupt, 
this function creates one and opens that. .ini files are located on system drive, 
in the same directory as the application EXE.

@param aFs File server session to use. 
@return Pointer to the dictionary store for the .ini file. */
	{
	// get the path of the ini file
	TParse parser;
	SetToIniFileNameL(parser);
	// ensure that all directories in the path exist 
	aFs.MkDirAll(parser.FullName()); // ignore the error //
	// open the ini file if it exists, otherwise create a new one
	CDictionaryStore* inifile=NULL;
	// if first attempt to open ini fails because of corrupt file, delete it and try again.
	TRAPD(err,inifile=CDictionaryFileStore::OpenL(aFs,parser.FullName(),AppDllUid()));
	if (err==KErrNone)
		CleanupStack::PushL(inifile);
	else if (err==KErrEof || err==KErrCorrupt)
		{
		User::LeaveIfError(aFs.Delete(parser.FullName()));
		inifile=CDictionaryFileStore::OpenLC(aFs,parser.FullName(),AppDllUid());
		err=KErrNone;
		}
	User::LeaveIfError(err);
	return inifile;
	}

EXPORT_C void CEikApplication::SetToIniFileNameL(TParse& aParser) const
/** Sets a supplied file name parser to contain the path of this application's 
.ini file.

@param aParser A file name parser. On return, this contains the path of 
the application's ini file. */
	{
	TChar sysDrive = RFs::GetSystemDriveChar();
	RBuf defaultDrive;
	_LIT(KColon,":");
	TInt maxSizeOfFileName = KColon().Length() + 1;
	defaultDrive.CreateL(maxSizeOfFileName);
	defaultDrive.Append(sysDrive);
	defaultDrive.Append(KColon());
	defaultDrive.CleanupClosePushL();
	RFs& fs = iEikonEnv->FsSession();
	TFileName fullName;
	User::LeaveIfError(fs.PrivatePath(fullName));

	TParsePtrC ptr(AppFullName());
	fullName.Append(ptr.Name());

	User::LeaveIfError(aParser.SetNoWild(KIniFileExtension,&defaultDrive,&fullName));
	CleanupStack::PopAndDestroy(&defaultDrive);
	}

EXPORT_C void CEikApplication::Capability(TDes8& aInfo) const
/** Gets the application's capabilities.

Application developers should not need to override this function. */
	{
	TApaAppCapability::CopyCapability(aInfo, *iCapabilityBuf);
	}

EXPORT_C void CEikApplication::NewAppServerL(CApaAppServer*& /*aAppServer*/)
/** Virtual function called by the framework when the application
has been launched as a server application.
Applications that wish to be used as server applications must
override this function to return their implementation of the server.

Base class implementation of this function leaves with KErrNotSupported, 
to prevent non-server applications from being launched as server applications. 

@param aAppServer The server pointer to be set. */
	{
	User::Leave(KErrNotSupported);
	}

EXPORT_C void CEikApplication::CEikApplication_Reserved1()
	{
	}
	
EXPORT_C void CEikApplication::CEikApplication_Reserved2()
	{
	}

/** Calling this method will ensure that the application Caption has been localized.
This is called at the start of applications override of CEikApplication's
CreateDocumentL, when application needs to started in Critical 
phase of Start-Up.

@param aLocalisableResourceFile Location of the localized resource file 
*/
EXPORT_C void CEikApplication::EnsureCaptionIsLocalisedL(const TDesC& aLocalisableResourceFile)
	{
	if (!(iAppFlags&EFlagCaptionCorrectlyLocalised))
		{
		TFileName name(aLocalisableResourceFile);
		BaflUtils::NearestLanguageFile(iEikonEnv->FsSession(), name);
		RResourceReader resourceReader;
		CResourceFile *resourceFile = CResourceFile::NewLC(iEikonEnv->FsSession(),aLocalisableResourceFile,0,0);
		resourceReader.OpenLC(resourceFile, 1);

		resourceReader.ReadUint32L(); 
		resourceReader.ReadUint32L();
		
		TPtrC captionShort = resourceReader.ReadTPtrCL();

		resourceReader.ReadUint32L();
		resourceReader.ReadUint32L(); 

		// read caption
		TPtrC caption = resourceReader.ReadTPtrCL();
		iCaption = caption;
		iAppFlags|=EFlagCaptionCorrectlyLocalised;
		CleanupStack::PopAndDestroy(2, resourceFile);
		}
	}