127 lines
4.0 KiB
Nim
127 lines
4.0 KiB
Nim
# 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: Macros For Generating OP Handlers
|
|
## ======================================================
|
|
##
|
|
|
|
import
|
|
./oph_defs,
|
|
eth/common/eth_types,
|
|
macros,
|
|
stint,
|
|
strutils
|
|
|
|
type
|
|
OphNumToTextFn* = proc(n: int): string
|
|
OpHanldlerImplFn* = proc(k: var Vm2Ctx; n: int)
|
|
|
|
const
|
|
recForkSet = "Vm2OpAllForks"
|
|
|
|
# ------------------------------------------------------------------------------
|
|
# Private helpers
|
|
# ------------------------------------------------------------------------------
|
|
|
|
proc asIdent(id, name: string): NimNode {.compileTime.} =
|
|
result = nnkExprColonExpr.newTree(
|
|
newIdentNode(id),
|
|
newIdentNode(name))
|
|
|
|
proc asText(id, name: string): NimNode {.compileTime.} =
|
|
result = nnkExprColonExpr.newTree(
|
|
newIdentNode(id),
|
|
newLit(name))
|
|
|
|
# ------------------------------------------------------------------------------
|
|
# Public
|
|
# ------------------------------------------------------------------------------
|
|
|
|
macro genOphHandlers*(runHandler: static[OphNumToTextFn];
|
|
itemInfo: static[OphNumToTextFn];
|
|
inxList: static[openArray[int]];
|
|
body: static[OpHanldlerImplFn]): untyped =
|
|
## Generate the equivalent of
|
|
## ::
|
|
## const <runHandler>: Vm2OpFn = proc (k: var Vm2Ctx) =
|
|
## ## <itemInfo(n)>,
|
|
## <body(k,n)>
|
|
##
|
|
## for all `n` in `inxList`
|
|
##
|
|
result = newStmtList()
|
|
|
|
for n in inxList:
|
|
let
|
|
fnName = ident(n.runHandler)
|
|
comment = newCommentStmtNode(n.itemInfo)
|
|
|
|
# => push##Op: Vm2OpFn = proc (k: var Vm2Ctx) = ...
|
|
result.add quote do:
|
|
const `fnName`: Vm2OpFn = proc(k: var Vm2Ctx) =
|
|
`comment`
|
|
`body`(k,`n`)
|
|
# echo ">>>", result.repr
|
|
|
|
|
|
macro genOphList*(runHandler: static[OphNumToTextFn];
|
|
handlerInfo: static[OphNumToTextFn];
|
|
inxList: static[openArray[int]];
|
|
varName: static[string];
|
|
opCode: static[OphNumToTextFn]): untyped =
|
|
## Generate
|
|
## ::
|
|
## const <varName>*: seq[Vm2OpExec] = @[ <records> ]
|
|
##
|
|
## where <records> is a sequence of <record(n)> items like
|
|
## ::
|
|
## (opCode: <opCode(n)>,
|
|
## forks: Vm2OpAllForks,
|
|
## info: <handlerInfo(n)>,
|
|
## exec: (prep: vm2OpIgnore,
|
|
## run: <runHandler(n)>,
|
|
## post: vm2OpIgnore))
|
|
##
|
|
## for all `n` in `inxList`
|
|
##
|
|
var records = nnkBracket.newTree()
|
|
for n in inxList:
|
|
var handlerName = n.runHandler.multiReplace(("Op",""),("OP",""))
|
|
records.add nnkPar.newTree(
|
|
"opCode".asIdent(n.opCode),
|
|
"forks".asIdent(recForkSet),
|
|
"name".asText(handlerName),
|
|
"info".asText(n.handlerInfo),
|
|
nnkExprColonExpr.newTree(
|
|
newIdentNode("exec"),
|
|
nnkPar.newTree(
|
|
"prep".asIdent("vm2OpIgnore"),
|
|
"run".asIdent(n.runHandler),
|
|
"post".asIdent("vm2OpIgnore"))))
|
|
|
|
# => const <varName>*: seq[Vm2OpExec] = @[ <records> ]
|
|
result = nnkStmtList.newTree(
|
|
nnkConstSection.newTree(
|
|
nnkConstDef.newTree(
|
|
nnkPostfix.newTree(
|
|
newIdentNode("*"),
|
|
newIdentNode(varName)),
|
|
nnkBracketExpr.newTree(
|
|
newIdentNode("seq"),
|
|
newIdentNode("Vm2OpExec")),
|
|
nnkPrefix.newTree(
|
|
newIdentNode("@"), records))))
|
|
# echo ">>> ", result.repr
|
|
|
|
# ------------------------------------------------------------------------------
|
|
# End
|
|
# ------------------------------------------------------------------------------
|
|
|