Blame SOURCES/gdb-6.3-threaded-watchpoints2-20050225.patch

2c2fa1
2005-02-28  Jeff Johnston  <jjohnstn@redhat.com>
2c2fa1
2c2fa1
	* config/i386/nm-linux.h: Change dr register routines to
2c2fa1
	accept a ptid_t first argument.  Change all calling macros
2c2fa1
	to default the inferior_ptid for the first argument.
2c2fa1
	(i386_linux_insert_watchpoint): New prototype.
2c2fa1
	(i386_linux_remove_watchpoint, i386_linux_insert_hw_breakpoint): Ditto.
2c2fa1
	(i386_linux_remove_hw_breakpoint): Ditto.
2c2fa1
	(target_insert_watchpoint, target_remove_watchpoint): Undef and
2c2fa1
	override.
2c2fa1
	(target_insert_hw_breakpoint, target_remove_hw_breakpoint): Ditto.
2c2fa1
	* config/i386/nm-linux64.h: Ditto except add amd64 versions of
2c2fa1
	the watchpoint/hw-breakpoint insert/remove routines.
2c2fa1
	* i386-nat.c: Include "inferior.h" to define inferior_ptid.
2c2fa1
	* i386-linux-nat.c: Change all dr get/set routines to accept
2c2fa1
	ptid_t as first argument and to use this argument to determine
2c2fa1
	the tid for PTRACE.
2c2fa1
	(i386_linux_set_debug_regs_for_thread): New function.
2c2fa1
	(i386_linux_sync_debug_registers_callback): Ditto.
2c2fa1
	(i386_linux_sync_debug_registers_across_threads): Ditto.
2c2fa1
	(i386_linux_insert_watchpoint, i386_linux_remove_watchpoint): Ditto.
2c2fa1
	(i386_linux_hw_breakpoint, i386_linux_remove_hw_breakpoint): Ditto.
2c2fa1
	(i386_linux_new_thread): Ditto.
2c2fa1
	(_initialize_i386_linux_nat): Ditto.
2c2fa1
	* amd64-linux-nat.c: Change all dr get/set routines to accept
2c2fa1
	ptid_t as first argument and to use this argument to determine
2c2fa1
	the tid for PTRACE.
2c2fa1
	(amd64_linux_set_debug_regs_for_thread): New function.
2c2fa1
	(amd64_linux_sync_debug_registers_callback): Ditto.
2c2fa1
	(amd64_linux_sync_debug_registers_across_threads): Ditto.
2c2fa1
	(amd64_linux_insert_watchpoint, amd64_linux_remove_watchpoint): Ditto.
2c2fa1
	(amd64_linux_hw_breakpoint, amd64_linux_remove_hw_breakpoint): Ditto.
2c2fa1
	(amd64_linux_new_thread): Ditto.
2c2fa1
	(_initialize_amd64_linux_nat): Register linux new thread observer.
2c2fa1
	* testsuite/gdb.threads/watchthreads-threaded.c: New test case.
2c2fa1
	* testsuite/gdb.threads/watchthreads-threaded.exp: Ditto.
2c2fa1
2c2fa1
[ With recent upstream GDB (6.8) reduced only to the testcase.  ]
2c2fa1
2c2fa1
[ It was called watchthreads2.{exp,c} before but it conflicted with FSF GDB new
2c2fa1
  testcase of the same name.  ]
2c2fa1
2c2fa1
FIXME: The testcase does not expects multiple watchpoints hits per one stop.
2c2fa1
2c2fa1
Index: gdb-7.4.50.20111219/gdb/testsuite/gdb.threads/watchthreads-threaded.c
2c2fa1
===================================================================
2c2fa1
--- /dev/null	1970-01-01 00:00:00.000000000 +0000
2c2fa1
+++ gdb-7.4.50.20111219/gdb/testsuite/gdb.threads/watchthreads-threaded.c	2011-12-19 22:05:02.867431570 +0100
2c2fa1
@@ -0,0 +1,66 @@
2c2fa1
+/* This testcase is part of GDB, the GNU debugger.
2c2fa1
+
2c2fa1
+   Copyright 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
2c2fa1
+
2c2fa1
+   This program is free software; you can redistribute it and/or modify
2c2fa1
+   it under the terms of the GNU General Public License as published by
2c2fa1
+   the Free Software Foundation; either version 2 of the License, or
2c2fa1
+   (at your option) any later version.
2c2fa1
+
2c2fa1
+   This program is distributed in the hope that it will be useful,
2c2fa1
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
2c2fa1
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
2c2fa1
+   GNU General Public License for more details.
2c2fa1
+
2c2fa1
+   You should have received a copy of the GNU General Public License
2c2fa1
+   along with this program; if not, write to the Free Software
2c2fa1
+   Foundation, Inc., 59 Temple Place - Suite 330,
2c2fa1
+   Boston, MA 02111-1307, USA.  
2c2fa1
+ 
2c2fa1
+   This file is copied from schedlock.c.  */
2c2fa1
+
2c2fa1
+#include <stdio.h>
2c2fa1
+#include <unistd.h>
2c2fa1
+#include <stdlib.h>
2c2fa1
+#include <pthread.h>
2c2fa1
+
2c2fa1
+void *thread_function(void *arg); /* Pointer to function executed by each thread */
2c2fa1
+
2c2fa1
+#define NUM 5
2c2fa1
+
2c2fa1
+unsigned int args[NUM+1];
2c2fa1
+
2c2fa1
+int main() {
2c2fa1
+    int res;
2c2fa1
+    pthread_t threads[NUM];
2c2fa1
+    void *thread_result;
2c2fa1
+    long i;
2c2fa1
+
2c2fa1
+    for (i = 0; i < NUM; i++)
2c2fa1
+      {
2c2fa1
+	args[i] = 1; /* Init value.  */
2c2fa1
+	res = pthread_create(&threads[i],
2c2fa1
+		             NULL,
2c2fa1
+			     thread_function,
2c2fa1
+			     (void *) i);
2c2fa1
+      }
2c2fa1
+
2c2fa1
+    args[i] = 1;
2c2fa1
+    thread_function ((void *) i);
2c2fa1
+
2c2fa1
+    exit(EXIT_SUCCESS);
2c2fa1
+}
2c2fa1
+
2c2fa1
+void *thread_function(void *arg) {
2c2fa1
+    int my_number =  (long) arg;
2c2fa1
+    int *myp = (int *) &args[my_number];
2c2fa1
+
2c2fa1
+    /* Don't run forever.  Run just short of it :)  */
2c2fa1
+    while (*myp > 0)
2c2fa1
+      {
2c2fa1
+	(*myp) ++; usleep (1); /* Loop increment.  */
2c2fa1
+      }
2c2fa1
+
2c2fa1
+    pthread_exit(NULL);
2c2fa1
+}
2c2fa1
+
2c2fa1
Index: gdb-7.4.50.20111219/gdb/testsuite/gdb.threads/watchthreads-threaded.exp
2c2fa1
===================================================================
2c2fa1
--- /dev/null	1970-01-01 00:00:00.000000000 +0000
2c2fa1
+++ gdb-7.4.50.20111219/gdb/testsuite/gdb.threads/watchthreads-threaded.exp	2011-12-19 22:28:33.294911982 +0100
2c2fa1
@@ -0,0 +1,126 @@
2c2fa1
+# This testcase is part of GDB, the GNU debugger.
2c2fa1
+
2c2fa1
+# Copyright 2005 Free Software Foundation, Inc.
2c2fa1
+
2c2fa1
+# This program is free software; you can redistribute it and/or modify
2c2fa1
+# it under the terms of the GNU General Public License as published by
2c2fa1
+# the Free Software Foundation; either version 2 of the License, or
2c2fa1
+# (at your option) any later version.
2c2fa1
+#
2c2fa1
+# This program is distributed in the hope that it will be useful,
2c2fa1
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
2c2fa1
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
2c2fa1
+# GNU General Public License for more details.
2c2fa1
+#
2c2fa1
+# You should have received a copy of the GNU General Public License
2c2fa1
+# along with this program; if not, write to the Free Software
2c2fa1
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  
2c2fa1
+
2c2fa1
+# Check that GDB can support multiple watchpoints across threads.
2c2fa1
+
2c2fa1
+# This test verifies that a watchpoint is detected in the proper thread
2c2fa1
+# so the test is only meaningful on a system with hardware watchpoints.
2c2fa1
+if [target_info exists gdb,no_hardware_watchpoints] {
2c2fa1
+    return 0;
2c2fa1
+}
2c2fa1
+
2c2fa1
+set testfile "watchthreads-threaded"
2c2fa1
+set srcfile ${testfile}.c
2c2fa1
+set binfile ${objdir}/${subdir}/${testfile}
2c2fa1
+if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "incdir=${objdir}"]] != "" } {
2c2fa1
+    return -1
2c2fa1
+}
2c2fa1
+
2c2fa1
+gdb_exit
2c2fa1
+gdb_start
2c2fa1
+gdb_reinitialize_dir $srcdir/$subdir
2c2fa1
+gdb_load ${binfile}
2c2fa1
+
2c2fa1
+gdb_test "set can-use-hw-watchpoints 1" "" ""
2c2fa1
+
2c2fa1
+#
2c2fa1
+# Run to `main' where we begin our tests.
2c2fa1
+#
2c2fa1
+
2c2fa1
+if ![runto_main] then {
2c2fa1
+    gdb_suppress_tests
2c2fa1
+}
2c2fa1
+
2c2fa1
+set args_2 0
2c2fa1
+set args_3 0
2c2fa1
+
2c2fa1
+gdb_breakpoint "thread_function"
2c2fa1
+gdb_continue_to_breakpoint "thread_function"
2c2fa1
+gdb_test "disable 2" ""
2c2fa1
+
2c2fa1
+gdb_test_multiple "p args\[2\]" "get initial args2" {
2c2fa1
+  -re "\\\$\[0-9\]* = (.*)$gdb_prompt $" {
2c2fa1
+    set init_args_2 $expect_out(1,string)
2c2fa1
+    pass "get initial args2"
2c2fa1
+  }
2c2fa1
+}
2c2fa1
+
2c2fa1
+gdb_test_multiple "p args\[3\]" "get initial args3" {
2c2fa1
+  -re "\\\$\[0-9\]* = (.*)$gdb_prompt $" {
2c2fa1
+    set init_args_3 $expect_out(1,string)
2c2fa1
+    pass "get initial args3"
2c2fa1
+  }
2c2fa1
+}
2c2fa1
+
2c2fa1
+set args_2 $init_args_2
2c2fa1
+set args_3 $init_args_3
2c2fa1
+
2c2fa1
+# Watch values that will be modified by distinct threads.
2c2fa1
+gdb_test "watch args\[2\]" "Hardware watchpoint 3: args\\\[2\\\]"
2c2fa1
+gdb_test "watch args\[3\]" "Hardware watchpoint 4: args\\\[3\\\]"
2c2fa1
+
2c2fa1
+set init_line [expr [gdb_get_line_number "Init value"]+1]
2c2fa1
+set inc_line [gdb_get_line_number "Loop increment"]
2c2fa1
+
2c2fa1
+# Loop and continue to allow both watchpoints to be triggered.
2c2fa1
+for {set i 0} {$i < 30} {incr i} {
2c2fa1
+  set test_flag 0
2c2fa1
+  gdb_test_multiple "continue" "threaded watch loop" {
2c2fa1
+    -re "Hardware watchpoint 3: args\\\[2\\\].*Old value = 0.*New value = 1.*main \\\(\\\) at .*watchthreads-threaded.c:$init_line.*$gdb_prompt $"
2c2fa1
+       { set args_2 1; set test_flag 1 }
2c2fa1
+    -re "Hardware watchpoint 4: args\\\[3\\\].*Old value = 0.*New value = 1.*main \\\(\\\) at .*watchthreads-threaded.c:$init_line.*$gdb_prompt $"
2c2fa1
+       { set args_3 1; set test_flag 1 }
2c2fa1
+    -re "Hardware watchpoint 3: args\\\[2\\\].*Old value = $args_2.*New value = [expr $args_2+1].*in thread_function \\\(arg=0x2\\\) at .*watchthreads-threaded.c:$inc_line.*$gdb_prompt $"
2c2fa1
+       { set args_2 [expr $args_2+1]; set test_flag 1 }
2c2fa1
+    -re "Hardware watchpoint 4: args\\\[3\\\].*Old value = $args_3.*New value = [expr $args_3+1].*in thread_function \\\(arg=0x3\\\) at .*watchthreads-threaded.c:$inc_line.*$gdb_prompt $"
2c2fa1
+       { set args_3 [expr $args_3+1]; set test_flag 1 }
2c2fa1
+  }
2c2fa1
+  # If we fail above, don't bother continuing loop
2c2fa1
+  if { $test_flag == 0 } {
2c2fa1
+    set i 30;
2c2fa1
+  }
2c2fa1
+}
2c2fa1
+
2c2fa1
+# Print success message if loop succeeded.
2c2fa1
+if { $test_flag == 1 } {
2c2fa1
+  pass "threaded watch loop"
2c2fa1
+}
2c2fa1
+
2c2fa1
+# Verify that we hit first watchpoint in child thread.
2c2fa1
+set message "watchpoint on args\[2\] hit in thread"
2c2fa1
+if { $args_2 > 1 } {
2c2fa1
+  pass $message 
2c2fa1
+} else {
2c2fa1
+  fail $message
2c2fa1
+}
2c2fa1
+
2c2fa1
+# Verify that we hit second watchpoint in child thread.
2c2fa1
+set message "watchpoint on args\[3\] hit in thread"
2c2fa1
+if { $args_3 > 1 } {
2c2fa1
+  pass $message 
2c2fa1
+} else {
2c2fa1
+  fail $message 
2c2fa1
+}
2c2fa1
+
2c2fa1
+# Verify that all watchpoint hits are accounted for.
2c2fa1
+set message "combination of threaded watchpoints = 30 + initial values"
2c2fa1
+if { [expr $args_2+$args_3] == [expr [expr 30+$init_args_2]+$init_args_3] } {
2c2fa1
+  pass $message 
2c2fa1
+} else {
2c2fa1
+  fail $message 
2c2fa1
+}