diff options
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/ChangeLog | 7 | ||||
-rw-r--r-- | gdb/testsuite/gdb.multi/multi-arch-exec.c | 29 | ||||
-rw-r--r-- | gdb/testsuite/gdb.multi/multi-arch-exec.exp | 64 |
3 files changed, 100 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index e25f28f..9d2d114 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2012-11-09 Pedro Alves <palves@redhat.com> + + PR gdb/14306 + + * gdb.multi/multi-arch-exec.c: New file. + * gdb.multi/multi-arch-exec.exp: New file. + 2012-11-09 Yao Qi <yao@codesourcery.com> * gdb.mi/mi-break.exp (test_abreak_creation): New procedure. diff --git a/gdb/testsuite/gdb.multi/multi-arch-exec.c b/gdb/testsuite/gdb.multi/multi-arch-exec.c new file mode 100644 index 0000000..3d1c240 --- /dev/null +++ b/gdb/testsuite/gdb.multi/multi-arch-exec.c @@ -0,0 +1,29 @@ +/* This testcase is part of GDB, the GNU debugger. + + Copyright 2012 Free Software Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program. If not, see <http://www.gnu.org/licenses/>. */ + +#include <stdio.h> +#include <unistd.h> + +int +main () +{ + execl ("gdb.multi/multi-arch-exec-hello", + "gdb.multi/multi-arch-exec-hello", + (char *) NULL); + perror ("execl failed"); + exit (1); +} diff --git a/gdb/testsuite/gdb.multi/multi-arch-exec.exp b/gdb/testsuite/gdb.multi/multi-arch-exec.exp new file mode 100644 index 0000000..785ca8d --- /dev/null +++ b/gdb/testsuite/gdb.multi/multi-arch-exec.exp @@ -0,0 +1,64 @@ +# Copyright 2009-2012 Free Software Foundation, Inc. + +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see <http://www.gnu.org/licenses/>. + +# Test multi-exec / multi-process features that work for all configurations, +# even ones that cannot run multiple processes simultaneously. + +set testfile "multi-arch-exec" + +# The plain remote target can't do multiple inferiors. +if [target_info exists use_gdb_stub] { + return +} + +# Can't use standard_testfile, we want executables with specialized +# names. +set exec1 "multi-arch-exec" +set srcfile1 multi-arch-exec.c +set binfile1 [standard_output_file ${exec1}] + +set exec2 "multi-arch-exec-hello" +set srcfile2 hello.c +set binfile2 [standard_output_file ${exec2}] + +# Build two executables, one for each arch. + +if [istarget "s390*-*-*"] { + set march1 "-m64" + set march2 "-m31" +} else { + set march1 "-m64" + set march2 "-m32" +} + +if { [prepare_for_testing ${testfile}.exp ${exec1} "${srcfile1}" \ + [list debug nowarnings additional_flags=${march1}]] } { + return -1 +} + +if { [prepare_for_testing ${testfile}.exp ${exec2} "${srcfile2}" \ + [list debug nowarnings additional_flags=${march2}]] } { + return -1 +} + +clean_restart ${exec1} +if ![runto_main] then { + fail "Couldn't run to main" + return -1 +} + +# Test that GDB updates the target description / arch successfuly +# after the exec. +gdb_test "continue" "Breakpoint 1, main.*" "continue across exec that changes architecture" |