1999-09-18 Roland McGrath <roland@baalperazim.frob.com>
[kopensolaris-gnu/glibc.git] / sysdeps / mach / hurd / wait4.c
1 /* Copyright (C) 1993,94,95,96,97,98,99 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 Library General Public License as
6    published by the Free Software Foundation; either version 2 of the
7    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    Library General Public License for more details.
13
14    You should have received a copy of the GNU Library General Public
15    License along with the GNU C Library; see the file COPYING.LIB.  If not,
16    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17    Boston, MA 02111-1307, USA.  */
18
19 #include <sys/types.h>
20 #include <sys/wait.h>
21 #include <errno.h>
22 #include <hurd.h>
23 #include <hurd/port.h>
24
25 pid_t
26 __wait4 (pid_t pid, __WAIT_STATUS_DEFN stat_loc, int options,
27          struct rusage *usage)
28 {
29   pid_t dead;
30   error_t err;
31   struct rusage ignored;
32   natural_t sigcode;
33   int dummy;
34
35   err = __USEPORT (PROC, __proc_wait (port, pid, options,
36                                       stat_loc ?: &dummy, &sigcode,
37                                       usage ?: &ignored, &dead));
38   switch (err)
39     {
40     case 0:                     /* Got a child.  */
41       return dead;
42     case EAGAIN:
43       /* The RPC returns this error when the WNOHANG flag is set and no
44          selected children are dead (but some are living).  In that
45          situation, our return value is zero.  (The RPC can't return zero
46          for DEAD without also returning some garbage for the other out
47          parameters, so an error return is much more natural here.  Hence
48          the difference between the RPC and the POSIX.1 interface.  */
49       return (pid_t) 0;
50     default:
51       return (pid_t) __hurd_fail (err);
52     }
53 }
54
55 weak_alias (__wait4, wait4)