1999-05-03 15:29:11 +08:00
|
|
|
/* IEEE floating point support declarations, for GDB, the GNU Debugger.
|
2020-01-01 15:57:01 +08:00
|
|
|
Copyright (C) 1991-2020 Free Software Foundation, Inc.
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
This file is part of GDB.
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
This program 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 General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with this program; if not, write to the Free Software
|
2005-05-10 18:21:13 +08:00
|
|
|
Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
#if !defined (FLOATFORMAT_H)
|
|
|
|
#define FLOATFORMAT_H 1
|
|
|
|
|
|
|
|
#include "ansidecl.h"
|
|
|
|
|
2015-02-20 06:44:44 +08:00
|
|
|
#ifdef __cplusplus
|
|
|
|
extern "C" {
|
|
|
|
#endif
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
/* A floatformat consists of a sign bit, an exponent and a mantissa. Once the
|
|
|
|
bytes are concatenated according to the byteorder flag, then each of those
|
|
|
|
fields is contiguous. We number the bits with 0 being the most significant
|
|
|
|
(i.e. BITS_BIG_ENDIAN type numbering), and specify which bits each field
|
|
|
|
contains with the *_start and *_len fields. */
|
|
|
|
|
2005-11-01 02:01:19 +08:00
|
|
|
/* What is the order of the bytes? */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
enum floatformat_byteorders {
|
|
|
|
/* Standard little endian byte order.
|
|
|
|
EX: 1.2345678e10 => 00 00 80 c5 e0 fe 06 42 */
|
|
|
|
floatformat_little,
|
|
|
|
|
|
|
|
/* Standard big endian byte order.
|
|
|
|
EX: 1.2345678e10 => 42 06 fe e0 c5 80 00 00 */
|
|
|
|
floatformat_big,
|
|
|
|
|
|
|
|
/* Little endian byte order but big endian word order.
|
|
|
|
EX: 1.2345678e10 => e0 fe 06 42 00 00 80 c5 */
|
2005-11-01 02:01:19 +08:00
|
|
|
floatformat_littlebyte_bigword,
|
1999-05-03 15:29:11 +08:00
|
|
|
|
2005-11-01 02:01:19 +08:00
|
|
|
/* VAX byte order. Little endian byte order with 16-bit words. The
|
|
|
|
following example is an illustration of the byte order only; VAX
|
|
|
|
doesn't have a fully IEEE compliant floating-point format.
|
|
|
|
EX: 1.2345678e10 => 80 c5 00 00 06 42 e0 fe */
|
|
|
|
floatformat_vax
|
1999-05-03 15:29:11 +08:00
|
|
|
};
|
|
|
|
|
|
|
|
enum floatformat_intbit { floatformat_intbit_yes, floatformat_intbit_no };
|
|
|
|
|
|
|
|
struct floatformat
|
|
|
|
{
|
|
|
|
enum floatformat_byteorders byteorder;
|
|
|
|
unsigned int totalsize; /* Total size of number in bits */
|
|
|
|
|
|
|
|
/* Sign bit is always one bit long. 1 means negative, 0 means positive. */
|
|
|
|
unsigned int sign_start;
|
|
|
|
|
|
|
|
unsigned int exp_start;
|
|
|
|
unsigned int exp_len;
|
2003-09-16 05:28:56 +08:00
|
|
|
/* Bias added to a "true" exponent to form the biased exponent. It
|
|
|
|
is intentionally signed as, otherwize, -exp_bias can turn into a
|
|
|
|
very large number (e.g., given the exp_bias of 0x3fff and a 64
|
|
|
|
bit long, the equation (long)(1 - exp_bias) evaluates to
|
|
|
|
4294950914) instead of -16382). */
|
|
|
|
int exp_bias;
|
1999-05-03 15:29:11 +08:00
|
|
|
/* Exponent value which indicates NaN. This is the actual value stored in
|
|
|
|
the float, not adjusted by the exp_bias. This usually consists of all
|
|
|
|
one bits. */
|
|
|
|
unsigned int exp_nan;
|
|
|
|
|
|
|
|
unsigned int man_start;
|
|
|
|
unsigned int man_len;
|
|
|
|
|
|
|
|
/* Is the integer bit explicit or implicit? */
|
|
|
|
enum floatformat_intbit intbit;
|
2000-05-31 18:55:00 +08:00
|
|
|
|
|
|
|
/* Internal name for debugging. */
|
|
|
|
const char *name;
|
2003-09-23 01:41:02 +08:00
|
|
|
|
|
|
|
/* Validator method. */
|
2005-08-18 02:03:42 +08:00
|
|
|
int (*is_valid) (const struct floatformat *fmt, const void *from);
|
include:
2007-11-07 Joseph Myers <joseph@codesourcery.com>
Daniel Jacobowitz <dan@codesourcery.com>
* floatformat.h (struct floatformat): Add split_half field.
(floatformat_ibm_long_double): New.
libiberty:
2007-11-07 Joseph Myers <joseph@codesourcery.com>
Daniel Jacobowitz <dan@codesourcery.com>
* floatformat.c (mant_bits_set): New.
(floatformat_to_double): Use it. Note no special handling of
split formats.
(floatformat_from_double): Note no special handing of split
formats.
(floatformat_ibm_long_double_is_valid,
floatformat_ibm_long_double): New.
(floatformat_ieee_single_big, floatformat_ieee_single_little,
floatformat_ieee_double_big, floatformat_ieee_double_little,
floatformat_ieee_double_littlebyte_bigword, floatformat_vax_f,
floatformat_vax_d, floatformat_vax_g, floatformat_i387_ext,
floatformat_m68881_ext, floatformat_i960_ext,
floatformat_m88110_ext, floatformat_m88110_harris_ext,
floatformat_arm_ext_big, floatformat_arm_ext_littlebyte_bigword,
floatformat_ia64_spill_big, floatformat_ia64_spill_little,
floatformat_ia64_quad_big, floatformat_ia64_quad_little): Update
for addition of split_half field.
gdb:
2007-11-07 Joseph Myers <joseph@codesourcery.com>
Daniel Jacobowitz <dan@codesourcery.com>
* gdbtypes.c (floatformats_ibm_long_double): New.
* gdbtypes.h (floatformats_ibm_long_double): Declare.
* ia64-tdep.c (floatformat_ia64_ext): Update for addition of
split_half field.
* mips-tdep.c (n32n64_floatformat_always_valid,
floatformat_n32n64_long_double_big, floatformats_n32n64_long):
Remove.
(mips_gdbarch_init): Use floatformats_ibm_long_double instead of
floatformats_n32n64_long.
* ppc-linux-tdep.c (ppc_linux_init_abi): Use 128-bit IBM long
double.
* doublest.c (convert_floatformat_to_doublest,
convert_doublest_to_floatformat): Handle split floating-point
formats.
* ppc-sysv-tdep.c (ppc_sysv_abi_push_dummy_call): Handle IBM long
double arguments.
(ppc64_sysv_abi_push_dummy_call): Likewise.
(do_ppc_sysv_return_value): Handle IBM long double return.
2007-11-08 08:08:48 +08:00
|
|
|
|
|
|
|
/* Is the format actually the sum of two smaller floating point
|
|
|
|
formats (IBM long double, as described in
|
|
|
|
gcc/config/rs6000/darwin-ldouble-format)? If so, this is the
|
|
|
|
smaller format in question, and the fields sign_start through
|
|
|
|
intbit describe the first half. If not, this is NULL. */
|
|
|
|
const struct floatformat *split_half;
|
1999-05-03 15:29:11 +08:00
|
|
|
};
|
|
|
|
|
|
|
|
/* floatformats for IEEE single and double, big and little endian. */
|
|
|
|
|
2010-07-06 20:56:24 +08:00
|
|
|
extern const struct floatformat floatformat_ieee_half_big;
|
|
|
|
extern const struct floatformat floatformat_ieee_half_little;
|
1999-05-03 15:29:11 +08:00
|
|
|
extern const struct floatformat floatformat_ieee_single_big;
|
|
|
|
extern const struct floatformat floatformat_ieee_single_little;
|
|
|
|
extern const struct floatformat floatformat_ieee_double_big;
|
|
|
|
extern const struct floatformat floatformat_ieee_double_little;
|
|
|
|
|
|
|
|
/* floatformat for ARM IEEE double, little endian bytes and big endian words */
|
|
|
|
|
|
|
|
extern const struct floatformat floatformat_ieee_double_littlebyte_bigword;
|
|
|
|
|
2005-11-01 02:01:19 +08:00
|
|
|
/* floatformats for VAX. */
|
|
|
|
|
|
|
|
extern const struct floatformat floatformat_vax_f;
|
|
|
|
extern const struct floatformat floatformat_vax_d;
|
|
|
|
extern const struct floatformat floatformat_vax_g;
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
/* floatformats for various extendeds. */
|
|
|
|
|
|
|
|
extern const struct floatformat floatformat_i387_ext;
|
|
|
|
extern const struct floatformat floatformat_m68881_ext;
|
|
|
|
extern const struct floatformat floatformat_i960_ext;
|
|
|
|
extern const struct floatformat floatformat_m88110_ext;
|
2001-08-21 08:20:07 +08:00
|
|
|
extern const struct floatformat floatformat_m88110_harris_ext;
|
|
|
|
extern const struct floatformat floatformat_arm_ext_big;
|
|
|
|
extern const struct floatformat floatformat_arm_ext_littlebyte_bigword;
|
|
|
|
/* IA-64 Floating Point register spilt into memory. */
|
|
|
|
extern const struct floatformat floatformat_ia64_spill_big;
|
|
|
|
extern const struct floatformat floatformat_ia64_spill_little;
|
|
|
|
extern const struct floatformat floatformat_ia64_quad_big;
|
|
|
|
extern const struct floatformat floatformat_ia64_quad_little;
|
include:
2007-11-07 Joseph Myers <joseph@codesourcery.com>
Daniel Jacobowitz <dan@codesourcery.com>
* floatformat.h (struct floatformat): Add split_half field.
(floatformat_ibm_long_double): New.
libiberty:
2007-11-07 Joseph Myers <joseph@codesourcery.com>
Daniel Jacobowitz <dan@codesourcery.com>
* floatformat.c (mant_bits_set): New.
(floatformat_to_double): Use it. Note no special handling of
split formats.
(floatformat_from_double): Note no special handing of split
formats.
(floatformat_ibm_long_double_is_valid,
floatformat_ibm_long_double): New.
(floatformat_ieee_single_big, floatformat_ieee_single_little,
floatformat_ieee_double_big, floatformat_ieee_double_little,
floatformat_ieee_double_littlebyte_bigword, floatformat_vax_f,
floatformat_vax_d, floatformat_vax_g, floatformat_i387_ext,
floatformat_m68881_ext, floatformat_i960_ext,
floatformat_m88110_ext, floatformat_m88110_harris_ext,
floatformat_arm_ext_big, floatformat_arm_ext_littlebyte_bigword,
floatformat_ia64_spill_big, floatformat_ia64_spill_little,
floatformat_ia64_quad_big, floatformat_ia64_quad_little): Update
for addition of split_half field.
gdb:
2007-11-07 Joseph Myers <joseph@codesourcery.com>
Daniel Jacobowitz <dan@codesourcery.com>
* gdbtypes.c (floatformats_ibm_long_double): New.
* gdbtypes.h (floatformats_ibm_long_double): Declare.
* ia64-tdep.c (floatformat_ia64_ext): Update for addition of
split_half field.
* mips-tdep.c (n32n64_floatformat_always_valid,
floatformat_n32n64_long_double_big, floatformats_n32n64_long):
Remove.
(mips_gdbarch_init): Use floatformats_ibm_long_double instead of
floatformats_n32n64_long.
* ppc-linux-tdep.c (ppc_linux_init_abi): Use 128-bit IBM long
double.
* doublest.c (convert_floatformat_to_doublest,
convert_doublest_to_floatformat): Handle split floating-point
formats.
* ppc-sysv-tdep.c (ppc_sysv_abi_push_dummy_call): Handle IBM long
double arguments.
(ppc64_sysv_abi_push_dummy_call): Likewise.
(do_ppc_sysv_return_value): Handle IBM long double return.
2007-11-08 08:08:48 +08:00
|
|
|
/* IBM long double (double+double). */
|
2013-08-20 14:02:53 +08:00
|
|
|
extern const struct floatformat floatformat_ibm_long_double_big;
|
|
|
|
extern const struct floatformat floatformat_ibm_long_double_little;
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
/* Convert from FMT to a double.
|
|
|
|
FROM is the address of the extended float.
|
|
|
|
Store the double in *TO. */
|
|
|
|
|
|
|
|
extern void
|
2005-08-18 02:03:42 +08:00
|
|
|
floatformat_to_double (const struct floatformat *, const void *, double *);
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
/* The converse: convert the double *FROM to FMT
|
|
|
|
and store where TO points. */
|
|
|
|
|
|
|
|
extern void
|
2005-08-18 02:03:42 +08:00
|
|
|
floatformat_from_double (const struct floatformat *, const double *, void *);
|
1999-05-03 15:29:11 +08:00
|
|
|
|
2003-09-16 04:13:45 +08:00
|
|
|
/* Return non-zero iff the data at FROM is a valid number in format FMT. */
|
|
|
|
|
|
|
|
extern int
|
2005-08-18 02:03:42 +08:00
|
|
|
floatformat_is_valid (const struct floatformat *fmt, const void *from);
|
2003-09-16 04:13:45 +08:00
|
|
|
|
2015-02-20 06:44:44 +08:00
|
|
|
#ifdef __cplusplus
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
#endif /* defined (FLOATFORMAT_H) */
|