1 files changed, 95 insertions, 0 deletions
diff --git a/src/pal/tests/palsuite/file_io/GetFileType/test2/getfiletype.c b/src/pal/tests/palsuite/file_io/GetFileType/test2/getfiletype.c
new file mode 100644
index 0000000000..c9d4eb6572
--- /dev/null
+++ b/src/pal/tests/palsuite/file_io/GetFileType/test2/getfiletype.c
@@ -0,0 +1,95 @@
+// 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:  getfiletype.c
+**
+** Purpose: Test the PAL implementation of GetFileType to ensure it
+**          recognizes opened pipes.
+**
+** Depends: CreatePipe
+**          CloseHandle
+**
+**
+**===================================================================*/
+
+#include <palsuite.h>
+
+
+int __cdecl main(int argc, char **argv)
+{
+    HANDLE  hReadPipe   = NULL;
+    HANDLE  hWritePipe  = NULL;
+    BOOL    bRetVal     = FALSE;
+    DWORD   dwFileType;
+    SECURITY_ATTRIBUTES lpPipeAttributes;
+
+    /*Initialize the PAL*/
+    if ((PAL_Initialize(argc, argv)) != 0)
+    {
+        return (FAIL);
+    }
+
+    /*
+    ** create a pipe and make sure GetFileType returns the correct value
+    */
+
+    /*Setup SECURITY_ATTRIBUTES structure for CreatePipe*/
+    lpPipeAttributes.nLength              = sizeof(lpPipeAttributes); 
+    lpPipeAttributes.lpSecurityDescriptor = NULL; 
+    lpPipeAttributes.bInheritHandle       = TRUE; 
+
+    /*Create a Pipe*/
+    bRetVal = CreatePipe(&hReadPipe,      /* read handle*/
+                &hWritePipe,              /* write handle */
+                &lpPipeAttributes,        /* security attributes*/
+                0);                       /* pipe size*/
+    if (bRetVal == FALSE)
+    {
+        Fail("ERROR: %u :Unable to create pipe.\n", GetLastError());
+    }
+
+    // Get the file type
+    dwFileType = GetFileType(hReadPipe);
+    if (dwFileType != FILE_TYPE_PIPE)
+    {
+        if (!CloseHandle(hWritePipe))
+        {
+            Trace("ERROR: %u : Unable to close write pipe handle "
+                "hWritePipe=0x%lx\n", GetLastError(), hWritePipe);
+        }
+        if (!CloseHandle(hReadPipe))
+        {
+            Trace("ERROR: %u : Unable to close read pipe handle "
+                "hReadPipe=0x%lx\n", GetLastError(), hReadPipe);
+        }
+        Fail("ERROR: GetFileType returned %u for a pipe instead of the "
+            "expected FILE_TYPE_PIPE (%u).\n",
+            dwFileType,
+            FILE_TYPE_PIPE);
+    }
+
+    /*Close write pipe handle*/
+    if (!CloseHandle(hWritePipe))
+    {
+        if (!CloseHandle(hReadPipe))
+        {
+            Trace("ERROR: %u : Unable to close read pipe handle "
+                "hReadPipe=0x%lx\n", GetLastError(), hReadPipe);
+        }
+        Fail("ERROR: %u : Unable to close write pipe handle "
+             "hWritePipe=0x%lx\n", GetLastError(), hWritePipe);
+    }
+
+    /*Close Read pipe handle*/
+    if (!CloseHandle(hReadPipe))
+    {
+        Fail("ERROR: %u : Unable to close read pipe handle "
+             "hReadPipe=0x%lx\n", GetLastError(), hReadPipe);
+    }
+
+    PAL_Terminate();
+    return (PASS);
+}