gdb-6.3-threaded-watchpoints2-20050225.patch

   1 2005-02-28  Jeff Johnston  <jjohnstn@redhat.com>
   2
   3         * config/i386/nm-linux.h: Change dr register routines to
   4         accept a ptid_t first argument.  Change all calling macros
   5         to default the inferior_ptid for the first argument.
   6         (i386_linux_insert_watchpoint): New prototype.
   7         (i386_linux_remove_watchpoint, i386_linux_insert_hw_breakpoint): Ditto.
   8         (i386_linux_remove_hw_breakpoint): Ditto.
   9         (target_insert_watchpoint, target_remove_watchpoint): Undef and
  10         override.
  11         (target_insert_hw_breakpoint, target_remove_hw_breakpoint): Ditto.
  12         * config/i386/nm-linux64.h: Ditto except add amd64 versions of
  13         the watchpoint/hw-breakpoint insert/remove routines.
  14         * i386-nat.c: Include "inferior.h" to define inferior_ptid.
  15         * i386-linux-nat.c: Change all dr get/set routines to accept
  16         ptid_t as first argument and to use this argument to determine
  17         the tid for PTRACE.
  18         (i386_linux_set_debug_regs_for_thread): New function.
  19         (i386_linux_sync_debug_registers_callback): Ditto.
  20         (i386_linux_sync_debug_registers_across_threads): Ditto.
  21         (i386_linux_insert_watchpoint, i386_linux_remove_watchpoint): Ditto.
  22         (i386_linux_hw_breakpoint, i386_linux_remove_hw_breakpoint): Ditto.
  23         (i386_linux_new_thread): Ditto.
  24         (_initialize_i386_linux_nat): Ditto.
  25         * amd64-linux-nat.c: Change all dr get/set routines to accept
  26         ptid_t as first argument and to use this argument to determine
  27         the tid for PTRACE.
  28         (amd64_linux_set_debug_regs_for_thread): New function.
  29         (amd64_linux_sync_debug_registers_callback): Ditto.
  30         (amd64_linux_sync_debug_registers_across_threads): Ditto.
  31         (amd64_linux_insert_watchpoint, amd64_linux_remove_watchpoint): Ditto.
  32         (amd64_linux_hw_breakpoint, amd64_linux_remove_hw_breakpoint): Ditto.
  33         (amd64_linux_new_thread): Ditto.
  34         (_initialize_amd64_linux_nat): Register linux new thread observer.
  35         * testsuite/gdb.threads/watchthreads-threaded.c: New test case.
  36         * testsuite/gdb.threads/watchthreads-threaded.exp: Ditto.
  37
  38 [ With recent upstream GDB (6.8) reduced only to the testcase.  ]
  39
  40 [ It was called watchthreads2.{exp,c} before but it conflicted with FSF GDB new
  41   testcase of the same name.  ]
  42
  43 FIXME: The testcase does not expects multiple watchpoints hits per one stop.
  44
  45 Index: gdb-7.4.50.20111219/gdb/testsuite/gdb.threads/watchthreads-threaded.c
  46 ===================================================================
  47 --- /dev/null   1970-01-01 00:00:00.000000000 +0000
  48 +++ gdb-7.4.50.20111219/gdb/testsuite/gdb.threads/watchthreads-threaded.c       2011-12-19 22:05:02.867431570 +0100
  49 @@ -0,0 +1,66 @@
  50 +/* This testcase is part of GDB, the GNU debugger.
  51 +
  52 +   Copyright 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
  53 +
  54 +   This program is free software; you can redistribute it and/or modify
  55 +   it under the terms of the GNU General Public License as published by
  56 +   the Free Software Foundation; either version 2 of the License, or
  57 +   (at your option) any later version.
  58 +
  59 +   This program is distributed in the hope that it will be useful,
  60 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
  61 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  62 +   GNU General Public License for more details.
  63 +
  64 +   You should have received a copy of the GNU General Public License
  65 +   along with this program; if not, write to the Free Software
  66 +   Foundation, Inc., 59 Temple Place - Suite 330,
  67 +   Boston, MA 02111-1307, USA.
  68 +
  69 +   This file is copied from schedlock.c.  */
  70 +
  71 +#include <stdio.h>
  72 +#include <unistd.h>
  73 +#include <stdlib.h>
  74 +#include <pthread.h>
  75 +
  76 +void *thread_function(void *arg); /* Pointer to function executed by each thread */
  77 +
  78 +#define NUM 5
  79 +
  80 +unsigned int args[NUM+1];
  81 +
  82 +int main() {
  83 +    int res;
  84 +    pthread_t threads[NUM];
  85 +    void *thread_result;
  86 +    long i;
  87 +
  88 +    for (i = 0; i < NUM; i++)
  89 +      {
  90 +       args[i] = 1; /* Init value.  */
  91 +       res = pthread_create(&threads[i],
  92 +                            NULL,
  93 +                            thread_function,
  94 +                            (void *) i);
  95 +      }
  96 +
  97 +    args[i] = 1;
  98 +    thread_function ((void *) i);
  99 +
 100 +    exit(EXIT_SUCCESS);
 101 +}
 102 +
 103 +void *thread_function(void *arg) {
 104 +    int my_number =  (long) arg;
 105 +    int *myp = (int *) &args[my_number];
 106 +
 107 +    /* Don't run forever.  Run just short of it :)  */
 108 +    while (*myp > 0)
 109 +      {
 110 +       (*myp) ++; usleep (1); /* Loop increment.  */
 111 +      }
 112 +
 113 +    pthread_exit(NULL);
 114 +}
 115 +
 116 Index: gdb-7.4.50.20111219/gdb/testsuite/gdb.threads/watchthreads-threaded.exp
 117 ===================================================================
 118 --- /dev/null   1970-01-01 00:00:00.000000000 +0000
 119 +++ gdb-7.4.50.20111219/gdb/testsuite/gdb.threads/watchthreads-threaded.exp     2011-12-19 22:28:33.294911982 +0100
 120 @@ -0,0 +1,126 @@
 121 +# This testcase is part of GDB, the GNU debugger.
 122 +
 123 +# Copyright 2005 Free Software Foundation, Inc.
 124 +
 125 +# This program is free software; you can redistribute it and/or modify
 126 +# it under the terms of the GNU General Public License as published by
 127 +# the Free Software Foundation; either version 2 of the License, or
 128 +# (at your option) any later version.
 129 +#
 130 +# This program is distributed in the hope that it will be useful,
 131 +# but WITHOUT ANY WARRANTY; without even the implied warranty of
 132 +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 133 +# GNU General Public License for more details.
 134 +#
 135 +# You should have received a copy of the GNU General Public License
 136 +# along with this program; if not, write to the Free Software
 137 +# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 138 +
 139 +# Check that GDB can support multiple watchpoints across threads.
 140 +
 141 +# This test verifies that a watchpoint is detected in the proper thread
 142 +# so the test is only meaningful on a system with hardware watchpoints.
 143 +if [target_info exists gdb,no_hardware_watchpoints] {
 144 +    return 0;
 145 +}
 146 +
 147 +set testfile "watchthreads-threaded"
 148 +set srcfile ${testfile}.c
 149 +set binfile ${objdir}/${subdir}/${testfile}
 150 +if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "incdir=${objdir}"]] != "" } {
 151 +    return -1
 152 +}
 153 +
 154 +gdb_exit
 155 +gdb_start
 156 +gdb_reinitialize_dir $srcdir/$subdir
 157 +gdb_load ${binfile}
 158 +
 159 +gdb_test "set can-use-hw-watchpoints 1" "" ""
 160 +
 161 +#
 162 +# Run to `main' where we begin our tests.
 163 +#
 164 +
 165 +if ![runto_main] then {
 166 +    gdb_suppress_tests
 167 +}
 168 +
 169 +set args_2 0
 170 +set args_3 0
 171 +
 172 +gdb_breakpoint "thread_function"
 173 +gdb_continue_to_breakpoint "thread_function"
 174 +gdb_test "disable 2" ""
 175 +
 176 +gdb_test_multiple "p args\[2\]" "get initial args2" {
 177 +  -re "\\\$\[0-9\]* = (.*)$gdb_prompt $" {
 178 +    set init_args_2 $expect_out(1,string)
 179 +    pass "get initial args2"
 180 +  }
 181 +}
 182 +
 183 +gdb_test_multiple "p args\[3\]" "get initial args3" {
 184 +  -re "\\\$\[0-9\]* = (.*)$gdb_prompt $" {
 185 +    set init_args_3 $expect_out(1,string)
 186 +    pass "get initial args3"
 187 +  }
 188 +}
 189 +
 190 +set args_2 $init_args_2
 191 +set args_3 $init_args_3
 192 +
 193 +# Watch values that will be modified by distinct threads.
 194 +gdb_test "watch args\[2\]" "Hardware watchpoint 3: args\\\[2\\\]"
 195 +gdb_test "watch args\[3\]" "Hardware watchpoint 4: args\\\[3\\\]"
 196 +
 197 +set init_line [expr [gdb_get_line_number "Init value"]+1]
 198 +set inc_line [gdb_get_line_number "Loop increment"]
 199 +
 200 +# Loop and continue to allow both watchpoints to be triggered.
 201 +for {set i 0} {$i < 30} {incr i} {
 202 +  set test_flag 0
 203 +  gdb_test_multiple "continue" "threaded watch loop" {
 204 +    -re "Hardware watchpoint 3: args\\\[2\\\].*Old value = 0.*New value = 1.*main \\\(\\\) at .*watchthreads-threaded.c:$init_line.*$gdb_prompt $"
 205 +       { set args_2 1; set test_flag 1 }
 206 +    -re "Hardware watchpoint 4: args\\\[3\\\].*Old value = 0.*New value = 1.*main \\\(\\\) at .*watchthreads-threaded.c:$init_line.*$gdb_prompt $"
 207 +       { set args_3 1; set test_flag 1 }
 208 +    -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 $"
 209 +       { set args_2 [expr $args_2+1]; set test_flag 1 }
 210 +    -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 $"
 211 +       { set args_3 [expr $args_3+1]; set test_flag 1 }
 212 +  }
 213 +  # If we fail above, don't bother continuing loop
 214 +  if { $test_flag == 0 } {
 215 +    set i 30;
 216 +  }
 217 +}
 218 +
 219 +# Print success message if loop succeeded.
 220 +if { $test_flag == 1 } {
 221 +  pass "threaded watch loop"
 222 +}
 223 +
 224 +# Verify that we hit first watchpoint in child thread.
 225 +set message "watchpoint on args\[2\] hit in thread"
 226 +if { $args_2 > 1 } {
 227 +  pass $message
 228 +} else {
 229 +  fail $message
 230 +}
 231 +
 232 +# Verify that we hit second watchpoint in child thread.
 233 +set message "watchpoint on args\[3\] hit in thread"
 234 +if { $args_3 > 1 } {
 235 +  pass $message
 236 +} else {
 237 +  fail $message
 238 +}
 239 +
 240 +# Verify that all watchpoint hits are accounted for.
 241 +set message "combination of threaded watchpoints = 30 + initial values"
 242 +if { [expr $args_2+$args_3] == [expr [expr 30+$init_args_2]+$init_args_3] } {
 243 +  pass $message
 244 +} else {
 245 +  fail $message
 246 +}