]>
Commit | Line | Data |
---|---|---|
dff8da6b | 1 | /* Copyright (C) 1992-2024 Free Software Foundation, Inc. |
c84142e8 | 2 | This file is part of the GNU C Library. |
28f540f4 | 3 | |
c84142e8 | 4 | The GNU C Library is free software; you can redistribute it and/or |
41bdb6e2 AJ |
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. | |
28f540f4 | 8 | |
c84142e8 UD |
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 | |
41bdb6e2 | 12 | Lesser General Public License for more details. |
28f540f4 | 13 | |
41bdb6e2 | 14 | You should have received a copy of the GNU Lesser General Public |
59ba27a6 | 15 | License along with the GNU C Library; if not, see |
5a82c748 | 16 | <https://www.gnu.org/licenses/>. */ |
28f540f4 | 17 | |
28f540f4 RM |
18 | #include <signal.h> |
19 | #include <time.h> | |
20 | #include <unistd.h> | |
21 | #include <mach.h> | |
f5123211 | 22 | #include <sysdep-cancel.h> |
28f540f4 RM |
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 | |
c84142e8 | 30 | __sleep (unsigned int seconds) |
28f540f4 RM |
31 | { |
32 | time_t before, after; | |
33 | mach_port_t recv; | |
f5123211 | 34 | int cancel_oldtype; |
28f540f4 RM |
35 | |
36 | recv = __mach_reply_port (); | |
37 | ||
50471a86 | 38 | before = time_now (); |
f5123211 | 39 | cancel_oldtype = LIBC_CANCEL_ASYNC(); |
28f540f4 RM |
40 | (void) __mach_msg (NULL, MACH_RCV_MSG|MACH_RCV_TIMEOUT|MACH_RCV_INTERRUPT, |
41 | 0, 0, recv, seconds * 1000, MACH_PORT_NULL); | |
f5123211 | 42 | LIBC_CANCEL_RESET (cancel_oldtype); |
50471a86 | 43 | after = time_now (); |
28f540f4 RM |
44 | __mach_port_destroy (__mach_task_self (), recv); |
45 | ||
46 | return seconds - (after - before); | |
47 | } | |
c84142e8 | 48 | weak_alias (__sleep, sleep) |