mirror of https://gitee.com/Nocallback/glibc.git
Browse Source
2000-05-05 Jes Sorensen <jes@linuxcare.com> * sysdeps/unix/sysv/linux/ia64/sysdep.h: New file. * sysdeps/unix/sysv/linux/ia64/syscall.S: New file. * sysdeps/unix/sysv/linux/ia64/bits/types.h: New file. * sysdeps/unix/sysv/linux/ia64/bits/endian.h: New file. * sysdeps/ia64/Implies: New file. * sysdeps/ia64/Versions: New file. Declare _dl_symbol_address. * sysdeps/ia64/Makefile: New file. * sysdeps/ia64/gmp-mparam.h: New file, * sysdeps/ia64/elf/start.S: New file. * sysdeps/ia64/bits/fenv.h: New file. 2000-05-05 David Mosberger-Tang <davidm@hpl.hp.com> * sysdeps/unix/sysv/linux/ia64/sysdep.S: New file. 2000-04-26 Jes Sorensen <Jes.Sorensen@cern.ch> * sysdeps/unix/sysv/linux/ia64/bits/elfclass.h: New file. The ia64 has 64 bit .hash entries just as the Alpha. 2000-04-25 Jes Sorensen <Jes.Sorensen@cern.ch> * sysdeps/ia64/memprof.h: New file. Provide GETSP() macro. 2000-04-17 Jes Sorensen <Jes.Sorensen@cern.ch> * sysdeps/ia64/fpu/fclrexcpt.c: New file. * sysdeps/ia64/fpu/fedisblxcpt.c: New file. * sysdeps/ia64/fpu/feenablxcpt.c: New file. * sysdeps/ia64/fpu/fegetenv.c: New file. * sysdeps/ia64/fpu/fegetexcept.c: New file. * sysdeps/ia64/fpu/fegetround.c: New file. * sysdeps/ia64/fpu/feholdexcpt.c: New file. * sysdeps/ia64/fpu/fesetenv.c: New file. * sysdeps/ia64/fpu/fesetround.c: New file. * sysdeps/ia64/fpu/feupdateenv.c: New file. * sysdeps/ia64/fpu/fgetexcptflg.c: New file. * sysdeps/ia64/fpu/fraiseexcpt.c: New file. * sysdeps/ia64/fpu/fsetexcptflg.c: New file. * sysdeps/ia64/fpu/ftestexcept.c: New file. * sysdeps/unix/sysv/linux/i386/dl-procinfo.h (_DL_HWCAP_COUNT): New. * sysdeps/unix/sysv/linux/sparc/sparc32/dl-procinfo.h (_DL_HWCAP_COUNT): New. * sysdeps/unix/sysv/linux/sparc/sparc64/dl-procinfo.h (_DL_HWCAP_COUNT): New.cvs/glibc-2-2-branch
Ulrich Drepper
26 years ago
27 changed files with 1234 additions and 7 deletions
@ -0,0 +1,8 @@ |
|||
ifeq ($(subdir), csu) |
|||
CPPFLAGS-start.S = -D__ASSEMBLY__ |
|||
endif |
|||
|
|||
ifeq ($(subdir),elf) |
|||
dl-routines += dl-symaddr dl-fptr |
|||
rtld-routines += dl-symaddr dl-fptr |
|||
endif |
|||
@ -0,0 +1,6 @@ |
|||
ld { |
|||
GLIBC_2.2 { |
|||
# ia64 specific functions in the dynamic linker, but used by libc.so. |
|||
_dl_symbol_address; |
|||
} |
|||
} |
|||
@ -0,0 +1,82 @@ |
|||
/* Copyright (C) 1999, 2000 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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#ifndef _FENV_H |
|||
# error "Never use <bits/fenv.h> directly; include <fenv.h> instead." |
|||
#endif |
|||
|
|||
|
|||
/* Define bits representing the exception. We use the bit positions of
|
|||
the appropriate bits in the FPSR... (Tahoe EAS 2.4 5-4)*/ |
|||
|
|||
enum |
|||
{ |
|||
FE_INEXACT = 1UL << 5, |
|||
#define FE_INEXACT FE_INEXACT |
|||
|
|||
FE_UNDERFLOW = 1UL << 4, |
|||
#define FE_UNDERFLOW FE_UNDERFLOW |
|||
|
|||
FE_OVERFLOW = 1UL << 3, |
|||
#define FE_OVERFLOW FE_OVERFLOW |
|||
|
|||
FE_DIVBYZERO = 1UL << 2, |
|||
#define FE_DIVBYZERO FE_DIVBYZERO |
|||
|
|||
FE_UNNORMAL = 1UL << 1, |
|||
#define FE_UNNORMAL FE_UNNORMAL |
|||
|
|||
FE_INVALID = 1UL << 0, |
|||
#define FE_INVALID FE_INVALID |
|||
|
|||
FE_ALL_EXCEPT = |
|||
(FE_INEXACT | FE_UNDERFLOW | FE_OVERFLOW | FE_DIVBYZERO | FE_UNNORMAL | FE_INVALID) |
|||
#define FE_ALL_EXCEPT FE_ALL_EXCEPT |
|||
}; |
|||
|
|||
|
|||
enum |
|||
{ |
|||
FE_TOWARDZERO = 3, |
|||
#define FE_TOWARDZERO FE_TOWARDZERO |
|||
|
|||
FE_UPWARD = 2, |
|||
#define FE_UPWARD FE_UPWARD |
|||
|
|||
FE_DOWNWARD = 1, |
|||
#define FE_DOWNWARD FE_DOWNWARD |
|||
|
|||
FE_TONEAREST = 0, |
|||
#define FE_TONEAREST FE_TONEAREST |
|||
}; |
|||
|
|||
|
|||
/* Type representing exception flags. */ |
|||
typedef unsigned long fexcept_t; |
|||
|
|||
/* Type representing floating-point environment. */ |
|||
typedef unsigned long fenv_t; |
|||
|
|||
/* If the default argument is used we use this value. */ |
|||
#define FE_DFL_ENV ((fenv_t *) 0xc009804c0270033fUL) |
|||
|
|||
#ifdef __USE_GNU |
|||
/* Floating-point environment where only FE_UNNORMAL is masked since this
|
|||
exception is not generally supported by glibc. */ |
|||
# define FE_NOMASK_ENV ((fenv_t *) 0xc009804c02700302UL) |
|||
#endif |
|||
@ -0,0 +1,84 @@ |
|||
/* Copyright (C) 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Written by Jes Sorensen, <Jes.Sorensen@cern.ch>, April 1999. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <asm/unistd.h> |
|||
#include <asm/fpu.h> |
|||
|
|||
/* |
|||
* Arguments for __libc_start_main: |
|||
* out0: main |
|||
* out1: argc |
|||
* out2: argv |
|||
* out3: init |
|||
* out4: fini |
|||
* out5: rtld_fini |
|||
* out6: stack_end |
|||
*/ |
|||
|
|||
.psr abi64 |
|||
.psr lsb |
|||
.lsb |
|||
|
|||
.text |
|||
|
|||
.global _start# |
|||
.proc _start# |
|||
|
|||
_start: |
|||
{ .mlx |
|||
alloc r2 = ar.pfs,0,0,7,0 |
|||
movl r3 = FPSR_DEFAULT |
|||
} |
|||
{ .mlx |
|||
adds out2 = 16, sp /* get address of argc value */ |
|||
movl gp = @gprel(0f) |
|||
;; |
|||
} |
|||
0: { .mii |
|||
ld8 out1 = [out2], 8 /* load argc and move out2 to become argv */ |
|||
mov r9 = ip |
|||
;; |
|||
sub gp = r9, gp /* back-compute gp value */ |
|||
;; |
|||
} |
|||
{ .mfi |
|||
mov ar.fpsr = r3 |
|||
addl out0 = @ltoff(@fptr(main#)), gp |
|||
} |
|||
{ .mfi |
|||
addl out4 = @ltoff(@fptr(_fini#)), gp |
|||
addl out3 = @ltoff(@fptr(_init#)), gp |
|||
;; |
|||
} |
|||
{ .mmi |
|||
ld8 out0 = [out0] /* pointer to `main' function descriptor */ |
|||
ld8 out3 = [out3] /* pointer to `init' function descriptor */ |
|||
adds out6 = 16, sp /* highest non-environment stack address */ |
|||
} |
|||
{ .mib |
|||
ld8 out4 = [out4] /* pointer to `fini' function descriptor */ |
|||
mov out5 = ret0 /* dynamic linker destructor */ |
|||
br.call.sptk.few rp = __libc_start_main# |
|||
} |
|||
{ .mib |
|||
mov rp = r0 |
|||
br.ret.sptk.few rp /* break miserably if we ever return */ |
|||
;; |
|||
} |
|||
.endp _start# |
|||
@ -0,0 +1,39 @@ |
|||
/* Clear given exceptions in current floating-point environment.
|
|||
Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999 and |
|||
Jes Sorensen <Jes.Sorensen@cern.ch>, 2000 |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
feclearexcept (int excepts) |
|||
{ |
|||
fenv_t fpsr; |
|||
|
|||
/* Get the current state. */ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
|
|||
/* Clear the relevant bits. */ |
|||
fpsr &= ~(((unsigned long int) ((excepts & FE_ALL_EXCEPT) << 13))); |
|||
/* Put the new state in effect. */ |
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0" :: "r" (fpsr) : "memory"); |
|||
|
|||
/* success */ |
|||
return 0; |
|||
} |
|||
@ -0,0 +1,37 @@ |
|||
/* Disable floating-point exceptions.
|
|||
Copyright (C) 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Jes Sorensen <Jes.Sorensen@cern.ch>, 2000. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
fedisableexcept (int excepts) |
|||
{ |
|||
fenv_t old_fpsr; |
|||
fenv_t new_fpsr; |
|||
|
|||
/* Get the current fpsr. */ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (old_fpsr)); |
|||
|
|||
new_fpsr = old_fpsr |= FE_ALL_EXCEPT; |
|||
|
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0" :: "r" (new_fpsr) : "memory"); |
|||
|
|||
return (old_fpsr ^ FE_ALL_EXCEPT) & FE_ALL_EXCEPT; |
|||
} |
|||
@ -0,0 +1,38 @@ |
|||
/* Enable floating-point exceptions.
|
|||
Copyright (C) 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Jes Sorensen <Jes.Sorensen@cern.ch>, 2000. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
feenableexcept (int excepts) |
|||
{ |
|||
fenv_t old_fpsr; |
|||
fenv_t new_fpsr; |
|||
|
|||
/* Get the current fpsr. */ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r " (old_fpsr)); |
|||
|
|||
new_fpsr = ((old_fpsr & FE_ALL_EXCEPT) |
|||
| (old_fpsr & ((unsigned long int) excepts ^ FE_ALL_EXCEPT))); |
|||
|
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0" :: "r" (new_fpsr) : "memory"); |
|||
|
|||
return (old_fpsr ^ FE_ALL_EXCEPT) & FE_ALL_EXCEPT; |
|||
} |
|||
@ -0,0 +1,29 @@ |
|||
/* Store current floating-point environment.
|
|||
Copyright (C) 1997, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
fegetenv (fenv_t *envp) |
|||
{ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (*envp)); |
|||
|
|||
return 0; |
|||
} |
|||
@ -0,0 +1,31 @@ |
|||
/* Get enabled floating-point exceptions.
|
|||
Copyright (C) 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Jes Sorensen <Jes.Sorensen@cern.ch>, 2000. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
fegetexcept (void) |
|||
{ |
|||
fenv_t fpsr; |
|||
|
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
|
|||
return (fpsr ^ FE_ALL_EXCEPT) & FE_ALL_EXCEPT; |
|||
} |
|||
@ -0,0 +1,31 @@ |
|||
/* Return current rounding direction.
|
|||
Copyright (C) 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
fegetround (void) |
|||
{ |
|||
fenv_t fpsr; |
|||
|
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
|
|||
return (fpsr >> 10) & 3; |
|||
} |
|||
@ -0,0 +1,33 @@ |
|||
/* Store current floating-point environment and clear exceptions.
|
|||
Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999 |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
feholdexcept (fenv_t *envp) |
|||
{ |
|||
/* Save the current state. */ |
|||
fegetenv (envp); |
|||
|
|||
/* set the trap disable bit */ |
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0" :: "r" (*envp | FE_ALL_EXCEPT)); |
|||
|
|||
return 1; |
|||
} |
|||
@ -0,0 +1,41 @@ |
|||
/* Install given floating-point environment.
|
|||
Copyright (C) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Jes Sorensen <Jes.Sorensen@cern.ch>, 2000 |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
fesetenv (const fenv_t *envp) |
|||
{ |
|||
fenv_t env; |
|||
|
|||
/*
|
|||
This stinks! |
|||
Magic encoding of default values: bit 62+63 set (which will never |
|||
happen for a user-space address) means it's not indirect. |
|||
*/ |
|||
if (((unsigned long int) envp >> 62) == 0x03) |
|||
env = (unsigned long int) envp & 0x3fffffffffffffff; |
|||
else |
|||
env = *envp; |
|||
|
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0;;" :: "r" (env)); |
|||
|
|||
return 0; |
|||
} |
|||
@ -0,0 +1,41 @@ |
|||
/* Set current rounding direction.
|
|||
Copyright (C) 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
fesetround (int round) |
|||
{ |
|||
unsigned long int fpsr; |
|||
|
|||
if (round & ~3) |
|||
return 0; |
|||
|
|||
/* Get the current state. */ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
|
|||
/* Set the relevant bits. */ |
|||
fpsr = (fpsr & ~(3UL << 10)) | ((unsigned long int) round << 10); |
|||
|
|||
/* Put the new state in effect. */ |
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0" :: "r" (fpsr) : "memory"); |
|||
|
|||
return 1; |
|||
} |
|||
@ -0,0 +1,42 @@ |
|||
/* Install given floating-point environment and raise exceptions.
|
|||
Copyright (C) 1997, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
feupdateenv (const fenv_t *envp) |
|||
{ |
|||
fenv_t fpsr; |
|||
|
|||
|
|||
/* Get the current exception state. */ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
|
|||
/* Install new environment. */ |
|||
fesetenv (envp); |
|||
|
|||
/* Raise the safed exception. Incidently for us the implementation
|
|||
defined format of the values in objects of type fexcept_t is the |
|||
same as the ones specified using the FE_* constants. */ |
|||
feraiseexcept ((int) fpsr & FE_ALL_EXCEPT); |
|||
|
|||
/* Success. */ |
|||
return 0; |
|||
} |
|||
@ -0,0 +1,35 @@ |
|||
/* Store current representation for exceptions.
|
|||
Copyright (C) 1997, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
fegetexceptflag (fexcept_t *flagp, int excepts) |
|||
{ |
|||
fenv_t fpsr; |
|||
|
|||
/* Get the current exceptions. */ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
|
|||
*flagp = (fpsr ^ FE_ALL_EXCEPT) & excepts & FE_ALL_EXCEPT; |
|||
|
|||
/* Success. */ |
|||
return 0; |
|||
} |
|||
@ -0,0 +1,94 @@ |
|||
/* Raise given exceptions.
|
|||
Copyright (C) 1997, 1998, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Jes Sorensen <Jes.Sorensen@cern.ch>, 2000. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
#include <math.h> |
|||
#include <signal.h> |
|||
#include <unistd.h> |
|||
#include <asm/fpu.h> |
|||
|
|||
int |
|||
feraiseexcept (int excepts) |
|||
{ |
|||
fenv_t fpsr; |
|||
double tmp; |
|||
double dummy; |
|||
|
|||
/* Raise exceptions represented by EXPECTS. But we must raise only
|
|||
one signal at a time. It is important the if the overflow/underflow |
|||
exception and the inexact exception are given at the same time, |
|||
the overflow/underflow exception precedes the inexact exception. */ |
|||
|
|||
/* We do these bits in assembly to be certain GCC doesn't optimize
|
|||
away something important. */ |
|||
|
|||
/* First: invalid exception. */ |
|||
if (FE_INVALID & excepts) |
|||
{ |
|||
/* One example of a invalid operation is 0 * Infinity. */ |
|||
tmp = 0; |
|||
__asm__ __volatile__ ("frcpa.s0 %0,p1=f0,f0" : "=f" (tmp) : : "p1" ); |
|||
} |
|||
|
|||
/* Next: division by zero. */ |
|||
if (FE_DIVBYZERO & excepts) |
|||
__asm__ __volatile__ ("frcpa.s0 %0,p1=f1,f0" : "=f" (tmp) : : "p1" ); |
|||
|
|||
/* XXX There seem to be no reliable way to generate
|
|||
overflow/underflow exceptions without causing inexact exceptions |
|||
as well. */ |
|||
/* Next: overflow. */ |
|||
if (FE_OVERFLOW & excepts) |
|||
{ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
fpsr |= (FE_OVERFLOW << 13); |
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0" : : "r" (fpsr)); |
|||
|
|||
if (!((unsigned long int) fpsr & FE_OVERFLOW)) |
|||
{ |
|||
pid_t pid = getpid (); |
|||
kill (pid, SIGFPE); |
|||
} |
|||
} |
|||
|
|||
/* Next: underflow. */ |
|||
if (FE_UNDERFLOW & excepts) |
|||
{ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
fpsr |= (FE_UNDERFLOW << 13); |
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0" : : "r" (fpsr)); |
|||
|
|||
if (!((unsigned long int) fpsr & FE_UNDERFLOW)) |
|||
{ |
|||
pid_t pid = getpid(); |
|||
kill (pid, SIGFPE); |
|||
} |
|||
} |
|||
|
|||
/* Last: inexact. */ |
|||
if (FE_INEXACT & excepts) |
|||
{ |
|||
dummy = DBL_MAX; |
|||
__asm__ __volatile__ ("fadd.d.s0 %0=%1,f1" : "=f" (dummy) : "0" (dummy)); |
|||
} |
|||
|
|||
/* Success. */ |
|||
return 0; |
|||
} |
|||
@ -0,0 +1,44 @@ |
|||
/* Set floating-point environment exception handling.
|
|||
Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
#include <math.h> |
|||
|
|||
int |
|||
fesetexceptflag (const fexcept_t *flagp, int excepts) |
|||
{ |
|||
fenv_t fpsr; |
|||
|
|||
/* Get the current exception state. */ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
|
|||
/* Get the reverse bits so we can enable the exceptions flagged
|
|||
rather than disable them. */ |
|||
excepts ^= FE_ALL_EXCEPT; |
|||
|
|||
/* Set all the bits that were called for. */ |
|||
fpsr = (fpsr & ~FE_ALL_EXCEPT) | (*flagp & excepts & FE_ALL_EXCEPT); |
|||
|
|||
/* And store it back. */ |
|||
__asm__ __volatile__ ("mov.m ar.fpsr=%0" :: "r" (fpsr) : "memory"); |
|||
|
|||
/* Success. */ |
|||
return 0; |
|||
} |
|||
@ -0,0 +1,32 @@ |
|||
/* Test exception in current environment.
|
|||
Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Christian Boissat <Christian.Boissat@cern.ch>, 1999. |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <fenv.h> |
|||
|
|||
int |
|||
fetestexcept (int excepts) |
|||
{ |
|||
fenv_t fpsr; |
|||
|
|||
/* Get current exceptions. */ |
|||
__asm__ __volatile__ ("mov.m %0=ar.fpsr" : "=r" (fpsr)); |
|||
|
|||
return (fpsr >> 13) & excepts & FE_ALL_EXCEPT; |
|||
} |
|||
@ -0,0 +1,27 @@ |
|||
/* gmp-mparam.h -- Compiler/machine parameter header file.
|
|||
|
|||
Copyright (C) 2000 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., 59 Temple Place - Suite 330, Boston, |
|||
MA 02111-1307, USA. */ |
|||
|
|||
#define BITS_PER_MP_LIMB 64 |
|||
#define BYTES_PER_MP_LIMB 8 |
|||
#define BITS_PER_LONGINT 64 |
|||
#define BITS_PER_INT 32 |
|||
#define BITS_PER_SHORTINT 16 |
|||
#define BITS_PER_CHAR 8 |
|||
@ -0,0 +1,22 @@ |
|||
/* Copyright (C) 2000 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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
|
|||
#define GETSP() ({ register uintptr_t stack_ptr asm ("%r12"); stack_ptr; }) |
|||
|
|||
#include <sysdeps/generic/memprof.h> |
|||
@ -0,0 +1,14 @@ |
|||
/* This file specifies the native word size of the machine, which indicates
|
|||
the ELF file class used for executables and shared objects on this |
|||
machine. */ |
|||
|
|||
#ifndef _LINK_H |
|||
# error "Never use <bits/elfclass.h> directly; include <link.h> instead." |
|||
#endif |
|||
|
|||
#include <bits/wordsize.h> |
|||
|
|||
#define __ELF_NATIVE_CLASS __WORDSIZE |
|||
|
|||
/* Linux/ia64, like the Alpha has the .hash section with 64 bit entries. */ |
|||
typedef uint64_t Elf_Symndx; |
|||
@ -0,0 +1,7 @@ |
|||
/* Linux/ia64 is little-endian. */ |
|||
|
|||
#ifndef _ENDIAN_H |
|||
# error "Never use <bits/endian.h> directly; include <endian.h> instead." |
|||
#endif |
|||
|
|||
#define __BYTE_ORDER __LITTLE_ENDIAN |
|||
@ -0,0 +1,136 @@ |
|||
/* Copyright (C) 1999, 2000 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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
/*
|
|||
* Never include this file directly; use <sys/types.h> instead. |
|||
*/ |
|||
|
|||
#ifndef _BITS_TYPES_H |
|||
#define _BITS_TYPES_H 1 |
|||
|
|||
#include <features.h> |
|||
|
|||
#define __need_size_t |
|||
#include <stddef.h> |
|||
|
|||
/* Convenience types. */ |
|||
typedef unsigned char __u_char; |
|||
typedef unsigned short int __u_short; |
|||
typedef unsigned int __u_int; |
|||
typedef unsigned long int __u_long; |
|||
typedef unsigned long int __u_quad_t; |
|||
typedef long int __quad_t; |
|||
typedef signed char __int8_t; |
|||
typedef unsigned char __uint8_t; |
|||
typedef signed short int __int16_t; |
|||
typedef unsigned short int __uint16_t; |
|||
typedef signed int __int32_t; |
|||
typedef unsigned int __uint32_t; |
|||
typedef signed long int __int64_t; |
|||
typedef unsigned long int __uint64_t; |
|||
typedef __quad_t *__qaddr_t; |
|||
|
|||
typedef __uint64_t __dev_t; /* Type of device numbers. */ |
|||
typedef __uint32_t __uid_t; /* Type of user identifications. */ |
|||
typedef __uint32_t __gid_t; /* Type of group identifications. */ |
|||
typedef __uint32_t __ino_t; /* Type of file serial numbers. */ |
|||
typedef __uint64_t __ino64_t; /* "" (LFS) */ |
|||
typedef __uint32_t __mode_t; /* Type of file attribute bitmasks. */ |
|||
typedef __uint32_t __nlink_t; /* Type of file link counts. */ |
|||
typedef __int64_t __off_t; /* Type of file sizes and offsets. */ |
|||
typedef __int64_t __off64_t; /* "" (LFS) */ |
|||
typedef __int64_t __loff_t; /* Type of file sizes and offsets. */ |
|||
typedef __int32_t __pid_t; /* Type of process identifications. */ |
|||
typedef __int64_t __ssize_t; /* Type of a byte count, or error. */ |
|||
typedef __uint64_t __rlim_t; /* Type of resource counts. */ |
|||
typedef __uint64_t __rlim64_t; /* "" (LFS) */ |
|||
typedef __int32_t __blkcnt_t; /* Type to count nr disk blocks. */ |
|||
typedef __int64_t __blkcnt64_t; /* "" (LFS) */ |
|||
typedef __uint32_t __fsblkcnt_t; /* Type to count file system blocks. */ |
|||
typedef __uint64_t __fsblkcnt64_t; /* "" (LFS) */ |
|||
typedef __uint32_t __fsfilcnt_t; /* Type to count file system inodes. */ |
|||
typedef __uint64_t __fsfilcnt64_t; /* "" (LFS) */ |
|||
typedef __uint32_t __id_t; /* General type for IDs. */ |
|||
|
|||
typedef struct |
|||
{ |
|||
int __val[2]; |
|||
} __fsid_t; /* Type of file system IDs. */ |
|||
|
|||
/* Everythin' else. */ |
|||
typedef int __daddr_t; /* Type of a disk address. */ |
|||
typedef char *__caddr_t; /* Type of a core address. */ |
|||
typedef long int __time_t; |
|||
typedef unsigned int __useconds_t; |
|||
typedef long int __suseconds_t; |
|||
typedef long int __swblk_t; /* Type of a swap block maybe? */ |
|||
typedef long int __clock_t; |
|||
typedef int __key_t; /* Type of a SYSV IPC key. */ |
|||
|
|||
/* Used in `struct shmid_ds'. */ |
|||
typedef int __ipc_pid_t; |
|||
|
|||
/* type to represent block size. */ |
|||
typedef long int __blksize_t; |
|||
|
|||
/* One element in the file descriptor mask array. */ |
|||
typedef unsigned long int __fd_mask; |
|||
|
|||
/* Due to incaution, we may have gotten these from a kernel header file. */ |
|||
#undef __FD_SETSIZE |
|||
#undef __NFDBITS |
|||
#undef __FDMASK |
|||
|
|||
/* Number of descriptors that can fit in an `fd_set'. */ |
|||
#define __FD_SETSIZE 1024 |
|||
|
|||
/* It's easier to assume 8-bit bytes than to get CHAR_BIT. */ |
|||
#define __NFDBITS (8 * sizeof (__fd_mask)) |
|||
#define __FDELT(d) ((d) / __NFDBITS) |
|||
#define __FDMASK(d) ((__fd_mask) 1 << ((d) % __NFDBITS)) |
|||
|
|||
/* fd_set for select and pselect. */ |
|||
typedef struct |
|||
{ |
|||
/* XPG4.2 requires this member name. Otherwise avoid the name
|
|||
from the user namespace. */ |
|||
#ifdef __USE_XOPEN |
|||
__fd_mask fds_bits[__FD_SETSIZE / __NFDBITS]; |
|||
# define __FDS_BITS(set) ((set)->fds_bits) |
|||
#else |
|||
__fd_mask __fds_bits[__FD_SETSIZE / __NFDBITS]; |
|||
# define __FDS_BITS(set) ((set)->__fds_bits) |
|||
#endif |
|||
} __fd_set; |
|||
|
|||
/* Used in XTI. */ |
|||
typedef int __t_scalar_t; |
|||
typedef unsigned int __t_uscalar_t; |
|||
|
|||
/* Duplicates info from stdint.h but this is used in unistd.h. */ |
|||
typedef long int __intptr_t; |
|||
|
|||
/* Duplicate info from sys/socket.h. */ |
|||
typedef unsigned int __socklen_t; |
|||
|
|||
/* Now add the thread types. */ |
|||
#ifdef __USE_UNIX98 |
|||
# include <bits/pthreadtypes.h> |
|||
#endif |
|||
|
|||
#endif /* bits/types.h */ |
|||
@ -0,0 +1,45 @@ |
|||
/* Copyright (C) 1999, 2000 Free Software Foundation, Inc. |
|||
This file is part of the GNU C Library. |
|||
Contributed by Jes Sorensen (Jes.Sorensen@cern.ch) |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <sysdep.h> |
|||
|
|||
/* |
|||
* This is ugly as hell, but we need to take out the syscall number and |
|||
* rotate the input arguments one register before performing the syscall |
|||
*/ |
|||
ENTRY(__syscall) |
|||
mov r15=r32 /* syscall number */ |
|||
;; |
|||
mov r32=r33 |
|||
;; |
|||
mov r33=r34 |
|||
;; |
|||
mov r34=r35 |
|||
;; |
|||
mov r35=r36 |
|||
;; |
|||
mov r36=r37 |
|||
break __BREAK_SYSCALL |
|||
cmp.ne p6,p0=-1,r10 /* r10 = -1 on error */ |
|||
;; |
|||
(p6) ret |
|||
(p7) br.cond.spnt.few __syscall_error |
|||
PSEUDO_END(__syscall) |
|||
|
|||
weak_alias (__syscall, syscall) |
|||
@ -0,0 +1,84 @@ |
|||
/* Copyright (C) 1999, 2000 Hewlett-Packard Co. |
|||
Contributed by David Mosberger-Tang <davidm@hpl.hp.com>. |
|||
|
|||
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., |
|||
59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ |
|||
|
|||
#include <sysdep.h> |
|||
#include <features.h> |
|||
|
|||
.psr abi64 |
|||
.psr lsb |
|||
.lsb |
|||
|
|||
.global errno |
|||
.common errno,4,4 |
|||
.type errno, @object |
|||
.size errno, 4 |
|||
|
|||
.global __errno |
|||
__errno = errno |
|||
|
|||
.global _errno |
|||
_errno = errno |
|||
|
|||
.text |
|||
|
|||
.align 8 |
|||
|
|||
.global __syscall_error |
|||
.proc __syscall_error |
|||
__syscall_error: |
|||
#ifdef _LIBC_REENTRANT |
|||
alloc r35=ar.pfs, 0, 4, 0, 0 |
|||
mov r32=b0 |
|||
mov r33=r8 |
|||
mov r34=r1 |
|||
;; |
|||
br.call.sptk.many b0 = __errno_location# |
|||
.Lret0: /* force new bundle */ |
|||
st4 [r8]=r33 |
|||
mov r1=r34 |
|||
mov b0=r32 |
|||
mov r8=-1 |
|||
mov ar.pfs=r35 |
|||
#else /* _LIBC_REENTRANT */ |
|||
/* |
|||
* Note that the gp has to be set properly for this to work. |
|||
* As long as all syscalls are in the same load unit |
|||
* (executable or shared library) as this routine, we should |
|||
* be fine. Otherwise, we would have to first load the global |
|||
* pointer register from __gp. |
|||
*/ |
|||
addl r2=@ltoff(errno),gp |
|||
;; |
|||
ld8 r2=[r2] |
|||
mov r3=r8 |
|||
mov r8=-1 |
|||
;; |
|||
st4 [r2]=r3 |
|||
#endif /* _LIBC_REENTRANT */ |
|||
ret // ret is #define'd in syscall.h! |
|||
.endp __syscall_error |
|||
|
|||
|
|||
.global __ia64_syscall |
|||
.proc __ia64_syscall |
|||
__ia64_syscall: |
|||
break __BREAK_SYSCALL |
|||
cmp.eq p6,p0=-1,r10 |
|||
(p6) br.cond.spnt.few __syscall_error |
|||
ret |
|||
.endp __ia64_syscall |
|||
@ -0,0 +1,99 @@ |
|||
/* Copyright (C) 1999, 2000 Free Software Foundation, Inc.
|
|||
This file is part of the GNU C Library. |
|||
Written by Jes Sorensen, <Jes.Sorensen@cern.ch>, April 1999. |
|||
Based on code originally written by David Mosberger-Tang |
|||
|
|||
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., 59 Temple Place - Suite 330, |
|||
Boston, MA 02111-1307, USA. */ |
|||
|
|||
#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__ |
|||
|
|||
/* Linux uses a negative return value to indicate syscall errors, unlike
|
|||
most Unices, which use the condition codes' carry flag. |
|||
|
|||
Since version 2.1 the return value of a system call might be negative |
|||
even if the call succeeded. E.g., the `lseek' system call might return |
|||
a large offset. Therefore we must not anymore test for < 0, but test |
|||
for a real error by making sure the value in %d0 is a real error |
|||
number. Linus said he will make sure the no syscall returns a value |
|||
in -1 .. -4095 as a valid result so we can savely test with -4095. */ |
|||
|
|||
/* We don't want the label for the error handler to be visible in the symbol
|
|||
table when we define it here. */ |
|||
#define SYSCALL_ERROR_LABEL __syscall_error |
|||
|
|||
#ifdef PROF |
|||
#error "define CALL_MCOUNT" |
|||
#else |
|||
#define CALL_MCOUNT |
|||
#endif |
|||
|
|||
|
|||
#undef PSEUDO |
|||
#define PSEUDO(name, syscall_name, args) \ |
|||
ENTRY(name) \ |
|||
DO_CALL (SYS_ify(syscall_name)); \ |
|||
cmp.eq p6,p0=-1,r10;; \ |
|||
(p6) br.cond.spnt.few __syscall_error; |
|||
|
|||
#define ENTRY(name) \ |
|||
.psr abi64; \ |
|||
.psr lsb; \ |
|||
.lsb; \ |
|||
.proc C_SYMBOL_NAME(name); \ |
|||
.text; \ |
|||
.align 32; \ |
|||
.proc C_SYMBOL_NAME(name); \ |
|||
.global C_SYMBOL_NAME(name); \ |
|||
C_LABEL(name) \ |
|||
CALL_MCOUNT |
|||
|
|||
#define DO_CALL(num) \ |
|||
mov r15=num; \ |
|||
break __BREAK_SYSCALL; |
|||
|
|||
#undef PSEUDO_END |
|||
#define PSEUDO_END(name) .endp C_SYMBOL_NAME(name); |
|||
|
|||
#undef END |
|||
#define END(name) \ |
|||
.size C_SYMBOL_NAME(name), . - C_SYMBOL_NAME(name) ; \ |
|||
.endp C_SYMBOL_NAME(name) |
|||
|
|||
#define ret br.ret.sptk.few b0 |
|||
|
|||
#else /* not __ASSEMBLER__ */ |
|||
|
|||
/* Define a macro which expands into the inline wrapper code for a system
|
|||
call. */ |
|||
#if 0 |
|||
#undef INLINE_SYSCALL |
|||
#define INLINE_SYSCALL(name, nr, args...) __##name (args) |
|||
#endif |
|||
|
|||
#endif /* not __ASSEMBLER__ */ |
|||
Loading…
Reference in new issue