57 lines
1.3 KiB
Nim
57 lines
1.3 KiB
Nim
## ewasm “WRC20” token contract coding challenge
|
|
## https://gist.github.com/axic/16158c5c88fbc7b1d09dfa8c658bc363
|
|
|
|
import ../eth_contracts
|
|
|
|
proc do_balance() =
|
|
if getCallDataSize() != 24:
|
|
revert(nil, 0)
|
|
|
|
var address: array[20, byte]
|
|
callDataCopy(address, 4)
|
|
|
|
var balance: array[32, byte]
|
|
storageLoad(address, addr balance)
|
|
ret(addr balance, sizeof(balance).int32)
|
|
|
|
proc do_transfer() =
|
|
if getCallDataSize() != 32:
|
|
revert(nil, 0)
|
|
|
|
var sender: array[20, byte]
|
|
getCaller(addr sender)
|
|
var recipient: array[20, byte]
|
|
callDataCopy(recipient, 4)
|
|
var value: uint64
|
|
callDataCopy(value, 24)
|
|
|
|
var senderBalance: array[32, byte]
|
|
storageLoad(sender, addr senderBalance)
|
|
var recipientBalance: array[32, byte]
|
|
storageLoad(recipient, addr recipientBalance)
|
|
|
|
block:
|
|
# This is a quick stub to avoid using stint for now. Works only with
|
|
# single byte values.
|
|
if sender_balance[31].uint64 < value:
|
|
revert(nil, 0)
|
|
|
|
sender_balance[31] -= value.byte
|
|
recipient_balance[31] += value.byte
|
|
|
|
storageStore(sender, addr senderBalance)
|
|
storageStore(recipient, addr recipientBalance)
|
|
|
|
proc main() {.exportwasm.} =
|
|
if getCallDataSize() < 4:
|
|
revert(nil, 0)
|
|
var selector: uint32
|
|
callDataCopy(selector, 0)
|
|
case selector
|
|
of 0x9993021a'u32:
|
|
do_balance()
|
|
of 0x5d359fbd'u32:
|
|
do_transfer()
|
|
else:
|
|
revert(nil, 0)
|