gdb/tm-h8300.h

   1 /* Parameters for execution on a H8/300 series machine.
   2    Copyright (C) 1992 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 IEEE_FLOAT 1
  23
  24 /* Define the bit, byte, and word ordering of the machine.  */
  25 #define TARGET_BYTE_ORDER BIG_ENDIAN
  26
  27 #define TARGET_CHAR_BIT 8
  28 #define TARGET_SHORT_BIT 16
  29 #define TARGET_INT_BIT 16
  30 #define TARGET_LONG_BIT 32
  31 #define TARGET_LONG_LONG_BIT 64
  32 #define TARGET_FLOAT_BIT 32
  33 #define TARGET_DOUBLE_BIT 64
  34
  35
  36 /* Offset from address of function to start of its code.
  37    Zero on most machines.  */
  38
  39 #define FUNCTION_START_OFFSET 0
  40
  41 /* Advance PC across any function entry prologue instructions
  42    to reach some "real" code.  */
  43
  44
  45 #define SKIP_PROLOGUE(ip)   {(ip) = h8300_skip_prologue(ip);}
  46 extern CORE_ADDR h8300_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) \
  55 read_memory_integer (read_register (SP_REGNUM), 2)
  56
  57 /* Stack grows downward.  */
  58
  59 #define INNER_THAN <
  60
  61 /* Sequence of bytes for breakpoint instruction.
  62    This is a TRAP instruction.  The last 4 bits (0xf below) is the
  63    vector.  Systems which don't use 0xf should define BPT_VECTOR
  64    themselves before including this file.  */
  65
  66
  67 #define BPT_VECTOR 0xf
  68
  69
  70
  71 #define BREAKPOINT {0x4e, (0x40 | BPT_VECTOR)}
  72
  73
  74 /* If your kernel resets the pc after the trap happens you may need to
  75    define this before including this file.  */
  76
  77
  78 #define DECR_PC_AFTER_BREAK 2
  79
  80
  81 /* Nonzero if instruction at PC is a return instruction.  */
  82 /* Allow any of the return instructions, including a trapv and a return
  83    from interupt.  */
  84
  85 #define ABOUT_TO_RETURN(pc) ((read_memory_integer (pc, 2) & ~0x3) == 0x4e74)
  86
  87 /* Return 1 if P points to an invalid floating point value.  */
  88
  89 #define INVALID_FLOAT(p, len) 0   /* Just a first guess; not checked */
  90
  91 /* Say how long registers are.  */
  92
  93 #define REGISTER_TYPE short
  94
  95 #  define NUM_REGS 10
  96 #  define REGISTER_BYTES (10*2)
  97
  98
  99 /* Index within `registers' of the first byte of the space for
 100    register N.  */
 101
 102 #define REGISTER_BYTE(N)  ((N) * 2)
 103
 104 /* Number of bytes of storage in the actual machine representation
 105    for register N.  On the H8/300, all regs are 2 bytes.  */
 106
 107 #define REGISTER_RAW_SIZE(N) 2
 108
 109 /* Number of bytes of storage in the program's representation
 110    for register N.  On the H8/300, all regs are 2 bytes.  */
 111
 112 #define REGISTER_VIRTUAL_SIZE(N) 2
 113
 114 /* Largest value REGISTER_RAW_SIZE can have.  */
 115
 116 #define MAX_REGISTER_RAW_SIZE 2
 117
 118 /* Largest value REGISTER_VIRTUAL_SIZE can have.  */
 119
 120 #define MAX_REGISTER_VIRTUAL_SIZE 2
 121
 122 /* Nonzero if register N requires conversion
 123    from raw format to virtual format.  */
 124
 125 #define REGISTER_CONVERTIBLE(N) 0
 126
 127 /* Convert data from raw format for register REGNUM
 128    to virtual format for register REGNUM.  */
 129
 130 #define REGISTER_CONVERT_TO_VIRTUAL(REGNUM,FROM,TO)  bcopy ((FROM), (TO), 2);
 131
 132 /* Convert data from virtual format for register REGNUM
 133    to raw format for register REGNUM.  */
 134
 135 #define REGISTER_CONVERT_TO_RAW(REGNUM,FROM,TO)  bcopy ((FROM), (TO), 2);
 136
 137 /* Return the GDB type object for the "standard" data type
 138    of data in register N.  */
 139
 140 #define REGISTER_VIRTUAL_TYPE(N)  builtin_type_int
 141
 142
 143 /* Initializer for an array of names of registers.
 144    Entries beyond the first NUM_REGS are ignored.  */
 145
 146 #define REGISTER_NAMES  \
 147  {"r0", "r1", "r2", "r3", "r4", "r5", "r6", "sp","ccr","pc"}
 148
 149
 150 /* Register numbers of various important registers.
 151    Note that some of these values are "real" register numbers,
 152    and correspond to the general registers of the machine,
 153    and some are "phony" register numbers which are too large
 154    to be actual register numbers as far as the user is concerned
 155    but do serve to get the desired values when passed to read_register.  */
 156
 157
 158 #define FP_REGNUM 6             /* Contains address of executing stack frame */
 159 #define SP_REGNUM 7             /* Contains address of top of stack */
 160 #define CCR_REGNUM 8            /* Contains processor status */
 161 #define PC_REGNUM 9             /* Contains program counter */
 162
 163 /* Store the address of the place in which to copy the structure the
 164    subroutine will return.  This is called from call_function. */
 165
 166 #define STORE_STRUCT_RETURN(ADDR, SP) \
 167   { write_register (0, (ADDR)); abort(); }
 168
 169 /* Extract from an array REGBUF containing the (raw) register state
 170    a function return value of type TYPE, and copy that, in virtual format,
 171    into VALBUF.  This is assuming that floating point values are returned
 172    as doubles in d0/d1.  */
 173
 174
 175 #define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \
 176   bcopy ((char *)(REGBUF) +                                             \
 177                  (TYPE_LENGTH(TYPE) >= 4 ? 0 : 4 - TYPE_LENGTH(TYPE)),  \
 178          VALBUF, TYPE_LENGTH(TYPE))
 179
 180
 181 /* Write into appropriate registers a function return value
 182    of type TYPE, given in virtual format.  Assumes floats are passed
 183    in d0/d1.  */
 184
 185
 186 #define STORE_RETURN_VALUE(TYPE,VALBUF) \
 187   write_register_bytes (0, VALBUF, TYPE_LENGTH (TYPE))
 188
 189
 190 /* Extract from an array REGBUF containing the (raw) register state
 191    the address in which a function should return its structure value,
 192    as a CORE_ADDR (or an expression that can be used as one).  */
 193
 194 #define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) (*(CORE_ADDR *)(REGBUF))
 195 \f
 196 /* Describe the pointer in each stack frame to the previous stack frame
 197    (its caller).  */
 198
 199 /* FRAME_CHAIN takes a frame's nominal address
 200    and produces the frame's chain-pointer.
 201
 202    However, if FRAME_CHAIN_VALID returns zero,
 203    it means the given frame is the outermost one and has no caller.  */
 204
 205 /* In the case of the H8/300, the frame's nominal address
 206    is the address of a 2-byte word containing the calling frame's address.  */
 207
 208
 209
 210
 211 /* Use the alternate method of avoiding running up off the end of
 212    the frame chain or following frames back into the startup code.
 213    See the comments in blockframe.c */
 214
 215 #define FRAME_CHAIN_VALID(chain, thisframe)     \
 216   (chain != 0                                   \
 217    && !(inside_main_scope ((thisframe)->pc))    \
 218    && !(inside_entry_scope ((thisframe)->pc)))
 219
 220
 221 /* Define other aspects of the stack frame.  */
 222
 223 /* A macro that tells us whether the function invocation represented
 224    by FI does not have a frame on the stack associated with it.  If it
 225    does not, FRAMELESS is set to 1, else 0.  */
 226 #define FRAMELESS_FUNCTION_INVOCATION(FI, FRAMELESS) \
 227   (FRAMELESS) = frameless_look_for_prologue(FI)
 228
 229 #define FRAME_SAVED_PC(FRAME) (read_memory_integer ((FRAME)->frame + 2, 2))
 230
 231 #define FRAME_ARGS_ADDRESS(fi) ((fi)->frame)
 232
 233 #define FRAME_LOCALS_ADDRESS(fi) ((fi)->frame)
 234
 235 /* Set VAL to the number of args passed to frame described by FI.
 236    Can set VAL to -1, meaning no way to tell.  */
 237
 238 /* We can't tell how many args there are
 239    now that the C compiler delays popping them.  */
 240
 241 #define FRAME_NUM_ARGS(val,fi) (val = -1)
 242
 243
 244 /* Return number of bytes at start of arglist that are not really args.  */
 245
 246 #define FRAME_ARGS_SKIP 4
 247
 248 /* Put here the code to store, into a struct frame_saved_regs,
 249    the addresses of the saved registers of frame described by FRAME_INFO.
 250    This includes special registers such as pc and fp saved in special
 251    ways in the stack frame.  sp is even more special:
 252    the address we return for it IS the sp for the next frame.  */
 253
 254 #define FRAME_FIND_SAVED_REGS(frame_info, frame_saved_regs)           abort();
 255 \f
 256
 257 /* Push an empty stack frame, to record the current PC, etc.  */
 258
 259 #define PUSH_DUMMY_FRAME        { h8300_push_dummy_frame (); }
 260
 261 /* Discard from the stack the innermost frame, restoring all registers.  */
 262
 263 #define POP_FRAME               { h8300_pop_frame (); }
 264