Formerly ../hurd/hurdauth.c.~10~
[kopensolaris-gnu/glibc.git] / hurd / hurdauth.c
1 /* Copyright (C) 1991, 1992, 1993 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 <hurd.h>
20
21 error_t
22 __add_auth (mach_port_t me,
23             auth_t addauth)
24 {
25   error_t err;
26   auth_t newauth;
27
28   if (err = __USEPORT (AUTH, __auth_combine (port, addauth, &newauth)))
29     return err;
30
31   /* XXX clobbers errno. Need per-thread errno. */
32   err = __setauth (newauth);
33   __mach_port_deallocate (__mach_task_self (), newauth);
34   if (err)
35     return errno;
36
37   __mach_port_deallocate (__mach_task_self (), addauth);
38   return 0;
39 }
40
41 error_t
42 __del_auth (mach_port_t me,
43             task_t task,
44             uid_t *uids, mach_msg_type_number_t nuids,
45             gid_t *gids, mach_msg_type_number_t ngids)
46 {
47   error_t err;
48   auth_t newauth;
49
50   if (!_hurd_refport_secure_p (task))
51     return EPERM;
52
53   __mutex_lock (&_hurd_id.lock);
54   err = _hurd_check_ids ();
55
56   if (!err)
57     {
58       size_t i, j;
59       size_t nu = _hurd_id.gen.nuids, ng = _hurd_id.gen.ngids;
60       uid_t newu[nu];
61       gid_t newg[ng];
62
63       memcpy (newu, _hurd_id.gen.uids, nu * sizeof (uid_t));
64       memcpy (newg, _hurd_id.gen.gids, ng * sizeof (gid_t));
65
66       for (j = 0; j < nuids; ++j)
67         {
68           const uid_t uid = uids[j];
69           for (i = 0; i < nu; ++i)
70             if (newu[i] == uid)
71               /* Move the last uid into this slot, and decrease the
72                  number of uids so the last slot is no longer used.  */
73               newu[i] = newu[--nu];
74         }
75       __vm_deallocate (__mach_task_self (),
76                        (vm_address_t) uids, nuids * sizeof (uid_t));
77
78       for (j = 0; j < ngids; ++j)
79         {
80           const gid_t gid = gids[j];
81           for (i = 0; i < nu; ++i)
82             if (newu[i] == gid)
83               /* Move the last gid into this slot, and decrease the
84                  number of gids so the last slot is no longer used.  */
85               newu[i] = newu[--nu];
86         }
87       __vm_deallocate (__mach_task_self (),
88                        (vm_address_t) gids, ngids * sizeof (gid_t));
89
90       err = __USEPORT (AUTH, __auth_makeauth
91                        (port,
92                         newu, nu,
93                         _hurd_id.aux.uids, _hurd_id.aux.nuids,
94                         newg, ng,
95                         _hurd_id.aux.uids, _hurd_id.aux.ngids,
96                         &newauth));
97     }
98   __mutex_unlock (&_hurd_id.lock);
99
100   if (err)
101     return err;
102
103   err = __setauth (newauth);    /* XXX clobbers errno */
104   __mach_port_deallocate (__mach_task_self (), newauth);
105   if (err)
106     return errno;
107
108   return 0;
109 }