]> git.lizzy.rs Git - rust.git/blob - src/machine.rs
Rename MacOS set global dtor function.
[rust.git] / 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::num::NonZeroU64;
7 use std::rc::Rc;
8 use std::time::Instant;
9 use std::fmt;
10
11 use log::trace;
12 use rand::rngs::StdRng;
13
14 use rustc_ast::attr;
15 use rustc_data_structures::fx::FxHashMap;
16 use rustc_middle::{
17     mir,
18     ty::{
19         self,
20         layout::{LayoutCx, LayoutError, TyAndLayout},
21         TyCtxt,
22     },
23 };
24 use rustc_span::symbol::{sym, Symbol};
25 use rustc_target::abi::{LayoutOf, Size};
26
27 use crate::*;
28
29 // Some global facts about the emulated machine.
30 pub const PAGE_SIZE: u64 = 4 * 1024; // FIXME: adjust to target architecture
31 pub const STACK_ADDR: u64 = 32 * PAGE_SIZE; // not really about the "stack", but where we start assigning integer addresses to allocations
32 pub const STACK_SIZE: u64 = 16 * PAGE_SIZE; // whatever
33 pub const NUM_CPUS: u64 = 1;
34
35 /// Extra data stored with each stack frame
36 #[derive(Debug)]
37 pub struct FrameData<'tcx> {
38     /// Extra data for Stacked Borrows.
39     pub call_id: stacked_borrows::CallId,
40
41     /// If this is Some(), then this is a special "catch unwind" frame (the frame of `try_fn`
42     /// called by `try`). When this frame is popped during unwinding a panic,
43     /// we stop unwinding, use the `CatchUnwindData` to handle catching.
44     pub catch_unwind: Option<CatchUnwindData<'tcx>>,
45 }
46
47 /// Extra memory kinds
48 #[derive(Debug, Copy, Clone, PartialEq, Eq)]
49 pub enum MiriMemoryKind {
50     /// `__rust_alloc` memory.
51     Rust,
52     /// `malloc` memory.
53     C,
54     /// Windows `HeapAlloc` memory.
55     WinHeap,
56     /// Memory for args, errno, extern statics and other parts of the machine-managed environment.
57     /// This memory may leak.
58     Machine,
59     /// Memory for env vars. Separate from `Machine` because we clean it up and leak-check it.
60     Env,
61     /// Globals copied from `tcx`.
62     /// This memory may leak.
63     Global,
64 }
65
66 impl Into<MemoryKind<MiriMemoryKind>> for MiriMemoryKind {
67     #[inline(always)]
68     fn into(self) -> MemoryKind<MiriMemoryKind> {
69         MemoryKind::Machine(self)
70     }
71 }
72
73 impl MayLeak for MiriMemoryKind {
74     #[inline(always)]
75     fn may_leak(self) -> bool {
76         use self::MiriMemoryKind::*;
77         match self {
78             Rust | C | WinHeap | Env => false,
79             Machine | Global => true,
80         }
81     }
82 }
83
84 impl fmt::Display for MiriMemoryKind {
85     fn fmt(&self, f: &mut fmt::Formatter<'_>) -> fmt::Result {
86         use self::MiriMemoryKind::*;
87         match self {
88             Rust => write!(f, "Rust heap"),
89             C => write!(f, "C heap"),
90             WinHeap => write!(f, "Windows heap"),
91             Machine => write!(f, "machine-managed memory"),
92             Env => write!(f, "environment variable"),
93             Global => write!(f, "global"),
94         }
95     }
96 }
97
98 /// Extra per-allocation data
99 #[derive(Debug, Clone)]
100 pub struct AllocExtra {
101     /// Stacked Borrows state is only added if it is enabled.
102     pub stacked_borrows: Option<stacked_borrows::AllocExtra>,
103 }
104
105 /// Extra global memory data
106 #[derive(Clone, Debug)]
107 pub struct MemoryExtra {
108     pub stacked_borrows: Option<stacked_borrows::MemoryExtra>,
109     pub intptrcast: intptrcast::MemoryExtra,
110
111     /// Mapping extern static names to their canonical allocation.
112     extern_statics: FxHashMap<Symbol, AllocId>,
113
114     /// The random number generator used for resolving non-determinism.
115     /// Needs to be queried by ptr_to_int, hence needs interior mutability.
116     pub(crate) rng: RefCell<StdRng>,
117
118     /// An allocation ID to report when it is being allocated
119     /// (helps for debugging memory leaks and use after free bugs).
120     tracked_alloc_id: Option<AllocId>,
121
122     /// Controls whether alignment of memory accesses is being checked.
123     check_alignment: bool,
124 }
125
126 impl MemoryExtra {
127     pub fn new(
128         rng: StdRng,
129         stacked_borrows: bool,
130         tracked_pointer_tag: Option<PtrId>,
131         tracked_alloc_id: Option<AllocId>,
132         check_alignment: bool,
133     ) -> Self {
134         let stacked_borrows = if stacked_borrows {
135             Some(Rc::new(RefCell::new(stacked_borrows::GlobalState::new(tracked_pointer_tag))))
136         } else {
137             None
138         };
139         MemoryExtra {
140             stacked_borrows,
141             intptrcast: Default::default(),
142             extern_statics: FxHashMap::default(),
143             rng: RefCell::new(rng),
144             tracked_alloc_id,
145             check_alignment,
146         }
147     }
148
149     fn add_extern_static<'tcx, 'mir>(
150         this: &mut MiriEvalContext<'mir, 'tcx>,
151         name: &str,
152         ptr: Scalar<Tag>,
153     ) {
154         let ptr = ptr.assert_ptr();
155         assert_eq!(ptr.offset, Size::ZERO);
156         this.memory
157             .extra
158             .extern_statics
159             .insert(Symbol::intern(name), ptr.alloc_id)
160             .unwrap_none();
161     }
162
163     /// Sets up the "extern statics" for this machine.
164     pub fn init_extern_statics<'tcx, 'mir>(
165         this: &mut MiriEvalContext<'mir, 'tcx>,
166     ) -> InterpResult<'tcx> {
167         match this.tcx.sess.target.target.target_os.as_str() {
168             "linux" => {
169                 // "__cxa_thread_atexit_impl"
170                 // This should be all-zero, pointer-sized.
171                 let layout = this.machine.layouts.usize;
172                 let place = this.allocate(layout, MiriMemoryKind::Machine.into());
173                 this.write_scalar(Scalar::from_machine_usize(0, this), place.into())?;
174                 Self::add_extern_static(this, "__cxa_thread_atexit_impl", place.ptr);
175                 // "environ"
176                 Self::add_extern_static(this, "environ", this.machine.env_vars.environ.unwrap().ptr);
177             }
178             "windows" => {
179                 // "_tls_used"
180                 // This is some obscure hack that is part of the Windows TLS story. It's a `u8`.
181                 let layout = this.machine.layouts.u8;
182                 let place = this.allocate(layout, MiriMemoryKind::Machine.into());
183                 this.write_scalar(Scalar::from_u8(0), place.into())?;
184                 Self::add_extern_static(this, "_tls_used", place.ptr);
185             }
186             _ => {} // No "extern statics" supported on this target
187         }
188         Ok(())
189     }
190 }
191
192 /// Precomputed layouts of primitive types
193 pub struct PrimitiveLayouts<'tcx> {
194     pub unit: TyAndLayout<'tcx>,
195     pub i8: TyAndLayout<'tcx>,
196     pub i32: TyAndLayout<'tcx>,
197     pub isize: TyAndLayout<'tcx>,
198     pub u8: TyAndLayout<'tcx>,
199     pub u32: TyAndLayout<'tcx>,
200     pub usize: TyAndLayout<'tcx>,
201 }
202
203 impl<'mir, 'tcx: 'mir> PrimitiveLayouts<'tcx> {
204     fn new(layout_cx: LayoutCx<'tcx, TyCtxt<'tcx>>) -> Result<Self, LayoutError<'tcx>> {
205         Ok(Self {
206             unit: layout_cx.layout_of(layout_cx.tcx.mk_unit())?,
207             i8: layout_cx.layout_of(layout_cx.tcx.types.i8)?,
208             i32: layout_cx.layout_of(layout_cx.tcx.types.i32)?,
209             isize: layout_cx.layout_of(layout_cx.tcx.types.isize)?,
210             u8: layout_cx.layout_of(layout_cx.tcx.types.u8)?,
211             u32: layout_cx.layout_of(layout_cx.tcx.types.u32)?,
212             usize: layout_cx.layout_of(layout_cx.tcx.types.usize)?,
213         })
214     }
215 }
216
217 /// The machine itself.
218 pub struct Evaluator<'mir, 'tcx> {
219     /// Environment variables set by `setenv`.
220     /// Miri does not expose env vars from the host to the emulated program.
221     pub(crate) env_vars: EnvVars<'tcx>,
222
223     /// Program arguments (`Option` because we can only initialize them after creating the ecx).
224     /// These are *pointers* to argc/argv because macOS.
225     /// We also need the full command line as one string because of Windows.
226     pub(crate) argc: Option<Scalar<Tag>>,
227     pub(crate) argv: Option<Scalar<Tag>>,
228     pub(crate) cmd_line: Option<Scalar<Tag>>,
229
230     /// Last OS error location in memory. It is a 32-bit integer.
231     pub(crate) last_error: Option<MPlaceTy<'tcx, Tag>>,
232
233     /// TLS state.
234     pub(crate) tls: TlsData<'tcx>,
235
236     /// If enabled, the `env_vars` field is populated with the host env vars during initialization
237     /// and random number generation is delegated to the host.
238     pub(crate) communicate: bool,
239
240     /// Whether to enforce the validity invariant.
241     pub(crate) validate: bool,
242
243     pub(crate) file_handler: FileHandler,
244     pub(crate) dir_handler: DirHandler,
245
246     /// The temporary used for storing the argument of
247     /// the call to `miri_start_panic` (the panic payload) when unwinding.
248     /// This is pointer-sized, and matches the `Payload` type in `src/libpanic_unwind/miri.rs`.
249     pub(crate) panic_payload: Option<Scalar<Tag>>,
250
251     /// The "time anchor" for this machine's monotone clock (for `Instant` simulation).
252     pub(crate) time_anchor: Instant,
253
254     /// The set of threads.
255     pub(crate) threads: ThreadManager<'mir, 'tcx>,
256
257     /// Precomputed `TyLayout`s for primitive data types that are commonly used inside Miri.
258     pub(crate) layouts: PrimitiveLayouts<'tcx>,
259 }
260
261 impl<'mir, 'tcx> Evaluator<'mir, 'tcx> {
262     pub(crate) fn new(
263         communicate: bool,
264         validate: bool,
265         layout_cx: LayoutCx<'tcx, TyCtxt<'tcx>>,
266     ) -> Self {
267         let layouts = PrimitiveLayouts::new(layout_cx)
268             .expect("Couldn't get layouts of primitive types");
269         Evaluator {
270             // `env_vars` could be initialized properly here if `Memory` were available before
271             // calling this method.
272             env_vars: EnvVars::default(),
273             argc: None,
274             argv: None,
275             cmd_line: None,
276             last_error: None,
277             tls: TlsData::default(),
278             communicate,
279             validate,
280             file_handler: Default::default(),
281             dir_handler: Default::default(),
282             panic_payload: None,
283             time_anchor: Instant::now(),
284             layouts,
285             threads: Default::default(),
286         }
287     }
288 }
289
290 /// A rustc InterpCx for Miri.
291 pub type MiriEvalContext<'mir, 'tcx> = InterpCx<'mir, 'tcx, Evaluator<'mir, 'tcx>>;
292
293 /// A little trait that's useful to be inherited by extension traits.
294 pub trait MiriEvalContextExt<'mir, 'tcx> {
295     fn eval_context_ref<'a>(&'a self) -> &'a MiriEvalContext<'mir, 'tcx>;
296     fn eval_context_mut<'a>(&'a mut self) -> &'a mut MiriEvalContext<'mir, 'tcx>;
297 }
298 impl<'mir, 'tcx> MiriEvalContextExt<'mir, 'tcx> for MiriEvalContext<'mir, 'tcx> {
299     #[inline(always)]
300     fn eval_context_ref(&self) -> &MiriEvalContext<'mir, 'tcx> {
301         self
302     }
303     #[inline(always)]
304     fn eval_context_mut(&mut self) -> &mut MiriEvalContext<'mir, 'tcx> {
305         self
306     }
307 }
308
309 /// Machine hook implementations.
310 impl<'mir, 'tcx> Machine<'mir, 'tcx> for Evaluator<'mir, 'tcx> {
311     type MemoryKind = MiriMemoryKind;
312
313     type FrameExtra = FrameData<'tcx>;
314     type MemoryExtra = MemoryExtra;
315     type AllocExtra = AllocExtra;
316     type PointerTag = Tag;
317     type ExtraFnVal = Dlsym;
318
319     type MemoryMap =
320         MonoHashMap<AllocId, (MemoryKind<MiriMemoryKind>, Allocation<Tag, Self::AllocExtra>)>;
321
322     const GLOBAL_KIND: Option<MiriMemoryKind> = Some(MiriMemoryKind::Global);
323
324     #[inline(always)]
325     fn enforce_alignment(memory_extra: &MemoryExtra) -> bool {
326         memory_extra.check_alignment
327     }
328
329     #[inline(always)]
330     fn enforce_validity(ecx: &InterpCx<'mir, 'tcx, Self>) -> bool {
331         ecx.machine.validate
332     }
333
334     #[inline(always)]
335     fn find_mir_or_eval_fn(
336         ecx: &mut InterpCx<'mir, 'tcx, Self>,
337         instance: ty::Instance<'tcx>,
338         args: &[OpTy<'tcx, Tag>],
339         ret: Option<(PlaceTy<'tcx, Tag>, mir::BasicBlock)>,
340         unwind: Option<mir::BasicBlock>,
341     ) -> InterpResult<'tcx, Option<&'mir mir::Body<'tcx>>> {
342         ecx.find_mir_or_eval_fn(instance, args, ret, unwind)
343     }
344
345     #[inline(always)]
346     fn call_extra_fn(
347         ecx: &mut InterpCx<'mir, 'tcx, Self>,
348         fn_val: Dlsym,
349         args: &[OpTy<'tcx, Tag>],
350         ret: Option<(PlaceTy<'tcx, Tag>, mir::BasicBlock)>,
351         _unwind: Option<mir::BasicBlock>,
352     ) -> InterpResult<'tcx> {
353         ecx.call_dlsym(fn_val, args, ret)
354     }
355
356     #[inline(always)]
357     fn call_intrinsic(
358         ecx: &mut rustc_mir::interpret::InterpCx<'mir, 'tcx, Self>,
359         instance: ty::Instance<'tcx>,
360         args: &[OpTy<'tcx, Tag>],
361         ret: Option<(PlaceTy<'tcx, Tag>, mir::BasicBlock)>,
362         unwind: Option<mir::BasicBlock>,
363     ) -> InterpResult<'tcx> {
364         ecx.call_intrinsic(instance, args, ret, unwind)
365     }
366
367     #[inline(always)]
368     fn assert_panic(
369         ecx: &mut InterpCx<'mir, 'tcx, Self>,
370         msg: &mir::AssertMessage<'tcx>,
371         unwind: Option<mir::BasicBlock>,
372     ) -> InterpResult<'tcx> {
373         ecx.assert_panic(msg, unwind)
374     }
375
376     #[inline(always)]
377     fn abort(_ecx: &mut InterpCx<'mir, 'tcx, Self>) -> InterpResult<'tcx, !> {
378         throw_machine_stop!(TerminationInfo::Abort(None))
379     }
380
381     #[inline(always)]
382     fn binary_ptr_op(
383         ecx: &rustc_mir::interpret::InterpCx<'mir, 'tcx, Self>,
384         bin_op: mir::BinOp,
385         left: ImmTy<'tcx, Tag>,
386         right: ImmTy<'tcx, Tag>,
387     ) -> InterpResult<'tcx, (Scalar<Tag>, bool, ty::Ty<'tcx>)> {
388         ecx.binary_ptr_op(bin_op, left, right)
389     }
390
391     fn box_alloc(
392         ecx: &mut InterpCx<'mir, 'tcx, Self>,
393         dest: PlaceTy<'tcx, Tag>,
394     ) -> InterpResult<'tcx> {
395         trace!("box_alloc for {:?}", dest.layout.ty);
396         let layout = ecx.layout_of(dest.layout.ty.builtin_deref(false).unwrap().ty)?;
397         // First argument: `size`.
398         // (`0` is allowed here -- this is expected to be handled by the lang item).
399         let size = Scalar::from_machine_usize(layout.size.bytes(), ecx);
400
401         // Second argument: `align`.
402         let align = Scalar::from_machine_usize(layout.align.abi.bytes(), ecx);
403
404         // Call the `exchange_malloc` lang item.
405         let malloc = ecx.tcx.lang_items().exchange_malloc_fn().unwrap();
406         let malloc = ty::Instance::mono(ecx.tcx.tcx, malloc);
407         ecx.call_function(
408             malloc,
409             &[size.into(), align.into()],
410             Some(dest),
411             // Don't do anything when we are done. The `statement()` function will increment
412             // the old stack frame's stmt counter to the next statement, which means that when
413             // `exchange_malloc` returns, we go on evaluating exactly where we want to be.
414             StackPopCleanup::None { cleanup: true },
415         )?;
416         Ok(())
417     }
418
419     fn adjust_global_const(
420         ecx: &InterpCx<'mir, 'tcx, Self>,
421         mut val: mir::interpret::ConstValue<'tcx>,
422     ) -> InterpResult<'tcx, mir::interpret::ConstValue<'tcx>> {
423         ecx.remap_thread_local_alloc_ids(&mut val)?;
424         Ok(val)
425     }
426
427     fn canonical_alloc_id(mem: &Memory<'mir, 'tcx, Self>, id: AllocId) -> AllocId {
428         let tcx = mem.tcx;
429         // Figure out if this is an extern static, and if yes, which one.
430         let def_id = match tcx.alloc_map.lock().get(id) {
431             Some(GlobalAlloc::Static(def_id)) if tcx.is_foreign_item(def_id) => def_id,
432             _ => {
433                 // No need to canonicalize anything.
434                 return id;
435             }
436         };
437         let attrs = tcx.get_attrs(def_id);
438         let link_name = match attr::first_attr_value_str_by_name(&attrs, sym::link_name) {
439             Some(name) => name,
440             None => tcx.item_name(def_id),
441         };
442         // Check if we know this one.
443         if let Some(canonical_id) = mem.extra.extern_statics.get(&link_name) {
444             trace!("canonical_alloc_id: {:?} ({}) -> {:?}", id, link_name, canonical_id);
445             *canonical_id
446         } else {
447             // Return original id; `Memory::get_static_alloc` will throw an error.
448             id
449         }
450     }
451
452     fn init_allocation_extra<'b>(
453         memory_extra: &MemoryExtra,
454         id: AllocId,
455         alloc: Cow<'b, Allocation>,
456         kind: Option<MemoryKind<Self::MemoryKind>>,
457     ) -> (Cow<'b, Allocation<Self::PointerTag, Self::AllocExtra>>, Self::PointerTag) {
458         if Some(id) == memory_extra.tracked_alloc_id {
459             register_diagnostic(NonHaltingDiagnostic::CreatedAlloc(id));
460         }
461
462         let kind = kind.expect("we set our STATIC_KIND so this cannot be None");
463         let alloc = alloc.into_owned();
464         let (stacks, base_tag) =
465             if let Some(stacked_borrows) = &memory_extra.stacked_borrows {
466                 let (stacks, base_tag) =
467                     Stacks::new_allocation(id, alloc.size, Rc::clone(stacked_borrows), kind);
468                 (Some(stacks), base_tag)
469             } else {
470                 // No stacks, no tag.
471                 (None, Tag::Untagged)
472             };
473         let mut stacked_borrows = memory_extra.stacked_borrows.as_ref().map(|sb| sb.borrow_mut());
474         let alloc: Allocation<Tag, Self::AllocExtra> = alloc.with_tags_and_extra(
475             |alloc| {
476                 if let Some(stacked_borrows) = &mut stacked_borrows {
477                     // Only globals may already contain pointers at this point
478                     assert_eq!(kind, MiriMemoryKind::Global.into());
479                     stacked_borrows.global_base_ptr(alloc)
480                 } else {
481                     Tag::Untagged
482                 }
483             },
484             AllocExtra { stacked_borrows: stacks },
485         );
486         (Cow::Owned(alloc), base_tag)
487     }
488
489     #[inline(always)]
490     fn before_deallocation(
491         memory_extra: &mut Self::MemoryExtra,
492         id: AllocId,
493     ) -> InterpResult<'tcx> {
494         if Some(id) == memory_extra.tracked_alloc_id {
495             register_diagnostic(NonHaltingDiagnostic::FreedAlloc(id));
496         }
497         
498         Ok(())
499     }
500
501     #[inline(always)]
502     fn tag_global_base_pointer(memory_extra: &MemoryExtra, id: AllocId) -> Self::PointerTag {
503         if let Some(stacked_borrows) = &memory_extra.stacked_borrows {
504             stacked_borrows.borrow_mut().global_base_ptr(id)
505         } else {
506             Tag::Untagged
507         }
508     }
509
510     #[inline(always)]
511     fn retag(
512         ecx: &mut InterpCx<'mir, 'tcx, Self>,
513         kind: mir::RetagKind,
514         place: PlaceTy<'tcx, Tag>,
515     ) -> InterpResult<'tcx> {
516         if ecx.memory.extra.stacked_borrows.is_some() {
517             ecx.retag(kind, place)
518         } else {
519             Ok(())
520         }
521     }
522
523     #[inline(always)]
524     fn init_frame_extra(
525         ecx: &mut InterpCx<'mir, 'tcx, Self>,
526         frame: Frame<'mir, 'tcx, Tag>,
527     ) -> InterpResult<'tcx, Frame<'mir, 'tcx, Tag, FrameData<'tcx>>> {
528         let stacked_borrows = ecx.memory.extra.stacked_borrows.as_ref();
529         let call_id = stacked_borrows.map_or(NonZeroU64::new(1).unwrap(), |stacked_borrows| {
530             stacked_borrows.borrow_mut().new_call()
531         });
532         let extra = FrameData { call_id, catch_unwind: None };
533         Ok(frame.with_extra(extra))
534     }
535
536     fn stack<'a>(
537         ecx: &'a InterpCx<'mir, 'tcx, Self>
538     ) -> &'a [Frame<'mir, 'tcx, Self::PointerTag, Self::FrameExtra>] {
539         ecx.active_thread_stack()
540     }
541
542     fn stack_mut<'a>(
543         ecx: &'a mut InterpCx<'mir, 'tcx, Self>
544     ) -> &'a mut Vec<Frame<'mir, 'tcx, Self::PointerTag, Self::FrameExtra>> {
545         ecx.active_thread_stack_mut()
546     }
547
548     #[inline(always)]
549     fn stack<'a>(
550         ecx: &'a InterpCx<'mir, 'tcx, Self>,
551     ) -> &'a [Frame<'mir, 'tcx, Self::PointerTag, Self::FrameExtra>] {
552         &ecx.machine.stack
553     }
554
555     #[inline(always)]
556     fn stack_mut<'a>(
557         ecx: &'a mut InterpCx<'mir, 'tcx, Self>,
558     ) -> &'a mut Vec<Frame<'mir, 'tcx, Self::PointerTag, Self::FrameExtra>> {
559         &mut ecx.machine.stack
560     }
561
562     #[inline(always)]
563     fn after_stack_push(ecx: &mut InterpCx<'mir, 'tcx, Self>) -> InterpResult<'tcx> {
564         if ecx.memory.extra.stacked_borrows.is_some() {
565             ecx.retag_return_place()
566         } else {
567             Ok(())
568         }
569     }
570
571     #[inline(always)]
572     fn after_stack_pop(
573         ecx: &mut InterpCx<'mir, 'tcx, Self>,
574         frame: Frame<'mir, 'tcx, Tag, FrameData<'tcx>>,
575         unwinding: bool,
576     ) -> InterpResult<'tcx, StackPopJump> {
577         ecx.handle_stack_pop(frame.extra, unwinding)
578     }
579
580     #[inline(always)]
581     fn int_to_ptr(
582         memory: &Memory<'mir, 'tcx, Self>,
583         int: u64,
584     ) -> InterpResult<'tcx, Pointer<Self::PointerTag>> {
585         intptrcast::GlobalState::int_to_ptr(int, memory)
586     }
587
588     #[inline(always)]
589     fn ptr_to_int(
590         memory: &Memory<'mir, 'tcx, Self>,
591         ptr: Pointer<Self::PointerTag>,
592     ) -> InterpResult<'tcx, u64> {
593         intptrcast::GlobalState::ptr_to_int(ptr, memory)
594     }
595 }
596
597 impl AllocationExtra<Tag> for AllocExtra {
598     #[inline(always)]
599     fn memory_read<'tcx>(
600         alloc: &Allocation<Tag, AllocExtra>,
601         ptr: Pointer<Tag>,
602         size: Size,
603     ) -> InterpResult<'tcx> {
604         if let Some(stacked_borrows) = &alloc.extra.stacked_borrows {
605             stacked_borrows.memory_read(ptr, size)
606         } else {
607             Ok(())
608         }
609     }
610
611     #[inline(always)]
612     fn memory_written<'tcx>(
613         alloc: &mut Allocation<Tag, AllocExtra>,
614         ptr: Pointer<Tag>,
615         size: Size,
616     ) -> InterpResult<'tcx> {
617         if let Some(stacked_borrows) = &mut alloc.extra.stacked_borrows {
618             stacked_borrows.memory_written(ptr, size)
619         } else {
620             Ok(())
621         }
622     }
623
624     #[inline(always)]
625     fn memory_deallocated<'tcx>(
626         alloc: &mut Allocation<Tag, AllocExtra>,
627         ptr: Pointer<Tag>,
628         size: Size,
629     ) -> InterpResult<'tcx> {
630         if let Some(stacked_borrows) = &mut alloc.extra.stacked_borrows {
631             stacked_borrows.memory_deallocated(ptr, size)
632         } else {
633             Ok(())
634         }
635     }
636 }