701 lines
31 KiB
Rust
701 lines
31 KiB
Rust
use rustc::ty;
|
|
use rustc::ty::layout::{Align, LayoutOf, Size};
|
|
use rustc::hir::def_id::DefId;
|
|
use rustc::mir;
|
|
use syntax::attr;
|
|
|
|
use crate::*;
|
|
|
|
impl<'a, 'mir, 'tcx> EvalContextExt<'a, 'mir, 'tcx> for crate::MiriEvalContext<'a, 'mir, 'tcx> {}
|
|
pub trait EvalContextExt<'a, 'mir, 'tcx: 'a+'mir>: crate::MiriEvalContextExt<'a, 'mir, 'tcx> {
|
|
fn find_fn(
|
|
&mut self,
|
|
instance: ty::Instance<'tcx>,
|
|
args: &[OpTy<'tcx, Borrow>],
|
|
dest: Option<PlaceTy<'tcx, Borrow>>,
|
|
ret: Option<mir::BasicBlock>,
|
|
) -> EvalResult<'tcx, Option<&'mir mir::Mir<'tcx>>> {
|
|
let this = self.eval_context_mut();
|
|
trace!("eval_fn_call: {:#?}, {:?}", instance, dest.map(|place| *place));
|
|
|
|
// first run the common hooks also supported by CTFE
|
|
if this.hook_fn(instance, args, dest)? {
|
|
this.goto_block(ret)?;
|
|
return Ok(None);
|
|
}
|
|
// there are some more lang items we want to hook that CTFE does not hook (yet)
|
|
if this.tcx.lang_items().align_offset_fn() == Some(instance.def.def_id()) {
|
|
// FIXME: return a real value in case the target allocation has an
|
|
// alignment bigger than the one requested
|
|
let n = u128::max_value();
|
|
let dest = dest.unwrap();
|
|
let n = this.truncate(n, dest.layout);
|
|
this.write_scalar(Scalar::from_uint(n, dest.layout.size), dest)?;
|
|
this.goto_block(ret)?;
|
|
return Ok(None);
|
|
}
|
|
|
|
// Try to see if we can do something about foreign items
|
|
if this.tcx.is_foreign_item(instance.def_id()) {
|
|
// An external function that we cannot find MIR for, but we can still run enough
|
|
// of them to make miri viable.
|
|
this.emulate_foreign_item(
|
|
instance.def_id(),
|
|
args,
|
|
dest.unwrap(),
|
|
ret.unwrap(),
|
|
)?;
|
|
// `goto_block` already handled
|
|
return Ok(None);
|
|
}
|
|
|
|
// Otherwise, load the MIR
|
|
Ok(Some(this.load_mir(instance.def)?))
|
|
}
|
|
|
|
/// Emulate calling a foreign item, fail if the item is not supported.
|
|
/// This function will handle `goto_block` if needed.
|
|
fn emulate_foreign_item(
|
|
&mut self,
|
|
def_id: DefId,
|
|
args: &[OpTy<'tcx, Borrow>],
|
|
dest: PlaceTy<'tcx, Borrow>,
|
|
ret: mir::BasicBlock,
|
|
) -> EvalResult<'tcx> {
|
|
let this = self.eval_context_mut();
|
|
let attrs = this.tcx.get_attrs(def_id);
|
|
let link_name = match attr::first_attr_value_str_by_name(&attrs, "link_name") {
|
|
Some(name) => name.as_str(),
|
|
None => this.tcx.item_name(def_id).as_str(),
|
|
};
|
|
// Strip linker suffixes (seen on 32bit macOS)
|
|
let link_name = link_name.trim_end_matches("$UNIX2003");
|
|
|
|
let tcx = &{this.tcx.tcx};
|
|
|
|
// All these functions take raw pointers, so if we access memory directly
|
|
// (as opposed to through a place), we have to remember to erase any tag
|
|
// that might still hang around!
|
|
|
|
match &link_name[..] {
|
|
"malloc" => {
|
|
let size = this.read_scalar(args[0])?.to_usize(this)?;
|
|
if size == 0 {
|
|
this.write_null(dest)?;
|
|
} else {
|
|
let align = this.tcx.data_layout.pointer_align.abi;
|
|
let ptr = this.memory_mut().allocate(Size::from_bytes(size), align, MiriMemoryKind::C.into());
|
|
this.write_scalar(Scalar::Ptr(ptr.with_default_tag()), dest)?;
|
|
}
|
|
}
|
|
|
|
"free" => {
|
|
let ptr = this.read_scalar(args[0])?.not_undef()?;
|
|
if !ptr.is_null_ptr(this) {
|
|
this.memory_mut().deallocate(
|
|
ptr.to_ptr()?,
|
|
None,
|
|
MiriMemoryKind::C.into(),
|
|
)?;
|
|
}
|
|
}
|
|
|
|
"__rust_alloc" => {
|
|
let size = this.read_scalar(args[0])?.to_usize(this)?;
|
|
let align = this.read_scalar(args[1])?.to_usize(this)?;
|
|
if size == 0 {
|
|
return err!(HeapAllocZeroBytes);
|
|
}
|
|
if !align.is_power_of_two() {
|
|
return err!(HeapAllocNonPowerOfTwoAlignment(align));
|
|
}
|
|
let ptr = this.memory_mut()
|
|
.allocate(
|
|
Size::from_bytes(size),
|
|
Align::from_bytes(align).unwrap(),
|
|
MiriMemoryKind::Rust.into()
|
|
)
|
|
.with_default_tag();
|
|
this.write_scalar(Scalar::Ptr(ptr), dest)?;
|
|
}
|
|
"__rust_alloc_zeroed" => {
|
|
let size = this.read_scalar(args[0])?.to_usize(this)?;
|
|
let align = this.read_scalar(args[1])?.to_usize(this)?;
|
|
if size == 0 {
|
|
return err!(HeapAllocZeroBytes);
|
|
}
|
|
if !align.is_power_of_two() {
|
|
return err!(HeapAllocNonPowerOfTwoAlignment(align));
|
|
}
|
|
let ptr = this.memory_mut()
|
|
.allocate(
|
|
Size::from_bytes(size),
|
|
Align::from_bytes(align).unwrap(),
|
|
MiriMemoryKind::Rust.into()
|
|
)
|
|
.with_default_tag();
|
|
this.memory_mut()
|
|
.get_mut(ptr.alloc_id)?
|
|
.write_repeat(tcx, ptr, 0, Size::from_bytes(size))?;
|
|
this.write_scalar(Scalar::Ptr(ptr), dest)?;
|
|
}
|
|
"__rust_dealloc" => {
|
|
let ptr = this.read_scalar(args[0])?.to_ptr()?;
|
|
let old_size = this.read_scalar(args[1])?.to_usize(this)?;
|
|
let align = this.read_scalar(args[2])?.to_usize(this)?;
|
|
if old_size == 0 {
|
|
return err!(HeapAllocZeroBytes);
|
|
}
|
|
if !align.is_power_of_two() {
|
|
return err!(HeapAllocNonPowerOfTwoAlignment(align));
|
|
}
|
|
this.memory_mut().deallocate(
|
|
ptr,
|
|
Some((Size::from_bytes(old_size), Align::from_bytes(align).unwrap())),
|
|
MiriMemoryKind::Rust.into(),
|
|
)?;
|
|
}
|
|
"__rust_realloc" => {
|
|
let ptr = this.read_scalar(args[0])?.to_ptr()?;
|
|
let old_size = this.read_scalar(args[1])?.to_usize(this)?;
|
|
let align = this.read_scalar(args[2])?.to_usize(this)?;
|
|
let new_size = this.read_scalar(args[3])?.to_usize(this)?;
|
|
if old_size == 0 || new_size == 0 {
|
|
return err!(HeapAllocZeroBytes);
|
|
}
|
|
if !align.is_power_of_two() {
|
|
return err!(HeapAllocNonPowerOfTwoAlignment(align));
|
|
}
|
|
let new_ptr = this.memory_mut().reallocate(
|
|
ptr,
|
|
Size::from_bytes(old_size),
|
|
Align::from_bytes(align).unwrap(),
|
|
Size::from_bytes(new_size),
|
|
Align::from_bytes(align).unwrap(),
|
|
MiriMemoryKind::Rust.into(),
|
|
)?;
|
|
this.write_scalar(Scalar::Ptr(new_ptr.with_default_tag()), dest)?;
|
|
}
|
|
|
|
"syscall" => {
|
|
// TODO: read `syscall` ids like `sysconf` ids and
|
|
// figure out some way to actually process some of them
|
|
//
|
|
// libc::syscall(NR_GETRANDOM, buf.as_mut_ptr(), buf.len(), GRND_NONBLOCK)
|
|
// is called if a `HashMap` is created the regular way.
|
|
match this.read_scalar(args[0])?.to_usize(this)? {
|
|
318 | 511 => {
|
|
return err!(Unimplemented(
|
|
"miri does not support random number generators".to_owned(),
|
|
))
|
|
}
|
|
id => {
|
|
return err!(Unimplemented(
|
|
format!("miri does not support syscall id {}", id),
|
|
))
|
|
}
|
|
}
|
|
}
|
|
|
|
"dlsym" => {
|
|
let _handle = this.read_scalar(args[0])?;
|
|
let symbol = this.read_scalar(args[1])?.to_ptr()?;
|
|
let symbol_name = this.memory().get(symbol.alloc_id)?.read_c_str(tcx, symbol)?;
|
|
let err = format!("bad c unicode symbol: {:?}", symbol_name);
|
|
let symbol_name = ::std::str::from_utf8(symbol_name).unwrap_or(&err);
|
|
return err!(Unimplemented(format!(
|
|
"miri does not support dynamically loading libraries (requested symbol: {})",
|
|
symbol_name
|
|
)));
|
|
}
|
|
|
|
"__rust_maybe_catch_panic" => {
|
|
// fn __rust_maybe_catch_panic(f: fn(*mut u8), data: *mut u8, data_ptr: *mut usize, vtable_ptr: *mut usize) -> u32
|
|
// We abort on panic, so not much is going on here, but we still have to call the closure
|
|
let f = this.read_scalar(args[0])?.to_ptr()?;
|
|
let data = this.read_scalar(args[1])?.not_undef()?;
|
|
let f_instance = this.memory().get_fn(f)?;
|
|
this.write_null(dest)?;
|
|
trace!("__rust_maybe_catch_panic: {:?}", f_instance);
|
|
|
|
// Now we make a function call. TODO: Consider making this re-usable? EvalContext::step does sth. similar for the TLS dtors,
|
|
// and of course eval_main.
|
|
let mir = this.load_mir(f_instance.def)?;
|
|
let ret_place = MPlaceTy::dangling(this.layout_of(this.tcx.mk_unit())?, this).into();
|
|
this.push_stack_frame(
|
|
f_instance,
|
|
mir.span,
|
|
mir,
|
|
Some(ret_place),
|
|
StackPopCleanup::Goto(Some(ret)), // directly return to caller
|
|
)?;
|
|
let mut args = this.frame().mir.args_iter();
|
|
|
|
let arg_local = args.next().ok_or_else(||
|
|
EvalErrorKind::AbiViolation(
|
|
"Argument to __rust_maybe_catch_panic does not take enough arguments."
|
|
.to_owned(),
|
|
),
|
|
)?;
|
|
let arg_dest = this.eval_place(&mir::Place::Local(arg_local))?;
|
|
this.write_scalar(data, arg_dest)?;
|
|
|
|
assert!(args.next().is_none(), "__rust_maybe_catch_panic argument has more arguments than expected");
|
|
|
|
// We ourselves will return 0, eventually (because we will not return if we paniced)
|
|
this.write_null(dest)?;
|
|
|
|
// Don't fall through, we do NOT want to `goto_block`!
|
|
return Ok(());
|
|
}
|
|
|
|
"__rust_start_panic" =>
|
|
return err!(MachineError("the evaluated program panicked".to_string())),
|
|
|
|
"memcmp" => {
|
|
let left = this.read_scalar(args[0])?.not_undef()?;
|
|
let right = this.read_scalar(args[1])?.not_undef()?;
|
|
let n = Size::from_bytes(this.read_scalar(args[2])?.to_usize(this)?);
|
|
|
|
let result = {
|
|
let left_bytes = this.memory().read_bytes(left, n)?;
|
|
let right_bytes = this.memory().read_bytes(right, n)?;
|
|
|
|
use std::cmp::Ordering::*;
|
|
match left_bytes.cmp(right_bytes) {
|
|
Less => -1i32,
|
|
Equal => 0,
|
|
Greater => 1,
|
|
}
|
|
};
|
|
|
|
this.write_scalar(
|
|
Scalar::from_int(result, Size::from_bits(32)),
|
|
dest,
|
|
)?;
|
|
}
|
|
|
|
"memrchr" => {
|
|
let ptr = this.read_scalar(args[0])?.not_undef()?;
|
|
let val = this.read_scalar(args[1])?.to_i32()? as u8;
|
|
let num = this.read_scalar(args[2])?.to_usize(this)?;
|
|
if let Some(idx) = this.memory().read_bytes(ptr, Size::from_bytes(num))?
|
|
.iter().rev().position(|&c| c == val)
|
|
{
|
|
let new_ptr = ptr.ptr_offset(Size::from_bytes(num - idx as u64 - 1), this)?;
|
|
this.write_scalar(new_ptr, dest)?;
|
|
} else {
|
|
this.write_null(dest)?;
|
|
}
|
|
}
|
|
|
|
"memchr" => {
|
|
let ptr = this.read_scalar(args[0])?.not_undef()?;
|
|
let val = this.read_scalar(args[1])?.to_i32()? as u8;
|
|
let num = this.read_scalar(args[2])?.to_usize(this)?;
|
|
if let Some(idx) = this.memory().read_bytes(ptr, Size::from_bytes(num))?.iter().position(
|
|
|&c| c == val,
|
|
)
|
|
{
|
|
let new_ptr = ptr.ptr_offset(Size::from_bytes(idx as u64), this)?;
|
|
this.write_scalar(new_ptr, dest)?;
|
|
} else {
|
|
this.write_null(dest)?;
|
|
}
|
|
}
|
|
|
|
"getenv" => {
|
|
let result = {
|
|
let name_ptr = this.read_scalar(args[0])?.to_ptr()?;
|
|
let name = this.memory().get(name_ptr.alloc_id)?.read_c_str(tcx, name_ptr)?;
|
|
match this.machine.env_vars.get(name) {
|
|
Some(&var) => Scalar::Ptr(var),
|
|
None => Scalar::ptr_null(&*this.tcx),
|
|
}
|
|
};
|
|
this.write_scalar(result, dest)?;
|
|
}
|
|
|
|
"unsetenv" => {
|
|
let mut success = None;
|
|
{
|
|
let name_ptr = this.read_scalar(args[0])?.not_undef()?;
|
|
if !name_ptr.is_null_ptr(this) {
|
|
let name_ptr = name_ptr.to_ptr()?;
|
|
let name = this.memory().get(name_ptr.alloc_id)?.read_c_str(tcx, name_ptr)?.to_owned();
|
|
if !name.is_empty() && !name.contains(&b'=') {
|
|
success = Some(this.machine.env_vars.remove(&name));
|
|
}
|
|
}
|
|
}
|
|
if let Some(old) = success {
|
|
if let Some(var) = old {
|
|
this.memory_mut().deallocate(var, None, MiriMemoryKind::Env.into())?;
|
|
}
|
|
this.write_null(dest)?;
|
|
} else {
|
|
this.write_scalar(Scalar::from_int(-1, dest.layout.size), dest)?;
|
|
}
|
|
}
|
|
|
|
"setenv" => {
|
|
let mut new = None;
|
|
{
|
|
let name_ptr = this.read_scalar(args[0])?.not_undef()?;
|
|
let value_ptr = this.read_scalar(args[1])?.to_ptr()?;
|
|
let value = this.memory().get(value_ptr.alloc_id)?.read_c_str(tcx, value_ptr)?;
|
|
if !name_ptr.is_null_ptr(this) {
|
|
let name_ptr = name_ptr.to_ptr()?;
|
|
let name = this.memory().get(name_ptr.alloc_id)?.read_c_str(tcx, name_ptr)?;
|
|
if !name.is_empty() && !name.contains(&b'=') {
|
|
new = Some((name.to_owned(), value.to_owned()));
|
|
}
|
|
}
|
|
}
|
|
if let Some((name, value)) = new {
|
|
// +1 for the null terminator
|
|
let value_copy = this.memory_mut().allocate(
|
|
Size::from_bytes((value.len() + 1) as u64),
|
|
Align::from_bytes(1).unwrap(),
|
|
MiriMemoryKind::Env.into(),
|
|
).with_default_tag();
|
|
{
|
|
let alloc = this.memory_mut().get_mut(value_copy.alloc_id)?;
|
|
alloc.write_bytes(tcx, value_copy, &value)?;
|
|
let trailing_zero_ptr = value_copy.offset(Size::from_bytes(value.len() as u64), tcx)?;
|
|
alloc.write_bytes(tcx, trailing_zero_ptr, &[0])?;
|
|
}
|
|
if let Some(var) = this.machine.env_vars.insert(
|
|
name.to_owned(),
|
|
value_copy,
|
|
)
|
|
{
|
|
this.memory_mut().deallocate(var, None, MiriMemoryKind::Env.into())?;
|
|
}
|
|
this.write_null(dest)?;
|
|
} else {
|
|
this.write_scalar(Scalar::from_int(-1, dest.layout.size), dest)?;
|
|
}
|
|
}
|
|
|
|
"write" => {
|
|
let fd = this.read_scalar(args[0])?.to_i32()?;
|
|
let buf = this.read_scalar(args[1])?.not_undef()?;
|
|
let n = this.read_scalar(args[2])?.to_usize(&*this.tcx)?;
|
|
trace!("Called write({:?}, {:?}, {:?})", fd, buf, n);
|
|
let result = if fd == 1 || fd == 2 {
|
|
// stdout/stderr
|
|
use std::io::{self, Write};
|
|
|
|
let buf_cont = this.memory().read_bytes(buf, Size::from_bytes(n))?;
|
|
let res = if fd == 1 {
|
|
io::stdout().write(buf_cont)
|
|
} else {
|
|
io::stderr().write(buf_cont)
|
|
};
|
|
match res {
|
|
Ok(n) => n as i64,
|
|
Err(_) => -1,
|
|
}
|
|
} else {
|
|
eprintln!("Miri: Ignored output to FD {}", fd);
|
|
n as i64 // pretend it all went well
|
|
}; // now result is the value we return back to the program
|
|
this.write_scalar(
|
|
Scalar::from_int(result, dest.layout.size),
|
|
dest,
|
|
)?;
|
|
}
|
|
|
|
"strlen" => {
|
|
let ptr = this.read_scalar(args[0])?.to_ptr()?;
|
|
let n = this.memory().get(ptr.alloc_id)?.read_c_str(tcx, ptr)?.len();
|
|
this.write_scalar(Scalar::from_uint(n as u64, dest.layout.size), dest)?;
|
|
}
|
|
|
|
// Some things needed for sys::thread initialization to go through
|
|
"signal" | "sigaction" | "sigaltstack" => {
|
|
this.write_scalar(Scalar::from_int(0, dest.layout.size), dest)?;
|
|
}
|
|
|
|
"sysconf" => {
|
|
let name = this.read_scalar(args[0])?.to_i32()?;
|
|
|
|
trace!("sysconf() called with name {}", name);
|
|
// cache the sysconf integers via miri's global cache
|
|
let paths = &[
|
|
(&["libc", "_SC_PAGESIZE"], Scalar::from_int(4096, dest.layout.size)),
|
|
(&["libc", "_SC_GETPW_R_SIZE_MAX"], Scalar::from_int(-1, dest.layout.size)),
|
|
(&["libc", "_SC_NPROCESSORS_ONLN"], Scalar::from_int(1, dest.layout.size)),
|
|
];
|
|
let mut result = None;
|
|
for &(path, path_value) in paths {
|
|
if let Ok(instance) = this.resolve_path(path) {
|
|
let cid = GlobalId {
|
|
instance,
|
|
promoted: None,
|
|
};
|
|
let const_val = this.const_eval_raw(cid)?;
|
|
let const_val = this.read_scalar(const_val.into())?;
|
|
let value = const_val.to_i32()?;
|
|
if value == name {
|
|
result = Some(path_value);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
if let Some(result) = result {
|
|
this.write_scalar(result, dest)?;
|
|
} else {
|
|
return err!(Unimplemented(
|
|
format!("Unimplemented sysconf name: {}", name),
|
|
));
|
|
}
|
|
}
|
|
|
|
"isatty" => {
|
|
this.write_null(dest)?;
|
|
}
|
|
|
|
// Hook pthread calls that go to the thread-local storage memory subsystem
|
|
"pthread_key_create" => {
|
|
let key_ptr = this.read_scalar(args[0])?.to_ptr()?;
|
|
|
|
// Extract the function type out of the signature (that seems easier than constructing it ourselves...)
|
|
let dtor = match this.read_scalar(args[1])?.not_undef()? {
|
|
Scalar::Ptr(dtor_ptr) => Some(this.memory().get_fn(dtor_ptr)?),
|
|
Scalar::Bits { bits: 0, size } => {
|
|
assert_eq!(size as u64, this.memory().pointer_size().bytes());
|
|
None
|
|
},
|
|
Scalar::Bits { .. } => return err!(ReadBytesAsPointer),
|
|
};
|
|
|
|
// Figure out how large a pthread TLS key actually is. This is libc::pthread_key_t.
|
|
let key_type = args[0].layout.ty.builtin_deref(true)
|
|
.ok_or_else(|| EvalErrorKind::AbiViolation("Wrong signature used for pthread_key_create: First argument must be a raw pointer.".to_owned()))?.ty;
|
|
let key_layout = this.layout_of(key_type)?;
|
|
|
|
// Create key and write it into the memory where key_ptr wants it
|
|
let key = this.machine.tls.create_tls_key(dtor, tcx) as u128;
|
|
if key_layout.size.bits() < 128 && key >= (1u128 << key_layout.size.bits() as u128) {
|
|
return err!(OutOfTls);
|
|
}
|
|
|
|
this.memory().check_align(key_ptr.into(), key_layout.align.abi)?;
|
|
this.memory_mut().get_mut(key_ptr.alloc_id)?.write_scalar(
|
|
tcx,
|
|
key_ptr,
|
|
Scalar::from_uint(key, key_layout.size).into(),
|
|
key_layout.size,
|
|
)?;
|
|
|
|
// Return success (0)
|
|
this.write_null(dest)?;
|
|
}
|
|
"pthread_key_delete" => {
|
|
let key = this.read_scalar(args[0])?.to_bits(args[0].layout.size)?;
|
|
this.machine.tls.delete_tls_key(key)?;
|
|
// Return success (0)
|
|
this.write_null(dest)?;
|
|
}
|
|
"pthread_getspecific" => {
|
|
let key = this.read_scalar(args[0])?.to_bits(args[0].layout.size)?;
|
|
let ptr = this.machine.tls.load_tls(key)?;
|
|
this.write_scalar(ptr, dest)?;
|
|
}
|
|
"pthread_setspecific" => {
|
|
let key = this.read_scalar(args[0])?.to_bits(args[0].layout.size)?;
|
|
let new_ptr = this.read_scalar(args[1])?.not_undef()?;
|
|
this.machine.tls.store_tls(key, new_ptr)?;
|
|
|
|
// Return success (0)
|
|
this.write_null(dest)?;
|
|
}
|
|
|
|
// Determining stack base address
|
|
"pthread_attr_init" | "pthread_attr_destroy" | "pthread_attr_get_np" |
|
|
"pthread_getattr_np" | "pthread_self" | "pthread_get_stacksize_np" => {
|
|
this.write_null(dest)?;
|
|
}
|
|
"pthread_attr_getstack" => {
|
|
// second argument is where we are supposed to write the stack size
|
|
let ptr = this.deref_operand(args[1])?;
|
|
let stackaddr = Scalar::from_int(0x80000, args[1].layout.size); // just any address
|
|
this.write_scalar(stackaddr, ptr.into())?;
|
|
// return 0
|
|
this.write_null(dest)?;
|
|
}
|
|
"pthread_get_stackaddr_np" => {
|
|
let stackaddr = Scalar::from_int(0x80000, dest.layout.size); // just any address
|
|
this.write_scalar(stackaddr, dest)?;
|
|
}
|
|
|
|
// Stub out calls for condvar, mutex and rwlock to just return 0
|
|
"pthread_mutexattr_init" | "pthread_mutexattr_settype" | "pthread_mutex_init" |
|
|
"pthread_mutexattr_destroy" | "pthread_mutex_lock" | "pthread_mutex_unlock" |
|
|
"pthread_mutex_destroy" | "pthread_rwlock_rdlock" | "pthread_rwlock_unlock" |
|
|
"pthread_rwlock_wrlock" | "pthread_rwlock_destroy" | "pthread_condattr_init" |
|
|
"pthread_condattr_setclock" | "pthread_cond_init" | "pthread_condattr_destroy" |
|
|
"pthread_cond_destroy" => {
|
|
this.write_null(dest)?;
|
|
}
|
|
|
|
"mmap" => {
|
|
// This is a horrible hack, but well... the guard page mechanism calls mmap and expects a particular return value, so we give it that value
|
|
let addr = this.read_scalar(args[0])?.not_undef()?;
|
|
this.write_scalar(addr, dest)?;
|
|
}
|
|
"mprotect" => {
|
|
this.write_null(dest)?;
|
|
}
|
|
|
|
// macOS API stubs
|
|
"_tlv_atexit" => {
|
|
// FIXME: Register the dtor
|
|
},
|
|
"_NSGetArgc" => {
|
|
this.write_scalar(Scalar::Ptr(this.machine.argc.unwrap()), dest)?;
|
|
},
|
|
"_NSGetArgv" => {
|
|
this.write_scalar(Scalar::Ptr(this.machine.argv.unwrap()), dest)?;
|
|
},
|
|
|
|
// Windows API stubs
|
|
"SetLastError" => {
|
|
let err = this.read_scalar(args[0])?.to_u32()?;
|
|
this.machine.last_error = err;
|
|
}
|
|
"GetLastError" => {
|
|
this.write_scalar(Scalar::from_uint(this.machine.last_error, Size::from_bits(32)), dest)?;
|
|
}
|
|
|
|
"AddVectoredExceptionHandler" => {
|
|
// any non zero value works for the stdlib. This is just used for stackoverflows anyway
|
|
this.write_scalar(Scalar::from_int(1, dest.layout.size), dest)?;
|
|
},
|
|
"InitializeCriticalSection" |
|
|
"EnterCriticalSection" |
|
|
"LeaveCriticalSection" |
|
|
"DeleteCriticalSection" => {
|
|
// Nothing to do, not even a return value
|
|
},
|
|
"GetModuleHandleW" |
|
|
"GetProcAddress" |
|
|
"TryEnterCriticalSection" |
|
|
"GetConsoleScreenBufferInfo" |
|
|
"SetConsoleTextAttribute" => {
|
|
// pretend these do not exist/nothing happened, by returning zero
|
|
this.write_null(dest)?;
|
|
},
|
|
"GetSystemInfo" => {
|
|
let system_info = this.deref_operand(args[0])?;
|
|
let system_info_ptr = system_info.ptr.to_ptr()?;
|
|
// initialize with 0
|
|
this.memory_mut().get_mut(system_info_ptr.alloc_id)?
|
|
.write_repeat(tcx, system_info_ptr, 0, system_info.layout.size)?;
|
|
// set number of processors to 1
|
|
let dword_size = Size::from_bytes(4);
|
|
let offset = 2*dword_size + 3*tcx.pointer_size();
|
|
this.memory_mut().get_mut(system_info_ptr.alloc_id)?
|
|
.write_scalar(
|
|
tcx,
|
|
system_info_ptr.offset(offset, tcx)?,
|
|
Scalar::from_int(1, dword_size).into(),
|
|
dword_size,
|
|
)?;
|
|
}
|
|
|
|
"TlsAlloc" => {
|
|
// This just creates a key; Windows does not natively support TLS dtors.
|
|
|
|
// Create key and return it
|
|
let key = this.machine.tls.create_tls_key(None, tcx) as u128;
|
|
|
|
// Figure out how large a TLS key actually is. This is c::DWORD.
|
|
if dest.layout.size.bits() < 128 && key >= (1u128 << dest.layout.size.bits() as u128) {
|
|
return err!(OutOfTls);
|
|
}
|
|
this.write_scalar(Scalar::from_uint(key, dest.layout.size), dest)?;
|
|
}
|
|
"TlsGetValue" => {
|
|
let key = this.read_scalar(args[0])?.to_u32()? as u128;
|
|
let ptr = this.machine.tls.load_tls(key)?;
|
|
this.write_scalar(ptr, dest)?;
|
|
}
|
|
"TlsSetValue" => {
|
|
let key = this.read_scalar(args[0])?.to_u32()? as u128;
|
|
let new_ptr = this.read_scalar(args[1])?.not_undef()?;
|
|
this.machine.tls.store_tls(key, new_ptr)?;
|
|
|
|
// Return success (1)
|
|
this.write_scalar(Scalar::from_int(1, dest.layout.size), dest)?;
|
|
}
|
|
"GetStdHandle" => {
|
|
let which = this.read_scalar(args[0])?.to_i32()?;
|
|
// We just make this the identity function, so we know later in "WriteFile"
|
|
// which one it is.
|
|
this.write_scalar(Scalar::from_int(which, this.pointer_size()), dest)?;
|
|
}
|
|
"WriteFile" => {
|
|
let handle = this.read_scalar(args[0])?.to_isize(this)?;
|
|
let buf = this.read_scalar(args[1])?.not_undef()?;
|
|
let n = this.read_scalar(args[2])?.to_u32()?;
|
|
let written_place = this.deref_operand(args[3])?;
|
|
this.write_null(written_place.into())?; // spec says we always write 0 first
|
|
let written = if handle == -11 || handle == -12 {
|
|
// stdout/stderr
|
|
use std::io::{self, Write};
|
|
|
|
let buf_cont = this.memory().read_bytes(buf, Size::from_bytes(u64::from(n)))?;
|
|
let res = if handle == -11 {
|
|
io::stdout().write(buf_cont)
|
|
} else {
|
|
io::stderr().write(buf_cont)
|
|
};
|
|
res.ok().map(|n| n as u32)
|
|
} else {
|
|
eprintln!("Miri: Ignored output to handle {}", handle);
|
|
Some(n) // pretend it all went well
|
|
};
|
|
// If there was no error, write back how much was written
|
|
if let Some(n) = written {
|
|
this.write_scalar(Scalar::from_uint(n, Size::from_bits(32)), written_place.into())?;
|
|
}
|
|
// Return whether this was a success
|
|
this.write_scalar(
|
|
Scalar::from_int(if written.is_some() { 1 } else { 0 }, dest.layout.size),
|
|
dest,
|
|
)?;
|
|
}
|
|
"GetConsoleMode" => {
|
|
// Everything is a pipe
|
|
this.write_null(dest)?;
|
|
}
|
|
"GetEnvironmentVariableW" => {
|
|
// This is not the env var you are looking for
|
|
this.machine.last_error = 203; // ERROR_ENVVAR_NOT_FOUND
|
|
this.write_null(dest)?;
|
|
}
|
|
"GetCommandLineW" => {
|
|
this.write_scalar(Scalar::Ptr(this.machine.cmd_line.unwrap()), dest)?;
|
|
}
|
|
|
|
// We can't execute anything else
|
|
_ => {
|
|
return err!(Unimplemented(
|
|
format!("can't call foreign function: {}", link_name),
|
|
));
|
|
}
|
|
}
|
|
|
|
this.goto_block(Some(ret))?;
|
|
this.dump_place(*dest);
|
|
Ok(())
|
|
}
|
|
|
|
fn write_null(&mut self, dest: PlaceTy<'tcx, Borrow>) -> EvalResult<'tcx> {
|
|
self.eval_context_mut().write_scalar(Scalar::from_int(0, dest.layout.size), dest)
|
|
}
|
|
}
|