Imported Upstream version 1.1.0upstream/1.1.0

4 files changed, 151 insertions, 0 deletions

diff --git a/src/pal/tests/palsuite/c_runtime/wcstok/CMakeLists.txt b/src/pal/tests/palsuite/c_runtime/wcstok/CMakeLists.txt
new file mode 100644
index 0000000000..f6aa0cb2d9
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/wcstok/CMakeLists.txt
@@ -0,0 +1,4 @@
+cmake_minimum_required(VERSION 2.8.12.2)
+
+add_subdirectory(test1)
+
diff --git a/src/pal/tests/palsuite/c_runtime/wcstok/test1/CMakeLists.txt b/src/pal/tests/palsuite/c_runtime/wcstok/test1/CMakeLists.txt
new file mode 100644
index 0000000000..863f5d8c29
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/wcstok/test1/CMakeLists.txt
@@ -0,0 +1,19 @@
+cmake_minimum_required(VERSION 2.8.12.2)
+
+set(CMAKE_INCLUDE_CURRENT_DIR ON)
+
+set(SOURCES
+  test1.c
+)
+
+add_executable(paltest_wcstok_test1
+  ${SOURCES}
+)
+
+add_dependencies(paltest_wcstok_test1 coreclrpal)
+
+target_link_libraries(paltest_wcstok_test1
+  pthread
+  m
+  coreclrpal
+)
diff --git a/src/pal/tests/palsuite/c_runtime/wcstok/test1/test1.c b/src/pal/tests/palsuite/c_runtime/wcstok/test1/test1.c
new file mode 100644
index 0000000000..76d7dc02b3
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/wcstok/test1/test1.c
@@ -0,0 +1,114 @@
+// 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:  test1.c
+**
+** Purpose: 
+** Search for a number of tokens within strings.  Check that the return values
+** are what is expected, and also that the strings match up with our expected
+** results.
+**
+**
+**==========================================================================*/
+
+#include <palsuite.h>
+
+int __cdecl main(int argc, char *argv[])
+{
+    /* foo bar baz */
+    WCHAR str[] = {'f','o','o',' ','b','a','r',' ','b','a','z','\0'};
+    
+    /* foo \0ar baz */
+    WCHAR result1[] = {'f','o','o',' ','\0','a','r',' ','b','a','z','\0'};
+    
+    /* foo \0a\0 baz */
+    WCHAR result2[] = {'f','o','o',' ','\0','a','\0',' ','b','a','z','\0'};
+    
+    WCHAR* tempString;
+    int len = 0;
+    WCHAR *ptr;
+
+    if (PAL_Initialize(argc, argv))
+    {
+        return FAIL;
+    }
+
+    len = (wcslen(str)*sizeof(WCHAR)) + 2;
+
+    /* Tokenize 'str'.  It will hit the 'b' delimiter first.  Check to see
+       that the ptr is pointing to the start of the string and do a compare
+       to ensure the tokenized string is what we expected.
+    */
+    
+    tempString = convert("bz");
+    ptr = wcstok(str, tempString);
+    free(tempString);
+    
+    if (ptr != str)
+    {
+        Fail("ERROR: Expected wcstok() to return %p, got %p!\n", str, ptr);
+    }
+    
+    if (memcmp(str, result1, len) != 0)
+    {
+        Fail("ERROR: wcstok altered the string in an unexpected fashion.");
+    }
+
+    /* If NULL is passed as the first parameter, wcstok will continue 
+       tokenizing the same string.  Test that this works properly.
+    */
+    tempString = convert("r ");
+    ptr = wcstok(NULL, tempString);
+    free(tempString);
+    
+    if (ptr != str + 5)
+    {
+        Fail("ERROR: Expected wcstok() to return %p, got %p!\n", str+5, ptr);
+    }
+    
+    if (memcmp(str, result2, len) != 0)
+    {
+        Fail("ERROR: wcstok altered the string in an unexpected fashion.");
+    }
+
+    /* Continue onward, and search for 'X' now, which won't be found.  The
+       pointer should point just after the last NULL in the string.  And
+       the string itself shouldn't have changed.
+    */
+    tempString = convert("X");
+    ptr = wcstok(NULL, tempString);
+    free(tempString);
+
+    if (ptr != str + 7)
+    {
+        Fail("ERROR: Expected wcstok() to return %p, got %p!\n", str + 7, ptr);
+    }
+    
+    if (memcmp(str, result2, len) != 0)
+    {
+        Fail("ERROR: wcstok altered the string in an unexpeced fashion.\n");
+    }
+
+    /* Call wcstok again.  Now the ptr should point to the end of the 
+       string at NULL.  And the string itself shouldn't have changed.
+    */
+    tempString = convert("X");
+    ptr = wcstok(NULL, tempString);
+    free(tempString);
+
+    if (ptr != NULL)
+    {
+        Fail("ERROR: Expected wcstok() to return %p, got %p!\n", NULL, ptr);
+    }
+    
+    if (memcmp(str, result2, len) != 0)
+    {
+        Fail("ERROR: wcstok altered the string in an unexpeced fashion.\n");
+    }
+
+    PAL_Terminate();
+    return PASS;
+}
diff --git a/src/pal/tests/palsuite/c_runtime/wcstok/test1/testinfo.dat b/src/pal/tests/palsuite/c_runtime/wcstok/test1/testinfo.dat
new file mode 100644
index 0000000000..cc00844c6a
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/wcstok/test1/testinfo.dat
@@ -0,0 +1,14 @@
+# 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 = C Runtime
+Function = wcstok
+Name = wcstok test- tokenize a string and ensure the string takes correct form.
+TYPE = DEFAULT
+EXE1 = test1
+Description
+= Search for a number of tokens within strings.  Check that the return values
+= are what is expect, and also that the strings match up with our expected
+= results.