Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(84)

Side by Side Diff: gdb/testsuite/gdb.trace/save-trace.exp

Issue 11969036: Merge GDB 7.5.1 (Closed) Base URL: http://git.chromium.org/native_client/nacl-gdb.git@master
Patch Set: Created 7 years, 11 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View unified diff | Download patch
« no previous file with comments | « gdb/testsuite/gdb.trace/report.exp ('k') | gdb/testsuite/gdb.trace/stap-trace.c » ('j') | no next file with comments »
Toggle Intra-line Diffs ('i') | Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
OLDNEW
1 # Copyright 1998, 2007-2012 Free Software Foundation, Inc. 1 # Copyright 1998, 2007-2012 Free Software Foundation, Inc.
2 # 2 #
3 # This program is free software; you can redistribute it and/or modify 3 # This program is free software; you can redistribute it and/or modify
4 # it under the terms of the GNU General Public License as published by 4 # it under the terms of the GNU General Public License as published by
5 # the Free Software Foundation; either version 3 of the License, or 5 # the Free Software Foundation; either version 3 of the License, or
6 # (at your option) any later version. 6 # (at your option) any later version.
7 # 7 #
8 # This program is distributed in the hope that it will be useful, 8 # This program is distributed in the hope that it will be useful,
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of 9 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 # GNU General Public License for more details. 11 # GNU General Public License for more details.
12 # 12 #
13 # You should have received a copy of the GNU General Public License 13 # You should have received a copy of the GNU General Public License
14 # along with this program. If not, see <http://www.gnu.org/licenses/>. 14 # along with this program. If not, see <http://www.gnu.org/licenses/>.
15 15
16 # This file was written by Michael Snyder (msnyder@cygnus.com) 16 # This file was written by Michael Snyder (msnyder@cygnus.com)
17 17
18 load_lib "trace-support.exp"; 18 load_lib "trace-support.exp";
19 19
20 if $tracelevel then {
21 strace $tracelevel
22 }
23
24 20
25 gdb_exit 21 gdb_exit
26 gdb_start 22 gdb_start
27 23
28 set testfile "actions" 24 standard_testfile actions.c
29 set srcfile ${testfile}.c
30 set binfile $objdir/$subdir/save-trace
31 if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \ 25 if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
32 executable {debug nowarnings}] != "" } { 26 executable {debug nowarnings}] != "" } {
33 untested save-trace.exp 27 untested save-trace.exp
34 return -1 28 return -1
35 } 29 }
36 gdb_reinitialize_dir $srcdir/$subdir 30 gdb_reinitialize_dir $srcdir/$subdir
37 31
38 # If testing on a remote host, download the source file. 32 # If testing on a remote host, download the source file.
39 # remote_download host $srcdir/$subdir/$srcfile 33 # remote_download host $srcdir/$subdir/$srcfile
40 34
(...skipping 92 matching lines...) Expand 10 before | Expand all | Expand 10 after
133 gdb_test_no_output "set default-collect" "10.2: clear default-collect" 127 gdb_test_no_output "set default-collect" "10.2: clear default-collect"
134 gdb_test "info tracepoints" "No tracepoints." "10.2: delete tracepoints" 128 gdb_test "info tracepoints" "No tracepoints." "10.2: delete tracepoints"
135 gdb_test "source savetrace.tr" \ 129 gdb_test "source savetrace.tr" \
136 "Tracepoint \[0-9\]+ at .*" \ 130 "Tracepoint \[0-9\]+ at .*" \
137 "10.2: read back saved tracepoints" 131 "10.2: read back saved tracepoints"
138 gdb_verify_tracepoints "10.2: verify recovered tracepoints"; 132 gdb_verify_tracepoints "10.2: verify recovered tracepoints";
139 remote_file host delete savetrace.tr 133 remote_file host delete savetrace.tr
140 134
141 # 10.3 repeat with a path to the file 135 # 10.3 repeat with a path to the file
142 136
143 set escapedfilename [string_to_regexp $objdir/savetrace.tr] 137 set trace_file_name [standard_output_file savetrace.tr]
144 remote_file host delete $objdir/savetrace.tr 138 set escapedfilename [string_to_regexp $trace_file_name]
145 gdb_test "save-tracepoints $objdir/savetrace.tr" \ 139 remote_file host delete $trace_file_name
140 gdb_test "save-tracepoints $trace_file_name" \
146 "Saved to file '${escapedfilename}'." \ 141 "Saved to file '${escapedfilename}'." \
147 "10.3: save tracepoint definitions, full path" 142 "10.3: save tracepoint definitions, full path"
148 143
149 gdb_delete_tracepoints 144 gdb_delete_tracepoints
150 gdb_test_no_output "set default-collect" "10.3: clear default-collect" 145 gdb_test_no_output "set default-collect" "10.3: clear default-collect"
151 gdb_test "info tracepoints" "No tracepoints." "10.3: delete tracepoints" 146 gdb_test "info tracepoints" "No tracepoints." "10.3: delete tracepoints"
152 gdb_test "source $objdir/savetrace.tr" \ 147 gdb_test "source $trace_file_name" \
153 "Tracepoint \[0-9\]+ at .*" \ 148 "Tracepoint \[0-9\]+ at .*" \
154 "10.4: read saved tracepoints, full path" 149 "10.4: read saved tracepoints, full path"
155 gdb_verify_tracepoints "10.3: verify recovered tracepoints, full path"; 150 gdb_verify_tracepoints "10.3: verify recovered tracepoints, full path";
156 remote_file host delete $objdir/savetrace.tr 151 remote_file host delete $trace_file_name
157 152
158 # 10.5 invalid filename 153 # 10.5 invalid filename
159 # [deferred -- not sure what a good invalid filename would be] 154 # [deferred -- not sure what a good invalid filename would be]
160 155
161 # 10.6 save-trace (file already exists) 156 # 10.6 save-trace (file already exists)
162 # [expect it to clobber the old one] 157 # [expect it to clobber the old one]
163 158
164 # 10.7 help save-tracepoints 159 # 10.7 help save-tracepoints
165 160
166 gdb_test "help save-tracepoints" \ 161 gdb_test "help save-tracepoints" \
167 "Save current tracepoint definitions as a script.*" \ 162 "Save current tracepoint definitions as a script.*" \
168 "10.7: help save-tracepoints" 163 "10.7: help save-tracepoints"
OLDNEW
« no previous file with comments | « gdb/testsuite/gdb.trace/report.exp ('k') | gdb/testsuite/gdb.trace/stap-trace.c » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698