Testing LIGO

Testing LIGO code

The LIGO command-line interpreter provides commands to directly test your LIGO code. The three main commands we currently support are:

• ligo run test

• ligo run interpret

• ligo run dry-run

We will show how to use the first two, while an example on how to use the third one was already explained here.

Testing with ligo run test

The command ligo run test can be used to test a contract using LIGO.

⚠️ Please keep in mind that this command is still BETA, and that there are features that are work in progress and are subject to change. No real test procedure should rely on this command alone.

When running the ligo run test command, LIGO code has access to an additional Test module. This module provides ways of originating contracts and executing transactions, as well as additional helper functions that allow to control different parameters of the Tezos testing library.

Note: The LIGO interpreter uses the same library that Tezos internally uses for testing.

The function Test.originate allows to deploy a contract in the testing environment. It takes a contract, which is represented as a function of type 'parameter * 'storage -> operation list * 'storage, an initial storage of type 'storage, and an initial balance for the contract being deployed. This function deploys the contract, and returns the type ('parameter, 'storage) typed_address, the compiled program in Michelson of type michelson_program, and the size of the program of type int.

The storage of a deployed contract can be queried using the Test.get_storage function, that given a typed address ('parameter, 'storage) typed_address, returns the 'storage value.

As a concrete example, suppose we have the following contract:

// This is testnew.jsligo

type storage = int;

type parameter =

["Increment", int]

| ["Decrement", int]

| ["Reset"];

type @return = [list<operation>, storage];

// Two entrypoints

const add = (store: storage, delta: int): storage => store + delta;

const sub = (store: storage, delta: int): storage => store - delta;

/* Main access point that dispatches to the entrypoints according to

the smart contract parameter. */

const main = (action: parameter, store: storage) : @return => {

return [

list([]) as list<operation>, // No operations

match(action, {

Increment:(n: int) => add (store, n),

Decrement:(n: int) => sub (store, n),

Reset: () => 0})

]

};

We can deploy it and query the storage right after, to check that the storage is in fact the one which we started with:

// This continues testnew.jsligo

let _test = () : bool => {

let initial_storage = 42 as int;

let [taddr, _, _] = Test.originate(main, initial_storage, 0 as tez);

return (Test.get_storage(taddr) == initial_storage);

};

let test = _test();

The test sub-command will evaluate all top-level definitions and print any entries that begin with the prefix test as well as the value that these definitions evaluate to. If any of the definitions are found to have failed, a message will be issued with the line number where the problem occurred.

ligo run test gitlab-pages/docs/advanced/src/testnew.jsligo

// Outputs:

// Everything at the top-level was executed.

// - test exited with value true.

The function Test.transfer_to_contract allows to bake a transaction. It takes a target account of type 'parameter contract, the parameter of type 'parameter and an amount of type tez. This function performs the transaction, and returns a test_exec_result which can be matched on to know whether the transaction was successful or not. In case of success you will get access to the gas consumed by the execution of the contract and in case of failure you will get access to a test_exec_error describing the error.
There is an alternative version, called Test.transfer_to_contract_exn which performs the transaction and will only return the gas consumption, failing in case that there was an error.

We can extend the previous example by executing a transaction that increments the storage after deployment, we also print the gas consumption:

// This continues testnew.jsligo

let _test2 = () : bool => {

let initial_storage = 42 as int;

let [taddr, _, _] = Test.originate(main, initial_storage, 0 as tez);

let contr = Test.to_contract(taddr);

let gas_cons = Test.transfer_to_contract_exn(contr, (Increment (1)), 1 as mutez);

let _ = Test.log(["gas consumption", gas_cons]);

return (Test.get_storage(taddr) == initial_storage + 1);

}

let test2 = _test2();

The environment assumes a source for the operations which can be set using the function Test.set_source : address -> unit.

Transfers and originations with tickets

Originating contract storing tickets or transfering to contract accepting tickets requires some extra steps. We will first explain the problems with tickets and then show you how to handle it.

The problem with tickets

There is two kind of operations in the protocol : external and internal.
internal operations are those created by smart contracts and external operations are those created from outside the chain (e.g. using Test.originate or tezos-client for instance) more information here

In the protocol, both external and internal transfer/origination operations contains a piece of michelson code representing the parameter/initial storage.
Now imagine you have a value of type parameter_ty/storage_ty containing a ticket, that you want to transfer or originate, in the operation data, tickets will be represented in Michelson as pairs:

> ligo compile expression cameligo 'Tezos.create_ticket 0x0202 10n'

(Pair "KT1DUMMYDUMMYDUMMYDUMMYDUMMYDUMu2oHG" 0x0202 10)

ticketer address , ticket value , ticket amount

If we try to apply such an operation, the type wouldn't match: ticket of bytes VS some pair.
The protocol would not let you do that since you could be creating a ticket out of nowhere unless the operation happens to be forged from within a contract (i.e. "internally")!

In the testing framework - for now - it means using "proxy-contracts" forging the operations using provided a ticket value and a ticket amount.

Proxy ticket contracts

Here is the proposed interface for creating proxy-contracts:

/* proxy_ticket.jsligo */

/* @private */

const proxy_transfer_contract :

<vt , whole_p>

(x : (ticket:ticket<vt>) => whole_p) => ((x : [[[vt , nat] , address] , unit] ) => [list<operation> , unit]) =

( mk_param : ((ticket:ticket<vt>) => whole_p)) => {

return (p : [[[vt , nat] , address] , unit] ) => {

const [p,_] = p ;

const [[v,amt],dst_addr] = p ;

const ticket = Option.unopt (Tezos.create_ticket (v, amt)) ;

const tx_param = mk_param (ticket) ;

const c : contract<whole_p> =

Tezos.get_contract_with_error (dst_addr, "Testing proxy: you provided a wrong address") ;

const op = Tezos.transaction (tx_param, 1 as mutez, c) ;

return ([ list([op]), unit ])

};

};

/* @private */

const proxy_originate_contract :

<vt, whole_s, vp>

( x : [

((ticket:ticket<vt>) => whole_s),

((x : [ vp , whole_s]) => [list<operation> , whole_s])

]

) => ( (ps:[[vt , nat] , option<address>]) => [list<operation>, option<address>]) =

([mk_storage , main] : [

((ticket:ticket<vt>) => whole_s),

((x : [ vp , whole_s]) => [list<operation> , whole_s])

]) => {

return (p : [[vt , nat] , option<address>]) => {

const [p,_] = p;

const [v,amt] = p ;

const ticket = Option.unopt (Tezos.create_ticket (v, amt)) ;

const init_storage : whole_s = mk_storage (ticket) ;

const [op,addr] = Tezos.create_contract(main, (None () as option<key_hash>), (0 as mutez), init_storage) ;

return ([list([op]), Some(addr)])

};

};

type proxy_address<v> = typed_address<[[v,nat] , address] , unit> ;

const init_transfer :

<vt, whole_p> ( mk_param : ((t:ticket<vt>) => whole_p)) => proxy_address<vt> =

( mk_param : ((t:ticket<vt>) => whole_p)) => {

const proxy_transfer : ((x : ([[[vt , nat] , address] , unit])) => [list<operation> , unit]) =

proxy_transfer_contract (mk_param)

;

const [taddr_proxy, _, _] = Test.originate (proxy_transfer, unit, 1 as tez) ;

return taddr_proxy

};

const transfer :

<vt>( x : [proxy_address<vt> , [[vt , nat] , address]]) => test_exec_result =

( [taddr_proxy, info] : [proxy_address<vt> , [[vt , nat] , address]]) => {

const [ticket_info, dst_addr] = info ;

return (

Test.transfer_to_contract(Test.to_contract (taddr_proxy), [ticket_info , dst_addr], 1 as mutez)

)

};

const originate : <vt, whole_s, vp>

(x : [ [vt , nat] , (t:ticket<vt>) => whole_s, (ps:[vp , whole_s]) => [list<operation> , whole_s] ]) => address =

([ ticket_info , mk_storage , contract] : [ [vt , nat] , (t:ticket<vt>) => whole_s, (ps:[vp , whole_s]) => [list<operation> , whole_s] ] ) => {

const proxy_origination : (x : ([[vt , nat] , option<address>])) => [list<operation> , option<address>] =

proxy_originate_contract (mk_storage, contract) ;

const [taddr_proxy, _, _] = Test.originate (proxy_origination, (None () as option<address> ),1 as tez) ;

const _ = Test.transfer_to_contract_exn (Test.to_contract (taddr_proxy), ticket_info, 0 as tez) ;

return match (Test.get_storage (taddr_proxy), {

Some: (addr:address) => {

const _taddr = (Test.cast_address(addr) as typed_address<vp,whole_s> ) ;

return addr

},

None : (_:unit) => failwith ("internal error")

});

};

---

init_transfer accepts:

• a function mk_param which given a ticket must return a value of your parameter type

and returns the typed address of a "transfer proxy-contract" which can then be used to do multiple transfers of tickets with the same ticketer address

---

transfer accepts :

• the typed address of a "transfer proxy-contract"
• the ticket information (value and amount) together with the destination address

and returns a value of type test_exec_result

---

originate accepts:

• the ticket information (value and amount)
• a function mk_storage which given a ticket must return a value of your storage type
• your contract (having a ticket in its storage type)

---

Note: Functions mk_param and mk_storage will be executed in the proxy contract itself

Usages

Transfer

Here is an example using Proxy_ticket.init_transfer and Proxy_ticket.transfer:

1. import the module above as Proxy_ticket
2. define a contract main holding a ticket of string in its parameter type. The contract will just store the value of the received ticket and the address of the sender
3. originate contract main
4. initialize a "transfer proxy-contract" providing a function to build a parameter out of a ticket
5. transfer a ticket with a value "hello" and an amount of 10 to contract main
6. print the storage of contract main
7. transfer a ticket with a value "world" and an amount of 5 to contract main
8. print the storage of contract main

#import "./gitlab-pages/docs/advanced/src/proxy_ticket.jsligo" "Proxy_ticket"

type param = [ int , ticket<string>]

const main = (p: param, _: [string , address]) : [list<operation> , [string , address]] => {

let [_,ticket] = p ;

let [[_,[v,_]] , _] = Tezos.read_ticket (ticket) ;

return ([list([]) , [v, Tezos.get_sender ()]])

};

const test_transfer_to_contract_ = () : unit => {

let [main_taddr, _ , _] = Test.originate (main, ["bye",Test.nth_bootstrap_account (1)], 1 as mutez) ;

let main_addr = Tezos.address (Test.to_contract (main_taddr)) ;

/* mk_param is executed __by the proxy contract__ */

const mk_param = (t:ticket<string>) : param => { return [42,t] } ;

/* Use this address everytime you want to send tickets from the same proxy-contract */

/* initialize a proxy contract in charge of creating and sending your tickets */

let proxy_taddr = Proxy_ticket.init_transfer (mk_param) ;

let _ = Test.log (["poxy addr:", proxy_taddr]) ;

/* ticket_info lets you control the amount and the value of the tickets you send */

let ticket_info1 = ["hello",10 as nat] ;

/* we send ticket to main through the proxy-contract */

let _ = Proxy_ticket.transfer (proxy_taddr, [ticket_info1,main_addr]) ;

let _ = Test.log (Test.get_storage (main_taddr)) ;

let ticket_info2 = ["world",5 as nat] ;

let _ = Proxy_ticket.transfer (proxy_taddr, [ticket_info2,main_addr]) ;

Test.log (Test.get_storage (main_taddr));

};

const test_transfer_to_contract = test_transfer_to_contract_ ();

result:

> ligo run test transfer_ticket.mligo

("poxy addr:" , KT1QGANLjYsyJmw1QNww9Jkgb4ccQr6W2gsC)

("hello" , KT1QGANLjYsyJmw1QNww9Jkgb4ccQr6W2gsC)

("world" , KT1QGANLjYsyJmw1QNww9Jkgb4ccQr6W2gsC)

Everything at the top-level was executed.

- test_transfer_to_contract exited with value ().

Note: note that the sender (stored in the contract) matches the address of the proxy contract

Origination

Here is an example using Proxy_ticket.originate and the type unforged_ticket :

1. import the module above as Proxy_ticket
2. define a contract main potentially holding a ticket of bytes in its storage. The contract will just reads the ticket in its storage if present. Note that we define two version of the contract storage type: one for the contract and one for the storage type that we would like to manipulate in our testing logic
3. we define the mk_storage function which simply wraps a ticket into an option type
4. we define the ticket information for a ticket of value 0x0202 and an amount of 15
5. we call originate and retrieve the address of the newly originated contract
6. we use the address to fetch the current contract storage using Test.get_storage_of_address and decompile it as a human_storage
7. we read the content of the ticket and perform a serie of assertions

#import "./gitlab-pages/docs/advanced/src/proxy_ticket.jsligo" "Proxy_ticket"

type storage = option< ticket<bytes> >

type unforged_storage = option< unforged_ticket<bytes> >

const main = (_: unit, s: storage) : [ list<operation> , storage] => {

let x =

match (s, {

Some: (ticket: ticket<bytes>) => {

let [_ , t] = Tezos.read_ticket (ticket) ;

return Some (t)

},

None: () => { return None () }

});

return [list ([]), x]

};

const test_originate_contract_ = () : unit => {

const mk_storage = (t:ticket<bytes>) : storage => { return (Some (t)) } ;

let ticket_info = [0x0202, 15 as nat] ;

let addr = Proxy_ticket.originate (ticket_info, mk_storage, main) ;

let storage : michelson_program = Test.get_storage_of_address (addr) ;

let unforged_storage = (Test.decompile (storage) as unforged_storage) ;

/* the ticket 'unforged_storage' can be manipulated freely without caring about ticket linearity */

match (unforged_storage, {

Some: (x: unforged_ticket<bytes>) => {

let _ = Test.log ("unforged_ticket", x) ;

let { ticketer , value , amount } = x ;

let _ = assert (value == ticket_info[0]) ;

let _ = assert (amount == ticket_info[1]) ;

return unit

},

None: () => failwith ("impossible")

}

)

};

const test_originate_contract = test_originate_contract_ ();

result:

("unforged_ticket" , {amount = 15n ; ticketer = KT1Qp8u3v4seQHPYfpSw6eWvPG8CojH3m18G ; value = 0x0202})

Everything at the top-level was executed.

- test_originate_contract_ exited with value <fun>.

- test_originate_contract exited with value ().

Unit testing a function

Consider a map binding addresses to amounts and a function removing all entries in that map having an amount less to a given threshold.

// This is remove-balance.jsligo

type balances = map <address, tez>

const balances_under = (b : balances, threshold:tez) : balances => {

let f = (acc : balances, kv :[address , tez] ) : balances => {

let [k,v] = kv ;

if (v < threshold) { return Map.remove (k,acc) } else {return acc}

};

return Map.fold (f,b,b);

}

Let us imagine that we want to test this function against a range of thresholds with the LIGO test framework.

First, let's include the file under test and reset the state with 5 bootstrap accounts (we are going to use the bootstrap addresses later)

#include "./gitlab-pages/docs/advanced/src/remove-balance.jsligo"

let x = Test.reset_state (5 as nat, list([]) as list <tez>);

Now build the balances map that will serve as the input of our test.

let balances : balances =

Map.literal(list([[Test.nth_bootstrap_account(1), 10 as tez],

[Test.nth_bootstrap_account(2), 100 as tez],

[Test.nth_bootstrap_account(3), 1000 as tez]]));

Our simple test loop will call balances_under with the compiled map defined above, get the size of the resulting map and compare it to an expected value with Test.michelson_equal.

The call to balance_under and the computation of the size of the resulting map is achieved through the primitive Test.run. This primitive runs a function on an input, translating both (function and input) to Michelson before running on the Michelson interpreter. More concretely Test.run f v performs the following:

1. Compiles the function argument f to Michelson f_mich
2. Compiles the value argument v (which was already evaluated) to Michelson v_mich
3. Runs the Michelson interpreter on the code f_mich with the initial stack [ v_mich ]

The function that is being compiled is called tester.

We also print the actual and expected sizes for good measure.

let test =

List.iter

( ([threshold , expected_size] : [tez , nat]) : unit => {

let tester = ([balances, threshold] : [balances, tez]) : nat => Map.size (balances_under (balances, threshold));

let size = Test.run(tester, [balances, threshold]);

let expected_size_ = Test.eval(expected_size) ;

let unit_ = Test.log (["expected", expected_size]) ;

let unit__ = Test.log (["actual",size]) ;

return (assert (Test.michelson_equal (size,expected_size_)))

},

list ([ [15 as tez,2 as nat] , [130 as tez,1 as nat] , [1200 as tez,0 as nat]]) );

You can now execute the test:

> ligo run test gitlab-pages/docs/advanced/src/unit-remove-balance-mixed.jsligo

// Outputs:

// ("expected" , 2)

// ("actual" , 2)

// ("expected" , 1)

// ("actual" , 1)

// ("expected" , 0)

// ("actual" , 0)

// Everything at the top-level was executed.

// - test exited with value ().

Testing with ligo run interpret

The command ligo run interpret allows to interpret an expression in a context initialised by a source file. The interpretation is done using Michelson's interpreter.

We can see how it works on an example. Suppose we want to test the following contract.

// This is testme.jsligo

type storage = int;

type parameter =

["Increment", int]

| ["Decrement", int]

| ["Reset"];

type @return = [list<operation>, storage];

// Two entrypoints

let add = (store: storage, delta: int): storage => store + delta;

let sub = (store: storage, delta: int): storage => store - delta;

/* Main access point that dispatches to the entrypoints according to

the smart contract parameter. */

let main = (action: parameter, store: storage) : @return => {

return [

list([]) as list<operation>, // No operations

match(action, {

Increment:(n: int) => add (store, n),

Decrement:(n: int) => sub (store, n),

Reset: () => 0})

]

};

This contract keeps an integer as storage, and has three entry-points: one for incrementing the storage, one for decrementing the storage, and one for resetting the storage to 0.

As a simple property, we check whether starting with a storage of 10, if we execute the entry-point for incrementing 32, then we get a resulting storage of 42. For checking it, we can interpret the main function:

ligo run interpret "main (Increment (32), 10)" --init-file testme.jsligo

// Outputs:

// ( LIST_EMPTY() , 42 )

With the argument --init-file we pass the contract we want to test, and the sub-command requires also the expression to evaluate in that context, in this case, a call to our contract (main) with parameter Increment (32) and storage 10. As a result, we can check that the resulting storage is 42 (the second component of the pair), and there are no further operations to execute (the first component).

We can tune certain parameters of the execution by passing them as arguments:

--amount=AMOUNT (absent=0)

AMOUNT is the amount the Michelson interpreter will use for the

transaction.

--balance=BALANCE (absent=0)

BALANCE is the balance the Michelson interpreter will use for the

contract balance.

--now=NOW

NOW is the NOW value the Michelson interpreter will use

(e.g. '2000-01-01T10:10:10Z')

--sender=SENDER

SENDER is the sender the Michelson interpreter transaction will use.

--source=SOURCE

SOURCE is the source the Michelson interpreter transaction will use.

Event testing

Here is how you emit events and fetch them from your tests:

let main = ([p, _] : [[int, int], unit]) => {

let op1 = Tezos.emit("%foo", p);

let op2 = Tezos.emit("%foo", p[0]);

return [list([op1, op2]), unit];

};

let test = (() : [list<[int,int]>, list<int>] => {

let [ta, _, _] = Test.originate(main, unit, 0 as tez);

let _ = Test.transfer_to_contract_exn(Test.to_contract(ta), [1,2], 0 as tez);

return [Test.get_last_events_from(ta, "foo") as list<[int, int]>, Test.get_last_events_from(ta, "foo") as list<int>];

}) ();