src/librustc_trans/trans/context.rs

   1 // Copyright 2013 The Rust Project Developers. See the COPYRIGHT
   2 // file at the top-level directory of this distribution and at
   3 // http://rust-lang.org/COPYRIGHT.
   4 //
   5 // Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
   6 // http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
   7 // <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
   8 // option. This file may not be copied, modified, or distributed
   9 // except according to those terms.
  10
  11 use llvm;
  12 use llvm::{ContextRef, ModuleRef, ValueRef, BuilderRef};
  13 use llvm::{TargetData};
  14 use llvm::mk_target_data;
  15 use metadata::common::LinkMeta;
  16 use middle::def::ExportMap;
  17 use middle::traits;
  18 use trans::adt;
  19 use trans::base;
  20 use trans::builder::Builder;
  21 use trans::common::{ExternMap,tydesc_info,BuilderRef_res};
  22 use trans::debuginfo;
  23 use trans::monomorphize::MonoId;
  24 use trans::type_::{Type, TypeNames};
  25 use middle::ty::{mod, Ty};
  26 use session::config::NoDebugInfo;
  27 use session::Session;
  28 use util::ppaux::Repr;
  29 use util::sha2::Sha256;
  30 use util::nodemap::{NodeMap, NodeSet, DefIdMap, FnvHashMap, FnvHashSet};
  31
  32 use std::cell::{Cell, RefCell};
  33 use std::c_str::ToCStr;
  34 use std::ptr;
  35 use std::rc::Rc;
  36 use syntax::ast;
  37 use syntax::parse::token::InternedString;
  38
  39 pub struct Stats {
  40     pub n_static_tydescs: Cell<uint>,
  41     pub n_glues_created: Cell<uint>,
  42     pub n_null_glues: Cell<uint>,
  43     pub n_real_glues: Cell<uint>,
  44     pub n_fns: Cell<uint>,
  45     pub n_monos: Cell<uint>,
  46     pub n_inlines: Cell<uint>,
  47     pub n_closures: Cell<uint>,
  48     pub n_llvm_insns: Cell<uint>,
  49     pub llvm_insns: RefCell<FnvHashMap<String, uint>>,
  50     // (ident, llvm-instructions)
  51     pub fn_stats: RefCell<Vec<(String, uint)> >,
  52 }
  53
  54 /// The shared portion of a `CrateContext`.  There is one `SharedCrateContext`
  55 /// per crate.  The data here is shared between all compilation units of the
  56 /// crate, so it must not contain references to any LLVM data structures
  57 /// (aside from metadata-related ones).
  58 pub struct SharedCrateContext<'tcx> {
  59     local_ccxs: Vec<LocalCrateContext<'tcx>>,
  60
  61     metadata_llmod: ModuleRef,
  62     metadata_llcx: ContextRef,
  63
  64     export_map: ExportMap,
  65     reachable: NodeSet,
  66     item_symbols: RefCell<NodeMap<String>>,
  67     link_meta: LinkMeta,
  68     symbol_hasher: RefCell<Sha256>,
  69     tcx: ty::ctxt<'tcx>,
  70     stats: Stats,
  71
  72     available_monomorphizations: RefCell<FnvHashSet<String>>,
  73     available_drop_glues: RefCell<FnvHashMap<Ty<'tcx>, String>>,
  74 }
  75
  76 /// The local portion of a `CrateContext`.  There is one `LocalCrateContext`
  77 /// per compilation unit.  Each one has its own LLVM `ContextRef` so that
  78 /// several compilation units may be optimized in parallel.  All other LLVM
  79 /// data structures in the `LocalCrateContext` are tied to that `ContextRef`.
  80 pub struct LocalCrateContext<'tcx> {
  81     llmod: ModuleRef,
  82     llcx: ContextRef,
  83     td: TargetData,
  84     tn: TypeNames,
  85     externs: RefCell<ExternMap>,
  86     item_vals: RefCell<NodeMap<ValueRef>>,
  87     needs_unwind_cleanup_cache: RefCell<FnvHashMap<Ty<'tcx>, bool>>,
  88     fn_pointer_shims: RefCell<FnvHashMap<Ty<'tcx>, ValueRef>>,
  89     drop_glues: RefCell<FnvHashMap<Ty<'tcx>, ValueRef>>,
  90     tydescs: RefCell<FnvHashMap<Ty<'tcx>, Rc<tydesc_info<'tcx>>>>,
  91     /// Set when running emit_tydescs to enforce that no more tydescs are
  92     /// created.
  93     finished_tydescs: Cell<bool>,
  94     /// Track mapping of external ids to local items imported for inlining
  95     external: RefCell<DefIdMap<Option<ast::NodeId>>>,
  96     /// Backwards version of the `external` map (inlined items to where they
  97     /// came from)
  98     external_srcs: RefCell<NodeMap<ast::DefId>>,
  99     /// Cache instances of monomorphized functions
 100     monomorphized: RefCell<FnvHashMap<MonoId<'tcx>, ValueRef>>,
 101     monomorphizing: RefCell<DefIdMap<uint>>,
 102     /// Cache generated vtables
 103     vtables: RefCell<FnvHashMap<(Ty<'tcx>, ty::PolyTraitRef<'tcx>), ValueRef>>,
 104     /// Cache of constant strings,
 105     const_cstr_cache: RefCell<FnvHashMap<InternedString, ValueRef>>,
 106
 107     /// Reverse-direction for const ptrs cast from globals.
 108     /// Key is an int, cast from a ValueRef holding a *T,
 109     /// Val is a ValueRef holding a *[T].
 110     ///
 111     /// Needed because LLVM loses pointer->pointee association
 112     /// when we ptrcast, and we have to ptrcast during translation
 113     /// of a [T] const because we form a slice, a [*T,int] pair, not
 114     /// a pointer to an LLVM array type.
 115     const_globals: RefCell<FnvHashMap<int, ValueRef>>,
 116
 117     /// Cache of emitted const values
 118     const_values: RefCell<NodeMap<ValueRef>>,
 119
 120     /// Cache of emitted static values
 121     static_values: RefCell<NodeMap<ValueRef>>,
 122
 123     /// Cache of external const values
 124     extern_const_values: RefCell<DefIdMap<ValueRef>>,
 125
 126     impl_method_cache: RefCell<FnvHashMap<(ast::DefId, ast::Name), ast::DefId>>,
 127
 128     /// Cache of closure wrappers for bare fn's.
 129     closure_bare_wrapper_cache: RefCell<FnvHashMap<ValueRef, ValueRef>>,
 130
 131     lltypes: RefCell<FnvHashMap<Ty<'tcx>, Type>>,
 132     llsizingtypes: RefCell<FnvHashMap<Ty<'tcx>, Type>>,
 133     adt_reprs: RefCell<FnvHashMap<Ty<'tcx>, Rc<adt::Repr<'tcx>>>>,
 134     type_hashcodes: RefCell<FnvHashMap<Ty<'tcx>, String>>,
 135     all_llvm_symbols: RefCell<FnvHashSet<String>>,
 136     int_type: Type,
 137     opaque_vec_type: Type,
 138     builder: BuilderRef_res,
 139
 140     /// Holds the LLVM values for closure IDs.
 141     unboxed_closure_vals: RefCell<FnvHashMap<MonoId<'tcx>, ValueRef>>,
 142
 143     dbg_cx: Option<debuginfo::CrateDebugContext<'tcx>>,
 144
 145     eh_personality: RefCell<Option<ValueRef>>,
 146
 147     intrinsics: RefCell<FnvHashMap<&'static str, ValueRef>>,
 148
 149     /// Number of LLVM instructions translated into this `LocalCrateContext`.
 150     /// This is used to perform some basic load-balancing to keep all LLVM
 151     /// contexts around the same size.
 152     n_llvm_insns: Cell<uint>,
 153
 154     trait_cache: RefCell<FnvHashMap<ty::PolyTraitRef<'tcx>,
 155                                     traits::Vtable<'tcx, ()>>>,
 156 }
 157
 158 pub struct CrateContext<'a, 'tcx: 'a> {
 159     shared: &'a SharedCrateContext<'tcx>,
 160     local: &'a LocalCrateContext<'tcx>,
 161     /// The index of `local` in `shared.local_ccxs`.  This is used in
 162     /// `maybe_iter(true)` to identify the original `LocalCrateContext`.
 163     index: uint,
 164 }
 165
 166 pub struct CrateContextIterator<'a, 'tcx: 'a> {
 167     shared: &'a SharedCrateContext<'tcx>,
 168     index: uint,
 169 }
 170
 171 impl<'a, 'tcx> Iterator for CrateContextIterator<'a,'tcx> {
 172     type Item = CrateContext<'a, 'tcx>;
 173
 174     fn next(&mut self) -> Option<CrateContext<'a, 'tcx>> {
 175         if self.index >= self.shared.local_ccxs.len() {
 176             return None;
 177         }
 178
 179         let index = self.index;
 180         self.index += 1;
 181
 182         Some(CrateContext {
 183             shared: self.shared,
 184             local: &self.shared.local_ccxs[index],
 185             index: index,
 186         })
 187     }
 188 }
 189
 190 /// The iterator produced by `CrateContext::maybe_iter`.
 191 pub struct CrateContextMaybeIterator<'a, 'tcx: 'a> {
 192     shared: &'a SharedCrateContext<'tcx>,
 193     index: uint,
 194     single: bool,
 195     origin: uint,
 196 }
 197
 198 impl<'a, 'tcx> Iterator for CrateContextMaybeIterator<'a, 'tcx> {
 199     type Item = (CrateContext<'a, 'tcx>, bool);
 200
 201     fn next(&mut self) -> Option<(CrateContext<'a, 'tcx>, bool)> {
 202         if self.index >= self.shared.local_ccxs.len() {
 203             return None;
 204         }
 205
 206         let index = self.index;
 207         self.index += 1;
 208         if self.single {
 209             self.index = self.shared.local_ccxs.len();
 210         }
 211
 212         let ccx = CrateContext {
 213             shared: self.shared,
 214             local: &self.shared.local_ccxs[index],
 215             index: index,
 216         };
 217         Some((ccx, index == self.origin))
 218     }
 219 }
 220
 221
 222 unsafe fn create_context_and_module(sess: &Session, mod_name: &str) -> (ContextRef, ModuleRef) {
 223     let llcx = llvm::LLVMContextCreate();
 224     let llmod = mod_name.with_c_str(|buf| {
 225         llvm::LLVMModuleCreateWithNameInContext(buf, llcx)
 226     });
 227     sess.target
 228         .target
 229         .data_layout
 230         .with_c_str(|buf| {
 231         llvm::LLVMSetDataLayout(llmod, buf);
 232     });
 233     sess.target
 234         .target
 235         .llvm_target
 236         .with_c_str(|buf| {
 237         llvm::LLVMRustSetNormalizedTarget(llmod, buf);
 238     });
 239     (llcx, llmod)
 240 }
 241
 242 impl<'tcx> SharedCrateContext<'tcx> {
 243     pub fn new(crate_name: &str,
 244                local_count: uint,
 245                tcx: ty::ctxt<'tcx>,
 246                export_map: ExportMap,
 247                symbol_hasher: Sha256,
 248                link_meta: LinkMeta,
 249                reachable: NodeSet)
 250                -> SharedCrateContext<'tcx> {
 251         let (metadata_llcx, metadata_llmod) = unsafe {
 252             create_context_and_module(&tcx.sess, "metadata")
 253         };
 254
 255         let mut shared_ccx = SharedCrateContext {
 256             local_ccxs: Vec::with_capacity(local_count),
 257             metadata_llmod: metadata_llmod,
 258             metadata_llcx: metadata_llcx,
 259             export_map: export_map,
 260             reachable: reachable,
 261             item_symbols: RefCell::new(NodeMap::new()),
 262             link_meta: link_meta,
 263             symbol_hasher: RefCell::new(symbol_hasher),
 264             tcx: tcx,
 265             stats: Stats {
 266                 n_static_tydescs: Cell::new(0u),
 267                 n_glues_created: Cell::new(0u),
 268                 n_null_glues: Cell::new(0u),
 269                 n_real_glues: Cell::new(0u),
 270                 n_fns: Cell::new(0u),
 271                 n_monos: Cell::new(0u),
 272                 n_inlines: Cell::new(0u),
 273                 n_closures: Cell::new(0u),
 274                 n_llvm_insns: Cell::new(0u),
 275                 llvm_insns: RefCell::new(FnvHashMap::new()),
 276                 fn_stats: RefCell::new(Vec::new()),
 277             },
 278             available_monomorphizations: RefCell::new(FnvHashSet::new()),
 279             available_drop_glues: RefCell::new(FnvHashMap::new()),
 280         };
 281
 282         for i in range(0, local_count) {
 283             // Append ".rs" to crate name as LLVM module identifier.
 284             //
 285             // LLVM code generator emits a ".file filename" directive
 286             // for ELF backends. Value of the "filename" is set as the
 287             // LLVM module identifier.  Due to a LLVM MC bug[1], LLVM
 288             // crashes if the module identifier is same as other symbols
 289             // such as a function name in the module.
 290             // 1. http://llvm.org/bugs/show_bug.cgi?id=11479
 291             let llmod_id = format!("{}.{}.rs", crate_name, i);
 292             let local_ccx = LocalCrateContext::new(&shared_ccx, llmod_id[]);
 293             shared_ccx.local_ccxs.push(local_ccx);
 294         }
 295
 296         shared_ccx
 297     }
 298
 299     pub fn iter<'a>(&'a self) -> CrateContextIterator<'a, 'tcx> {
 300         CrateContextIterator {
 301             shared: self,
 302             index: 0,
 303         }
 304     }
 305
 306     pub fn get_ccx<'a>(&'a self, index: uint) -> CrateContext<'a, 'tcx> {
 307         CrateContext {
 308             shared: self,
 309             local: &self.local_ccxs[index],
 310             index: index,
 311         }
 312     }
 313
 314     fn get_smallest_ccx<'a>(&'a self) -> CrateContext<'a, 'tcx> {
 315         let (local_ccx, index) =
 316             self.local_ccxs
 317                 .iter()
 318                 .zip(range(0, self.local_ccxs.len()))
 319                 .min_by(|&(local_ccx, _idx)| local_ccx.n_llvm_insns.get())
 320                 .unwrap();
 321         CrateContext {
 322             shared: self,
 323             local: local_ccx,
 324             index: index,
 325         }
 326     }
 327
 328
 329     pub fn metadata_llmod(&self) -> ModuleRef {
 330         self.metadata_llmod
 331     }
 332
 333     pub fn metadata_llcx(&self) -> ContextRef {
 334         self.metadata_llcx
 335     }
 336
 337     pub fn export_map<'a>(&'a self) -> &'a ExportMap {
 338         &self.export_map
 339     }
 340
 341     pub fn reachable<'a>(&'a self) -> &'a NodeSet {
 342         &self.reachable
 343     }
 344
 345     pub fn item_symbols<'a>(&'a self) -> &'a RefCell<NodeMap<String>> {
 346         &self.item_symbols
 347     }
 348
 349     pub fn link_meta<'a>(&'a self) -> &'a LinkMeta {
 350         &self.link_meta
 351     }
 352
 353     pub fn tcx<'a>(&'a self) -> &'a ty::ctxt<'tcx> {
 354         &self.tcx
 355     }
 356
 357     pub fn take_tcx(self) -> ty::ctxt<'tcx> {
 358         self.tcx
 359     }
 360
 361     pub fn sess<'a>(&'a self) -> &'a Session {
 362         &self.tcx.sess
 363     }
 364
 365     pub fn stats<'a>(&'a self) -> &'a Stats {
 366         &self.stats
 367     }
 368 }
 369
 370 impl<'tcx> LocalCrateContext<'tcx> {
 371     fn new(shared: &SharedCrateContext<'tcx>,
 372            name: &str)
 373            -> LocalCrateContext<'tcx> {
 374         unsafe {
 375             let (llcx, llmod) = create_context_and_module(&shared.tcx.sess, name);
 376
 377             let td = mk_target_data(shared.tcx
 378                                           .sess
 379                                           .target
 380                                           .target
 381                                           .data_layout
 382                                           []);
 383
 384             let dbg_cx = if shared.tcx.sess.opts.debuginfo != NoDebugInfo {
 385                 Some(debuginfo::CrateDebugContext::new(llmod))
 386             } else {
 387                 None
 388             };
 389
 390             let mut local_ccx = LocalCrateContext {
 391                 llmod: llmod,
 392                 llcx: llcx,
 393                 td: td,
 394                 tn: TypeNames::new(),
 395                 externs: RefCell::new(FnvHashMap::new()),
 396                 item_vals: RefCell::new(NodeMap::new()),
 397                 needs_unwind_cleanup_cache: RefCell::new(FnvHashMap::new()),
 398                 fn_pointer_shims: RefCell::new(FnvHashMap::new()),
 399                 drop_glues: RefCell::new(FnvHashMap::new()),
 400                 tydescs: RefCell::new(FnvHashMap::new()),
 401                 finished_tydescs: Cell::new(false),
 402                 external: RefCell::new(DefIdMap::new()),
 403                 external_srcs: RefCell::new(NodeMap::new()),
 404                 monomorphized: RefCell::new(FnvHashMap::new()),
 405                 monomorphizing: RefCell::new(DefIdMap::new()),
 406                 vtables: RefCell::new(FnvHashMap::new()),
 407                 const_cstr_cache: RefCell::new(FnvHashMap::new()),
 408                 const_globals: RefCell::new(FnvHashMap::new()),
 409                 const_values: RefCell::new(NodeMap::new()),
 410                 static_values: RefCell::new(NodeMap::new()),
 411                 extern_const_values: RefCell::new(DefIdMap::new()),
 412                 impl_method_cache: RefCell::new(FnvHashMap::new()),
 413                 closure_bare_wrapper_cache: RefCell::new(FnvHashMap::new()),
 414                 lltypes: RefCell::new(FnvHashMap::new()),
 415                 llsizingtypes: RefCell::new(FnvHashMap::new()),
 416                 adt_reprs: RefCell::new(FnvHashMap::new()),
 417                 type_hashcodes: RefCell::new(FnvHashMap::new()),
 418                 all_llvm_symbols: RefCell::new(FnvHashSet::new()),
 419                 int_type: Type::from_ref(ptr::null_mut()),
 420                 opaque_vec_type: Type::from_ref(ptr::null_mut()),
 421                 builder: BuilderRef_res(llvm::LLVMCreateBuilderInContext(llcx)),
 422                 unboxed_closure_vals: RefCell::new(FnvHashMap::new()),
 423                 dbg_cx: dbg_cx,
 424                 eh_personality: RefCell::new(None),
 425                 intrinsics: RefCell::new(FnvHashMap::new()),
 426                 n_llvm_insns: Cell::new(0u),
 427                 trait_cache: RefCell::new(FnvHashMap::new()),
 428             };
 429
 430             local_ccx.int_type = Type::int(&local_ccx.dummy_ccx(shared));
 431             local_ccx.opaque_vec_type = Type::opaque_vec(&local_ccx.dummy_ccx(shared));
 432
 433             // Done mutating local_ccx directly.  (The rest of the
 434             // initialization goes through RefCell.)
 435             {
 436                 let ccx = local_ccx.dummy_ccx(shared);
 437
 438                 let mut str_slice_ty = Type::named_struct(&ccx, "str_slice");
 439                 str_slice_ty.set_struct_body(&[Type::i8p(&ccx), ccx.int_type()], false);
 440                 ccx.tn().associate_type("str_slice", &str_slice_ty);
 441
 442                 ccx.tn().associate_type("tydesc", &Type::tydesc(&ccx, str_slice_ty));
 443
 444                 if ccx.sess().count_llvm_insns() {
 445                     base::init_insn_ctxt()
 446                 }
 447             }
 448
 449             local_ccx
 450         }
 451     }
 452
 453     /// Create a dummy `CrateContext` from `self` and  the provided
 454     /// `SharedCrateContext`.  This is somewhat dangerous because `self` may
 455     /// not actually be an element of `shared.local_ccxs`, which can cause some
 456     /// operations to panic unexpectedly.
 457     ///
 458     /// This is used in the `LocalCrateContext` constructor to allow calling
 459     /// functions that expect a complete `CrateContext`, even before the local
 460     /// portion is fully initialized and attached to the `SharedCrateContext`.
 461     fn dummy_ccx<'a>(&'a self, shared: &'a SharedCrateContext<'tcx>)
 462                      -> CrateContext<'a, 'tcx> {
 463         CrateContext {
 464             shared: shared,
 465             local: self,
 466             index: -1 as uint,
 467         }
 468     }
 469 }
 470
 471 impl<'b, 'tcx> CrateContext<'b, 'tcx> {
 472     pub fn shared(&self) -> &'b SharedCrateContext<'tcx> {
 473         self.shared
 474     }
 475
 476     pub fn local(&self) -> &'b LocalCrateContext<'tcx> {
 477         self.local
 478     }
 479
 480
 481     /// Get a (possibly) different `CrateContext` from the same
 482     /// `SharedCrateContext`.
 483     pub fn rotate(&self) -> CrateContext<'b, 'tcx> {
 484         self.shared.get_smallest_ccx()
 485     }
 486
 487     /// Either iterate over only `self`, or iterate over all `CrateContext`s in
 488     /// the `SharedCrateContext`.  The iterator produces `(ccx, is_origin)`
 489     /// pairs, where `is_origin` is `true` if `ccx` is `self` and `false`
 490     /// otherwise.  This method is useful for avoiding code duplication in
 491     /// cases where it may or may not be necessary to translate code into every
 492     /// context.
 493     pub fn maybe_iter(&self, iter_all: bool) -> CrateContextMaybeIterator<'b, 'tcx> {
 494         CrateContextMaybeIterator {
 495             shared: self.shared,
 496             index: if iter_all { 0 } else { self.index },
 497             single: !iter_all,
 498             origin: self.index,
 499         }
 500     }
 501
 502
 503     pub fn tcx<'a>(&'a self) -> &'a ty::ctxt<'tcx> {
 504         &self.shared.tcx
 505     }
 506
 507     pub fn sess<'a>(&'a self) -> &'a Session {
 508         &self.shared.tcx.sess
 509     }
 510
 511     pub fn builder<'a>(&'a self) -> Builder<'a, 'tcx> {
 512         Builder::new(self)
 513     }
 514
 515     pub fn raw_builder<'a>(&'a self) -> BuilderRef {
 516         self.local.builder.b
 517     }
 518
 519     pub fn tydesc_type(&self) -> Type {
 520         self.local.tn.find_type("tydesc").unwrap()
 521     }
 522
 523     pub fn get_intrinsic(&self, key: & &'static str) -> ValueRef {
 524         if let Some(v) = self.intrinsics().borrow().get(key).cloned() {
 525             return v;
 526         }
 527         match declare_intrinsic(self, key) {
 528             Some(v) => return v,
 529             None => panic!()
 530         }
 531     }
 532
 533     pub fn is_split_stack_supported(&self) -> bool {
 534         self.sess().target.target.options.morestack
 535     }
 536
 537
 538     pub fn llmod(&self) -> ModuleRef {
 539         self.local.llmod
 540     }
 541
 542     pub fn llcx(&self) -> ContextRef {
 543         self.local.llcx
 544     }
 545
 546     pub fn td<'a>(&'a self) -> &'a TargetData {
 547         &self.local.td
 548     }
 549
 550     pub fn tn<'a>(&'a self) -> &'a TypeNames {
 551         &self.local.tn
 552     }
 553
 554     pub fn externs<'a>(&'a self) -> &'a RefCell<ExternMap> {
 555         &self.local.externs
 556     }
 557
 558     pub fn item_vals<'a>(&'a self) -> &'a RefCell<NodeMap<ValueRef>> {
 559         &self.local.item_vals
 560     }
 561
 562     pub fn export_map<'a>(&'a self) -> &'a ExportMap {
 563         &self.shared.export_map
 564     }
 565
 566     pub fn reachable<'a>(&'a self) -> &'a NodeSet {
 567         &self.shared.reachable
 568     }
 569
 570     pub fn item_symbols<'a>(&'a self) -> &'a RefCell<NodeMap<String>> {
 571         &self.shared.item_symbols
 572     }
 573
 574     pub fn link_meta<'a>(&'a self) -> &'a LinkMeta {
 575         &self.shared.link_meta
 576     }
 577
 578     pub fn needs_unwind_cleanup_cache(&self) -> &RefCell<FnvHashMap<Ty<'tcx>, bool>> {
 579         &self.local.needs_unwind_cleanup_cache
 580     }
 581
 582     pub fn fn_pointer_shims(&self) -> &RefCell<FnvHashMap<Ty<'tcx>, ValueRef>> {
 583         &self.local.fn_pointer_shims
 584     }
 585
 586     pub fn drop_glues<'a>(&'a self) -> &'a RefCell<FnvHashMap<Ty<'tcx>, ValueRef>> {
 587         &self.local.drop_glues
 588     }
 589
 590     pub fn tydescs<'a>(&'a self) -> &'a RefCell<FnvHashMap<Ty<'tcx>, Rc<tydesc_info<'tcx>>>> {
 591         &self.local.tydescs
 592     }
 593
 594     pub fn finished_tydescs<'a>(&'a self) -> &'a Cell<bool> {
 595         &self.local.finished_tydescs
 596     }
 597
 598     pub fn external<'a>(&'a self) -> &'a RefCell<DefIdMap<Option<ast::NodeId>>> {
 599         &self.local.external
 600     }
 601
 602     pub fn external_srcs<'a>(&'a self) -> &'a RefCell<NodeMap<ast::DefId>> {
 603         &self.local.external_srcs
 604     }
 605
 606     pub fn monomorphized<'a>(&'a self) -> &'a RefCell<FnvHashMap<MonoId<'tcx>, ValueRef>> {
 607         &self.local.monomorphized
 608     }
 609
 610     pub fn monomorphizing<'a>(&'a self) -> &'a RefCell<DefIdMap<uint>> {
 611         &self.local.monomorphizing
 612     }
 613
 614     pub fn vtables<'a>(&'a self) -> &'a RefCell<FnvHashMap<(Ty<'tcx>, ty::PolyTraitRef<'tcx>),
 615                                                             ValueRef>> {
 616         &self.local.vtables
 617     }
 618
 619     pub fn const_cstr_cache<'a>(&'a self) -> &'a RefCell<FnvHashMap<InternedString, ValueRef>> {
 620         &self.local.const_cstr_cache
 621     }
 622
 623     pub fn const_globals<'a>(&'a self) -> &'a RefCell<FnvHashMap<int, ValueRef>> {
 624         &self.local.const_globals
 625     }
 626
 627     pub fn const_values<'a>(&'a self) -> &'a RefCell<NodeMap<ValueRef>> {
 628         &self.local.const_values
 629     }
 630
 631     pub fn static_values<'a>(&'a self) -> &'a RefCell<NodeMap<ValueRef>> {
 632         &self.local.static_values
 633     }
 634
 635     pub fn extern_const_values<'a>(&'a self) -> &'a RefCell<DefIdMap<ValueRef>> {
 636         &self.local.extern_const_values
 637     }
 638
 639     pub fn impl_method_cache<'a>(&'a self)
 640             -> &'a RefCell<FnvHashMap<(ast::DefId, ast::Name), ast::DefId>> {
 641         &self.local.impl_method_cache
 642     }
 643
 644     pub fn closure_bare_wrapper_cache<'a>(&'a self) -> &'a RefCell<FnvHashMap<ValueRef, ValueRef>> {
 645         &self.local.closure_bare_wrapper_cache
 646     }
 647
 648     pub fn lltypes<'a>(&'a self) -> &'a RefCell<FnvHashMap<Ty<'tcx>, Type>> {
 649         &self.local.lltypes
 650     }
 651
 652     pub fn llsizingtypes<'a>(&'a self) -> &'a RefCell<FnvHashMap<Ty<'tcx>, Type>> {
 653         &self.local.llsizingtypes
 654     }
 655
 656     pub fn adt_reprs<'a>(&'a self) -> &'a RefCell<FnvHashMap<Ty<'tcx>, Rc<adt::Repr<'tcx>>>> {
 657         &self.local.adt_reprs
 658     }
 659
 660     pub fn symbol_hasher<'a>(&'a self) -> &'a RefCell<Sha256> {
 661         &self.shared.symbol_hasher
 662     }
 663
 664     pub fn type_hashcodes<'a>(&'a self) -> &'a RefCell<FnvHashMap<Ty<'tcx>, String>> {
 665         &self.local.type_hashcodes
 666     }
 667
 668     pub fn all_llvm_symbols<'a>(&'a self) -> &'a RefCell<FnvHashSet<String>> {
 669         &self.local.all_llvm_symbols
 670     }
 671
 672     pub fn stats<'a>(&'a self) -> &'a Stats {
 673         &self.shared.stats
 674     }
 675
 676     pub fn available_monomorphizations<'a>(&'a self) -> &'a RefCell<FnvHashSet<String>> {
 677         &self.shared.available_monomorphizations
 678     }
 679
 680     pub fn available_drop_glues<'a>(&'a self) -> &'a RefCell<FnvHashMap<Ty<'tcx>, String>> {
 681         &self.shared.available_drop_glues
 682     }
 683
 684     pub fn int_type(&self) -> Type {
 685         self.local.int_type
 686     }
 687
 688     pub fn opaque_vec_type(&self) -> Type {
 689         self.local.opaque_vec_type
 690     }
 691
 692     pub fn unboxed_closure_vals<'a>(&'a self) -> &'a RefCell<FnvHashMap<MonoId<'tcx>,ValueRef>> {
 693         &self.local.unboxed_closure_vals
 694     }
 695
 696     pub fn dbg_cx<'a>(&'a self) -> &'a Option<debuginfo::CrateDebugContext<'tcx>> {
 697         &self.local.dbg_cx
 698     }
 699
 700     pub fn eh_personality<'a>(&'a self) -> &'a RefCell<Option<ValueRef>> {
 701         &self.local.eh_personality
 702     }
 703
 704     fn intrinsics<'a>(&'a self) -> &'a RefCell<FnvHashMap<&'static str, ValueRef>> {
 705         &self.local.intrinsics
 706     }
 707
 708     pub fn count_llvm_insn(&self) {
 709         self.local.n_llvm_insns.set(self.local.n_llvm_insns.get() + 1);
 710     }
 711
 712     pub fn trait_cache(&self) -> &RefCell<FnvHashMap<ty::PolyTraitRef<'tcx>,
 713                                                      traits::Vtable<'tcx, ()>>> {
 714         &self.local.trait_cache
 715     }
 716
 717     /// Return exclusive upper bound on object size.
 718     ///
 719     /// The theoretical maximum object size is defined as the maximum positive `int` value. This
 720     /// ensures that the `offset` semantics remain well-defined by allowing it to correctly index
 721     /// every address within an object along with one byte past the end, along with allowing `int`
 722     /// to store the difference between any two pointers into an object.
 723     ///
 724     /// The upper bound on 64-bit currently needs to be lower because LLVM uses a 64-bit integer to
 725     /// represent object size in bits. It would need to be 1 << 61 to account for this, but is
 726     /// currently conservatively bounded to 1 << 47 as that is enough to cover the current usable
 727     /// address space on 64-bit ARMv8 and x86_64.
 728     pub fn obj_size_bound(&self) -> u64 {
 729         match self.sess().target.target.target_word_size[] {
 730             "32" => 1 << 31,
 731             "64" => 1 << 47,
 732             _ => unreachable!() // error handled by config::build_target_config
 733         }
 734     }
 735
 736     pub fn report_overbig_object(&self, obj: Ty<'tcx>) -> ! {
 737         self.sess().fatal(
 738             format!("the type `{}` is too big for the current architecture",
 739                     obj.repr(self.tcx()))[])
 740     }
 741 }
 742
 743 fn declare_intrinsic(ccx: &CrateContext, key: & &'static str) -> Option<ValueRef> {
 744     macro_rules! ifn (
 745         ($name:expr fn() -> $ret:expr) => (
 746             if *key == $name {
 747                 let f = base::decl_cdecl_fn(
 748                     ccx, $name, Type::func(&[], &$ret),
 749                     ty::mk_nil(ccx.tcx()));
 750                 ccx.intrinsics().borrow_mut().insert($name, f.clone());
 751                 return Some(f);
 752             }
 753         );
 754         ($name:expr fn($($arg:expr),*) -> $ret:expr) => (
 755             if *key == $name {
 756                 let f = base::decl_cdecl_fn(ccx, $name,
 757                                   Type::func(&[$($arg),*], &$ret), ty::mk_nil(ccx.tcx()));
 758                 ccx.intrinsics().borrow_mut().insert($name, f.clone());
 759                 return Some(f);
 760             }
 761         )
 762     );
 763     macro_rules! mk_struct (
 764         ($($field_ty:expr),*) => (Type::struct_(ccx, &[$($field_ty),*], false))
 765     );
 766
 767     let i8p = Type::i8p(ccx);
 768     let void = Type::void(ccx);
 769     let i1 = Type::i1(ccx);
 770     let t_i8 = Type::i8(ccx);
 771     let t_i16 = Type::i16(ccx);
 772     let t_i32 = Type::i32(ccx);
 773     let t_i64 = Type::i64(ccx);
 774     let t_f32 = Type::f32(ccx);
 775     let t_f64 = Type::f64(ccx);
 776
 777     ifn!("llvm.memcpy.p0i8.p0i8.i32" fn(i8p, i8p, t_i32, t_i32, i1) -> void);
 778     ifn!("llvm.memcpy.p0i8.p0i8.i64" fn(i8p, i8p, t_i64, t_i32, i1) -> void);
 779     ifn!("llvm.memmove.p0i8.p0i8.i32" fn(i8p, i8p, t_i32, t_i32, i1) -> void);
 780     ifn!("llvm.memmove.p0i8.p0i8.i64" fn(i8p, i8p, t_i64, t_i32, i1) -> void);
 781     ifn!("llvm.memset.p0i8.i32" fn(i8p, t_i8, t_i32, t_i32, i1) -> void);
 782     ifn!("llvm.memset.p0i8.i64" fn(i8p, t_i8, t_i64, t_i32, i1) -> void);
 783
 784     ifn!("llvm.trap" fn() -> void);
 785     ifn!("llvm.debugtrap" fn() -> void);
 786     ifn!("llvm.frameaddress" fn(t_i32) -> i8p);
 787
 788     ifn!("llvm.powi.f32" fn(t_f32, t_i32) -> t_f32);
 789     ifn!("llvm.powi.f64" fn(t_f64, t_i32) -> t_f64);
 790     ifn!("llvm.pow.f32" fn(t_f32, t_f32) -> t_f32);
 791     ifn!("llvm.pow.f64" fn(t_f64, t_f64) -> t_f64);
 792
 793     ifn!("llvm.sqrt.f32" fn(t_f32) -> t_f32);
 794     ifn!("llvm.sqrt.f64" fn(t_f64) -> t_f64);
 795     ifn!("llvm.sin.f32" fn(t_f32) -> t_f32);
 796     ifn!("llvm.sin.f64" fn(t_f64) -> t_f64);
 797     ifn!("llvm.cos.f32" fn(t_f32) -> t_f32);
 798     ifn!("llvm.cos.f64" fn(t_f64) -> t_f64);
 799     ifn!("llvm.exp.f32" fn(t_f32) -> t_f32);
 800     ifn!("llvm.exp.f64" fn(t_f64) -> t_f64);
 801     ifn!("llvm.exp2.f32" fn(t_f32) -> t_f32);
 802     ifn!("llvm.exp2.f64" fn(t_f64) -> t_f64);
 803     ifn!("llvm.log.f32" fn(t_f32) -> t_f32);
 804     ifn!("llvm.log.f64" fn(t_f64) -> t_f64);
 805     ifn!("llvm.log10.f32" fn(t_f32) -> t_f32);
 806     ifn!("llvm.log10.f64" fn(t_f64) -> t_f64);
 807     ifn!("llvm.log2.f32" fn(t_f32) -> t_f32);
 808     ifn!("llvm.log2.f64" fn(t_f64) -> t_f64);
 809
 810     ifn!("llvm.fma.f32" fn(t_f32, t_f32, t_f32) -> t_f32);
 811     ifn!("llvm.fma.f64" fn(t_f64, t_f64, t_f64) -> t_f64);
 812
 813     ifn!("llvm.fabs.f32" fn(t_f32) -> t_f32);
 814     ifn!("llvm.fabs.f64" fn(t_f64) -> t_f64);
 815
 816     ifn!("llvm.floor.f32" fn(t_f32) -> t_f32);
 817     ifn!("llvm.floor.f64" fn(t_f64) -> t_f64);
 818     ifn!("llvm.ceil.f32" fn(t_f32) -> t_f32);
 819     ifn!("llvm.ceil.f64" fn(t_f64) -> t_f64);
 820     ifn!("llvm.trunc.f32" fn(t_f32) -> t_f32);
 821     ifn!("llvm.trunc.f64" fn(t_f64) -> t_f64);
 822
 823     ifn!("llvm.rint.f32" fn(t_f32) -> t_f32);
 824     ifn!("llvm.rint.f64" fn(t_f64) -> t_f64);
 825     ifn!("llvm.nearbyint.f32" fn(t_f32) -> t_f32);
 826     ifn!("llvm.nearbyint.f64" fn(t_f64) -> t_f64);
 827
 828     ifn!("llvm.ctpop.i8" fn(t_i8) -> t_i8);
 829     ifn!("llvm.ctpop.i16" fn(t_i16) -> t_i16);
 830     ifn!("llvm.ctpop.i32" fn(t_i32) -> t_i32);
 831     ifn!("llvm.ctpop.i64" fn(t_i64) -> t_i64);
 832
 833     ifn!("llvm.ctlz.i8" fn(t_i8 , i1) -> t_i8);
 834     ifn!("llvm.ctlz.i16" fn(t_i16, i1) -> t_i16);
 835     ifn!("llvm.ctlz.i32" fn(t_i32, i1) -> t_i32);
 836     ifn!("llvm.ctlz.i64" fn(t_i64, i1) -> t_i64);
 837
 838     ifn!("llvm.cttz.i8" fn(t_i8 , i1) -> t_i8);
 839     ifn!("llvm.cttz.i16" fn(t_i16, i1) -> t_i16);
 840     ifn!("llvm.cttz.i32" fn(t_i32, i1) -> t_i32);
 841     ifn!("llvm.cttz.i64" fn(t_i64, i1) -> t_i64);
 842
 843     ifn!("llvm.bswap.i16" fn(t_i16) -> t_i16);
 844     ifn!("llvm.bswap.i32" fn(t_i32) -> t_i32);
 845     ifn!("llvm.bswap.i64" fn(t_i64) -> t_i64);
 846
 847     ifn!("llvm.sadd.with.overflow.i8" fn(t_i8, t_i8) -> mk_struct!{t_i8, i1});
 848     ifn!("llvm.sadd.with.overflow.i16" fn(t_i16, t_i16) -> mk_struct!{t_i16, i1});
 849     ifn!("llvm.sadd.with.overflow.i32" fn(t_i32, t_i32) -> mk_struct!{t_i32, i1});
 850     ifn!("llvm.sadd.with.overflow.i64" fn(t_i64, t_i64) -> mk_struct!{t_i64, i1});
 851
 852     ifn!("llvm.uadd.with.overflow.i8" fn(t_i8, t_i8) -> mk_struct!{t_i8, i1});
 853     ifn!("llvm.uadd.with.overflow.i16" fn(t_i16, t_i16) -> mk_struct!{t_i16, i1});
 854     ifn!("llvm.uadd.with.overflow.i32" fn(t_i32, t_i32) -> mk_struct!{t_i32, i1});
 855     ifn!("llvm.uadd.with.overflow.i64" fn(t_i64, t_i64) -> mk_struct!{t_i64, i1});
 856
 857     ifn!("llvm.ssub.with.overflow.i8" fn(t_i8, t_i8) -> mk_struct!{t_i8, i1});
 858     ifn!("llvm.ssub.with.overflow.i16" fn(t_i16, t_i16) -> mk_struct!{t_i16, i1});
 859     ifn!("llvm.ssub.with.overflow.i32" fn(t_i32, t_i32) -> mk_struct!{t_i32, i1});
 860     ifn!("llvm.ssub.with.overflow.i64" fn(t_i64, t_i64) -> mk_struct!{t_i64, i1});
 861
 862     ifn!("llvm.usub.with.overflow.i8" fn(t_i8, t_i8) -> mk_struct!{t_i8, i1});
 863     ifn!("llvm.usub.with.overflow.i16" fn(t_i16, t_i16) -> mk_struct!{t_i16, i1});
 864     ifn!("llvm.usub.with.overflow.i32" fn(t_i32, t_i32) -> mk_struct!{t_i32, i1});
 865     ifn!("llvm.usub.with.overflow.i64" fn(t_i64, t_i64) -> mk_struct!{t_i64, i1});
 866
 867     ifn!("llvm.smul.with.overflow.i8" fn(t_i8, t_i8) -> mk_struct!{t_i8, i1});
 868     ifn!("llvm.smul.with.overflow.i16" fn(t_i16, t_i16) -> mk_struct!{t_i16, i1});
 869     ifn!("llvm.smul.with.overflow.i32" fn(t_i32, t_i32) -> mk_struct!{t_i32, i1});
 870     ifn!("llvm.smul.with.overflow.i64" fn(t_i64, t_i64) -> mk_struct!{t_i64, i1});
 871
 872     ifn!("llvm.umul.with.overflow.i8" fn(t_i8, t_i8) -> mk_struct!{t_i8, i1});
 873     ifn!("llvm.umul.with.overflow.i16" fn(t_i16, t_i16) -> mk_struct!{t_i16, i1});
 874     ifn!("llvm.umul.with.overflow.i32" fn(t_i32, t_i32) -> mk_struct!{t_i32, i1});
 875     ifn!("llvm.umul.with.overflow.i64" fn(t_i64, t_i64) -> mk_struct!{t_i64, i1});
 876
 877     ifn!("llvm.lifetime.start" fn(t_i64,i8p) -> void);
 878     ifn!("llvm.lifetime.end" fn(t_i64, i8p) -> void);
 879
 880     ifn!("llvm.expect.i1" fn(i1, i1) -> i1);
 881     ifn!("llvm.assume" fn(i1) -> void);
 882
 883     // Some intrinsics were introduced in later versions of LLVM, but they have
 884     // fallbacks in libc or libm and such. Currently, all of these intrinsics
 885     // were introduced in LLVM 3.4, so we case on that.
 886     macro_rules! compatible_ifn (
 887         ($name:expr, $cname:ident ($($arg:expr),*) -> $ret:expr) => (
 888             if unsafe { llvm::LLVMVersionMinor() >= 4 } {
 889                 // The `if key == $name` is already in ifn!
 890                 ifn!($name fn($($arg),*) -> $ret);
 891             } else if *key == $name {
 892                 let f = base::decl_cdecl_fn(ccx, stringify!($cname),
 893                                       Type::func(&[$($arg),*], &$ret),
 894                                       ty::mk_nil(ccx.tcx()));
 895                 ccx.intrinsics().borrow_mut().insert($name, f.clone());
 896                 return Some(f);
 897             }
 898         )
 899     );
 900
 901     compatible_ifn!("llvm.copysign.f32", copysignf(t_f32, t_f32) -> t_f32);
 902     compatible_ifn!("llvm.copysign.f64", copysign(t_f64, t_f64) -> t_f64);
 903     compatible_ifn!("llvm.round.f32", roundf(t_f32) -> t_f32);
 904     compatible_ifn!("llvm.round.f64", round(t_f64) -> t_f64);
 905
 906
 907     if ccx.sess().opts.debuginfo != NoDebugInfo {
 908         ifn!("llvm.dbg.declare" fn(Type::metadata(ccx), Type::metadata(ccx)) -> void);
 909         ifn!("llvm.dbg.value" fn(Type::metadata(ccx), t_i64, Type::metadata(ccx)) -> void);
 910     }
 911     return None;
 912 }