You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
91 lines
3.3 KiB
91 lines
3.3 KiB
6 years ago
|
commit a1da2672bdc5adc551ad30d73eccea902063f583
|
||
|
|
Author: Ulrich Weigand <ulrich.weigand@de.ibm.com>
|
||
|
|
Date: Fri Jun 12 17:43:48 2015 +0200
|
||
|
|
|
||
|
|
ppc64: Handle short vectors as function return types
|
||
|
|
|
||
|
|
Short synthetic vector types (i.e. those defined using GCC's
|
||
|
|
attribute ((vector_size)) instead of AltiVec vector types)
|
||
|
|
are returned in r3. Fix ppc64_sysv_abi_return_value to
|
||
|
|
correctly handle this.
|
||
|
|
|
||
|
|
gdb/ChangeLog:
|
||
|
|
|
||
|
|
* ppc-sysv-tdep.c (ppc64_sysv_abi_return_value_base): Handle short
|
||
|
|
synthetic (non-AltiVec) vector types.
|
||
|
|
(ppc64_sysv_abi_return_value): Likewise.
|
||
|
|
|
||
|
|
### a/gdb/ChangeLog
|
||
|
|
### b/gdb/ChangeLog
|
||
|
|
## -1,3 +1,9 @@
|
||
|
|
+2015-05-12 Ulrich Weigand <uweigand@de.ibm.com>
|
||
|
|
+
|
||
|
|
+ * ppc-sysv-tdep.c (ppc64_sysv_abi_return_value_base): Handle short
|
||
|
|
+ synthetic (non-AltiVec) vector types.
|
||
|
|
+ (ppc64_sysv_abi_return_value): Likewise.
|
||
|
|
+
|
||
|
|
2015-06-12 Antoine Tremblay <antoine.tremblay@ericsson.com>
|
||
|
|
|
||
|
|
PR breakpoints/16465
|
||
|
|
--- a/gdb/ppc-sysv-tdep.c
|
||
|
|
+++ b/gdb/ppc-sysv-tdep.c
|
||
|
|
@@ -1892,7 +1892,8 @@ ppc64_sysv_abi_return_value_base (struct gdbarch *gdbarch, struct type *valtype,
|
||
|
|
}
|
||
|
|
|
||
|
|
/* AltiVec vectors are returned in VRs starting at v2. */
|
||
|
|
- if (TYPE_CODE (valtype) == TYPE_CODE_ARRAY && TYPE_VECTOR (valtype)
|
||
|
|
+ if (TYPE_LENGTH (valtype) == 16
|
||
|
|
+ && TYPE_CODE (valtype) == TYPE_CODE_ARRAY && TYPE_VECTOR (valtype)
|
||
|
|
&& tdep->vector_abi == POWERPC_VEC_ALTIVEC)
|
||
|
|
{
|
||
|
|
int regnum = tdep->ppc_vr0_regnum + 2 + index;
|
||
|
|
@@ -1904,6 +1905,25 @@ ppc64_sysv_abi_return_value_base (struct gdbarch *gdbarch, struct type *valtype,
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
+ /* Short vectors are returned in GPRs starting at r3. */
|
||
|
|
+ if (TYPE_LENGTH (valtype) <= 8
|
||
|
|
+ && TYPE_CODE (valtype) == TYPE_CODE_ARRAY && TYPE_VECTOR (valtype))
|
||
|
|
+ {
|
||
|
|
+ int regnum = tdep->ppc_gp0_regnum + 3 + index;
|
||
|
|
+ int offset = 0;
|
||
|
|
+
|
||
|
|
+ if (gdbarch_byte_order (gdbarch) == BFD_ENDIAN_BIG)
|
||
|
|
+ offset = 8 - TYPE_LENGTH (valtype);
|
||
|
|
+
|
||
|
|
+ if (writebuf != NULL)
|
||
|
|
+ regcache_cooked_write_part (regcache, regnum,
|
||
|
|
+ offset, TYPE_LENGTH (valtype), writebuf);
|
||
|
|
+ if (readbuf != NULL)
|
||
|
|
+ regcache_cooked_read_part (regcache, regnum,
|
||
|
|
+ offset, TYPE_LENGTH (valtype), readbuf);
|
||
|
|
+ return 1;
|
||
|
|
+ }
|
||
|
|
+
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
@@ -1993,6 +2013,7 @@ ppc64_sysv_abi_return_value (struct gdbarch *gdbarch, struct value *function,
|
||
|
|
|
||
|
|
/* Small character arrays are returned, right justified, in r3. */
|
||
|
|
if (TYPE_CODE (valtype) == TYPE_CODE_ARRAY
|
||
|
|
+ && !TYPE_VECTOR (valtype)
|
||
|
|
&& TYPE_LENGTH (valtype) <= 8
|
||
|
|
&& TYPE_CODE (TYPE_TARGET_TYPE (valtype)) == TYPE_CODE_INT
|
||
|
|
&& TYPE_LENGTH (TYPE_TARGET_TYPE (valtype)) == 1)
|
||
|
|
@@ -2012,7 +2033,13 @@ ppc64_sysv_abi_return_value (struct gdbarch *gdbarch, struct value *function,
|
||
|
|
/* In the ELFv2 ABI, homogeneous floating-point or vector
|
||
|
|
aggregates are returned in registers. */
|
||
|
|
if (tdep->elf_abi == POWERPC_ELF_V2
|
||
|
|
- && ppc64_elfv2_abi_homogeneous_aggregate (valtype, &eltype, &nelt))
|
||
|
|
+ && ppc64_elfv2_abi_homogeneous_aggregate (valtype, &eltype, &nelt)
|
||
|
|
+ && (TYPE_CODE (eltype) == TYPE_CODE_FLT
|
||
|
|
+ || TYPE_CODE (eltype) == TYPE_CODE_DECFLOAT
|
||
|
|
+ || (TYPE_CODE (eltype) == TYPE_CODE_ARRAY
|
||
|
|
+ && TYPE_VECTOR (eltype)
|
||
|
|
+ && tdep->vector_abi == POWERPC_VEC_ALTIVEC
|
||
|
|
+ && TYPE_LENGTH (eltype) == 16)))
|
||
|
|
{
|
||
|
|
for (i = 0; i < nelt; i++)
|
||
|
|
{
|