1 /* Copyright (C) 1993, 1994, 1995, 1997 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
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.
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.
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 <http://www.gnu.org/licenses/>. */
19 #include <sys/types.h>
26 __setregid (rgid
, egid
)
34 __mutex_lock (&_hurd_id
.lock
);
35 err
= _hurd_check_ids ();
39 /* Make a new auth handle which has RGID as the real gid,
40 and EGID as the first element in the list of effective gids. */
42 gid_t
*newgen
, *newaux
;
45 newgen
= _hurd_id
.gen
.gids
;
46 ngen
= _hurd_id
.gen
.ngids
;
49 if (_hurd_id
.gen
.ngids
== 0)
51 /* No effective gids now. The new set will be just GID. */
57 _hurd_id
.gen
.gids
[0] = egid
;
62 newaux
= _hurd_id
.aux
.gids
;
63 naux
= _hurd_id
.aux
.ngids
;
66 if (_hurd_id
.aux
.ngids
== 0)
73 _hurd_id
.aux
.gids
[0] = rgid
;
78 err
= __USEPORT (AUTH
, __auth_makeauth
79 (port
, NULL
, MACH_MSG_TYPE_COPY_SEND
, 0,
80 _hurd_id
.gen
.uids
, _hurd_id
.gen
.nuids
,
81 _hurd_id
.aux
.uids
, _hurd_id
.aux
.nuids
,
82 newgen
, ngen
, newaux
, naux
,
85 __mutex_unlock (&_hurd_id
.lock
);
89 return __hurd_fail (err
);
91 /* Install the new handle and reauthenticate everything. */
92 err
= __setauth (newauth
);
93 __mach_port_deallocate (__mach_task_self (), newauth
);
97 weak_alias (__setregid
, setregid
)