@@ -12,7 +12,7 @@ use rustc::mir::BinOp;
12
12
use rustc:: mir:: interpret:: { InterpResult , Scalar , GlobalId , ConstValue } ;
13
13
14
14
use super :: {
15
- Machine , PlaceTy , OpTy , InterpCx ,
15
+ Machine , PlaceTy , OpTy , InterpCx , ImmTy ,
16
16
} ;
17
17
18
18
mod type_name;
@@ -236,6 +236,29 @@ impl<'mir, 'tcx, M: Machine<'mir, 'tcx>> InterpCx<'mir, 'tcx, M> {
236
236
let result = Scalar :: from_uint ( truncated_bits, layout. size ) ;
237
237
self . write_scalar ( result, dest) ?;
238
238
}
239
+
240
+ "ptr_offset_from" => {
241
+ let a = self . read_immediate ( args[ 0 ] ) ?. to_scalar ( ) ?. to_ptr ( ) ?;
242
+ let b = self . read_immediate ( args[ 1 ] ) ?. to_scalar ( ) ?. to_ptr ( ) ?;
243
+ if a. alloc_id != b. alloc_id {
244
+ throw_ub_format ! (
245
+ "ptr_offset_from cannot compute offset of pointers into different \
246
+ allocations.",
247
+ ) ;
248
+ }
249
+ let usize_layout = self . layout_of ( self . tcx . types . usize ) ?;
250
+ let a_offset = ImmTy :: from_uint ( a. offset . bytes ( ) , usize_layout) ;
251
+ let b_offset = ImmTy :: from_uint ( b. offset . bytes ( ) , usize_layout) ;
252
+ let ( val, _overflowed, _ty) = self . overflowing_binary_op (
253
+ BinOp :: Sub , a_offset, b_offset,
254
+ ) ?;
255
+ let pointee_layout = self . layout_of ( substs. type_at ( 0 ) ) ?;
256
+ let isize_layout = self . layout_of ( self . tcx . types . isize ) ?;
257
+ let val = ImmTy :: from_scalar ( val, isize_layout) ;
258
+ let size = ImmTy :: from_int ( pointee_layout. size . bytes ( ) , isize_layout) ;
259
+ self . exact_div ( val, size, dest) ?;
260
+ }
261
+
239
262
"transmute" => {
240
263
self . copy_op_transmute ( args[ 0 ] , dest) ?;
241
264
}
@@ -340,4 +363,30 @@ impl<'mir, 'tcx, M: Machine<'mir, 'tcx>> InterpCx<'mir, 'tcx, M> {
340
363
return Ok ( false ) ;
341
364
}
342
365
}
366
+
367
+ pub fn exact_div (
368
+ & mut self ,
369
+ a : ImmTy < ' tcx , M :: PointerTag > ,
370
+ b : ImmTy < ' tcx , M :: PointerTag > ,
371
+ dest : PlaceTy < ' tcx , M :: PointerTag > ,
372
+ ) -> InterpResult < ' tcx > {
373
+ // Performs an exact division, resulting in undefined behavior where
374
+ // `x % y != 0` or `y == 0` or `x == T::min_value() && y == -1`.
375
+ // First, check x % y != 0.
376
+ if self . binary_op ( BinOp :: Rem , a, b) ?. to_bits ( ) ? != 0 {
377
+ // Then, check if `b` is -1, which is the "min_value / -1" case.
378
+ let minus1 = Scalar :: from_int ( -1 , dest. layout . size ) ;
379
+ let b = b. to_scalar ( ) . unwrap ( ) ;
380
+ if b == minus1 {
381
+ throw_ub_format ! ( "exact_div: result of dividing MIN by -1 cannot be represented" )
382
+ } else {
383
+ throw_ub_format ! (
384
+ "exact_div: {} cannot be divided by {} without remainder" ,
385
+ a. to_scalar( ) . unwrap( ) ,
386
+ b,
387
+ )
388
+ }
389
+ }
390
+ self . binop_ignore_overflow ( BinOp :: Div , a, b, dest)
391
+ }
343
392
}
0 commit comments