[wip] core: implement eip-7623: increase calldata cost

[MariusVanDerWijden]

Draft implementation for discussion

[vbuterin]

The floor implementation looks like it's counting bytes rather than tokens?

dataLen := uint64(len(data))

What I think you want is something like:

TokensPerNonzeroByteFrontier uint64 = 17
TokensPerNonzeroByte uint64 = 4
TxTokenGas uint64 = 4
CostFloorPerToken7623 uint64 = 17

tokensPerNonzeroByte = params.TokensPerNonzeroByteFrontier

if isEIP2028 {
    tokensPerNonzeroByte = params.tokensPerNonzeroByte
}
dataTokens = z + nz * TokensPerNonzeroByte
gasForData = dataTokens * params.TxTokenGas
floor := params.CostFloorPerToken7623 * dataTokens

[MariusVanDerWijden]

Yep, you're right. We have not had the concept of tokens yet, so I got a bit confused.
It should be okay now

edit: (nvm, the contract creation gas is still in the max, fixing...)