ld/testsuite/ld-checks/checks.exp

   1 # Expect script for LD section checks tests
   2 #   Copyright (C) 1999 Free Software Foundation
   3 #
   4 # This file is free software; you can redistribute it and/or modify
   5 # it under the terms of the GNU General Public License as published by
   6 # the Free Software Foundation; either version 2 of the License, or
   7 # (at your option) any later version.
   8 #
   9 # This program is distributed in the hope that it will be useful,
  10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 # GNU General Public License for more details.
  13 #
  14 # You should have received a copy of the GNU General Public License
  15 # along with this program; if not, write to the Free Software
  16 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  17 #
  18 # Written by Nick Clifton ([email protected])
  19
  20 proc section_check {} {
  21     global ld_flags
  22     global as
  23     global ld
  24     global srcdir
  25     global subdir
  26
  27     set test "check sections"
  28
  29     set ldflags "--check-sections"
  30
  31     if { ![ld_assemble $as $srcdir/$subdir/asm.s tmpdir/asm.o]} {
  32         unresolved $test
  33         return
  34     }
  35
  36     if ![ld_simple_link $ld tmpdir/asm.x "$ldflags tmpdir/asm.o"] {
  37         fail "$test : using default linker script"
  38     } else {
  39         pass $test
  40     }
  41
  42     # Change the linker flags so that our "buggy" linker
  43     # script is used.
  44     set ldflags "--check-sections -T $srcdir/$subdir/script -e foo"
  45
  46     # Perform the equivalent of invoking ld_simple_link
  47     # except that we need to massage the output futher.
  48
  49     catch "exec $ld -o tmpdir/asm.x $ldflags tmpdir/asm.o" exec_output
  50     set exec_output [prune_warnings $exec_output]
  51
  52     # Make sure that we got some output from the linker
  53     if [string match "" $exec_output] then {
  54         fail "$test - error message expected but not found"
  55     }
  56
  57     # Now remove our expected error message
  58     regsub -all ".*: section .data .* overlaps section .text .*" $exec_output "" exec_output
  59
  60     # And check to see if anything else, (unexpected) was left
  61     if [string match "" $exec_output] then {
  62         pass $test
  63     } else {
  64         verbose -log "Unexpected linker message(s): $exec_output"
  65
  66         fail "$test - using erroneous linker script"
  67     }
  68 }
  69
  70 section_check
  71
  72