1 files changed, 78 insertions, 0 deletions
diff --git a/src/pal/tests/palsuite/threading/Sleep/test2/sleep.c b/src/pal/tests/palsuite/threading/Sleep/test2/sleep.c
new file mode 100644
index 0000000000..387b627a79
--- /dev/null
+++ b/src/pal/tests/palsuite/threading/Sleep/test2/sleep.c
@@ -0,0 +1,78 @@
+//
+// Copyright (c) Microsoft. All rights reserved.
+// Licensed under the MIT license. See LICENSE file in the project root for full license information. 
+//
+
+/*============================================================
+**
+** Source: Sleep.c
+**
+** Purpose: Test to establish whether the Sleep function stops the thread from 
+** executing for the specified times.
+**
+** Dependencies: GetTickCount
+** 
+
+**
+**=========================================================*/
+
+#include <palsuite.h>
+
+/* 
+ * times in 10^(-3) seconds
+ */
+
+DWORD SleepTimes[] =
+{
+    60000,
+    300000,
+    1800000,
+    3200000
+};
+
+/* Milliseconds of error which are acceptable Function execution time, etc.
+   FreeBSD has a "standard" resolution of 10ms for waiting operations, so we 
+   must take that into account as well */
+DWORD AcceptableTimeError = 150; 
+
+int __cdecl main( int argc, char **argv ) 
+{
+    DWORD OldTickCount;
+    DWORD NewTickCount;
+    DWORD MaxDelta;
+    DWORD TimeDelta;
+    DWORD i;
+
+    if(0 != (PAL_Initialize(argc, argv)))
+    {
+        return ( FAIL );
+    }
+
+    for( i = 0; i < sizeof(SleepTimes) / sizeof(DWORD); i++)
+    {
+        OldTickCount = GetTickCount();
+        Sleep(SleepTimes[i]);
+        NewTickCount = GetTickCount();
+
+        /* 
+         * Check for DWORD wraparound
+         */
+        if (OldTickCount>NewTickCount)
+        {
+            OldTickCount -= NewTickCount+1;
+            NewTickCount  = 0xFFFFFFFF;
+        }
+        TimeDelta = NewTickCount-OldTickCount;
+
+        MaxDelta = SleepTimes[i] + AcceptableTimeError;
+
+        if ( TimeDelta<SleepTimes[i] || TimeDelta>MaxDelta )
+        {
+            Fail("The sleep function slept for %u ms when it should have "
+             "slept for %u ms\n", TimeDelta, SleepTimes[i]);
+       }
+    }
+    PAL_Terminate();
+    return ( PASS );
+
+}