From db20f3f1bb8595633a7e16c8900fd401a453a6b5 Mon Sep 17 00:00:00 2001
From: Jiyoung Yun <jy910.yun@samsung.com>
Date: Tue, 27 Dec 2016 16:46:08 +0900
Subject: Imported Upstream version 1.0.0.9127

---
 .../tests/palsuite/c_runtime/fopen/test4/test4.cpp | 82 ++++++++++++++++++++++
 1 file changed, 82 insertions(+)
 create mode 100644 src/pal/tests/palsuite/c_runtime/fopen/test4/test4.cpp

(limited to 'src/pal/tests/palsuite/c_runtime/fopen/test4/test4.cpp')

diff --git a/src/pal/tests/palsuite/c_runtime/fopen/test4/test4.cpp b/src/pal/tests/palsuite/c_runtime/fopen/test4/test4.cpp
new file mode 100644
index 0000000000..04683d52c5
--- /dev/null
+++ b/src/pal/tests/palsuite/c_runtime/fopen/test4/test4.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:  test4.c
+**
+** Purpose: Tests the PAL implementation of the fopen function. 
+**          Test to ensure that you can't write to a 'r' mode file.
+**          And that you can read from a 'r' mode file.
+**
+** Depends:
+**      fprintf
+**      fclose
+**      fgets
+**  
+
+**
+**===================================================================*/
+                                                                         
+#include <palsuite.h>
+
+int __cdecl main(int argc, char **argv)
+{
+  
+    FILE *fp;
+    char buffer[128];
+  
+    if (PAL_Initialize(argc, argv))
+    {
+        return FAIL;
+    }
+
+  
+    /* Open a file with 'w' mode */
+    if( (fp = fopen( "testfile", "w" )) == NULL )
+    {
+        Fail( "ERROR: The file failed to open with 'w' mode.\n" );
+    }  
+  
+    /* Write some text to the file */
+    if(fprintf(fp,"%s","some text") <= 0) 
+    {
+        Fail("ERROR: Attempted to WRITE to a file opened with 'w' mode "
+               "but fprintf failed.  Either fopen or fprintf have problems.");
+    }
+
+    if(fclose(fp))
+    {
+        Fail("ERROR: Attempted to close a file, but fclose failed. "
+               "This test depends upon it.");
+    }
+
+    /* Open a file with 'r' mode */
+    if( (fp = fopen( "testfile", "r" )) == NULL )
+    {
+        Fail( "ERROR: The file failed to open with 'r' mode.\n" );
+    } 
+  
+    /* Attempt to read from the 'r' only file, should pass */
+    if(fgets(buffer,10,fp) == NULL)
+    {
+        Fail("ERROR: Tried to READ from a file with 'r' mode set. "
+               "This should succeed, but fgets returned NULL.  Either fgets "
+               "or fopen is broken.");
+    }
+
+    /* Write some text to the file */
+    if(fprintf(fp,"%s","some text") > 0) 
+    {
+        Fail("ERROR: Attempted to WRITE to a file opened with 'r' mode "
+               "but fprintf succeeded  It should have failed.  "
+               "Either fopen or fprintf have problems.");
+    }
+
+
+    PAL_Terminate();
+    return PASS;
+}
+   
+
-- 
cgit v1.2.3