Formerly ../hurd/alloc-fd.c.~6~
[kopensolaris-gnu/glibc.git] / hurd / setauth.c
1 /* Copyright (C) 1991, 1992, 1993, 1994 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 #include <hurd/port.h>
21 #include <hurd/id.h>
22 #include <gnu-stabs.h>
23
24 /* Things in the library which want to be run when the auth port changes.  */
25 const struct
26   {
27     size_t n;
28     void (*fn[0]) (auth_t new_auth);
29   } _hurd_reauth_hook;
30
31
32 #ifdef noteven
33 static struct mutex reauth_lock;
34 #endif
35
36
37 /* Set the auth port to NEW, and reauthenticate
38    everything used by the library.  */
39 int
40 __setauth (auth_t new)
41 {
42   int d;
43   mach_port_t newport;
44   void (*const *fn) (auth_t);
45
46   /* Give the new send right a user reference.
47      This is a good way to check that it is valid.  */
48   if (__mach_port_mod_refs (__mach_task_self (), new,
49                             MACH_PORT_RIGHT_SEND, 1))
50     {
51       errno = EINVAL;
52       return -1;
53     }
54
55   /* We lock against another thread doing setauth.  Anyone who sets
56      _hurd_ports[INIT_PORT_AUTH] some other way is asking to lose.  */
57   __mutex_lock (&reauth_lock);
58
59   /* Install the new port in the cell.  */
60   __mutex_lock (&_hurd_id.lock);
61   _hurd_port_set (&_hurd_ports[INIT_PORT_AUTH], new);
62   _hurd_id.valid = 0;
63   if (_hurd_id.rid_auth)
64     {
65       __mach_port_deallocate (__mach_task_self (), _hurd_id.rid_auth);
66       _hurd_id.rid_auth = MACH_PORT_NULL;
67     }
68   __mutex_unlock (&_hurd_id.lock);
69
70   if (_hurd_init_dtable != NULL)
71     /* We just have the simple table we got at startup.
72        Otherwise, a reauth_hook in dtable.c takes care of this.  */
73     for (d = 0; d < _hurd_init_dtablesize; ++d)
74       if (_hurd_init_dtable[d] != MACH_PORT_NULL)
75         {
76           mach_port_t new;
77           if (! __io_reauthenticate (_hurd_init_dtable[d], _hurd_pid) &&
78               ! HURD_PORT_USE (&_hurd_ports[INIT_PORT_AUTH],
79                                __auth_user_authenticate (port,
80                                                          _hurd_init_dtable[d],
81                                                          _hurd_pid,
82                                                          &new)))
83             {
84               __mach_port_deallocate (__mach_task_self (),
85                                       _hurd_init_dtable[d]);
86               _hurd_init_dtable[d] = new;
87             }
88         }
89
90   if (__USEPORT (CRDIR,
91                  ! __io_reauthenticate (port, _hurd_pid) &&
92                  ! __auth_user_authenticate (new, port, _hurd_pid, &newport)))
93     _hurd_port_set (&_hurd_ports[INIT_PORT_CRDIR], newport);
94
95   if (__USEPORT (CWDIR,
96                  ! __io_reauthenticate (port, _hurd_pid) &&
97                  ! __auth_user_authenticate (new, port, _hurd_pid, &newport)))
98     _hurd_port_set (&_hurd_ports[INIT_PORT_CWDIR], newport);
99
100   /* Run things which want to do reauthorization stuff.  */
101   for (fn = _hurd_reauth_hook.fn; *fn != NULL; ++fn)
102     (**fn) (new);
103
104   __mutex_unlock (&reauth_lock);
105
106   return 0;
107 }
108 \f
109 static void
110 init_reauth (void)
111 {
112 #ifdef noteven
113   __mutex_init (&reauth_lock);
114 #endif
115 }
116
117 text_set_element (__libc_subinit, init_reauth);