gnu/dist/gdb6/gdb/testsuite/gdb.base/sigrepeat.exp

   1 # Copyright 2004, 2005 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 2 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, write to the Free Software
  15 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  16
  17
  18 # The program sigrepeat.c creates a repeating timer and then waits for
  19 # it to fire multiple times.  The objective is to create a backlog if
  20 # sigalrm signals and hence cause repeated signal delivery without any
  21 # cpu advancment.
  22
  23 if [target_info exists gdb,nosignals] {
  24     verbose "Skipping sigstep.exp because of nosignals."
  25     continue
  26 }
  27
  28 if $tracelevel then {
  29     strace $tracelevel
  30 }
  31
  32 set prms_id 0
  33 set bug_id 0
  34
  35 set testfile sigrepeat
  36 set srcfile ${testfile}.c
  37 set binfile ${objdir}/${subdir}/${testfile}
  38 if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
  39     untested "Couldn't compile ${srcfile}"
  40     return -1
  41 }
  42
  43 # get things started
  44 gdb_exit
  45 gdb_start
  46 gdb_reinitialize_dir $srcdir/$subdir
  47 gdb_load ${binfile}
  48
  49 # Advance to main
  50 if { ![runto_main] } then {
  51     gdb_suppress_tests;
  52 }
  53
  54 # Run to the signal handler wait loop.
  55 set infinite_loop [gdb_get_line_number {infinite loop}]
  56 gdb_test "advance $infinite_loop" "" "advance to infinite loop"
  57
  58 # Make the first of many signals come pending
  59 sleep 1
  60
  61 # Try to step off this line
  62 gdb_test "next" "return 0;.*"