trgt_arm.c revision 160581
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 160581 2006-07-22 15:27:18Z obrien $"); 29160581Sobrien 30160581Sobrien#include <sys/types.h> 31160581Sobrien#include <machine/pcb.h> 32160581Sobrien#include <machine/frame.h> 33160581Sobrien#include <err.h> 34160581Sobrien#include <kvm.h> 35160581Sobrien#include <string.h> 36160581Sobrien 37160581Sobrien#include <defs.h> 38160581Sobrien#include <target.h> 39160581Sobrien#include <gdbthread.h> 40160581Sobrien#include <inferior.h> 41160581Sobrien#include <regcache.h> 42160581Sobrien#include <frame-unwind.h> 43160581Sobrien#include <arm-tdep.h> 44160581Sobrien 45160581Sobrien#include "kgdb.h" 46160581Sobrien 47160581Sobrienvoid 48160581Sobrienkgdb_trgt_fetch_registers(int regno __unused) 49160581Sobrien{ 50160581Sobrien struct kthr *kt; 51160581Sobrien struct pcb pcb; 52160581Sobrien int i, reg; 53160581Sobrien 54160581Sobrien kt = kgdb_thr_lookup_tid(ptid_get_tid(inferior_ptid)); 55160581Sobrien if (kt == NULL) 56160581Sobrien return; 57160581Sobrien if (kvm_read(kvm, kt->pcb, &pcb, sizeof(pcb)) != sizeof(pcb)) { 58160581Sobrien warnx("kvm_read: %s", kvm_geterr(kvm)); 59160581Sobrien memset(&pcb, 0, sizeof(pcb)); 60160581Sobrien } 61160581Sobrien for (i = ARM_A1_REGNUM + 8; i <= ARM_SP_REGNUM; i++) { 62160581Sobrien supply_register(i, (char *)&pcb.un_32.pcb32_r8 + 63160581Sobrien (i - (ARM_A1_REGNUM + 8 )) * 4); 64160581Sobrien } 65160581Sobrien if (pcb.un_32.pcb32_sp != 0) { 66160581Sobrien for (i = 0; i < 4; i++) { 67160581Sobrien if (kvm_read(kvm, pcb.un_32.pcb32_sp + (i) * 4, 68160581Sobrien ®, 4) != 4) { 69160581Sobrien warnx("kvm_read: %s", kvm_geterr(kvm)); 70160581Sobrien break; 71160581Sobrien } 72160581Sobrien supply_register(ARM_A1_REGNUM + 4 + i, (char *)®); 73160581Sobrien } 74160581Sobrien if (kvm_read(kvm, pcb.un_32.pcb32_sp + 4 * 4, ®, 4) != 4) 75160581Sobrien warnx("kvm_read :%s", kvm_geterr(kvm)); 76160581Sobrien else 77160581Sobrien supply_register(ARM_PC_REGNUM, (char *)®); 78160581Sobrien } 79160581Sobrien} 80160581Sobrien 81160581Sobrienvoid 82160581Sobrienkgdb_trgt_store_registers(int regno __unused) 83160581Sobrien{ 84160581Sobrien fprintf_unfiltered(gdb_stderr, "XXX: %s\n", __func__); 85160581Sobrien} 86160581Sobrien 87160581Sobrienstruct kgdb_frame_cache { 88160581Sobrien CORE_ADDR fp; 89160581Sobrien CORE_ADDR sp; 90160581Sobrien}; 91160581Sobrien 92160581Sobrienstatic int kgdb_trgt_frame_offset[26] = { 93160581Sobrien offsetof(struct trapframe, tf_r0), 94160581Sobrien offsetof(struct trapframe, tf_r1), 95160581Sobrien offsetof(struct trapframe, tf_r2), 96160581Sobrien offsetof(struct trapframe, tf_r3), 97160581Sobrien offsetof(struct trapframe, tf_r4), 98160581Sobrien offsetof(struct trapframe, tf_r5), 99160581Sobrien offsetof(struct trapframe, tf_r6), 100160581Sobrien offsetof(struct trapframe, tf_r7), 101160581Sobrien offsetof(struct trapframe, tf_r8), 102160581Sobrien offsetof(struct trapframe, tf_r9), 103160581Sobrien offsetof(struct trapframe, tf_r10), 104160581Sobrien offsetof(struct trapframe, tf_r11), 105160581Sobrien offsetof(struct trapframe, tf_r12), 106160581Sobrien offsetof(struct trapframe, tf_svc_sp), 107160581Sobrien offsetof(struct trapframe, tf_svc_lr), 108160581Sobrien offsetof(struct trapframe, tf_pc), 109160581Sobrien -1, -1, -1, -1, -1, -1, -1, -1, -1, 110160581Sobrien offsetof(struct trapframe, tf_spsr) 111160581Sobrien}; 112160581Sobrien 113160581Sobrienstatic struct kgdb_frame_cache * 114160581Sobrienkgdb_trgt_frame_cache(struct frame_info *next_frame, void **this_cache) 115160581Sobrien{ 116160581Sobrien char buf[MAX_REGISTER_SIZE]; 117160581Sobrien struct kgdb_frame_cache *cache; 118160581Sobrien 119160581Sobrien cache = *this_cache; 120160581Sobrien if (cache == NULL) { 121160581Sobrien cache = FRAME_OBSTACK_ZALLOC(struct kgdb_frame_cache); 122160581Sobrien *this_cache = cache; 123160581Sobrien frame_unwind_register(next_frame, ARM_SP_REGNUM, buf); 124160581Sobrien cache->sp = extract_unsigned_integer(buf, 125160581Sobrien register_size(current_gdbarch, ARM_SP_REGNUM)); 126160581Sobrien frame_unwind_register(next_frame, ARM_FP_REGNUM, buf); 127160581Sobrien cache->fp = extract_unsigned_integer(buf, 128160581Sobrien register_size(current_gdbarch, ARM_FP_REGNUM)); 129160581Sobrien } 130160581Sobrien return (cache); 131160581Sobrien} 132160581Sobrien 133160581Sobrienstatic void 134160581Sobrienkgdb_trgt_trapframe_this_id(struct frame_info *next_frame, void **this_cache, 135160581Sobrien struct frame_id *this_id) 136160581Sobrien{ 137160581Sobrien struct kgdb_frame_cache *cache; 138160581Sobrien 139160581Sobrien cache = kgdb_trgt_frame_cache(next_frame, this_cache); 140160581Sobrien *this_id = frame_id_build(cache->fp, 0); 141160581Sobrien} 142160581Sobrien 143160581Sobrienstatic void 144160581Sobrienkgdb_trgt_trapframe_prev_register(struct frame_info *next_frame, 145160581Sobrien void **this_cache, int regnum, int *optimizedp, enum lval_type *lvalp, 146160581Sobrien CORE_ADDR *addrp, int *realnump, void *valuep) 147160581Sobrien{ 148160581Sobrien char dummy_valuep[MAX_REGISTER_SIZE]; 149160581Sobrien struct kgdb_frame_cache *cache; 150160581Sobrien int ofs, regsz; 151160581Sobrien 152160581Sobrien regsz = register_size(current_gdbarch, regnum); 153160581Sobrien 154160581Sobrien if (valuep == NULL) 155160581Sobrien valuep = dummy_valuep; 156160581Sobrien memset(valuep, 0, regsz); 157160581Sobrien *optimizedp = 0; 158160581Sobrien *addrp = 0; 159160581Sobrien *lvalp = not_lval; 160160581Sobrien *realnump = -1; 161160581Sobrien 162160581Sobrien ofs = (regnum >= 0 && regnum <= ARM_PS_REGNUM) 163160581Sobrien ? kgdb_trgt_frame_offset[regnum] : -1; 164160581Sobrien if (ofs == -1) 165160581Sobrien return; 166160581Sobrien 167160581Sobrien cache = kgdb_trgt_frame_cache(next_frame, this_cache); 168160581Sobrien *addrp = cache->sp + ofs; 169160581Sobrien *lvalp = lval_memory; 170160581Sobrien target_read_memory(*addrp, valuep, regsz); 171160581Sobrien} 172160581Sobrien 173160581Sobrienstatic const struct frame_unwind kgdb_trgt_trapframe_unwind = { 174160581Sobrien UNKNOWN_FRAME, 175160581Sobrien &kgdb_trgt_trapframe_this_id, 176160581Sobrien &kgdb_trgt_trapframe_prev_register 177160581Sobrien}; 178160581Sobrien 179160581Sobrienconst struct frame_unwind * 180160581Sobrienkgdb_trgt_trapframe_sniffer(struct frame_info *next_frame) 181160581Sobrien{ 182160581Sobrien char *pname; 183160581Sobrien CORE_ADDR pc; 184160581Sobrien 185160581Sobrien pc = frame_pc_unwind(next_frame); 186160581Sobrien pname = NULL; 187160581Sobrien find_pc_partial_function(pc, &pname, NULL, NULL); 188160581Sobrien if (pname == NULL) 189160581Sobrien return (NULL); 190160581Sobrien if (strcmp(pname, "Laddress_exception_entry") == 0 || 191160581Sobrien strcmp(pname, "undefined_entry") == 0 || 192160581Sobrien strcmp(pname, "exception_exit") == 0 || 193160581Sobrien strcmp(pname, "irq_entry") == 0) 194160581Sobrien return (&kgdb_trgt_trapframe_unwind); 195160581Sobrien return (NULL); 196160581Sobrien} 197