1 files changed, 82 insertions, 0 deletions
diff --git a/src/pal/tests/palsuite/c_runtime/fopen/test1/test1.cpp b/src/pal/tests/palsuite/c_runtime/fopen/test1/test1.cpp
new file mode 100644
index 0000000000..565b4eb77d
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/fopen/test1/test1.cpp
@@ -0,0 +1,82 @@
+// 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 the PAL implementation of the fopen function. 
+**          This test simply attempts to open a number of files
+**          with different modes.  It checks to ensure a valid
+**          file pointer is returned.  It doesn't do any checking
+**          to ensure the mode is really what it claims.  And checks
+**          for a NULL pointer when attempts to open a directory.
+**  
+
+**
+**===================================================================*/
+                                 
+#include <palsuite.h>
+
+struct testCase
+{
+    int CorrectResult;
+    char mode[20];
+};
+
+int __cdecl main(int argc, char **argv)
+{
+  
+    FILE *fp;
+    char name[128];
+    int i;
+
+    struct testCase testCases[] = 
+        {
+            {0,  "r"},  {1, "w"},   {1,  "a"},
+            {0,  "r+"}, {1,  "w+"}, {1,  "a+"},
+            {1,  "wt"}, {1,  "wb"}, {1,  "wS"},
+            {1,  "w+c"}, {1,  "w+n"}, {1, "wR"},
+            {1,  "wT"}, {0, "tw"} 
+        };
+
+    if (PAL_Initialize(argc, argv))
+    {
+        return FAIL;
+    }
+
+  
+  
+    for(i = 0; i < sizeof(testCases) / sizeof(struct testCase); i++)
+    {
+        strcpy(name,"testfiles");
+        strcat(name,testCases[i].mode);
+      
+        fp = fopen(name,testCases[i].mode);
+      
+        if ((fp == 0 && testCases[i].CorrectResult != 0)  ||
+            (testCases[i].CorrectResult == 0 && fp != 0) )
+        {
+            Fail("ERROR: fopen returned incorrectly "
+                   "opening a file in %s mode.  Perhaps it opened a "
+                   "read only file which didn't exist and returned a correct "
+                   "pointer?",testCases[i].mode);
+        }    
+
+        memset(name, '\0', 128);
+        
+    }      
+
+    /* When attempt to open a directory fopen should returned NULL */
+    if ( fopen(".", "r") != NULL)
+    {
+        Fail("ERROR: fopen returned non-NULL when trying to open a directory"
+             " the returned value was %d\n", fp);
+    }
+  
+    PAL_Terminate();
+    return PASS;
+}
+   
+