Imported Upstream version 1.1.0upstream/1.1.0

1 files changed, 53 insertions, 0 deletions

diff --git a/src/pal/tests/palsuite/filemapping_memmgt/VirtualFree/test3/VirtualFree.c b/src/pal/tests/palsuite/filemapping_memmgt/VirtualFree/test3/VirtualFree.c
new file mode 100644
index 0000000000..27f1936be7
--- /dev/null
+++ b/src/pal/tests/palsuite/filemapping_memmgt/VirtualFree/test3/VirtualFree.c
@@ -0,0 +1,53 @@
+// 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:  virtualfree.c
+**
+** Purpose: Positive test the VirtualFree API.
+**          Call VirtualFree with MEM_RELEASE
+**          and MEM_DECOMMIT free operation type
+**
+**
+**============================================================*/
+#include <palsuite.h>
+
+#define VIRTUALSIZE 1024
+
+
+int __cdecl main(int argc, char *argv[])
+{
+    int err;
+    LPVOID lpVirtualAddress;
+
+    //Initialize the PAL environment
+    err = PAL_Initialize(argc, argv);
+    if(0 != err)
+    {
+        ExitProcess(FAIL);
+    }
+    
+    //Allocate the physical storage in memory or in the paging file on disk 
+    lpVirtualAddress = VirtualAlloc(NULL,//system determine where to allocate the region
+            VIRTUALSIZE,         //specify the size 
+            MEM_RESERVE,         //allocation type
+            PAGE_NOACCESS);      //access protection
+    if(NULL == lpVirtualAddress)
+    {
+        Fail("\nFailed to call VirtualAlloc API!\n");
+    }
+
+    //decommit and release the specified region
+    err = VirtualFree(lpVirtualAddress,     //base address
+                    VIRTUALSIZE,            //decommited size
+                    MEM_DECOMMIT|MEM_RELEASE);//free operation
+    if(0 != err)
+    {
+        Fail("\nFailed to call VirtualFree API!\n");
+    }
+
+    PAL_Terminate();
+    return PASS;
+}