From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1KAn9B-000577-GR for qemu-devel@nongnu.org; Mon, 23 Jun 2008 10:35:57 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1KAn99-00055A-Ah for qemu-devel@nongnu.org; Mon, 23 Jun 2008 10:35:56 -0400 Received: from [199.232.76.173] (port=57328 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KAn98-00054k-Sm for qemu-devel@nongnu.org; Mon, 23 Jun 2008 10:35:55 -0400 Received: from lizzard.sbs.de ([194.138.37.39]:22795) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1KAn97-0004sN-7P for qemu-devel@nongnu.org; Mon, 23 Jun 2008 10:35:53 -0400 Received: from mail1.sbs.de (localhost [127.0.0.1]) by lizzard.sbs.de (8.12.11.20060308/8.12.11) with ESMTP id m5NEZnMj002427 for ; Mon, 23 Jun 2008 16:35:49 +0200 Received: from [139.25.109.167] (mchn012c.ww002.siemens.net [139.25.109.167] (may be forged)) by mail1.sbs.de (8.12.11.20060308/8.12.11) with ESMTP id m5NEZmuk017898 for ; Mon, 23 Jun 2008 16:35:48 +0200 Resent-To: qemu-devel@nongnu.org Resent-Message-Id: <485FB4C4.2080002@siemens.com> Message-ID: <485FB3E2.8080908@siemens.com> Date: Mon, 23 Jun 2008 16:32:02 +0200 From: Jan Kiszka MIME-Version: 1.0 References: <485FB18E.1090801@siemens.com> In-Reply-To: <485FB18E.1090801@siemens.com> Content-Type: text/plain; charset=ISO-8859-15 Content-Transfer-Encoding: 7bit Subject: [Qemu-devel] [PATCH 12/15] Introduce BP_WATCHPOINT_HIT flag Reply-To: qemu-devel@nongnu.org List-Id: qemu-devel.nongnu.org List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , To: qemu-devel@nongnu.org When one watchpoint is hit, others might have triggered as well. To support users of the watchpoint API which need to detect such cases, the BP_WATCHPOINT_HIT flag is introduced and maintained. Signed-off-by: Jan Kiszka --- cpu-all.h | 1 + cpu-exec.c | 11 +++++++++++ exec.c | 29 +++++++++++++++++------------ 3 files changed, 29 insertions(+), 12 deletions(-) Index: b/cpu-all.h =================================================================== --- a/cpu-all.h +++ b/cpu-all.h @@ -802,6 +802,7 @@ void cpu_reset_interrupt(CPUState *env, #define BP_MEM_WRITE 0x02 #define BP_MEM_ACCESS (BP_MEM_READ | BP_MEM_WRITE) #define BP_STOP_BEFORE_ACCESS 0x04 +#define BP_WATCHPOINT_HIT 0x08 #define BP_GDB 0x10 int cpu_breakpoint_insert(CPUState *env, target_ulong pc, int flags, Index: b/cpu-exec.c =================================================================== --- a/cpu-exec.c +++ b/cpu-exec.c @@ -228,6 +228,15 @@ static inline TranslationBlock *tb_find_ return tb; } +static void cpu_handle_debug_exception(CPUState *env) +{ + CPUWatchpoint *wp; + + if (!env->watchpoint_hit) + for (wp = env->watchpoints; wp != NULL; wp = wp->next) + wp->flags &= ~BP_WATCHPOINT_HIT; +} + /* main execution loop */ int cpu_exec(CPUState *env1) @@ -282,6 +291,8 @@ int cpu_exec(CPUState *env1) if (env->exception_index >= EXCP_INTERRUPT) { /* exit request from the cpu execution loop */ ret = env->exception_index; + if (ret == EXCP_DEBUG) + cpu_handle_debug_exception(env); break; } else if (env->user_mode_only) { /* if user mode only, we simulate a fake exception Index: b/exec.c =================================================================== --- a/exec.c +++ b/exec.c @@ -1182,7 +1182,7 @@ int cpu_watchpoint_remove(CPUState *env, for (wp = env->watchpoints; wp != NULL; wp = wp->next) { if (addr == wp->vaddr && len_mask == wp->len_mask - && flags == wp->flags) { + && flags == (wp->flags & ~BP_WATCHPOINT_HIT)) { cpu_watchpoint_remove_by_ref(env, wp); return 0; } @@ -2294,20 +2294,25 @@ static void check_watchpoint(int offset, for (wp = env->watchpoints; wp != NULL; wp = wp->next) { if ((vaddr == (wp->vaddr & len_mask) || (vaddr & wp->len_mask) == wp->vaddr) && (wp->flags & flags)) { - env->watchpoint_hit = wp; - tb = tb_find_pc(env->mem_access_pc); - if (tb) { - cpu_restore_state(tb, env, env->mem_access_pc, NULL); - tb_phys_invalidate(tb, -1); + wp->flags |= BP_WATCHPOINT_HIT; + if (!env->watchpoint_hit) { + env->watchpoint_hit = wp; + tb = tb_find_pc(env->mem_access_pc); + if (tb) { + cpu_restore_state(tb, env, env->mem_access_pc, NULL); + tb_phys_invalidate(tb, -1); + } + if (wp->flags & BP_STOP_BEFORE_ACCESS) + env->exception_index = EXCP_DEBUG; + else + env->singlestep_enabled |= SSTEP_INTERNAL; } - if (wp->flags & BP_STOP_BEFORE_ACCESS) - env->exception_index = EXCP_DEBUG; - else - env->singlestep_enabled |= SSTEP_INTERNAL; - cpu_resume_from_signal(env, NULL); - break; + } else { + wp->flags &= ~BP_WATCHPOINT_HIT; } } + if (env->watchpoint_hit) + cpu_resume_from_signal(env, NULL); } /* Watchpoint access routines. Watchpoints are inserted using TLB tricks,