trgt_arm.c revision 162303
1160581Sobrien/* 2160581Sobrien * Copyright (c) 2004 Marcel Moolenaar 3160581Sobrien * All rights reserved. 4160581Sobrien * 5160581Sobrien * Redistribution and use in source and binary forms, with or without 6160581Sobrien * modification, are permitted provided that the following conditions 7160581Sobrien * are met: 8160581Sobrien * 9160581Sobrien * 1. Redistributions of source code must retain the above copyright 10160581Sobrien * notice, this list of conditions and the following disclaimer. 11160581Sobrien * 2. Redistributions in binary form must reproduce the above copyright 12160581Sobrien * notice, this list of conditions and the following disclaimer in the 13160581Sobrien * documentation and/or other materials provided with the distribution. 14160581Sobrien * 15160581Sobrien * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR 16160581Sobrien * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 17160581Sobrien * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 18160581Sobrien * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, 19160581Sobrien * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 20160581Sobrien * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 21160581Sobrien * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 22160581Sobrien * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 23160581Sobrien * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 24160581Sobrien * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25160581Sobrien */ 26160581Sobrien 27160581Sobrien#include <sys/cdefs.h> 28160581Sobrien__FBSDID("$FreeBSD: head/gnu/usr.bin/gdb/kgdb/trgt_arm.c 162303 2006-09-14 07:51:52Z imp $"); 29160581Sobrien 30160581Sobrien#include <sys/types.h> 31162303Simp#ifndef CROSS_DEBUGGER 32160581Sobrien#include <machine/pcb.h> 33160581Sobrien#include <machine/frame.h> 34162303Simp#include <machine/armreg.h> 35162303Simp#endif 36160581Sobrien#include <err.h> 37160581Sobrien#include <kvm.h> 38160581Sobrien#include <string.h> 39160581Sobrien 40160581Sobrien#include <defs.h> 41160581Sobrien#include <target.h> 42160581Sobrien#include <gdbthread.h> 43160581Sobrien#include <inferior.h> 44160581Sobrien#include <regcache.h> 45160581Sobrien#include <frame-unwind.h> 46160581Sobrien#include <arm-tdep.h> 47160581Sobrien 48160581Sobrien#include "kgdb.h" 49160581Sobrien 50160581Sobrienvoid 51160581Sobrienkgdb_trgt_fetch_registers(int regno __unused) 52160581Sobrien{ 53162303Simp#ifndef CROSS_DEBUGGER 54160581Sobrien struct kthr *kt; 55160581Sobrien struct pcb pcb; 56160581Sobrien int i, reg; 57160581Sobrien 58160581Sobrien kt = kgdb_thr_lookup_tid(ptid_get_tid(inferior_ptid)); 59160581Sobrien if (kt == NULL) 60160581Sobrien return; 61160581Sobrien if (kvm_read(kvm, kt->pcb, &pcb, sizeof(pcb)) != sizeof(pcb)) { 62160581Sobrien warnx("kvm_read: %s", kvm_geterr(kvm)); 63160581Sobrien memset(&pcb, 0, sizeof(pcb)); 64160581Sobrien } 65160581Sobrien for (i = ARM_A1_REGNUM + 8; i <= ARM_SP_REGNUM; i++) { 66160581Sobrien supply_register(i, (char *)&pcb.un_32.pcb32_r8 + 67160581Sobrien (i - (ARM_A1_REGNUM + 8 )) * 4); 68160581Sobrien } 69160581Sobrien if (pcb.un_32.pcb32_sp != 0) { 70160581Sobrien for (i = 0; i < 4; i++) { 71160581Sobrien if (kvm_read(kvm, pcb.un_32.pcb32_sp + (i) * 4, 72160581Sobrien ®, 4) != 4) { 73160581Sobrien warnx("kvm_read: %s", kvm_geterr(kvm)); 74160581Sobrien break; 75160581Sobrien } 76160581Sobrien supply_register(ARM_A1_REGNUM + 4 + i, (char *)®); 77160581Sobrien } 78160581Sobrien if (kvm_read(kvm, pcb.un_32.pcb32_sp + 4 * 4, ®, 4) != 4) 79160581Sobrien warnx("kvm_read :%s", kvm_geterr(kvm)); 80160581Sobrien else 81160581Sobrien supply_register(ARM_PC_REGNUM, (char *)®); 82160581Sobrien } 83162303Simp#endif 84160581Sobrien} 85160581Sobrien 86160581Sobrienvoid 87160581Sobrienkgdb_trgt_store_registers(int regno __unused) 88160581Sobrien{ 89160581Sobrien fprintf_unfiltered(gdb_stderr, "XXX: %s\n", __func__); 90160581Sobrien} 91160581Sobrien 92162303Simp#ifndef CROSS_DEBUGGER 93160581Sobrienstruct kgdb_frame_cache { 94160581Sobrien CORE_ADDR fp; 95160581Sobrien CORE_ADDR sp; 96160581Sobrien}; 97160581Sobrien 98160581Sobrienstatic int kgdb_trgt_frame_offset[26] = { 99160581Sobrien offsetof(struct trapframe, tf_r0), 100160581Sobrien offsetof(struct trapframe, tf_r1), 101160581Sobrien offsetof(struct trapframe, tf_r2), 102160581Sobrien offsetof(struct trapframe, tf_r3), 103160581Sobrien offsetof(struct trapframe, tf_r4), 104160581Sobrien offsetof(struct trapframe, tf_r5), 105160581Sobrien offsetof(struct trapframe, tf_r6), 106160581Sobrien offsetof(struct trapframe, tf_r7), 107160581Sobrien offsetof(struct trapframe, tf_r8), 108160581Sobrien offsetof(struct trapframe, tf_r9), 109160581Sobrien offsetof(struct trapframe, tf_r10), 110160581Sobrien offsetof(struct trapframe, tf_r11), 111160581Sobrien offsetof(struct trapframe, tf_r12), 112160581Sobrien offsetof(struct trapframe, tf_svc_sp), 113160581Sobrien offsetof(struct trapframe, tf_svc_lr), 114160581Sobrien offsetof(struct trapframe, tf_pc), 115160581Sobrien -1, -1, -1, -1, -1, -1, -1, -1, -1, 116160581Sobrien offsetof(struct trapframe, tf_spsr) 117160581Sobrien}; 118160581Sobrien 119160581Sobrienstatic struct kgdb_frame_cache * 120160581Sobrienkgdb_trgt_frame_cache(struct frame_info *next_frame, void **this_cache) 121160581Sobrien{ 122160581Sobrien char buf[MAX_REGISTER_SIZE]; 123160581Sobrien struct kgdb_frame_cache *cache; 124160581Sobrien 125160581Sobrien cache = *this_cache; 126160581Sobrien if (cache == NULL) { 127160581Sobrien cache = FRAME_OBSTACK_ZALLOC(struct kgdb_frame_cache); 128160581Sobrien *this_cache = cache; 129160581Sobrien frame_unwind_register(next_frame, ARM_SP_REGNUM, buf); 130160581Sobrien cache->sp = extract_unsigned_integer(buf, 131160581Sobrien register_size(current_gdbarch, ARM_SP_REGNUM)); 132160581Sobrien frame_unwind_register(next_frame, ARM_FP_REGNUM, buf); 133160581Sobrien cache->fp = extract_unsigned_integer(buf, 134160581Sobrien register_size(current_gdbarch, ARM_FP_REGNUM)); 135160581Sobrien } 136160581Sobrien return (cache); 137160581Sobrien} 138160581Sobrien 139162303Simpstatic int is_undef; 140162303Simp 141160581Sobrienstatic void 142160581Sobrienkgdb_trgt_trapframe_this_id(struct frame_info *next_frame, void **this_cache, 143160581Sobrien struct frame_id *this_id) 144160581Sobrien{ 145160581Sobrien struct kgdb_frame_cache *cache; 146160581Sobrien 147160581Sobrien cache = kgdb_trgt_frame_cache(next_frame, this_cache); 148160581Sobrien *this_id = frame_id_build(cache->fp, 0); 149160581Sobrien} 150160581Sobrien 151160581Sobrienstatic void 152160581Sobrienkgdb_trgt_trapframe_prev_register(struct frame_info *next_frame, 153160581Sobrien void **this_cache, int regnum, int *optimizedp, enum lval_type *lvalp, 154160581Sobrien CORE_ADDR *addrp, int *realnump, void *valuep) 155160581Sobrien{ 156160581Sobrien char dummy_valuep[MAX_REGISTER_SIZE]; 157160581Sobrien struct kgdb_frame_cache *cache; 158160581Sobrien int ofs, regsz; 159162303Simp int is_undefined = 0; 160160581Sobrien 161160581Sobrien regsz = register_size(current_gdbarch, regnum); 162160581Sobrien 163160581Sobrien if (valuep == NULL) 164160581Sobrien valuep = dummy_valuep; 165160581Sobrien memset(valuep, 0, regsz); 166160581Sobrien *optimizedp = 0; 167160581Sobrien *addrp = 0; 168160581Sobrien *lvalp = not_lval; 169160581Sobrien *realnump = -1; 170160581Sobrien 171160581Sobrien ofs = (regnum >= 0 && regnum <= ARM_PS_REGNUM) 172160581Sobrien ? kgdb_trgt_frame_offset[regnum] : -1; 173160581Sobrien if (ofs == -1) 174160581Sobrien return; 175160581Sobrien 176160581Sobrien cache = kgdb_trgt_frame_cache(next_frame, this_cache); 177162303Simp 178162303Simp if (is_undef && (regnum == ARM_SP_REGNUM || regnum == ARM_PC_REGNUM)) { 179162303Simp *addrp = cache->sp + offsetof(struct trapframe, tf_spsr); 180162303Simp target_read_memory(*addrp, valuep, regsz); 181162303Simp is_undefined = 1; 182162303Simp ofs = kgdb_trgt_frame_offset[ARM_SP_REGNUM]; 183162303Simp 184162303Simp } 185160581Sobrien *addrp = cache->sp + ofs; 186160581Sobrien *lvalp = lval_memory; 187160581Sobrien target_read_memory(*addrp, valuep, regsz); 188162303Simp 189162303Simp if (is_undefined) { 190162303Simp *addrp = *(unsigned int *)valuep + (regnum == ARM_SP_REGNUM ? 191162303Simp 0 : 8); 192162303Simp target_read_memory(*addrp, valuep, regsz); 193162303Simp 194162303Simp } 195160581Sobrien} 196160581Sobrien 197160581Sobrienstatic const struct frame_unwind kgdb_trgt_trapframe_unwind = { 198160581Sobrien UNKNOWN_FRAME, 199160581Sobrien &kgdb_trgt_trapframe_this_id, 200160581Sobrien &kgdb_trgt_trapframe_prev_register 201160581Sobrien}; 202162303Simp#endif 203160581Sobrien 204160581Sobrienconst struct frame_unwind * 205160581Sobrienkgdb_trgt_trapframe_sniffer(struct frame_info *next_frame) 206160581Sobrien{ 207162303Simp#ifndef CROSS_DEBUGGER 208160581Sobrien char *pname; 209160581Sobrien CORE_ADDR pc; 210160581Sobrien 211160581Sobrien pc = frame_pc_unwind(next_frame); 212160581Sobrien pname = NULL; 213160581Sobrien find_pc_partial_function(pc, &pname, NULL, NULL); 214162303Simp if (pname == NULL) { 215162303Simp is_undef = 0; 216160581Sobrien return (NULL); 217162303Simp } 218162303Simp if (!strcmp(pname, "undefinedinstruction")) 219162303Simp is_undef = 1; 220160581Sobrien if (strcmp(pname, "Laddress_exception_entry") == 0 || 221160581Sobrien strcmp(pname, "undefined_entry") == 0 || 222160581Sobrien strcmp(pname, "exception_exit") == 0 || 223162303Simp strcmp(pname, "Laddress_exception_msg") == 0 || 224160581Sobrien strcmp(pname, "irq_entry") == 0) 225160581Sobrien return (&kgdb_trgt_trapframe_unwind); 226162303Simp if (!strcmp(pname, "undefinedinstruction")) 227162303Simp is_undef = 1; 228162303Simp else 229162303Simp is_undef = 0; 230162303Simp#endif 231160581Sobrien return (NULL); 232160581Sobrien} 233