Add option to initiate a top-level DELEGATECALL

src/executor/stack/executor.rs

@@ -483,6 +483,57 @@ impl<'config, 'precompiles, S: StackState<'config>, P: PrecompileSet>
  data: Vec<u8>,
  gas_limit: u64,
  access_list: Vec<(H160, Vec<H256>)>,
+ ) -> (ExitReason, Vec<u8>) {
+ let context = Context {
+ caller,
+ address,
+ apparent_value: value,
+ };
+
+ let transfer = Some(Transfer {
+ source: caller,
+ target: address,
+ value,
+ });
+
+ self.transact_call_with_context(caller, address, data, gas_limit, access_list, context, transfer)
+ }
+
+ /// Execute a `DELEGATECALL` transaction with a given caller, address, value and
+ /// gas limit and data.
+ ///
+ /// Takes in an additional `access_list` parameter for EIP-2930 which was
+ /// introduced in the Ethereum Berlin hard fork. If you do not wish to use
+ /// this functionality, just pass in an empty vector.
+ pub fn transact_delegatecall(
+ &mut self,
+ caller: H160,
+ address: H160,
+ value: U256,
+ data: Vec<u8>,
+ gas_limit: u64,
+ access_list: Vec<(H160, Vec<H256>)>,
+ ) -> (ExitReason, Vec<u8>) {
+ let context = Context {
+ caller,
+ address: caller,
+ apparent_value: value,
+ };
+
+ let transfer = None;
+
+ self.transact_call_with_context(caller, address, data, gas_limit, access_list, context, transfer)
+ }
+
+ fn transact_call_with_context(
+ &mut self,
+ caller: H160,
+ address: H160,
+ data: Vec<u8>,
+ gas_limit: u64,
+ access_list: Vec<(H160, Vec<H256>)>,
+ context: Context,
+ transfer: Option<Transfer>,
  ) -> (ExitReason, Vec<u8>) {
  event!(TransactCall {
  caller,
@@ -509,19 +560,9 @@ impl<'config, 'precompiles, S: StackState<'config>, P: PrecompileSet>
 
  self.state.inc_nonce(caller);
 
- let context = Context {
- caller,
- address,
- apparent_value: value,
- };
-
  match self.call_inner(
  address,
- Some(Transfer {
- source: caller,
- target: address,
- value,
- }),
+ transfer,
  data,
  Some(gas_limit),
  false,