ld/testsuite/ld-scripts/rgn-over.exp

   1 # Test for proper diagnosis of overflowed memory regions.
   2 # Copyright (C) 2007-2021 Free Software Foundation, Inc.
   3 #
   4 # This file is part of the GNU Binutils.
   5 #
   6 # This program is free software; you can redistribute it and/or modify
   7 # it under the terms of the GNU General Public License as published by
   8 # the Free Software Foundation; either version 3 of the License, or
   9 # (at your option) any later version.
  10 #
  11 # This program is distributed in the hope that it will be useful,
  12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 # GNU General Public License for more details.
  15 #
  16 # You should have received a copy of the GNU General Public License
  17 # along with this program; if not, write to the Free Software
  18 # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  19 # MA 02110-1301, USA.
  20
  21 if ![is_elf_format] {
  22     return
  23 }
  24
  25 set old_ldflags $LDFLAGS
  26 if { [istarget spu*-*-*] } {
  27     set LDFLAGS "$LDFLAGS --no-overlays"
  28 }
  29
  30 set test_list [lsort [glob -nocomplain $srcdir/$subdir/rgn-over*.d]]
  31 foreach test_file $test_list {
  32     set test_name [file rootname $test_file]
  33     set map_file "tmpdir/[file tail $test_name].map"
  34     verbose $test_name
  35     run_dump_test $test_name
  36
  37     if { ! [regexp ".*-ok.d" $test_file] } {
  38         set testname "[file tail $test_name] (map check)"
  39         if [file exists $map_file] {
  40             # compare the map file to the expectations in the .d file
  41             # (run_dump_test can't do that).
  42             if [regexp_diff $map_file $test_file] {
  43                 fail $testname
  44             } else {
  45                 pass $testname
  46             }
  47         } else {
  48             untested $testname
  49         }
  50     }
  51 }
  52 set LDFLAGS $old_ldflags