tests/compiletest.rs

   1 #![feature(slice_concat_ext)]
   2
   3 extern crate compiletest_rs as compiletest;
   4 extern crate colored;
   5
   6 use colored::*;
   7
   8 use std::slice::SliceConcatExt;
   9 use std::path::{PathBuf, Path};
  10 use std::io::Write;
  11
  12 macro_rules! eprintln {
  13     ($($arg:tt)*) => {
  14         let stderr = std::io::stderr();
  15         writeln!(stderr.lock(), $($arg)*).unwrap();
  16     }
  17 }
  18
  19 fn miri_path() -> PathBuf {
  20     if rustc_test_suite().is_some() {
  21         PathBuf::from(option_env!("MIRI_PATH").unwrap())
  22     } else {
  23         PathBuf::from(concat!("target/", env!("PROFILE"), "/miri"))
  24     }
  25 }
  26
  27 fn rustc_test_suite() -> Option<PathBuf> {
  28     option_env!("RUSTC_TEST_SUITE").map(PathBuf::from)
  29 }
  30
  31 fn rustc_lib_path() -> PathBuf {
  32     option_env!("RUSTC_LIB_PATH").unwrap().into()
  33 }
  34
  35 fn have_fullmir() -> bool {
  36     // We assume we have full MIR when MIRI_SYSROOT is set or when we are in rustc
  37     std::env::var("MIRI_SYSROOT").is_ok() || rustc_test_suite().is_some()
  38 }
  39
  40 fn compile_fail(sysroot: &Path, path: &str, target: &str, host: &str, need_fullmir: bool) {
  41     if need_fullmir && !have_fullmir() {
  42         eprintln!("{}", format!(
  43             "## Skipping compile-fail tests in {} against miri for target {} due to missing mir",
  44             path,
  45             target
  46         ).yellow().bold());
  47         return;
  48     }
  49
  50     eprintln!("{}", format!(
  51         "## Running compile-fail tests in {} against miri for target {}",
  52         path,
  53         target
  54     ).green().bold());
  55     let mut config = compiletest::Config::default().tempdir();
  56     config.mode = "compile-fail".parse().expect("Invalid mode");
  57     config.rustc_path = miri_path();
  58     let mut flags = Vec::new();
  59     if rustc_test_suite().is_some() {
  60         config.run_lib_path = rustc_lib_path();
  61         config.compile_lib_path = rustc_lib_path();
  62     }
  63     flags.push(format!("--sysroot {}", sysroot.display()));
  64     flags.push("-Dwarnings -Dunused".to_owned()); // overwrite the -Aunused in compiletest-rs
  65     config.src_base = PathBuf::from(path.to_string());
  66     flags.push("-Zmir-opt-level=0".to_owned()); // optimization circumvents some stacked borrow checks
  67     flags.push("-Zmir-emit-validate=1".to_owned());
  68     config.target_rustcflags = Some(flags.join(" "));
  69     config.target = target.to_owned();
  70     config.host = host.to_owned();
  71     compiletest::run_tests(&config);
  72 }
  73
  74 fn miri_pass(sysroot: &Path, path: &str, target: &str, host: &str, need_fullmir: bool, opt: bool) {
  75     if need_fullmir && !have_fullmir() {
  76         eprintln!("{}", format!(
  77             "## Skipping run-pass tests in {} against miri for target {} due to missing mir",
  78             path,
  79             target
  80         ).yellow().bold());
  81         return;
  82     }
  83
  84     let opt_str = if opt { " with optimizations" } else { "" };
  85     eprintln!("{}", format!(
  86         "## Running run-pass tests in {} against miri for target {}{}",
  87         path,
  88         target,
  89         opt_str
  90     ).green().bold());
  91     let mut config = compiletest::Config::default().tempdir();
  92     config.mode = "ui".parse().expect("Invalid mode");
  93     config.src_base = PathBuf::from(path);
  94     config.target = target.to_owned();
  95     config.host = host.to_owned();
  96     config.rustc_path = miri_path();
  97     if rustc_test_suite().is_some() {
  98         config.run_lib_path = rustc_lib_path();
  99         config.compile_lib_path = rustc_lib_path();
 100     }
 101     let mut flags = Vec::new();
 102     flags.push(format!("--sysroot {}", sysroot.display()));
 103     flags.push("-Dwarnings -Dunused".to_owned()); // overwrite the -Aunused in compiletest-rs
 104     if opt {
 105         flags.push("-Zmir-opt-level=3".to_owned());
 106     } else {
 107         flags.push("-Zmir-opt-level=0".to_owned());
 108         // For now, only validate without optimizations.  Inlining breaks validation.
 109         flags.push("-Zmir-emit-validate=1".to_owned());
 110     }
 111     config.target_rustcflags = Some(flags.join(" "));
 112     compiletest::run_tests(&config);
 113 }
 114
 115 fn is_target_dir<P: Into<PathBuf>>(path: P) -> bool {
 116     let mut path = path.into();
 117     path.push("lib");
 118     path.metadata().map(|m| m.is_dir()).unwrap_or(false)
 119 }
 120
 121 fn for_all_targets<F: FnMut(String)>(sysroot: &Path, mut f: F) {
 122     let target_dir = sysroot.join("lib").join("rustlib");
 123     for entry in std::fs::read_dir(target_dir).expect("invalid sysroot") {
 124         let entry = entry.unwrap();
 125         if !is_target_dir(entry.path()) {
 126             continue;
 127         }
 128         let target = entry.file_name().into_string().unwrap();
 129         f(target);
 130     }
 131 }
 132
 133 fn get_sysroot() -> PathBuf {
 134     let sysroot = std::env::var("MIRI_SYSROOT").unwrap_or_else(|_| {
 135         let sysroot = std::process::Command::new("rustc")
 136             .arg("--print")
 137             .arg("sysroot")
 138             .output()
 139             .expect("rustc not found")
 140             .stdout;
 141         String::from_utf8(sysroot).expect("sysroot is not utf8")
 142     });
 143     PathBuf::from(sysroot.trim())
 144 }
 145
 146 fn get_host() -> String {
 147     let rustc = rustc_test_suite().unwrap_or(PathBuf::from("rustc"));
 148     println!("using rustc at {}", rustc.display());
 149     let host = std::process::Command::new(rustc)
 150         .arg("-vV")
 151         .output()
 152         .expect("rustc not found for -vV")
 153         .stdout;
 154     let host = std::str::from_utf8(&host).expect("sysroot is not utf8");
 155     let host = host.split("\nhost: ").nth(1).expect(
 156         "no host: part in rustc -vV",
 157     );
 158     let host = host.split('\n').next().expect("no \n after host");
 159     String::from(host)
 160 }
 161
 162 fn run_pass_miri(opt: bool) {
 163     let sysroot = get_sysroot();
 164     let host = get_host();
 165
 166     for_all_targets(&sysroot, |target| {
 167         miri_pass(&sysroot, "tests/run-pass", &target, &host, false, opt);
 168     });
 169     miri_pass(&sysroot, "tests/run-pass-fullmir", &host, &host, true, opt);
 170 }
 171
 172 fn compile_fail_miri() {
 173     let sysroot = get_sysroot();
 174     let host = get_host();
 175
 176     // FIXME: run tests for other targets, too
 177     compile_fail(&sysroot, "tests/compile-fail", &host, &host, false);
 178     compile_fail(&sysroot, "tests/compile-fail-fullmir", &host, &host, true);
 179 }
 180
 181 #[test]
 182 fn test() {
 183     // We put everything into a single test to avoid the parallelism `cargo test`
 184     // introduces.  We still get parallelism within our tests because `compiletest`
 185     // uses `libtest` which runs jobs in parallel.
 186
 187     run_pass_miri(false);
 188     run_pass_miri(true);
 189
 190     compile_fail_miri();
 191 }