* string/strnlen.c: New file.
* string/Makefile (routines): Add strnlen.
* string/string.h [__USE_GNU] (strnlen): Declare new function.
[__OPTIMIZE__]: Define extern inline implementation of it.
* stdlib/erand48_r.c: Use __mpn_construct_double instead of ldexp and
addition, to avoid using anything from -lm.
Mon Mar 4 21:57:14 1996 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
* sysdeps/unix/sysv/linux/m68k/Makefile: New file.
* sysdeps/unix/sysv/linux/m68k/sysdep.h (SYS_ify): Redefine.
(CALL_MCOUNT): New macro, empty unless [PROF].
(ENTRY): Do CALL_MCOUNT just after the label.
(JUMPTARGET): New macro.
(SYSCALL_ERROR_HANDLER): Fix syntax.
Thu Mar 14 04:20:48 1996 Roland McGrath <roland@charlie-brown.gnu.ai.mit.edu>
* sysdeps/unix/sysv/linux/init-first.c (init): Call `__personality'
function instead of using inline asm i386 syscall.
* sysdeps/unix/sysv/linux/syscalls.list: Add personality syscall.
* posix/unistd.h [__USE_BSD]: Declare usleep.
* misc/efgcvt.c (MAXDIG): New macro computed from <floats.h> constants.
(fcvt, ecvt): Use it for buffer size.
* stdlib/drand48-iter.c (__drand48_iterate): Use u_int64_t instead of
conditionalizing long vs long long.
* stdlib/drand48-iter.c (__drand48_iterate): Don't check for null
pointers; never return EFAULT.
* stdlib/drand48_r.c (drand48_r): Likewise.
* stdlib/erand48_r.c (erand48_r): Likewise.
+Thu Mar 14 06:01:07 1996 Roland McGrath <roland@charlie-brown.gnu.ai.mit.edu>
+
+ * string/strnlen.c: New file.
+ * string/Makefile (routines): Add strnlen.
+ * string/string.h [__USE_GNU] (strnlen): Declare new function.
+ [__OPTIMIZE__]: Define extern inline implementation of it.
+
+ * stdlib/erand48_r.c: Use __mpn_construct_double instead of ldexp and
+ addition, to avoid using anything from -lm.
+
+Mon Mar 4 21:57:14 1996 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
+
+ * sysdeps/unix/sysv/linux/m68k/Makefile: New file.
+
+ * sysdeps/unix/sysv/linux/m68k/sysdep.h (SYS_ify): Redefine.
+ (CALL_MCOUNT): New macro, empty unless [PROF].
+ (ENTRY): Do CALL_MCOUNT just after the label.
+ (JUMPTARGET): New macro.
+ (SYSCALL_ERROR_HANDLER): Fix syntax.
+
+Thu Mar 14 04:20:48 1996 Roland McGrath <roland@charlie-brown.gnu.ai.mit.edu>
+
+ * sysdeps/unix/sysv/linux/init-first.c (init): Call `__personality'
+ function instead of using inline asm i386 syscall.
+ * sysdeps/unix/sysv/linux/syscalls.list: Add personality syscall.
+
+ * posix/unistd.h [__USE_BSD]: Declare usleep.
+
Tue Mar 12 04:57:57 1996 Roland McGrath <roland@charlie-brown.gnu.ai.mit.edu>
+ * misc/efgcvt.c (MAXDIG): New macro computed from <floats.h> constants.
+ (fcvt, ecvt): Use it for buffer size.
+
+ * stdlib/drand48-iter.c (__drand48_iterate): Use u_int64_t instead of
+ conditionalizing long vs long long.
+
+ * stdlib/drand48-iter.c (__drand48_iterate): Don't check for null
+ pointers; never return EFAULT.
+ * stdlib/drand48_r.c (drand48_r): Likewise.
+ * stdlib/erand48_r.c (erand48_r): Likewise.
+
* setjmp/Makefile (tests): Add jmpbug.
* setjmp/jmpbug.c: New file.
-GNU C Library NEWS -- history of user-visible changes. 2 January 1996
+GNU C Library NEWS -- history of user-visible changes. 14 March 1996
Copyright (C) 1992, 93, 94, 95, 96 Free Software Foundation, Inc.
See the end for copying conditions.
* New macro `strdupa' copies a string like `strdup', but uses local stack
space from `alloca' instead of dynamic heap space from `malloc'.
+
+* New function `strnlen' is like `strlen' but searches only a given maximum
+ number of characters for the null terminator.
\f
Version 1.09
/* [efg]cvt -- compatibility functions for floating point formatting.
-Copyright (C) 1995 Free Software Foundation, Inc.
+Copyright (C) 1995, 1996 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
#include <stdio.h>
#include <stdlib.h>
+#include <float.h>
+
+#define MAXDIG (DBL_DIG + DBL_MAX_10_EXP)
char *
fcvt (value, ndigit, decpt, sign)
double value;
int ndigit, *decpt, *sign;
{
- static char buf[100];
+ static char buf[MAXDIG];
(void) fcvt_r (value, ndigit, decpt, sign, buf, sizeof buf);
double value;
int ndigit, *decpt, *sign;
{
- static char buf[100];
+ static char buf[MAXDIG];
(void) ecvt_r (value, ndigit, decpt, sign, buf, sizeof buf);
-/* Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
+/* Copyright (C) 1991, 92, 93, 94, 95, 96 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
error, but if `sleep' returns SECONDS, it probably didn't work. */
extern unsigned int sleep __P ((unsigned int __seconds));
+#ifdef __USE_BSD
+/* Sleep USECONDS microseconds, or until a signal arrives that is not blocked
+ or ignored. Return value is not necessarily useful. */
+extern unsigned int usleep __P ((unsigned __useconds));
+#endif
+
/* Suspend the process until a signal arrives.
This always returns -1 and sets `errno' to EINTR. */
longjmp (buf, 1);
}
-int
-main (void)
+void
+test (int x)
{
jmp_buf buf;
char *foo;
int arr[100];
- arr[77] = 76;
+ arr[77] = x;
if (setjmp (buf))
{
printf ("made it ok; %d\n", arr[77]);
- exit (0);
+ return;
}
foo = (char *) alloca (128);
sub5 (buf);
+}
+
+int
+main (void)
+{
+ int i;
+
+ for (i = 123; i < 345; ++i)
+ test (i);
- /* NOTREACHED */
- return 1;
+ return 0;
}
#include <errno.h>
#include <stdlib.h>
#include <limits.h>
-
+#include <sys/types.h>
/* Global state for non-reentrent functions. */
struct drand48_data __libc_drand48_data;
unsigned short int xsubi[3];
struct drand48_data *buffer;
{
- /* Be generous for the arguments, detect some errors. */
- if (xsubi == NULL || buffer == NULL)
- {
- errno = EFAULT;
- return -1;
- }
+ u_int64_t X, a, result;
/* Initialize buffer, if not yet done. */
if (!buffer->init)
48 bits. Because we compute the modulus it does not care how
many bits really are computed. */
- if (sizeof (long int) >= 6)
+ if (sizeof (unsigned short int) == 2)
{
- /* The `long' data type is sufficent. */
- unsigned long int X, a, result;
+ X = (xsubi[2] << 16 | xsubi[1]) << 16 | xsubi[0];
+ a = (buffer->a[2] << 16 | buffer->a[1]) << 16 | buffer->a[0];
-#define ONE_STEP \
- if (sizeof (unsigned short int) == 2) \
- { \
- X = (xsubi[2] << 16 | xsubi[1]) << 16 | xsubi[0]; \
- a = (buffer->a[2] << 16 | buffer->a[1]) << 16 | buffer->a[0]; \
- \
- result = X * a + buffer->c; \
- \
- xsubi[0] = result & 0xffff; \
- result >>= 16; \
- xsubi[1] = result & 0xffff; \
- result >>= 16; \
- xsubi[2] = result & 0xffff; \
- } \
- else \
- { \
- X = xsubi[2] << 16 | xsubi[1] >> 16; \
- a = buffer->a[2] << 16 | buffer->a[1] >> 16; \
- \
- result = X * a + buffer->c; \
- \
- xsubi[0] = result >> 16 & 0xffffffffl; \
- xsubi[1] = result << 16 & 0xffff0000l; \
- }
- ONE_STEP;
+ result = X * a + buffer->c;
+
+ xsubi[0] = result & 0xffff;
+ result >>= 16;
+ xsubi[1] = result & 0xffff;
+ result >>= 16;
+ xsubi[2] = result & 0xffff;
}
else
{
- /* We have to use the `long long' data type. */
- unsigned long long int X, a, result;
- ONE_STEP;
+ X = xsubi[2] << 16 | xsubi[1] >> 16;
+ a = buffer->a[2] << 16 | buffer->a[1] >> 16;
+
+ result = X * a + buffer->c;
+
+ xsubi[0] = result >> 16 & 0xffffffffl;
+ xsubi[1] = result << 16 & 0xffff0000l;
}
return 0;
-/* Copyright (C) 1995 Free Software Foundation, Inc.
+/* Copyright (C) 1995, 1996 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, August 1995.
struct drand48_data *buffer;
double *result;
{
- /* be generous for the arguments, detect some errors. */
- if (buffer == NULL)
- {
- errno = EFAULT;
- return -1;
- }
-
return erand48_r (buffer->X, buffer, result);
}
not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA. */
-#include <errno.h>
-#include <math.h>
#include <stdlib.h>
+#include "gmp.h"
+#include "gmp-mparam.h"
+#include <float.h>
+
+
+/* Function to construct a floating point number from an MP integer
+ containing the fraction bits, a base 2 exponent, and a sign flag. */
+extern double __mpn_construct_double (mp_srcptr mpn, int exponent, int neg);
int
erand48_r (xsubi, buffer, result)
struct drand48_data *buffer;
double *result;
{
- int i;
-
- /* Be generous for the arguments, detect some errors. */
- if (result == NULL)
- {
- errno = EFAULT;
- return -1;
- }
+ mp_limb mpn[(3 * sizeof (unsigned short int) + sizeof (mp_limb) - 1)
+ / sizeof (mp_limb)];
/* Compute next state. */
if (__drand48_iterate (xsubi, buffer) < 0)
return -1;
- *result = 0.0;
- for (i = 4 / sizeof (unsigned short int); i >= 0; --i)
- {
- double factor = ldexp (1.0, (i - 6) * sizeof (unsigned short int));
+ /* Build a 48-bit mpn containing the 48 random bits. */
+
+#if BITS_PER_MP_LIMB == 64
+ mpn[0] = (xsubi[0] << 32) | (xsubi[1] << 16) | xsubi[2];
+#elif BITS_PER_MP_LIMB == 32
+ mpn[0] = (xsubi[1] << 16) | xsubi[2];
+ mpn[1] = xsubi[0];
+#else
+ #error "BITS_PER_MP_LIMB value not handled"
+#endif
+
+ /* Shift them up so they are most significant bits of the fraction. */
+ __mpn_lshift (mpn, mpn, sizeof mpn / sizeof mpn[0], DBL_MANT_DIG - 48);
- *result += factor * (double) xsubi[i];
- }
+ /* Construct a positive double using those bits for the fractional part,
+ and a zero exponent so the resulting FP number is [0.0,1.0). */
+ *result = __mpn_construct_double (mpn, 0, 0);
return 0;
}
+++ /dev/null
-/* mc68020 __mpn_add_n -- Add two limb vectors of the same length > 0 and store
- sum in a third limb vector.
-
-Copyright (C) 1992, 1994 Free Software Foundation, Inc.
-
-This file is part of the GNU MP Library.
-
-The GNU MP 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 MP 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 MP Library; see the file COPYING.LIB. If not, write to
-the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
-
-/*
- INPUT PARAMETERS
- res_ptr (sp + 4)
- s1_ptr (sp + 8)
- s2_ptr (sp + 16)
- size (sp + 12)
-*/
-
-#include "asm-syntax.h"
-
- TEXT
- ALIGN
- GLOBL ___mpn_add_n
-
-LAB(___mpn_add_n)
-/* Save used registers on the stack. */
- INSN2(move,l ,MEM_PREDEC(sp),d2)
- INSN2(move,l ,MEM_PREDEC(sp),a2)
-
-/* Copy the arguments to registers. Better use movem? */
- INSN2(move,l ,a2,MEM_DISP(sp,12))
- INSN2(move,l ,a0,MEM_DISP(sp,16))
- INSN2(move,l ,a1,MEM_DISP(sp,20))
- INSN2(move,l ,d2,MEM_DISP(sp,24))
-
- INSN2(eor,w ,d2,#1)
- INSN2(lsr,l ,d2,#1)
- bcc L1
- INSN2(subq,l ,d2,#1) /* clears cy as side effect */
-
-LAB(Loop)
- INSN2(move,l ,d0,MEM_POSTINC(a0))
- INSN2(move,l ,d1,MEM_POSTINC(a1))
- INSN2(addx,l ,d0,d1)
- INSN2(move,l ,MEM_POSTINC(a2),d0)
-LAB(L1) INSN2(move,l ,d0,MEM_POSTINC(a0))
- INSN2(move,l ,d1,MEM_POSTINC(a1))
- INSN2(addx,l ,d0,d1)
- INSN2(move,l ,MEM_POSTINC(a2),d0)
-
- dbf d2,Loop /* loop until 16 lsb of %4 == -1 */
- INSN2(subx,l ,d0,d0) /* d0 <= -cy; save cy as 0 or -1 in d0 */
- INSN2(sub,l ,d2,#0x10000)
- bcs L2
- INSN2(add,l ,d0,d0) /* restore cy */
- bra Loop
-
-LAB(L2)
- INSN1(neg,l ,d0)
-
-/* Restore used registers from stack frame. */
- INSN2(move,l ,a2,MEM_POSTINC(sp))
- INSN2(move,l ,d2,MEM_POSTINC(sp))
-
- rts
+++ /dev/null
-/* asm.h -- Definitions for 68k syntax variations.
-
-Copyright (C) 1992, 1994 Free Software Foundation, Inc.
-
-This file is part of the GNU MP Library.
-
-The GNU MP 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 MP 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 MP Library; see the file COPYING.LIB. If not, write to
-the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
-
-#ifdef MIT_SYNTAX
-#define MEM(base)base@
-#define MEM_DISP(base,displacement)base@(displacement)
-#define MEM_PREDEC(memory_base)memory_base@-
-#define MEM_POSTINC(memory_base)memory_base@+
-#ifdef __STDC__
-#define INSN1(mnemonic,size_suffix,dst)mnemonic##size_suffix dst
-#define INSN2(mnemonic,size_suffix,dst,src)mnemonic##size_suffix src,dst
-#else
-#define INSN1(mnemonic,size_suffix,dst)mnemonic/**/size_suffix dst
-#define INSN2(mnemonic,size_suffix,dst,src)mnemonic/**/size_suffix src,dst
-#endif
-#define LAB(label) label:
-#define TEXT .text
-#define ALIGN .even
-#define GLOBL .globl
-#endif
-
-#ifdef SONY_SYNTAX
-#define MEM(base)(base)
-#define MEM_DISP(base,displacement)(displacement,base)
-#define MEM_PREDEC(memory_base)-(memory_base)
-#define MEM_POSTINC(memory_base)(memory_base)+
-#define INSN1(mnemonic,size_suffix,dst)mnemonic.size_suffix dst
-#ifdef __STDC__
-#define INSN2(mnemonic,size_suffix,dst,src)mnemonic.size_suffix src##,dst
-#else
-#define INSN2(mnemonic,size_suffix,dst,src)mnemonic.size_suffix src/**/,dst
-#endif
-#define LAB(label) label:
-#define TEXT .text
-#define ALIGN .even
-#define GLOBL .globl
-#endif
-
-#ifdef MOTOROLA_SYNTAX
-#define MEM(base)(base)
-#define MEM_DISP(base,displacement)(displacement,base)
-#define MEM_PREDEC(memory_base)-(memory_base)
-#define MEM_POSTINC(memory_base)(memory_base)+
-#define INSN1(mnemonic,size_suffix,dst)mnemonic.size_suffix dst
-#ifdef __STDC__
-#define INSN2(mnemonic,size_suffix,dst,src)mnemonic.size_suffix src##,dst
-#else
-#define INSN2(mnemonic,size_suffix,dst,src)mnemonic.size_suffix src/**/,dst
-#endif
-#define LAB(label) label
-#define TEXT
-#define ALIGN
-#define GLOBL XDEF
-#define l L
-#define w W
-#define move MOVE
-#define eor EOR
-#define lsr LSR
-#define add ADD
-#define addx ADDX
-#define addq ADDQ
-#define sub SUB
-#define subx SUBX
-#define subq SUBQ
-#define neg NEG
-#define bcc BCC
-#define bcs BCS
-#define bra BRA
-#define dbf DBF
-#define rts RTS
-#define d0 D0
-#define d1 D1
-#define d2 D2
-#define d3 D3
-#define d4 D4
-#define d5 D5
-#define d6 D6
-#define d7 D7
-#define a0 A0
-#define a1 A1
-#define a2 A2
-#define a3 A3
-#define a4 A4
-#define a5 A5
-#define a6 A6
-#define a7 A7
-#define sp SP
-#endif
+++ /dev/null
-/* mc68020 __mpn_sub_n -- Subtract two limb vectors of the same length > 0 and
- store difference in a third limb vector.
-
-Copyright (C) 1992, 1994 Free Software Foundation, Inc.
-
-This file is part of the GNU MP Library.
-
-The GNU MP 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 MP 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 MP Library; see the file COPYING.LIB. If not, write to
-the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
-
-/*
- INPUT PARAMETERS
- res_ptr (sp + 4)
- s1_ptr (sp + 8)
- s2_ptr (sp + 16)
- size (sp + 12)
-*/
-
-#include "asm-syntax.h"
-
- TEXT
- ALIGN
- GLOBL ___mpn_sub_n
-
-LAB(___mpn_sub_n)
-/* Save used registers on the stack. */
- INSN2(move,l ,MEM_PREDEC(sp),d2)
- INSN2(move,l ,MEM_PREDEC(sp),a2)
-
-/* Copy the arguments to registers. Better use movem? */
- INSN2(move,l ,a2,MEM_DISP(sp,12))
- INSN2(move,l ,a0,MEM_DISP(sp,16))
- INSN2(move,l ,a1,MEM_DISP(sp,20))
- INSN2(move,l ,d2,MEM_DISP(sp,24))
-
- INSN2(eor,w ,d2,#1)
- INSN2(lsr,l ,d2,#1)
- bcc L1
- INSN2(subq,l ,d2,#1) /* clears cy as side effect */
-
-LAB(Loop)
- INSN2(move,l ,d0,MEM_POSTINC(a0))
- INSN2(move,l ,d1,MEM_POSTINC(a1))
- INSN2(subx,l ,d0,d1)
- INSN2(move,l ,MEM_POSTINC(a2),d0)
-LAB(L1) INSN2(move,l ,d0,MEM_POSTINC(a0))
- INSN2(move,l ,d1,MEM_POSTINC(a1))
- INSN2(subx,l ,d0,d1)
- INSN2(move,l ,MEM_POSTINC(a2),d0)
-
- dbf d2,Loop /* loop until 16 lsb of %4 == -1 */
- INSN2(subx,l ,d0,d0) /* d0 <= -cy; save cy as 0 or -1 in d0 */
- INSN2(sub,l ,d2,#0x10000)
- bcs L2
- INSN2(add,l ,d0,d0) /* restore cy */
- bra Loop
-
-LAB(L2)
- INSN1(neg,l ,d0)
-
-/* Restore used registers from stack frame. */
- INSN2(move,l ,a2,MEM_POSTINC(sp))
- INSN2(move,l ,d2,MEM_POSTINC(sp))
-
- rts
--- /dev/null
+# Linux/m68k uses Motorola asm syntax and the ELF format.
+
+m68k-syntax-flag = -DMOTOROLA_SYNTAX
#include <sysdeps/unix/sysdep.h>
+/* For Linux we can use the system call table in the header file
+ /usr/include/asm/unistd.h
+ of the kernel. But these symbols do not follow the SYS_* syntax
+ so we have to redefine the `SYS_ify' macro here. */
+#undef SYS_ify
+#ifdef __STDC__
+# define SYS_ify(syscall_name) __NR_##syscall_name
+#else
+# define SYS_ify(syscall_name) __NR_/**/syscall_name
+#endif
+
#ifdef ASSEMBLER
#define POUND #
.globl name; \
.type name, @function; \
.align 4; \
- name##:
+ C_LABEL(name) \
+ CALL_MCOUNT
+
+/* If compiled for profiling, call `_mcount' at the start of each function. */
+#ifdef PROF
+/* The mcount code relies on a normal frame pointer being on the stack
+ to locate our caller, so push one just for its benefit. */
+#define CALL_MCOUNT \
+ move.l %fp, -(%sp); move.l %sp, %fp; \
+ jbsr JUMPTARGET (_mcount); \
+ move.l (%sp)+, %fp;
+#else
+#define CALL_MCOUNT /* Do nothing. */
+#endif
+
+#ifdef PIC
+#define JUMPTARGET(name) name##@PLTPC
+#else
+#define JUMPTARGET(name) name
+#endif
/* Since C identifiers are not normally prefixed with an underscore
on this system, the asm identifier `syscall_error' intrudes on the
/* Store (- %d0) into errno through the GOT. */
#define SYSCALL_ERROR_HANDLER \
syscall_error: \
- move.l (errno@GOTPC.l, %pc), %a0; \
+ move.l (errno@GOTPC, %pc), %a0; \
neg.l %d0; \
move.l %d0, (%a0); \
move.l POUND -1, %d0; \
projects / thirdparty / glibc.git / commitdiff
