From 59768597d9c278ea1dfd6a45414cc21a3ae9bd05 Mon Sep 17 00:00:00 2001 From: Shrinivas Atre Date: Fri, 17 Oct 2003 12:45:55 +0000 Subject: 2003-10-17 Shrinivas Atre * h8300/compile.c : Addition of extern variable h8300_normal_mode (SP) : Handle normal mode (bitfrom) : Use normal mode flag to return suitable value (lvalue) : Use normal mode flag to return command line location (decode) : Decode instruction correctly for normal mode (init_pointers) : Initialise memory correctly for normal mode (sim_resume) : Handle cases for normal mode using h8300_normal_mode flag (sim_store_register) : Handle 2 byte PC for normal mode (sim_fetch_register) : Handle 2 byte PC for normal mode (set_h8300h) : Set normal mode flag as per architechture (sim_load) : Allocate 64K for normal mode instead of bigger memory --- sim/h8300/compile.c | 112 +++++++++++++++++++++++++++++++--------------------- 1 file changed, 67 insertions(+), 45 deletions(-) (limited to 'sim/h8300') diff --git a/sim/h8300/compile.c b/sim/h8300/compile.c index a799d2b..f123878 100644 --- a/sim/h8300/compile.c +++ b/sim/h8300/compile.c @@ -53,7 +53,7 @@ static void set_simcache_size (SIM_DESC, int); #define X(op, size) (op * 4 + size) -#define SP (h8300hmode ? SL : SW) +#define SP (h8300hmode && !h8300_normal_mode ? SL : SW) #define h8_opcodes ops #define DEFINE_TABLE @@ -510,6 +510,7 @@ enum { POLL_QUIT_INTERVAL = 0x80000 }; int h8300hmode = 0; int h8300smode = 0; +int h8300_normal_mode = 0; int h8300sxmode = 0; static int memory_size; @@ -539,7 +540,7 @@ bitfrom (int x) case L_32: return SL; case L_P: - return h8300hmode ? SL : SW; + return (h8300hmode && !h8300_normal_mode)? SL : SW; } return 0; } @@ -575,9 +576,9 @@ lvalue (SIM_DESC sd, int x, int rn, unsigned int *val) static int cmdline_location() { - if (h8300smode) + if (h8300smode && !h8300_normal_mode) return 0xffff00L; - else if (h8300hmode) + else if (h8300hmode && !h8300_normal_mode) return 0x2ff00L; else return 0xff00L; @@ -837,8 +838,10 @@ decode (SIM_DESC sd, int addr, unsigned char *data, decoded_inst *dst) } else if ((looking_for & MODE) == VECIND) { - /* FIXME: Multiplier should be 2 for "normal" mode. */ - cst[opnum] = ((data[1] & 0x7f) + 0x80) * 4; + if(h8300_normal_mode) + cst[opnum] = ((data[1] & 0x7f) + 0x80) * 2; + else + cst[opnum] = ((data[1] & 0x7f) + 0x80) * 4; cst[opnum] += h8_get_vbr (sd); /* Add vector base reg. */ } else if ((looking_for & SIZE) == L_32) @@ -1774,9 +1777,9 @@ init_pointers (SIM_DESC sd) littleendian.i = 1; - if (h8300smode) + if (h8300smode && !h8300_normal_mode) memory_size = H8300S_MSIZE; - else if (h8300hmode) + else if (h8300hmode && !h8300_normal_mode) memory_size = H8300H_MSIZE; else memory_size = H8300_MSIZE; @@ -1950,7 +1953,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) } oldmask = h8_get_mask (sd); - if (!h8300hmode) + if (!h8300hmode || h8300_normal_mode) h8_set_mask (sd, 0xffff); do { @@ -2790,7 +2793,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) /* Setting char_ptr_size to the sizeof (char *) on the different architectures. */ - if (h8300hmode || h8300smode) + if ((h8300hmode || h8300smode) && !h8300_normal_mode) { char_ptr_size = 4; } @@ -2859,7 +2862,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) for (i = 0; i < no_of_args; i++) { /* Saving the argv pointer. */ - if (h8300hmode || h8300smode) + if ((h8300hmode || h8300smode) && !h8300_normal_mode) { SET_MEMORY_L (argv_ptrs_location, argv_ptrs[i]); } @@ -2875,7 +2878,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) /* Required by POSIX, Setting 0x0 at the end of the list of argv pointers. */ - if (h8300hmode || h8300smode) + if ((h8300hmode || h8300smode) && !h8300_normal_mode) { SET_MEMORY_L (old_sp, 0x0); } @@ -2914,7 +2917,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) /* Setting filename_ptr to first argument of open, */ /* and trying to get mode. */ - if (h8300sxmode || h8300hmode || h8300smode) + if ((h8300sxmode || h8300hmode || h8300smode) && !h8300_normal_mode) { filename_ptr = GET_L_REG (0); mode = GET_MEMORY_L (h8_get_reg (sd, SP_REGNUM) + 4); @@ -2965,8 +2968,8 @@ sim_resume (SIM_DESC sd, int step, int siggnal) int read_return = 0; /* Return value from callback to read. */ - fd = h8300hmode ? GET_L_REG (0) : GET_W_REG (0); - buf_size = h8300hmode ? GET_L_REG (2) : GET_W_REG (2); + fd = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (0) : GET_W_REG (0); + buf_size = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (2) : GET_W_REG (2); char_ptr = (char *) malloc (sizeof (char) * buf_size); @@ -3000,9 +3003,9 @@ sim_resume (SIM_DESC sd, int step, int siggnal) int write_return; /* Return value from callback to write. */ int i = 0; /* Loop counter */ - fd = h8300hmode ? GET_L_REG (0) : GET_W_REG (0); - char_ptr = h8300hmode ? GET_L_REG (1) : GET_W_REG (1); - len = h8300hmode ? GET_L_REG (2) : GET_W_REG (2); + fd = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (0) : GET_W_REG (0); + char_ptr = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (1) : GET_W_REG (1); + len = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (2) : GET_W_REG (2); /* Allocating space for the characters to be written. */ ptr = (char *) malloc (sizeof (char) * len); @@ -3032,9 +3035,9 @@ sim_resume (SIM_DESC sd, int step, int siggnal) int origin; /* Origin */ int lseek_return; /* Return value from callback to lseek. */ - fd = h8300hmode ? GET_L_REG (0) : GET_W_REG (0); - offset = h8300hmode ? GET_L_REG (1) : GET_W_REG (1); - origin = h8300hmode ? GET_L_REG (2) : GET_W_REG (2); + fd = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (0) : GET_W_REG (0); + offset = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (1) : GET_W_REG (1); + origin = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (2) : GET_W_REG (2); /* Callback lseek and return offset. */ lseek_return = @@ -3050,7 +3053,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) int fd; /* File descriptor */ int close_return; /* Return value from callback to close. */ - fd = h8300hmode ? GET_L_REG (0) : GET_W_REG (0); + fd = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (0) : GET_W_REG (0); /* Callback close and return. */ close_return = sim_callback->close (sim_callback, fd); @@ -3068,10 +3071,10 @@ sim_resume (SIM_DESC sd, int step, int siggnal) int stat_ptr; /* Pointer to stat record. */ char *temp_stat_ptr; /* Temporary stat_rec pointer. */ - fd = h8300hmode ? GET_L_REG (0) : GET_W_REG (0); + fd = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (0) : GET_W_REG (0); /* Setting stat_ptr to second argument of stat. */ - stat_ptr = h8300hmode ? GET_L_REG (1) : GET_W_REG (1); + stat_ptr = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (1) : GET_W_REG (1); /* Callback stat and return. */ fstat_return = sim_callback->fstat (sim_callback, fd, &stat_rec); @@ -3120,7 +3123,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) int i = 0; /* Loop Counter */ /* Setting filename_ptr to first argument of open. */ - filename_ptr = h8300hmode ? GET_L_REG (0) : GET_W_REG (0); + filename_ptr = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (0) : GET_W_REG (0); /* Trying to find the length of the filename. */ temp_char = GET_MEMORY_B (h8_get_reg (sd, 0)); @@ -3144,7 +3147,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) /* Setting stat_ptr to second argument of stat. */ /* stat_ptr = h8_get_reg (sd, 1); */ - stat_ptr = h8300hmode ? GET_L_REG (1) : GET_W_REG (1); + stat_ptr = (h8300hmode && !h8300_normal_mode) ? GET_L_REG (1) : GET_W_REG (1); /* Callback stat and return. */ stat_return = @@ -3552,7 +3555,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) call: tmp = h8_get_reg (sd, SP_REGNUM); - if (h8300hmode) + if (h8300hmode && !h8300_normal_mode) { tmp -= 4; SET_MEMORY_L (tmp, code->next_pc); @@ -3584,7 +3587,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) h8_set_exr (sd, GET_MEMORY_L (tmp)); tmp += 4; } - if (h8300hmode) + if (h8300hmode && !h8300_normal_mode) { h8_set_ccr (sd, GET_MEMORY_L (tmp)); tmp += 4; @@ -3607,7 +3610,7 @@ sim_resume (SIM_DESC sd, int step, int siggnal) rts: tmp = h8_get_reg (sd, SP_REGNUM); - if (h8300hmode) + if (h8300hmode && !h8300_normal_mode) { pc = GET_MEMORY_L (tmp); tmp += 4; @@ -3655,16 +3658,26 @@ sim_resume (SIM_DESC sd, int step, int siggnal) case O (O_TRAPA, SB): /* trapa */ if (fetch (sd, &code->src, &res)) - goto end; /* res is vector number. */ - - tmp = h8_get_reg (sd, SP_REGNUM); - tmp -= 4; - SET_MEMORY_L (tmp, code->next_pc); - tmp -= 4; - SET_MEMORY_L (tmp, h8_get_ccr (sd)); - intMaskBit = 1; - BUILDSR (sd); - + goto end; /* res is vector number. */ + + tmp = h8_get_reg (sd, SP_REGNUM); + if(h8300_normal_mode) + { + tmp -= 2; + SET_MEMORY_W (tmp, code->next_pc); + tmp -= 2; + SET_MEMORY_W (tmp, h8_get_ccr (sd)); + } + else + { + tmp -= 4; + SET_MEMORY_L (tmp, code->next_pc); + tmp -= 4; + SET_MEMORY_L (tmp, h8_get_ccr (sd)); + } + intMaskBit = 1; + BUILDSR (sd); + if (h8300smode) { tmp -= 4; @@ -3673,8 +3686,10 @@ sim_resume (SIM_DESC sd, int step, int siggnal) h8_set_reg (sd, SP_REGNUM, tmp); - /* FIXME: "normal" mode should use 2-byte ptrs. */ - pc = GET_MEMORY_L (0x20 + res * 4); + if(h8300_normal_mode) + pc = GET_MEMORY_L (0x10 + res * 2); /* Vector addresses are 0x10,0x12,0x14 and 0x16 */ + else + pc = GET_MEMORY_L (0x20 + res * 4); goto end; case O (O_BPT, SN): @@ -4703,7 +4718,10 @@ sim_store_register (SIM_DESC sd, int rn, unsigned char *value, int length) switch (rn) { case PC_REGNUM: - h8_set_pc (sd, intval); + if(h8300_normal_mode) + h8_set_pc (sd, shortval); /* PC for Normal mode is 2 bytes */ + else + h8_set_pc (sd, intval); break; default: (*sim_callback->printf_filtered) (sim_callback, @@ -4814,7 +4832,8 @@ sim_fetch_register (SIM_DESC sd, int rn, unsigned char *buf, int length) longreg = 1; break; } - if (h8300hmode || longreg) + /* In Normal mode PC is 2 byte, but other registers are 4 byte */ + if ((h8300hmode || longreg) && !(rn == PC_REGNUM && h8300_normal_mode)) { buf[0] = v >> 24; buf[1] = v >> 16; @@ -4919,6 +4938,9 @@ set_h8300h (unsigned long machine) if (machine == bfd_mach_h8300h || machine == bfd_mach_h8300hn || h8300smode) h8300hmode = 1; + + if(machine == bfd_mach_h8300hn || machine == bfd_mach_h8300sn || machine == bfd_mach_h8300sxn) + h8300_normal_mode = 1; } /* Cover function of sim_state_free to free the cpu buffers as well. */ @@ -5054,9 +5076,9 @@ sim_load (SIM_DESC sd, char *prog, bfd *abfd, int from_tty) switching between H8/300 and H8/300H programs without exiting gdb. */ - if (h8300smode) + if (h8300smode && !h8300_normal_mode) memory_size = H8300S_MSIZE; - else if (h8300hmode) + else if (h8300hmode && !h8300_normal_mode) memory_size = H8300H_MSIZE; else memory_size = H8300_MSIZE; -- cgit v1.1