45 lines
1.3 KiB
Plaintext
45 lines
1.3 KiB
Plaintext
/**
|
|
* Rubicon contract
|
|
*
|
|
* Author: Peter Harpending <peterharpending@qpq.swiss>
|
|
* Date: 2026-08-12
|
|
*/
|
|
|
|
contract Rubicon =
|
|
// this could/should be a record, but records aren't really
|
|
// portable across contracts/languages/APIs
|
|
//
|
|
// I think records are returned to caller as a FATE tuple with
|
|
// fields in this order. I don't really know though and that's
|
|
// kind of a hack and not something that we should build around i
|
|
// feel like
|
|
//
|
|
// record rbx =
|
|
// {ip : string,
|
|
// port : int,
|
|
// protocol : string, // "tcp", "udp", "sctp", etc
|
|
// noise : string, // Noise_Foo_Bar_Baz_Quux
|
|
// pubkey : bytes, // service's pubkey
|
|
// salt : bytes} // ???
|
|
|
|
// (ip, port, protocol, noise, pubkey)
|
|
type rbx_tuple = string * int * string * string * bytes
|
|
type state = list(rbx_tuple)
|
|
|
|
entrypoint
|
|
init : list(rbx_tuple) => state
|
|
init(services) =
|
|
services
|
|
|
|
stateful entrypoint
|
|
set_services : list(rbx_tuple) => ()
|
|
set_services(_) | Call.caller != Contract.creator =
|
|
abort("Not allowed")
|
|
set_services(svs) =
|
|
put(svs)
|
|
|
|
entrypoint
|
|
get_services : () => list(rbx_tuple)
|
|
get_services() =
|
|
state
|