1 | /* Copyright (C) 1992-2024 Free Software Foundation, Inc. |
2 | This file is part of the GNU C Library. |
3 | |
4 | The GNU C Library is free software; you can redistribute it and/or |
5 | modify it under the terms of the GNU Lesser General Public |
6 | License as published by the Free Software Foundation; either |
7 | version 2.1 of the License, or (at your option) any later version. |
8 | |
9 | The GNU C Library is distributed in the hope that it will be useful, |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
12 | Lesser General Public License for more details. |
13 | |
14 | You should have received a copy of the GNU Lesser General Public |
15 | License along with the GNU C Library; if not, see |
16 | <https://www.gnu.org/licenses/>. */ |
17 | |
18 | #include <signal.h> |
19 | #include <time.h> |
20 | #include <unistd.h> |
21 | #include <mach.h> |
22 | #include <sysdep-cancel.h> |
23 | |
24 | /* Make the process sleep for SECONDS seconds, or until a signal arrives |
25 | and is not ignored. The function returns the number of seconds less |
26 | than SECONDS which it actually slept (zero if it slept the full time). |
27 | There is no return value to indicate error, but if `sleep' returns |
28 | SECONDS, it probably didn't work. */ |
29 | unsigned int |
30 | __sleep (unsigned int seconds) |
31 | { |
32 | time_t before, after; |
33 | mach_port_t recv; |
34 | int cancel_oldtype; |
35 | |
36 | recv = __mach_reply_port (); |
37 | |
38 | before = time_now (); |
39 | cancel_oldtype = LIBC_CANCEL_ASYNC(); |
40 | (void) __mach_msg (NULL, MACH_RCV_MSG|MACH_RCV_TIMEOUT|MACH_RCV_INTERRUPT, |
41 | 0, 0, recv, seconds * 1000, MACH_PORT_NULL); |
42 | LIBC_CANCEL_RESET (cancel_oldtype); |
43 | after = time_now (); |
44 | __mach_port_destroy (__mach_task_self (), recv); |
45 | |
46 | return seconds - (after - before); |
47 | } |
48 | weak_alias (__sleep, sleep) |
49 | |