// Copyright (c) 1995-2009 Nokia Corporation and/or its subsidiary(-ies).

 // All rights reserved.

 // This component and the accompanying materials are made available

 // under the terms of the License "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:

 // f32\sfile\sf_lwins.cpp

 // 

 //

 #include "sf_std.h"

 #include <f32image.h>

 #include "sf_image.h"

 #include <e32uid.h>

 #include <emulator.h>

 #include <e32wins.h>

 #include <stdlib.h>

 #include <hal.h>

 _LIT(KDirSystemPrograms,"\\System\\Programs\\");

 _LIT(KDirSystemLibs,"\\System\\Libs\\");

 _LIT8(KRomSystemLibs,"z:\\system\\libs\\");

 _LIT(KDirSysBin,"\\sys\\bin\\");

 _LIT8(KRomSysBin,"z:\\sys\\bin\\");

 _LIT(KDirSystemBin,"\\System\\Bin\\");

 _LIT8(KRomSystemBin,"z:\\system\\Bin\\");

 #ifdef _DEBUG

 extern TRequestStatus* ProcessDestructStatPtr;

 extern TBool ProcessCreated;

 #endif

 /******************************************************************************

  * Executable file find routines for WINS

  ******************************************************************************/

 TInt GetPEInfo(TProcessCreateInfo& aInfo)

 //

 // Extract the Uids, etc from the PE file

 //

 	{

 	TBuf<MAX_PATH> ifilename;

 	ifilename.Copy(aInfo.iFileName);

 	TBuf<MAX_PATH> filename;

 	TInt r = MapEmulatedFileName(filename, ifilename);

 	if (r == KErrNone)

 		{

 		Emulator::RImageFile pefile;

 		r = pefile.Open((LPCTSTR)filename.PtrZ()); //SL: Added cast

 		if (r == KErrNone)

 			{

 			pefile.GetInfo(aInfo);

 			// Overide capabilities in image

 			for(TInt i=0; i<SCapabilitySet::ENCapW; i++)

 				{

 				aInfo.iS.iCaps[i] |= DisabledCapabilities[i];

 				aInfo.iS.iCaps[i] &= AllCapabilities[i];

 				}

 			pefile.Close();

 			}

 		}

 	return r;

 	}

 TBool CheckIsDirectoryName(TProcessCreateInfo& aInfo)

 //

 // Attempt to get file attributes from Windows if attributes can't be found 

 // just assume not a directory otherwise check the directory bit

 // Only intended for use by FindBin, FindDll and FindExe

 //

 	{	

 	TBuf<MAX_PATH> ifilename;

 	ifilename.Copy(aInfo.iFileName);

 	TBuf<MAX_PATH> filename;

 	if (MapEmulatedFileName(filename, ifilename) != KErrNone)

 		return EFalse; // just return EFalse as the error will be picked up later

 	DWORD attr = Emulator::GetFileAttributes((LPCTSTR)filename.PtrZ());

 	if (attr != -1 && (attr & FILE_ATTRIBUTE_DIRECTORY))

 		return ETrue;

 	return EFalse;

 	}

 TInt FindBin(E32Image& aImage)

 //

 // WINS find Binary in system bin

 // System directories on all drives Y-A,Z

 //

 	{

 	__IF_DEBUG(Printf("FindBin"));

 	TInt len=aImage.iFileName.Length();

 	// check if it's a bare drive letter with no path

 	if (len>=3 && aImage.iFileName[1]==':' && aImage.iFileName[2]!='\\')

 		{

 		if (len + KRomSysBin().Length()-2 <= aImage.iFileName.MaxLength())

 			aImage.iFileName.Insert(2,KRomSysBin().Mid(2));

 		}

 	// Ensure consistent error codes with h/w, see DEF092502

 	// Unlike Symbian on h/w targets, on Windows searching 

 	// for a driectory, including "." and "..", will return KErrorAccessDenied

 	if (CheckIsDirectoryName(aImage))

 		return KErrNotFound;	

 	// first try and find it in the given directory

 	TInt r=GetPEInfo(aImage);

 	// Next : if looking at z:\sys\bin then look for it in emulator path

 	if (r == KErrNotFound || r == KErrPathNotFound)

 		{

 		if (aImage.iFileName.FindF(KRomSysBin) == 0)

 			{

 			aImage.iFileName.Delete(0, KRomSysBin().Length());

 			r = GetPEInfo(aImage);

 			}

 		if (r==KErrNotFound || r == KErrPathNotFound)

 			{

 			//	Now try finding it in the EPOC scheme of things

 			TBuf<MAX_PATH> ifilename;

 			ifilename.Copy(aImage.iFileName);

 			TFindFile ff(gTheLoaderFs);

 			r=ff.FindByDir(ifilename,KDirSysBin);

 			if (r==KErrNone)

 				{

 				aImage.iFileName.Copy(ff.File());

 				__IF_DEBUG(Printf("Found file %S",&aImage.iFileName));

 				r=GetPEInfo(aImage);

 				}

 			else

 				{

 				// Last chance look in emulator path for driveless things

 				if (aImage.iFileName.FindF(KRomSysBin().Mid(2)) == 0)

 					{

 					aImage.iFileName.Delete(0, KRomSysBin().Length()-2);

 					r = GetPEInfo(aImage);

 					}

 				else 

 					{

 					__IF_DEBUG(Printf("Filename %S not found in ?:\\sys\\bin",&aImage.iFileName));

 					r=KErrNotFound;

 					}

 				}

 			}

 		}

 	if(PlatSec::ConfigSetting(PlatSec::EPlatSecEnforceSysBin))

 		return r;

 	// Next : if looking at z:\system\bin then look for it in emulator path

 	if (r == KErrNotFound || r == KErrPathNotFound)

 		{

 		if (aImage.iFileName.FindF(KRomSystemBin) == 0)

 			{

 			aImage.iFileName.Delete(0, KRomSystemBin().Length());

 			r = GetPEInfo(aImage);

 			}

 		if (r==KErrNotFound || r == KErrPathNotFound)

 			{

 			//	Now try finding it in the EPOC scheme of things

 			TBuf<MAX_PATH> ifilename;

 			ifilename.Copy(aImage.iFileName);

 			TFindFile ff(gTheLoaderFs);

 			r=ff.FindByDir(ifilename,KDirSystemBin);

 			if (r==KErrNone)

 				{

 				aImage.iFileName.Copy(ff.File());

 				__IF_DEBUG(Printf("Found file %S",&aImage.iFileName));

 				r=GetPEInfo(aImage);

 				}

 			else

 				{

 				__IF_DEBUG(Printf("Filename %S not found",&aImage.iFileName));

 				r=KErrNotFound;

 				}

 			}

 		}

 	return r;

 	}

 TInt FindExe(E32Image& aImage)

 //

 // WINS find executable

 // System directories on all drives Y-A,Z

 //

 	{

 	__IF_DEBUG(Printf("FindExe"));

 	TInt len  = aImage.iFileName.Length();

 	// check if it's a bare drive letter with no path

 	if (len >= 3 && aImage.iFileName[1]==':' && aImage.iFileName[2]!='\\')

 		{

 		if (len + KRomSysBin().Length()-2 <= aImage.iFileName.MaxLength())

 			aImage.iFileName.Insert(2,KRomSysBin().Mid(2));

 		}

 	// Ensure consistent error codes with h/w, see DEF092502

 	// Unlike Symbian on h/w targets, on Windows searching 

 	// for a driectory, including "." and "..", will return KErrorAccessDenied

 	if (CheckIsDirectoryName(aImage))

 		return KErrNotFound;

 	// first try and find it in the given directory

 	TInt r=GetPEInfo(aImage);

 	// Next : if looking at z:\sys\bin then look for it in emulator path

 	if (r == KErrNotFound || r == KErrPathNotFound)

 		{

 		if (aImage.iFileName.FindF(KRomSysBin) == 0)

 			{

 			aImage.iFileName.Delete(0, KRomSysBin().Length());

 			r = GetPEInfo(aImage);

 			}

 		if (r==KErrNotFound || r == KErrPathNotFound)

 			{

 			//	Now try finding it in the EPOC scheme of things

 			TBuf<MAX_PATH> ifilename;

 			ifilename.Copy(aImage.iFileName);

 			TFindFile ff(gTheLoaderFs);

 			r=ff.FindByDir(ifilename,KDirSysBin);

 			if (r==KErrNone)

 				{

 				aImage.iFileName.Copy(ff.File());

 				__IF_DEBUG(Printf("Found file %S",&aImage.iFileName));

 				r=GetPEInfo(aImage);

 				}

 			else

 				{

 				__IF_DEBUG(Printf("Filename %S not found in ?:\\sys\\bin",&aImage.iFileName));

 				r=KErrNotFound;

 				}

 			}

 		}

 	if(PlatSec::ConfigSetting(PlatSec::EPlatSecEnforceSysBin))

 		return r;

 	// Next : if looking at z:\system\libs then look for it in emulator path

 	if (r == KErrNotFound || r == KErrPathNotFound)

 		{

 		if (aImage.iFileName.FindF(KRomSystemLibs) == 0)

 			{

 			aImage.iFileName.Delete(0, KRomSystemLibs().Length());

 			r = GetPEInfo(aImage);

 			}

 		if (r==KErrNotFound || r == KErrPathNotFound)

 			{

 			//	Now try finding it in the EPOC scheme of things

 			TBuf<MAX_PATH> ifilename;

 			ifilename.Copy(aImage.iFileName);

 			TFindFile ff(gTheLoaderFs);

 			r=ff.FindByDir(ifilename,KDirSystemPrograms);

 			if (r==KErrNone)

 				{

 				aImage.iFileName.Copy(ff.File());

 				__IF_DEBUG(Printf("Found file %S",&aImage.iFileName));

 				r=GetPEInfo(aImage);

 				}

 			else

 				{

 				__IF_DEBUG(Printf("Filename %S not found",&aImage.iFileName));

 				r=KErrNotFound;

 				}

 			}

 		}

 	return r;

 	}

 // WINS FindDll

 TInt FindDll(E32Image& aImage, const TDesC8* aPath)

 //

 // Search for a dll in the following sequence ...

 // 1. Supplied path parameter

 // 2. System directories on all drives

 //

 	{

 	TInt len = aImage.iFileName.Length();

 	// check if it's a bare drive letter with no path

 	if (len >=3 && aImage.iFileName[1]==':' && aImage.iFileName[2]!='\\')

 		{

 		if (len + KRomSysBin().Length()-2 <= aImage.iFileName.MaxLength())

 			aImage.iFileName.Insert(2,KRomSysBin().Mid(2));

 		}

 	// Ensure consistent error codes with h/w, see DEF092502

 	// Unlike Symbian on h/w targets, on Windows searching 

 	// for a driectory, including "." and "..", will return KErrorAccessDenied

 	if (CheckIsDirectoryName(aImage))

 		return KErrNotFound;

 	TInt r=GetPEInfo(aImage);

 	// Next : if looking at z:\system\libs then look for it in emulator path

 	if (r == KErrNotFound || r == KErrPathNotFound)

 		{

 		if (aImage.iFileName.FindF(KRomSysBin) == 0)

 			{

 			aImage.iFileName.Delete(0, KRomSysBin().Length());

 			r = GetPEInfo(aImage);

 			}

 		if(!PlatSec::ConfigSetting(PlatSec::EPlatSecEnforceSysBin))

 			if (r == KErrNotFound || r == KErrPathNotFound)

 				if (aImage.iFileName.FindF(KRomSystemLibs) == 0)

 					{

 					aImage.iFileName.Delete(0, KRomSystemLibs().Length());

 					r = GetPEInfo(aImage);

 					}

 		TBuf<MAX_PATH> ifilename;

 		ifilename.Copy(aImage.iFileName);

 		if (r==KErrNotFound || r == KErrPathNotFound)

 			{

 			//	Now try finding it in the EPOC scheme of things

 			TFindFile ff(gTheLoaderFs);

 			__IF_DEBUG(Printf("FindDll aDllName %S, aPath %S",&aImage.iFileName,aPath?aPath:&KNullDesC8));

 			if (aPath && aPath->Length()!=0)

 				{

 				TBuf<MAX_PATH> ipath;

 				ipath.Copy(*aPath);

 				r=ff.FindByPath(ifilename, &ipath);

 				if (r==KErrNone)

 					{

 					aImage.iFileName.Copy(ff.File());

 					__IF_DEBUG(Printf("Found file %S",&aImage.iFileName));

 					r=GetPEInfo(aImage);

 					}

 				}

 			if (r!=KErrNone)

 				{

 				r=ff.FindByDir(ifilename,KDirSysBin);

 				if (r==KErrNone)

 					{

 					aImage.iFileName.Copy(ff.File());

 					__IF_DEBUG(Printf("Found file %S",&aImage.iFileName));

 					r=GetPEInfo(aImage);

 					}

 				}

 			if(!PlatSec::ConfigSetting(PlatSec::EPlatSecEnforceSysBin))

 				if (r!=KErrNone)

 					{

 					r=ff.FindByDir(ifilename,KDirSystemLibs);

 					if (r==KErrNone)

 						{

 						aImage.iFileName.Copy(ff.File());

 						__IF_DEBUG(Printf("Found file %S",&aImage.iFileName));

 						r=GetPEInfo(aImage);

 						}

 					}

 			if(r!=KErrNone)

 				{

 				__IF_DEBUG(Printf("Filename %S not found",&aImage.iFileName));

 				r=KErrNotFound;

 				}

 			}

 		}

 	return r;

 	}

 /******************************************************************************

  * WINS specific E32Image functions

  ******************************************************************************/

 TInt E32Image::ProcessFileName()

 //

 // Get the properly capitalised file name and root name

 //

 	{

 	TFileNameInfo fni;

 	TInt r = fni.Set(iFileName, 0);

 	if (r!=KErrNone)

 		return r;

 	iRootNameOffset = fni.iBasePos;

 	iRootNameLength = fni.iLen - fni.iBasePos;

 	iExtOffset = fni.iExtPos;

 //	TBuf<MAX_PATH> filename;

 //	TInt r=MapEmulatedFileName(filename, iFileName);

 //	if (r!=KErrNone)

 //		return r;

 //	WIN32_FIND_DATA w32fd;

 //	HANDLE h=Emulator::FindFirstFile(filename.PtrZ(), &w32fd);

 //	if (h==0)

 //		return Emulator::LastError();

 //	TPtrC real_filename((const TText*)&w32fd.cFileName[0]);

 //	FindClose(h);

 //	iFileName.SetLength(slash+1);

 //	iFileName+=real_filename;

 	__IF_DEBUG(Printf("ProcessFileName: %S,%d,%d,%d",&iFileName,iRootNameOffset,iRootNameLength,iExtOffset));

 	return KErrNone;

 	}

 TInt E32Image::LoadProcess(const RLdrReq& aReq)

 	{

 	__IF_DEBUG(Printf("E32Image::LoadProcess %S",&aReq.iFileName));

 	iFileName=*aReq.iFileName;

 	TInt r=FindExe(*this);

 	if (r!=KErrNone)

 		r=FindBin(*this);

 	if (r==KErrNone)

 		r=ProcessFileName();

 	if (r==KErrNone)

 		r=CheckUids(iUids, aReq.iRequestedUids);

 	if (r!=KErrNone)

 		return r;

 	r = aReq.iMsg->Client((RThread&)aReq.iClientThread);

 	if (r!=KErrNone)

 		return r;

 	iClientHandle=aReq.iClientThread.Handle();

 #ifdef _DEBUG

 	iDestructStat = ProcessDestructStatPtr;

 #endif

 	iFlags |= EDataUnpaged;	// Data paging is not supported on the emulator

 	r=E32Loader::ProcessCreate(*this, aReq.iCmd);

 	__IF_DEBUG(Printf("Done E32Loader::ProcessCreate %d",r));

 	if (r!=KErrNone)

 		return r;

 #ifdef _DEBUG

 	ProcessCreated = ETrue;

 #endif

 	iClientProcessHandle=iProcessHandle;

 	r=E32Loader::ProcessLoaded(*this);

 	return r;

 	}

 // Load a code segment, plus all imports if main loadee

 TInt E32Image::LoadCodeSeg(const RLdrReq& aReq)

 	{

 	__IF_DEBUG(Printf("E32Image::LoadCodeSeg %S",aReq.iFileName));

 	const TDesC8& reqName=*aReq.iFileName;

 	const TDesC8* searchPath=aReq.iPath;

 	iFileName=reqName;

 	TInt r=FindDll(*this, searchPath);

 	if (r!=KErrNone)

 		r=FindBin(*this);

 	// Hack to support EXEDLLs which are DLLs but have EXE file extentions

 	if(r==KErrNotFound)

 		{

 		if(iFileName.Right(4).CompareF(_L8(".DLL"))==0)

 			{

 			TUint8* p = (TUint8*)iFileName.Ptr() + iFileName.Length() - 3;

 			*p++ = 'E';

 			*p++ = 'X';

 			*p++ = 'E';

 			r=FindDll(*this, searchPath);

 			if (r!=KErrNone)

 				r=FindBin(*this);

 			}

 		}

 	if (r==KErrNone)

 		r=ProcessFileName();

 	if (r==KErrNone)

 		r=CheckUids(iUids, aReq.iRequestedUids);

 	if(r==KErrNone)

 		{

 		if(this == iMain)

 			{

 			// Check that we can legally load the DLL into the process

 			r=aReq.CheckSecInfo(iS);

 			}

 		}

 	if (r!=KErrNone)

 		return r;

 	__IF_DEBUG(Printf("Checking uids for %S", &iFileName));

 	if (iUids[0]!=KDynamicLibraryUid && iUids[0]!=KExecutableImageUid)

 	    return KErrNotSupported;

 	r=CheckAlreadyLoaded();

 	if (r!=KErrNone || iAlreadyLoaded)

 		{

 		__IF_DEBUG(Printf("<LoadCodeSeg AlreadyLoaded %d",r));

 		return r;		// already loaded, either share or give up

 		}

 	__IF_DEBUG(Printf("CodeSeg create"));

 	r=E32Loader::CodeSegCreate(*this);

 	if (r==KErrNone)

 		r=E32Loader::CodeSegLoaded(*this);

 	__IF_DEBUG(Printf("<LoadCodeSeg, r=%d",r));

 	return r;

 	}

 //__DATA_CAGING__

 TInt ReadCapabilities(RLdrReq& aReq)

 //	

 //	Wins version

 //

 	{

 	E32Image* e=new E32Image;

 	if (!e)

 		return KErrNoMemory;

 	e->iMain=e;

 	e->iFileName=*aReq.iFileName;

 	TInt r=GetPEInfo(*e);

 	if (r==KErrNotFound || r == KErrPathNotFound)

 		{

 		//	z:\sys\bin\* may be found in emulator path

 		if (e->iFileName.FindF(KRomSysBin) == 0)

 			{

 			e->iFileName.Delete(0, KRomSysBin().Length());

 			r = GetPEInfo(*e);

 			}

 		}

 	if(!PlatSec::ConfigSetting(PlatSec::EPlatSecEnforceSysBin))

 		if (r==KErrNotFound || r == KErrPathNotFound)

 			{

 			//	z:\system\bin\* may be found in emulator path

 			if (e->iFileName.FindF(KRomSystemBin) == 0)

 				{

 				e->iFileName.Delete(0, KRomSystemBin().Length());

 				r = GetPEInfo(*e);

 				}

 			}

 	TPtrC8 caps((const TUint8*)&e->iS.iCaps, sizeof(e->iS.iCaps));

 	if (r==KErrNone)

 		r=aReq.iMsg->Write(2, caps);

 	delete e;

 	return r;

 	}

 TInt GetModuleInfo(RLdrReq& aReq)

 //

 //	Read capabilities from file found

 //

 	{

 	__IF_DEBUG(Printf("ReadModuleInfo %S",aReq.iFileName));

 	TFileNameInfo& fi = aReq.iFileNameInfo;

 	TInt r = KErrNotSupported;

 	// must specify a fully qualified name

 	if (fi.DriveLen() && fi.PathLen())

 		{

 		E32Image* e=new E32Image;

 		if (!e)

 			return KErrNoMemory;

 		e->iMain = e;

 		e->iFileName = *aReq.iFileName;

 		r = GetPEInfo(*e);

 		if (r==KErrNotFound || r == KErrPathNotFound)

 			{

 			//	z:\system\bin\* may be found in emulator path

 			if (e->iFileName.FindF(KRomSysBin) == 0)

 				{

 				e->iFileName.Delete(0, KRomSysBin().Length());

 				r = GetPEInfo(*e);

 				}

 			if(!PlatSec::ConfigSetting(PlatSec::EPlatSecEnforceSysBin))

 				if(r!=KErrNone)

 					if (e->iFileName.FindF(KRomSystemBin) == 0)

 						{

 						e->iFileName.Delete(0, KRomSystemBin().Length());

 						r = GetPEInfo(*e);

 						}

 			}

 		if (r == KErrNone)

 			{

 			RLibrary::TInfo ret_info;

 			memclr(&ret_info,sizeof(ret_info));

 			ret_info.iModuleVersion = e->iModuleVersion;

 			ret_info.iUids = e->iUids;

 			*(SSecurityInfo*)&ret_info.iSecurityInfo = e->iS;

 			TPckgC<RLibrary::TInfo> ret_pckg(ret_info);

 			r = aReq.iMsg->Write(2, ret_pckg);

 			}

 		delete e;

 		}

 	return r;

 	}

 TInt GetInfoFromHeader(const RLoaderMsg& /*aMsg*/)

 	{

 	TInt r;

 	r = KErrNotSupported;

 	return r;

 	}