// Copyright (c) 2007-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:

// e32test\dll\t_path.cpp

// Overview:

// Test imported DLL path search order.

// API Information:

// None (implicit searching when loading an executable)

// Details:

// - t_pathdll1 and t_pathdll2 both export the same function which returns 1

// 2 respectively.

// - Run t_path2 (linked to t_pathdll1) and check return value from DLL - should

// be 1.

// - Copy t_pathdll2 to C: and rename to t_pathdll1 - it should now be loaded 

// instead.

// - Run t_path2 again and check return value from DLL - should be 2.

// Platforms/Drives/Compatibility:

// Not on emulator.

// Assumptions/Requirement/Pre-requisites:

// Failures and causes:

// Base Port information:

// 

//

#define __E32TEST_EXTENSION__

#include <e32test.h>

#include <f32file.h>

#include <e32ldr.h>

#include <e32ldr_private.h>

RTest test(_L("T_PATH"));

RFs	gFs;

CFileMan* gFileMan;

TInt E32Main()

	{

	test.Title();

	test.Start(_L("Test imported DLL search path order"));

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

		{

		test.Printf(_L("Skipping test as sysbin enforcement is disabled"));

		return KErrNone;

		}

	// Turn off evil lazy dll unloading

	RLoader l;

	test_KErrNone(l.Connect());

	test_KErrNone(l.CancelLazyDllUnload());

	l.Close();

	CTrapCleanup* ct = CTrapCleanup::New();

	test_NotNull(ct);

	test_KErrNone(gFs.Connect());

	TRAPD(r, gFileMan=CFileMan::NewL(gFs));

	test_KErrNone(r);

	test.Next(_L("Run t_path2, expecting DLL 1 to be loaded"));

	_LIT(KPath2, "t_path2");

	RProcess path2;

	test_KErrNone(path2.Create(KPath2, KNullDesC));

	TRequestStatus stat;

	path2.Logon(stat);

	path2.Resume();

	User::WaitForRequest(stat);

	test_Equal(EExitKill, path2.ExitType());

	test_Equal(1, path2.ExitReason());

	path2.Close();

	test.Next(_L("Copy DLL 2 to C drive"));

	_LIT(KCopySrc, "Z:\\sys\\bin\\t_pathdll2.dll");

	_LIT(KCopyDest, "C:\\sys\\bin\\");

	test_KErrNone(gFileMan->Copy(KCopySrc(), KCopyDest(), CFileMan::ERecurse));

	_LIT(KRenSrc, "C:\\sys\\bin\\t_pathdll2.dll");

	_LIT(KRenDest, "C:\\sys\\bin\\t_pathdll1.dll");

	test_KErrNone(gFileMan->Rename(KRenSrc(), KRenDest()));

	test.Next(_L("Run t_path2, expecting DLL 2 to be loaded"));

	test_KErrNone(path2.Create(KPath2, KNullDesC));

	path2.Logon(stat);

	path2.Resume();

	User::WaitForRequest(stat);

	test_Equal(EExitKill, path2.ExitType());

	test_Equal(2, path2.ExitReason());

	path2.Close();

	// cleanup

	gFileMan->Delete(KRenDest);

	delete gFileMan;

	gFs.Close();

	delete ct;

	test.End();

	return KErrNone;

	}