Wed Nov 15 19:22:07 1995 Roland McGrath <roland@churchy.gnu.ai.mit.edu>
authorRoland McGrath <roland@gnu.org>
Thu, 16 Nov 1995 00:44:18 +0000 (00:44 +0000)
committerRoland McGrath <roland@gnu.org>
Thu, 16 Nov 1995 00:44:18 +0000 (00:44 +0000)
* sysdeps/mach/hurd/dl-sysdep.c: Include _itoa.h from stdio-common
instead of stdio.
(_dl_sysdep_start): If passed user entry is zero and
EXEC_STACK_ARGS flag set, reset user entry to &_start.

* elf/rtld.c (dl_main): Only call _dl_setup_hash if there is a
DT_HASH element.

* libc-symbols.h [HAVE_ELF] (symbol_set_declare): Gratuitously
repeat weak decl using weak_symbol macro, in case using broken GCC
(<2.8).

Wed Nov 15 18:49:55 1995  Ulrich Drepper  <drepper@ipd.info.uni-karlsruhe.de>

* sysdeps/i386/isnanl.c: New file.
* sysdeps/i386/isinfl.c: New file.

ChangeLog
elf/rtld.c
libc-symbols.h
sysdeps/i386/isinfl.c [new file with mode: 0644]
sysdeps/i386/isnanl.c [new file with mode: 0644]
sysdeps/mach/hurd/dl-sysdep.c

index b0d0c19..1261c47 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,22 @@
+Wed Nov 15 19:22:07 1995  Roland McGrath  <roland@churchy.gnu.ai.mit.edu>
+
+       * sysdeps/mach/hurd/dl-sysdep.c: Include _itoa.h from stdio-common
+       instead of stdio.
+       (_dl_sysdep_start): If passed user entry is zero and
+       EXEC_STACK_ARGS flag set, reset user entry to &_start.
+
+       * elf/rtld.c (dl_main): Only call _dl_setup_hash if there is a
+       DT_HASH element.
+
+       * libc-symbols.h [HAVE_ELF] (symbol_set_declare): Gratuitously
+       repeat weak decl using weak_symbol macro, in case using broken GCC
+       (<2.8).
+
+Wed Nov 15 18:49:55 1995  Ulrich Drepper  <drepper@ipd.info.uni-karlsruhe.de>
+
+       * sysdeps/i386/isnanl.c: New file.
+       * sysdeps/i386/isinfl.c: New file.
+
 Tue Nov 14 18:44:21 1995  Roland McGrath  <roland@churchy.gnu.ai.mit.edu>
 
        * malloc/free.c (free): Moved null and aligned_blocks checks
index 9a822a8..88f0d6d 100644 (file)
@@ -226,8 +226,9 @@ of this helper program; chances are you did not intend to run this program.\n",
 
       /* Extract the contents of the dynamic section for easy access.  */
       elf_get_dynamic_info (l->l_ld, l->l_info);
-      /* Set up our cache of pointers into the hash table.  */
-      _dl_setup_hash (l);
+      if (l->l_info[DT_HASH])
+       /* Set up our cache of pointers into the hash table.  */
+       _dl_setup_hash (l);
 
       if (l->l_info[DT_DEBUG])
        /* There is a DT_DEBUG entry in the dynamic section.  Fill it in
index b08f061..c895fe4 100644 (file)
@@ -235,8 +235,10 @@ extern const char _libc_intl_domainname[];
 
 /* Declare SET for use in this module, if defined in another module.  */
 #define symbol_set_declare(set)        \
-  extern void *const __start_##set __attribute__ ((__weak__)); \
-  extern void *const __stop_##set __attribute__ ((__weak__));
+  extern void *const __start_##set __attribute__ ((__weak__));         \
+  extern void *const __stop_##set __attribute__ ((__weak__));          \
+  /* Gratuitously repeat weak decl, in case using broken GCC (<2.8).  */\
+  weak_symbol (__start_##set) weak_symbol (__stop_##set)
 
 /* Return a pointer (void *const *) to the first element of SET.  */
 #define symbol_set_first_element(set)  (&__start_##set)
diff --git a/sysdeps/i386/isinfl.c b/sysdeps/i386/isinfl.c
new file mode 100644 (file)
index 0000000..056d756
--- /dev/null
@@ -0,0 +1,46 @@
+/* Check `long double' for Infinity.  i386 FPU version.
+Copyright (C) 1991, 1992, 1995 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 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.
+
+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.  */
+
+#include <math.h>
+#include "ieee754.h"
+
+#undef __isinfl
+#undef isinfl
+
+
+/* Return 0 if VALUE is finite or NaN, +1 if it
+   is +Infinity, -1 if it is -Infinity.  */
+int
+__isinfl (long double value)
+{
+  union ieee854_long_double u;
+
+  u.d = value;
+
+  /* Intel's interpretation of the IEEE 854 standard defines Inf to
+     have the maximum possible exponent and the MSB of the mantissa
+     set.  No further bit of the mantissa must be set.  */
+  if ((u.ieee.exponent & 0x7fff) == 0x7fff &&
+      u.ieee.mantissa0 == 0x80000000 && u.ieee.mantissa1 == 0)
+    return u.ieee.negative ? -1 : 1;
+
+  return 0;
+}
+
+weak_alias (__isinfl, isinfl);
diff --git a/sysdeps/i386/isnanl.c b/sysdeps/i386/isnanl.c
new file mode 100644 (file)
index 0000000..de10c07
--- /dev/null
@@ -0,0 +1,43 @@
+/* Check `long double' for Not A Number.  i386 FPU version.
+Copyright (C) 1991, 1992, 1995 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 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.
+
+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.  */
+
+#include <math.h>
+#include "ieee754.h"
+
+#undef __isnanl
+#undef isnanl
+
+
+/* Return nonzero if VALUE is not a number.  */
+int
+__isnanl (long double value)
+{
+  union ieee854_long_double u;
+
+  u.d = value;
+
+  /* Intel's interpretation of the IEEE 854 standard defines NaN to
+     have the maximum possible exponent and the MSB and at least one
+     more bit of the mantissa set.  */
+  return ((u.ieee.exponent & 0x7fff) == 0x7fff
+         && ((u.ieee.mantissa0 & 0x80000000) != 0)
+         && ((u.ieee.mantissa0 & 0x7fffffff) != 0 || u.ieee.mantissa1 != 0));
+}
+
+weak_alias (__isnanl, isnanl);
index 1038075..0144958 100644 (file)
@@ -29,7 +29,7 @@ Cambridge, MA 02139, USA.  */
 #include <mach/mig_support.h>
 #include "hurdstartup.h"
 #include <mach/host_info.h>
-#include "../stdio/_itoa.h"
+#include "../stdio-common/_itoa.h"
 #include <hurd/auth.h>
 #include <hurd/term.h>
 #include <stdarg.h>
@@ -104,6 +104,10 @@ _dl_sysdep_start (void **start_argptr,
 
       _dl_secure = _dl_hurd_data->flags & EXEC_SECURE;
 
+      if (_dl_hurd_data->flags & EXEC_STACK_ARGS &&
+         _dl_hurd_data->user_entry == 0)
+       _dl_hurd_data->user_entry = (vm_address_t) &_start;
+
 unfmh();                       /* XXX */
 
       if (_dl_hurd_data->user_entry == (vm_address_t) &_start)
@@ -132,14 +136,14 @@ unfmh();                  /* XXX */
              _dl_sysdep_fatal ("Bogus library spec: ", p, "\n", NULL);
            *memobjname++ = '\0';
            memobj = (mach_port_t) atoi (memobjname);
-      
+
            /* Add a user reference on the memory object port, so we will
               still have one after _dl_map_object_from_fd calls our
               `close'.  */
            err = __mach_port_mod_refs (__mach_task_self (), memobj,
                                        MACH_PORT_RIGHT_SEND, +1);
            assert_perror (err);
-           
+
            lastslash = strrchr (p, '/');
            l = _dl_map_object_from_fd (lastslash ? lastslash + 1 : p,
                                        memobj, strdup (p));
@@ -278,7 +282,7 @@ open (const char *file_name, int mode, ...)
 
   dealloc_dir = 0;
   nloops = 0;
-  
+
   while (1)
     {
       if (dealloc_dir)
@@ -468,7 +472,7 @@ open (const char *file_name, int mode, ...)
            bad_magic:
              return __hurd_fail (EGRATUITOUS);
            }
-         break;                
+         break;
 
        default:
          return __hurd_fail (EGRATUITOUS);
@@ -574,7 +578,7 @@ weak_symbol (free)
 \f
 /* Avoid signal frobnication in setjmp/longjmp.  */
 
-int __sigjmp_save (sigjmp_buf env, int savemask) 
+int __sigjmp_save (sigjmp_buf env, int savemask)
 { env[0].__mask_was_saved = savemask; return 0; }
 weak_symbol (__sigjmp_save)