Imported Upstream version 1.1.0upstream/1.1.0

3 files changed, 123 insertions, 0 deletions

diff --git a/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/CMakeLists.txt b/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/CMakeLists.txt
new file mode 100644
index 0000000000..c062c6df65
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/CMakeLists.txt
@@ -0,0 +1,19 @@
+cmake_minimum_required(VERSION 2.8.12.2)
+
+set(CMAKE_INCLUDE_CURRENT_DIR ON)
+
+set(SOURCES
+  test2.c
+)
+
+add_executable(paltest_setenvironmentvariablea_test2
+  ${SOURCES}
+)
+
+add_dependencies(paltest_setenvironmentvariablea_test2 coreclrpal)
+
+target_link_libraries(paltest_setenvironmentvariablea_test2
+  pthread
+  m
+  coreclrpal
+)
diff --git a/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/test2.c b/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/test2.c
new file mode 100644
index 0000000000..984007e6f1
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/test2.c
@@ -0,0 +1,85 @@
+// 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
+**
+** Purpose: Test for SetEnvironmentVariableA() function
+** Test to see that passing NULL to the first param fails.
+** Test that passing NULL to both params fails.
+** Set an environment variable, then pass NULL to the second param
+** to delete it.  Then make the same call again, to check that it fails.
+**
+**
+**=========================================================*/
+
+#include <palsuite.h>
+
+int __cdecl main(int argc, char *argv[]) 
+{
+  
+    /* Define some buffers needed for the function */
+    char* VariableBuffer = "PALTEST";
+    char* ValueBuffer = "testing";
+    int SetResult;
+
+    if(0 != (PAL_Initialize(argc, argv)))
+    {
+        return FAIL;
+    }
+    
+    /* Check that it fails if the first param is NULL */
+    
+    SetResult = SetEnvironmentVariable(NULL,ValueBuffer);
+ 
+    if(SetResult != 0) 
+    {
+        Fail("ERROR: SetEnvironmentVariable returned a success value, "
+             "even though it was passed NULL as the first parameter and "
+             "should have failed.\n");    
+    }
+  
+    /* Check that it fails when both params are NULL */
+    SetResult = SetEnvironmentVariable(NULL,NULL);
+    if(SetResult != 0) 
+    {
+        Fail("ERROR: SetEnvironmentVariable returned a success value, even "
+             "though it was passed NULL as the first and second parameter and "
+             "should have failed.\n");
+    }
+
+    
+    /* First, set the variable, which should be ok.  Then call the 
+       function with the second parameter NULL twice -- the first call should
+       pass, the second should fail.
+    */
+ 
+    SetResult = SetEnvironmentVariable(VariableBuffer,ValueBuffer);
+    if(SetResult == 0) 
+    {
+        Fail("ERROR: SetEnvironmentVariable returned failure, when "
+             "attempting to set a valid variable.\n");
+    }
+    
+    SetResult = SetEnvironmentVariable(VariableBuffer,NULL);
+    if(SetResult == 0) 
+    {
+        Fail("ERROR: SetEnvironmentVariable returned failure, when "
+             "attempting to delete a variable.\n");
+    }
+
+    SetResult = SetEnvironmentVariable(VariableBuffer,NULL);
+    if(SetResult != 0) 
+    {
+        Fail("ERROR: SetEnvironmentVariable returned success, when "
+             "attempting to delete a variable which doesn't exist.\n");
+    }
+  
+    PAL_Terminate();
+    return PASS;
+}
+
+
+
diff --git a/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/testinfo.dat b/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/testinfo.dat
new file mode 100644
index 0000000000..446e301500
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/SetEnvironmentVariableA/test2/testinfo.dat
@@ -0,0 +1,19 @@
+# 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.
+
+Version = 1.0
+Section = Miscellaneous
+Function = SetEnvironmentVariableA
+Name = Return value test of SetEnvironmentVariableA
+TYPE = DEFAULT
+EXE1 = test2
+Description
+= Test to see that passing NULL to the first param fails.
+= Test that passing NULL to both params fails.
+= Set an environment variable, then pass NULL to the second param
+= to delete it.  Then make the same call again, to check that it fails.
+
+
+
+