1 # Copyright 2016-2024 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 16 # Test passing bad files to gdb. PR symtab/17911 17 18 # Note: While we test for specific text in error messages, 19 # thus perhaps making the test host specific, if your host 20 # print different text then the plan is to update the expected text 21 # instead of making this test linux-only or some such. 22 23 # The pathnames and shell commands in this test don't work on Windows host. 24 require {!ishost *-*-mingw*} 25 26 # There is no such file, but we still use the normal mechanism to pick 27 # its name and path. 28 standard_testfile 29 30 gdb_exit 31 gdb_start 32 33 set test "non-existent file" 34 set bad_file $testfile 35 remote_file host delete $bad_file 36 gdb_test_multiple "file $bad_file" "$test" { 37 -re "No such file or directory.\[\r\n\]+$gdb_prompt $" { 38 pass $test 39 } 40 } 41 42 set test "directory" 43 set bad_file [standard_output_file {}] 44 remote_exec host "mkdir -p $bad_file" 45 gdb_test_multiple "file $bad_file" "$test" { 46 -re "Is a directory.\[\r\n\]+$gdb_prompt $" { 47 pass $test 48 } 49 } 50 51 set test "neither file nor directory" 52 set bad_file "/dev/null" 53 gdb_test_multiple "file $bad_file" "$test" { 54 -re "Invalid argument.\[\r\n\]+$gdb_prompt $" { 55 pass $test 56 } 57 } 58