1/**
2 * This file has no copyright assigned and is placed in the Public Domain.
3 * This file is part of the w64 mingw-runtime package.
4 * No warranty is given; refer to the file DISCLAIMER.PD within this package.
5 */
6
7#ifdef HAVE_CONFIG_H
8#include "config.h"
9#endif
10
11#include <assert.h>
12#include <errno.h>
13#include <time.h>
14
15#define WIN32_LEAN_AND_MEAN
16#include <windows.h>
17
18#define WINPTHREAD_NANOSLEEP_DECL WINPTHREAD_API
19
20/* public header files */
21#include "pthread.h"
22#include "pthread_time.h"
23/* internal header files */
24#include "thread.h"
25
26#define POW10_3 1000
27#define POW10_4 10000
28#define POW10_6 1000000
29#define POW10_9 1000000000
30#define MAX_SLEEP_IN_MS 4294967294UL
31
32/**
33 * Sleep for the specified time.
34 * @param request The desired amount of time to sleep.
35 * @param remain The remain amount of time to sleep.
36 * @return If the function succeeds, the return value is 0.
37 * If the function fails, the return value is -1,
38 * with errno set to indicate the error.
39 */
40static int __nanosleep(const struct _timespec64 *request, struct _timespec64 *remain)
41{
42 unsigned long ms, rc = 0;
43 unsigned __int64 u64, want, real;
44
45 union {
46 unsigned __int64 ns100;
47 FILETIME ft;
48 } _start, _end;
49
50 if (request->tv_sec < 0 || request->tv_nsec < 0 || request->tv_nsec >= POW10_9) {
51 errno = EINVAL;
52 return -1;
53 }
54
55 if (remain != NULL) GetSystemTimeAsFileTime(&_start.ft);
56
57 want = u64 = request->tv_sec * POW10_3 + request->tv_nsec / POW10_6;
58 while (u64 > 0 && rc == 0) {
59 if (u64 >= MAX_SLEEP_IN_MS) ms = MAX_SLEEP_IN_MS;
60 else ms = (unsigned long) u64;
61
62 u64 -= ms;
63 rc = _pthread_delay_np_ms(ms);
64 }
65
66 if (rc != 0) { /* WAIT_IO_COMPLETION (192) */
67 if (remain != NULL) {
68 GetSystemTimeAsFileTime(&_end.ft);
69 real = (_end.ns100 - _start.ns100) / POW10_4;
70
71 if (real >= want) u64 = 0;
72 else u64 = want - real;
73
74 remain->tv_sec = u64 / POW10_3;
75 remain->tv_nsec = (long) (u64 % POW10_3) * POW10_6;
76 }
77
78 errno = EINTR;
79 return -1;
80 }
81
82 return 0;
83}
84
85int nanosleep64(const struct _timespec64 *request, struct _timespec64 *remain)
86{
87 return __nanosleep (request, remain);
88}
89
90int nanosleep32(const struct _timespec32 *request, struct _timespec32 *remain)
91{
92 struct _timespec64 request64 = {
93 .tv_sec = request->tv_sec,
94 .tv_nsec = request->tv_nsec
95 };
96 struct _timespec64 remain64 = {0};
97
98 if (__nanosleep (&request64, &remain64) == -1)
99 return -1;
100
101 assert (remain64.tv_sec <= INT_MAX);
102
103 if (remain != NULL) {
104 remain->tv_sec = (__time32_t)remain64.tv_sec;
105 remain->tv_nsec = remain64.tv_nsec;
106 }
107
108 return 0;
109}