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