src/machine.rs

   1 //! Global machine state as well as implementation of the interpreter engine
   2 //! `Machine` trait.
   3
   4 use std::borrow::Cow;
   5 use std::cell::RefCell;
   6 use std::collections::HashSet;
   7 use std::fmt;
   8 use std::num::NonZeroU64;
   9 use std::rc::Rc;
  10 use std::time::Instant;
  11
  12 use rand::rngs::StdRng;
  13 use rand::SeedableRng;
  14
  15 use rustc_ast::ast::Mutability;
  16 use rustc_data_structures::fx::FxHashMap;
  17 #[allow(unused)]
  18 use rustc_data_structures::static_assert_size;
  19 use rustc_middle::{
  20     mir,
  21     ty::{
  22         self,
  23         layout::{LayoutCx, LayoutError, LayoutOf, TyAndLayout},
  24         Instance, TyCtxt, TypeAndMut,
  25     },
  26 };
  27 use rustc_span::def_id::{CrateNum, DefId};
  28 use rustc_span::Symbol;
  29 use rustc_target::abi::Size;
  30 use rustc_target::spec::abi::Abi;
  31
  32 use crate::{shims::posix::FileHandler, *};
  33
  34 // Some global facts about the emulated machine.
  35 pub const PAGE_SIZE: u64 = 4 * 1024; // FIXME: adjust to target architecture
  36 pub const STACK_ADDR: u64 = 32 * PAGE_SIZE; // not really about the "stack", but where we start assigning integer addresses to allocations
  37 pub const STACK_SIZE: u64 = 16 * PAGE_SIZE; // whatever
  38 pub const NUM_CPUS: u64 = 1;
  39
  40 /// Extra data stored with each stack frame
  41 pub struct FrameData<'tcx> {
  42     /// Extra data for Stacked Borrows.
  43     pub call_id: stacked_borrows::CallId,
  44
  45     /// If this is Some(), then this is a special "catch unwind" frame (the frame of `try_fn`
  46     /// called by `try`). When this frame is popped during unwinding a panic,
  47     /// we stop unwinding, use the `CatchUnwindData` to handle catching.
  48     pub catch_unwind: Option<CatchUnwindData<'tcx>>,
  49
  50     /// If `measureme` profiling is enabled, holds timing information
  51     /// for the start of this frame. When we finish executing this frame,
  52     /// we use this to register a completed event with `measureme`.
  53     pub timing: Option<measureme::DetachedTiming>,
  54 }
  55
  56 impl<'tcx> std::fmt::Debug for FrameData<'tcx> {
  57     fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
  58         // Omitting `timing`, it does not support `Debug`.
  59         let FrameData { call_id, catch_unwind, timing: _ } = self;
  60         f.debug_struct("FrameData")
  61             .field("call_id", call_id)
  62             .field("catch_unwind", catch_unwind)
  63             .finish()
  64     }
  65 }
  66
  67 /// Extra memory kinds
  68 #[derive(Debug, Copy, Clone, PartialEq, Eq)]
  69 pub enum MiriMemoryKind {
  70     /// `__rust_alloc` memory.
  71     Rust,
  72     /// `malloc` memory.
  73     C,
  74     /// Windows `HeapAlloc` memory.
  75     WinHeap,
  76     /// Memory for args, errno, and other parts of the machine-managed environment.
  77     /// This memory may leak.
  78     Machine,
  79     /// Memory allocated by the runtime (e.g. env vars). Separate from `Machine`
  80     /// because we clean it up and leak-check it.
  81     Runtime,
  82     /// Globals copied from `tcx`.
  83     /// This memory may leak.
  84     Global,
  85     /// Memory for extern statics.
  86     /// This memory may leak.
  87     ExternStatic,
  88     /// Memory for thread-local statics.
  89     /// This memory may leak.
  90     Tls,
  91 }
  92
  93 impl Into<MemoryKind<MiriMemoryKind>> for MiriMemoryKind {
  94     #[inline(always)]
  95     fn into(self) -> MemoryKind<MiriMemoryKind> {
  96         MemoryKind::Machine(self)
  97     }
  98 }
  99
 100 impl MayLeak for MiriMemoryKind {
 101     #[inline(always)]
 102     fn may_leak(self) -> bool {
 103         use self::MiriMemoryKind::*;
 104         match self {
 105             Rust | C | WinHeap | Runtime => false,
 106             Machine | Global | ExternStatic | Tls => true,
 107         }
 108     }
 109 }
 110
 111 impl fmt::Display for MiriMemoryKind {
 112     fn fmt(&self, f: &mut fmt::Formatter<'_>) -> fmt::Result {
 113         use self::MiriMemoryKind::*;
 114         match self {
 115             Rust => write!(f, "Rust heap"),
 116             C => write!(f, "C heap"),
 117             WinHeap => write!(f, "Windows heap"),
 118             Machine => write!(f, "machine-managed memory"),
 119             Runtime => write!(f, "language runtime memory"),
 120             Global => write!(f, "global (static or const)"),
 121             ExternStatic => write!(f, "extern static"),
 122             Tls => write!(f, "thread-local static"),
 123         }
 124     }
 125 }
 126
 127 /// Pointer provenance (tag).
 128 #[derive(Debug, Clone, Copy, PartialEq, Eq, Hash)]
 129 pub struct Tag {
 130     pub alloc_id: AllocId,
 131     /// Stacked Borrows tag.
 132     pub sb: SbTag,
 133 }
 134
 135 #[cfg(all(target_arch = "x86_64", target_pointer_width = "64"))]
 136 static_assert_size!(Pointer<Tag>, 24);
 137 #[cfg(all(target_arch = "x86_64", target_pointer_width = "64"))]
 138 static_assert_size!(Pointer<Option<Tag>>, 24);
 139 #[cfg(all(target_arch = "x86_64", target_pointer_width = "64"))]
 140 static_assert_size!(ScalarMaybeUninit<Tag>, 32);
 141
 142 impl Provenance for Tag {
 143     /// We use absolute addresses in the `offset` of a `Pointer<Tag>`.
 144     const OFFSET_IS_ADDR: bool = true;
 145
 146     /// We cannot err on partial overwrites, it happens too often in practice (due to unions).
 147     const ERR_ON_PARTIAL_PTR_OVERWRITE: bool = false;
 148
 149     fn fmt(ptr: &Pointer<Self>, f: &mut fmt::Formatter<'_>) -> fmt::Result {
 150         let (tag, addr) = ptr.into_parts(); // address is absolute
 151         write!(f, "0x{:x}", addr.bytes())?;
 152         // Forward `alternate` flag to `alloc_id` printing.
 153         if f.alternate() {
 154             write!(f, "[{:#?}]", tag.alloc_id)?;
 155         } else {
 156             write!(f, "[{:?}]", tag.alloc_id)?;
 157         }
 158         // Print Stacked Borrows tag.
 159         write!(f, "{:?}", tag.sb)
 160     }
 161
 162     fn get_alloc_id(self) -> Option<AllocId> {
 163         Some(self.alloc_id)
 164     }
 165 }
 166
 167 /// Extra per-allocation data
 168 #[derive(Debug, Clone)]
 169 pub struct AllocExtra {
 170     /// Stacked Borrows state is only added if it is enabled.
 171     pub stacked_borrows: Option<stacked_borrows::AllocExtra>,
 172     /// Data race detection via the use of a vector-clock,
 173     ///  this is only added if it is enabled.
 174     pub data_race: Option<data_race::AllocExtra>,
 175 }
 176
 177 /// Precomputed layouts of primitive types
 178 pub struct PrimitiveLayouts<'tcx> {
 179     pub unit: TyAndLayout<'tcx>,
 180     pub i8: TyAndLayout<'tcx>,
 181     pub i32: TyAndLayout<'tcx>,
 182     pub isize: TyAndLayout<'tcx>,
 183     pub u8: TyAndLayout<'tcx>,
 184     pub u32: TyAndLayout<'tcx>,
 185     pub usize: TyAndLayout<'tcx>,
 186     pub bool: TyAndLayout<'tcx>,
 187     pub mut_raw_ptr: TyAndLayout<'tcx>,
 188 }
 189
 190 impl<'mir, 'tcx: 'mir> PrimitiveLayouts<'tcx> {
 191     fn new(layout_cx: LayoutCx<'tcx, TyCtxt<'tcx>>) -> Result<Self, LayoutError<'tcx>> {
 192         let tcx = layout_cx.tcx;
 193         let mut_raw_ptr = tcx.mk_ptr(TypeAndMut { ty: tcx.types.unit, mutbl: Mutability::Mut });
 194         Ok(Self {
 195             unit: layout_cx.layout_of(tcx.mk_unit())?,
 196             i8: layout_cx.layout_of(tcx.types.i8)?,
 197             i32: layout_cx.layout_of(tcx.types.i32)?,
 198             isize: layout_cx.layout_of(tcx.types.isize)?,
 199             u8: layout_cx.layout_of(tcx.types.u8)?,
 200             u32: layout_cx.layout_of(tcx.types.u32)?,
 201             usize: layout_cx.layout_of(tcx.types.usize)?,
 202             bool: layout_cx.layout_of(tcx.types.bool)?,
 203             mut_raw_ptr: layout_cx.layout_of(mut_raw_ptr)?,
 204         })
 205     }
 206 }
 207
 208 /// The machine itself.
 209 pub struct Evaluator<'mir, 'tcx> {
 210     pub stacked_borrows: Option<stacked_borrows::GlobalState>,
 211     pub data_race: Option<data_race::GlobalState>,
 212     pub intptrcast: intptrcast::GlobalState,
 213
 214     /// Environment variables set by `setenv`.
 215     /// Miri does not expose env vars from the host to the emulated program.
 216     pub(crate) env_vars: EnvVars<'tcx>,
 217
 218     /// Program arguments (`Option` because we can only initialize them after creating the ecx).
 219     /// These are *pointers* to argc/argv because macOS.
 220     /// We also need the full command line as one string because of Windows.
 221     pub(crate) argc: Option<MemPlace<Tag>>,
 222     pub(crate) argv: Option<MemPlace<Tag>>,
 223     pub(crate) cmd_line: Option<MemPlace<Tag>>,
 224
 225     /// TLS state.
 226     pub(crate) tls: TlsData<'tcx>,
 227
 228     /// What should Miri do when an op requires communicating with the host,
 229     /// such as accessing host env vars, random number generation, and
 230     /// file system access.
 231     pub(crate) isolated_op: IsolatedOp,
 232
 233     /// Whether to enforce the validity invariant.
 234     pub(crate) validate: bool,
 235
 236     /// Whether to enforce validity (e.g., initialization) of integers and floats.
 237     pub(crate) enforce_number_validity: bool,
 238
 239     /// Whether to enforce [ABI](Abi) of function calls.
 240     pub(crate) enforce_abi: bool,
 241
 242     pub(crate) file_handler: shims::posix::FileHandler,
 243     pub(crate) dir_handler: shims::posix::DirHandler,
 244
 245     /// The "time anchor" for this machine's monotone clock (for `Instant` simulation).
 246     pub(crate) time_anchor: Instant,
 247
 248     /// The set of threads.
 249     pub(crate) threads: ThreadManager<'mir, 'tcx>,
 250
 251     /// Precomputed `TyLayout`s for primitive data types that are commonly used inside Miri.
 252     pub(crate) layouts: PrimitiveLayouts<'tcx>,
 253
 254     /// Allocations that are considered roots of static memory (that may leak).
 255     pub(crate) static_roots: Vec<AllocId>,
 256
 257     /// The `measureme` profiler used to record timing information about
 258     /// the emulated program.
 259     profiler: Option<measureme::Profiler>,
 260     /// Used with `profiler` to cache the `StringId`s for event names
 261     /// uesd with `measureme`.
 262     string_cache: FxHashMap<String, measureme::StringId>,
 263
 264     /// Cache of `Instance` exported under the given `Symbol` name.
 265     /// `None` means no `Instance` exported under the given name is found.
 266     pub(crate) exported_symbols_cache: FxHashMap<Symbol, Option<Instance<'tcx>>>,
 267
 268     /// Whether to raise a panic in the context of the evaluated process when unsupported
 269     /// functionality is encountered. If `false`, an error is propagated in the Miri application context
 270     /// instead (default behavior)
 271     pub(crate) panic_on_unsupported: bool,
 272
 273     /// Equivalent setting as RUST_BACKTRACE on encountering an error.
 274     pub(crate) backtrace_style: BacktraceStyle,
 275
 276     /// Crates which are considered local for the purposes of error reporting.
 277     pub(crate) local_crates: Rc<[CrateNum]>,
 278
 279     /// Mapping extern static names to their base pointer.
 280     extern_statics: FxHashMap<Symbol, Pointer<Tag>>,
 281
 282     /// The random number generator used for resolving non-determinism.
 283     /// Needs to be queried by ptr_to_int, hence needs interior mutability.
 284     pub(crate) rng: RefCell<StdRng>,
 285
 286     /// The allocation IDs to report when they are being allocated
 287     /// (helps for debugging memory leaks and use after free bugs).
 288     tracked_alloc_ids: HashSet<AllocId>,
 289
 290     /// Controls whether alignment of memory accesses is being checked.
 291     pub(crate) check_alignment: AlignmentCheck,
 292
 293     /// Failure rate of compare_exchange_weak, between 0.0 and 1.0
 294     pub(crate) cmpxchg_weak_failure_rate: f64,
 295
 296     /// Corresponds to -Zmiri-mute-stdout-stderr and doesn't write the output but acts as if it succeeded.
 297     pub(crate) mute_stdout_stderr: bool,
 298 }
 299
 300 impl<'mir, 'tcx> Evaluator<'mir, 'tcx> {
 301     pub(crate) fn new(config: &MiriConfig, layout_cx: LayoutCx<'tcx, TyCtxt<'tcx>>) -> Self {
 302         let local_crates = helpers::get_local_crates(&layout_cx.tcx);
 303         let layouts =
 304             PrimitiveLayouts::new(layout_cx).expect("Couldn't get layouts of primitive types");
 305         let profiler = config.measureme_out.as_ref().map(|out| {
 306             measureme::Profiler::new(out).expect("Couldn't create `measureme` profiler")
 307         });
 308         let rng = StdRng::seed_from_u64(config.seed.unwrap_or(0));
 309         let stacked_borrows = if config.stacked_borrows {
 310             Some(RefCell::new(stacked_borrows::GlobalStateInner::new(
 311                 config.tracked_pointer_tags.clone(),
 312                 config.tracked_call_ids.clone(),
 313                 config.tag_raw,
 314             )))
 315         } else {
 316             None
 317         };
 318         let data_race =
 319             if config.data_race_detector { Some(data_race::GlobalState::new()) } else { None };
 320         Evaluator {
 321             stacked_borrows,
 322             data_race,
 323             intptrcast: RefCell::new(intptrcast::GlobalStateInner::new(config)),
 324             // `env_vars` depends on a full interpreter so we cannot properly initialize it yet.
 325             env_vars: EnvVars::default(),
 326             argc: None,
 327             argv: None,
 328             cmd_line: None,
 329             tls: TlsData::default(),
 330             isolated_op: config.isolated_op,
 331             validate: config.validate,
 332             enforce_number_validity: config.check_number_validity,
 333             enforce_abi: config.check_abi,
 334             file_handler: FileHandler::new(config.mute_stdout_stderr),
 335             dir_handler: Default::default(),
 336             time_anchor: Instant::now(),
 337             layouts,
 338             threads: ThreadManager::default(),
 339             static_roots: Vec::new(),
 340             profiler,
 341             string_cache: Default::default(),
 342             exported_symbols_cache: FxHashMap::default(),
 343             panic_on_unsupported: config.panic_on_unsupported,
 344             backtrace_style: config.backtrace_style,
 345             local_crates,
 346             extern_statics: FxHashMap::default(),
 347             rng: RefCell::new(rng),
 348             tracked_alloc_ids: config.tracked_alloc_ids.clone(),
 349             check_alignment: config.check_alignment,
 350             cmpxchg_weak_failure_rate: config.cmpxchg_weak_failure_rate,
 351             mute_stdout_stderr: config.mute_stdout_stderr,
 352         }
 353     }
 354
 355     pub(crate) fn late_init(
 356         this: &mut MiriEvalContext<'mir, 'tcx>,
 357         config: &MiriConfig,
 358     ) -> InterpResult<'tcx> {
 359         EnvVars::init(this, config)?;
 360         Evaluator::init_extern_statics(this)?;
 361         Ok(())
 362     }
 363
 364     fn add_extern_static(
 365         this: &mut MiriEvalContext<'mir, 'tcx>,
 366         name: &str,
 367         ptr: Pointer<Option<Tag>>,
 368     ) {
 369         // This got just allocated, so there definitely is a pointer here.
 370         let ptr = ptr.into_pointer_or_addr().unwrap();
 371         this.machine.extern_statics.try_insert(Symbol::intern(name), ptr).unwrap();
 372     }
 373
 374     /// Sets up the "extern statics" for this machine.
 375     fn init_extern_statics(this: &mut MiriEvalContext<'mir, 'tcx>) -> InterpResult<'tcx> {
 376         match this.tcx.sess.target.os.as_ref() {
 377             "linux" => {
 378                 // "environ"
 379                 Self::add_extern_static(
 380                     this,
 381                     "environ",
 382                     this.machine.env_vars.environ.unwrap().ptr,
 383                 );
 384                 // A couple zero-initialized pointer-sized extern statics.
 385                 // Most of them are for weak symbols, which we all set to null (indicating that the
 386                 // symbol is not supported, and triggering fallback code which ends up calling a
 387                 // syscall that we do support).
 388                 for name in &["__cxa_thread_atexit_impl", "getrandom", "statx", "__clock_gettime64"]
 389                 {
 390                     let layout = this.machine.layouts.usize;
 391                     let place = this.allocate(layout, MiriMemoryKind::ExternStatic.into())?;
 392                     this.write_scalar(Scalar::from_machine_usize(0, this), &place.into())?;
 393                     Self::add_extern_static(this, name, place.ptr);
 394                 }
 395             }
 396             "windows" => {
 397                 // "_tls_used"
 398                 // This is some obscure hack that is part of the Windows TLS story. It's a `u8`.
 399                 let layout = this.machine.layouts.u8;
 400                 let place = this.allocate(layout, MiriMemoryKind::ExternStatic.into())?;
 401                 this.write_scalar(Scalar::from_u8(0), &place.into())?;
 402                 Self::add_extern_static(this, "_tls_used", place.ptr);
 403             }
 404             _ => {} // No "extern statics" supported on this target
 405         }
 406         Ok(())
 407     }
 408
 409     pub(crate) fn communicate(&self) -> bool {
 410         self.isolated_op == IsolatedOp::Allow
 411     }
 412
 413     /// Check whether the stack frame that this `FrameInfo` refers to is part of a local crate.
 414     pub(crate) fn is_local(&self, frame: &FrameInfo<'_>) -> bool {
 415         let def_id = frame.instance.def_id();
 416         def_id.is_local() || self.local_crates.contains(&def_id.krate)
 417     }
 418 }
 419
 420 /// A rustc InterpCx for Miri.
 421 pub type MiriEvalContext<'mir, 'tcx> = InterpCx<'mir, 'tcx, Evaluator<'mir, 'tcx>>;
 422
 423 /// A little trait that's useful to be inherited by extension traits.
 424 pub trait MiriEvalContextExt<'mir, 'tcx> {
 425     fn eval_context_ref<'a>(&'a self) -> &'a MiriEvalContext<'mir, 'tcx>;
 426     fn eval_context_mut<'a>(&'a mut self) -> &'a mut MiriEvalContext<'mir, 'tcx>;
 427 }
 428 impl<'mir, 'tcx> MiriEvalContextExt<'mir, 'tcx> for MiriEvalContext<'mir, 'tcx> {
 429     #[inline(always)]
 430     fn eval_context_ref(&self) -> &MiriEvalContext<'mir, 'tcx> {
 431         self
 432     }
 433     #[inline(always)]
 434     fn eval_context_mut(&mut self) -> &mut MiriEvalContext<'mir, 'tcx> {
 435         self
 436     }
 437 }
 438
 439 /// Machine hook implementations.
 440 impl<'mir, 'tcx> Machine<'mir, 'tcx> for Evaluator<'mir, 'tcx> {
 441     type MemoryKind = MiriMemoryKind;
 442     type ExtraFnVal = Dlsym;
 443
 444     type FrameExtra = FrameData<'tcx>;
 445     type AllocExtra = AllocExtra;
 446
 447     type PointerTag = Tag;
 448     type TagExtra = SbTag;
 449
 450     type MemoryMap =
 451         MonoHashMap<AllocId, (MemoryKind<MiriMemoryKind>, Allocation<Tag, Self::AllocExtra>)>;
 452
 453     const GLOBAL_KIND: Option<MiriMemoryKind> = Some(MiriMemoryKind::Global);
 454
 455     const PANIC_ON_ALLOC_FAIL: bool = false;
 456
 457     #[inline(always)]
 458     fn enforce_alignment(ecx: &MiriEvalContext<'mir, 'tcx>) -> bool {
 459         ecx.machine.check_alignment != AlignmentCheck::None
 460     }
 461
 462     #[inline(always)]
 463     fn force_int_for_alignment_check(ecx: &MiriEvalContext<'mir, 'tcx>) -> bool {
 464         ecx.machine.check_alignment == AlignmentCheck::Int
 465     }
 466
 467     #[inline(always)]
 468     fn enforce_validity(ecx: &MiriEvalContext<'mir, 'tcx>) -> bool {
 469         ecx.machine.validate
 470     }
 471
 472     #[inline(always)]
 473     fn enforce_number_init(ecx: &MiriEvalContext<'mir, 'tcx>) -> bool {
 474         ecx.machine.enforce_number_validity
 475     }
 476
 477     #[inline(always)]
 478     fn enforce_number_no_provenance(ecx: &MiriEvalContext<'mir, 'tcx>) -> bool {
 479         ecx.machine.enforce_number_validity
 480     }
 481
 482     #[inline(always)]
 483     fn enforce_abi(ecx: &MiriEvalContext<'mir, 'tcx>) -> bool {
 484         ecx.machine.enforce_abi
 485     }
 486
 487     #[inline(always)]
 488     fn find_mir_or_eval_fn(
 489         ecx: &mut MiriEvalContext<'mir, 'tcx>,
 490         instance: ty::Instance<'tcx>,
 491         abi: Abi,
 492         args: &[OpTy<'tcx, Tag>],
 493         ret: Option<(&PlaceTy<'tcx, Tag>, mir::BasicBlock)>,
 494         unwind: StackPopUnwind,
 495     ) -> InterpResult<'tcx, Option<(&'mir mir::Body<'tcx>, ty::Instance<'tcx>)>> {
 496         ecx.find_mir_or_eval_fn(instance, abi, args, ret, unwind)
 497     }
 498
 499     #[inline(always)]
 500     fn call_extra_fn(
 501         ecx: &mut MiriEvalContext<'mir, 'tcx>,
 502         fn_val: Dlsym,
 503         abi: Abi,
 504         args: &[OpTy<'tcx, Tag>],
 505         ret: Option<(&PlaceTy<'tcx, Tag>, mir::BasicBlock)>,
 506         _unwind: StackPopUnwind,
 507     ) -> InterpResult<'tcx> {
 508         ecx.call_dlsym(fn_val, abi, args, ret)
 509     }
 510
 511     #[inline(always)]
 512     fn call_intrinsic(
 513         ecx: &mut MiriEvalContext<'mir, 'tcx>,
 514         instance: ty::Instance<'tcx>,
 515         args: &[OpTy<'tcx, Tag>],
 516         ret: Option<(&PlaceTy<'tcx, Tag>, mir::BasicBlock)>,
 517         unwind: StackPopUnwind,
 518     ) -> InterpResult<'tcx> {
 519         ecx.call_intrinsic(instance, args, ret, unwind)
 520     }
 521
 522     #[inline(always)]
 523     fn assert_panic(
 524         ecx: &mut MiriEvalContext<'mir, 'tcx>,
 525         msg: &mir::AssertMessage<'tcx>,
 526         unwind: Option<mir::BasicBlock>,
 527     ) -> InterpResult<'tcx> {
 528         ecx.assert_panic(msg, unwind)
 529     }
 530
 531     #[inline(always)]
 532     fn abort(_ecx: &mut MiriEvalContext<'mir, 'tcx>, msg: String) -> InterpResult<'tcx, !> {
 533         throw_machine_stop!(TerminationInfo::Abort(msg))
 534     }
 535
 536     #[inline(always)]
 537     fn binary_ptr_op(
 538         ecx: &MiriEvalContext<'mir, 'tcx>,
 539         bin_op: mir::BinOp,
 540         left: &ImmTy<'tcx, Tag>,
 541         right: &ImmTy<'tcx, Tag>,
 542     ) -> InterpResult<'tcx, (Scalar<Tag>, bool, ty::Ty<'tcx>)> {
 543         ecx.binary_ptr_op(bin_op, left, right)
 544     }
 545
 546     fn thread_local_static_base_pointer(
 547         ecx: &mut MiriEvalContext<'mir, 'tcx>,
 548         def_id: DefId,
 549     ) -> InterpResult<'tcx, Pointer<Tag>> {
 550         ecx.get_or_create_thread_local_alloc(def_id)
 551     }
 552
 553     fn extern_static_base_pointer(
 554         ecx: &MiriEvalContext<'mir, 'tcx>,
 555         def_id: DefId,
 556     ) -> InterpResult<'tcx, Pointer<Tag>> {
 557         let link_name = ecx.item_link_name(def_id);
 558         if let Some(&ptr) = ecx.machine.extern_statics.get(&link_name) {
 559             Ok(ptr)
 560         } else {
 561             throw_unsup_format!("`extern` static {:?} is not supported by Miri", def_id)
 562         }
 563     }
 564
 565     fn init_allocation_extra<'b>(
 566         ecx: &MiriEvalContext<'mir, 'tcx>,
 567         id: AllocId,
 568         alloc: Cow<'b, Allocation>,
 569         kind: Option<MemoryKind<Self::MemoryKind>>,
 570     ) -> Cow<'b, Allocation<Self::PointerTag, Self::AllocExtra>> {
 571         if ecx.machine.tracked_alloc_ids.contains(&id) {
 572             register_diagnostic(NonHaltingDiagnostic::CreatedAlloc(id));
 573         }
 574
 575         let kind = kind.expect("we set our STATIC_KIND so this cannot be None");
 576         let alloc = alloc.into_owned();
 577         let stacks = if let Some(stacked_borrows) = &ecx.machine.stacked_borrows {
 578             Some(Stacks::new_allocation(
 579                 id,
 580                 alloc.size(),
 581                 stacked_borrows,
 582                 kind,
 583                 &ecx.machine.threads,
 584                 ecx.machine.local_crates.clone(),
 585             ))
 586         } else {
 587             None
 588         };
 589         let race_alloc = if let Some(data_race) = &ecx.machine.data_race {
 590             Some(data_race::AllocExtra::new_allocation(data_race, alloc.size(), kind))
 591         } else {
 592             None
 593         };
 594         let alloc: Allocation<Tag, Self::AllocExtra> = alloc.convert_tag_add_extra(
 595             &ecx.tcx,
 596             AllocExtra { stacked_borrows: stacks, data_race: race_alloc },
 597             |ptr| Evaluator::tag_alloc_base_pointer(ecx, ptr),
 598         );
 599         Cow::Owned(alloc)
 600     }
 601
 602     fn tag_alloc_base_pointer(
 603         ecx: &MiriEvalContext<'mir, 'tcx>,
 604         ptr: Pointer<AllocId>,
 605     ) -> Pointer<Tag> {
 606         let absolute_addr = intptrcast::GlobalStateInner::rel_ptr_to_addr(ecx, ptr);
 607         let sb_tag = if let Some(stacked_borrows) = &ecx.machine.stacked_borrows {
 608             stacked_borrows.borrow_mut().base_tag(ptr.provenance)
 609         } else {
 610             SbTag::Untagged
 611         };
 612         Pointer::new(Tag { alloc_id: ptr.provenance, sb: sb_tag }, Size::from_bytes(absolute_addr))
 613     }
 614
 615     #[inline(always)]
 616     fn ptr_from_addr_cast(
 617         ecx: &MiriEvalContext<'mir, 'tcx>,
 618         addr: u64,
 619     ) -> Pointer<Option<Self::PointerTag>> {
 620         intptrcast::GlobalStateInner::ptr_from_addr(addr, ecx)
 621     }
 622
 623     #[inline(always)]
 624     fn ptr_from_addr_transmute(
 625         ecx: &MiriEvalContext<'mir, 'tcx>,
 626         addr: u64,
 627     ) -> Pointer<Option<Self::PointerTag>> {
 628         Self::ptr_from_addr_cast(ecx, addr)
 629     }
 630
 631     #[inline(always)]
 632     fn expose_ptr(
 633         _ecx: &mut InterpCx<'mir, 'tcx, Self>,
 634         _ptr: Pointer<Self::PointerTag>,
 635     ) -> InterpResult<'tcx> {
 636         Ok(())
 637     }
 638
 639     /// Convert a pointer with provenance into an allocation-offset pair,
 640     /// or a `None` with an absolute address if that conversion is not possible.
 641     fn ptr_get_alloc(
 642         ecx: &MiriEvalContext<'mir, 'tcx>,
 643         ptr: Pointer<Self::PointerTag>,
 644     ) -> Option<(AllocId, Size, Self::TagExtra)> {
 645         let rel = intptrcast::GlobalStateInner::abs_ptr_to_rel(ecx, ptr);
 646         Some((ptr.provenance.alloc_id, rel, ptr.provenance.sb))
 647     }
 648
 649     #[inline(always)]
 650     fn memory_read(
 651         _tcx: TyCtxt<'tcx>,
 652         machine: &Self,
 653         alloc_extra: &AllocExtra,
 654         (alloc_id, tag): (AllocId, Self::TagExtra),
 655         range: AllocRange,
 656     ) -> InterpResult<'tcx> {
 657         if let Some(data_race) = &alloc_extra.data_race {
 658             data_race.read(alloc_id, range, machine.data_race.as_ref().unwrap())?;
 659         }
 660         if let Some(stacked_borrows) = &alloc_extra.stacked_borrows {
 661             stacked_borrows.memory_read(
 662                 alloc_id,
 663                 tag,
 664                 range,
 665                 machine.stacked_borrows.as_ref().unwrap(),
 666                 &machine.threads,
 667             )
 668         } else {
 669             Ok(())
 670         }
 671     }
 672
 673     #[inline(always)]
 674     fn memory_written(
 675         _tcx: TyCtxt<'tcx>,
 676         machine: &mut Self,
 677         alloc_extra: &mut AllocExtra,
 678         (alloc_id, tag): (AllocId, Self::TagExtra),
 679         range: AllocRange,
 680     ) -> InterpResult<'tcx> {
 681         if let Some(data_race) = &mut alloc_extra.data_race {
 682             data_race.write(alloc_id, range, machine.data_race.as_mut().unwrap())?;
 683         }
 684         if let Some(stacked_borrows) = &mut alloc_extra.stacked_borrows {
 685             stacked_borrows.memory_written(
 686                 alloc_id,
 687                 tag,
 688                 range,
 689                 machine.stacked_borrows.as_ref().unwrap(),
 690                 &machine.threads,
 691             )
 692         } else {
 693             Ok(())
 694         }
 695     }
 696
 697     #[inline(always)]
 698     fn memory_deallocated(
 699         _tcx: TyCtxt<'tcx>,
 700         machine: &mut Self,
 701         alloc_extra: &mut AllocExtra,
 702         (alloc_id, tag): (AllocId, Self::TagExtra),
 703         range: AllocRange,
 704     ) -> InterpResult<'tcx> {
 705         if machine.tracked_alloc_ids.contains(&alloc_id) {
 706             register_diagnostic(NonHaltingDiagnostic::FreedAlloc(alloc_id));
 707         }
 708         if let Some(data_race) = &mut alloc_extra.data_race {
 709             data_race.deallocate(alloc_id, range, machine.data_race.as_mut().unwrap())?;
 710         }
 711         if let Some(stacked_borrows) = &mut alloc_extra.stacked_borrows {
 712             stacked_borrows.memory_deallocated(
 713                 alloc_id,
 714                 tag,
 715                 range,
 716                 machine.stacked_borrows.as_ref().unwrap(),
 717             )
 718         } else {
 719             Ok(())
 720         }
 721     }
 722
 723     #[inline(always)]
 724     fn retag(
 725         ecx: &mut InterpCx<'mir, 'tcx, Self>,
 726         kind: mir::RetagKind,
 727         place: &PlaceTy<'tcx, Tag>,
 728     ) -> InterpResult<'tcx> {
 729         if ecx.machine.stacked_borrows.is_some() { ecx.retag(kind, place) } else { Ok(()) }
 730     }
 731
 732     #[inline(always)]
 733     fn init_frame_extra(
 734         ecx: &mut InterpCx<'mir, 'tcx, Self>,
 735         frame: Frame<'mir, 'tcx, Tag>,
 736     ) -> InterpResult<'tcx, Frame<'mir, 'tcx, Tag, FrameData<'tcx>>> {
 737         // Start recording our event before doing anything else
 738         let timing = if let Some(profiler) = ecx.machine.profiler.as_ref() {
 739             let fn_name = frame.instance.to_string();
 740             let entry = ecx.machine.string_cache.entry(fn_name.clone());
 741             let name = entry.or_insert_with(|| profiler.alloc_string(&*fn_name));
 742
 743             Some(profiler.start_recording_interval_event_detached(
 744                 *name,
 745                 measureme::EventId::from_label(*name),
 746                 ecx.get_active_thread().to_u32(),
 747             ))
 748         } else {
 749             None
 750         };
 751
 752         let stacked_borrows = ecx.machine.stacked_borrows.as_ref();
 753         let call_id = stacked_borrows.map_or(NonZeroU64::new(1).unwrap(), |stacked_borrows| {
 754             stacked_borrows.borrow_mut().new_call()
 755         });
 756
 757         let extra = FrameData { call_id, catch_unwind: None, timing };
 758         Ok(frame.with_extra(extra))
 759     }
 760
 761     fn stack<'a>(
 762         ecx: &'a InterpCx<'mir, 'tcx, Self>,
 763     ) -> &'a [Frame<'mir, 'tcx, Self::PointerTag, Self::FrameExtra>] {
 764         ecx.active_thread_stack()
 765     }
 766
 767     fn stack_mut<'a>(
 768         ecx: &'a mut InterpCx<'mir, 'tcx, Self>,
 769     ) -> &'a mut Vec<Frame<'mir, 'tcx, Self::PointerTag, Self::FrameExtra>> {
 770         ecx.active_thread_stack_mut()
 771     }
 772
 773     #[inline(always)]
 774     fn after_stack_push(ecx: &mut InterpCx<'mir, 'tcx, Self>) -> InterpResult<'tcx> {
 775         if ecx.machine.stacked_borrows.is_some() { ecx.retag_return_place() } else { Ok(()) }
 776     }
 777
 778     #[inline(always)]
 779     fn after_stack_pop(
 780         ecx: &mut InterpCx<'mir, 'tcx, Self>,
 781         mut frame: Frame<'mir, 'tcx, Tag, FrameData<'tcx>>,
 782         unwinding: bool,
 783     ) -> InterpResult<'tcx, StackPopJump> {
 784         let timing = frame.extra.timing.take();
 785         let res = ecx.handle_stack_pop(frame.extra, unwinding);
 786         if let Some(profiler) = ecx.machine.profiler.as_ref() {
 787             profiler.finish_recording_interval_event(timing.unwrap());
 788         }
 789         res
 790     }
 791 }