1 files changed, 152 insertions, 0 deletions
diff --git a/src/pal/tests/palsuite/filemapping_memmgt/GetProcAddress/test2/test2.cpp b/src/pal/tests/palsuite/filemapping_memmgt/GetProcAddress/test2/test2.cpp
new file mode 100644
index 0000000000..9107728423
--- /dev/null
+++ b/src/pal/tests/palsuite/filemapping_memmgt/GetProcAddress/test2/test2.cpp
@@ -0,0 +1,152 @@
+// Licensed to the .NET Foundation under one or more agreements.
+// The .NET Foundation licenses this file to you under the MIT license.
+// See the LICENSE file in the project root for more information.
+
+/*=============================================================================
+**
+** Source: test2.c (filemapping_memmgt\getprocaddress\test2)
+**
+** Purpose: This test tries to call GetProcAddress with
+**          a NULL handle, with a NULL function name, with an empty 
+**          function name, with an invalid name and with an 
+**          invalid ordinal value.
+**
+**
+**===========================================================================*/
+#include <palsuite.h>
+
+
+/* SHLEXT is defined only for Unix variants */
+#if defined(SHLEXT)
+#define lpModuleName    "testlib"SHLEXT
+#else
+#define lpModuleName    "testlib.dll"
+#endif
+
+
+/**
+ * main
+ */
+int __cdecl main(int argc, char *argv[])
+{
+    int err;
+    HMODULE hModule;
+    FARPROC procAddress;
+
+    /* Initialize the PAL environment. */
+    if(0 != PAL_Initialize(argc, argv))
+    {
+        return FAIL;
+    }
+
+    /* load a module */
+    hModule = LoadLibrary(lpModuleName);
+    if(!hModule)
+    {
+        Fail("Unexpected error: "
+             "LoadLibrary(%s) failed.\n",
+             lpModuleName);
+    }
+
+    /*
+     * Test 1
+     *
+     * Call GetProcAddress with a NULL handle
+     */
+    procAddress = GetProcAddress(NULL,"SimpleFunction");
+    if(procAddress != NULL)
+	{
+        Trace("ERROR: GetProcAddress with a NULL handle "
+              "returned a non-NULL value when it should have "
+              "returned a NULL value with an error\n");
+
+         /* Cleanup */
+        err = FreeLibrary(hModule);
+        if(0 == err)
+	    {
+            Fail("Unexpected error: Failed to FreeLibrary %s\n", 
+                 lpModuleName);
+	    }
+        Fail("");
+	}
+
+    /**
+     * Test 2
+     *
+     * Call GetProcAddress with a NULL function name
+     */
+
+    procAddress = GetProcAddress(hModule,NULL);
+    if(procAddress != NULL)
+	{
+        Trace("ERROR: GetProcAddress with a NULL function name "
+              "returned a non-NULL value when it should have "
+              "returned a NULL value with an error\n");
+
+         /* Cleanup */
+        err = FreeLibrary(hModule);
+        if(0 == err)
+	    {
+            Fail("Unexpected error: Failed to FreeLibrary %s\n", 
+                 lpModuleName);
+	    }
+        Fail("");
+	}
+
+    /**
+     * Test 3
+     *
+     * Call GetProcAddress with an empty function name string
+     */
+
+    procAddress = GetProcAddress(hModule,"");
+    if(procAddress != NULL)
+	{
+        Trace("ERROR: GetProcAddress with an empty function name "
+              "returned a non-NULL value when it should have "
+              "returned a NULL value with an error\n");
+
+         /* Cleanup */
+        err = FreeLibrary(hModule);
+        if(0 == err)
+	    {
+            Fail("Unexpected error: Failed to FreeLibrary %s\n", 
+                 lpModuleName);
+	    }
+        Fail("");
+	}
+
+    /**
+     * Test 4
+     *
+     * Call GetProcAddress with an invalid name
+     */
+
+    procAddress = GetProcAddress(hModule,"Simple Function");
+    if(procAddress != NULL)
+	{
+        Trace("ERROR: GetProcAddress with an invalid function name "
+              "returned a non-NULL value when it should have "
+              "returned a NULL value with an error\n");
+
+         /* Cleanup */
+        err = FreeLibrary(hModule);
+        if(0 == err)
+	    {
+            Fail("Unexpected error: Failed to FreeLibrary %s\n", 
+                 lpModuleName);
+	    }
+        Fail("");
+	}
+
+    /* cleanup */
+    err = FreeLibrary(hModule);
+    if(0 == err)
+	{
+        Fail("Unexpected error: Failed to FreeLibrary %s\n", 
+              lpModuleName);
+	}
+
+    PAL_Terminate();
+    return PASS;
+}