| 1 | /* Parameters for execution on a H8/500 series machine. |
| 2 | Copyright (C) 1993 Free Software Foundation, Inc. |
| 3 | |
| 4 | This file is part of GDB. |
| 5 | |
| 6 | This program is free software; you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation; either version 2 of the License, or |
| 9 | (at your option) any later version. |
| 10 | |
| 11 | This program is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 14 | GNU General Public License for more details. |
| 15 | |
| 16 | You should have received a copy of the GNU General Public License |
| 17 | along with this program; if not, write to the Free Software |
| 18 | Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ |
| 19 | |
| 20 | /* Contributed by Steve Chamberlain sac@cygnus.com */ |
| 21 | |
| 22 | #define GDB_TARGET_IS_H8500 |
| 23 | |
| 24 | #define IEEE_FLOAT 1 |
| 25 | |
| 26 | /* Define the bit, byte, and word ordering of the machine. */ |
| 27 | |
| 28 | #define TARGET_BYTE_ORDER BIG_ENDIAN |
| 29 | |
| 30 | #undef TARGET_INT_BIT |
| 31 | #define TARGET_INT_BIT 16 |
| 32 | |
| 33 | #undef TARGET_PTR_BIT |
| 34 | #define TARGET_PTR_BIT (minimum_mode ? 16 : 32) |
| 35 | |
| 36 | |
| 37 | /* Offset from address of function to start of its code. |
| 38 | Zero on most machines. */ |
| 39 | |
| 40 | #define FUNCTION_START_OFFSET 0 |
| 41 | |
| 42 | /* Advance PC across any function entry prologue instructions |
| 43 | to reach some "real" code. */ |
| 44 | |
| 45 | #define SKIP_PROLOGUE(ip) {(ip) = h8500_skip_prologue(ip);} |
| 46 | extern CORE_ADDR h8500_skip_prologue (); |
| 47 | |
| 48 | |
| 49 | /* Immediately after a function call, return the saved pc. |
| 50 | Can't always go through the frames for this because on some machines |
| 51 | the new frame is not set up until the new function executes |
| 52 | some instructions. */ |
| 53 | |
| 54 | #define SAVED_PC_AFTER_CALL(frame) saved_pc_after_call(frame) |
| 55 | |
| 56 | |
| 57 | /* Stack grows downward. */ |
| 58 | |
| 59 | #define INNER_THAN < |
| 60 | |
| 61 | /* Illegal instruction - used by the simulator for breakpoint |
| 62 | detection */ |
| 63 | #define BREAKPOINT {0x0b} |
| 64 | |
| 65 | |
| 66 | /* If your kernel resets the pc after the trap happens you may need to |
| 67 | define this before including this file. */ |
| 68 | |
| 69 | #define DECR_PC_AFTER_BREAK 0 |
| 70 | |
| 71 | |
| 72 | /* Nonzero if instruction at PC is a return instruction. */ |
| 73 | |
| 74 | #define ABOUT_TO_RETURN(pc) about_to_return(pc) |
| 75 | |
| 76 | /* Return 1 if P points to an invalid floating point value. */ |
| 77 | |
| 78 | #define INVALID_FLOAT(p, len) 0 /* Just a first guess; not checked */ |
| 79 | |
| 80 | /* Say how long registers are. */ |
| 81 | |
| 82 | #define REGISTER_TYPE unsigned long |
| 83 | |
| 84 | /* Say how much memory is needed to store a copy of the register set */ |
| 85 | |
| 86 | #define REGISTER_BYTES (24) |
| 87 | |
| 88 | /* Index within `registers' of the first byte of the space for |
| 89 | register N. */ |
| 90 | |
| 91 | int regoff[]; |
| 92 | #define REGISTER_BYTE(N) (regoff[N]) |
| 93 | |
| 94 | /* Number of bytes of storage in the actual machine representation |
| 95 | for register N. */ |
| 96 | |
| 97 | #define REGISTER_RAW_SIZE(N) h8500_register_size(N) |
| 98 | int h8500_register_size PARAMS ((int regno)); |
| 99 | |
| 100 | #define REGISTER_VIRTUAL_SIZE(N) h8500_register_size(N) |
| 101 | |
| 102 | /* Largest value REGISTER_RAW_SIZE can have. */ |
| 103 | |
| 104 | #define MAX_REGISTER_RAW_SIZE 4 |
| 105 | |
| 106 | /* Largest value REGISTER_VIRTUAL_SIZE can have. */ |
| 107 | |
| 108 | #define MAX_REGISTER_VIRTUAL_SIZE 4 |
| 109 | |
| 110 | /* Nonzero if register N requires conversion |
| 111 | from raw format to virtual format. */ |
| 112 | |
| 113 | #define REGISTER_CONVERTIBLE(N) (0) |
| 114 | |
| 115 | /* Convert data from raw format for register REGNUM |
| 116 | to virtual format for register REGNUM. */ |
| 117 | |
| 118 | #define REGISTER_CONVERT_TO_VIRTUAL(REGNUM,FROM,TO) \ |
| 119 | { memcpy ((TO), (FROM), 4); } |
| 120 | |
| 121 | /* Convert data from virtual format for register REGNUM |
| 122 | to raw format for register REGNUM. */ |
| 123 | |
| 124 | #define REGISTER_CONVERT_TO_RAW(REGNUM,FROM,TO) \ |
| 125 | { memcpy ((TO), (FROM), 4); } |
| 126 | |
| 127 | /* Return the GDB type object for the "standard" data type |
| 128 | of data in register N. */ |
| 129 | |
| 130 | #define REGISTER_VIRTUAL_TYPE(N) h8500_register_virtual_type(N) |
| 131 | struct type *h8500_register_virtual_type PARAMS ((int regno)); |
| 132 | |
| 133 | /* Initializer for an array of names of registers. |
| 134 | Entries beyond the first NUM_REGS are ignored. */ |
| 135 | |
| 136 | #define REGISTER_NAMES \ |
| 137 | {"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", \ |
| 138 | "ccr","pc", \ |
| 139 | "cp","dp","ep","tp" } |
| 140 | |
| 141 | /* Register numbers of various important registers. |
| 142 | Note that some of these values are "real" register numbers, |
| 143 | and correspond to the general registers of the machine, |
| 144 | and some are "phony" register numbers which are too large |
| 145 | to be actual register numbers as far as the user is concerned |
| 146 | but do serve to get the desired values when passed to read_register. */ |
| 147 | |
| 148 | |
| 149 | #define R0_REGNUM 0 |
| 150 | #define R1_REGNUM 1 |
| 151 | #define R2_REGNUM 2 |
| 152 | #define R3_REGNUM 3 |
| 153 | #define R4_REGNUM 4 |
| 154 | #define R5_REGNUM 5 |
| 155 | #define R6_REGNUM 6 |
| 156 | #define R7_REGNUM 7 |
| 157 | |
| 158 | #define SP_REGNUM R7_REGNUM /* Contains address of top of stack */ |
| 159 | #define FP_REGNUM R6_REGNUM /* Contains address of executing stack frame */ |
| 160 | |
| 161 | #define CCR_REGNUM 8 /* Contains processor status */ |
| 162 | #define PC_REGNUM 9 /* Contains program counter */ |
| 163 | |
| 164 | #define SEG_C_REGNUM 10 /* Segment registers */ |
| 165 | #define SEG_D_REGNUM 11 |
| 166 | #define SEG_E_REGNUM 12 |
| 167 | #define SEG_T_REGNUM 13 |
| 168 | |
| 169 | #define NUM_REGS 14 |
| 170 | |
| 171 | #define PTR_SIZE (minimum_mode ? 2: 4) |
| 172 | #define PTR_MASK (minimum_mode ? 0x0000ffff : 0x00ffffff) |
| 173 | |
| 174 | /* Store the address of the place in which to copy the structure the |
| 175 | subroutine will return. This is called from call_function. */ |
| 176 | |
| 177 | /*#define STORE_STRUCT_RETURN(ADDR, SP) \ |
| 178 | { write_register (0, (ADDR)); abort(); }*/ |
| 179 | |
| 180 | /* Extract from an array REGBUF containing the (raw) register state |
| 181 | a function return value of type TYPE, and copy that, in virtual format, |
| 182 | into VALBUF. */ |
| 183 | |
| 184 | #define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \ |
| 185 | bcopy ((char *)(REGBUF), VALBUF, TYPE_LENGTH(TYPE)) |
| 186 | |
| 187 | |
| 188 | /* Write into appropriate registers a function return value |
| 189 | of type TYPE, given in virtual format. Assumes floats are passed |
| 190 | in d0/d1. */ |
| 191 | |
| 192 | |
| 193 | #define STORE_RETURN_VALUE(TYPE,VALBUF) \ |
| 194 | write_register_bytes (0, VALBUF, TYPE_LENGTH (TYPE)) |
| 195 | |
| 196 | |
| 197 | /* Extract from an array REGBUF containing the (raw) register state |
| 198 | the address in which a function should return its structure value, |
| 199 | as a CORE_ADDR (or an expression that can be used as one). */ |
| 200 | |
| 201 | #define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) (*(CORE_ADDR *)(REGBUF)) |
| 202 | \f |
| 203 | |
| 204 | /* Define other aspects of the stack frame. */ |
| 205 | |
| 206 | /* A macro that tells us whether the function invocation represented |
| 207 | by FI does not have a frame on the stack associated with it. If it |
| 208 | does not, FRAMELESS is set to 1, else 0. */ |
| 209 | #define FRAMELESS_FUNCTION_INVOCATION(FI, FRAMELESS) \ |
| 210 | (FRAMELESS) = frameless_look_for_prologue(FI) |
| 211 | |
| 212 | /* Any function with a frame looks like this |
| 213 | SECOND ARG |
| 214 | FIRST ARG |
| 215 | RET PC |
| 216 | SAVED R2 |
| 217 | SAVED R3 |
| 218 | SAVED FP <-FP POINTS HERE |
| 219 | LOCALS0 |
| 220 | LOCALS1 <-SP POINTS HERE |
| 221 | |
| 222 | */ |
| 223 | |
| 224 | CORE_ADDR h8500_frame_chain PARAMS ((FRAME thisframe)); |
| 225 | |
| 226 | #define INIT_EXTRA_FRAME_INFO(fromleaf, fci) \ |
| 227 | (fci)->frame |= read_register(SEG_T_REGNUM) << 16; |
| 228 | |
| 229 | #define FRAME_CHAIN(FRAME) h8500_frame_chain(FRAME) |
| 230 | |
| 231 | #define FRAME_SAVED_PC(FRAME) frame_saved_pc(FRAME) |
| 232 | |
| 233 | #define FRAME_ARGS_ADDRESS(fi) frame_args_address(fi) |
| 234 | |
| 235 | #define FRAME_LOCALS_ADDRESS(fi) frame_locals_address(fi); |
| 236 | |
| 237 | /* Set VAL to the number of args passed to frame described by FI. |
| 238 | Can set VAL to -1, meaning no way to tell. */ |
| 239 | |
| 240 | /* We can't tell how many args there are |
| 241 | now that the C compiler delays popping them. */ |
| 242 | |
| 243 | #define FRAME_NUM_ARGS(val,fi) (val = -1) |
| 244 | |
| 245 | /* Return number of bytes at start of arglist that are not really args. */ |
| 246 | |
| 247 | #define FRAME_ARGS_SKIP 0 |
| 248 | |
| 249 | /* Put here the code to store, into a struct frame_saved_regs, |
| 250 | the addresses of the saved registers of frame described by FRAME_INFO. |
| 251 | This includes special registers such as pc and fp saved in special |
| 252 | ways in the stack frame. sp is even more special: |
| 253 | the address we return for it IS the sp for the next frame. */ |
| 254 | |
| 255 | #define FRAME_FIND_SAVED_REGS(frame_info, frame_saved_regs) \ |
| 256 | frame_find_saved_regs(frame_info, &(frame_saved_regs)) |
| 257 | \f |
| 258 | |
| 259 | /* Push an empty stack frame, to record the current PC, etc. */ |
| 260 | |
| 261 | /*#define PUSH_DUMMY_FRAME { h8300_push_dummy_frame (); }*/ |
| 262 | |
| 263 | /* Discard from the stack the innermost frame, restoring all registers. */ |
| 264 | |
| 265 | #define POP_FRAME { h8300_pop_frame (); } |
| 266 | |
| 267 | #define SHORT_INT_MAX 32767 |
| 268 | #define SHORT_INT_MIN -32768 |
| 269 | |
| 270 | |
| 271 | |
| 272 | #define BEFORE_MAIN_LOOP_HOOK \ |
| 273 | hms_before_main_loop(); |
| 274 | |
| 275 | |
| 276 | #define NAMES_HAVE_UNDERSCORE |
| 277 | |
| 278 | typedef unsigned short INSN_WORD; |
| 279 | |
| 280 | #define ADDR_BITS_REMOVE(addr) ((addr) & 0xffffff) |
| 281 | #define ADDR_BITS_SET(addr) (((addr))) |
| 282 | |
| 283 | #define read_memory_short(x) (read_memory_integer(x,2) & 0xffff) |
| 284 | #define DONT_USE_REMOTE |
| 285 | |
| 286 | |
| 287 | #define PRINT_REGISTER_HOOK(regno) print_register_hook(regno) |
| 288 | |
| 289 | int minimum_mode; |
| 290 | |
| 291 | #define CALL_DUMMY_LENGTH 10 |
| 292 | |
| 293 | /* Fake variables to make it easy to use 24 bit register pointers */ |
| 294 | |
| 295 | int h8500_is_trapped_internalvar PARAMS ((char *name)); |
| 296 | #define IS_TRAPPED_INTERNALVAR h8500_is_trapped_internalvar |
| 297 | |
| 298 | PTR h8500_value_of_trapped_internalvar PARAMS ((struct internalvar *var)); |
| 299 | #define VALUE_OF_TRAPPED_INTERNALVAR h8500_value_of_trapped_internalvar |
| 300 | |
| 301 | void h8500_set_trapped_internalvar PARAMS ((struct internalvar *var, value newval, int bitpos, int bitsize, int offset)); |
| 302 | #define SET_TRAPPED_INTERNALVAR h8500_set_trapped_internalvar |