hash-set, linkedhash-set: Reduce code duplication.
[gnulib.git] / lib / sleep.c
blob8b7539090acc01f4dbb6a837910b5505925fad1b
1 /* Pausing execution of the current thread.
2 Copyright (C) 2007, 2009-2018 Free Software Foundation, Inc.
3 Written by Bruno Haible <bruno@clisp.org>, 2007.
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <https://www.gnu.org/licenses/>. */
18 #include <config.h>
20 /* Specification. */
21 #include <unistd.h>
23 #include <limits.h>
25 #include "verify.h"
27 #if defined _WIN32 && ! defined __CYGWIN__
29 # define WIN32_LEAN_AND_MEAN /* avoid including junk */
30 # include <windows.h>
32 unsigned int
33 sleep (unsigned int seconds)
35 unsigned int remaining;
37 /* Sleep for 1 second many times, because
38 1. Sleep is not interruptible by Ctrl-C,
39 2. we want to avoid arithmetic overflow while multiplying with 1000. */
40 for (remaining = seconds; remaining > 0; remaining--)
41 Sleep (1000);
43 return remaining;
46 #elif HAVE_SLEEP
48 # undef sleep
50 /* Guarantee unlimited sleep and a reasonable return value. Cygwin
51 1.5.x rejects attempts to sleep more than 49.7 days (2**32
52 milliseconds), but uses uninitialized memory which results in a
53 garbage answer. Similarly, Linux 2.6.9 with glibc 2.3.4 has a too
54 small return value when asked to sleep more than 24.85 days. */
55 unsigned int
56 rpl_sleep (unsigned int seconds)
58 /* This requires int larger than 16 bits. */
59 verify (UINT_MAX / 24 / 24 / 60 / 60);
60 const unsigned int limit = 24 * 24 * 60 * 60;
61 while (limit < seconds)
63 unsigned int result;
64 seconds -= limit;
65 result = sleep (limit);
66 if (result)
67 return seconds + result;
69 return sleep (seconds);
72 #else /* !HAVE_SLEEP */
74 #error "Please port gnulib sleep.c to your platform, possibly using usleep() or select(), then report this to bug-gnulib."
76 #endif