failures in fileio.exp

[David Carlton <carlton at bactrian dot org>]

I'm seeing these failures in fileio.exp:

FAIL: gdb.base/fileio.exp: Stat a NULL pathname returns ENOENT
FAIL: gdb.base/fileio.exp: System with invalid command returns 127
FAIL: gdb.base/fileio.exp: Renaming a nonexistant file returns ENOENT
FAIL: gdb.base/fileio.exp: Unlinking a nonexistant file returns ENOENT
FAIL: gdb.base/fileio.exp: Time(2) returns feasible values

This is on Red Hat 8.0 (i686-pc-linux-gnu), GCC 3.1.  I'll include the
gdb.log below, if it helps.

David Carlton
carlton@bactrian.org

Test Run By carlton on Wed Jun 11 15:27:30 2003
Native configuration is i686-pc-linux-gnu

		=== gdb tests ===

Schedule of variations:
    unix

Running target unix
Using /usr/local/share/dejagnu/baseboards/unix.exp as board description file for target.
Using /usr/local/share/dejagnu/config/unix.exp as generic interface file for target.
Using ./config/unix.exp as tool-and-target-specific interface file.
Running ./gdb.base/fileio.exp ...
Executing on host: gcc ./gdb.base/fileio.c  -g  -lm   -o /gdb/mirror/src/gdb/testsuite/gdb.base/fileio    (timeout = 300)
spawn gcc ./gdb.base/fileio.c -g -lm -o /gdb/mirror/src/gdb/testsuite/gdb.base/fileio 
Executing on host: gcc ./lib/compiler.c  -E  -o /gdb/mirror/src/gdb/testsuite/gdb.base/fileio.ci    (timeout = 300)
spawn gcc ./lib/compiler.c -E -o /gdb/mirror/src/gdb/testsuite/gdb.base/fileio.ci 
spawn /gdb/mirror/src/gdb/testsuite/../../gdb/gdb -nw -nx 
GNU gdb 2003-06-11-cvs
Copyright 2003 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or distribute copies of it under certain conditions.
Type "show copying" to see the conditions.
There is absolutely no warranty for GDB.  Type "show warranty" for details.
This GDB was configured as "i686-pc-linux-gnu".
(gdb) set height 0
(gdb) set width 0
(gdb) dir
Reinitialize source path to empty? (y or n) y
Source directories searched: $cdir:$cwd
(gdb) dir ./gdb.base
Source directories searched: /gdb/mirror/src/gdb/testsuite/./gdb.base:$cdir:$cwd
(gdb) file /gdb/mirror/src/gdb/testsuite/gdb.base/fileio
Reading symbols from /gdb/mirror/src/gdb/testsuite/gdb.base/fileio...done.
(gdb) set print sevenbit-strings
(gdb) set print address off
(gdb) set width 0
(gdb) delete breakpoints
(gdb) info breakpoints
No breakpoints or watchpoints.
(gdb) break main
Breakpoint 1: file gdb.base/fileio.c, line 455.
(gdb) run 
Starting program: /gdb/mirror/src/gdb/testsuite/gdb.base/fileio 

Breakpoint 1, main () at gdb.base/fileio.c:455
455	  test_open ();
(gdb) tbreak 81
Breakpoint 2: file gdb.base/fileio.c, line 81.
(gdb) continue
Continuing.
open 1: ret = 6, errno = 0 OK
test_open () at gdb.base/fileio.c:81
81	  if (ret >= 0)
(gdb) PASS: gdb.base/fileio.exp: Open a file
tbreak 88
Breakpoint 3: file gdb.base/fileio.c, line 88.
(gdb) continue
Continuing.
open 2: ret = -1, errno = 17 OK
test_open () at gdb.base/fileio.c:88
88	  if (ret >= 0)
(gdb) PASS: gdb.base/fileio.exp: Creating already existing file returns EEXIST
tbreak 95
Breakpoint 4: file gdb.base/fileio.c, line 95.
(gdb) continue
Continuing.
open 3: ret = -1, errno = 21 OK
test_open () at gdb.base/fileio.c:95
95	  if (ret >= 0)
(gdb) PASS: gdb.base/fileio.exp: Open directory for writing returns EISDIR
tbreak 102
Breakpoint 5: file gdb.base/fileio.c, line 102.
(gdb) continue
Continuing.
open 4: ret = -1, errno = 2 OK
test_open () at gdb.base/fileio.c:102
102	  if (ret >= 0)
(gdb) PASS: gdb.base/fileio.exp: Opening nonexistant file returns ENOENT
tbreak 109
Breakpoint 6: file gdb.base/fileio.c, line 109.
(gdb) continue
Continuing.
test_open () at gdb.base/fileio.c:109
109	      close (ret);
(gdb) tbreak 119
Breakpoint 7: file gdb.base/fileio.c, line 119.
(gdb) continue
Continuing.
open 5: ret = -1, errno = 13 OK
test_open () at gdb.base/fileio.c:119
119	}
(gdb) PASS: gdb.base/fileio.exp: Open for write but no write permission returns EACCES
tbreak 140
Breakpoint 8: file gdb.base/fileio.c, line 140.
(gdb) continue
Continuing.
write 1: ret = 11, errno = 0 OK
test_write () at gdb.base/fileio.c:140
140	  errno = 0;
(gdb) PASS: gdb.base/fileio.exp: Writing to a file
tbreak 145
Breakpoint 9: file gdb.base/fileio.c, line 145.
(gdb) continue
Continuing.
write 2: ret = -1, errno = 9, OK
test_write () at gdb.base/fileio.c:145
145	  errno = 0;
(gdb) PASS: gdb.base/fileio.exp: Write using invalid file descriptor returns EBADF
tbreak 156
Breakpoint 10: file gdb.base/fileio.c, line 156.
(gdb) continue
Continuing.
write 3: ret = -1, errno = 9 OK
test_write () at gdb.base/fileio.c:156
156	}
(gdb) PASS: gdb.base/fileio.exp: Writing to a read-only file returns EBADF
tbreak 182
Breakpoint 11: file gdb.base/fileio.c, line 182.
(gdb) continue
Continuing.
read 1: Hello World OK
test_read () at gdb.base/fileio.c:182
182	  errno = 0;
(gdb) PASS: gdb.base/fileio.exp: Reading from a file
tbreak 186
Breakpoint 12: file gdb.base/fileio.c, line 186.
(gdb) continue
Continuing.
read 2: ret = -1, errno = 9 OK
test_read () at gdb.base/fileio.c:186
186	}
(gdb) PASS: gdb.base/fileio.exp: Read using invalid file descriptor returns EBADF
tbreak 221
Breakpoint 13: file gdb.base/fileio.c, line 221.
(gdb) continue
Continuing.
lseek 1: ret = 0, errno = 0, OK
lseek 2: ret = 11, errno = 0, OK
lseek 3: ret = 3, errno = 0, OK
test_lseek () at gdb.base/fileio.c:221
221	}
(gdb) PASS: gdb.base/fileio.exp: Lseeking a file
tbreak 241
Breakpoint 14: file gdb.base/fileio.c, line 241.
(gdb) continue
Continuing.
close 1: ret = 0, errno = 0, OK
test_close () at gdb.base/fileio.c:241
241	  errno = 0;
(gdb) PASS: gdb.base/fileio.exp: Closing a file
tbreak 245
Breakpoint 15: file gdb.base/fileio.c, line 245.
(gdb) continue
Continuing.
close 2: ret = -1, errno = 9, OK
test_close () at gdb.base/fileio.c:245
245	}
(gdb) PASS: gdb.base/fileio.exp: Closing an invalid file descriptor returns EBADF
tbreak 262
Breakpoint 16: file gdb.base/fileio.c, line 262.
(gdb) continue
Continuing.
stat 1: ret = 0, errno = 0 OK
test_stat () at gdb.base/fileio.c:262
262	  errno = 0;
(gdb) PASS: gdb.base/fileio.exp: Stat a file
tbreak 267
Breakpoint 17: file gdb.base/fileio.c, line 267.
(gdb) continue
Continuing.
stat 2: ret = -1, errno = 14 
test_stat () at gdb.base/fileio.c:267
267	  errno = 0;
(gdb) FAIL: gdb.base/fileio.exp: Stat a NULL pathname returns ENOENT
tbreak 272
Breakpoint 18: file gdb.base/fileio.c, line 272.
(gdb) continue
Continuing.
stat 3: ret = -1, errno = 2 OK
test_stat () at gdb.base/fileio.c:272
272	  errno = 0;
(gdb) PASS: gdb.base/fileio.exp: Stat an empty pathname returns ENOENT
tbreak 276
Breakpoint 19: file gdb.base/fileio.c, line 276.
(gdb) continue
Continuing.
stat 4: ret = -1, errno = 2 OK
test_stat () at gdb.base/fileio.c:276
276	}
(gdb) PASS: gdb.base/fileio.exp: Stat a nonexistant file returns ENOENT
tbreak 301
Breakpoint 20: file gdb.base/fileio.c, line 301.
(gdb) continue
Continuing.
fstat 1: ret = 0, errno = 0 OK
test_fstat () at gdb.base/fileio.c:301
301	  errno = 0;
(gdb) PASS: gdb.base/fileio.exp: Fstat an open file
tbreak 305
Breakpoint 21: file gdb.base/fileio.c, line 305.
(gdb) continue
Continuing.
fstat 2: ret = -1, errno = 9 OK
test_fstat () at gdb.base/fileio.c:305
305	}
(gdb) PASS: gdb.base/fileio.exp: Fstat an invalid file descriptor returns EBADF
tbreak 314
Breakpoint 22: file gdb.base/fileio.c, line 314.
(gdb) continue
Continuing.
isatty 1: stdin yes OK
test_isatty () at gdb.base/fileio.c:314
314	  printf ("isatty 2: stdout %s\n", isatty (1) ? "yes OK" : "no");
(gdb) PASS: gdb.base/fileio.exp: Isatty (stdin)
tbreak 315
Breakpoint 23: file gdb.base/fileio.c, line 315.
(gdb) continue
Continuing.
isatty 2: stdout yes OK
test_isatty () at gdb.base/fileio.c:315
315	  printf ("isatty 3: stderr %s\n", isatty (2) ? "yes OK" : "no");
(gdb) PASS: gdb.base/fileio.exp: Isatty (stdout)
tbreak 317
Breakpoint 24: file gdb.base/fileio.c, line 317.
(gdb) continue
Continuing.
isatty 3: stderr yes OK
test_isatty () at gdb.base/fileio.c:317
317	  printf ("isatty 4: invalid %s\n", isatty (999) ? "yes" : "no OK");
(gdb) PASS: gdb.base/fileio.exp: Isatty (stderr)
tbreak 319
Breakpoint 25: file gdb.base/fileio.c, line 319.
(gdb) continue
Continuing.
isatty 4: invalid no OK
test_isatty () at gdb.base/fileio.c:319
319	  fd = open (FILENAME, O_RDONLY);
(gdb) PASS: gdb.base/fileio.exp: Isatty (invalid fd)
tbreak 327
Breakpoint 26: file gdb.base/fileio.c, line 327.
(gdb) continue
Continuing.
isatty 5: file no OK
test_isatty () at gdb.base/fileio.c:327
327	}
(gdb) PASS: gdb.base/fileio.exp: Isatty (open file)
set remote system-call-allowed 1
(gdb) tbreak 347
Breakpoint 27: file gdb.base/fileio.c, line 347.
(gdb) continue
Continuing.
system 1: ret = 0 OK
sh: line 1: wrtzlpfrmpft: command not found
test_system () at gdb.base/fileio.c:347
347	  printf ("system 2: ret = %d %s\n", ret, ret == 127 ? "OK" : "");
(gdb) PASS: gdb.base/fileio.exp: System(3) call
tbreak 349
Breakpoint 28: file gdb.base/fileio.c, line 349.
(gdb) continue
Continuing.
system 2: ret = 32512 
test_rename () at gdb.base/fileio.c:352
352	{
(gdb) FAIL: gdb.base/fileio.exp: System with invalid command returns 127
tbreak 378
Breakpoint 29: file gdb.base/fileio.c, line 378.
(gdb) continue
Continuing.
rename 1: ret = 0, errno = 0 OK
test_rename () at gdb.base/fileio.c:378
378	  ret = rename (RENAMED, TESTDIR2);
(gdb) PASS: gdb.base/fileio.exp: Rename a file
tbreak 383
Breakpoint 30: file gdb.base/fileio.c, line 383.
(gdb) continue
Continuing.
rename 2: ret = -1, errno = 21 OK
test_rename () at gdb.base/fileio.c:383
383	  ret = rename (TESTDIR2, TESTDIR1);
(gdb) PASS: gdb.base/fileio.exp: Renaming a file to existing directory returns EISDIR
tbreak 388
Breakpoint 31: file gdb.base/fileio.c, line 388.
(gdb) continue
Continuing.
rename 3: ret = -1, errno = 39 OK
test_rename () at gdb.base/fileio.c:388
388	  ret = rename (TESTDIR1, TESTSUBDIR);
(gdb) PASS: gdb.base/fileio.exp: Renaming a directory to a non-empty directory returns ENOTEMPTY or EEXIST
tbreak 393
Breakpoint 32: file gdb.base/fileio.c, line 393.
(gdb) continue
Continuing.
rename 4: ret = -1, errno = 22 OK
test_rename () at gdb.base/fileio.c:393
393	  ret = rename (NONEXISTANT, FILENAME);
(gdb) PASS: gdb.base/fileio.exp: Renaming a directory to a subdir of itself returns EINVAL
tbreak 397
Breakpoint 33: file gdb.base/fileio.c, line 397.
(gdb) continue
Continuing.
rename 5: ret = -1, errno = 2 OK
test_unlink () at gdb.base/fileio.c:400
400	{
(gdb) FAIL: gdb.base/fileio.exp: Renaming a nonexistant file returns ENOENT
tbreak 412
Breakpoint 34: file gdb.base/fileio.c, line 412.
(gdb) continue
Continuing.
unlink 1: ret = 0, errno = 0 OK
test_unlink () at gdb.base/fileio.c:412
412	  errno = 0;
(gdb) PASS: gdb.base/fileio.exp: Unlink a file
tbreak 432
Breakpoint 35: file gdb.base/fileio.c, line 432.
(gdb) continue
Continuing.
unlink 2: ret = -1, errno = 13 OK
test_unlink () at gdb.base/fileio.c:432
432	  ret = unlink (NONEXISTANT);
(gdb) PASS: gdb.base/fileio.exp: Unlinking a file in a directory w/o write access returns EACCES
tbreak 436
Breakpoint 36: file gdb.base/fileio.c, line 436.
(gdb) continue
Continuing.
unlink 3: ret = -1, errno = 2 OK
test_time () at gdb.base/fileio.c:439
439	{
(gdb) FAIL: gdb.base/fileio.exp: Unlinking a nonexistant file returns ENOENT
tbreak 446
Breakpoint 37: file gdb.base/fileio.c, line 446.
(gdb) continue
Continuing.
time 1: ret = 1055370452, errno = 0, t = 1055370452 OK
test_time () at gdb.base/fileio.c:446
446	  ret = time (NULL);
(gdb) PASS: gdb.base/fileio.exp: Time(2) call returns the same value as in parameter
tbreak 450
Breakpoint 38: file gdb.base/fileio.c, line 450.
(gdb) continue
Continuing.
time 2: ret = 1055370454, errno = 0, t = 1055370452 OK

Program exited normally.
(gdb) FAIL: gdb.base/fileio.exp: Time(2) returns feasible values
testcase ./gdb.base/fileio.exp completed in 4 seconds

		=== gdb Summary ===

# of expected passes		31
# of unexpected failures	5
Executing on host: /gdb/mirror/src/gdb/testsuite/../../gdb/gdb -nw --command gdb_cmd    (timeout = 300)
spawn /gdb/mirror/src/gdb/testsuite/../../gdb/gdb -nw --command gdb_cmd 
GNU gdb 2003-06-11-cvs
Copyright 2003 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or distribute copies of it under certain conditions.
Type "show copying" to see the conditions.
There is absolutely no warranty for GDB.  Type "show warranty" for details.
This GDB was configured as "i686-pc-linux-gnu".
/gdb/mirror/src/gdb/testsuite/../../gdb/gdb version  2003-06-11-cvs -nx

runtest completed at Wed Jun 11 15:27:34 2003