1# This testcase is part of GDB, the GNU debugger.
2
3# Copyright 2015-2021 Free Software Foundation, Inc.
4
5# This program is free software; you can redistribute it and/or modify
6# it under the terms of the GNU General Public License as published by
7# the Free Software Foundation; either version 3 of the License, or
8# (at your option) any later version.
9#
10# This program is distributed in the hope that it will be useful,
11# but WITHOUT ANY WARRANTY; without even the implied warranty of
12# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13# GNU General Public License for more details.
14#
15# You should have received a copy of the GNU General Public License
16# along with this program.  If not, see <http://www.gnu.org/licenses/>.
17
18# Test that trying to trace without a process attached fails properly.
19
20load_lib trace-support.exp
21
22standard_testfile
23
24if {[prepare_for_testing "failed to prepare" $testfile $srcfile debug]} {
25    return -1
26}
27
28# Start GDB, but don't run so that we have no process attached.
29# Effectively, this tests targets that can do tracing and where GDB
30# can start programs ("run"), such as e.g., extended-remote gdbserver.
31clean_restart $testfile
32
33if { ![gdb_target_supports_trace] } then {
34    unsupported "current target does not support trace"
35    return 1
36}
37
38gdb_test "trace main" \
39    "Tracepoint \[0-9\] at.* file .*$srcfile, line.*" \
40    "set tracepoint on main"
41
42gdb_test "tstart" "Target returns error code.*\."
43
44with_test_prefix "after tstart" {
45    if ![runto_main] {
46	fail "can't run to main, target may have died unexpectedly"
47	return -1
48    }
49}
50