diff options
-rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/args.c | 12 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/args.exp | 70 |
3 files changed, 87 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index de4caac..409d9bd 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2003-01-14 Elena Zannoni <ezannoni@redhat.com> + + * gdb.base/args.c: New file. + * gdb.base/args.exp: New file. + 2003-01-14 Daniel Jacobowitz <drow@mvista.com> * gdb.c++/virtfunc.exp: Remove fixed XFAIL. diff --git a/gdb/testsuite/gdb.base/args.c b/gdb/testsuite/gdb.base/args.c new file mode 100644 index 0000000..d564120 --- /dev/null +++ b/gdb/testsuite/gdb.base/args.c @@ -0,0 +1,12 @@ +#include <stdio.h> + +int +main (int argc, char **argv) +{ + int i = 0; + printf ("%d\n", argc); + while (i < argc) + printf ("%s\n", argv[i++]); + + return 0; +} diff --git a/gdb/testsuite/gdb.base/args.exp b/gdb/testsuite/gdb.base/args.exp new file mode 100644 index 0000000..e4d00d0 --- /dev/null +++ b/gdb/testsuite/gdb.base/args.exp @@ -0,0 +1,70 @@ +# Copyright 2003 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 2 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, write to the Free Software +# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + +# Please email any bugs, comments, and/or additions to this file to: +# bug-gdb@prep.ai.mit.edu + +# This is a test for the gdb invocation option --args. + +if $tracelevel then { + strace $tracelevel +} + + +global GDBFLAGS + +set testfile "args" +set srcfile ${testfile}.c +set binfile ${objdir}/${subdir}/${testfile} + +if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-w}] != "" } { + gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail." +} + +# +# Test that the --args are processed correctly. +# +set GDBFLAGS "--args $binfile 1 3" +gdb_exit +gdb_start +gdb_reinitialize_dir $srcdir/$subdir +gdb_test "run" \ + "Starting program.*args 1 3.*3\r\n.*args\r\n1\r\n3.*Program exited normally." \ + "correct args printed" + +# +# Test that the --args are processed correctly even if one of them is empty. +# +set GDBFLAGS "--args $binfile 1 '' 3" +gdb_exit +gdb_start +gdb_reinitialize_dir $srcdir/$subdir +gdb_test "run" \ + "Starting program.*args 1 \\\\'\\\\' 3.*4\r\n.*args\r\n1\r\n''\r\n3.*Program exited normally." \ + "correct args printed, one empty" + +# +# try with 2 empty args +# +set GDBFLAGS "--args $binfile 1 '' '' 3" +gdb_exit +gdb_start +gdb_reinitialize_dir $srcdir/$subdir +gdb_test "run" \ + "Starting program.*args 1 \\\\'\\\\' \\\\'\\\\' 3.*5\r\n.*args\r\n1\r\n''\r\n''\r\n3.*Program exited normally." \ + "correct args printed, two empty" + + |