Imported Upstream version 1.1.0upstream/1.1.0

4 files changed, 107 insertions, 0 deletions

diff --git a/src/pal/tests/palsuite/c_runtime/wcscat/CMakeLists.txt b/src/pal/tests/palsuite/c_runtime/wcscat/CMakeLists.txt
new file mode 100644
index 0000000000..f6aa0cb2d9
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/wcscat/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/wcscat/test1/CMakeLists.txt b/src/pal/tests/palsuite/c_runtime/wcscat/test1/CMakeLists.txt
new file mode 100644
index 0000000000..34dfee01bd
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/wcscat/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_wcscat_test1
+  ${SOURCES}
+)
+
+add_dependencies(paltest_wcscat_test1 coreclrpal)
+
+target_link_libraries(paltest_wcscat_test1
+  pthread
+  m
+  coreclrpal
+)
diff --git a/src/pal/tests/palsuite/c_runtime/wcscat/test1/test1.c b/src/pal/tests/palsuite/c_runtime/wcscat/test1/test1.c
new file mode 100644
index 0000000000..789eebf5a3
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/wcscat/test1/test1.c
@@ -0,0 +1,71 @@
+// 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: 
+** Test to that wcscat correctly concatanates wide strings, including placing 
+** null pointers.
+**
+**
+**==========================================================================*/
+
+
+
+#include <palsuite.h>
+
+/*
+ * Notes: uses memcmp and the (pal) sprintf
+ */
+
+int __cdecl main(int argc, char *argv[])
+{
+    WCHAR dest[80];
+    WCHAR test[] = {'f','o','o',' ','b','a','r',' ','b','a','z',0};
+    WCHAR str1[] = {'f','o','o',' ',0};
+    WCHAR str2[] = {'b','a','r',' ',0};
+    WCHAR str3[] = {'b','a','z',0};
+    WCHAR *ptr;
+    char buffer[256];
+
+    
+    if (PAL_Initialize(argc, argv))
+    {
+        return FAIL;
+    }
+
+
+    dest[0] = 0;
+
+    ptr = wcscat(dest, str1);
+    if (ptr != dest)
+    {
+        Fail("ERROR: Expected wcscat to return ptr to %p, got %p", dest, ptr);
+    }
+
+    ptr = wcscat(dest, str2);
+    if (ptr != dest)
+    {
+        Fail("ERROR: Expected wcscat to return ptr to %p, got %p", dest, ptr);
+    }
+
+    ptr = wcscat(dest, str3);
+    if (ptr != dest)
+    {
+        Fail("ERROR: Expected wcscat to return ptr to %p, got %p", dest, ptr);
+    }
+
+    if (memcmp(dest, test, sizeof(test)) != 0)
+    {
+        sprintf(buffer, "%S", dest);
+        Fail("ERROR: Expected wcscat to give \"%s\", got \"%s\"\n", 
+            "foo bar baz", buffer);
+    }
+
+    PAL_Terminate();
+    return PASS;
+}
+
diff --git a/src/pal/tests/palsuite/c_runtime/wcscat/test1/testinfo.dat b/src/pal/tests/palsuite/c_runtime/wcscat/test1/testinfo.dat
new file mode 100644
index 0000000000..878c446251
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/wcscat/test1/testinfo.dat
@@ -0,0 +1,13 @@
+# 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 = wcscat
+Name = Positive Test for wcscat
+TYPE = DEFAULT
+EXE1 = test1
+Description
+= Test to that wcscat correctly concatanates wide strings, including placing 
+= null pointers