.
[kopensolaris-gnu/glibc.git] / hurd / hurdinit.c
1 /* Copyright (C) 1992,93,94,95,96,97,98,99,2000,01
2         Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with the GNU C Library; if not, write to the Free
17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18    02111-1307 USA.  */
19
20 #include <sys/stat.h>
21 #include <stdlib.h>
22 #include <stdio.h>
23 #include <unistd.h>
24 #include <hurd.h>
25 #include <hurd/port.h>
26 #include "set-hooks.h"
27 #include "hurdmalloc.h"         /* XXX */
28
29
30 int _hurd_exec_flags;
31 struct hurd_port *_hurd_ports;
32 unsigned int _hurd_nports;
33 mode_t _hurd_umask;
34 sigset_t _hurdsig_traced;
35
36 char **__libc_argv;
37 int __libc_argc;
38
39
40 error_t
41 _hurd_ports_use (int which, error_t (*operate) (mach_port_t))
42 {
43   if (__builtin_expect (_hurd_ports == NULL, 0))
44     /* This means that _hurd_init has not been called yet, which is
45        normally only the case in the bootstrap filesystem, and there
46        only in the early phases of booting.  */
47     return EGRATUITOUS;
48
49   return HURD_PORT_USE (&_hurd_ports[which], (*operate) (port));
50 }
51
52 DEFINE_HOOK (_hurd_subinit, (void));
53
54 __typeof (_hurd_proc_init) _hurd_new_proc_init; /* below */
55
56 /* Initialize the library data structures from the
57    ints and ports passed to us by the exec server.
58
59    PORTARRAY and INTARRAY are vm_deallocate'd.  */
60
61 void
62 _hurd_init (int flags, char **argv,
63             mach_port_t *portarray, size_t portarraysize,
64             int *intarray, size_t intarraysize)
65 {
66   size_t i;
67
68   _hurd_exec_flags = flags;
69
70   _hurd_ports = malloc (portarraysize * sizeof (*_hurd_ports));
71   if (_hurd_ports == NULL)
72     __libc_fatal ("Can't allocate _hurd_ports\n");
73   _hurd_nports = portarraysize;
74
75   /* See what ports we were passed.  */
76   for (i = 0; i < portarraysize; ++i)
77     _hurd_port_init (&_hurd_ports[i], portarray[i]);
78
79   /* When the user asks for the bootstrap port,
80      he will get the one the exec server passed us.  */
81   __task_set_special_port (__mach_task_self (), TASK_BOOTSTRAP_PORT,
82                            portarray[INIT_PORT_BOOTSTRAP]);
83
84   if (intarraysize > INIT_UMASK)
85     _hurd_umask = intarray[INIT_UMASK] & 0777;
86   else
87     _hurd_umask = CMASK;
88
89   if (intarraysize > INIT_TRACEMASK)
90     _hurdsig_traced = intarray[INIT_TRACEMASK];
91
92   /* Tell the proc server we exist, if it does.  */
93   if (portarray[INIT_PORT_PROC] != MACH_PORT_NULL)
94     _hurd_new_proc_init (argv, intarray, intarraysize);
95
96   /* All done with init ints and ports.  */
97   __vm_deallocate (__mach_task_self (),
98                    (vm_address_t) intarray,
99                    intarraysize * sizeof (int));
100   __vm_deallocate (__mach_task_self (),
101                    (vm_address_t) portarray,
102                    portarraysize * sizeof (mach_port_t));
103
104   if (flags & EXEC_SECURE)
105     /* XXX if secure exec, elide environment variables
106        which the library uses and could be security holes.
107        CORESERVER, COREFILE
108        */ ;
109
110   /* Call other things which want to do some initialization.  These are not
111      on the __libc_subinit hook because things there like to be able to
112      assume the availability of the POSIX.1 services we provide.  */
113   RUN_HOOK (_hurd_subinit, ());
114 }
115 \f
116 #include <hurd/signal.h>
117
118 /* The user can do "int _hide_arguments = 1;" to make
119    sure the arguments are never visible with `ps'.  */
120 int _hide_arguments, _hide_environment;
121
122 /* Hook for things which should be initialized as soon as the proc
123    server is available.  */
124 DEFINE_HOOK (_hurd_proc_subinit, (void));
125
126 /* Do startup handshaking with the proc server just installed in _hurd_ports.
127    Call _hurdsig_init to set up signal processing.  */
128
129 void
130 _hurd_new_proc_init (char **argv,
131                      const int *intarray, size_t intarraysize)
132 {
133   mach_port_t oldmsg;
134   struct hurd_userlink ulink;
135   process_t procserver;
136
137   /* Initialize the signal code; Mach exceptions will become signals.  */
138   _hurdsig_init (intarray, intarraysize);
139
140   /* The signal thread is now prepared to receive messages.
141      It is safe to give the port to the proc server.  */
142
143   procserver = _hurd_port_get (&_hurd_ports[INIT_PORT_PROC], &ulink);
144
145   /* Give the proc server our message port.  */
146   __proc_setmsgport (procserver, _hurd_msgport, &oldmsg);
147   if (oldmsg != MACH_PORT_NULL)
148     /* Deallocate the old msg port we replaced.  */
149     __mach_port_deallocate (__mach_task_self (), oldmsg);
150
151   /* Tell the proc server where our args and environment are.  */
152   __proc_set_arg_locations (procserver,
153                             _hide_arguments ? 0 : (vm_address_t) argv,
154                             _hide_environment ? 0 : (vm_address_t) __environ);
155
156   _hurd_port_free (&_hurd_ports[INIT_PORT_PROC], &ulink, procserver);
157
158   /* Initialize proc server-assisted fault recovery for the signal thread.  */
159   _hurdsig_fault_init ();
160
161   /* Call other things which want to do some initialization.  These are not
162      on the _hurd_subinit hook because things there assume that things done
163      here, like _hurd_pid, are already initialized.  */
164   RUN_HOOK (_hurd_proc_subinit, ());
165
166   /* XXX This code should probably be removed entirely at some point.  This
167      conditional should make it reasonably usable with old gdb's for a
168      while.  Eventually it probably makes most sense for the exec server to
169      mask out EXEC_SIGTRAP so the debugged program is closer to not being
170      able to tell it's being debugged.  */
171   if (!__sigisemptyset (&_hurdsig_traced)
172 #ifdef EXEC_SIGTRAP
173       && !(_hurd_exec_flags & EXEC_SIGTRAP)
174 #endif
175       )
176     /* This process is "traced", meaning it should stop on signals or exec.
177        We are all set up now to handle signals.  Stop ourselves, to inform
178        our parent (presumably a debugger) that the exec has completed.  */
179     __msg_sig_post (_hurd_msgport, SIGTRAP, 0, __mach_task_self ());
180 }
181
182 #include <shlib-compat.h>
183 versioned_symbol (libc, _hurd_new_proc_init, _hurd_proc_init, GLIBC_2_1);
184 \f
185 /* Called when we get a message telling us to change our proc server port.  */
186
187 error_t
188 _hurd_setproc (process_t procserver)
189 {
190   error_t err;
191   mach_port_t oldmsg;
192
193   /* Give the proc server our message port.  */
194   if (err = __proc_setmsgport (procserver, _hurd_msgport, &oldmsg))
195     return err;
196   if (oldmsg != MACH_PORT_NULL)
197     /* Deallocate the old msg port we replaced.  */
198     __mach_port_deallocate (__mach_task_self (), oldmsg);
199
200   /* Tell the proc server where our args and environment are.  */
201   if (err = __proc_set_arg_locations (procserver,
202                                       _hide_arguments ? 0 :
203                                       (vm_address_t) __libc_argv,
204                                       _hide_environment ? 0 :
205                                       (vm_address_t) __environ))
206     return err;
207
208   /* Those calls worked, so the port looks good.  */
209   _hurd_port_set (&_hurd_ports[INIT_PORT_PROC], procserver);
210
211   {
212     pid_t oldpgrp = _hurd_pgrp;
213
214     /* Call these functions again so they can fetch the
215        new information from the new proc server.  */
216     RUN_HOOK (_hurd_proc_subinit, ());
217
218     if (_hurd_pgrp != oldpgrp)
219       {
220         /* Run things that want notification of a pgrp change.  */
221         DECLARE_HOOK (_hurd_pgrp_changed_hook, (pid_t));
222         RUN_HOOK (_hurd_pgrp_changed_hook, (_hurd_pgrp));
223       }
224   }
225
226   return 0;
227 }