626ad484fe
Later changes on this branch adapt the rest of rustc::middle::trans to use this module instead of scattered hard-coded knowledge of representations; a few of them also have improvements or cleanup for adt.rs (and many added comments) that weren't drastic enough to justify changing history to move them into this commit.
378 lines
11 KiB
Plaintext
378 lines
11 KiB
Plaintext
// Copyright 2012-2013 The Rust Project Developers. See the COPYRIGHT
|
|
// file at the top-level directory of this distribution and at
|
|
// http://rust-lang.org/COPYRIGHT.
|
|
//
|
|
// Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
|
|
// http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
|
|
// <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
|
|
// option. This file may not be copied, modified, or distributed
|
|
// except according to those terms.
|
|
|
|
|
|
#[link(name = "rustc",
|
|
vers = "0.6",
|
|
uuid = "0ce89b41-2f92-459e-bbc1-8f5fe32f16cf",
|
|
url = "https://github.com/mozilla/rust/tree/master/src/rustc")];
|
|
|
|
#[comment = "The Rust compiler"];
|
|
#[license = "MIT/ASL2"];
|
|
#[crate_type = "lib"];
|
|
|
|
#[legacy_modes];
|
|
|
|
#[allow(non_implicitly_copyable_typarams)];
|
|
#[allow(non_camel_case_types)];
|
|
#[allow(deprecated_mode)];
|
|
#[warn(deprecated_pattern)];
|
|
#[allow(deprecated_self)];
|
|
|
|
#[no_core];
|
|
|
|
extern mod core(vers = "0.6");
|
|
use core::*;
|
|
|
|
extern mod std(vers = "0.6");
|
|
extern mod syntax(vers = "0.6");
|
|
|
|
pub mod middle {
|
|
pub mod trans {
|
|
pub mod macros;
|
|
pub mod inline;
|
|
pub mod monomorphize;
|
|
pub mod controlflow;
|
|
pub mod glue;
|
|
pub mod datum;
|
|
pub mod callee;
|
|
pub mod expr;
|
|
pub mod common;
|
|
pub mod consts;
|
|
pub mod type_of;
|
|
pub mod build;
|
|
pub mod base;
|
|
pub mod _match;
|
|
pub mod uniq;
|
|
pub mod closure;
|
|
pub mod tvec;
|
|
pub mod meth;
|
|
pub mod cabi;
|
|
pub mod cabi_x86_64;
|
|
pub mod cabi_arm;
|
|
pub mod cabi_mips;
|
|
pub mod foreign;
|
|
pub mod reflect;
|
|
pub mod shape;
|
|
pub mod debuginfo;
|
|
pub mod type_use;
|
|
pub mod reachable;
|
|
pub mod machine;
|
|
pub mod adt;
|
|
}
|
|
pub mod ty;
|
|
pub mod resolve;
|
|
#[path = "typeck/mod.rs"]
|
|
pub mod typeck;
|
|
pub mod check_loop;
|
|
pub mod check_match;
|
|
pub mod check_const;
|
|
pub mod lint;
|
|
#[path = "borrowck/mod.rs"]
|
|
pub mod borrowck;
|
|
pub mod mem_categorization;
|
|
pub mod liveness;
|
|
pub mod kind;
|
|
pub mod freevars;
|
|
pub mod pat_util;
|
|
pub mod region;
|
|
pub mod const_eval;
|
|
pub mod astencode;
|
|
pub mod lang_items;
|
|
pub mod privacy;
|
|
pub mod moves;
|
|
}
|
|
|
|
pub mod front {
|
|
pub mod config;
|
|
pub mod test;
|
|
pub mod core_inject;
|
|
pub mod intrinsic_inject;
|
|
}
|
|
|
|
pub mod back {
|
|
pub mod link;
|
|
pub mod abi;
|
|
pub mod upcall;
|
|
pub mod arm;
|
|
pub mod mips;
|
|
pub mod x86;
|
|
pub mod x86_64;
|
|
pub mod rpath;
|
|
pub mod target_strs;
|
|
}
|
|
|
|
#[path = "metadata/mod.rs"]
|
|
pub mod metadata;
|
|
|
|
#[path = "driver/mod.rs"]
|
|
pub mod driver;
|
|
|
|
pub mod util {
|
|
pub mod common;
|
|
pub mod ppaux;
|
|
}
|
|
|
|
pub mod lib {
|
|
pub mod llvm;
|
|
}
|
|
|
|
use driver::driver::{host_triple, optgroups, early_error};
|
|
use driver::driver::{str_input, file_input, build_session_options};
|
|
use driver::driver::{build_session, build_configuration, parse_pretty};
|
|
use driver::driver::{pp_mode, pretty_print_input, list_metadata};
|
|
use driver::driver::{compile_input};
|
|
use driver::session;
|
|
use middle::lint;
|
|
|
|
use core::io::ReaderUtil;
|
|
use core::result::{Ok, Err};
|
|
use std::getopts::{groups, opt_present};
|
|
use std::getopts;
|
|
use syntax::codemap;
|
|
use syntax::diagnostic;
|
|
|
|
pub fn version(argv0: &str) {
|
|
let mut vers = ~"unknown version";
|
|
let env_vers = env!("CFG_VERSION");
|
|
if env_vers.len() != 0 { vers = env_vers; }
|
|
io::println(fmt!("%s %s", argv0, vers));
|
|
io::println(fmt!("host: %s", host_triple()));
|
|
}
|
|
|
|
pub fn usage(argv0: &str) {
|
|
let message = fmt!("Usage: %s [OPTIONS] INPUT", argv0);
|
|
io::println(groups::usage(message, optgroups()) +
|
|
~"Additional help:
|
|
-W help Print 'lint' options and default settings
|
|
-Z help Print internal options for debugging rustc
|
|
");
|
|
}
|
|
|
|
pub fn describe_warnings() {
|
|
io::println(fmt!("
|
|
Available lint options:
|
|
-W <foo> Warn about <foo>
|
|
-A <foo> Allow <foo>
|
|
-D <foo> Deny <foo>
|
|
-F <foo> Forbid <foo> (deny, and deny all overrides)
|
|
"));
|
|
|
|
let lint_dict = lint::get_lint_dict();
|
|
let mut max_key = 0;
|
|
for lint_dict.each_key |&k| { max_key = uint::max(k.len(), max_key); }
|
|
fn padded(max: uint, s: &str) -> ~str {
|
|
str::from_bytes(vec::from_elem(max - s.len(), ' ' as u8)) + s
|
|
}
|
|
io::println(fmt!("\nAvailable lint checks:\n"));
|
|
io::println(fmt!(" %s %7.7s %s",
|
|
padded(max_key, ~"name"), ~"default", ~"meaning"));
|
|
io::println(fmt!(" %s %7.7s %s\n",
|
|
padded(max_key, ~"----"), ~"-------", ~"-------"));
|
|
for lint_dict.each |&k, &v| {
|
|
let k = str::replace(*k, ~"_", ~"-");
|
|
io::println(fmt!(" %s %7.7s %s",
|
|
padded(max_key, k),
|
|
match v.default {
|
|
lint::allow => ~"allow",
|
|
lint::warn => ~"warn",
|
|
lint::deny => ~"deny",
|
|
lint::forbid => ~"forbid"
|
|
},
|
|
v.desc));
|
|
}
|
|
io::println(~"");
|
|
}
|
|
|
|
pub fn describe_debug_flags() {
|
|
io::println(fmt!("\nAvailable debug options:\n"));
|
|
for session::debugging_opts_map().each |pair| {
|
|
let (name, desc, _) = /*bad*/copy *pair;
|
|
io::println(fmt!(" -Z %-20s -- %s", name, desc));
|
|
}
|
|
}
|
|
|
|
pub fn run_compiler(args: &~[~str], demitter: diagnostic::Emitter) {
|
|
// Don't display log spew by default. Can override with RUST_LOG.
|
|
logging::console_off();
|
|
|
|
let mut args = /*bad*/copy *args;
|
|
let binary = args.shift();
|
|
|
|
if args.is_empty() { usage(binary); return; }
|
|
|
|
let matches =
|
|
&match getopts::groups::getopts(args, optgroups()) {
|
|
Ok(m) => m,
|
|
Err(f) => {
|
|
early_error(demitter, getopts::fail_str(f));
|
|
}
|
|
};
|
|
|
|
if opt_present(matches, ~"h") || opt_present(matches, ~"help") {
|
|
usage(binary);
|
|
return;
|
|
}
|
|
|
|
let lint_flags = vec::append(getopts::opt_strs(matches, ~"W"),
|
|
getopts::opt_strs(matches, ~"warn"));
|
|
if lint_flags.contains(&~"help") {
|
|
describe_warnings();
|
|
return;
|
|
}
|
|
|
|
if getopts::opt_strs(matches, ~"Z").contains(&~"help") {
|
|
describe_debug_flags();
|
|
return;
|
|
}
|
|
|
|
if opt_present(matches, ~"v") || opt_present(matches, ~"version") {
|
|
version(binary);
|
|
return;
|
|
}
|
|
let input = match vec::len(matches.free) {
|
|
0u => early_error(demitter, ~"no input filename given"),
|
|
1u => {
|
|
let ifile = /*bad*/copy matches.free[0];
|
|
if ifile == ~"-" {
|
|
let src = str::from_bytes(io::stdin().read_whole_stream());
|
|
str_input(src)
|
|
} else {
|
|
file_input(Path(ifile))
|
|
}
|
|
}
|
|
_ => early_error(demitter, ~"multiple input filenames provided")
|
|
};
|
|
|
|
// XXX: Bad copy.
|
|
let sopts = build_session_options(copy binary, matches, demitter);
|
|
let sess = build_session(sopts, demitter);
|
|
let odir = getopts::opt_maybe_str(matches, ~"out-dir");
|
|
let odir = odir.map(|o| Path(*o));
|
|
let ofile = getopts::opt_maybe_str(matches, ~"o");
|
|
let ofile = ofile.map(|o| Path(*o));
|
|
let cfg = build_configuration(sess, binary, input);
|
|
let pretty =
|
|
option::map(&getopts::opt_default(matches, ~"pretty",
|
|
~"normal"),
|
|
|a| parse_pretty(sess, *a) );
|
|
match pretty {
|
|
Some::<pp_mode>(ppm) => {
|
|
pretty_print_input(sess, cfg, input, ppm);
|
|
return;
|
|
}
|
|
None::<pp_mode> => {/* continue */ }
|
|
}
|
|
let ls = opt_present(matches, ~"ls");
|
|
if ls {
|
|
match input {
|
|
file_input(ref ifile) => {
|
|
list_metadata(sess, &(*ifile), io::stdout());
|
|
}
|
|
str_input(_) => {
|
|
early_error(demitter, ~"can not list metadata for stdin");
|
|
}
|
|
}
|
|
return;
|
|
}
|
|
|
|
compile_input(sess, cfg, input, &odir, &ofile);
|
|
}
|
|
|
|
#[deriving_eq]
|
|
pub enum monitor_msg {
|
|
fatal,
|
|
done,
|
|
}
|
|
|
|
/*
|
|
This is a sanity check that any failure of the compiler is performed
|
|
through the diagnostic module and reported properly - we shouldn't be calling
|
|
plain-old-fail on any execution path that might be taken. Since we have
|
|
console logging off by default, hitting a plain fail statement would make the
|
|
compiler silently exit, which would be terrible.
|
|
|
|
This method wraps the compiler in a subtask and injects a function into the
|
|
diagnostic emitter which records when we hit a fatal error. If the task
|
|
fails without recording a fatal error then we've encountered a compiler
|
|
bug and need to present an error.
|
|
*/
|
|
pub fn monitor(+f: ~fn(diagnostic::Emitter)) {
|
|
use core::comm::*;
|
|
let (p, ch) = stream();
|
|
let ch = SharedChan(ch);
|
|
let ch_capture = ch.clone();
|
|
match do task::try || {
|
|
let ch = ch_capture.clone();
|
|
let ch_capture = ch.clone();
|
|
// The 'diagnostics emitter'. Every error, warning, etc. should
|
|
// go through this function.
|
|
let demitter: @fn(Option<(@codemap::CodeMap, codemap::span)>,
|
|
&str,
|
|
diagnostic::level) =
|
|
|cmsp, msg, lvl| {
|
|
if lvl == diagnostic::fatal {
|
|
ch_capture.send(fatal);
|
|
}
|
|
diagnostic::emit(cmsp, msg, lvl);
|
|
};
|
|
|
|
struct finally {
|
|
ch: SharedChan<monitor_msg>,
|
|
}
|
|
|
|
impl Drop for finally {
|
|
fn finalize(&self) { self.ch.send(done); }
|
|
}
|
|
|
|
let _finally = finally { ch: ch };
|
|
|
|
f(demitter)
|
|
} {
|
|
result::Ok(_) => { /* fallthrough */ }
|
|
result::Err(_) => {
|
|
// Task failed without emitting a fatal diagnostic
|
|
if p.recv() == done {
|
|
diagnostic::emit(
|
|
None,
|
|
diagnostic::ice_msg(~"unexpected failure"),
|
|
diagnostic::error);
|
|
|
|
for [
|
|
~"the compiler hit an unexpected failure path. \
|
|
this is a bug",
|
|
~"try running with RUST_LOG=rustc=1,::rt::backtrace \
|
|
to get further details and report the results \
|
|
to github.com/mozilla/rust/issues"
|
|
].each |note| {
|
|
diagnostic::emit(None, *note, diagnostic::note)
|
|
}
|
|
}
|
|
// Fail so the process returns a failure code
|
|
fail!();
|
|
}
|
|
}
|
|
}
|
|
|
|
pub fn main() {
|
|
let args = os::args();
|
|
do monitor |demitter| {
|
|
run_compiler(&args, demitter);
|
|
}
|
|
}
|
|
|
|
|
|
// Local Variables:
|
|
// fill-column: 78;
|
|
// indent-tabs-mode: nil
|
|
// c-basic-offset: 4
|
|
// buffer-file-coding-system: utf-8-unix
|
|
// End:
|