diff options
author | Steve Chamberlain <sac@cygnus> | 1993-12-12 00:00:53 +0000 |
---|---|---|
committer | Steve Chamberlain <sac@cygnus> | 1993-12-12 00:00:53 +0000 |
commit | 08c0d7b84f411aed680b0777b43266171f11c552 (patch) | |
tree | 16232d5ba59d4bb15a4d0c61daa34406ad3e0994 /gdb/h8500-tdep.c | |
parent | fcf276c4958f7cc906ec389f003aa2a713c98528 (diff) | |
download | gdb-08c0d7b84f411aed680b0777b43266171f11c552.zip gdb-08c0d7b84f411aed680b0777b43266171f11c552.tar.gz gdb-08c0d7b84f411aed680b0777b43266171f11c552.tar.bz2 |
* ser-go32.c: Lint. (strncasecmp): Removed, now in libiberty.
(go32_readchar): Special handling for faster polling. (async
structure): Volatile.
* h8300-tdep.c (print_register_hook): Allocate and use the right
number bytes for the raw register.
* h8500-tdep.c (regoff, frame_find_saved_reg, examine_prologue):
deleted. (h8500_register_size, h8500_register_virtual_type, ):
Use new way of counting registers.
* remote-e7000.c (echo_index): deleted. (expect): Better handling
of user interrupts. (expect_prompt): Remove never used log file
support. (want, want_nopc): Add support for H8/300H.
(fetch_regs_from_dump): Treat \r and \n as whitespace.
(e7000_drain): Send an "end" command before waiting for output to
stop. (e7000_wait): Cope with H8/300H, better handling of user
interrupts. (why_stop, expect_n, sub2_from_pc): New function.
* remote-utils.c (gr_load_image): call fflush and QUIT more regularly.
* utils.c (notice_quit): New function for polling for user interrupts.
Diffstat (limited to 'gdb/h8500-tdep.c')
-rw-r--r-- | gdb/h8500-tdep.c | 231 |
1 files changed, 45 insertions, 186 deletions
diff --git a/gdb/h8500-tdep.c b/gdb/h8500-tdep.c index 3b5086a..5f7eefa 100644 --- a/gdb/h8500-tdep.c +++ b/gdb/h8500-tdep.c @@ -78,10 +78,6 @@ CORE_ADDR examine_prologue (); void frame_find_saved_regs (); -int regoff[NUM_REGS] = -{0, 2, 4, 6, 8, 10, 12, 14, /* r0->r7 */ - 16, 18, /* ccr, pc */ - 20, 21, 22, 23}; /* cp, dp, ep, tp */ CORE_ADDR h8500_skip_prologue (start_pc) @@ -90,7 +86,7 @@ h8500_skip_prologue (start_pc) { short int w; - w = read_memory_integer (start_pc, 1); + w = read_memory_integer (start_pc, 1); if (w == LINK_8) { start_pc += 2; @@ -127,64 +123,12 @@ FRAME_ADDR h8500_frame_chain (thisframe) FRAME thisframe; { - if (!inside_entry_file (thisframe->pc)) - return (read_memory_integer (thisframe->frame, 2) & 0xffff) - | (read_register (SEG_T_REGNUM) << 16); + return (read_memory_integer (FRAME_FP (thisframe), PTR_SIZE)); else return 0; } -/* Put here the code to store, into a struct frame_saved_regs, - the addresses of the saved registers of frame described by FRAME_INFO. - This includes special registers such as pc and fp saved in special - ways in the stack frame. sp is even more special: - the address we return for it IS the sp for the next frame. - - We cache the result of doing this in the frame_cache_obstack, since - it is fairly expensive. */ -#if 0 - -void -frame_find_saved_regs (fi, fsr) - struct frame_info *fi; - struct frame_saved_regs *fsr; -{ - register CORE_ADDR next_addr; - register CORE_ADDR *saved_regs; - register int regnum; - register struct frame_saved_regs *cache_fsr; - extern struct obstack frame_cache_obstack; - CORE_ADDR ip; - struct symtab_and_line sal; - CORE_ADDR limit; - - if (!fi->fsr) - { - cache_fsr = (struct frame_saved_regs *) - obstack_alloc (&frame_cache_obstack, - sizeof (struct frame_saved_regs)); - memset (cache_fsr, '\0', sizeof (struct frame_saved_regs)); - - fi->fsr = cache_fsr; - - /* Find the start and end of the function prologue. If the PC - is in the function prologue, we only consider the part that - has executed already. */ - - ip = get_pc_function_start (fi->pc); - sal = find_pc_line (ip, 0); - limit = (sal.end && sal.end < fi->pc) ? sal.end : fi->pc; - - /* This will fill in fields in *fi as well as in cache_fsr. */ - examine_prologue (ip, limit, fi->frame, cache_fsr, fi); - } - - if (fsr) - *fsr = *fi->fsr; -} - -#endif /* Fetch the instruction at ADDR, returning 0 if ADDR is beyond LIM or is not the address of a valid instruction, the address of the next @@ -215,121 +159,6 @@ NEXT_PROLOGUE_INSN (addr, lim, pword1) `fi' is a struct frame_info pointer; we fill in various fields in it to reflect the offsets of the arg pointer and the locals pointer. */ -#if 0 -static CORE_ADDR -examine_prologue (ip, limit, after_prolog_fp, fsr, fi) - register CORE_ADDR ip; - register CORE_ADDR limit; - FRAME_ADDR after_prolog_fp; - struct frame_saved_regs *fsr; - struct frame_info *fi; -{ - register CORE_ADDR next_ip; - int r; - int i; - int have_fp = 0; - - register int src; - register struct pic_prologue_code *pcode; - char insn[2]; - int size, offset; - unsigned int reg_save_depth = 2; /* Number of things pushed onto - stack, starts at 2, 'cause the - PC is already there */ - - unsigned int auto_depth = 0; /* Number of bytes of autos */ - - char in_frame[8]; /* One for each reg */ - - memset (in_frame, 1, 8); - for (r = 0; r < 8; r++) - { - fsr->regs[r] = 0; - } - if (after_prolog_fp == 0) - { - after_prolog_fp = read_register (SP_REGNUM); - } - if (ip == 0 || ip & ~0xffffff) - return 0; - - ok = NEXT_PROLOGUE_INSN (ip, limit, &insn[0]); - - /* Skip over any fp push instructions */ - fsr->regs[6] = after_prolog_fp; - - if (ok && IS_LINK_8 (insn[0])) - { - ip++; - - in_frame[6] = reg_save_depth; - reg_save_depth += 2; - } - - next_ip = NEXT_PROLOGUE_INSN (ip, limit, &insn_word); - - /* Is this a move into the fp */ - if (next_ip && IS_MOV_SP_FP (insn_word)) - { - ip = next_ip; - next_ip = NEXT_PROLOGUE_INSN (ip, limit, &insn_word); - have_fp = 1; - } - - /* Skip over any stack adjustment, happens either with a number of - sub#2,sp or a mov #x,r5 sub r5,sp */ - - if (next_ip && IS_SUB2_SP (insn_word)) - { - while (next_ip && IS_SUB2_SP (insn_word)) - { - auto_depth += 2; - ip = next_ip; - next_ip = NEXT_PROLOGUE_INSN (ip, limit, &insn_word); - } - } - else - { - if (next_ip && IS_MOVK_R5 (insn_word)) - { - ip = next_ip; - next_ip = NEXT_PROLOGUE_INSN (ip, limit, &insn_word); - auto_depth += insn_word; - - next_ip = NEXT_PROLOGUE_INSN (next_ip, limit, &insn_word); - auto_depth += insn_word; - - } - } - /* Work out which regs are stored where */ - while (next_ip && IS_PUSH (insn_word)) - { - ip = next_ip; - next_ip = NEXT_PROLOGUE_INSN (ip, limit, &insn_word); - fsr->regs[r] = after_prolog_fp + auto_depth; - auto_depth += 2; - } - - /* The args are always reffed based from the stack pointer */ - fi->args_pointer = after_prolog_fp; - /* Locals are always reffed based from the fp */ - fi->locals_pointer = after_prolog_fp; - /* The PC is at a known place */ - fi->from_pc = read_memory_short (after_prolog_fp + 2); - - /* Rememeber any others too */ - in_frame[PC_REGNUM] = 0; - - if (have_fp) - /* We keep the old FP in the SP spot */ - fsr->regs[SP_REGNUM] = (read_memory_short (fsr->regs[6])); - else - fsr->regs[SP_REGNUM] = after_prolog_fp + auto_depth; - - return (ip); -} - -#endif /* Return the saved PC from this frame. */ @@ -434,10 +263,34 @@ int h8500_register_size (regno) int regno; { - if (regno <= PC_REGNUM) - return 2; - else + switch (regno) { + case SEG_C_REGNUM: + case SEG_D_REGNUM: + case SEG_E_REGNUM: + case SEG_T_REGNUM: return 1; + case R0_REGNUM: + case R1_REGNUM: + case R2_REGNUM: + case R3_REGNUM: + case R4_REGNUM: + case R5_REGNUM: + case R6_REGNUM: + case R7_REGNUM: + case CCR_REGNUM: + return 2; + + case PR0_REGNUM: + case PR1_REGNUM: + case PR2_REGNUM: + case PR3_REGNUM: + case PR4_REGNUM: + case PR5_REGNUM: + case PR6_REGNUM: + case PR7_REGNUM: + case PC_REGNUM: + return 4; + } } struct type * @@ -459,9 +312,18 @@ h8500_register_virtual_type (regno) case R5_REGNUM: case R6_REGNUM: case R7_REGNUM: - case PC_REGNUM: case CCR_REGNUM: return builtin_type_unsigned_short; + case PR0_REGNUM: + case PR1_REGNUM: + case PR2_REGNUM: + case PR3_REGNUM: + case PR4_REGNUM: + case PR5_REGNUM: + case PR6_REGNUM: + case PR7_REGNUM: + case PC_REGNUM: + return builtin_type_unsigned_long; default: abort (); } @@ -780,42 +642,39 @@ _initialize_h8500_tdep () CORE_ADDR target_read_sp () { - return (read_register (SEG_T_REGNUM) << 16) | (read_register (SP_REGNUM)); + return read_register (PR7_REGNUM); } void target_write_sp (v) CORE_ADDR v; { - write_register (SEG_T_REGNUM, v >> 16); - write_register (SP_REGNUM, v & 0xffff); + write_register (PR7_REGNUM, v); } CORE_ADDR target_read_pc () { - return (read_register (SEG_C_REGNUM) << 16) | (read_register (PC_REGNUM)); + return read_register (PC_REGNUM); } void target_write_pc (v) CORE_ADDR v; { - write_register (SEG_C_REGNUM, v >> 16); - write_register (PC_REGNUM, v & 0xffff); + write_register (PC_REGNUM, v); } CORE_ADDR target_read_fp () { - return (read_register (SEG_T_REGNUM) << 16) | (read_register (FP_REGNUM)); + return read_register (PR6_REGNUM); } void target_write_fp (v) CORE_ADDR v; { - write_register (SEG_T_REGNUM, v >> 16); - write_register (FP_REGNUM, v & 0xffff); + write_register (PR6_REGNUM, v); } |