2005-07-08 Jeff Johnston * ia64-tdep.c (ia64_sigtramp_frame_prev_register): Build pseudo-registers the same as ia64_pseudo_register_read. 2008-04-16 Yi Zhan * ia64-tdep.c (ia64_sigtramp_frame_prev_register): Fix an ISO C compliance compilation error. 2008-02-12 Jan Kratochvil Port to gdb-6.8.50.20081128, follow the upstream change: http://sourceware.org/cgi-bin/cvsweb.cgi/src/gdb/ia64-tdep.c.diff?cvsroot=src&r1=1.176&r2=1.177 Index: gdb-6.8.50.20081128/gdb/ia64-tdep.c =================================================================== --- gdb-6.8.50.20081128.orig/gdb/ia64-tdep.c 2008-11-26 06:27:48.000000000 +0100 +++ gdb-6.8.50.20081128/gdb/ia64-tdep.c 2008-12-02 19:04:32.000000000 +0100 @@ -2107,6 +2107,94 @@ ia64_sigtramp_frame_prev_register (struc return frame_unwind_got_constant (this_frame, regnum, pc); } + /* Red Hat patch begin. */ + else if (IA64_NAT0_REGNUM <= regnum && regnum <= IA64_NAT31_REGNUM) + { + /* NAT pseudo registers 0-31: get them from UNAT. + * "copied" from ia64_pseudo_register_read() */ + ULONGEST unatN_val; + ULONGEST unat; + read_memory (cache->saved_regs[IA64_UNAT_REGNUM], (char *) &unat, + register_size (target_gdbarch, IA64_UNAT_REGNUM)); + unatN_val = (unat & (1LL << (regnum - IA64_NAT0_REGNUM))) != 0; + return frame_unwind_got_constant (this_frame, regnum, unatN_val); + } + else if (IA64_NAT32_REGNUM <= regnum && regnum <= IA64_NAT127_REGNUM) + { + /* NAT pseudo registers 32-127. + * "copied" from ia64_pseudo_register_read() + * FIXME: Not currently tested -- cannot get the frame to include + * NAT32-NAT127. */ + ULONGEST bsp; + ULONGEST cfm; + ULONGEST natN_val = 0; + CORE_ADDR gr_addr = 0, nat_addr = 0; + + read_memory (cache->saved_regs[IA64_BSP_REGNUM], (char *) &bsp, + register_size (target_gdbarch, IA64_BSP_REGNUM)); + read_memory (cache->saved_regs[IA64_CFM_REGNUM], (char *) &cfm, + register_size (target_gdbarch, IA64_CFM_REGNUM)); + + /* The bsp points at the end of the register frame so we + subtract the size of frame from it to get start of register frame. */ + bsp = rse_address_add (bsp, -(cfm & 0x7f)); + + if ((cfm & 0x7f) > regnum - V32_REGNUM) + gr_addr = rse_address_add (bsp, (regnum - V32_REGNUM)); + + if (gr_addr != 0) + { + /* Compute address of nat collection bits */ + CORE_ADDR nat_collection; + int nat_bit; + nat_addr = gr_addr | 0x1f8; + /* If our nat collection address is bigger than bsp, we have to get + the nat collection from rnat. Otherwise, we fetch the nat + collection from the computed address. FIXME: Do not know if + RNAT can be not stored in the frame--being extra cautious. */ + if (nat_addr >= bsp) + { + nat_addr = cache->saved_regs[IA64_RNAT_REGNUM]; + if (nat_addr != 0) + read_memory (nat_addr, (char *) &nat_collection, + register_size (target_gdbarch, IA64_RNAT_REGNUM)); + } + else + nat_collection = read_memory_integer (nat_addr, 8, BFD_ENDIAN_LITTLE); + if (nat_addr != 0) + { + nat_bit = (gr_addr >> 3) & 0x3f; + natN_val = (nat_collection >> nat_bit) & 1; + return frame_unwind_got_constant (this_frame, regnum, natN_val); + } + } + warning (_("ia64_sigtramp_frame_prev_register: unhandled register %d"), + regnum); + } + else if (regnum == VBOF_REGNUM) + { + /* BOF pseudo register. + * "copied" from ia64_pseudo_register_read() + * + * A virtual register frame start is provided for user convenience. + * It can be calculated as the bsp - sof (sizeof frame). */ + ULONGEST bsp; + ULONGEST cfm; + ULONGEST bof; + + read_memory (cache->saved_regs[IA64_BSP_REGNUM], (char *) &bsp, + register_size (target_gdbarch, IA64_BSP_REGNUM)); + read_memory (cache->saved_regs[IA64_CFM_REGNUM], (char *) &cfm, + register_size (target_gdbarch, IA64_CFM_REGNUM)); + + /* The bsp points at the end of the register frame so we + subtract the size of frame from it to get beginning of frame. */ + bof = rse_address_add (bsp, -(cfm & 0x7f)); + + return frame_unwind_got_constant (this_frame, regnum, bof); + } + /* Red Hat patch end. */ + else if ((regnum >= IA64_GR32_REGNUM && regnum <= IA64_GR127_REGNUM) || (regnum >= V32_REGNUM && regnum <= V127_REGNUM)) { @@ -2121,7 +2209,42 @@ ia64_sigtramp_frame_prev_register (struc return frame_unwind_got_constant (this_frame, regnum, 0); } - else /* All other registers not listed above. */ + /* Red Hat patch begin. */ + else if (VP0_REGNUM <= regnum && regnum <= VP63_REGNUM) + { + /* VP 0-63. + * "copied" from ia64_pseudo_register_read() + * + * FIXME: Not currently tested--cannot get the frame to include PR. */ + CORE_ADDR pr_addr = 0; + + pr_addr = cache->saved_regs[IA64_PR_REGNUM]; + if (pr_addr != 0) + { + ULONGEST pr; + ULONGEST cfm; + ULONGEST prN_val; + read_memory (pr_addr, (char *) &pr, + register_size (target_gdbarch, IA64_PR_REGNUM)); + read_memory (cache->saved_regs[IA64_CFM_REGNUM], (char *) &cfm, + register_size (target_gdbarch, IA64_CFM_REGNUM)); + + /* Get the register rename base for this frame and adjust the + * register name to take rotation into account. */ + if (VP16_REGNUM <= regnum && regnum <= VP63_REGNUM) + { + int rrb_pr = (cfm >> 32) & 0x3f; + regnum = VP16_REGNUM + ((regnum - VP16_REGNUM) + rrb_pr) % 48; + } + prN_val = (pr & (1LL << (regnum - VP0_REGNUM))) != 0; + return frame_unwind_got_constant (this_frame, regnum, prN_val); + } + warning (_("ia64_sigtramp_frame_prev_register: unhandled register %d"), + regnum); + } + /* Red Hat patch end. */ + + /* All other registers not listed above. */ { CORE_ADDR addr = cache->saved_regs[regnum];