xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/testsuite/gdb.threads/queue-signal.exp (revision d90047b5d07facf36e6c01dcc0bded8997ce9cc2)
1# Copyright (C) 2014-2017 Free Software Foundation, Inc.
2#
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
5# the Free Software Foundation; either version 3 of the License, or
6# (at your option) any later version.
7#
8# This program is distributed in the hope that it will be useful,
9# but WITHOUT ANY WARRANTY; without even the implied warranty of
10# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11# GNU General Public License for more details.
12#
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/>.
15
16standard_testfile
17
18if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
19	 executable { debug }] != "" } {
20    return -1
21}
22
23clean_restart ${binfile}
24
25if ![runto_main] {
26   fail "can't run to main"
27   return 0
28}
29
30gdb_test "handle SIGUSR1 stop print pass"
31gdb_test "handle SIGUSR2 stop print pass"
32gdb_test "handle SIGABRT stop print pass"
33
34gdb_breakpoint "all_threads_running"
35gdb_continue_to_breakpoint "all_threads_running"
36
37# Find out which of threads 2,3 are for sigusr1,2.
38set sigusr1_thread 0
39set sigusr2_thread 0
40gdb_test "thread 2"
41gdb_test_multiple "bt" "determine thread functions" {
42    -re "sigusr1.*$gdb_prompt $" {
43	set sigusr1_thread 2
44	set sigusr2_thread 3
45    }
46    -re "sigusr2.*$gdb_prompt $" {
47	set sigusr1_thread 3
48	set sigusr2_thread 2
49    }
50}
51
52# No point in continuing if we couldn't figure out which thread is which.
53if { $sigusr1_thread == 0 } {
54    # FAIL already recorded.
55    return 0
56}
57
58# Advance each thread to where we want them one at a time.
59gdb_test_no_output "set scheduler-locking on"
60gdb_test_no_output "set var ready = 1"
61
62# Thread sigusr1_thread gets a SIGUSR1 which we leave alone.
63gdb_test "thread $sigusr1_thread" ""
64gdb_test "continue" "SIGUSR1.*"
65
66# Inject SIGUSR2 into thread sigusr2_thread.
67gdb_test "thread $sigusr2_thread" ""
68gdb_test_no_output "queue-signal SIGUSR2"
69
70# The main thread gets SIGABRT which we then throw away.
71gdb_test "thread 1" ""
72gdb_test "continue" "SIGABRT.*"
73gdb_test_no_output "queue-signal 0"
74
75# Now let every thread run.
76gdb_test_no_output "set scheduler-locking off"
77
78gdb_breakpoint "all_threads_done"
79gdb_continue_to_breakpoint "all_threads_done"
80
81# Verify SIGUSR1, SIGUSR2 were received, and SIGABRT was discarded.
82gdb_test "p sigusr1_received" "= 1"
83gdb_test "p sigusr2_received" "= 1"
84gdb_test "p sigabrt_received" "= 0"
85
86# Before we finish up verify the queueing of nopass signals flags an error.
87gdb_test "queue-signal SIGINT" \
88  "Signal handling set to not pass this signal to the program."
89
90# Verify program is able to finish.
91gdb_continue_to_end
92