--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/kerneltest/e32test/dll/t_path.cpp	Mon Oct 19 15:55:17 2009 +0100
@@ -0,0 +1,103 @@
+// 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>
+
+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;
+	}
+