| /* Traditional frame unwind support, for GDB the GNU Debugger. |
| |
| Copyright (C) 2003, 2004 Free Software Foundation, Inc. |
| |
| 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 |
| Foundation, Inc., 51 Franklin Street, Fifth Floor, |
| Boston, MA 02110-1301, USA. */ |
| |
| #include "defs.h" |
| #include "frame.h" |
| #include "trad-frame.h" |
| #include "regcache.h" |
| |
| struct trad_frame_cache |
| { |
| struct frame_info *next_frame; |
| CORE_ADDR this_base; |
| struct trad_frame_saved_reg *prev_regs; |
| struct frame_id this_id; |
| }; |
| |
| struct trad_frame_cache * |
| trad_frame_cache_zalloc (struct frame_info *next_frame) |
| { |
| struct trad_frame_cache *this_trad_cache; |
| |
| this_trad_cache = FRAME_OBSTACK_ZALLOC (struct trad_frame_cache); |
| this_trad_cache->prev_regs = trad_frame_alloc_saved_regs (next_frame); |
| this_trad_cache->next_frame = next_frame; |
| return this_trad_cache; |
| } |
| |
| /* A traditional frame is unwound by analysing the function prologue |
| and using the information gathered to track registers. For |
| non-optimized frames, the technique is reliable (just need to check |
| for all potential instruction sequences). */ |
| |
| struct trad_frame_saved_reg * |
| trad_frame_alloc_saved_regs (struct frame_info *next_frame) |
| { |
| int regnum; |
| struct gdbarch *gdbarch = get_frame_arch (next_frame); |
| int numregs = NUM_REGS + NUM_PSEUDO_REGS; |
| struct trad_frame_saved_reg *this_saved_regs |
| = FRAME_OBSTACK_CALLOC (numregs, struct trad_frame_saved_reg); |
| for (regnum = 0; regnum < numregs; regnum++) |
| { |
| this_saved_regs[regnum].realreg = regnum; |
| this_saved_regs[regnum].addr = -1; |
| } |
| return this_saved_regs; |
| } |
| |
| enum { REG_VALUE = -1, REG_UNKNOWN = -2 }; |
| |
| int |
| trad_frame_value_p (struct trad_frame_saved_reg this_saved_regs[], int regnum) |
| { |
| return (this_saved_regs[regnum].realreg == REG_VALUE); |
| } |
| |
| int |
| trad_frame_addr_p (struct trad_frame_saved_reg this_saved_regs[], int regnum) |
| { |
| return (this_saved_regs[regnum].realreg >= 0 |
| && this_saved_regs[regnum].addr != -1); |
| } |
| |
| int |
| trad_frame_realreg_p (struct trad_frame_saved_reg this_saved_regs[], |
| int regnum) |
| { |
| return (this_saved_regs[regnum].realreg >= 0 |
| && this_saved_regs[regnum].addr == -1); |
| } |
| |
| void |
| trad_frame_set_value (struct trad_frame_saved_reg this_saved_regs[], |
| int regnum, LONGEST val) |
| { |
| /* Make the REALREG invalid, indicating that the ADDR contains the |
| register's value. */ |
| this_saved_regs[regnum].realreg = REG_VALUE; |
| this_saved_regs[regnum].addr = val; |
| } |
| |
| void |
| trad_frame_set_reg_value (struct trad_frame_cache *this_trad_cache, |
| int regnum, LONGEST val) |
| { |
| /* External interface for users of trad_frame_cache |
| (who cannot access the prev_regs object directly). */ |
| trad_frame_set_value (this_trad_cache->prev_regs, regnum, val); |
| } |
| |
| void |
| trad_frame_set_reg_realreg (struct trad_frame_cache *this_trad_cache, |
| int regnum, int realreg) |
| { |
| this_trad_cache->prev_regs[regnum].realreg = realreg; |
| this_trad_cache->prev_regs[regnum].addr = -1; |
| } |
| |
| void |
| trad_frame_set_reg_addr (struct trad_frame_cache *this_trad_cache, |
| int regnum, CORE_ADDR addr) |
| { |
| this_trad_cache->prev_regs[regnum].addr = addr; |
| } |
| |
| void |
| trad_frame_set_unknown (struct trad_frame_saved_reg this_saved_regs[], |
| int regnum) |
| { |
| /* Make the REALREG invalid, indicating that the value is not known. */ |
| this_saved_regs[regnum].realreg = REG_UNKNOWN; |
| this_saved_regs[regnum].addr = -1; |
| } |
| |
| void |
| trad_frame_get_prev_register (struct frame_info *next_frame, |
| struct trad_frame_saved_reg this_saved_regs[], |
| int regnum, int *optimizedp, |
| enum lval_type *lvalp, CORE_ADDR *addrp, |
| int *realregp, gdb_byte *bufferp) |
| { |
| struct gdbarch *gdbarch = get_frame_arch (next_frame); |
| if (trad_frame_addr_p (this_saved_regs, regnum)) |
| { |
| /* The register was saved in memory. */ |
| *optimizedp = 0; |
| *lvalp = lval_memory; |
| *addrp = this_saved_regs[regnum].addr; |
| *realregp = -1; |
| if (bufferp != NULL) |
| { |
| /* Read the value in from memory. */ |
| get_frame_memory (next_frame, this_saved_regs[regnum].addr, bufferp, |
| register_size (gdbarch, regnum)); |
| } |
| } |
| else if (trad_frame_realreg_p (this_saved_regs, regnum)) |
| { |
| *optimizedp = 0; |
| *lvalp = lval_register; |
| *addrp = 0; |
| *realregp = this_saved_regs[regnum].realreg; |
| /* Ask the next frame to return the value of the register. */ |
| if (bufferp) |
| frame_unwind_register (next_frame, (*realregp), bufferp); |
| } |
| else if (trad_frame_value_p (this_saved_regs, regnum)) |
| { |
| /* The register's value is available. */ |
| *optimizedp = 0; |
| *lvalp = not_lval; |
| *addrp = 0; |
| *realregp = -1; |
| if (bufferp != NULL) |
| store_unsigned_integer (bufferp, register_size (gdbarch, regnum), |
| this_saved_regs[regnum].addr); |
| } |
| else |
| { |
| error (_("Register %s not available"), |
| gdbarch_register_name (gdbarch, regnum)); |
| } |
| } |
| |
| void |
| trad_frame_get_register (struct trad_frame_cache *this_trad_cache, |
| struct frame_info *next_frame, |
| int regnum, int *optimizedp, |
| enum lval_type *lvalp, CORE_ADDR *addrp, |
| int *realregp, gdb_byte *bufferp) |
| { |
| trad_frame_get_prev_register (next_frame, this_trad_cache->prev_regs, |
| regnum, optimizedp, lvalp, addrp, realregp, |
| bufferp); |
| } |
| |
| void |
| trad_frame_set_id (struct trad_frame_cache *this_trad_cache, |
| struct frame_id this_id) |
| { |
| this_trad_cache->this_id = this_id; |
| } |
| |
| void |
| trad_frame_get_id (struct trad_frame_cache *this_trad_cache, |
| struct frame_id *this_id) |
| { |
| (*this_id) = this_trad_cache->this_id; |
| } |
| |
| void |
| trad_frame_set_this_base (struct trad_frame_cache *this_trad_cache, |
| CORE_ADDR this_base) |
| { |
| this_trad_cache->this_base = this_base; |
| } |
| |
| CORE_ADDR |
| trad_frame_get_this_base (struct trad_frame_cache *this_trad_cache) |
| { |
| return this_trad_cache->this_base; |
| } |