trgt_arm.c revision 178713
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 178713 2008-05-01 20:36:48Z jhb $"); 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; 57163440Sjhb 58178713Sjhb kt = kgdb_thr_lookup_tid(ptid_get_pid(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++) { 66163440Sjhb 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 92178670Sjhbvoid 93178670Sjhbkgdb_trgt_new_objfile(struct objfile *objfile) 94178670Sjhb{ 95178670Sjhb} 96178670Sjhb 97162303Simp#ifndef CROSS_DEBUGGER 98160581Sobrienstruct kgdb_frame_cache { 99160581Sobrien CORE_ADDR fp; 100160581Sobrien CORE_ADDR sp; 101160581Sobrien}; 102160581Sobrien 103160581Sobrienstatic int kgdb_trgt_frame_offset[26] = { 104160581Sobrien offsetof(struct trapframe, tf_r0), 105160581Sobrien offsetof(struct trapframe, tf_r1), 106160581Sobrien offsetof(struct trapframe, tf_r2), 107160581Sobrien offsetof(struct trapframe, tf_r3), 108160581Sobrien offsetof(struct trapframe, tf_r4), 109160581Sobrien offsetof(struct trapframe, tf_r5), 110160581Sobrien offsetof(struct trapframe, tf_r6), 111160581Sobrien offsetof(struct trapframe, tf_r7), 112160581Sobrien offsetof(struct trapframe, tf_r8), 113160581Sobrien offsetof(struct trapframe, tf_r9), 114160581Sobrien offsetof(struct trapframe, tf_r10), 115160581Sobrien offsetof(struct trapframe, tf_r11), 116160581Sobrien offsetof(struct trapframe, tf_r12), 117160581Sobrien offsetof(struct trapframe, tf_svc_sp), 118160581Sobrien offsetof(struct trapframe, tf_svc_lr), 119160581Sobrien offsetof(struct trapframe, tf_pc), 120160581Sobrien -1, -1, -1, -1, -1, -1, -1, -1, -1, 121160581Sobrien offsetof(struct trapframe, tf_spsr) 122160581Sobrien}; 123160581Sobrien 124160581Sobrienstatic struct kgdb_frame_cache * 125160581Sobrienkgdb_trgt_frame_cache(struct frame_info *next_frame, void **this_cache) 126160581Sobrien{ 127160581Sobrien char buf[MAX_REGISTER_SIZE]; 128160581Sobrien struct kgdb_frame_cache *cache; 129160581Sobrien 130160581Sobrien cache = *this_cache; 131160581Sobrien if (cache == NULL) { 132160581Sobrien cache = FRAME_OBSTACK_ZALLOC(struct kgdb_frame_cache); 133160581Sobrien *this_cache = cache; 134160581Sobrien frame_unwind_register(next_frame, ARM_SP_REGNUM, buf); 135160581Sobrien cache->sp = extract_unsigned_integer(buf, 136160581Sobrien register_size(current_gdbarch, ARM_SP_REGNUM)); 137160581Sobrien frame_unwind_register(next_frame, ARM_FP_REGNUM, buf); 138160581Sobrien cache->fp = extract_unsigned_integer(buf, 139160581Sobrien register_size(current_gdbarch, ARM_FP_REGNUM)); 140160581Sobrien } 141160581Sobrien return (cache); 142160581Sobrien} 143160581Sobrien 144162303Simpstatic int is_undef; 145162303Simp 146160581Sobrienstatic void 147160581Sobrienkgdb_trgt_trapframe_this_id(struct frame_info *next_frame, void **this_cache, 148160581Sobrien struct frame_id *this_id) 149160581Sobrien{ 150160581Sobrien struct kgdb_frame_cache *cache; 151160581Sobrien 152160581Sobrien cache = kgdb_trgt_frame_cache(next_frame, this_cache); 153160581Sobrien *this_id = frame_id_build(cache->fp, 0); 154160581Sobrien} 155160581Sobrien 156160581Sobrienstatic void 157160581Sobrienkgdb_trgt_trapframe_prev_register(struct frame_info *next_frame, 158160581Sobrien void **this_cache, int regnum, int *optimizedp, enum lval_type *lvalp, 159160581Sobrien CORE_ADDR *addrp, int *realnump, void *valuep) 160160581Sobrien{ 161160581Sobrien char dummy_valuep[MAX_REGISTER_SIZE]; 162160581Sobrien struct kgdb_frame_cache *cache; 163160581Sobrien int ofs, regsz; 164162303Simp int is_undefined = 0; 165160581Sobrien 166160581Sobrien regsz = register_size(current_gdbarch, regnum); 167160581Sobrien 168160581Sobrien if (valuep == NULL) 169160581Sobrien valuep = dummy_valuep; 170160581Sobrien memset(valuep, 0, regsz); 171160581Sobrien *optimizedp = 0; 172160581Sobrien *addrp = 0; 173160581Sobrien *lvalp = not_lval; 174160581Sobrien *realnump = -1; 175160581Sobrien 176160581Sobrien ofs = (regnum >= 0 && regnum <= ARM_PS_REGNUM) 177160581Sobrien ? kgdb_trgt_frame_offset[regnum] : -1; 178160581Sobrien if (ofs == -1) 179160581Sobrien return; 180160581Sobrien 181160581Sobrien cache = kgdb_trgt_frame_cache(next_frame, this_cache); 182163440Sjhb 183162303Simp if (is_undef && (regnum == ARM_SP_REGNUM || regnum == ARM_PC_REGNUM)) { 184162303Simp *addrp = cache->sp + offsetof(struct trapframe, tf_spsr); 185162303Simp target_read_memory(*addrp, valuep, regsz); 186162303Simp is_undefined = 1; 187162303Simp ofs = kgdb_trgt_frame_offset[ARM_SP_REGNUM]; 188162303Simp 189162303Simp } 190160581Sobrien *addrp = cache->sp + ofs; 191160581Sobrien *lvalp = lval_memory; 192160581Sobrien target_read_memory(*addrp, valuep, regsz); 193162303Simp 194162303Simp if (is_undefined) { 195162303Simp *addrp = *(unsigned int *)valuep + (regnum == ARM_SP_REGNUM ? 196162303Simp 0 : 8); 197162303Simp target_read_memory(*addrp, valuep, regsz); 198162303Simp 199162303Simp } 200160581Sobrien} 201160581Sobrien 202160581Sobrienstatic const struct frame_unwind kgdb_trgt_trapframe_unwind = { 203160581Sobrien UNKNOWN_FRAME, 204160581Sobrien &kgdb_trgt_trapframe_this_id, 205160581Sobrien &kgdb_trgt_trapframe_prev_register 206160581Sobrien}; 207162303Simp#endif 208160581Sobrien 209160581Sobrienconst struct frame_unwind * 210160581Sobrienkgdb_trgt_trapframe_sniffer(struct frame_info *next_frame) 211160581Sobrien{ 212162303Simp#ifndef CROSS_DEBUGGER 213160581Sobrien char *pname; 214160581Sobrien CORE_ADDR pc; 215160581Sobrien 216160581Sobrien pc = frame_pc_unwind(next_frame); 217160581Sobrien pname = NULL; 218160581Sobrien find_pc_partial_function(pc, &pname, NULL, NULL); 219162303Simp if (pname == NULL) { 220162303Simp is_undef = 0; 221160581Sobrien return (NULL); 222162303Simp } 223162303Simp if (!strcmp(pname, "undefinedinstruction")) 224162303Simp is_undef = 1; 225160581Sobrien if (strcmp(pname, "Laddress_exception_entry") == 0 || 226160581Sobrien strcmp(pname, "undefined_entry") == 0 || 227160581Sobrien strcmp(pname, "exception_exit") == 0 || 228162303Simp strcmp(pname, "Laddress_exception_msg") == 0 || 229160581Sobrien strcmp(pname, "irq_entry") == 0) 230160581Sobrien return (&kgdb_trgt_trapframe_unwind); 231162303Simp if (!strcmp(pname, "undefinedinstruction")) 232162303Simp is_undef = 1; 233162303Simp else 234162303Simp is_undef = 0; 235162303Simp#endif 236160581Sobrien return (NULL); 237160581Sobrien} 238