Formerly mach/hurd/__setgid.c.~3~
[kopensolaris-gnu/glibc.git] / sysdeps / mach / hurd / setgid.c
1 /* Copyright (C) 1991, 1992 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
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA.  */
18
19 #include <ansidecl.h>
20 #include <errno.h>
21 #include <unistd.h>
22
23 /* Set the group ID of the calling process to UID.
24    If the calling process is the super-group, the real
25    and effective group IDs, and the saved set-group-ID to UID;
26    if not, the effective group ID is set to GID.  */
27 int
28 DEFUN(__setgid, (gid), gid_t gid)
29 {
30   auth_t newauth;
31   int i;
32
33   __mutex_lock (&_hurd_idlock);
34   if (!_hurd_id_valid)
35     {
36       error_t err = _HURD_PORT_USE (&_hurd_auth,
37                                     __auth_getids (port, &_hurd_id));
38       if (err)
39         {
40           __mutex_unlock (&_hurd_idlock);
41           return __hurd_fail (err);
42         }
43       _hurd_id_valid = 1;
44     }
45
46   for (i = 0; i < _hurd_id.ngroups; ++i)
47     if (_hurd_id.gids[i] == gid)
48       {
49         /* We already have this gid.  Swap it with gids[0]
50            so getgid will return it.  */
51         _hurd_id.gids[i] = _hurd_id.gids[0];
52         break;
53       }
54
55   if (i == _hurd_id.ngroups)
56     {
57       if (_hurd_id.ngroups == (sizeof (_hurd_id.gids) /
58                                sizeof (_hurd_id.gids[0])))
59         {
60           __mutex_unlock (&_hurd_idlock);
61           errno = ENOMEM;       /* XXX ? */
62           return -1;
63         }
64       else
65         {
66           _hurd_id.gids[_hurd_id.ngroups++] = _hurd_id.gids[0];
67           _hurd_id.gids[0] = gid;
68         }
69     }
70
71   _hurd_id.rgid = _hurd_id.gids[0];
72
73   if (err = _HURD_PORT_USE (&_hurd_auth,
74                             __auth_makeauth (port, &_hurd_id, &newauth)))
75     {
76       _hurd_id_valid = 0;
77       __mutex_unlock (&_hurd_idlock);
78       return __hurd_fail (err);
79     }
80   else
81     {
82       int err = __setauth (newauth);
83       __mach_port_deallocate (__mach_task_self (), newauth);
84       return err;
85     }
86 }