]> git.lizzy.rs Git - rust.git/blob - src/librustc_trans/base.rs
Rollup merge of #40229 - cramertj:break-to-blocks, r=nikomatsakis
[rust.git] / src / librustc_trans / base.rs
1 // Copyright 2012-2015 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 //! Translate the completed AST to the LLVM IR.
12 //!
13 //! Some functions here, such as trans_block and trans_expr, return a value --
14 //! the result of the translation to LLVM -- while others, such as trans_fn
15 //! and trans_item, are called only for the side effect of adding a
16 //! particular definition to the LLVM IR output we're producing.
17 //!
18 //! Hopefully useful general knowledge about trans:
19 //!
20 //!   * There's no way to find out the Ty type of a ValueRef.  Doing so
21 //!     would be "trying to get the eggs out of an omelette" (credit:
22 //!     pcwalton).  You can, instead, find out its TypeRef by calling val_ty,
23 //!     but one TypeRef corresponds to many `Ty`s; for instance, tup(int, int,
24 //!     int) and rec(x=int, y=int, z=int) will have the same TypeRef.
25
26 use super::CrateTranslation;
27 use super::ModuleLlvm;
28 use super::ModuleSource;
29 use super::ModuleTranslation;
30
31 use assert_module_sources;
32 use back::link;
33 use back::linker::LinkerInfo;
34 use back::symbol_export::{self, ExportedSymbols};
35 use llvm::{Linkage, ValueRef, Vector, get_param};
36 use llvm;
37 use rustc::hir::def_id::LOCAL_CRATE;
38 use middle::lang_items::StartFnLangItem;
39 use rustc::ty::{self, Ty, TyCtxt};
40 use rustc::dep_graph::{AssertDepGraphSafe, DepNode, WorkProduct};
41 use rustc::hir::map as hir_map;
42 use rustc::util::common::time;
43 use session::config::{self, NoDebugInfo};
44 use rustc_incremental::IncrementalHashesMap;
45 use session::{self, DataTypeKind, Session};
46 use abi;
47 use mir::lvalue::LvalueRef;
48 use attributes;
49 use builder::Builder;
50 use callee;
51 use common::{C_bool, C_bytes_in_context, C_i32, C_uint};
52 use collector::{self, TransItemCollectionMode};
53 use common::{C_struct_in_context, C_u64, C_undef};
54 use common::CrateContext;
55 use common::{type_is_zero_size, val_ty};
56 use common;
57 use consts;
58 use context::{SharedCrateContext, CrateContextList};
59 use debuginfo;
60 use declare;
61 use machine;
62 use machine::llsize_of;
63 use meth;
64 use mir;
65 use monomorphize::{self, Instance};
66 use partitioning::{self, PartitioningStrategy, CodegenUnit};
67 use symbol_map::SymbolMap;
68 use symbol_names_test;
69 use trans_item::{TransItem, DefPathBasedNames};
70 use type_::Type;
71 use type_of;
72 use value::Value;
73 use util::nodemap::{NodeSet, FxHashMap, FxHashSet};
74
75 use libc::c_uint;
76 use std::ffi::{CStr, CString};
77 use std::rc::Rc;
78 use std::str;
79 use std::i32;
80 use syntax_pos::Span;
81 use syntax::attr;
82 use rustc::hir;
83 use rustc::ty::layout::{self, Layout};
84 use syntax::ast;
85
86 use mir::lvalue::Alignment;
87
88 pub struct StatRecorder<'a, 'tcx: 'a> {
89     ccx: &'a CrateContext<'a, 'tcx>,
90     name: Option<String>,
91     istart: usize,
92 }
93
94 impl<'a, 'tcx> StatRecorder<'a, 'tcx> {
95     pub fn new(ccx: &'a CrateContext<'a, 'tcx>, name: String) -> StatRecorder<'a, 'tcx> {
96         let istart = ccx.stats().n_llvm_insns.get();
97         StatRecorder {
98             ccx: ccx,
99             name: Some(name),
100             istart: istart,
101         }
102     }
103 }
104
105 impl<'a, 'tcx> Drop for StatRecorder<'a, 'tcx> {
106     fn drop(&mut self) {
107         if self.ccx.sess().trans_stats() {
108             let iend = self.ccx.stats().n_llvm_insns.get();
109             self.ccx.stats().fn_stats.borrow_mut()
110                 .push((self.name.take().unwrap(), iend - self.istart));
111             self.ccx.stats().n_fns.set(self.ccx.stats().n_fns.get() + 1);
112             // Reset LLVM insn count to avoid compound costs.
113             self.ccx.stats().n_llvm_insns.set(self.istart);
114         }
115     }
116 }
117
118 pub fn get_meta(bcx: &Builder, fat_ptr: ValueRef) -> ValueRef {
119     bcx.struct_gep(fat_ptr, abi::FAT_PTR_EXTRA)
120 }
121
122 pub fn get_dataptr(bcx: &Builder, fat_ptr: ValueRef) -> ValueRef {
123     bcx.struct_gep(fat_ptr, abi::FAT_PTR_ADDR)
124 }
125
126 pub fn bin_op_to_icmp_predicate(op: hir::BinOp_,
127                                 signed: bool)
128                                 -> llvm::IntPredicate {
129     match op {
130         hir::BiEq => llvm::IntEQ,
131         hir::BiNe => llvm::IntNE,
132         hir::BiLt => if signed { llvm::IntSLT } else { llvm::IntULT },
133         hir::BiLe => if signed { llvm::IntSLE } else { llvm::IntULE },
134         hir::BiGt => if signed { llvm::IntSGT } else { llvm::IntUGT },
135         hir::BiGe => if signed { llvm::IntSGE } else { llvm::IntUGE },
136         op => {
137             bug!("comparison_op_to_icmp_predicate: expected comparison operator, \
138                   found {:?}",
139                  op)
140         }
141     }
142 }
143
144 pub fn bin_op_to_fcmp_predicate(op: hir::BinOp_) -> llvm::RealPredicate {
145     match op {
146         hir::BiEq => llvm::RealOEQ,
147         hir::BiNe => llvm::RealUNE,
148         hir::BiLt => llvm::RealOLT,
149         hir::BiLe => llvm::RealOLE,
150         hir::BiGt => llvm::RealOGT,
151         hir::BiGe => llvm::RealOGE,
152         op => {
153             bug!("comparison_op_to_fcmp_predicate: expected comparison operator, \
154                   found {:?}",
155                  op);
156         }
157     }
158 }
159
160 pub fn compare_simd_types<'a, 'tcx>(
161     bcx: &Builder<'a, 'tcx>,
162     lhs: ValueRef,
163     rhs: ValueRef,
164     t: Ty<'tcx>,
165     ret_ty: Type,
166     op: hir::BinOp_
167 ) -> ValueRef {
168     let signed = match t.sty {
169         ty::TyFloat(_) => {
170             let cmp = bin_op_to_fcmp_predicate(op);
171             return bcx.sext(bcx.fcmp(cmp, lhs, rhs), ret_ty);
172         },
173         ty::TyUint(_) => false,
174         ty::TyInt(_) => true,
175         _ => bug!("compare_simd_types: invalid SIMD type"),
176     };
177
178     let cmp = bin_op_to_icmp_predicate(op, signed);
179     // LLVM outputs an `< size x i1 >`, so we need to perform a sign extension
180     // to get the correctly sized type. This will compile to a single instruction
181     // once the IR is converted to assembly if the SIMD instruction is supported
182     // by the target architecture.
183     bcx.sext(bcx.icmp(cmp, lhs, rhs), ret_ty)
184 }
185
186 /// Retrieve the information we are losing (making dynamic) in an unsizing
187 /// adjustment.
188 ///
189 /// The `old_info` argument is a bit funny. It is intended for use
190 /// in an upcast, where the new vtable for an object will be drived
191 /// from the old one.
192 pub fn unsized_info<'ccx, 'tcx>(ccx: &CrateContext<'ccx, 'tcx>,
193                                 source: Ty<'tcx>,
194                                 target: Ty<'tcx>,
195                                 old_info: Option<ValueRef>)
196                                 -> ValueRef {
197     let (source, target) = ccx.tcx().struct_lockstep_tails(source, target);
198     match (&source.sty, &target.sty) {
199         (&ty::TyArray(_, len), &ty::TySlice(_)) => C_uint(ccx, len),
200         (&ty::TyDynamic(..), &ty::TyDynamic(..)) => {
201             // For now, upcasts are limited to changes in marker
202             // traits, and hence never actually require an actual
203             // change to the vtable.
204             old_info.expect("unsized_info: missing old info for trait upcast")
205         }
206         (_, &ty::TyDynamic(ref data, ..)) => {
207             consts::ptrcast(meth::get_vtable(ccx, source, data.principal()),
208                             Type::vtable_ptr(ccx))
209         }
210         _ => bug!("unsized_info: invalid unsizing {:?} -> {:?}",
211                                      source,
212                                      target),
213     }
214 }
215
216 /// Coerce `src` to `dst_ty`. `src_ty` must be a thin pointer.
217 pub fn unsize_thin_ptr<'a, 'tcx>(
218     bcx: &Builder<'a, 'tcx>,
219     src: ValueRef,
220     src_ty: Ty<'tcx>,
221     dst_ty: Ty<'tcx>
222 ) -> (ValueRef, ValueRef) {
223     debug!("unsize_thin_ptr: {:?} => {:?}", src_ty, dst_ty);
224     match (&src_ty.sty, &dst_ty.sty) {
225         (&ty::TyRef(_, ty::TypeAndMut { ty: a, .. }),
226          &ty::TyRef(_, ty::TypeAndMut { ty: b, .. })) |
227         (&ty::TyRef(_, ty::TypeAndMut { ty: a, .. }),
228          &ty::TyRawPtr(ty::TypeAndMut { ty: b, .. })) |
229         (&ty::TyRawPtr(ty::TypeAndMut { ty: a, .. }),
230          &ty::TyRawPtr(ty::TypeAndMut { ty: b, .. })) => {
231             assert!(bcx.ccx.shared().type_is_sized(a));
232             let ptr_ty = type_of::in_memory_type_of(bcx.ccx, b).ptr_to();
233             (bcx.pointercast(src, ptr_ty), unsized_info(bcx.ccx, a, b, None))
234         }
235         (&ty::TyAdt(def_a, _), &ty::TyAdt(def_b, _)) if def_a.is_box() && def_b.is_box() => {
236             let (a, b) = (src_ty.boxed_ty(), dst_ty.boxed_ty());
237             assert!(bcx.ccx.shared().type_is_sized(a));
238             let ptr_ty = type_of::in_memory_type_of(bcx.ccx, b).ptr_to();
239             (bcx.pointercast(src, ptr_ty), unsized_info(bcx.ccx, a, b, None))
240         }
241         _ => bug!("unsize_thin_ptr: called on bad types"),
242     }
243 }
244
245 /// Coerce `src`, which is a reference to a value of type `src_ty`,
246 /// to a value of type `dst_ty` and store the result in `dst`
247 pub fn coerce_unsized_into<'a, 'tcx>(bcx: &Builder<'a, 'tcx>,
248                                      src: &LvalueRef<'tcx>,
249                                      dst: &LvalueRef<'tcx>) {
250     let src_ty = src.ty.to_ty(bcx.tcx());
251     let dst_ty = dst.ty.to_ty(bcx.tcx());
252     let coerce_ptr = || {
253         let (base, info) = if common::type_is_fat_ptr(bcx.ccx, src_ty) {
254             // fat-ptr to fat-ptr unsize preserves the vtable
255             // i.e. &'a fmt::Debug+Send => &'a fmt::Debug
256             // So we need to pointercast the base to ensure
257             // the types match up.
258             let (base, info) = load_fat_ptr(bcx, src.llval, src.alignment, src_ty);
259             let llcast_ty = type_of::fat_ptr_base_ty(bcx.ccx, dst_ty);
260             let base = bcx.pointercast(base, llcast_ty);
261             (base, info)
262         } else {
263             let base = load_ty(bcx, src.llval, src.alignment, src_ty);
264             unsize_thin_ptr(bcx, base, src_ty, dst_ty)
265         };
266         store_fat_ptr(bcx, base, info, dst.llval, dst.alignment, dst_ty);
267     };
268     match (&src_ty.sty, &dst_ty.sty) {
269         (&ty::TyRef(..), &ty::TyRef(..)) |
270         (&ty::TyRef(..), &ty::TyRawPtr(..)) |
271         (&ty::TyRawPtr(..), &ty::TyRawPtr(..)) => {
272             coerce_ptr()
273         }
274         (&ty::TyAdt(def_a, _), &ty::TyAdt(def_b, _)) if def_a.is_box() && def_b.is_box() => {
275             coerce_ptr()
276         }
277
278         (&ty::TyAdt(def_a, substs_a), &ty::TyAdt(def_b, substs_b)) => {
279             assert_eq!(def_a, def_b);
280
281             let src_fields = def_a.variants[0].fields.iter().map(|f| {
282                 monomorphize::field_ty(bcx.tcx(), substs_a, f)
283             });
284             let dst_fields = def_b.variants[0].fields.iter().map(|f| {
285                 monomorphize::field_ty(bcx.tcx(), substs_b, f)
286             });
287
288             let iter = src_fields.zip(dst_fields).enumerate();
289             for (i, (src_fty, dst_fty)) in iter {
290                 if type_is_zero_size(bcx.ccx, dst_fty) {
291                     continue;
292                 }
293
294                 let (src_f, src_f_align) = src.trans_field_ptr(bcx, i);
295                 let (dst_f, dst_f_align) = dst.trans_field_ptr(bcx, i);
296                 if src_fty == dst_fty {
297                     memcpy_ty(bcx, dst_f, src_f, src_fty, None);
298                 } else {
299                     coerce_unsized_into(
300                         bcx,
301                         &LvalueRef::new_sized_ty(src_f, src_fty, src_f_align),
302                         &LvalueRef::new_sized_ty(dst_f, dst_fty, dst_f_align)
303                     );
304                 }
305             }
306         }
307         _ => bug!("coerce_unsized_into: invalid coercion {:?} -> {:?}",
308                   src_ty,
309                   dst_ty),
310     }
311 }
312
313 pub fn cast_shift_expr_rhs(
314     cx: &Builder, op: hir::BinOp_, lhs: ValueRef, rhs: ValueRef
315 ) -> ValueRef {
316     cast_shift_rhs(op, lhs, rhs, |a, b| cx.trunc(a, b), |a, b| cx.zext(a, b))
317 }
318
319 pub fn cast_shift_const_rhs(op: hir::BinOp_, lhs: ValueRef, rhs: ValueRef) -> ValueRef {
320     cast_shift_rhs(op,
321                    lhs,
322                    rhs,
323                    |a, b| unsafe { llvm::LLVMConstTrunc(a, b.to_ref()) },
324                    |a, b| unsafe { llvm::LLVMConstZExt(a, b.to_ref()) })
325 }
326
327 fn cast_shift_rhs<F, G>(op: hir::BinOp_,
328                         lhs: ValueRef,
329                         rhs: ValueRef,
330                         trunc: F,
331                         zext: G)
332                         -> ValueRef
333     where F: FnOnce(ValueRef, Type) -> ValueRef,
334           G: FnOnce(ValueRef, Type) -> ValueRef
335 {
336     // Shifts may have any size int on the rhs
337     if op.is_shift() {
338         let mut rhs_llty = val_ty(rhs);
339         let mut lhs_llty = val_ty(lhs);
340         if rhs_llty.kind() == Vector {
341             rhs_llty = rhs_llty.element_type()
342         }
343         if lhs_llty.kind() == Vector {
344             lhs_llty = lhs_llty.element_type()
345         }
346         let rhs_sz = rhs_llty.int_width();
347         let lhs_sz = lhs_llty.int_width();
348         if lhs_sz < rhs_sz {
349             trunc(rhs, lhs_llty)
350         } else if lhs_sz > rhs_sz {
351             // FIXME (#1877: If shifting by negative
352             // values becomes not undefined then this is wrong.
353             zext(rhs, lhs_llty)
354         } else {
355             rhs
356         }
357     } else {
358         rhs
359     }
360 }
361
362 /// Returns whether this session's target will use SEH-based unwinding.
363 ///
364 /// This is only true for MSVC targets, and even then the 64-bit MSVC target
365 /// currently uses SEH-ish unwinding with DWARF info tables to the side (same as
366 /// 64-bit MinGW) instead of "full SEH".
367 pub fn wants_msvc_seh(sess: &Session) -> bool {
368     sess.target.target.options.is_like_msvc
369 }
370
371 pub fn call_assume<'a, 'tcx>(b: &Builder<'a, 'tcx>, val: ValueRef) {
372     let assume_intrinsic = b.ccx.get_intrinsic("llvm.assume");
373     b.call(assume_intrinsic, &[val], None);
374 }
375
376 /// Helper for loading values from memory. Does the necessary conversion if the in-memory type
377 /// differs from the type used for SSA values. Also handles various special cases where the type
378 /// gives us better information about what we are loading.
379 pub fn load_ty<'a, 'tcx>(b: &Builder<'a, 'tcx>, ptr: ValueRef,
380                          alignment: Alignment, t: Ty<'tcx>) -> ValueRef {
381     let ccx = b.ccx;
382     if type_is_zero_size(ccx, t) {
383         return C_undef(type_of::type_of(ccx, t));
384     }
385
386     unsafe {
387         let global = llvm::LLVMIsAGlobalVariable(ptr);
388         if !global.is_null() && llvm::LLVMIsGlobalConstant(global) == llvm::True {
389             let val = llvm::LLVMGetInitializer(global);
390             if !val.is_null() {
391                 if t.is_bool() {
392                     return llvm::LLVMConstTrunc(val, Type::i1(ccx).to_ref());
393                 }
394                 return val;
395             }
396         }
397     }
398
399     if t.is_bool() {
400         b.trunc(b.load_range_assert(ptr, 0, 2, llvm::False, alignment.to_align()),
401                 Type::i1(ccx))
402     } else if t.is_char() {
403         // a char is a Unicode codepoint, and so takes values from 0
404         // to 0x10FFFF inclusive only.
405         b.load_range_assert(ptr, 0, 0x10FFFF + 1, llvm::False, alignment.to_align())
406     } else if (t.is_region_ptr() || t.is_box() || t.is_fn())
407         && !common::type_is_fat_ptr(ccx, t)
408     {
409         b.load_nonnull(ptr, alignment.to_align())
410     } else {
411         b.load(ptr, alignment.to_align())
412     }
413 }
414
415 /// Helper for storing values in memory. Does the necessary conversion if the in-memory type
416 /// differs from the type used for SSA values.
417 pub fn store_ty<'a, 'tcx>(cx: &Builder<'a, 'tcx>, v: ValueRef, dst: ValueRef,
418                           dst_align: Alignment, t: Ty<'tcx>) {
419     debug!("store_ty: {:?} : {:?} <- {:?}", Value(dst), t, Value(v));
420
421     if common::type_is_fat_ptr(cx.ccx, t) {
422         let lladdr = cx.extract_value(v, abi::FAT_PTR_ADDR);
423         let llextra = cx.extract_value(v, abi::FAT_PTR_EXTRA);
424         store_fat_ptr(cx, lladdr, llextra, dst, dst_align, t);
425     } else {
426         cx.store(from_immediate(cx, v), dst, dst_align.to_align());
427     }
428 }
429
430 pub fn store_fat_ptr<'a, 'tcx>(cx: &Builder<'a, 'tcx>,
431                                data: ValueRef,
432                                extra: ValueRef,
433                                dst: ValueRef,
434                                dst_align: Alignment,
435                                _ty: Ty<'tcx>) {
436     // FIXME: emit metadata
437     cx.store(data, get_dataptr(cx, dst), dst_align.to_align());
438     cx.store(extra, get_meta(cx, dst), dst_align.to_align());
439 }
440
441 pub fn load_fat_ptr<'a, 'tcx>(
442     b: &Builder<'a, 'tcx>, src: ValueRef, alignment: Alignment, t: Ty<'tcx>
443 ) -> (ValueRef, ValueRef) {
444     let ptr = get_dataptr(b, src);
445     let ptr = if t.is_region_ptr() || t.is_box() {
446         b.load_nonnull(ptr, alignment.to_align())
447     } else {
448         b.load(ptr, alignment.to_align())
449     };
450
451     let meta = get_meta(b, src);
452     let meta_ty = val_ty(meta);
453     // If the 'meta' field is a pointer, it's a vtable, so use load_nonnull
454     // instead
455     let meta = if meta_ty.element_type().kind() == llvm::TypeKind::Pointer {
456         b.load_nonnull(meta, None)
457     } else {
458         b.load(meta, None)
459     };
460
461     (ptr, meta)
462 }
463
464 pub fn from_immediate(bcx: &Builder, val: ValueRef) -> ValueRef {
465     if val_ty(val) == Type::i1(bcx.ccx) {
466         bcx.zext(val, Type::i8(bcx.ccx))
467     } else {
468         val
469     }
470 }
471
472 pub fn to_immediate(bcx: &Builder, val: ValueRef, ty: Ty) -> ValueRef {
473     if ty.is_bool() {
474         bcx.trunc(val, Type::i1(bcx.ccx))
475     } else {
476         val
477     }
478 }
479
480 pub enum Lifetime { Start, End }
481
482 impl Lifetime {
483     // If LLVM lifetime intrinsic support is enabled (i.e. optimizations
484     // on), and `ptr` is nonzero-sized, then extracts the size of `ptr`
485     // and the intrinsic for `lt` and passes them to `emit`, which is in
486     // charge of generating code to call the passed intrinsic on whatever
487     // block of generated code is targetted for the intrinsic.
488     //
489     // If LLVM lifetime intrinsic support is disabled (i.e.  optimizations
490     // off) or `ptr` is zero-sized, then no-op (does not call `emit`).
491     pub fn call(self, b: &Builder, ptr: ValueRef) {
492         if b.ccx.sess().opts.optimize == config::OptLevel::No {
493             return;
494         }
495
496         let size = machine::llsize_of_alloc(b.ccx, val_ty(ptr).element_type());
497         if size == 0 {
498             return;
499         }
500
501         let lifetime_intrinsic = b.ccx.get_intrinsic(match self {
502             Lifetime::Start => "llvm.lifetime.start",
503             Lifetime::End => "llvm.lifetime.end"
504         });
505
506         let ptr = b.pointercast(ptr, Type::i8p(b.ccx));
507         b.call(lifetime_intrinsic, &[C_u64(b.ccx, size), ptr], None);
508     }
509 }
510
511 pub fn call_memcpy<'a, 'tcx>(b: &Builder<'a, 'tcx>,
512                                dst: ValueRef,
513                                src: ValueRef,
514                                n_bytes: ValueRef,
515                                align: u32) {
516     let ccx = b.ccx;
517     let ptr_width = &ccx.sess().target.target.target_pointer_width[..];
518     let key = format!("llvm.memcpy.p0i8.p0i8.i{}", ptr_width);
519     let memcpy = ccx.get_intrinsic(&key);
520     let src_ptr = b.pointercast(src, Type::i8p(ccx));
521     let dst_ptr = b.pointercast(dst, Type::i8p(ccx));
522     let size = b.intcast(n_bytes, ccx.int_type(), false);
523     let align = C_i32(ccx, align as i32);
524     let volatile = C_bool(ccx, false);
525     b.call(memcpy, &[dst_ptr, src_ptr, size, align, volatile], None);
526 }
527
528 pub fn memcpy_ty<'a, 'tcx>(
529     bcx: &Builder<'a, 'tcx>,
530     dst: ValueRef,
531     src: ValueRef,
532     t: Ty<'tcx>,
533     align: Option<u32>,
534 ) {
535     let ccx = bcx.ccx;
536
537     if type_is_zero_size(ccx, t) {
538         return;
539     }
540
541     let llty = type_of::type_of(ccx, t);
542     let llsz = llsize_of(ccx, llty);
543     let llalign = align.unwrap_or_else(|| type_of::align_of(ccx, t));
544     call_memcpy(bcx, dst, src, llsz, llalign as u32);
545 }
546
547 pub fn call_memset<'a, 'tcx>(b: &Builder<'a, 'tcx>,
548                              ptr: ValueRef,
549                              fill_byte: ValueRef,
550                              size: ValueRef,
551                              align: ValueRef,
552                              volatile: bool) -> ValueRef {
553     let ptr_width = &b.ccx.sess().target.target.target_pointer_width[..];
554     let intrinsic_key = format!("llvm.memset.p0i8.i{}", ptr_width);
555     let llintrinsicfn = b.ccx.get_intrinsic(&intrinsic_key);
556     let volatile = C_bool(b.ccx, volatile);
557     b.call(llintrinsicfn, &[ptr, fill_byte, size, align, volatile], None)
558 }
559
560 pub fn trans_instance<'a, 'tcx>(ccx: &CrateContext<'a, 'tcx>, instance: Instance<'tcx>) {
561     let _s = if ccx.sess().trans_stats() {
562         let mut instance_name = String::new();
563         DefPathBasedNames::new(ccx.tcx(), true, true)
564             .push_def_path(instance.def_id(), &mut instance_name);
565         Some(StatRecorder::new(ccx, instance_name))
566     } else {
567         None
568     };
569
570     // this is an info! to allow collecting monomorphization statistics
571     // and to allow finding the last function before LLVM aborts from
572     // release builds.
573     info!("trans_instance({})", instance);
574
575     let fn_ty = common::instance_ty(ccx.shared(), &instance);
576     let sig = common::ty_fn_sig(ccx, fn_ty);
577     let sig = ccx.tcx().erase_late_bound_regions_and_normalize(&sig);
578
579     let lldecl = match ccx.instances().borrow().get(&instance) {
580         Some(&val) => val,
581         None => bug!("Instance `{:?}` not already declared", instance)
582     };
583
584     ccx.stats().n_closures.set(ccx.stats().n_closures.get() + 1);
585
586     if !ccx.sess().no_landing_pads() {
587         attributes::emit_uwtable(lldecl, true);
588     }
589
590     let mir = ccx.tcx().instance_mir(instance.def);
591     mir::trans_mir(ccx, lldecl, &mir, instance, sig);
592 }
593
594 pub fn llvm_linkage_by_name(name: &str) -> Option<Linkage> {
595     // Use the names from src/llvm/docs/LangRef.rst here. Most types are only
596     // applicable to variable declarations and may not really make sense for
597     // Rust code in the first place but whitelist them anyway and trust that
598     // the user knows what s/he's doing. Who knows, unanticipated use cases
599     // may pop up in the future.
600     //
601     // ghost, dllimport, dllexport and linkonce_odr_autohide are not supported
602     // and don't have to be, LLVM treats them as no-ops.
603     match name {
604         "appending" => Some(llvm::Linkage::AppendingLinkage),
605         "available_externally" => Some(llvm::Linkage::AvailableExternallyLinkage),
606         "common" => Some(llvm::Linkage::CommonLinkage),
607         "extern_weak" => Some(llvm::Linkage::ExternalWeakLinkage),
608         "external" => Some(llvm::Linkage::ExternalLinkage),
609         "internal" => Some(llvm::Linkage::InternalLinkage),
610         "linkonce" => Some(llvm::Linkage::LinkOnceAnyLinkage),
611         "linkonce_odr" => Some(llvm::Linkage::LinkOnceODRLinkage),
612         "private" => Some(llvm::Linkage::PrivateLinkage),
613         "weak" => Some(llvm::Linkage::WeakAnyLinkage),
614         "weak_odr" => Some(llvm::Linkage::WeakODRLinkage),
615         _ => None,
616     }
617 }
618
619 pub fn set_link_section(ccx: &CrateContext,
620                         llval: ValueRef,
621                         attrs: &[ast::Attribute]) {
622     if let Some(sect) = attr::first_attr_value_str_by_name(attrs, "link_section") {
623         if contains_null(&sect.as_str()) {
624             ccx.sess().fatal(&format!("Illegal null byte in link_section value: `{}`", &sect));
625         }
626         unsafe {
627             let buf = CString::new(sect.as_str().as_bytes()).unwrap();
628             llvm::LLVMSetSection(llval, buf.as_ptr());
629         }
630     }
631 }
632
633 /// Create the `main` function which will initialise the rust runtime and call
634 /// users main function.
635 pub fn maybe_create_entry_wrapper(ccx: &CrateContext) {
636     let (main_def_id, span) = match *ccx.sess().entry_fn.borrow() {
637         Some((id, span)) => {
638             (ccx.tcx().hir.local_def_id(id), span)
639         }
640         None => return,
641     };
642
643     // check for the #[rustc_error] annotation, which forces an
644     // error in trans. This is used to write compile-fail tests
645     // that actually test that compilation succeeds without
646     // reporting an error.
647     if ccx.tcx().has_attr(main_def_id, "rustc_error") {
648         ccx.tcx().sess.span_fatal(span, "compilation successful");
649     }
650
651     let instance = Instance::mono(ccx.tcx(), main_def_id);
652
653     if !ccx.codegen_unit().contains_item(&TransItem::Fn(instance)) {
654         // We want to create the wrapper in the same codegen unit as Rust's main
655         // function.
656         return;
657     }
658
659     let main_llfn = callee::get_fn(ccx, instance);
660
661     let et = ccx.sess().entry_type.get().unwrap();
662     match et {
663         config::EntryMain => create_entry_fn(ccx, span, main_llfn, true),
664         config::EntryStart => create_entry_fn(ccx, span, main_llfn, false),
665         config::EntryNone => {}    // Do nothing.
666     }
667
668     fn create_entry_fn(ccx: &CrateContext,
669                        sp: Span,
670                        rust_main: ValueRef,
671                        use_start_lang_item: bool) {
672         let llfty = Type::func(&[ccx.int_type(), Type::i8p(ccx).ptr_to()], &ccx.int_type());
673
674         if declare::get_defined_value(ccx, "main").is_some() {
675             // FIXME: We should be smart and show a better diagnostic here.
676             ccx.sess().struct_span_err(sp, "entry symbol `main` defined multiple times")
677                       .help("did you use #[no_mangle] on `fn main`? Use #[start] instead")
678                       .emit();
679             ccx.sess().abort_if_errors();
680             bug!();
681         }
682         let llfn = declare::declare_cfn(ccx, "main", llfty);
683
684         // `main` should respect same config for frame pointer elimination as rest of code
685         attributes::set_frame_pointer_elimination(ccx, llfn);
686
687         let bld = Builder::new_block(ccx, llfn, "top");
688
689         debuginfo::gdb::insert_reference_to_gdb_debug_scripts_section_global(ccx, &bld);
690
691         let (start_fn, args) = if use_start_lang_item {
692             let start_def_id = ccx.tcx().require_lang_item(StartFnLangItem);
693             let start_instance = Instance::mono(ccx.tcx(), start_def_id);
694             let start_fn = callee::get_fn(ccx, start_instance);
695             (start_fn, vec![bld.pointercast(rust_main, Type::i8p(ccx).ptr_to()), get_param(llfn, 0),
696                 get_param(llfn, 1)])
697         } else {
698             debug!("using user-defined start fn");
699             (rust_main, vec![get_param(llfn, 0 as c_uint), get_param(llfn, 1 as c_uint)])
700         };
701
702         let result = bld.call(start_fn, &args, None);
703         bld.ret(result);
704     }
705 }
706
707 fn contains_null(s: &str) -> bool {
708     s.bytes().any(|b| b == 0)
709 }
710
711 fn write_metadata(cx: &SharedCrateContext,
712                   exported_symbols: &NodeSet) -> Vec<u8> {
713     use flate;
714
715     #[derive(PartialEq, Eq, PartialOrd, Ord)]
716     enum MetadataKind {
717         None,
718         Uncompressed,
719         Compressed
720     }
721
722     let kind = cx.sess().crate_types.borrow().iter().map(|ty| {
723         match *ty {
724             config::CrateTypeExecutable |
725             config::CrateTypeStaticlib |
726             config::CrateTypeCdylib => MetadataKind::None,
727
728             config::CrateTypeRlib => MetadataKind::Uncompressed,
729
730             config::CrateTypeDylib |
731             config::CrateTypeProcMacro => MetadataKind::Compressed,
732         }
733     }).max().unwrap();
734
735     if kind == MetadataKind::None {
736         return Vec::new();
737     }
738
739     let cstore = &cx.tcx().sess.cstore;
740     let metadata = cstore.encode_metadata(cx.tcx(),
741                                           cx.export_map(),
742                                           cx.link_meta(),
743                                           exported_symbols);
744     if kind == MetadataKind::Uncompressed {
745         return metadata;
746     }
747
748     assert!(kind == MetadataKind::Compressed);
749     let mut compressed = cstore.metadata_encoding_version().to_vec();
750     compressed.extend_from_slice(&flate::deflate_bytes(&metadata));
751
752     let llmeta = C_bytes_in_context(cx.metadata_llcx(), &compressed[..]);
753     let llconst = C_struct_in_context(cx.metadata_llcx(), &[llmeta], false);
754     let name = cx.metadata_symbol_name();
755     let buf = CString::new(name).unwrap();
756     let llglobal = unsafe {
757         llvm::LLVMAddGlobal(cx.metadata_llmod(), val_ty(llconst).to_ref(), buf.as_ptr())
758     };
759     unsafe {
760         llvm::LLVMSetInitializer(llglobal, llconst);
761         let section_name =
762             cx.tcx().sess.cstore.metadata_section_name(&cx.sess().target.target);
763         let name = CString::new(section_name).unwrap();
764         llvm::LLVMSetSection(llglobal, name.as_ptr());
765
766         // Also generate a .section directive to force no
767         // flags, at least for ELF outputs, so that the
768         // metadata doesn't get loaded into memory.
769         let directive = format!(".section {}", section_name);
770         let directive = CString::new(directive).unwrap();
771         llvm::LLVMSetModuleInlineAsm(cx.metadata_llmod(), directive.as_ptr())
772     }
773     return metadata;
774 }
775
776 /// Find any symbols that are defined in one compilation unit, but not declared
777 /// in any other compilation unit.  Give these symbols internal linkage.
778 fn internalize_symbols<'a, 'tcx>(sess: &Session,
779                                  ccxs: &CrateContextList<'a, 'tcx>,
780                                  symbol_map: &SymbolMap<'tcx>,
781                                  exported_symbols: &ExportedSymbols) {
782     let export_threshold =
783         symbol_export::crates_export_threshold(&sess.crate_types.borrow()[..]);
784
785     let exported_symbols = exported_symbols
786         .exported_symbols(LOCAL_CRATE)
787         .iter()
788         .filter(|&&(_, export_level)| {
789             symbol_export::is_below_threshold(export_level, export_threshold)
790         })
791         .map(|&(ref name, _)| &name[..])
792         .collect::<FxHashSet<&str>>();
793
794     let scx = ccxs.shared();
795     let tcx = scx.tcx();
796
797     let incr_comp = sess.opts.debugging_opts.incremental.is_some();
798
799     // 'unsafe' because we are holding on to CStr's from the LLVM module within
800     // this block.
801     unsafe {
802         let mut referenced_somewhere = FxHashSet();
803
804         // Collect all symbols that need to stay externally visible because they
805         // are referenced via a declaration in some other codegen unit. In
806         // incremental compilation, we don't need to collect. See below for more
807         // information.
808         if !incr_comp {
809             for ccx in ccxs.iter_need_trans() {
810                 for val in iter_globals(ccx.llmod()).chain(iter_functions(ccx.llmod())) {
811                     let linkage = llvm::LLVMRustGetLinkage(val);
812                     // We only care about external declarations (not definitions)
813                     // and available_externally definitions.
814                     let is_available_externally =
815                         linkage == llvm::Linkage::AvailableExternallyLinkage;
816                     let is_decl = llvm::LLVMIsDeclaration(val) == llvm::True;
817
818                     if is_decl || is_available_externally {
819                         let symbol_name = CStr::from_ptr(llvm::LLVMGetValueName(val));
820                         referenced_somewhere.insert(symbol_name);
821                     }
822                 }
823             }
824         }
825
826         // Also collect all symbols for which we cannot adjust linkage, because
827         // it is fixed by some directive in the source code.
828         let (locally_defined_symbols, linkage_fixed_explicitly) = {
829             let mut locally_defined_symbols = FxHashSet();
830             let mut linkage_fixed_explicitly = FxHashSet();
831
832             for trans_item in scx.translation_items().borrow().iter() {
833                 let symbol_name = symbol_map.get_or_compute(scx, *trans_item);
834                 if trans_item.explicit_linkage(tcx).is_some() {
835                     linkage_fixed_explicitly.insert(symbol_name.clone());
836                 }
837                 locally_defined_symbols.insert(symbol_name);
838             }
839
840             (locally_defined_symbols, linkage_fixed_explicitly)
841         };
842
843         // Examine each external definition.  If the definition is not used in
844         // any other compilation unit, and is not reachable from other crates,
845         // then give it internal linkage.
846         for ccx in ccxs.iter_need_trans() {
847             for val in iter_globals(ccx.llmod()).chain(iter_functions(ccx.llmod())) {
848                 let linkage = llvm::LLVMRustGetLinkage(val);
849
850                 let is_externally_visible = (linkage == llvm::Linkage::ExternalLinkage) ||
851                                             (linkage == llvm::Linkage::LinkOnceODRLinkage) ||
852                                             (linkage == llvm::Linkage::WeakODRLinkage);
853
854                 if !is_externally_visible {
855                     // This symbol is not visible outside of its codegen unit,
856                     // so there is nothing to do for it.
857                     continue;
858                 }
859
860                 let name_cstr = CStr::from_ptr(llvm::LLVMGetValueName(val));
861                 let name_str = name_cstr.to_str().unwrap();
862
863                 if exported_symbols.contains(&name_str) {
864                     // This symbol is explicitly exported, so we can't
865                     // mark it as internal or hidden.
866                     continue;
867                 }
868
869                 let is_declaration = llvm::LLVMIsDeclaration(val) == llvm::True;
870
871                 if is_declaration {
872                     if locally_defined_symbols.contains(name_str) {
873                         // Only mark declarations from the current crate as hidden.
874                         // Otherwise we would mark things as hidden that are
875                         // imported from other crates or native libraries.
876                         llvm::LLVMRustSetVisibility(val, llvm::Visibility::Hidden);
877                     }
878                 } else {
879                     let has_fixed_linkage = linkage_fixed_explicitly.contains(name_str);
880
881                     if !has_fixed_linkage {
882                         // In incremental compilation mode, we can't be sure that
883                         // we saw all references because we don't know what's in
884                         // cached compilation units, so we always assume that the
885                         // given item has been referenced.
886                         if incr_comp || referenced_somewhere.contains(&name_cstr) {
887                             llvm::LLVMRustSetVisibility(val, llvm::Visibility::Hidden);
888                         } else {
889                             llvm::LLVMRustSetLinkage(val, llvm::Linkage::InternalLinkage);
890                         }
891
892                         llvm::LLVMSetDLLStorageClass(val, llvm::DLLStorageClass::Default);
893                         llvm::UnsetComdat(val);
894                     }
895                 }
896             }
897         }
898     }
899 }
900
901 // Create a `__imp_<symbol> = &symbol` global for every public static `symbol`.
902 // This is required to satisfy `dllimport` references to static data in .rlibs
903 // when using MSVC linker.  We do this only for data, as linker can fix up
904 // code references on its own.
905 // See #26591, #27438
906 fn create_imps(cx: &CrateContextList) {
907     // The x86 ABI seems to require that leading underscores are added to symbol
908     // names, so we need an extra underscore on 32-bit. There's also a leading
909     // '\x01' here which disables LLVM's symbol mangling (e.g. no extra
910     // underscores added in front).
911     let prefix = if cx.shared().sess().target.target.target_pointer_width == "32" {
912         "\x01__imp__"
913     } else {
914         "\x01__imp_"
915     };
916     unsafe {
917         for ccx in cx.iter_need_trans() {
918             let exported: Vec<_> = iter_globals(ccx.llmod())
919                                        .filter(|&val| {
920                                            llvm::LLVMRustGetLinkage(val) ==
921                                            llvm::Linkage::ExternalLinkage &&
922                                            llvm::LLVMIsDeclaration(val) == 0
923                                        })
924                                        .collect();
925
926             let i8p_ty = Type::i8p(&ccx);
927             for val in exported {
928                 let name = CStr::from_ptr(llvm::LLVMGetValueName(val));
929                 let mut imp_name = prefix.as_bytes().to_vec();
930                 imp_name.extend(name.to_bytes());
931                 let imp_name = CString::new(imp_name).unwrap();
932                 let imp = llvm::LLVMAddGlobal(ccx.llmod(),
933                                               i8p_ty.to_ref(),
934                                               imp_name.as_ptr() as *const _);
935                 let init = llvm::LLVMConstBitCast(val, i8p_ty.to_ref());
936                 llvm::LLVMSetInitializer(imp, init);
937                 llvm::LLVMRustSetLinkage(imp, llvm::Linkage::ExternalLinkage);
938             }
939         }
940     }
941 }
942
943 struct ValueIter {
944     cur: ValueRef,
945     step: unsafe extern "C" fn(ValueRef) -> ValueRef,
946 }
947
948 impl Iterator for ValueIter {
949     type Item = ValueRef;
950
951     fn next(&mut self) -> Option<ValueRef> {
952         let old = self.cur;
953         if !old.is_null() {
954             self.cur = unsafe { (self.step)(old) };
955             Some(old)
956         } else {
957             None
958         }
959     }
960 }
961
962 fn iter_globals(llmod: llvm::ModuleRef) -> ValueIter {
963     unsafe {
964         ValueIter {
965             cur: llvm::LLVMGetFirstGlobal(llmod),
966             step: llvm::LLVMGetNextGlobal,
967         }
968     }
969 }
970
971 fn iter_functions(llmod: llvm::ModuleRef) -> ValueIter {
972     unsafe {
973         ValueIter {
974             cur: llvm::LLVMGetFirstFunction(llmod),
975             step: llvm::LLVMGetNextFunction,
976         }
977     }
978 }
979
980 /// The context provided lists a set of reachable ids as calculated by
981 /// middle::reachable, but this contains far more ids and symbols than we're
982 /// actually exposing from the object file. This function will filter the set in
983 /// the context to the set of ids which correspond to symbols that are exposed
984 /// from the object file being generated.
985 ///
986 /// This list is later used by linkers to determine the set of symbols needed to
987 /// be exposed from a dynamic library and it's also encoded into the metadata.
988 pub fn find_exported_symbols(tcx: TyCtxt, reachable: NodeSet) -> NodeSet {
989     reachable.into_iter().filter(|&id| {
990         // Next, we want to ignore some FFI functions that are not exposed from
991         // this crate. Reachable FFI functions can be lumped into two
992         // categories:
993         //
994         // 1. Those that are included statically via a static library
995         // 2. Those included otherwise (e.g. dynamically or via a framework)
996         //
997         // Although our LLVM module is not literally emitting code for the
998         // statically included symbols, it's an export of our library which
999         // needs to be passed on to the linker and encoded in the metadata.
1000         //
1001         // As a result, if this id is an FFI item (foreign item) then we only
1002         // let it through if it's included statically.
1003         match tcx.hir.get(id) {
1004             hir_map::NodeForeignItem(..) => {
1005                 let def_id = tcx.hir.local_def_id(id);
1006                 tcx.sess.cstore.is_statically_included_foreign_item(def_id)
1007             }
1008
1009             // Only consider nodes that actually have exported symbols.
1010             hir_map::NodeItem(&hir::Item {
1011                 node: hir::ItemStatic(..), .. }) |
1012             hir_map::NodeItem(&hir::Item {
1013                 node: hir::ItemFn(..), .. }) |
1014             hir_map::NodeImplItem(&hir::ImplItem {
1015                 node: hir::ImplItemKind::Method(..), .. }) => {
1016                 let def_id = tcx.hir.local_def_id(id);
1017                 let generics = tcx.item_generics(def_id);
1018                 let attributes = tcx.get_attrs(def_id);
1019                 (generics.parent_types == 0 && generics.types.is_empty()) &&
1020                 // Functions marked with #[inline] are only ever translated
1021                 // with "internal" linkage and are never exported.
1022                 !attr::requests_inline(&attributes[..])
1023             }
1024
1025             _ => false
1026         }
1027     }).collect()
1028 }
1029
1030 pub fn trans_crate<'a, 'tcx>(tcx: TyCtxt<'a, 'tcx, 'tcx>,
1031                              analysis: ty::CrateAnalysis,
1032                              incremental_hashes_map: &IncrementalHashesMap)
1033                              -> CrateTranslation {
1034     let _task = tcx.dep_graph.in_task(DepNode::TransCrate);
1035
1036     // Be careful with this krate: obviously it gives access to the
1037     // entire contents of the krate. So if you push any subtasks of
1038     // `TransCrate`, you need to be careful to register "reads" of the
1039     // particular items that will be processed.
1040     let krate = tcx.hir.krate();
1041
1042     let ty::CrateAnalysis { export_map, reachable, name, .. } = analysis;
1043     let exported_symbols = find_exported_symbols(tcx, reachable);
1044
1045     let check_overflow = tcx.sess.overflow_checks();
1046
1047     let link_meta = link::build_link_meta(incremental_hashes_map, &name);
1048
1049     let shared_ccx = SharedCrateContext::new(tcx,
1050                                              export_map,
1051                                              link_meta.clone(),
1052                                              exported_symbols,
1053                                              check_overflow);
1054     // Translate the metadata.
1055     let metadata = time(tcx.sess.time_passes(), "write metadata", || {
1056         write_metadata(&shared_ccx, shared_ccx.exported_symbols())
1057     });
1058
1059     let metadata_module = ModuleTranslation {
1060         name: link::METADATA_MODULE_NAME.to_string(),
1061         symbol_name_hash: 0, // we always rebuild metadata, at least for now
1062         source: ModuleSource::Translated(ModuleLlvm {
1063             llcx: shared_ccx.metadata_llcx(),
1064             llmod: shared_ccx.metadata_llmod(),
1065         }),
1066     };
1067     let no_builtins = attr::contains_name(&krate.attrs, "no_builtins");
1068
1069     // Skip crate items and just output metadata in -Z no-trans mode.
1070     if tcx.sess.opts.debugging_opts.no_trans ||
1071        !tcx.sess.opts.output_types.should_trans() {
1072         let empty_exported_symbols = ExportedSymbols::empty();
1073         let linker_info = LinkerInfo::new(&shared_ccx, &empty_exported_symbols);
1074         return CrateTranslation {
1075             modules: vec![],
1076             metadata_module: metadata_module,
1077             link: link_meta,
1078             metadata: metadata,
1079             exported_symbols: empty_exported_symbols,
1080             no_builtins: no_builtins,
1081             linker_info: linker_info,
1082             windows_subsystem: None,
1083         };
1084     }
1085
1086     // Run the translation item collector and partition the collected items into
1087     // codegen units.
1088     let (codegen_units, symbol_map) = collect_and_partition_translation_items(&shared_ccx);
1089
1090     let symbol_map = Rc::new(symbol_map);
1091
1092     let previous_work_products = trans_reuse_previous_work_products(&shared_ccx,
1093                                                                     &codegen_units,
1094                                                                     &symbol_map);
1095
1096     let crate_context_list = CrateContextList::new(&shared_ccx,
1097                                                    codegen_units,
1098                                                    previous_work_products,
1099                                                    symbol_map.clone());
1100     let modules: Vec<_> = crate_context_list.iter_all()
1101         .map(|ccx| {
1102             let source = match ccx.previous_work_product() {
1103                 Some(buf) => ModuleSource::Preexisting(buf.clone()),
1104                 None => ModuleSource::Translated(ModuleLlvm {
1105                     llcx: ccx.llcx(),
1106                     llmod: ccx.llmod(),
1107                 }),
1108             };
1109
1110             ModuleTranslation {
1111                 name: String::from(ccx.codegen_unit().name()),
1112                 symbol_name_hash: ccx.codegen_unit()
1113                                      .compute_symbol_name_hash(&shared_ccx,
1114                                                                &symbol_map),
1115                 source: source,
1116             }
1117         })
1118         .collect();
1119
1120     assert_module_sources::assert_module_sources(tcx, &modules);
1121
1122     // Instantiate translation items without filling out definitions yet...
1123     for ccx in crate_context_list.iter_need_trans() {
1124         let dep_node = ccx.codegen_unit().work_product_dep_node();
1125         tcx.dep_graph.with_task(dep_node,
1126                                 ccx,
1127                                 AssertDepGraphSafe(symbol_map.clone()),
1128                                 trans_decl_task);
1129
1130         fn trans_decl_task<'a, 'tcx>(ccx: CrateContext<'a, 'tcx>,
1131                                      symbol_map: AssertDepGraphSafe<Rc<SymbolMap<'tcx>>>) {
1132             // FIXME(#40304): Instead of this, the symbol-map should be an
1133             // on-demand thing that we compute.
1134             let AssertDepGraphSafe(symbol_map) = symbol_map;
1135             let cgu = ccx.codegen_unit();
1136             let trans_items = cgu.items_in_deterministic_order(ccx.tcx(), &symbol_map);
1137             for (trans_item, linkage) in trans_items {
1138                 trans_item.predefine(&ccx, linkage);
1139             }
1140         }
1141     }
1142
1143     // ... and now that we have everything pre-defined, fill out those definitions.
1144     for ccx in crate_context_list.iter_need_trans() {
1145         let dep_node = ccx.codegen_unit().work_product_dep_node();
1146         tcx.dep_graph.with_task(dep_node,
1147                                 ccx,
1148                                 AssertDepGraphSafe(symbol_map.clone()),
1149                                 trans_def_task);
1150
1151         fn trans_def_task<'a, 'tcx>(ccx: CrateContext<'a, 'tcx>,
1152                                     symbol_map: AssertDepGraphSafe<Rc<SymbolMap<'tcx>>>) {
1153             // FIXME(#40304): Instead of this, the symbol-map should be an
1154             // on-demand thing that we compute.
1155             let AssertDepGraphSafe(symbol_map) = symbol_map;
1156             let cgu = ccx.codegen_unit();
1157             let trans_items = cgu.items_in_deterministic_order(ccx.tcx(), &symbol_map);
1158             for (trans_item, _) in trans_items {
1159                 trans_item.define(&ccx);
1160             }
1161
1162             // If this codegen unit contains the main function, also create the
1163             // wrapper here
1164             maybe_create_entry_wrapper(&ccx);
1165
1166             // Run replace-all-uses-with for statics that need it
1167             for &(old_g, new_g) in ccx.statics_to_rauw().borrow().iter() {
1168                 unsafe {
1169                     let bitcast = llvm::LLVMConstPointerCast(new_g, llvm::LLVMTypeOf(old_g));
1170                     llvm::LLVMReplaceAllUsesWith(old_g, bitcast);
1171                     llvm::LLVMDeleteGlobal(old_g);
1172                 }
1173             }
1174
1175             // Finalize debuginfo
1176             if ccx.sess().opts.debuginfo != NoDebugInfo {
1177                 debuginfo::finalize(&ccx);
1178             }
1179         }
1180     }
1181
1182     symbol_names_test::report_symbol_names(&shared_ccx);
1183
1184     if shared_ccx.sess().trans_stats() {
1185         let stats = shared_ccx.stats();
1186         println!("--- trans stats ---");
1187         println!("n_glues_created: {}", stats.n_glues_created.get());
1188         println!("n_null_glues: {}", stats.n_null_glues.get());
1189         println!("n_real_glues: {}", stats.n_real_glues.get());
1190
1191         println!("n_fns: {}", stats.n_fns.get());
1192         println!("n_inlines: {}", stats.n_inlines.get());
1193         println!("n_closures: {}", stats.n_closures.get());
1194         println!("fn stats:");
1195         stats.fn_stats.borrow_mut().sort_by(|&(_, insns_a), &(_, insns_b)| {
1196             insns_b.cmp(&insns_a)
1197         });
1198         for tuple in stats.fn_stats.borrow().iter() {
1199             match *tuple {
1200                 (ref name, insns) => {
1201                     println!("{} insns, {}", insns, *name);
1202                 }
1203             }
1204         }
1205     }
1206
1207     if shared_ccx.sess().count_llvm_insns() {
1208         for (k, v) in shared_ccx.stats().llvm_insns.borrow().iter() {
1209             println!("{:7} {}", *v, *k);
1210         }
1211     }
1212
1213     let sess = shared_ccx.sess();
1214
1215     let exported_symbols = ExportedSymbols::compute_from(&shared_ccx,
1216                                                          &symbol_map);
1217
1218     // Now that we have all symbols that are exported from the CGUs of this
1219     // crate, we can run the `internalize_symbols` pass.
1220     time(shared_ccx.sess().time_passes(), "internalize symbols", || {
1221         internalize_symbols(sess,
1222                             &crate_context_list,
1223                             &symbol_map,
1224                             &exported_symbols);
1225     });
1226
1227     if tcx.sess.opts.debugging_opts.print_type_sizes {
1228         gather_type_sizes(tcx);
1229     }
1230
1231     if sess.target.target.options.is_like_msvc &&
1232        sess.crate_types.borrow().iter().any(|ct| *ct == config::CrateTypeRlib) {
1233         create_imps(&crate_context_list);
1234     }
1235
1236     let linker_info = LinkerInfo::new(&shared_ccx, &exported_symbols);
1237
1238     let subsystem = attr::first_attr_value_str_by_name(&krate.attrs,
1239                                                        "windows_subsystem");
1240     let windows_subsystem = subsystem.map(|subsystem| {
1241         if subsystem != "windows" && subsystem != "console" {
1242             tcx.sess.fatal(&format!("invalid windows subsystem `{}`, only \
1243                                      `windows` and `console` are allowed",
1244                                     subsystem));
1245         }
1246         subsystem.to_string()
1247     });
1248
1249     CrateTranslation {
1250         modules: modules,
1251         metadata_module: metadata_module,
1252         link: link_meta,
1253         metadata: metadata,
1254         exported_symbols: exported_symbols,
1255         no_builtins: no_builtins,
1256         linker_info: linker_info,
1257         windows_subsystem: windows_subsystem,
1258     }
1259 }
1260
1261 fn gather_type_sizes<'a, 'tcx>(tcx: TyCtxt<'a, 'tcx, 'tcx>) {
1262     let layout_cache = tcx.layout_cache.borrow();
1263     for (ty, layout) in layout_cache.iter() {
1264
1265         // (delay format until we actually need it)
1266         let record = |kind, opt_discr_size, variants| {
1267             let type_desc = format!("{:?}", ty);
1268             let overall_size = layout.size(&tcx.data_layout);
1269             let align = layout.align(&tcx.data_layout);
1270             tcx.sess.code_stats.borrow_mut().record_type_size(kind,
1271                                                               type_desc,
1272                                                               align,
1273                                                               overall_size,
1274                                                               opt_discr_size,
1275                                                               variants);
1276         };
1277
1278         let (adt_def, substs) = match ty.sty {
1279             ty::TyAdt(ref adt_def, substs) => {
1280                 debug!("print-type-size t: `{:?}` process adt", ty);
1281                 (adt_def, substs)
1282             }
1283
1284             ty::TyClosure(..) => {
1285                 debug!("print-type-size t: `{:?}` record closure", ty);
1286                 record(DataTypeKind::Closure, None, vec![]);
1287                 continue;
1288             }
1289
1290             _ => {
1291                 debug!("print-type-size t: `{:?}` skip non-nominal", ty);
1292                 continue;
1293             }
1294         };
1295
1296         let adt_kind = adt_def.adt_kind();
1297
1298         let build_field_info = |(field_name, field_ty): (ast::Name, Ty), offset: &layout::Size| {
1299             match layout_cache.get(&field_ty) {
1300                 None => bug!("no layout found for field {} type: `{:?}`", field_name, field_ty),
1301                 Some(field_layout) => {
1302                     session::FieldInfo {
1303                         name: field_name.to_string(),
1304                         offset: offset.bytes(),
1305                         size: field_layout.size(&tcx.data_layout).bytes(),
1306                         align: field_layout.align(&tcx.data_layout).abi(),
1307                     }
1308                 }
1309             }
1310         };
1311
1312         let build_primitive_info = |name: ast::Name, value: &layout::Primitive| {
1313             session::VariantInfo {
1314                 name: Some(name.to_string()),
1315                 kind: session::SizeKind::Exact,
1316                 align: value.align(&tcx.data_layout).abi(),
1317                 size: value.size(&tcx.data_layout).bytes(),
1318                 fields: vec![],
1319             }
1320         };
1321
1322         enum Fields<'a> {
1323             WithDiscrim(&'a layout::Struct),
1324             NoDiscrim(&'a layout::Struct),
1325         }
1326
1327         let build_variant_info = |n: Option<ast::Name>, flds: &[(ast::Name, Ty)], layout: Fields| {
1328             let (s, field_offsets) = match layout {
1329                 Fields::WithDiscrim(s) => (s, &s.offsets[1..]),
1330                 Fields::NoDiscrim(s) => (s, &s.offsets[0..]),
1331             };
1332             let field_info: Vec<_> = flds.iter()
1333                 .zip(field_offsets.iter())
1334                 .map(|(&field_name_ty, offset)| build_field_info(field_name_ty, offset))
1335                 .collect();
1336
1337             session::VariantInfo {
1338                 name: n.map(|n|n.to_string()),
1339                 kind: if s.sized {
1340                     session::SizeKind::Exact
1341                 } else {
1342                     session::SizeKind::Min
1343                 },
1344                 align: s.align.abi(),
1345                 size: s.min_size.bytes(),
1346                 fields: field_info,
1347             }
1348         };
1349
1350         match **layout {
1351             Layout::StructWrappedNullablePointer { nonnull: ref variant_layout,
1352                                                    nndiscr,
1353                                                    discrfield: _,
1354                                                    discrfield_source: _ } => {
1355                 debug!("print-type-size t: `{:?}` adt struct-wrapped nullable nndiscr {} is {:?}",
1356                        ty, nndiscr, variant_layout);
1357                 let variant_def = &adt_def.variants[nndiscr as usize];
1358                 let fields: Vec<_> = variant_def.fields.iter()
1359                     .map(|field_def| (field_def.name, field_def.ty(tcx, substs)))
1360                     .collect();
1361                 record(adt_kind.into(),
1362                        None,
1363                        vec![build_variant_info(Some(variant_def.name),
1364                                                &fields,
1365                                                Fields::NoDiscrim(variant_layout))]);
1366             }
1367             Layout::RawNullablePointer { nndiscr, value } => {
1368                 debug!("print-type-size t: `{:?}` adt raw nullable nndiscr {} is {:?}",
1369                        ty, nndiscr, value);
1370                 let variant_def = &adt_def.variants[nndiscr as usize];
1371                 record(adt_kind.into(), None,
1372                        vec![build_primitive_info(variant_def.name, &value)]);
1373             }
1374             Layout::Univariant { variant: ref variant_layout, non_zero: _ } => {
1375                 let variant_names = || {
1376                     adt_def.variants.iter().map(|v|format!("{}", v.name)).collect::<Vec<_>>()
1377                 };
1378                 debug!("print-type-size t: `{:?}` adt univariant {:?} variants: {:?}",
1379                        ty, variant_layout, variant_names());
1380                 assert!(adt_def.variants.len() <= 1,
1381                         "univariant with variants {:?}", variant_names());
1382                 if adt_def.variants.len() == 1 {
1383                     let variant_def = &adt_def.variants[0];
1384                     let fields: Vec<_> = variant_def.fields.iter()
1385                         .map(|field_def| (field_def.name, field_def.ty(tcx, substs)))
1386                         .collect();
1387                     record(adt_kind.into(),
1388                            None,
1389                            vec![build_variant_info(Some(variant_def.name),
1390                                                    &fields,
1391                                                    Fields::NoDiscrim(variant_layout))]);
1392                 } else {
1393                     // (This case arises for *empty* enums; so give it
1394                     // zero variants.)
1395                     record(adt_kind.into(), None, vec![]);
1396                 }
1397             }
1398
1399             Layout::General { ref variants, discr, .. } => {
1400                 debug!("print-type-size t: `{:?}` adt general variants def {} layouts {} {:?}",
1401                        ty, adt_def.variants.len(), variants.len(), variants);
1402                 let variant_infos: Vec<_> = adt_def.variants.iter()
1403                     .zip(variants.iter())
1404                     .map(|(variant_def, variant_layout)| {
1405                         let fields: Vec<_> = variant_def.fields.iter()
1406                             .map(|field_def| (field_def.name, field_def.ty(tcx, substs)))
1407                             .collect();
1408                         build_variant_info(Some(variant_def.name),
1409                                            &fields,
1410                                            Fields::WithDiscrim(variant_layout))
1411                     })
1412                     .collect();
1413                 record(adt_kind.into(), Some(discr.size()), variant_infos);
1414             }
1415
1416             Layout::UntaggedUnion { ref variants } => {
1417                 debug!("print-type-size t: `{:?}` adt union variants {:?}",
1418                        ty, variants);
1419                 // layout does not currently store info about each
1420                 // variant...
1421                 record(adt_kind.into(), None, Vec::new());
1422             }
1423
1424             Layout::CEnum { discr, .. } => {
1425                 debug!("print-type-size t: `{:?}` adt c-like enum", ty);
1426                 let variant_infos: Vec<_> = adt_def.variants.iter()
1427                     .map(|variant_def| {
1428                         build_primitive_info(variant_def.name,
1429                                              &layout::Primitive::Int(discr))
1430                     })
1431                     .collect();
1432                 record(adt_kind.into(), Some(discr.size()), variant_infos);
1433             }
1434
1435             // other cases provide little interesting (i.e. adjustable
1436             // via representation tweaks) size info beyond total size.
1437             Layout::Scalar { .. } |
1438             Layout::Vector { .. } |
1439             Layout::Array { .. } |
1440             Layout::FatPointer { .. } => {
1441                 debug!("print-type-size t: `{:?}` adt other", ty);
1442                 record(adt_kind.into(), None, Vec::new())
1443             }
1444         }
1445     }
1446 }
1447
1448 /// For each CGU, identify if we can reuse an existing object file (or
1449 /// maybe other context).
1450 fn trans_reuse_previous_work_products(scx: &SharedCrateContext,
1451                                       codegen_units: &[CodegenUnit],
1452                                       symbol_map: &SymbolMap)
1453                                       -> Vec<Option<WorkProduct>> {
1454     debug!("trans_reuse_previous_work_products()");
1455     codegen_units
1456         .iter()
1457         .map(|cgu| {
1458             let id = cgu.work_product_id();
1459
1460             let hash = cgu.compute_symbol_name_hash(scx, symbol_map);
1461
1462             debug!("trans_reuse_previous_work_products: id={:?} hash={}", id, hash);
1463
1464             if let Some(work_product) = scx.dep_graph().previous_work_product(&id) {
1465                 if work_product.input_hash == hash {
1466                     debug!("trans_reuse_previous_work_products: reusing {:?}", work_product);
1467                     return Some(work_product);
1468                 } else {
1469                     if scx.sess().opts.debugging_opts.incremental_info {
1470                         println!("incremental: CGU `{}` invalidated because of \
1471                                   changed partitioning hash.",
1472                                   cgu.name());
1473                     }
1474                     debug!("trans_reuse_previous_work_products: \
1475                             not reusing {:?} because hash changed to {:?}",
1476                            work_product, hash);
1477                 }
1478             }
1479
1480             None
1481         })
1482         .collect()
1483 }
1484
1485 fn collect_and_partition_translation_items<'a, 'tcx>(scx: &SharedCrateContext<'a, 'tcx>)
1486                                                      -> (Vec<CodegenUnit<'tcx>>, SymbolMap<'tcx>) {
1487     let time_passes = scx.sess().time_passes();
1488
1489     let collection_mode = match scx.sess().opts.debugging_opts.print_trans_items {
1490         Some(ref s) => {
1491             let mode_string = s.to_lowercase();
1492             let mode_string = mode_string.trim();
1493             if mode_string == "eager" {
1494                 TransItemCollectionMode::Eager
1495             } else {
1496                 if mode_string != "lazy" {
1497                     let message = format!("Unknown codegen-item collection mode '{}'. \
1498                                            Falling back to 'lazy' mode.",
1499                                            mode_string);
1500                     scx.sess().warn(&message);
1501                 }
1502
1503                 TransItemCollectionMode::Lazy
1504             }
1505         }
1506         None => TransItemCollectionMode::Lazy
1507     };
1508
1509     let (items, inlining_map) =
1510         time(time_passes, "translation item collection", || {
1511             collector::collect_crate_translation_items(&scx, collection_mode)
1512     });
1513
1514     let symbol_map = SymbolMap::build(scx, items.iter().cloned());
1515
1516     let strategy = if scx.sess().opts.debugging_opts.incremental.is_some() {
1517         PartitioningStrategy::PerModule
1518     } else {
1519         PartitioningStrategy::FixedUnitCount(scx.sess().opts.cg.codegen_units)
1520     };
1521
1522     let codegen_units = time(time_passes, "codegen unit partitioning", || {
1523         partitioning::partition(scx,
1524                                 items.iter().cloned(),
1525                                 strategy,
1526                                 &inlining_map)
1527     });
1528
1529     assert!(scx.tcx().sess.opts.cg.codegen_units == codegen_units.len() ||
1530             scx.tcx().sess.opts.debugging_opts.incremental.is_some());
1531
1532     {
1533         let mut ccx_map = scx.translation_items().borrow_mut();
1534
1535         for trans_item in items.iter().cloned() {
1536             ccx_map.insert(trans_item);
1537         }
1538     }
1539
1540     if scx.sess().opts.debugging_opts.print_trans_items.is_some() {
1541         let mut item_to_cgus = FxHashMap();
1542
1543         for cgu in &codegen_units {
1544             for (&trans_item, &linkage) in cgu.items() {
1545                 item_to_cgus.entry(trans_item)
1546                             .or_insert(Vec::new())
1547                             .push((cgu.name().clone(), linkage));
1548             }
1549         }
1550
1551         let mut item_keys: Vec<_> = items
1552             .iter()
1553             .map(|i| {
1554                 let mut output = i.to_string(scx.tcx());
1555                 output.push_str(" @@");
1556                 let mut empty = Vec::new();
1557                 let mut cgus = item_to_cgus.get_mut(i).unwrap_or(&mut empty);
1558                 cgus.as_mut_slice().sort_by_key(|&(ref name, _)| name.clone());
1559                 cgus.dedup();
1560                 for &(ref cgu_name, linkage) in cgus.iter() {
1561                     output.push_str(" ");
1562                     output.push_str(&cgu_name[..]);
1563
1564                     let linkage_abbrev = match linkage {
1565                         llvm::Linkage::ExternalLinkage => "External",
1566                         llvm::Linkage::AvailableExternallyLinkage => "Available",
1567                         llvm::Linkage::LinkOnceAnyLinkage => "OnceAny",
1568                         llvm::Linkage::LinkOnceODRLinkage => "OnceODR",
1569                         llvm::Linkage::WeakAnyLinkage => "WeakAny",
1570                         llvm::Linkage::WeakODRLinkage => "WeakODR",
1571                         llvm::Linkage::AppendingLinkage => "Appending",
1572                         llvm::Linkage::InternalLinkage => "Internal",
1573                         llvm::Linkage::PrivateLinkage => "Private",
1574                         llvm::Linkage::ExternalWeakLinkage => "ExternalWeak",
1575                         llvm::Linkage::CommonLinkage => "Common",
1576                     };
1577
1578                     output.push_str("[");
1579                     output.push_str(linkage_abbrev);
1580                     output.push_str("]");
1581                 }
1582                 output
1583             })
1584             .collect();
1585
1586         item_keys.sort();
1587
1588         for item in item_keys {
1589             println!("TRANS_ITEM {}", item);
1590         }
1591     }
1592
1593     (codegen_units, symbol_map)
1594 }