hurd/hurdinit.c

   1 /* Copyright (C) 1992,93,94,95,96,97,98,99,2000 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 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.
   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    Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public
  15    License along with the GNU C Library; if not, write to the Free
  16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  17    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 #include <shlib-compat.h>
 174 versioned_symbol (libc, _hurd_new_proc_init, _hurd_proc_init, GLIBC_2_1);
 175 \f
 176 /* Called when we get a message telling us to change our proc server port.  */
 177
 178 error_t
 179 _hurd_setproc (process_t procserver)
 180 {
 181   error_t err;
 182   mach_port_t oldmsg;
 183
 184   /* Give the proc server our message port.  */
 185   if (err = __proc_setmsgport (procserver, _hurd_msgport, &oldmsg))
 186     return err;
 187   if (oldmsg != MACH_PORT_NULL)
 188     /* Deallocate the old msg port we replaced.  */
 189     __mach_port_deallocate (__mach_task_self (), oldmsg);
 190
 191   /* Tell the proc server where our args and environment are.  */
 192   if (err = __proc_set_arg_locations (procserver,
 193                                       _hide_arguments ? 0 :
 194                                       (vm_address_t) __libc_argv,
 195                                       _hide_environment ? 0 :
 196                                       (vm_address_t) __environ))
 197     return err;
 198
 199   /* Those calls worked, so the port looks good.  */
 200   _hurd_port_set (&_hurd_ports[INIT_PORT_PROC], procserver);
 201
 202   {
 203     pid_t oldpgrp = _hurd_pgrp;
 204
 205     /* Call these functions again so they can fetch the
 206        new information from the new proc server.  */
 207     RUN_HOOK (_hurd_proc_subinit, ());
 208
 209     if (_hurd_pgrp != oldpgrp)
 210       {
 211         /* Run things that want notification of a pgrp change.  */
 212         DECLARE_HOOK (_hurd_pgrp_changed_hook, (pid_t));
 213         RUN_HOOK (_hurd_pgrp_changed_hook, (_hurd_pgrp));
 214       }
 215   }
 216
 217   return 0;
 218 }