Imported Upstream version 1.1.0upstream/1.1.0

7 files changed, 203 insertions, 0 deletions

diff --git a/src/pal/tests/palsuite/miscellaneous/CharNextExA/CMakeLists.txt b/src/pal/tests/palsuite/miscellaneous/CharNextExA/CMakeLists.txt
new file mode 100644
index 0000000000..ef14ea5352
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CharNextExA/CMakeLists.txt
@@ -0,0 +1,5 @@
+cmake_minimum_required(VERSION 2.8.12.2)
+
+add_subdirectory(test1)
+add_subdirectory(test2)
+
diff --git a/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/CMakeLists.txt b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/CMakeLists.txt
new file mode 100644
index 0000000000..bfa12b5526
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/CMakeLists.txt
@@ -0,0 +1,19 @@
+cmake_minimum_required(VERSION 2.8.12.2)
+
+set(CMAKE_INCLUDE_CURRENT_DIR ON)
+
+set(SOURCES
+  test.c
+)
+
+add_executable(paltest_charnextexa_test1
+  ${SOURCES}
+)
+
+add_dependencies(paltest_charnextexa_test1 coreclrpal)
+
+target_link_libraries(paltest_charnextexa_test1
+  pthread
+  m
+  coreclrpal
+)
diff --git a/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/test.c b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/test.c
new file mode 100644
index 0000000000..9671ca86b8
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/test.c
@@ -0,0 +1,63 @@
+// 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: test.c
+**
+** Purpose: Test for CharNextExA function
+**
+**
+**=========================================================*/
+
+/* 
+   This test is FINISHED.  This function is the same as CharNextA it seems,
+   since the only fields that differ are always 0.
+*/
+
+#include <palsuite.h>
+
+int __cdecl main(int argc, char *argv[]) 
+{
+	
+    char * AnExampleString = "this is the string";
+    char * StringPointer = AnExampleString;
+    int count = 0;
+
+    /*
+     * Initialize the PAL and return FAILURE if this fails
+     */
+
+    if(0 != (PAL_Initialize(argc, argv)))
+    {
+        return FAIL;
+    }
+  
+    /* Use CharNext to move through an entire string.  Ensure the pointer 
+     *  that is returned points to the correct character, by comparing it with 
+     *  'stringPointer' which isn't touched by CharNext. 
+     */
+  
+    while(*AnExampleString != 0) 
+    { 
+        /* Fail if any characters are different.  This is comparing the
+         *  addresses of both characters, not the characters themselves.
+         */
+    
+        if(AnExampleString != &StringPointer[count]) 
+        {
+            Fail("ERROR: %#x and %#x are different.  These should be the "
+                 "same address.\n",AnExampleString,&StringPointer[count]); 
+        }
+    
+        AnExampleString = CharNextExA(0,AnExampleString,0);
+        ++count;
+    }	
+    
+    PAL_Terminate();
+    return PASS;
+}
+
+
+
diff --git a/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/testinfo.dat b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/testinfo.dat
new file mode 100644
index 0000000000..ea36fa61e0
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test1/testinfo.dat
@@ -0,0 +1,16 @@
+# 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 = CharNextA
+Name = Positive Test for CharNextExA
+TYPE = DEFAULT
+EXE1 = test
+Description
+= Test to see if CharNextExA works properly 
+= when calling it repeatedly on a single string.
+
+
+
diff --git a/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/CMakeLists.txt b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/CMakeLists.txt
new file mode 100644
index 0000000000..556043abcd
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/CMakeLists.txt
@@ -0,0 +1,19 @@
+cmake_minimum_required(VERSION 2.8.12.2)
+
+set(CMAKE_INCLUDE_CURRENT_DIR ON)
+
+set(SOURCES
+  test.c
+)
+
+add_executable(paltest_charnextexa_test2
+  ${SOURCES}
+)
+
+add_dependencies(paltest_charnextexa_test2 coreclrpal)
+
+target_link_libraries(paltest_charnextexa_test2
+  pthread
+  m
+  coreclrpal
+)
diff --git a/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/test.c b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/test.c
new file mode 100644
index 0000000000..ffc153f5e6
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/test.c
@@ -0,0 +1,66 @@
+// 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: test.c
+**
+** Purpose: Test for CharNextExA, ensures it returns an LPTSTR
+**
+**
+**=========================================================*/
+
+/* Depends on strcmp() */
+
+#include <palsuite.h>
+
+void testString(LPSTR input, LPSTR expected)
+{
+
+    LPTSTR pReturned = NULL;
+
+    pReturned = CharNextExA(0,input,0);
+
+    /* Compare the Returned String to what it should be */
+    if(strcmp(expected,pReturned) != 0) 
+    {
+        Fail("ERROR: CharNextExA Failed: [%s] and [%s] are not equal, "
+            "they should be after calling CharNextExA.\n",
+            pReturned,expected);
+    }
+
+
+}
+
+int __cdecl main(int argc, char *argv[]) 
+{
+
+    /*
+     * Initialize the PAL and return FAILURE if this fails
+     */
+
+    if(0 != (PAL_Initialize(argc, argv)))
+    {
+        return FAIL;
+    }
+
+    /* test several Strings */
+    testString("this is the string", "his is the string");  
+    testString("t", "");  
+    testString("", ""); 
+    testString("a\t", "\t"); 
+    testString("a\a", "\a");
+    testString("a\b", "\b");
+    testString("a\"", "\"");
+    testString("a\\", "\\");
+    testString("\\", "");
+    testString("\f", "");
+    testString("\bx", "x");
+    
+    PAL_Terminate();
+    return PASS;
+}
+
+
+
diff --git a/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/testinfo.dat b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/testinfo.dat
new file mode 100644
index 0000000000..adc110769b
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/testinfo.dat
@@ -0,0 +1,15 @@
+# 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 = CharNextExA
+Name = Return Value test for CharNextExA
+TYPE = DEFAULT
+EXE1 = test
+Description
+= Test to ensure it returns an LPTSTR when called on a string
+
+
+