Imported Upstream version 1.1.0upstream/1.1.0

3 files changed, 93 insertions, 0 deletions

diff --git a/src/pal/tests/palsuite/c_runtime/strcspn/test1/CMakeLists.txt b/src/pal/tests/palsuite/c_runtime/strcspn/test1/CMakeLists.txt
new file mode 100644
index 0000000000..a38761c335
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/strcspn/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_strcspn_test1
+  ${SOURCES}
+)
+
+add_dependencies(paltest_strcspn_test1 coreclrpal)
+
+target_link_libraries(paltest_strcspn_test1
+  pthread
+  m
+  coreclrpal
+)
diff --git a/src/pal/tests/palsuite/c_runtime/strcspn/test1/test1.c b/src/pal/tests/palsuite/c_runtime/strcspn/test1/test1.c
new file mode 100644
index 0000000000..ddc5667570
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/strcspn/test1/test1.c
@@ -0,0 +1,59 @@
+// 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: Tests strcspn with a character set that should give an index into 
+**          the middle of the original string.  Also tests with character sets
+**          that are not in the string at all, and character sets that match 
+**          with the very first character.
+**
+**
+**==========================================================================*/
+
+#include <palsuite.h>
+
+struct testCase
+{
+    long result;
+    char *string1;
+    char *string2;
+};
+
+int __cdecl main(int argc, char *argv[])
+{
+    int i=0;
+    long TheResult = 0;
+    
+    struct testCase testCases[]=
+    {
+        {4,"abcdefg12345678hijklmnopqrst","t8m1sBe"},
+        {23,"This is a test, testing", "X\tylM"},
+        {0,"foobar","tzkfb"},
+    };
+
+    /*
+     *  Initialize the PAL
+     */
+    if (0 != PAL_Initialize(argc, argv))
+    {
+        return FAIL;
+    }
+
+    for (i=0; i<sizeof(testCases)/sizeof(struct testCase); i++)
+    {
+         TheResult = strcspn(testCases[i].string1,testCases[i].string2);
+         if (TheResult != testCases[i].result)
+         {
+            Fail("Expected strcspn to return %d, got %d!\n",
+                 testCases[i].result,TheResult);
+         }
+
+    }
+
+    PAL_Terminate();
+    return PASS;
+}
diff --git a/src/pal/tests/palsuite/c_runtime/strcspn/test1/testinfo.dat b/src/pal/tests/palsuite/c_runtime/strcspn/test1/testinfo.dat
new file mode 100644
index 0000000000..a302eb1fb7
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/strcspn/test1/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 = C Runtime
+Function = strcspn
+Name = Test #1 for strcspn
+TYPE = DEFAULT
+EXE1 = test1
+Description
+=Tests strcspn with a character set that should give an index into 
+=the middle of the original string.  Also tests with character sets
+=that are not in the string at all, and character sets that match 
+=with the very first character.