# Nimbus
# Copyright (c) 2018 Status Research & Development GmbH
# Licensed under either of
#  * Apache License, version 2.0, ([LICENSE-APACHE](LICENSE-APACHE) or
#    http://www.apache.org/licenses/LICENSE-2.0)
#  * MIT license ([LICENSE-MIT](LICENSE-MIT) or
#    http://opensource.org/licenses/MIT)
# at your option. This file may not be copied, modified, or distributed except
# according to those terms.

## EVM Opcode Handlers: Helper Functions -- Kludge Version
## =======================================================
##

import
  ../../../errors,
  ../op_codes,
  ./oph_defs_kludge,
  eth/common/eth_types,
  macros,
  stint,
  strutils

# ------------------------------------------------------------------------------
# Kludge BEGIN
# ------------------------------------------------------------------------------

const
  ColdAccountAccessCost* = 2
  WarmStorageReadCost* = 3
  MaxCallDepth*     = 42

# function stubs from v2state.nim
template mutateStateDB*(vmState: BaseVMState, body: untyped) =
  block:
    var db {.inject.} = vmState.accountDb
    body

# function stubs from compu_helper.nim (to satisfy compiler logic)
proc gasCosts*(c: Computation): array[Op,int] = result
proc getBalance*[T](c: Computation, address: T): Uint256 = result
proc accountExists*(c: Computation, address: EthAddress): bool = result

# function stubs from v2computation.nim (to satisfy compiler logic)
func shouldBurnGas*(c: Computation): bool = result
proc newComputation*[A,B](v:A, m:B, salt = 0.u256): Computation = new result
proc isSuccess*(c: Computation): bool = result
proc merge*(c, child: Computation) = discard
template chainTo*(c, d: Computation, e: untyped) =
  c.child = d; c.continuation = proc() = e

# function stubs from accounts_cache.nim:
func inAccessList*[A,B](ac: A; address: B): bool = false
proc accessList*[A,B](ac: var A, address: B) = discard

# function stubs from gas_meter.nim
proc consumeGas*(gasMeter: var GasMeter;amount: GasInt;reason: string) = discard
proc returnGas*(gasMeter: var GasMeter; amount: GasInt) = discard

# stubs from gas_costs.nim
type
  GasResult* =
     tuple[gasCost, gasRefund: GasInt]

  GasParams* = object
    case kind*: Op
    of Create:
      cr_currentMemSize*, cr_memOffset*, cr_memLength*: int64
    of Call, CallCode, DelegateCall, StaticCall:
      c_isNewAccount*: bool
      c_contractGas*: Uint256
      c_gasBalance*, c_currentMemSize*, c_memOffset*, c_memLength*: int64
    else:
      discard
proc c_handler*(x: int; y: Uint256, z: GasParams): GasResult = result
proc m_handler*(x: int; curMemSize, memOffset, memLen: int64): int = result

# ------------------------------------------------------------------------------
# Kludge END
# ------------------------------------------------------------------------------

include
  ./oph_helpers

# ------------------------------------------------------------------------------
# End
# ------------------------------------------------------------------------------