include/elf/
[deliverable/binutils-gdb.git] / gas / testsuite / gas / mips / mips.exp
index af057e9dc0f315c4347118ede94cd2d6452990c7..16edfb73a9bab35a91413e3195c35025ce06e9cd 100644 (file)
@@ -254,7 +254,7 @@ proc mips_arch_list_matching {args} {
        # properties actually are.
        if { [string compare $arch default] == 0
             && [string length [mips_arch_properties default]] == 0} {
-           continue;
+           continue
        }
        if { [mips_arch_matches $arch $args] } {
            lappend l $arch
@@ -292,27 +292,6 @@ proc run_dump_test_arches { name arch_list } {
     }
 }
 
-# run_list_test NAME OPTS (optional): TESTNAME
-#
-# Assemble the file "NAME.d" and compare the assembler standard error
-# output against the regular expressions given in the file "NAME.l".
-# The assembler is passed the flags given in OPTS.  If TESTNAME is
-# provided, it will be used as the name of the test.
-proc run_list_test { name opts {testname {}} } {
-    global srcdir subdir
-    if { [string length $testname] == 0 } then {
-           set testname "MIPS $name"
-    }
-    set file $srcdir/$subdir/$name
-    gas_run ${name}.s $opts ">&dump.out"
-    if { [regexp_diff "dump.out" "${file}.l"] } then {
-       fail $testname
-       verbose "output is [file_contents "dump.out"]" 2
-       return
-    }
-    pass $testname
-}
-
 # run_list_test_arch NAME OPTS ARCH
 #
 # Invoke "run_list_test" for test NAME with options OPTS, with extra
@@ -382,13 +361,20 @@ mips_arch_create vr5400   64      mips4   { ror } \
 mips_arch_create sb1   64      mips64  { mips3d } \
                        { -march=sb1 -mtune=sb1 } { -mmips:sb1 } \
                        { mipsisa64sb1-*-* mipsisa64sb1el-*-* }
-
+mips_arch_create octeon 64     mips64r2 {} \
+                       { -march=octeon -mtune=octeon } { -mmips:octeon } \
+                       { mips64octeon*-*-* }
 
 #
-# And now begin the actual tests!
+# And now begin the actual tests!  VxWorks uses RELA rather than REL
+# relocations, so most of the generic dump tests will not work there.
 #
-
-if { [istarget mips*-*-*] } then {
+if { [istarget mips*-*-vxworks*] } {
+    run_dump_test "vxworks1"
+    run_dump_test "vxworks1-xgot"
+    run_dump_test "vxworks1-el"
+    run_dump_test "vxworks1-xgot-el"
+} elseif { [istarget mips*-*-*] } {
     set no_mips16 0
     set elf [expr [istarget *-*-elf*] || [istarget *-*-irix5*] || [istarget *-*-irix6* ] || [istarget *-*-linux*] || [istarget *-*-netbsd*] ]
     set ecoff [expr [istarget *-*-ecoff*] || [istarget *-*-ultrix*] || [istarget *-*-irix\[1-4\]*] ]
@@ -398,7 +384,7 @@ if { [istarget mips*-*-*] } then {
     set addr32 [expr [istarget mipstx39*-*-*] || [istarget mips-*-linux*] || [istarget mipsel-*-linux*]]
     set has_newabi [expr [istarget *-*-irix6*] || [istarget mips64*-*-linux*]]
 
-    if { [istarget "mips*-*-*linux*"] } then {
+    if { [istarget "mips*-*-*linux*"] || [istarget "mips*-sde-elf*"] } then {
        set tmips "t"
     } else {
        set tmips ""
@@ -427,8 +413,12 @@ if { [istarget mips*-*-*] } then {
     run_dump_test_arches "blt"         [mips_arch_list_matching mips2]
     run_dump_test_arches "bltu"                [mips_arch_list_matching mips2]
     run_dump_test_arches "branch-misc-1" [mips_arch_list_matching mips1]
-    run_list_test_arches "branch-misc-2" "-32 -non_shared" [mips_arch_list_matching mips1]
-    run_list_test_arches "branch-misc-2pic" "-32 -call_shared" [mips_arch_list_matching mips1]
+    run_dump_test_arches "branch-misc-2" [mips_arch_list_matching mips1]
+    run_dump_test_arches "branch-misc-2pic" [mips_arch_list_matching mips1]
+    run_dump_test_arches "branch-misc-2-64" [mips_arch_list_matching mips3]
+    run_dump_test_arches "branch-misc-2pic-64" [mips_arch_list_matching mips3]
+    run_dump_test "branch-misc-3"
+    run_dump_test "branch-swap"
 
     if $ilocks {
        run_dump_test "div-ilocks"
@@ -445,24 +435,11 @@ if { [istarget mips*-*-*] } then {
     }
     if $elf { run_dump_test "jal-svr4pic" }
     if $elf { run_dump_test "jal-xgot" }
-    # LOSE: As of 2002-02-08, the jal-empic test fails for target mips-ecoff.
-    # It appears that it broke between 2000-03-11 00:00UTC and
-    # 2000-03-12 00:00 UTC.
-    if $ecoff { run_dump_test "jal-empic" }
-    if $elf {
-       run_dump_test_arches "jal-empic-elf" [mips_arch_list_matching mips1]
-       run_dump_test_arches "jal-empic-elf-2" [mips_arch_list_matching mips1]
-       run_dump_test_arches "jal-empic-elf-3" [mips_arch_list_matching mips1]
-    }
     run_list_test_arches "jal-range" "-32" [mips_arch_list_matching mips1]
     if $has_newabi { run_dump_test "jal-newabi" }
     if !$aout { run_dump_test "la" }
     if $elf { run_dump_test "la-svr4pic" }
     if $elf { run_dump_test "la-xgot" }
-    # LOSE: As of 2002-02-08, the la-empic test fails for target mips-ecoff.
-    # Not sure when it first cropped up, but may be related to addition of
-    # "la" -> "addiu" pattern in MIPS opcode table long ago.
-    if $ecoff { run_dump_test "la-empic" }
     if $elf { run_dump_test "lca-svr4pic" }
     if $elf { run_dump_test "lca-xgot" }
     if !$aout {
@@ -471,7 +448,8 @@ if { [istarget mips*-*-*] } then {
        run_dump_test_arches "lb"       [mips_arch_list_matching !mips2]
     }
     if $elf {
-       run_dump_test_arches "lb-svr4pic" [mips_arch_list_matching mips1]
+       run_dump_test_arches "lb-svr4pic" [mips_arch_list_matching !gpr_ilocks]
+       run_dump_test_arches "lb-svr4pic-ilocks" [mips_arch_list_matching gpr_ilocks]
     }
     if $elf {
        # Both versions specify the cpu, so we can run both regardless of
@@ -479,7 +457,6 @@ if { [istarget mips*-*-*] } then {
        run_dump_test "lb-xgot"
        run_dump_test "lb-xgot-ilocks"
     }
-    if $ecoff { run_dump_test "lb-empic" }
     if !$aout {
         if !$gpr_ilocks {
             run_dump_test "ld"
@@ -493,16 +470,14 @@ if { [istarget mips*-*-*] } then {
     }
     if $elf { run_dump_test "ld-svr4pic" }
     if $elf { run_dump_test "ld-xgot" }
-    if $ecoff { run_dump_test "ld-empic" }
     run_dump_test_arches "li"          [mips_arch_list_matching mips1]
     if !$aout { run_dump_test "lifloat" }
     if $elf { run_dump_test "lif-svr4pic" }
     if $elf { run_dump_test "lif-xgot" }
-    # LOSE: As of 2002-02-08, the lif-empic test fails for target mips-ecoff.
-    # It appears that it broke between 2000-03-11 00:00UTC and
-    # 2000-03-12 00:00 UTC.
-    if $ecoff { run_dump_test "lif-empic" }
     run_dump_test_arches "mips4"       [mips_arch_list_matching mips4]
+    run_dump_test_arches "mips4-fp"    [mips_arch_list_matching mips4]
+    run_list_test_arches "mips4-fp" "-32 -msoft-float" \
+                                       [mips_arch_list_matching mips4]
     run_dump_test_arches "mips5"       [mips_arch_list_matching mips5]
     if $ilocks {
        run_dump_test "mul-ilocks"
@@ -523,7 +498,6 @@ if { [istarget mips*-*-*] } then {
     run_dump_test_arches "ulh2-el"     [mips_arch_list_matching mips1]
     if $elf { run_dump_test "ulh-svr4pic" }
     if $elf { run_dump_test "ulh-xgot" }
-    if $ecoff { run_dump_test "ulh-empic" }
     if !$aout {
        run_dump_test "ulw"
        run_dump_test "uld"
@@ -544,9 +518,17 @@ if { [istarget mips*-*-*] } then {
     if { $elf && !$no_mips16 } {
        run_dump_test "mips16"
        run_dump_test "mips16-64"
+       # Check MIPS16e extensions
+       run_dump_test_arches "mips16e"  [mips_arch_list_matching mips32]
        # Check jalx handling
        run_dump_test "mips16-jalx"
        run_dump_test "mips-jalx"
+       # Check MIPS16 HI16/LO16 relocations
+       run_dump_test "mips16-hilo"
+       if $has_newabi {
+           run_dump_test "mips16-hilo-n32"
+       }
+       run_dump_test "mips16-hilo-match"
     }
     run_list_test "mips-no-jalx" "-32"
     run_dump_test "delay"
@@ -556,7 +538,8 @@ if { [istarget mips*-*-*] } then {
     run_dump_test "mips4100"
     run_dump_test "vr4111"
     run_dump_test "vr4120"
-    run_dump_test "vr4122"
+    run_dump_test "vr4120-2"
+    run_dump_test "vr4130"
     run_dump_test "vr5400"
     run_dump_test "vr5500"
     run_dump_test "rm7000"
@@ -566,13 +549,29 @@ if { [istarget mips*-*-*] } then {
 
     run_dump_test_arches "mips32"      [mips_arch_list_matching mips32]
 
+    run_dump_test_arches "mips32-sf32" [mips_arch_list_matching mips32]
+    run_list_test_arches "mips32-sf32" "-32 -msoft-float" \
+                                       [mips_arch_list_matching mips32]
+    run_dump_test_arches "mips32-cp2"  [mips_arch_list_matching mips32 \
+                                           !octeon]
+
     run_dump_test_arches "mips32r2"    [mips_arch_list_matching mips32r2]
+    run_dump_test_arches "mips32r2-cp2"        [mips_arch_list_matching mips32r2 \
+                                           !octeon]
+    run_dump_test_arches "mips32r2-fp32" \
+                                       [mips_arch_list_matching mips32r2]
+    run_list_test_arches "mips32r2-fp32" "-32 -msoft-float" \
+                                       [mips_arch_list_matching mips32r2]
     run_list_test_arches "mips32r2-ill" "-32" \
-                        [mips_arch_list_matching mips32r2 gpr32]
+                       [mips_arch_list_matching mips32r2 gpr32]
     run_list_test_arches "mips32r2-ill-fp64" "-mabi=o64" \
-                        [mips_arch_list_matching mips32r2 gpr64]
+                       [mips_arch_list_matching mips32r2 gpr64]
+    run_list_test_arches "mips32r2-ill-nofp" "-32 -msoft-float" \
+                       [mips_arch_list_matching mips32r2]
 
     run_dump_test_arches "mips64"      [mips_arch_list_matching mips64]
+    run_dump_test_arches "mips64-cp2"  [mips_arch_list_matching mips64 \
+                                           !octeon]
 
     run_dump_test_arches "mips64r2"    [mips_arch_list_matching mips64r2]
     run_list_test_arches "mips64r2-ill" "" [mips_arch_list_matching mips64r2]
@@ -595,6 +594,7 @@ if { [istarget mips*-*-*] } then {
 
     run_list_test "illegal" "-32"
     run_list_test "baddata1" "-32"
+    run_list_test "jalr" ""
 
     # LOSE: As of 2002-02-08, the next 4 tests fail for target mips-ecoff.
     # It's unknown whether they _should_ pass as-is, or whether different
@@ -640,20 +640,17 @@ if { [istarget mips*-*-*] } then {
        run_dump_test "mips-abi32-pic2"
 
        run_dump_test "elf${el}-rel"
-       if {[istarget mips64*-*-*] || [istarget mipsisa32*-*-*]
-           || [istarget mipsisa64*-*-*]} { 
-           run_dump_test "elf${el}-rel2"
-       } else {
-           run_dump_test "e32${el}-rel2"
-       }
+       run_dump_test_arches "elf${el}-rel2" [mips_arch_list_matching gpr64]
+       run_dump_test "e32${el}-rel2"
        run_dump_test "elf${el}-rel3"
-       if {[istarget mips64*-*-*]} {
-           run_dump_test "elf-rel4"
-       } else {
-           run_dump_test "e32-rel4"
-       }
+       run_dump_test_arches "elf-rel4" [mips_arch_list_matching gpr64]
+       run_dump_test "e32-rel4"
        run_dump_test "elf-rel5"
        run_dump_test "elf-rel6"
+       if $has_newabi {
+           run_dump_test "elf-rel6-n32"
+           run_dump_test "elf-rel6-n64"
+       }
        run_dump_test "elf-rel7"
        run_dump_test "elf-rel8"
        run_dump_test "elf-rel9"
@@ -678,18 +675,30 @@ if { [istarget mips*-*-*] } then {
        if $has_newabi {
            run_dump_test "elf-rel18"
        }
+       run_dump_test "elf-rel19"
+       run_dump_test "elf-rel20"
+       if $has_newabi {
+           run_dump_test "elf-rel21"
+           run_dump_test "elf-rel22"
+           run_dump_test "elf-rel23"
+           run_dump_test "elf-rel23a"
+           run_dump_test "elf-rel23b"
+           run_dump_test "elf-rel24"
+       }
+
+       run_dump_test "elf-rel25"
+       run_dump_test "elf-rel25a"
+       run_dump_test "elf-rel26"
 
-       run_dump_test "${tmips}${el}empic"
-       run_dump_test "empic2"
-       run_dump_test "empic3_e"
-       run_dump_test "empic3_g1"
-       run_dump_test "empic3_g2"
        if { !$no_mips16 } {
            run_dump_test "${tmips}mips${el}16-e"
            run_dump_test "${tmips}mips${el}16-f"
        }
        run_dump_test "elf-consthilo"
        run_dump_test "expr1"
+
+       run_list_test "tls-ill" "-32"
+       run_dump_test "tls-o32"
     }
 
     if $has_newabi {
@@ -709,6 +718,11 @@ if { [istarget mips*-*-*] } then {
     run_dump_test "fpr-names-64"
 
     run_dump_test "cp0-names-numeric"
+    run_dump_test "cp0-names-r3000"
+    run_dump_test "cp0-names-r4000" \
+                 { { {name} {(r4000)} } { {objdump} {-M cp0-names=r4000} } }
+    run_dump_test "cp0-names-r4000" \
+                 { { {name} {(r4400)} } { {objdump} {-M cp0-names=r4400} } }
     run_dump_test "cp0-names-mips32"
     run_dump_test "cp0-names-mips32r2"
     run_dump_test "cp0-names-mips64"
@@ -727,11 +741,92 @@ if { [istarget mips*-*-*] } then {
     run_dump_test "hwr-names-mips64r2"
 
     run_dump_test "ldstla-32"
+    run_dump_test "ldstla-32-mips3"
     run_dump_test "ldstla-32-shared"
+    run_dump_test "ldstla-32-mips3-shared"
+    run_list_test "ldstla-32-1" "-mabi=32" \
+       "MIPS ld-st-la bad constants (ABI o32)"
+    run_list_test "ldstla-32-mips3-1" "-mabi=32" \
+       "MIPS ld-st-la bad constants (ABI o32, mips3)"
+    run_list_test "ldstla-32-1" "-KPIC -mabi=32" \
+       "MIPS ld-st-la bad constants (ABI o32, shared)"
+    run_list_test "ldstla-32-mips3-1" "-KPIC -mabi=32" \
+       "MIPS ld-st-la bad constants (ABI o32, mips3, shared)"
+    run_dump_test "ldstla-eabi64"
     if $has_newabi {
-       run_dump_test "ldstla-n32"
-       run_dump_test "ldstla-n32-shared"
        run_dump_test "ldstla-n64"
        run_dump_test "ldstla-n64-shared"
+       run_dump_test "ldstla-n64-sym32"
+    }
+
+    run_dump_test "macro-warn-1"
+    run_dump_test "macro-warn-2"
+    run_dump_test "macro-warn-3"
+    run_dump_test "macro-warn-4"
+    if $has_newabi {
+       run_dump_test "macro-warn-1-n32"
+       run_dump_test "macro-warn-2-n32"
+    }
+
+    run_dump_test "noat-1"
+    run_list_test "noat-2" ""
+    run_list_test "noat-3" ""
+    run_list_test "noat-4" ""
+    run_list_test "noat-5" ""
+    run_list_test "noat-6" ""
+    run_list_test "noat-7" ""
+
+    run_dump_test "at-1"
+    run_list_test "at-2" "-32 -mips1" "MIPS at-2"
+
+    run_dump_test "loongson-2e"
+    run_dump_test "loongson-2f"
+
+    run_dump_test_arches "octeon"      [mips_arch_list_matching octeon]
+    run_list_test_arches "octeon-ill" "" \
+                                       [mips_arch_list_matching octeon]
+
+    run_dump_test "smartmips"
+    run_dump_test "mips32-dsp"
+    run_dump_test "mips32-dspr2"
+    run_dump_test "mips64-dsp"
+    run_dump_test "mips32-mt"
+
+    if { $elf && !$no_mips16 } {
+       run_dump_test "mips16-dwarf2"
+       if $has_newabi {
+           run_dump_test "mips16-dwarf2-n32"
+       }
+    }
+    if { !$no_mips16 } { 
+        run_dump_test "mips16e-jrc"
+        run_dump_test "mips16e-save"
+        run_dump_test "mips16e-64"
+        run_list_test "mips16e-64" "-march=mips32 -32"
+        run_dump_test "mips16-intermix"
     }
+    run_dump_test "vxworks1"
+    run_dump_test "vxworks1-xgot"
+    run_dump_test "vxworks1-el"
+    run_dump_test "vxworks1-xgot-el"
+
+    run_dump_test "noreorder"
+    run_dump_test "align"
+    run_dump_test "align2"
+    run_dump_test "align2-el"
+    run_dump_test "odd-float"
+
+    run_list_test_arches "mips-macro-ill-sfp" "-32 -msingle-float" \
+                                       [mips_arch_list_matching mips2]
+    run_list_test_arches "mips-macro-ill-nofp" "-32 -msoft-float" \
+                                       [mips_arch_list_matching mips2]
+
+    run_list_test_arches "mips-hard-float-flag" \
+       "-32 -msoft-float -mhard-float" \
+                                       [mips_arch_list_matching mips1]
+    run_list_test_arches "mips-double-float-flag" \
+       "-32 -msingle-float -mdouble-float" \
+                                       [mips_arch_list_matching mips1]
+
+    run_dump_test "mips16-vis-1"
 }
This page took 0.027806 seconds and 4 git commands to generate.