123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274 |
- /* Ravenscar PowerPC target support.
- Copyright (C) 2011-2022 Free Software Foundation, Inc.
- This file is part of GDB.
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 3 of the License, or
- (at your option) any later version.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
- You should have received a copy of the GNU General Public License
- along with this program. If not, see <http://www.gnu.org/licenses/>. */
- #include "defs.h"
- #include "gdbcore.h"
- #include "regcache.h"
- #include "ppc-tdep.h"
- #include "inferior.h"
- #include "ravenscar-thread.h"
- #include "ppc-ravenscar-thread.h"
- #define NO_OFFSET -1
- /* See ppc-tdep.h for register numbers. */
- static const int powerpc_context_offsets[] =
- {
- /* R0 - R32 */
- NO_OFFSET, 0, 4, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, 8, 12, 16,
- 20, 24, 28, 32,
- 36, 40, 44, 48,
- 52, 56, 60, 64,
- 68, 72, 76, 80,
- /* F0 - F31 */
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, 96, 104,
- 112, 120, 128, 136,
- 144, 152, 160, 168,
- 176, 184, 192, 200,
- 208, 216, 224, 232,
- /* PC, MSR, CR, LR */
- 88, NO_OFFSET, 84, NO_OFFSET,
- /* CTR, XER, FPSCR */
- NO_OFFSET, NO_OFFSET, 240
- };
- static const int e500_context_offsets[] =
- {
- /* R0 - R32 */
- NO_OFFSET, 4, 12, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, 20, 28, 36,
- 44, 52, 60, 68,
- 76, 84, 92, 100,
- 108, 116, 124, 132,
- 140, 148, 156, 164,
- /* F0 - F31 */
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- /* PC, MSR, CR, LR */
- 172, NO_OFFSET, 168, NO_OFFSET,
- /* CTR, XER, FPSCR, MQ */
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- /* Upper R0-R32. */
- NO_OFFSET, 0, 8, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, NO_OFFSET, NO_OFFSET, NO_OFFSET,
- NO_OFFSET, 16, 24, 32,
- 40, 48, 56, 64,
- 72, 80, 88, 96,
- 104, 112, 120, 128,
- 136, 144, 152, 160,
- /* ACC, FSCR */
- NO_OFFSET, 176
- };
- /* The register layout info. */
- struct ravenscar_reg_info
- {
- /* A table providing the offset relative to the context structure
- where each register is saved. */
- const int *context_offsets;
- /* The number of elements in the context_offsets table above. */
- int context_offsets_size;
- };
- /* supply register REGNUM, which has been saved on REGISTER_ADDR, to the
- regcache. */
- static void
- supply_register_at_address (struct regcache *regcache, int regnum,
- CORE_ADDR register_addr)
- {
- struct gdbarch *gdbarch = regcache->arch ();
- int buf_size = register_size (gdbarch, regnum);
- gdb_byte *buf;
- buf = (gdb_byte *) alloca (buf_size);
- read_memory (register_addr, buf, buf_size);
- regcache->raw_supply (regnum, buf);
- }
- /* Return true if, for a non-running thread, REGNUM has been saved on the
- Thread_Descriptor. */
- static int
- register_in_thread_descriptor_p (const struct ravenscar_reg_info *reg_info,
- int regnum)
- {
- return (regnum < reg_info->context_offsets_size
- && reg_info->context_offsets[regnum] != NO_OFFSET);
- }
- /* to_fetch_registers when inferior_ptid is different from the running
- thread. */
- static void
- ppc_ravenscar_generic_fetch_registers
- (const struct ravenscar_reg_info *reg_info,
- struct regcache *regcache, int regnum)
- {
- struct gdbarch *gdbarch = regcache->arch ();
- const int num_regs = gdbarch_num_regs (gdbarch);
- int current_regnum;
- CORE_ADDR current_address;
- CORE_ADDR thread_descriptor_address;
- /* The tid is the thread_id field, which is a pointer to the thread. */
- thread_descriptor_address = (CORE_ADDR) inferior_ptid.tid ();
- /* Read registers. */
- for (current_regnum = 0; current_regnum < num_regs; current_regnum++)
- {
- if (register_in_thread_descriptor_p (reg_info, current_regnum))
- {
- current_address = thread_descriptor_address
- + reg_info->context_offsets[current_regnum];
- supply_register_at_address (regcache, current_regnum,
- current_address);
- }
- }
- }
- /* to_store_registers when inferior_ptid is different from the running
- thread. */
- static void
- ppc_ravenscar_generic_store_registers
- (const struct ravenscar_reg_info *reg_info,
- struct regcache *regcache, int regnum)
- {
- struct gdbarch *gdbarch = regcache->arch ();
- int buf_size = register_size (gdbarch, regnum);
- gdb_byte buf[buf_size];
- ULONGEST register_address;
- if (register_in_thread_descriptor_p (reg_info, regnum))
- register_address
- = inferior_ptid.tid () + reg_info->context_offsets [regnum];
- else
- return;
- regcache->raw_collect (regnum, buf);
- write_memory (register_address,
- buf,
- buf_size);
- }
- /* The ravenscar_reg_info for most PowerPC targets. */
- static const struct ravenscar_reg_info ppc_reg_info =
- {
- powerpc_context_offsets,
- ARRAY_SIZE (powerpc_context_offsets),
- };
- struct ppc_ravenscar_powerpc_ops : public ravenscar_arch_ops
- {
- void fetch_registers (struct regcache *, int) override;
- void store_registers (struct regcache *, int) override;
- };
- void
- ppc_ravenscar_powerpc_ops::fetch_registers (struct regcache *regcache, int regnum)
- {
- ppc_ravenscar_generic_fetch_registers (&ppc_reg_info, regcache, regnum);
- }
- void
- ppc_ravenscar_powerpc_ops::store_registers (struct regcache *regcache, int regnum)
- {
- ppc_ravenscar_generic_store_registers (&ppc_reg_info, regcache, regnum);
- }
- /* The ravenscar_arch_ops vector for most PowerPC targets. */
- static struct ppc_ravenscar_powerpc_ops ppc_ravenscar_powerpc_ops;
- /* Register ppc_ravenscar_powerpc_ops in GDBARCH. */
- void
- register_ppc_ravenscar_ops (struct gdbarch *gdbarch)
- {
- set_gdbarch_ravenscar_ops (gdbarch, &ppc_ravenscar_powerpc_ops);
- }
- /* The ravenscar_reg_info for E500 targets. */
- static const struct ravenscar_reg_info e500_reg_info =
- {
- e500_context_offsets,
- ARRAY_SIZE (e500_context_offsets),
- };
- struct ppc_ravenscar_e500_ops : public ravenscar_arch_ops
- {
- void fetch_registers (struct regcache *, int) override;
- void store_registers (struct regcache *, int) override;
- };
- void
- ppc_ravenscar_e500_ops::fetch_registers (struct regcache *regcache, int regnum)
- {
- ppc_ravenscar_generic_fetch_registers (&e500_reg_info, regcache, regnum);
- }
- /* Implement the to_store_registers ravenscar_arch_ops method
- for E500 targets. */
- void
- ppc_ravenscar_e500_ops::store_registers (struct regcache *regcache, int regnum)
- {
- ppc_ravenscar_generic_store_registers (&e500_reg_info, regcache, regnum);
- }
- /* The ravenscar_arch_ops vector for E500 targets. */
- static struct ppc_ravenscar_e500_ops ppc_ravenscar_e500_ops;
- /* Register ppc_ravenscar_e500_ops in GDBARCH. */
- void
- register_e500_ravenscar_ops (struct gdbarch *gdbarch)
- {
- set_gdbarch_ravenscar_ops (gdbarch, &ppc_ravenscar_e500_ops);
- }
|