1 // Copyright 2012-2014 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.
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.
11 #![allow(non_camel_case_types, non_snake_case_functions)]
13 //! Code that is useful in various trans modules.
15 use driver::session::Session;
16 use lib::llvm::{ValueRef, BasicBlockRef, BuilderRef};
17 use lib::llvm::{True, False, Bool};
21 use middle::lang_items::LangItem;
23 use middle::subst::Subst;
24 use middle::trans::build;
25 use middle::trans::cleanup;
26 use middle::trans::datum;
27 use middle::trans::debuginfo;
28 use middle::trans::type_::Type;
31 use util::ppaux::Repr;
32 use util::nodemap::NodeMap;
34 use arena::TypedArena;
35 use std::collections::HashMap;
36 use libc::{c_uint, c_longlong, c_ulonglong, c_char};
37 use std::c_str::ToCStr;
38 use std::cell::{Cell, RefCell};
40 use syntax::ast::Ident;
42 use syntax::ast_map::{PathElem, PathName};
43 use syntax::codemap::Span;
44 use syntax::parse::token::InternedString;
45 use syntax::parse::token;
47 pub use middle::trans::context::CrateContext;
49 fn type_is_newtype_immediate(ccx: &CrateContext, ty: ty::t) -> bool {
50 match ty::get(ty).sty {
51 ty::ty_struct(def_id, ref substs) => {
52 let fields = ty::struct_fields(ccx.tcx(), def_id, substs);
54 fields.get(0).ident.name ==
55 token::special_idents::unnamed_field.name &&
56 type_is_immediate(ccx, fields.get(0).mt.ty)
62 pub fn type_is_immediate(ccx: &CrateContext, ty: ty::t) -> bool {
63 use middle::trans::machine::llsize_of_alloc;
64 use middle::trans::type_of::sizing_type_of;
66 let simple = ty::type_is_scalar(ty) || ty::type_is_boxed(ty) ||
67 ty::type_is_unique(ty) || ty::type_is_region_ptr(ty) ||
68 type_is_newtype_immediate(ccx, ty) || ty::type_is_bot(ty) ||
69 ty::type_is_simd(tcx, ty);
70 if simple && !ty::type_is_trait(ty) {
73 match ty::get(ty).sty {
75 ty::ty_struct(..) | ty::ty_enum(..) | ty::ty_tup(..) => {
76 let llty = sizing_type_of(ccx, ty);
77 llsize_of_alloc(ccx, llty) <= llsize_of_alloc(ccx, ccx.int_type)
79 _ => type_is_zero_size(ccx, ty)
83 pub fn type_is_zero_size(ccx: &CrateContext, ty: ty::t) -> bool {
85 * Identify types which have size zero at runtime.
88 use middle::trans::machine::llsize_of_alloc;
89 use middle::trans::type_of::sizing_type_of;
90 let llty = sizing_type_of(ccx, ty);
91 llsize_of_alloc(ccx, llty) == 0
94 pub fn return_type_is_void(ccx: &CrateContext, ty: ty::t) -> bool {
96 * Identifies types which we declare to be equivalent to `void`
97 * in C for the purpose of function return types. These are
98 * `()`, bot, and uninhabited enums. Note that all such types
99 * are also zero-size, but not all zero-size types use a `void`
100 * return type (in order to aid with C ABI compatibility).
103 ty::type_is_nil(ty) || ty::type_is_bot(ty) || ty::type_is_empty(ccx.tcx(), ty)
106 /// Generates a unique symbol based off the name given. This is used to create
107 /// unique symbols for things like closures.
108 pub fn gensym_name(name: &str) -> PathElem {
109 let num = token::gensym(name);
110 // use one colon which will get translated to a period by the mangler, and
111 // we're guaranteed that `num` is globally unique for this crate.
112 PathName(token::gensym(format!("{}:{}", name, num).as_slice()))
115 pub struct tydesc_info {
117 pub tydesc: ValueRef,
121 pub visit_glue: Cell<Option<ValueRef>>,
125 * A note on nomenclature of linking: "extern", "foreign", and "upcall".
127 * An "extern" is an LLVM symbol we wind up emitting an undefined external
128 * reference to. This means "we don't have the thing in this compilation unit,
129 * please make sure you link it in at runtime". This could be a reference to
130 * C code found in a C library, or rust code found in a rust crate.
132 * Most "externs" are implicitly declared (automatically) as a result of a
133 * user declaring an extern _module_ dependency; this causes the rust driver
134 * to locate an extern crate, scan its compilation metadata, and emit extern
135 * declarations for any symbols used by the declaring crate.
137 * A "foreign" is an extern that references C (or other non-rust ABI) code.
138 * There is no metadata to scan for extern references so in these cases either
139 * a header-digester like bindgen, or manual function prototypes, have to
140 * serve as declarators. So these are usually given explicitly as prototype
141 * declarations, in rust code, with ABI attributes on them noting which ABI to
144 * An "upcall" is a foreign call generated by the compiler (not corresponding
145 * to any user-written call in the code) into the runtime library, to perform
146 * some helper task such as bringing a task to life, allocating memory, etc.
150 pub struct NodeInfo {
155 pub fn expr_info(expr: &ast::Expr) -> NodeInfo {
156 NodeInfo { id: expr.id, span: expr.span }
159 pub struct BuilderRef_res {
163 impl Drop for BuilderRef_res {
166 llvm::LLVMDisposeBuilder(self.b);
171 pub fn BuilderRef_res(b: BuilderRef) -> BuilderRef_res {
177 pub type ExternMap = HashMap<String, ValueRef>;
179 // Here `self_ty` is the real type of the self parameter to this method. It
180 // will only be set in the case of default methods.
181 pub struct param_substs {
182 pub substs: subst::Substs,
183 pub vtables: typeck::vtable_res,
187 pub fn empty() -> param_substs {
189 substs: subst::Substs::trans_empty(),
190 vtables: subst::VecPerParamSpace::empty(),
194 pub fn validate(&self) {
195 assert!(self.substs.types.all(|t| !ty::type_needs_infer(*t)));
199 fn param_substs_to_str(this: ¶m_substs, tcx: &ty::ctxt) -> String {
200 format!("param_substs({})", this.substs.repr(tcx))
203 impl Repr for param_substs {
204 fn repr(&self, tcx: &ty::ctxt) -> String {
205 param_substs_to_str(self, tcx)
210 fn substp(&self, tcx: &ty::ctxt, param_substs: ¶m_substs)
214 impl<T:Subst+Clone> SubstP for T {
215 fn substp(&self, tcx: &ty::ctxt, substs: ¶m_substs) -> T {
216 self.subst(tcx, &substs.substs)
220 // work around bizarre resolve errors
221 pub type RvalueDatum = datum::Datum<datum::Rvalue>;
222 pub type LvalueDatum = datum::Datum<datum::Lvalue>;
224 // Function context. Every LLVM function we create will have one of
226 pub struct FunctionContext<'a> {
227 // The ValueRef returned from a call to llvm::LLVMAddFunction; the
228 // address of the first instruction in the sequence of
229 // instructions for this function that will go in the .text
230 // section of the executable we're generating.
233 // The environment argument in a closure.
234 pub llenv: Option<ValueRef>,
236 // The place to store the return value. If the return type is immediate,
237 // this is an alloca in the function. Otherwise, it's the hidden first
238 // parameter to the function. After function construction, this should
240 pub llretptr: Cell<Option<ValueRef>>,
242 // These pub elements: "hoisted basic blocks" containing
243 // administrative activities that have to happen in only one place in
244 // the function, due to LLVM's quirks.
245 // A marker for the place where we want to insert the function's static
246 // allocas, so that LLVM will coalesce them into a single alloca call.
247 pub alloca_insert_pt: Cell<Option<ValueRef>>,
248 pub llreturn: Cell<Option<BasicBlockRef>>,
250 // The a value alloca'd for calls to upcalls.rust_personality. Used when
251 // outputting the resume instruction.
252 pub personality: Cell<Option<ValueRef>>,
254 // True if the caller expects this fn to use the out pointer to
255 // return. Either way, your code should write into llretptr, but if
256 // this value is false, llretptr will be a local alloca.
257 pub caller_expects_out_pointer: bool,
259 // Maps arguments to allocas created for them in llallocas.
260 pub llargs: RefCell<NodeMap<LvalueDatum>>,
262 // Maps the def_ids for local variables to the allocas created for
263 // them in llallocas.
264 pub lllocals: RefCell<NodeMap<LvalueDatum>>,
266 // Same as above, but for closure upvars
267 pub llupvars: RefCell<NodeMap<ValueRef>>,
269 // The NodeId of the function, or -1 if it doesn't correspond to
270 // a user-defined function.
273 // If this function is being monomorphized, this contains the type
274 // substitutions used.
275 pub param_substs: &'a param_substs,
277 // The source span and nesting context where this function comes from, for
278 // error reporting and symbol generation.
279 pub span: Option<Span>,
281 // The arena that blocks are allocated from.
282 pub block_arena: &'a TypedArena<Block<'a>>,
284 // This function's enclosing crate context.
285 pub ccx: &'a CrateContext,
287 // Used and maintained by the debuginfo module.
288 pub debug_context: debuginfo::FunctionDebugContext,
291 pub scopes: RefCell<Vec<cleanup::CleanupScope<'a>> >,
294 impl<'a> FunctionContext<'a> {
295 pub fn arg_pos(&self, arg: uint) -> uint {
296 let arg = self.env_arg_pos() + arg;
297 if self.llenv.is_some() {
304 pub fn out_arg_pos(&self) -> uint {
305 assert!(self.caller_expects_out_pointer);
309 pub fn env_arg_pos(&self) -> uint {
310 if self.caller_expects_out_pointer {
317 pub fn cleanup(&self) {
319 llvm::LLVMInstructionEraseFromParent(self.alloca_insert_pt
325 pub fn get_llreturn(&self) -> BasicBlockRef {
326 if self.llreturn.get().is_none() {
328 self.llreturn.set(Some(unsafe {
329 "return".with_c_str(|buf| {
330 llvm::LLVMAppendBasicBlockInContext(self.ccx.llcx, self.llfn, buf)
335 self.llreturn.get().unwrap()
338 pub fn new_block(&'a self,
341 opt_node_id: Option<ast::NodeId>)
344 let llbb = name.with_c_str(|buf| {
345 llvm::LLVMAppendBasicBlockInContext(self.ccx.llcx,
349 Block::new(llbb, is_lpad, opt_node_id, self)
353 pub fn new_id_block(&'a self,
355 node_id: ast::NodeId)
357 self.new_block(false, name, Some(node_id))
360 pub fn new_temp_block(&'a self,
363 self.new_block(false, name, None)
366 pub fn join_blocks(&'a self,
368 in_cxs: &[&'a Block<'a>])
370 let out = self.new_id_block("join", id);
371 let mut reachable = false;
372 for bcx in in_cxs.iter() {
373 if !bcx.unreachable.get() {
374 build::Br(*bcx, out.llbb);
379 build::Unreachable(out);
385 // Basic block context. We create a block context for each basic block
386 // (single-entry, single-exit sequence of instructions) we generate from Rust
387 // code. Each basic block we generate is attached to a function, typically
388 // with many basic blocks per function. All the basic blocks attached to a
389 // function are organized as a directed graph.
390 pub struct Block<'a> {
391 // The BasicBlockRef returned from a call to
392 // llvm::LLVMAppendBasicBlock(llfn, name), which adds a basic
393 // block to the function pointed to by llfn. We insert
394 // instructions into that block by way of this block context.
395 // The block pointing to this one in the function's digraph.
396 pub llbb: BasicBlockRef,
397 pub terminated: Cell<bool>,
398 pub unreachable: Cell<bool>,
400 // Is this block part of a landing pad?
403 // AST node-id associated with this block, if any. Used for
404 // debugging purposes only.
405 pub opt_node_id: Option<ast::NodeId>,
407 // The function context for the function to which this block is
409 pub fcx: &'a FunctionContext<'a>,
416 opt_node_id: Option<ast::NodeId>,
417 fcx: &'a FunctionContext<'a>)
419 fcx.block_arena.alloc(Block {
421 terminated: Cell::new(false),
422 unreachable: Cell::new(false),
424 opt_node_id: opt_node_id,
429 pub fn ccx(&self) -> &'a CrateContext { self.fcx.ccx }
430 pub fn tcx(&self) -> &'a ty::ctxt {
433 pub fn sess(&self) -> &'a Session { self.fcx.ccx.sess() }
435 pub fn ident(&self, ident: Ident) -> String {
436 token::get_ident(ident).get().to_string()
439 pub fn node_id_to_str(&self, id: ast::NodeId) -> String {
440 self.tcx().map.node_to_str(id).to_string()
443 pub fn expr_to_str(&self, e: &ast::Expr) -> String {
447 pub fn def(&self, nid: ast::NodeId) -> def::Def {
448 match self.tcx().def_map.borrow().find(&nid) {
451 self.tcx().sess.bug(format!(
452 "no def associated with node id {:?}", nid).as_slice());
457 pub fn val_to_str(&self, val: ValueRef) -> String {
458 self.ccx().tn.val_to_str(val)
461 pub fn llty_str(&self, ty: Type) -> String {
462 self.ccx().tn.type_to_str(ty)
465 pub fn ty_to_str(&self, t: ty::t) -> String {
469 pub fn to_str(&self) -> String {
470 let blk: *const Block = self;
471 format!("[block {}]", blk)
475 pub struct Result<'a> {
476 pub bcx: &'a Block<'a>,
480 impl<'a> Result<'a> {
481 pub fn new(bcx: &'a Block<'a>, val: ValueRef) -> Result<'a> {
489 pub fn val_ty(v: ValueRef) -> Type {
491 Type::from_ref(llvm::LLVMTypeOf(v))
495 // LLVM constant constructors.
496 pub fn C_null(t: Type) -> ValueRef {
498 llvm::LLVMConstNull(t.to_ref())
502 pub fn C_undef(t: Type) -> ValueRef {
504 llvm::LLVMGetUndef(t.to_ref())
508 pub fn C_integral(t: Type, u: u64, sign_extend: bool) -> ValueRef {
510 llvm::LLVMConstInt(t.to_ref(), u, sign_extend as Bool)
514 pub fn C_floating(s: &str, t: Type) -> ValueRef {
516 s.with_c_str(|buf| llvm::LLVMConstRealOfString(t.to_ref(), buf))
520 pub fn C_nil(ccx: &CrateContext) -> ValueRef {
521 C_struct(ccx, [], false)
524 pub fn C_bool(ccx: &CrateContext, val: bool) -> ValueRef {
525 C_integral(Type::bool(ccx), val as u64, false)
528 pub fn C_i1(ccx: &CrateContext, val: bool) -> ValueRef {
529 C_integral(Type::i1(ccx), val as u64, false)
532 pub fn C_i32(ccx: &CrateContext, i: i32) -> ValueRef {
533 C_integral(Type::i32(ccx), i as u64, true)
536 pub fn C_i64(ccx: &CrateContext, i: i64) -> ValueRef {
537 C_integral(Type::i64(ccx), i as u64, true)
540 pub fn C_u64(ccx: &CrateContext, i: u64) -> ValueRef {
541 C_integral(Type::i64(ccx), i, false)
544 pub fn C_int(ccx: &CrateContext, i: int) -> ValueRef {
545 C_integral(ccx.int_type, i as u64, true)
548 pub fn C_uint(ccx: &CrateContext, i: uint) -> ValueRef {
549 C_integral(ccx.int_type, i as u64, false)
552 pub fn C_u8(ccx: &CrateContext, i: uint) -> ValueRef {
553 C_integral(Type::i8(ccx), i as u64, false)
557 // This is a 'c-like' raw string, which differs from
558 // our boxed-and-length-annotated strings.
559 pub fn C_cstr(cx: &CrateContext, s: InternedString, null_terminated: bool) -> ValueRef {
561 match cx.const_cstr_cache.borrow().find(&s) {
562 Some(&llval) => return llval,
566 let sc = llvm::LLVMConstStringInContext(cx.llcx,
567 s.get().as_ptr() as *const c_char,
568 s.get().len() as c_uint,
569 !null_terminated as Bool);
571 let gsym = token::gensym("str");
572 let g = format!("str{}", gsym).with_c_str(|buf| {
573 llvm::LLVMAddGlobal(cx.llmod, val_ty(sc).to_ref(), buf)
575 llvm::LLVMSetInitializer(g, sc);
576 llvm::LLVMSetGlobalConstant(g, True);
577 lib::llvm::SetLinkage(g, lib::llvm::InternalLinkage);
579 cx.const_cstr_cache.borrow_mut().insert(s, g);
584 // NB: Do not use `do_spill_noroot` to make this into a constant string, or
585 // you will be kicked off fast isel. See issue #4352 for an example of this.
586 pub fn C_str_slice(cx: &CrateContext, s: InternedString) -> ValueRef {
588 let len = s.get().len();
589 let cs = llvm::LLVMConstPointerCast(C_cstr(cx, s, false),
590 Type::i8p(cx).to_ref());
591 C_named_struct(cx.tn.find_type("str_slice").unwrap(), [cs, C_uint(cx, len)])
595 pub fn C_binary_slice(cx: &CrateContext, data: &[u8]) -> ValueRef {
597 let len = data.len();
598 let lldata = C_bytes(cx, data);
600 let gsym = token::gensym("binary");
601 let g = format!("binary{}", gsym).with_c_str(|buf| {
602 llvm::LLVMAddGlobal(cx.llmod, val_ty(lldata).to_ref(), buf)
604 llvm::LLVMSetInitializer(g, lldata);
605 llvm::LLVMSetGlobalConstant(g, True);
606 lib::llvm::SetLinkage(g, lib::llvm::InternalLinkage);
608 let cs = llvm::LLVMConstPointerCast(g, Type::i8p(cx).to_ref());
609 C_struct(cx, [cs, C_uint(cx, len)], false)
613 pub fn C_struct(ccx: &CrateContext, elts: &[ValueRef], packed: bool) -> ValueRef {
615 llvm::LLVMConstStructInContext(ccx.llcx,
616 elts.as_ptr(), elts.len() as c_uint,
621 pub fn C_named_struct(t: Type, elts: &[ValueRef]) -> ValueRef {
623 llvm::LLVMConstNamedStruct(t.to_ref(), elts.as_ptr(), elts.len() as c_uint)
627 pub fn C_array(ty: Type, elts: &[ValueRef]) -> ValueRef {
629 return llvm::LLVMConstArray(ty.to_ref(), elts.as_ptr(), elts.len() as c_uint);
633 pub fn C_bytes(ccx: &CrateContext, bytes: &[u8]) -> ValueRef {
635 let ptr = bytes.as_ptr() as *const c_char;
636 return llvm::LLVMConstStringInContext(ccx.llcx, ptr, bytes.len() as c_uint, True);
640 pub fn get_param(fndecl: ValueRef, param: uint) -> ValueRef {
642 llvm::LLVMGetParam(fndecl, param as c_uint)
646 pub fn const_get_elt(cx: &CrateContext, v: ValueRef, us: &[c_uint])
649 let r = llvm::LLVMConstExtractValue(v, us.as_ptr(), us.len() as c_uint);
651 debug!("const_get_elt(v={}, us={:?}, r={})",
652 cx.tn.val_to_str(v), us, cx.tn.val_to_str(r));
658 pub fn is_const(v: ValueRef) -> bool {
660 llvm::LLVMIsConstant(v) == True
664 pub fn const_to_int(v: ValueRef) -> c_longlong {
666 llvm::LLVMConstIntGetSExtValue(v)
670 pub fn const_to_uint(v: ValueRef) -> c_ulonglong {
672 llvm::LLVMConstIntGetZExtValue(v)
676 pub fn is_undef(val: ValueRef) -> bool {
678 llvm::LLVMIsUndef(val) != False
682 pub fn is_null(val: ValueRef) -> bool {
684 llvm::LLVMIsNull(val) != False
688 pub fn monomorphize_type(bcx: &Block, t: ty::t) -> ty::t {
689 t.subst(bcx.tcx(), &bcx.fcx.param_substs.substs)
692 pub fn node_id_type(bcx: &Block, id: ast::NodeId) -> ty::t {
694 let t = ty::node_id_to_type(tcx, id);
695 monomorphize_type(bcx, t)
698 pub fn expr_ty(bcx: &Block, ex: &ast::Expr) -> ty::t {
699 node_id_type(bcx, ex.id)
702 pub fn expr_ty_adjusted(bcx: &Block, ex: &ast::Expr) -> ty::t {
703 monomorphize_type(bcx, ty::expr_ty_adjusted(bcx.tcx(), ex))
706 // Key used to lookup values supplied for type parameters in an expr.
707 #[deriving(PartialEq)]
708 pub enum ExprOrMethodCall {
709 // Type parameters for a path like `None::<int>`
712 // Type parameters for a method call like `a.foo::<int>()`
713 MethodCall(typeck::MethodCall)
716 pub fn node_id_substs(bcx: &Block,
717 node: ExprOrMethodCall)
721 let substs = match node {
723 ty::node_id_item_substs(tcx, id).substs
725 MethodCall(method_call) => {
726 tcx.method_map.borrow().get(&method_call).substs.clone()
730 if substs.types.any(|t| ty::type_needs_infer(*t)) {
732 format!("type parameters for node {:?} include inference types: \
735 substs.repr(bcx.tcx())).as_slice());
738 substs.substp(tcx, bcx.fcx.param_substs)
741 pub fn node_vtables(bcx: &Block, id: typeck::MethodCall)
742 -> typeck::vtable_res {
743 bcx.tcx().vtable_map.borrow().find(&id).map(|vts| {
744 resolve_vtables_in_fn_ctxt(bcx.fcx, vts)
745 }).unwrap_or_else(|| subst::VecPerParamSpace::empty())
748 // Apply the typaram substitutions in the FunctionContext to some
749 // vtables. This should eliminate any vtable_params.
750 pub fn resolve_vtables_in_fn_ctxt(fcx: &FunctionContext,
751 vts: &typeck::vtable_res)
752 -> typeck::vtable_res {
753 resolve_vtables_under_param_substs(fcx.ccx.tcx(),
758 pub fn resolve_vtables_under_param_substs(tcx: &ty::ctxt,
759 param_substs: ¶m_substs,
760 vts: &typeck::vtable_res)
761 -> typeck::vtable_res
764 resolve_param_vtables_under_param_substs(tcx,
770 pub fn resolve_param_vtables_under_param_substs(tcx: &ty::ctxt,
771 param_substs: ¶m_substs,
772 ds: &typeck::vtable_param_res)
773 -> typeck::vtable_param_res
776 resolve_vtable_under_param_substs(tcx,
784 pub fn resolve_vtable_under_param_substs(tcx: &ty::ctxt,
785 param_substs: ¶m_substs,
786 vt: &typeck::vtable_origin)
787 -> typeck::vtable_origin
790 typeck::vtable_static(trait_id, ref vtable_substs, ref sub) => {
791 let vtable_substs = vtable_substs.substp(tcx, param_substs);
792 typeck::vtable_static(
795 resolve_vtables_under_param_substs(tcx, param_substs, sub))
797 typeck::vtable_param(n_param, n_bound) => {
798 find_vtable(tcx, param_substs, n_param, n_bound)
800 typeck::vtable_error => typeck::vtable_error
804 pub fn find_vtable(tcx: &ty::ctxt,
806 n_param: typeck::param_index,
808 -> typeck::vtable_origin {
809 debug!("find_vtable(n_param={:?}, n_bound={}, ps={})",
810 n_param, n_bound, ps.repr(tcx));
812 let param_bounds = ps.vtables.get(n_param.space,
814 param_bounds.get(n_bound).clone()
817 pub fn langcall(bcx: &Block,
822 match bcx.tcx().lang_items.require(li) {
825 let msg = format!("{} {}", msg, s);
827 Some(span) => bcx.tcx().sess.span_fatal(span, msg.as_slice()),
828 None => bcx.tcx().sess.fatal(msg.as_slice()),