2014-01-04 14:16:57 -06:00
|
|
|
// Copyright 2012-2013 The Rust Project Developers. See the COPYRIGHT
|
|
|
|
// file at the top-level directory of this distribution and at
|
2012-12-03 18:48:01 -06:00
|
|
|
// http://rust-lang.org/COPYRIGHT.
|
|
|
|
//
|
|
|
|
// Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
|
|
|
|
// http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
|
|
|
|
// <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
|
|
|
|
// option. This file may not be copied, modified, or distributed
|
|
|
|
// except according to those terms.
|
|
|
|
|
2013-02-25 13:11:21 -06:00
|
|
|
use ast;
|
2013-08-31 11:13:04 -05:00
|
|
|
use codemap::{Pos, Span};
|
2014-10-21 01:04:16 -05:00
|
|
|
use codemap;
|
2012-12-23 16:41:37 -06:00
|
|
|
use ext::base::*;
|
|
|
|
use ext::base;
|
2013-05-17 09:19:28 -05:00
|
|
|
use ext::build::AstBuilder;
|
2014-01-10 16:02:36 -06:00
|
|
|
use parse::token;
|
2014-10-21 01:04:16 -05:00
|
|
|
use parse;
|
2012-12-23 16:41:37 -06:00
|
|
|
use print::pprust;
|
2014-10-21 01:04:16 -05:00
|
|
|
use ptr::P;
|
|
|
|
use util::small_vector::SmallVector;
|
2012-12-23 16:41:37 -06:00
|
|
|
|
2013-11-11 00:46:32 -06:00
|
|
|
use std::io::File;
|
2014-01-31 22:54:41 -06:00
|
|
|
use std::rc::Rc;
|
2013-05-24 21:35:29 -05:00
|
|
|
|
2013-02-26 12:15:29 -06:00
|
|
|
// These macros all relate to the file system; they either return
|
|
|
|
// the column/row/filename of the expression, or they include
|
|
|
|
// a given file into the current one.
|
2013-02-11 10:13:18 -06:00
|
|
|
|
2014-06-09 15:12:30 -05:00
|
|
|
/// line!(): expands to the current line number
|
2014-01-09 07:05:33 -06:00
|
|
|
pub fn expand_line(cx: &mut ExtCtxt, sp: Span, tts: &[ast::TokenTree])
|
2014-08-27 20:46:52 -05:00
|
|
|
-> Box<base::MacResult+'static> {
|
2012-12-12 19:08:09 -06:00
|
|
|
base::check_zero_tts(cx, sp, tts, "line!");
|
2013-02-11 10:13:18 -06:00
|
|
|
|
2014-09-17 11:01:33 -05:00
|
|
|
let topmost = cx.original_span_in_file();
|
|
|
|
let loc = cx.codemap().lookup_char_pos(topmost.lo);
|
2013-02-11 10:13:18 -06:00
|
|
|
|
2014-09-17 11:01:33 -05:00
|
|
|
base::MacExpr::new(cx.expr_uint(topmost, loc.line))
|
2012-05-14 19:43:31 -05:00
|
|
|
}
|
|
|
|
|
2012-08-22 19:24:52 -05:00
|
|
|
/* col!(): expands to the current column number */
|
2014-01-09 07:05:33 -06:00
|
|
|
pub fn expand_col(cx: &mut ExtCtxt, sp: Span, tts: &[ast::TokenTree])
|
2014-08-27 20:46:52 -05:00
|
|
|
-> Box<base::MacResult+'static> {
|
2012-12-12 19:08:09 -06:00
|
|
|
base::check_zero_tts(cx, sp, tts, "col!");
|
2013-02-11 10:13:18 -06:00
|
|
|
|
2014-09-17 11:01:33 -05:00
|
|
|
let topmost = cx.original_span_in_file();
|
|
|
|
let loc = cx.codemap().lookup_char_pos(topmost.lo);
|
|
|
|
base::MacExpr::new(cx.expr_uint(topmost, loc.col.to_uint()))
|
2012-05-14 19:43:31 -05:00
|
|
|
}
|
|
|
|
|
2014-06-09 15:12:30 -05:00
|
|
|
/// file!(): expands to the current filename */
|
|
|
|
/// The filemap (`loc.file`) contains a bunch more information we could spit
|
|
|
|
/// out if we wanted.
|
2014-01-09 07:05:33 -06:00
|
|
|
pub fn expand_file(cx: &mut ExtCtxt, sp: Span, tts: &[ast::TokenTree])
|
2014-08-27 20:46:52 -05:00
|
|
|
-> Box<base::MacResult+'static> {
|
2012-12-12 19:08:09 -06:00
|
|
|
base::check_zero_tts(cx, sp, tts, "file!");
|
2013-02-11 10:13:18 -06:00
|
|
|
|
2014-09-17 11:01:33 -05:00
|
|
|
let topmost = cx.original_span_in_file();
|
|
|
|
let loc = cx.codemap().lookup_char_pos(topmost.lo);
|
2014-05-07 18:33:43 -05:00
|
|
|
let filename = token::intern_and_get_ident(loc.file.name.as_slice());
|
2014-09-17 11:01:33 -05:00
|
|
|
base::MacExpr::new(cx.expr_str(topmost, filename))
|
2012-05-14 19:43:31 -05:00
|
|
|
}
|
|
|
|
|
2014-01-09 07:05:33 -06:00
|
|
|
pub fn expand_stringify(cx: &mut ExtCtxt, sp: Span, tts: &[ast::TokenTree])
|
2014-08-27 20:46:52 -05:00
|
|
|
-> Box<base::MacResult+'static> {
|
2014-06-21 05:39:03 -05:00
|
|
|
let s = pprust::tts_to_string(tts);
|
2014-05-07 18:33:43 -05:00
|
|
|
base::MacExpr::new(cx.expr_str(sp,
|
|
|
|
token::intern_and_get_ident(s.as_slice())))
|
2012-05-14 19:43:31 -05:00
|
|
|
}
|
|
|
|
|
2014-01-09 07:05:33 -06:00
|
|
|
pub fn expand_mod(cx: &mut ExtCtxt, sp: Span, tts: &[ast::TokenTree])
|
2014-08-27 20:46:52 -05:00
|
|
|
-> Box<base::MacResult+'static> {
|
2012-12-12 19:08:09 -06:00
|
|
|
base::check_zero_tts(cx, sp, tts, "module_path!");
|
2014-01-21 12:08:10 -06:00
|
|
|
let string = cx.mod_path()
|
2014-03-28 14:42:34 -05:00
|
|
|
.iter()
|
2014-05-25 05:17:19 -05:00
|
|
|
.map(|x| token::get_ident(*x).get().to_string())
|
2014-05-22 18:57:53 -05:00
|
|
|
.collect::<Vec<String>>()
|
2014-01-21 12:08:10 -06:00
|
|
|
.connect("::");
|
2014-05-19 19:23:26 -05:00
|
|
|
base::MacExpr::new(cx.expr_str(
|
|
|
|
sp,
|
|
|
|
token::intern_and_get_ident(string.as_slice())))
|
2012-05-18 12:02:21 -05:00
|
|
|
}
|
|
|
|
|
2014-06-09 15:12:30 -05:00
|
|
|
/// include! : parse the given file as an expr
|
|
|
|
/// This is generally a bad idea because it's going to behave
|
|
|
|
/// unhygienically.
|
2014-10-21 01:04:16 -05:00
|
|
|
pub fn expand_include<'cx>(cx: &'cx mut ExtCtxt, sp: Span, tts: &[ast::TokenTree])
|
|
|
|
-> Box<base::MacResult+'cx> {
|
2014-01-17 08:53:10 -06:00
|
|
|
let file = match get_single_str_from_tts(cx, sp, tts, "include!") {
|
|
|
|
Some(f) => f,
|
2014-04-15 07:00:14 -05:00
|
|
|
None => return DummyResult::expr(sp),
|
2014-01-17 08:53:10 -06:00
|
|
|
};
|
2013-11-27 21:05:12 -06:00
|
|
|
// The file will be added to the code map by the parser
|
2014-10-21 01:04:16 -05:00
|
|
|
let p =
|
2013-12-30 16:04:00 -06:00
|
|
|
parse::new_sub_parser_from_file(cx.parse_sess(),
|
|
|
|
cx.cfg(),
|
|
|
|
&res_rel_file(cx,
|
|
|
|
sp,
|
|
|
|
&Path::new(file)),
|
2014-05-16 16:23:04 -05:00
|
|
|
true,
|
|
|
|
None,
|
2013-12-30 16:04:00 -06:00
|
|
|
sp);
|
2014-10-21 01:04:16 -05:00
|
|
|
|
|
|
|
struct ExpandResult<'a> {
|
|
|
|
p: parse::parser::Parser<'a>,
|
|
|
|
}
|
|
|
|
impl<'a> base::MacResult for ExpandResult<'a> {
|
|
|
|
fn make_expr(mut self: Box<ExpandResult<'a>>) -> Option<P<ast::Expr>> {
|
|
|
|
Some(self.p.parse_expr())
|
|
|
|
}
|
|
|
|
fn make_items(mut self: Box<ExpandResult<'a>>)
|
|
|
|
-> Option<SmallVector<P<ast::Item>>> {
|
|
|
|
let mut ret = SmallVector::zero();
|
|
|
|
loop {
|
|
|
|
match self.p.parse_item_with_outer_attributes() {
|
|
|
|
Some(item) => ret.push(item),
|
|
|
|
None => break
|
|
|
|
}
|
|
|
|
}
|
|
|
|
Some(ret)
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
box ExpandResult { p: p }
|
2012-05-14 19:43:31 -05:00
|
|
|
}
|
2012-05-18 12:00:49 -05:00
|
|
|
|
2013-02-26 12:15:29 -06:00
|
|
|
// include_str! : read the given file, insert it as a literal string expr
|
2014-01-09 07:05:33 -06:00
|
|
|
pub fn expand_include_str(cx: &mut ExtCtxt, sp: Span, tts: &[ast::TokenTree])
|
2014-08-27 20:46:52 -05:00
|
|
|
-> Box<base::MacResult+'static> {
|
2014-01-17 08:53:10 -06:00
|
|
|
let file = match get_single_str_from_tts(cx, sp, tts, "include_str!") {
|
|
|
|
Some(f) => f,
|
2014-04-15 07:00:14 -05:00
|
|
|
None => return DummyResult::expr(sp)
|
2014-01-17 08:53:10 -06:00
|
|
|
};
|
2013-12-03 21:15:12 -06:00
|
|
|
let file = res_rel_file(cx, sp, &Path::new(file));
|
2014-01-29 19:39:21 -06:00
|
|
|
let bytes = match File::open(&file).read_to_end() {
|
2013-10-25 19:04:37 -05:00
|
|
|
Err(e) => {
|
2014-05-16 12:45:16 -05:00
|
|
|
cx.span_err(sp,
|
|
|
|
format!("couldn't read {}: {}",
|
|
|
|
file.display(),
|
|
|
|
e).as_slice());
|
2014-04-15 07:00:14 -05:00
|
|
|
return DummyResult::expr(sp);
|
2013-10-13 20:48:47 -05:00
|
|
|
}
|
2013-10-25 19:04:37 -05:00
|
|
|
Ok(bytes) => bytes,
|
|
|
|
};
|
2014-06-30 09:41:30 -05:00
|
|
|
match String::from_utf8(bytes) {
|
|
|
|
Ok(src) => {
|
2013-11-27 21:05:12 -06:00
|
|
|
// Add this input file to the code map to make it available as
|
|
|
|
// dependency information
|
2014-06-21 05:39:03 -05:00
|
|
|
let filename = file.display().to_string();
|
2014-06-30 09:41:30 -05:00
|
|
|
let interned = token::intern_and_get_ident(src.as_slice());
|
|
|
|
cx.codemap().new_filemap(filename, src);
|
2014-01-08 02:59:11 -06:00
|
|
|
|
2014-04-15 07:00:14 -05:00
|
|
|
base::MacExpr::new(cx.expr_str(sp, interned))
|
2013-11-27 21:05:12 -06:00
|
|
|
}
|
2014-06-30 09:41:30 -05:00
|
|
|
Err(_) => {
|
2014-05-16 12:45:16 -05:00
|
|
|
cx.span_err(sp,
|
|
|
|
format!("{} wasn't a utf-8 file",
|
|
|
|
file.display()).as_slice());
|
2014-04-15 07:00:14 -05:00
|
|
|
return DummyResult::expr(sp);
|
2013-10-13 20:48:47 -05:00
|
|
|
}
|
2012-05-18 12:02:21 -05:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-01-09 07:05:33 -06:00
|
|
|
pub fn expand_include_bin(cx: &mut ExtCtxt, sp: Span, tts: &[ast::TokenTree])
|
2014-08-27 20:46:52 -05:00
|
|
|
-> Box<base::MacResult+'static> {
|
2014-01-17 08:53:10 -06:00
|
|
|
let file = match get_single_str_from_tts(cx, sp, tts, "include_bin!") {
|
|
|
|
Some(f) => f,
|
2014-04-15 07:00:14 -05:00
|
|
|
None => return DummyResult::expr(sp)
|
2014-01-17 08:53:10 -06:00
|
|
|
};
|
2013-12-03 21:15:12 -06:00
|
|
|
let file = res_rel_file(cx, sp, &Path::new(file));
|
2014-01-29 19:39:21 -06:00
|
|
|
match File::open(&file).read_to_end() {
|
2013-10-25 19:04:37 -05:00
|
|
|
Err(e) => {
|
2014-05-16 12:45:16 -05:00
|
|
|
cx.span_err(sp,
|
|
|
|
format!("couldn't read {}: {}",
|
|
|
|
file.display(),
|
|
|
|
e).as_slice());
|
2014-04-15 07:00:14 -05:00
|
|
|
return DummyResult::expr(sp);
|
2013-10-14 10:24:17 -05:00
|
|
|
}
|
2013-10-25 19:04:37 -05:00
|
|
|
Ok(bytes) => {
|
2014-02-28 14:54:01 -06:00
|
|
|
let bytes = bytes.iter().map(|x| *x).collect();
|
2014-04-15 07:00:14 -05:00
|
|
|
base::MacExpr::new(cx.expr_lit(sp, ast::LitBinary(Rc::new(bytes))))
|
2013-10-14 10:24:17 -05:00
|
|
|
}
|
2012-05-18 12:03:27 -05:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2013-02-26 12:15:29 -06:00
|
|
|
// resolve a file-system path to an absolute file-system path (if it
|
|
|
|
// isn't already)
|
2013-12-28 23:06:22 -06:00
|
|
|
fn res_rel_file(cx: &mut ExtCtxt, sp: codemap::Span, arg: &Path) -> Path {
|
2012-05-18 12:02:21 -05:00
|
|
|
// NB: relative paths are resolved relative to the compilation unit
|
2013-09-26 19:21:59 -05:00
|
|
|
if !arg.is_absolute() {
|
2013-12-03 21:15:12 -06:00
|
|
|
let mut cu = Path::new(cx.codemap().span_to_filename(sp));
|
2013-09-26 19:21:59 -05:00
|
|
|
cu.pop();
|
2013-10-07 21:16:58 -05:00
|
|
|
cu.push(arg);
|
2013-09-26 19:21:59 -05:00
|
|
|
cu
|
2012-05-18 12:02:21 -05:00
|
|
|
} else {
|
2013-09-26 19:21:59 -05:00
|
|
|
arg.clone()
|
2012-05-18 12:02:21 -05:00
|
|
|
}
|
2012-05-18 12:00:49 -05:00
|
|
|
}
|