Formerly ../hurd/hurdkill.c.~5~
[kopensolaris-gnu/glibc.git] / hurd / dtable.c
index 4d67480..4812c69 100644 (file)
@@ -25,17 +25,17 @@ Cambridge, MA 02139, USA.  */
 #include <stdio.h>
 #include <fcntl.h>
 #include <limits.h>
+#include <cthreads.h>          /* For `struct mutex'.  */
+#include "set-hooks.h"
+#include "hurdmalloc.h"                /* XXX */
 
 
-#ifdef noteven
-struct mutex _hurd_dtable_lock;
-#endif
-struct hurd_dtable _hurd_dtable;
-int _hurd_dtable_rlimit;
-struct hurd_userlink *_hurd_dtable_users;
+struct mutex _hurd_dtable_lock = MUTEX_INITIALIZER; /* XXX ld bug; must init */
+struct hurd_fd **_hurd_dtable;
+int _hurd_dtablesize;
 
-void (*_hurd_dtable_deallocate) (void *);
 
+DEFINE_HOOK (_hurd_fd_subinit, (void));
 
 /* Initialize the file descriptor table at startup.  */
 
@@ -43,23 +43,16 @@ static void
 init_dtable (void)
 {
   register size_t i;
-  struct hurd_fd **dt;
 
-#ifdef noteven
   __mutex_init (&_hurd_dtable_lock);
-#endif
-
-  _hurd_dtable_users = NULL;
 
   /* The initial size of the descriptor table is that of the passed-in
-     table, rounded up to a multiple of FOPEN_MAX descriptors.  */
-  _hurd_dtable.size
-    = (_hurd_init_dtablesize + FOPEN_MAX - 1) / FOPEN_MAX * FOPEN_MAX;
-  _hurd_dtable_rlimit = _hurd_dtable.size;
+     table.  It will be expanded as necessary up to _hurd_dtable_rlimit.  */
+  _hurd_dtablesize = _hurd_init_dtablesize;
 
   /* Allocate the vector of pointers.  */
-  dt = _hurd_dtable.d = malloc (_hurd_dtable.size * sizeof (*_hurd_dtable.d));
-  if (dt == NULL)
+  _hurd_dtable = malloc (_hurd_dtablesize * sizeof (*_hurd_dtable));
+  if (_hurd_dtablesize != 0 && _hurd_dtable == NULL)
     __libc_fatal ("hurd: Can't allocate file descriptor table\n");
 
   /* Initialize the descriptor table.  */
@@ -67,7 +60,7 @@ init_dtable (void)
     {
       if (_hurd_init_dtable[i] == MACH_PORT_NULL)
        /* An unused descriptor is marked by a null pointer.  */
-       dt[i] = NULL;
+       _hurd_dtable[i] = NULL;
       else
        {
          /* Allocate a new file descriptor structure.  */
@@ -82,6 +75,8 @@ init_dtable (void)
          /* Install the port in the descriptor.
             This sets up all the ctty magic.  */
          _hurd_port2fd (new, _hurd_init_dtable[i], 0);
+
+         _hurd_dtable[i] = new;
        }
     }
 
@@ -94,11 +89,17 @@ init_dtable (void)
   _hurd_init_dtablesize = 0;
 
   /* Initialize the remaining empty slots in the table.  */
-  for (; i < _hurd_dtable.size; ++i)
-    dt[i] = NULL;
+  for (; i < _hurd_dtablesize; ++i)
+    _hurd_dtable[i] = NULL;
+
+  /* Run things that want to run after the file descriptor table
+     is initialized.  */
+  RUN_HOOK (_hurd_fd_subinit, ());
+
+  (void) &init_dtable;         /* Avoid "defined but not used" warning.  */
 }
 
-text_set_element (__libc_subinit, init_dtable);
+text_set_element (_hurd_subinit, init_dtable);
 
 /* XXX when the linker supports it, the following functions should all be
    elsewhere and just have text_set_elements here.  */
@@ -110,7 +111,7 @@ get_dtable_port (int fd)
 {
   file_t dport;
   int err = HURD_DPORT_USE (fd, __mach_port_mod_refs (__mach_task_self (),
-                                                     (dport = port),
+                                                     (dport = ctty ?: port),
                                                      MACH_PORT_RIGHT_SEND,
                                                      1));
   if (err)
@@ -122,46 +123,97 @@ get_dtable_port (int fd)
     return dport;
 }
 
-/* text_set_element (_hurd_getdport_fn, get_dtable_port); */
-file_t (*_hurd_getdport_fn) (int fd) = get_dtable_port;        /* XXX */
+file_t (*_hurd_getdport_fn) (int fd) = get_dtable_port;
 \f
-#if 0
-/* Called on fork to install the dtable in NEWTASK.
-   The dtable lock is held.  */
+#include <hurd/signal.h>
 
+/* We are in the child fork; the dtable lock is still held.
+   The parent has inserted send rights for all the normal io ports,
+   but we must recover ctty-special ports for ourselves.  */
 static error_t
-fork_dtable (task_t newtask)
+fork_child_dtable (void)
 {
   error_t err;
   int i;
 
   err = 0;
 
-  for (i = 0; !err && i < _hurd_dtable.size; ++i)
+  for (i = 0; !err && i < _hurd_dtablesize; ++i)
     {
-      struct hurd_userlink ulink, ctty_ulink;
-      io_t port = _hurd_port_get (&_hurd_dtable.d[i].port, &ulink);
-      io_t ctty = _hurd_port_get (&_hurd_dtable.d[i].ctty, &ctty_ulink);
+      struct hurd_fd *d = _hurd_dtable[i];
+      if (d == NULL)
+       continue;
 
-      if (port != MACH_PORT_NULL)
-       err = __mach_port_insert_right (newtask, port, port,
-                                       MACH_MSG_TYPE_COPY_SEND);
-      if (!err && ctty != MACH_PORT_NULL)
-       err = __mach_port_insert_right (newtask, ctty, ctty,
-                                       MACH_MSG_TYPE_COPY_SEND);
+      /* No other thread is using the send rights in the child task.  */
+      d->port.users = d->ctty.users = NULL;
 
-      _hurd_port_free (&_hurd_dtable.d[i].port, &ulink, port);
-      _hurd_port_free (&_hurd_dtable.d[i].ctty, &ctty_ulink, ctty);
+      if (d->ctty.port != MACH_PORT_NULL)
+       {
+         /* There was a ctty-special port in the parent.
+            We need to get one for ourselves too.  */
+         __mach_port_deallocate (__mach_task_self (), d->port.port);
+         err = __term_open_ctty (d->ctty.port, _hurd_pid, _hurd_pgrp,
+                                 &d->port.port);
+         if (err)
+           {
+             d->port.port = d->ctty.port;
+             d->ctty.port = MACH_PORT_NULL;
+           }
+       }
 
       /* XXX for each fd with a cntlmap, reauth and re-map_cntl.  */
     }
-  __mutex_unlock (&_hurd_dtable_lock);
   return err;
+
+  (void) &fork_child_dtable;   /* Avoid "defined but not used" warning.  */
 }
 
-text_set_element (_hurd_fork_hook, fork_dtable);
-text_set_element (_hurd_fork_locks, _hurd_dtable_lock);
-#endif
+data_set_element (_hurd_fork_locks, _hurd_dtable_lock);        /* XXX ld bug: bss */
+text_set_element (_hurd_fork_child_hook, fork_child_dtable);
+\f
+/* Called when our process group has changed.  */
+
+static void
+ctty_new_pgrp (void)
+{
+  int i;
+  
+  HURD_CRITICAL_BEGIN;
+  __mutex_lock (&_hurd_dtable_lock);
+
+  for (i = 0; i < _hurd_dtablesize; ++i)
+    {
+      struct hurd_fd *const d = _hurd_dtable[i];
+      struct hurd_userlink ulink, ctty_ulink;
+      io_t port, ctty;
+
+      if (d == NULL)
+       /* Nothing to do for an unused descriptor cell.  */
+       continue;
+
+      port = _hurd_port_get (&d->port, &ulink);
+      ctty = _hurd_port_get (&d->ctty, &ctty_ulink);
+
+      if (ctty)
+       {
+         /* This fd has a ctty-special port.  We need a new one, to tell
+             the io server of our different process group.  */
+         io_t new;
+         if (! __term_open_ctty (ctty, _hurd_pid, _hurd_pgrp, &new))
+           _hurd_port_set (&d->port, new);
+       }
+
+      _hurd_port_free (&d->port, &ulink, port);
+      _hurd_port_free (&d->ctty, &ctty_ulink, ctty);
+    }
+
+  __mutex_unlock (&_hurd_dtable_lock);
+  HURD_CRITICAL_END;
+
+  (void) &ctty_new_pgrp;       /* Avoid "defined but not used" warning.  */
+}
+
+text_set_element (_hurd_pgrp_changed_hook, ctty_new_pgrp);
 \f
 /* Called to reauthenticate the dtable when the auth port changes.  */
 
@@ -170,11 +222,12 @@ reauth_dtable (void)
 {
   int i;
 
+  HURD_CRITICAL_BEGIN;
   __mutex_lock (&_hurd_dtable_lock);
 
-  for (i = 0; i < _hurd_dtable.size; ++i)
+  for (i = 0; i < _hurd_dtablesize; ++i)
     {
-      struct hurd_fd *const d = _hurd_dtable.d[i];
+      struct hurd_fd *const d = _hurd_dtable[i];
       mach_port_t new, newctty;
       
       if (d == NULL)
@@ -210,113 +263,9 @@ reauth_dtable (void)
     }
 
   __mutex_unlock (&_hurd_dtable_lock);
-}
-
-text_set_element (_hurd_reauth_hook, reauth_dtable);
-\f
-#include <hurd/signal.h>
-
-static void
-rectty_dtable (mach_port_t cttyid)
-{
-  int i;
-  
-  __mutex_lock (&_hurd_dtable_lock);
-
-  for (i = 0; i < _hurd_dtable.size; ++i)
-    {
-      struct hurd_fd *const d = _hurd_dtable.d[i];
-      mach_port_t newctty;
-
-      if (d == NULL)
-       /* Nothing to do for an unused descriptor cell.  */
-       continue;
-
-      if (cttyid == MACH_PORT_NULL)
-       /* We now have no controlling tty at all.  */
-       newctty = MACH_PORT_NULL;
-      else
-       HURD_PORT_USE (&d->port,
-                      ({ mach_port_t id;
-                         /* Get the io object's cttyid port.  */
-                         if (! __term_getctty (port, &id))
-                           {
-                             if (id == cttyid && /* Is it ours?  */
-                                 /* Get the ctty io port.  */
-                                 __term_become_ctty (port, _hurd_pid,
-                                                     _hurd_pgrp,
-                                                     _hurd_msgport,
-                                                     &newctty))
-                               /* XXX it is our ctty but the call failed? */
-                               newctty = MACH_PORT_NULL;
-                             __mach_port_deallocate
-                               (__mach_task_self (), (mach_port_t) id);
-                           }
-                         else
-                           newctty = MACH_PORT_NULL;
-                         0;
-                       }));
-
-      /* Install the new ctty port.  */
-      _hurd_port_set (&d->ctty, newctty);
-    }
-
-  __mutex_unlock (&_hurd_dtable_lock);
-}
-\f
-#if 0
-
-#include <sys/ioctl.h>
-
-
-/* Make FD be the controlling terminal.
-   This function is called for `ioctl (fd, TCIOSCTTY)'.  */
-
-static int
-tiocsctty (int fd,
-          int request,         /* Always TCIOSCTTY.  */
-          void *arg)           /* Not used.  */
-{
-  mach_port_t cttyid;
-  error_t err;
-
-  /* Get FD's cttyid port, unless it is already ours.  */
-  err = _HURD_DPORT_USE (fd,
-                        ctty ? EADDRINUSE : __term_getctty (port, &cttyid));
-  if (err == EADDRINUSE)
-    /* FD is already the ctty.  Nothing to do.  */
-    return 0;
-  else if (err)
-    return err;
-
-  /* Make it our own.  */
-  _hurd_port_set (&_hurd_ports[INIT_PORT_CTTYID], cttyid); /* Consumes ref.  */
+  HURD_CRITICAL_END;
 
-  /* Reset all the ctty ports in all the descriptors.  */
-  _HURD_PORT_USE (&_hurd_ports[INIT_PORT_CTTYID], (rectty_dtable (port), 0));
-
-  return 0;
+  (void) &reauth_dtable;       /* Avoid "defined but not used" warning.  */
 }
-_HURD_HANDLE_IOCTL (tiocsctty, TIOCSCTTY);
-
-/* Dissociate from the controlling terminal.  */
-
-static int
-tiocnotty (int fd,
-          int request,         /* Always TIOCNOTTY.  */
-          void *arg)           /* Not used.  */
-{
-  /* XXX should verify that FD is ctty and return EINVAL? */
-
-  /* Clear our cttyid port cell.  */
-  _hurd_port_set (&_hurd_ports[INIT_PORT_CTTYID], MACH_PORT_NULL);
 
-  /* Reset all the ctty ports in all the descriptors.  */
-  _HURD_PORT_USE (&_hurd_ports[INIT_PORT_CTTYID],
-                 (rectty_dtable (MACH_PORT_NULL), 0));
-
-  return 0;
-}
-_HURD_HANDLE_IOCTL (tiocnotty, TIOCNOTTY);
-
-#endif
+text_set_element (_hurd_reauth_hook, reauth_dtable);