2002-01-02 Roland McGrath <roland@frob.com>
[kopensolaris-gnu/glibc.git] / hurd / hurdmsg.c
index 69580c4..ffcce61 100644 (file)
@@ -1,20 +1,20 @@
-/* Copyright (C) 1992, 1994 Free Software Foundation, Inc.
-This file is part of the GNU C Library.
+/* Copyright (C) 1992, 1994, 1995, 1996, 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
 
-The GNU C Library is free software; you can redistribute it and/or
-modify it under the terms of the GNU Library General Public License as
-published by the Free Software Foundation; either version 2 of the
-License, or (at your option) any later version.
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
 
-The GNU C Library is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-Library General Public License for more details.
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
 
-You should have received a copy of the GNU Library General Public
-License along with the GNU C Library; see the file COPYING.LIB.  If
-not, write to the Free Software Foundation, Inc., 675 Mass Ave,
-Cambridge, MA 02139, USA.  */
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
 
 #include <hurd.h>
 #include <hurd/msg_server.h>
@@ -22,6 +22,7 @@ Cambridge, MA 02139, USA.  */
 #include <unistd.h>
 #include <limits.h>
 #include <string.h>
+#include <argz.h>
 
 
 #define AUTHCHECK \
@@ -32,8 +33,8 @@ Cambridge, MA 02139, USA.  */
 /* Snarfing and frobbing the init ports.  */
 
 kern_return_t
-_S_get_init_port (mach_port_t msgport, mach_port_t auth, int which,
-                 mach_port_t *result, mach_msg_type_name_t *result_type)
+  _S_msg_get_init_port (mach_port_t msgport, mach_port_t auth, int which,
+                       mach_port_t *result, mach_msg_type_name_t *result_type)
 {
   AUTHCHECK;
   *result_type = MACH_MSG_TYPE_MOVE_SEND;
@@ -43,8 +44,8 @@ _S_get_init_port (mach_port_t msgport, mach_port_t auth, int which,
 }
 
 kern_return_t
-_S_set_init_port (mach_port_t msgport, mach_port_t auth,
-                 int which, mach_port_t port)
+_S_msg_set_init_port (mach_port_t msgport, mach_port_t auth,
+                     int which, mach_port_t port)
 {
   error_t err;
 
@@ -58,12 +59,12 @@ _S_set_init_port (mach_port_t msgport, mach_port_t auth,
 }
 
 kern_return_t
-_S_get_init_ports (mach_port_t msgport, mach_port_t auth,
-                  mach_port_t **ports,
-                  mach_msg_type_name_t *ports_type,
-                  unsigned int *nports)
+_S_msg_get_init_ports (mach_port_t msgport, mach_port_t auth,
+                      mach_port_t **ports,
+                      mach_msg_type_name_t *ports_type,
+                      mach_msg_type_number_t *nports)
 {
-  unsigned int i;
+  mach_msg_type_number_t i;
   error_t err;
 
   AUTHCHECK;
@@ -92,10 +93,10 @@ _S_get_init_ports (mach_port_t msgport, mach_port_t auth,
 }
 
 kern_return_t
-_S_set_init_ports (mach_port_t msgport, mach_port_t auth,
-                  mach_port_t *ports, unsigned int nports)
+_S_msg_set_init_ports (mach_port_t msgport, mach_port_t auth,
+                      mach_port_t *ports, mach_msg_type_number_t nports)
 {
-  unsigned int i;
+  mach_msg_type_number_t i;
   error_t err;
 
   AUTHCHECK;
@@ -124,15 +125,17 @@ get_int (int which, int *value)
     case INIT_SIGMASK:
       {
        struct hurd_sigstate *ss = _hurd_thread_sigstate (_hurd_sigthread);
+       __spin_lock (&ss->lock);
        *value = ss->blocked;
-       __mutex_unlock (&ss->lock);
+       __spin_unlock (&ss->lock);
        return 0;
       }
     case INIT_SIGPENDING:
       {
        struct hurd_sigstate *ss = _hurd_thread_sigstate (_hurd_sigthread);
+       __spin_lock (&ss->lock);
        *value = ss->pending;
-       __mutex_unlock (&ss->lock);
+       __spin_unlock (&ss->lock);
        return 0;
       }
     case INIT_SIGIGN:
@@ -140,11 +143,12 @@ get_int (int which, int *value)
        struct hurd_sigstate *ss = _hurd_thread_sigstate (_hurd_sigthread);
        sigset_t ign;
        int sig;
+       __spin_lock (&ss->lock);
        __sigemptyset (&ign);
        for (sig = 1; sig < NSIG; ++sig)
          if (ss->actions[sig].sa_handler == SIG_IGN)
            __sigaddset (&ign, sig);
-       __mutex_unlock (&ss->lock);
+       __spin_unlock (&ss->lock);
        *value = ign;
        return 0;
       }
@@ -154,8 +158,8 @@ get_int (int which, int *value)
 }
 
 kern_return_t
-_S_get_init_int (mach_port_t msgport, mach_port_t auth,
-                int which, int *value)
+_S_msg_get_init_int (mach_port_t msgport, mach_port_t auth,
+                    int which, int *value)
 {
   AUTHCHECK;
 
@@ -163,11 +167,11 @@ _S_get_init_int (mach_port_t msgport, mach_port_t auth,
 }
 
 kern_return_t
-_S_get_init_ints (mach_port_t msgport, mach_port_t auth,
-                 int **values, unsigned int *nvalues)
+_S_msg_get_init_ints (mach_port_t msgport, mach_port_t auth,
+                     int **values, mach_msg_type_number_t *nvalues)
 {
   error_t err;
-  unsigned int i;
+  mach_msg_type_number_t i;
 
   AUTHCHECK;
 
@@ -207,15 +211,17 @@ set_int (int which, int value)
     case INIT_SIGMASK:
       {
        struct hurd_sigstate *ss = _hurd_thread_sigstate (_hurd_sigthread);
+       __spin_lock (&ss->lock);
        ss->blocked = value;
-       __mutex_unlock (&ss->lock);
+       __spin_unlock (&ss->lock);
        return 0;
       }
     case INIT_SIGPENDING:
       {
        struct hurd_sigstate *ss = _hurd_thread_sigstate (_hurd_sigthread);
+       __spin_lock (&ss->lock);
        ss->pending = value;
-       __mutex_unlock (&ss->lock);
+       __spin_unlock (&ss->lock);
        return 0;
       }
     case INIT_SIGIGN:
@@ -223,6 +229,7 @@ set_int (int which, int value)
        struct hurd_sigstate *ss = _hurd_thread_sigstate (_hurd_sigthread);
        int sig;
        const sigset_t ign = value;
+       __spin_lock (&ss->lock);
        for (sig = 1; sig < NSIG; ++sig)
          {
            if (__sigismember (&ign, sig))
@@ -230,7 +237,11 @@ set_int (int which, int value)
            else if (ss->actions[sig].sa_handler == SIG_IGN)
              ss->actions[sig].sa_handler = SIG_DFL;
          }
-       __mutex_unlock (&ss->lock);
+       __spin_unlock (&ss->lock);
+       return 0;
+
+      case INIT_TRACEMASK:
+       _hurdsig_traced = value;
        return 0;
       }
     default:
@@ -239,8 +250,8 @@ set_int (int which, int value)
 }
 
 kern_return_t
-_S_set_init_int (mach_port_t msgport, mach_port_t auth,
-                int which, int value)
+_S_msg_set_init_int (mach_port_t msgport, mach_port_t auth,
+                    int which, int value)
 {
   AUTHCHECK;
 
@@ -248,11 +259,11 @@ _S_set_init_int (mach_port_t msgport, mach_port_t auth,
 }
 
 kern_return_t
-_S_set_init_ints (mach_port_t msgport, mach_port_t auth,
-                 int *values, unsigned int nvalues)
+_S_msg_set_init_ints (mach_port_t msgport, mach_port_t auth,
+                     int *values, mach_msg_type_number_t nvalues)
 {
   error_t err;
-  unsigned int i;
+  mach_msg_type_number_t i;
 
   AUTHCHECK;
 
@@ -272,8 +283,8 @@ _S_set_init_ints (mach_port_t msgport, mach_port_t auth,
 \f
 
 kern_return_t
-_S_get_fd (mach_port_t msgport, mach_port_t auth,
-          int which, mach_port_t *result, mach_msg_type_name_t *result_type)
+_S_msg_get_fd (mach_port_t msgport, mach_port_t auth, int which,
+              mach_port_t *result, mach_msg_type_name_t *result_type)
 {
   AUTHCHECK;
 
@@ -288,8 +299,8 @@ _S_get_fd (mach_port_t msgport, mach_port_t auth,
 }
 
 kern_return_t
-_S_set_fd (mach_port_t msgport, mach_port_t auth,
-          int which, mach_port_t port)
+_S_msg_set_fd (mach_port_t msgport, mach_port_t auth,
+              int which, mach_port_t port)
 {
   AUTHCHECK;
 
@@ -300,27 +311,37 @@ _S_set_fd (mach_port_t msgport, mach_port_t auth,
 /* Snarfing and frobbing environment variables.  */
 
 kern_return_t
-_S_get_env_variable (mach_port_t msgport,
-                    char *variable,
-                    char **data, unsigned int *datalen)
+_S_msg_get_env_variable (mach_port_t msgport,
+                        char *variable,
+                        char **data, mach_msg_type_number_t *datalen)
 {
+  error_t err;
+  mach_msg_type_number_t valuelen;
   const char *value = getenv (variable);
 
   if (value == NULL)
     return ENOENT;
 
-  /* XXX this pointer might become invalid */
-  *data = value;
-  *datalen = strlen (value);
+  valuelen = strlen (value);
+  if (valuelen > *datalen)
+    {
+      if (err = __vm_allocate (__mach_task_self (), 
+                              (vm_address_t *) data, valuelen, 1))
+       return err;
+    }
+
+  memcpy (*data, value, valuelen);
+  *datalen = valuelen;
+
   return 0;
 }
 
 
 kern_return_t
-_S_set_env_variable (mach_port_t msgport, mach_port_t auth,
-                    char *variable,
-                    char *value,
-                    int replace)
+_S_msg_set_env_variable (mach_port_t msgport, mach_port_t auth,
+                        char *variable,
+                        char *value,
+                        int replace)
 {
   AUTHCHECK;
 
@@ -330,8 +351,8 @@ _S_set_env_variable (mach_port_t msgport, mach_port_t auth,
 }
 
 kern_return_t
-_S_get_environment (mach_port_t msgport,
-                   char **data, unsigned int *datalen)
+_S_msg_get_environment (mach_port_t msgport,
+                       char **data, mach_msg_type_number_t *datalen)
 {
   /* Pack the environment into an array with nulls separating elements.  */
   if (__environ != NULL)
@@ -362,62 +383,38 @@ _S_get_environment (mach_port_t msgport,
 }
 
 kern_return_t
-_S_set_environment (mach_port_t msgport, mach_port_t auth,
-                   char *data, unsigned int datalen)
+_S_msg_set_environment (mach_port_t msgport, mach_port_t auth,
+                       char *data, mach_msg_type_number_t datalen)
 {
-  int _hurd_split_args (char *, unsigned int, char **);
+  int _hurd_split_args (char *, mach_msg_type_number_t, char **);
   int envc;
   char **envp;
 
   AUTHCHECK;
 
-  envc = _hurd_split_args (data, datalen, NULL);
+  envc = __argz_count (data, datalen);
   envp = malloc ((envc + 1) * sizeof (char *));
   if (envp == NULL)
     return errno;
-  _hurd_split_args (data, datalen, envp);
+  __argz_extract (data, datalen, envp);
   __environ = envp;            /* XXX cooperate with loadenv et al */
   return 0;
 }
-
 \f
 
 /* XXX */
 
 kern_return_t
-_S_get_dtable (mach_port_t process,
-              mach_port_t refport,
-              portarray_t *dtable,
-              mach_msg_type_name_t *dtablePoly,
-              mach_msg_type_number_t *dtableCnt)
-{ return EOPNOTSUPP; }
-
-kern_return_t
-_S_set_dtable (mach_port_t process,
-              mach_port_t refport,
-              portarray_t dtable,
-              mach_msg_type_number_t dtableCnt)
-{ return EOPNOTSUPP; }
-
-kern_return_t
-_S_io_select_done (mach_port_t notify_port,
-                  int select_result,
-                  int id_tag)
-{ return EOPNOTSUPP; }
-
-kern_return_t
-_S_startup_dosync (mach_port_t process)
-{ return EOPNOTSUPP; }
-
-kern_return_t
-_S_dir_changed (mach_port_t notify_port,
-               dir_changed_type_t change,
-               string_t name)
+_S_msg_get_dtable (mach_port_t process,
+                  mach_port_t refport,
+                  portarray_t *dtable,
+                  mach_msg_type_name_t *dtablePoly,
+                  mach_msg_type_number_t *dtableCnt)
 { return EOPNOTSUPP; }
 
 kern_return_t
-_S_file_changed (mach_port_t notify_port,
-                file_changed_type_t change,
-                off_t start,
-                off_t end)
+_S_msg_set_dtable (mach_port_t process,
+                  mach_port_t refport,
+                  portarray_t dtable,
+                  mach_msg_type_number_t dtableCnt)
 { return EOPNOTSUPP; }