static struct value * value_of_builtin_frame_fp_reg (struct frame_info *frame, const void *baton) { struct gdbarch *gdbarch = get_frame_arch (frame); if (gdbarch_deprecated_fp_regnum (gdbarch) >= 0) /* NOTE: cagney/2003-04-24: Since the mere presence of "fp" in the register name table overrides this built-in $fp register, there is no real reason for this gdbarch_deprecated_fp_regnum trickery here. An architecture wanting to implement "$fp" as alias for a raw register can do so by adding "fp" to register name table (mind you, doing this is probably a dangerous thing). */ return value_of_register (gdbarch_deprecated_fp_regnum (gdbarch), frame); else { struct type *data_ptr_type = builtin_type (gdbarch)->builtin_data_ptr; struct value *val = allocate_value (data_ptr_type); gdb_byte *buf = value_contents_raw (val); if (frame == NULL) memset (buf, 0, TYPE_LENGTH (value_type (val))); else gdbarch_address_to_pointer (gdbarch, data_ptr_type, buf, get_frame_base_address (frame)); return val; } }
static struct value * value_of_builtin_frame_ps_reg (struct frame_info *frame, const void *baton) { if (gdbarch_ps_regnum (current_gdbarch) >= 0) return value_of_register (gdbarch_ps_regnum (current_gdbarch), frame); error (_("Standard register ``$ps'' is not available for this target")); }
static struct value * value_of_builtin_frame_sp_reg (struct frame_info *frame, const void *baton) { struct gdbarch *gdbarch = get_frame_arch (frame); if (gdbarch_sp_regnum (gdbarch) >= 0) return value_of_register (gdbarch_sp_regnum (gdbarch), frame); error (_("Standard register ``$sp'' is not available for this target")); }
static struct value * value_of_builtin_frame_ps_reg (struct frame_info *frame) { #ifdef PS_REGNUM if (PS_REGNUM >= 0) return value_of_register (PS_REGNUM, frame); #endif error (_("Standard register ``$ps'' is not available for this target")); }
static struct value * value_of_builtin_frame_sp_reg (struct frame_info *frame) { #ifdef SP_REGNUM if (SP_REGNUM >= 0) return value_of_register (SP_REGNUM, frame); #endif error ("Standard register ``$sp'' is not available for this target"); }
static struct value * value_of_builtin_frame_pc_reg (struct frame_info *frame, const void *baton) { if (gdbarch_pc_regnum (current_gdbarch) >= 0) return value_of_register (gdbarch_pc_regnum (current_gdbarch), frame); else { struct value *val = allocate_value (builtin_type_void_data_ptr); gdb_byte *buf = value_contents_raw (val); if (frame == NULL) memset (buf, 0, TYPE_LENGTH (value_type (val))); else gdbarch_address_to_pointer (current_gdbarch, builtin_type_void_data_ptr, buf, get_frame_pc (frame)); return val; } }
static struct value * value_of_builtin_frame_pc_reg (struct frame_info *frame) { if (PC_REGNUM >= 0) return value_of_register (PC_REGNUM, frame); else { struct value *val = allocate_value (builtin_type_void_data_ptr); gdb_byte *buf = value_contents_raw (val); if (frame == NULL) memset (buf, 0, TYPE_LENGTH (value_type (val))); else ADDRESS_TO_POINTER (builtin_type_void_data_ptr, buf, get_frame_pc (frame)); return val; } }
static struct value * value_of_builtin_frame_pc_reg (struct frame_info *frame) { if (PC_REGNUM >= 0) return value_of_register (PC_REGNUM, frame); else { struct value *val = allocate_value (builtin_type_void_data_ptr); char *buf = VALUE_CONTENTS_RAW (val); if (frame == NULL) memset (buf, 0, TYPE_LENGTH (VALUE_TYPE (val))); else ADDRESS_TO_POINTER (builtin_type_void_data_ptr, buf, get_frame_pc (frame)); return val; } }
static struct value * value_of_builtin_frame_pc_reg (struct frame_info *frame, const void *baton) { struct gdbarch *gdbarch = get_frame_arch (frame); if (gdbarch_pc_regnum (gdbarch) >= 0) return value_of_register (gdbarch_pc_regnum (gdbarch), frame); else { struct type *func_ptr_type = builtin_type (gdbarch)->builtin_func_ptr; struct value *val = allocate_value (func_ptr_type); gdb_byte *buf = value_contents_raw (val); gdbarch_address_to_pointer (gdbarch, func_ptr_type, buf, get_frame_pc (frame)); return val; } }
static struct value * value_of_builtin_frame_fp_reg (struct frame_info *frame) { if (DEPRECATED_FP_REGNUM >= 0) /* NOTE: cagney/2003-04-24: Since the mere presence of "fp" in the register name table overrides this built-in $fp register, there is no real reason for this DEPRECATED_FP_REGNUM trickery here. An architecture wanting to implement "$fp" as alias for a raw register can do so by adding "fp" to register name table (mind you, doing this is probably a dangerous thing). */ return value_of_register (DEPRECATED_FP_REGNUM, frame); else { struct value *val = allocate_value (builtin_type_void_data_ptr); gdb_byte *buf = value_contents_raw (val); if (frame == NULL) memset (buf, 0, TYPE_LENGTH (value_type (val))); else ADDRESS_TO_POINTER (builtin_type_void_data_ptr, buf, get_frame_base_address (frame)); return val; } }