gas/testsuite/gas/i386/i386.exp

   1 #
   2 # i386 tests
   3 #
   4 proc run_list_test { name opts } {
   5     global srcdir subdir
   6     set testname "i386 $name"
   7     set file $srcdir/$subdir/$name
   8     gas_run ${name}.s $opts ">&dump.out"
   9     if { [regexp_diff "dump.out" "${file}.l"] } then {
  10         fail $testname
  11         verbose "output is [file_contents "dump.out"]" 2
  12         return
  13     }
  14     pass $testname
  15 }
  16
  17 proc gas_64_check { } {
  18     global NM
  19     global NMFLAGS
  20     global srcdir
  21
  22     catch "exec $srcdir/lib/run $NM $NMFLAGS --help" nm_help
  23     return [regexp "targets:.*x86-64" $nm_help]
  24 }
  25
  26 proc gas_32_check { } {
  27     global NM
  28     global NMFLAGS
  29     global srcdir
  30
  31     catch "exec $srcdir/lib/run $NM $NMFLAGS --help" nm_help
  32     return [regexp "targets:.*i386" $nm_help]
  33 }
  34
  35
  36 if [expr ([istarget "i*86-*-*"] ||  [istarget "x86_64-*-*"]) && [gas_32_check]]  then {
  37
  38     global ASFLAGS
  39     set old_ASFLAGS "$ASFLAGS"
  40     set ASFLAGS "$ASFLAGS --32"
  41
  42     run_list_test "float" "-al"
  43     run_list_test "general" "-al --listing-lhs-width=2"
  44     run_list_test "inval" "-al"
  45     run_list_test "segment" "-al"
  46     run_list_test "inval-seg" "-al"
  47     run_list_test "modrm" "-al --listing-lhs-width=2"
  48     run_dump_test "naked"
  49     run_dump_test "opcode"
  50     run_dump_test "intel"
  51     run_dump_test "intel16"
  52     run_list_test "intelbad" ""
  53     run_dump_test "intelok"
  54     run_dump_test "prefix"
  55     run_dump_test "amd"
  56     run_dump_test "katmai"
  57     run_dump_test "jump"
  58     run_dump_test "ssemmx2"
  59     run_dump_test "sse2"
  60     run_dump_test "sub"
  61     run_dump_test "prescott"
  62     run_dump_test "sib"
  63
  64     if {![istarget "*-*-aix*"]
  65         && (![is_elf_format] || [istarget "*-*-linux*"]
  66             || [istarget "*-*-netbsd*"]
  67             || [istarget "*-*-freebsd*"]
  68             || [istarget "*-*-netware*"]
  69             || [istarget "*-*-vxworks*"])} {
  70         # Don't run this test on targets where '/' starts comments.
  71         run_dump_test "divide"
  72     }
  73
  74     run_dump_test "padlock"
  75     run_dump_test "crx"
  76     run_list_test "cr-err" ""
  77
  78     # These tests require support for 8 and 16 bit relocs,
  79     # so we only run them for ELF and COFF targets.
  80     if {[is_elf_format] || [istarget "*-*-coff*"]} then {
  81         run_dump_test "reloc"
  82         run_dump_test "jump16"
  83         run_list_test "white" "-al --listing-lhs-width=3"
  84
  85         # These tests should in theory work for PE targets as well,
  86         # but the relocs we currently produce are slightly different
  87         # from those produced for ELF/COFF based toolchains.
  88         # So for now we ignore PE targets.
  89         run_dump_test "pcrel"
  90         run_dump_test "absrel"
  91     }
  92
  93     # ELF specific tests
  94     if [is_elf_format] then {
  95         # PIC is only supported on ELF targets.
  96         run_dump_test "intelpic"
  97
  98         run_dump_test "relax"
  99         run_dump_test "gotpc"
 100         run_dump_test "tlsd"
 101         run_dump_test "tlspic"
 102         run_dump_test "tlsnopic"
 103         run_dump_test "bss"
 104     }
 105
 106     # This is a PE specific test.
 107     if { [istarget "*-*-cygwin*"] || [istarget "*-*-pe"]
 108          || [istarget "*-*-mingw*"]
 109     } then {
 110         run_dump_test "secrel"
 111     }
 112
 113     set ASFLAGS "$old_ASFLAGS"
 114 }
 115
 116 if [expr ([istarget "i*86-*-*"] || [istarget "x86_64-*-*"]) && [gas_64_check]] then {
 117
 118     global ASFLAGS
 119     set old_ASFLAGS "$ASFLAGS"
 120     set ASFLAGS "$ASFLAGS --64"
 121
 122     run_dump_test "x86_64"
 123     run_dump_test "x86-64-addr32"
 124     run_dump_test "x86-64-opcode"
 125     run_dump_test "x86-64-pcrel"
 126     run_dump_test "x86-64-rip"
 127     run_list_test "x86-64-inval" "-al"
 128     run_list_test "x86-64-segment" "-al"
 129     run_list_test "x86-64-inval-seg" "-al"
 130
 131     # For ELF targets verify that @unwind works.
 132     if { ([istarget "*-*-elf*"] || [istarget "*-*-linux*"]
 133           || [istarget "*-*-solaris2.*"])
 134          && ![istarget *-*-linux*aout*]
 135          && ![istarget *-*-linux*oldld*] } then {
 136         run_dump_test "x86-64-unwind"
 137     }
 138
 139     set ASFLAGS "$old_ASFLAGS"
 140 }