mirror of
https://github.com/ton-blockchain/ton
synced 2025-03-09 15:40:10 +00:00
updated smartcontract code
- updated smartcontract code - fixed bug in liteserver listening socket - updated documentation
This commit is contained in:
ton
parent
38c3e39066
commit
b978e27b2f
63 changed files with 3185 additions and 81 deletions
|
|
@ -279,6 +279,7 @@ if (TON_USE_ASAN AND NOT WIN32)
|
|||
set(TURN_OFF_LSAN export LSAN_OPTIONS=detect_leaks=0)
|
||||
endif()
|
||||
|
||||
file(MAKE_DIRECTORY smartcont/auto)
|
||||
if (NOT CMAKE_CROSSCOMPILING)
|
||||
set(GENERATE_TLB_CMD tlbc)
|
||||
add_custom_command(
|
||||
|
|
@ -295,29 +296,41 @@ if (NOT CMAKE_CROSSCOMPILING)
|
|||
add_custom_target(gen_fif ALL)
|
||||
function(GenFif)
|
||||
set(options )
|
||||
set(oneValueArgs DEST)
|
||||
set(oneValueArgs DEST NAME)
|
||||
set(multiValueArgs SOURCE)
|
||||
set(FUNC_LIB_SOURCE smartcont/stdlib.fc)
|
||||
cmake_parse_arguments(ARG "${options}" "${oneValueArgs}" "${multiValueArgs}" ${ARGN} )
|
||||
string(REGEX REPLACE "[^a-zA-Z_]" "_" ID ${ARG_DEST})
|
||||
set(ARG_DEST_FIF "${ARG_DEST}.fif")
|
||||
add_custom_command(
|
||||
COMMENT "Generate ${ARG_DEST}"
|
||||
COMMENT "Generate ${ARG_DEST_FIF}"
|
||||
WORKING_DIRECTORY ${CMAKE_CURRENT_SOURCE_DIR}
|
||||
COMMAND func -PS -o ${ARG_DEST} ${FUNC_LIB_SOURCE} ${ARG_SOURCE}
|
||||
COMMAND func -PS -o ${ARG_DEST_FIF} ${FUNC_LIB_SOURCE} ${ARG_SOURCE}
|
||||
MAIN_DEPENDENCY ${ARG_SOURCE}
|
||||
DEPENDS func ${FUNC_LIB_SOURCE}
|
||||
OUTPUT ${CMAKE_CURRENT_SOURCE_DIR}/${ARG_DEST}
|
||||
OUTPUT ${CMAKE_CURRENT_SOURCE_DIR}/${ARG_DEST_FIF}
|
||||
)
|
||||
add_custom_target(gen_fif_${ID} DEPENDS ${ARG_DEST})
|
||||
set(ARG_DEST_CPP "${ARG_DEST}.cpp")
|
||||
add_custom_command(
|
||||
COMMENT "Generate ${ARG_DEST_CPP}"
|
||||
WORKING_DIRECTORY ${CMAKE_CURRENT_SOURCE_DIR}
|
||||
COMMAND fift -Ifift/lib:smartcont -s asm-to-cpp.fif ${ARG_DEST_FIF} ${ARG_DEST_CPP} ${ARG_NAME}
|
||||
MAIN_DEPENDENCY ${ARG_SOURCE}
|
||||
DEPENDS fift ${ARG_DEST_FIF} smartcont/asm-to-cpp.fif
|
||||
OUTPUT ${CMAKE_CURRENT_SOURCE_DIR}/${ARG_DEST_CPP}
|
||||
)
|
||||
add_custom_target(gen_fif_${ID} DEPENDS ${ARG_DEST_FIF} ${ARG_DEST_CPP})
|
||||
add_dependencies(gen_fif gen_fif_${ID})
|
||||
endfunction()
|
||||
|
||||
GenFif(DEST smartcont/config-code.fif SOURCE smartcont/config-code.fc)
|
||||
GenFif(DEST smartcont/wallet-code.fif SOURCE smartcont/wallet-code.fc)
|
||||
GenFif(DEST smartcont/simple-wallet-code.fif SOURCE smartcont/simple-wallet-code.fc)
|
||||
GenFif(DEST smartcont/highload-wallet-code.fif SOURCE smartcont/highload-wallet-code.fc)
|
||||
GenFif(DEST smartcont/highload-wallet-v2-code.fif SOURCE smartcont/highload-wallet-v2-code.fc)
|
||||
GenFif(DEST smartcont/elector-code.fif SOURCE smartcont/elector-code.fc)
|
||||
GenFif(DEST smartcont/auto/config-code SOURCE smartcont/config-code.fc NAME config)
|
||||
GenFif(DEST smartcont/auto/wallet-code SOURCE smartcont/wallet-code.fc NAME wallet)
|
||||
GenFif(DEST smartcont/auto/simple-wallet-code SOURCE smartcont/simple-wallet-code.fc NAME simple-wallet)
|
||||
GenFif(DEST smartcont/auto/highload-wallet-code SOURCE smartcont/highload-wallet-code.fc NAME highload-wallet)
|
||||
GenFif(DEST smartcont/auto/highload-wallet-v2-code SOURCE smartcont/highload-wallet-v2-code.fc NAME highoad-wallet-v2)
|
||||
GenFif(DEST smartcont/auto/elector-code SOURCE smartcont/elector-code.fc NAME elector-code)
|
||||
GenFif(DEST smartcont/auto/restricted-wallet-code SOURCE smartcont/restricted-wallet-code.fc NAME restricted-wallet)
|
||||
GenFif(DEST smartcont/auto/restricted-wallet2-code SOURCE smartcont/restricted-wallet2-code.fc NAME restricted-wallet2)
|
||||
endif()
|
||||
|
||||
add_executable(create-state block/create-state.cpp)
|
||||
|
|
|
|||
|
|
@ -26,6 +26,7 @@
|
|||
#include <ostream>
|
||||
#include "tl/tlblib.hpp"
|
||||
#include "td/utils/bits.h"
|
||||
#include "td/utils/CancellationToken.h"
|
||||
#include "td/utils/StringBuilder.h"
|
||||
#include "ton/ton-types.h"
|
||||
|
||||
|
|
@ -162,12 +163,12 @@ struct MsgProcessedUpto {
|
|||
MsgProcessedUpto(ton::ShardId _shard, ton::BlockSeqno _mcseqno, ton::LogicalTime _lt, td::ConstBitPtr _hash)
|
||||
: shard(_shard), mc_seqno(_mcseqno), last_inmsg_lt(_lt), last_inmsg_hash(_hash) {
|
||||
}
|
||||
bool operator<(const MsgProcessedUpto& other) const & {
|
||||
bool operator<(const MsgProcessedUpto& other) const& {
|
||||
return shard < other.shard || (shard == other.shard && mc_seqno < other.mc_seqno);
|
||||
}
|
||||
bool contains(const MsgProcessedUpto& other) const &;
|
||||
bool contains(const MsgProcessedUpto& other) const&;
|
||||
bool contains(ton::ShardId other_shard, ton::LogicalTime other_lt, td::ConstBitPtr other_hash,
|
||||
ton::BlockSeqno other_mc_seqno) const &;
|
||||
ton::BlockSeqno other_mc_seqno) const&;
|
||||
// NB: this is for checking whether we have already imported an internal message
|
||||
bool already_processed(const EnqueuedMsgDescr& msg) const;
|
||||
};
|
||||
|
|
@ -573,7 +574,7 @@ struct BlockProofChain {
|
|||
bool last_link_incomplete() const {
|
||||
return !links.empty() && last_link().incomplete();
|
||||
}
|
||||
td::Status validate();
|
||||
td::Status validate(td::CancellationToken cancellation_token = {});
|
||||
};
|
||||
|
||||
int filter_out_msg_queue(vm::AugmentedDictionary& out_queue, ton::ShardIdFull old_shard, ton::ShardIdFull subshard);
|
||||
|
|
|
|||
|
|
@ -424,7 +424,7 @@ td::Status BlockProofLink::validate(td::uint32* save_utime) const {
|
|||
}
|
||||
}
|
||||
|
||||
td::Status BlockProofChain::validate() {
|
||||
td::Status BlockProofChain::validate(td::CancellationToken cancellation_token) {
|
||||
valid = false;
|
||||
has_key_block = false;
|
||||
has_utime = false;
|
||||
|
|
@ -450,6 +450,9 @@ td::Status BlockProofChain::validate() {
|
|||
<< link.from.to_str() << " but the previous link ends at different block "
|
||||
<< cur.to_str());
|
||||
}
|
||||
if (cancellation_token) {
|
||||
return td::Status::Error("Cancelled");
|
||||
}
|
||||
auto err = link.validate(&last_utime);
|
||||
if (err.is_error()) {
|
||||
return td::Status::Error(PSTRING() << "link #" << i << " in BlockProofChain is invalid: " << err.to_string());
|
||||
|
|
|
|||
|
|
@ -975,6 +975,8 @@ x{F82} @Defop(4u) GETPARAM
|
|||
x{F823} @Defop NOW
|
||||
x{F824} @Defop BLOCKLT
|
||||
x{F825} @Defop LTIME
|
||||
x{F826} @Defop BALANCE
|
||||
x{F827} @Defop RANDSEED
|
||||
x{F828} @Defop MYADDR
|
||||
x{F829} @Defop CONFIGROOT
|
||||
x{F830} @Defop CONFIGDICT
|
||||
|
|
|
|||
|
|
@ -136,3 +136,15 @@ recursive append-long-bytes {
|
|||
// S -- c
|
||||
{ <b over $len { 0 32 u, swap 36 append-long-string } { nip } cond b>
|
||||
} : simple-transfer-body
|
||||
|
||||
// ( S -- x ) parse public key
|
||||
{ dup $len 48 <> abort"public key must be 48 characters long"
|
||||
base64>B dup Blen 36 <> abort"public key must be 48 characters long"
|
||||
34 B| 16 B>u@ over crc16 <> abort"crc16 mismatch in public key"
|
||||
16 B>u@+ 0x3ee6 <> abort"invalid tag in public key"
|
||||
256 B>u@
|
||||
} : parse-pubkey
|
||||
{ bl word parse-pubkey 1 'nop } ::_ PK'
|
||||
// ( x -- S ) serialize public key
|
||||
{ 256 u>B B{3ee6} swap B+ dup crc16 16 u>B B+ B>base64 } : pubkey>$
|
||||
{ pubkey>$ type } : .pubkey
|
||||
|
|
|
|||
|
|
@ -614,6 +614,43 @@ void interpret_str_reverse(vm::Stack& stack) {
|
|||
stack.push_string(std::move(s));
|
||||
}
|
||||
|
||||
void interpret_utf8_str_len(vm::Stack& stack) {
|
||||
std::string s = stack.pop_string();
|
||||
long long cnt = 0;
|
||||
for (char c : s) {
|
||||
if ((c & 0xc0) != 0x80) {
|
||||
cnt++;
|
||||
}
|
||||
}
|
||||
stack.push_smallint(cnt);
|
||||
}
|
||||
|
||||
void interpret_utf8_str_split(vm::Stack& stack) {
|
||||
stack.check_underflow(2);
|
||||
unsigned c = stack.pop_smallint_range(0xffff);
|
||||
std::string s = stack.pop_string();
|
||||
if (c > s.size()) {
|
||||
throw IntError{"not enough utf8 characters for cutting"};
|
||||
}
|
||||
auto it = s.begin();
|
||||
for (; it < s.end(); ++it) {
|
||||
if ((*it & 0xc0) != 0x80) {
|
||||
if (!c) {
|
||||
stack.push_string(std::string{s.begin(), it});
|
||||
stack.push_string(std::string{it, s.end()});
|
||||
return;
|
||||
}
|
||||
--c;
|
||||
}
|
||||
}
|
||||
if (!c) {
|
||||
stack.push_string(std::move(s));
|
||||
stack.push_string(std::string{});
|
||||
} else {
|
||||
throw IntError{"not enough utf8 characters for cutting"};
|
||||
}
|
||||
}
|
||||
|
||||
void interpret_str_remove_trailing_int(vm::Stack& stack, int arg) {
|
||||
char x = (char)(arg ? arg : stack.pop_long_range(127));
|
||||
std::string s = stack.pop_string();
|
||||
|
|
@ -1797,6 +1834,16 @@ void interpret_char(IntCtx& ctx) {
|
|||
push_argcount(ctx, 1);
|
||||
}
|
||||
|
||||
void interpret_char_internal(vm::Stack& stack) {
|
||||
auto s = stack.pop_string();
|
||||
int len = (s.size() < 10 ? (int)s.size() : 10);
|
||||
int code = str_utf8_code(s.c_str(), len);
|
||||
if (code < 0 || s.size() != (unsigned)len) {
|
||||
throw IntError{"exactly one character expected"};
|
||||
}
|
||||
stack.push_smallint(code);
|
||||
}
|
||||
|
||||
int parse_number(std::string s, td::RefInt256& num, td::RefInt256& denom, bool allow_frac = true,
|
||||
bool throw_error = false) {
|
||||
if (allow_frac) {
|
||||
|
|
@ -2496,6 +2543,7 @@ void init_words_common(Dictionary& d) {
|
|||
// char/string manipulation
|
||||
d.def_active_word("\"", interpret_quote_str);
|
||||
d.def_active_word("char ", interpret_char);
|
||||
d.def_stack_word("(char) ", interpret_char_internal);
|
||||
d.def_ctx_word("emit ", interpret_emit);
|
||||
d.def_ctx_word("space ", std::bind(interpret_emit_const, _1, ' '));
|
||||
d.def_ctx_word("cr ", std::bind(interpret_emit_const, _1, '\n'));
|
||||
|
|
@ -2515,6 +2563,8 @@ void init_words_common(Dictionary& d) {
|
|||
d.def_stack_word("-trailing0 ", std::bind(interpret_str_remove_trailing_int, _1, '0'));
|
||||
d.def_stack_word("$len ", interpret_str_len);
|
||||
d.def_stack_word("Blen ", interpret_bytes_len);
|
||||
d.def_stack_word("$Len ", interpret_utf8_str_len);
|
||||
d.def_stack_word("$Split ", interpret_utf8_str_split);
|
||||
d.def_ctx_word("Bx. ", std::bind(interpret_bytes_hex_print_raw, _1, true));
|
||||
d.def_stack_word("B>X ", std::bind(interpret_bytes_to_hex, _1, true));
|
||||
d.def_stack_word("B>x ", std::bind(interpret_bytes_to_hex, _1, false));
|
||||
|
|
|
|||
|
|
@ -205,6 +205,9 @@ void VarDescr::clear_value() {
|
|||
}
|
||||
|
||||
void VarDescrList::show(std::ostream& os) const {
|
||||
if (unreachable) {
|
||||
os << "<unreachable> ";
|
||||
}
|
||||
os << "[";
|
||||
for (const auto& v : list) {
|
||||
os << ' ' << v;
|
||||
|
|
|
|||
|
|
@ -272,6 +272,12 @@ VarDescrList& VarDescrList::operator+=(const VarDescrList& y) {
|
|||
}
|
||||
|
||||
VarDescrList VarDescrList::operator|(const VarDescrList& y) const {
|
||||
if (y.unreachable) {
|
||||
return *this;
|
||||
}
|
||||
if (unreachable) {
|
||||
return y;
|
||||
}
|
||||
VarDescrList res;
|
||||
auto it1 = list.cbegin();
|
||||
auto it2 = y.list.cbegin();
|
||||
|
|
@ -289,7 +295,11 @@ VarDescrList VarDescrList::operator|(const VarDescrList& y) const {
|
|||
}
|
||||
|
||||
VarDescrList& VarDescrList::operator|=(const VarDescrList& y) {
|
||||
return *this = *this | y;
|
||||
if (y.unreachable) {
|
||||
return *this;
|
||||
} else {
|
||||
return *this = *this | y;
|
||||
}
|
||||
}
|
||||
|
||||
VarDescrList& VarDescrList::operator&=(const VarDescrList& values) {
|
||||
|
|
@ -299,16 +309,22 @@ VarDescrList& VarDescrList::operator&=(const VarDescrList& values) {
|
|||
*item &= vd;
|
||||
}
|
||||
}
|
||||
unreachable |= values.unreachable;
|
||||
return *this;
|
||||
}
|
||||
|
||||
VarDescrList& VarDescrList::import_values(const VarDescrList& values) {
|
||||
for (const VarDescr& vd : values.list) {
|
||||
VarDescr* item = operator[](vd.idx);
|
||||
if (item) {
|
||||
item->set_value(vd);
|
||||
if (values.unreachable) {
|
||||
set_unreachable();
|
||||
} else
|
||||
for (auto& vd : list) {
|
||||
auto new_vd = values[vd.idx];
|
||||
if (new_vd) {
|
||||
vd.set_value(*new_vd);
|
||||
} else {
|
||||
vd.clear_value();
|
||||
}
|
||||
}
|
||||
}
|
||||
return *this;
|
||||
}
|
||||
|
||||
|
|
@ -658,8 +674,11 @@ void Op::prepare_args(VarDescrList values) {
|
|||
const VarDescr* val = values[right[i]];
|
||||
if (val) {
|
||||
args[i].set_value(*val);
|
||||
args[i].clear_unused();
|
||||
// args[i].clear_unused();
|
||||
} else {
|
||||
args[i].clear_value();
|
||||
}
|
||||
args[i].clear_unused();
|
||||
}
|
||||
}
|
||||
|
||||
|
|
@ -670,7 +689,7 @@ VarDescrList Op::fwd_analyze(VarDescrList values) {
|
|||
case _Import:
|
||||
break;
|
||||
case _Return:
|
||||
values.list.clear();
|
||||
values.set_unreachable();
|
||||
break;
|
||||
case _IntConst: {
|
||||
values.add_newval(left[0]).set_const(int_const);
|
||||
|
|
|
|||
|
|
@ -668,6 +668,7 @@ AsmOp compile_cmp_int(std::vector<VarDescr>& res, std::vector<VarDescr>& args, i
|
|||
return mode == 7 ? push_const(r.int_const) : AsmOp::BoolConst(v != 0);
|
||||
}
|
||||
int v = compute_compare(x, y, mode);
|
||||
// std::cerr << "compute_compare(" << x << ", " << y << ", " << mode << ") = " << v << std::endl;
|
||||
assert(v);
|
||||
if (!(v & (v - 1))) {
|
||||
r.set_const(v - (v >> 2) - 2);
|
||||
|
|
@ -685,6 +686,7 @@ AsmOp compile_cmp_int(std::vector<VarDescr>& res, std::vector<VarDescr>& args, i
|
|||
if (v & 4) {
|
||||
r.val &= VarDescr::ConstOne;
|
||||
}
|
||||
// std::cerr << "result: " << r << std::endl;
|
||||
static const char* cmp_int_names[] = {"", "GTINT", "EQINT", "GTINT", "LESSINT", "NEQINT", "LESSINT"};
|
||||
static const char* cmp_names[] = {"", "GREATER", "EQUAL", "GEQ", "LESS", "NEQ", "LEQ", "CMP"};
|
||||
static int cmp_int_delta[] = {0, 0, 0, -1, 0, 0, 1};
|
||||
|
|
@ -911,6 +913,7 @@ void define_builtins() {
|
|||
define_builtin_func("false", Int, /* AsmOp::Const("FALSE") */ std::bind(compile_bool_const, _1, _2, false));
|
||||
// define_builtin_func("null", Null, AsmOp::Const("PUSHNULL"));
|
||||
define_builtin_func("nil", Tuple, AsmOp::Const("PUSHNULL"));
|
||||
define_builtin_func("Nil", Tuple, AsmOp::Const("NIL"));
|
||||
define_builtin_func("null?", TypeExpr::new_forall({X}, TypeExpr::new_map(X, Int)), compile_is_null);
|
||||
define_builtin_func("cons", TypeExpr::new_forall({X}, TypeExpr::new_map(TypeExpr::new_tensor(X, Tuple), Tuple)),
|
||||
AsmOp::Custom("CONS", 2, 1));
|
||||
|
|
@ -932,6 +935,10 @@ void define_builtins() {
|
|||
AsmOp::Custom("4 TUPLE", 4, 1));
|
||||
define_builtin_func("untuple4", TypeExpr::new_forall({X, Y, Z, T}, TypeExpr::new_map(Tuple, XYZT)),
|
||||
AsmOp::Custom("4 UNTUPLE", 1, 4));
|
||||
define_builtin_func("first", TypeExpr::new_forall({X}, TypeExpr::new_map(Tuple, X)), AsmOp::Custom("FIRST", 1, 1));
|
||||
define_builtin_func("second", TypeExpr::new_forall({X}, TypeExpr::new_map(Tuple, X)), AsmOp::Custom("SECOND", 1, 1));
|
||||
define_builtin_func("third", TypeExpr::new_forall({X}, TypeExpr::new_map(Tuple, X)), AsmOp::Custom("THIRD", 1, 1));
|
||||
define_builtin_func("fourth", TypeExpr::new_forall({X}, TypeExpr::new_map(Tuple, X)), AsmOp::Custom("3 INDEX", 1, 1));
|
||||
define_builtin_func("throw", impure_un_op, compile_throw, true);
|
||||
define_builtin_func("throw_if", impure_bin_op, std::bind(compile_cond_throw, _1, _2, true), true);
|
||||
define_builtin_func("throw_unless", impure_bin_op, std::bind(compile_cond_throw, _1, _2, false), true);
|
||||
|
|
@ -947,7 +954,7 @@ void define_builtins() {
|
|||
define_builtin_func("preload_bits", prefetch_slice_op, std::bind(compile_fetch_slice, _1, _2, false));
|
||||
define_builtin_func("int_at", TypeExpr::new_map(TupleInt, Int), compile_tuple_at);
|
||||
define_builtin_func("cell_at", TypeExpr::new_map(TupleInt, Cell), compile_tuple_at);
|
||||
define_builtin_func("slice_at", TypeExpr::new_map(TupleInt, Cell), compile_tuple_at);
|
||||
define_builtin_func("slice_at", TypeExpr::new_map(TupleInt, Slice), compile_tuple_at);
|
||||
define_builtin_func("tuple_at", TypeExpr::new_map(TupleInt, Tuple), compile_tuple_at);
|
||||
define_builtin_func("at", TypeExpr::new_forall({X}, TypeExpr::new_map(TupleInt, X)), compile_tuple_at);
|
||||
define_builtin_func("touch", TypeExpr::new_forall({X}, TypeExpr::new_map(X, X)), AsmOp::Nop());
|
||||
|
|
|
|||
|
|
@ -60,21 +60,36 @@ void generate_output_func(SymDef* func_sym) {
|
|||
code.print(std::cerr, 9);
|
||||
}
|
||||
code.simplify_var_types();
|
||||
// std::cerr << "after simplify_var_types: \n"; code.print(std::cerr, 0);
|
||||
if (verbosity >= 5) {
|
||||
std::cerr << "after simplify_var_types: \n";
|
||||
code.print(std::cerr, 0);
|
||||
}
|
||||
code.prune_unreachable_code();
|
||||
// std::cerr << "after prune_unreachable: \n"; code.print(std::cerr, 0);
|
||||
if (verbosity >= 5) {
|
||||
std::cerr << "after prune_unreachable: \n";
|
||||
code.print(std::cerr, 0);
|
||||
}
|
||||
code.split_vars(true);
|
||||
// std::cerr << "after split_vars: \n"; code.print(std::cerr, 0);
|
||||
if (verbosity >= 5) {
|
||||
std::cerr << "after split_vars: \n";
|
||||
code.print(std::cerr, 0);
|
||||
}
|
||||
for (int i = 0; i < 8; i++) {
|
||||
code.compute_used_code_vars();
|
||||
if (verbosity >= 5) {
|
||||
if (verbosity >= 4) {
|
||||
std::cerr << "after compute_used_vars: \n";
|
||||
code.print(std::cerr, 6);
|
||||
}
|
||||
code.fwd_analyze();
|
||||
// std::cerr << "after fwd_analyze: \n"; code.print(std::cerr, 6);
|
||||
if (verbosity >= 5) {
|
||||
std::cerr << "after fwd_analyze: \n";
|
||||
code.print(std::cerr, 6);
|
||||
}
|
||||
code.prune_unreachable_code();
|
||||
// std::cerr << "after prune_unreachable: \n"; code.print(std::cerr, 6);
|
||||
if (verbosity >= 5) {
|
||||
std::cerr << "after prune_unreachable: \n";
|
||||
code.print(std::cerr, 6);
|
||||
}
|
||||
}
|
||||
code.mark_noreturn();
|
||||
if (verbosity >= 3) {
|
||||
|
|
|
|||
|
|
@ -397,6 +397,7 @@ inline std::ostream& operator<<(std::ostream& os, const VarDescr& vd) {
|
|||
|
||||
struct VarDescrList {
|
||||
std::vector<VarDescr> list;
|
||||
bool unreachable{false};
|
||||
VarDescrList() : list() {
|
||||
}
|
||||
VarDescrList(const std::vector<VarDescr>& _list) : list(_list) {
|
||||
|
|
@ -430,6 +431,10 @@ struct VarDescrList {
|
|||
VarDescrList operator|(const VarDescrList& y) const;
|
||||
VarDescrList& operator|=(const VarDescrList& values);
|
||||
void show(std::ostream& os) const;
|
||||
void set_unreachable() {
|
||||
list.clear();
|
||||
unreachable = true;
|
||||
}
|
||||
};
|
||||
|
||||
inline std::ostream& operator<<(std::ostream& os, const VarDescrList& values) {
|
||||
|
|
|
|||
13
crypto/func/test/w3.fc
Normal file
13
crypto/func/test/w3.fc
Normal file
|
|
@ -0,0 +1,13 @@
|
|||
() main(cs) impure {
|
||||
int i = 0;
|
||||
if (cs.slice_refs()) {
|
||||
do {
|
||||
i = i + 1;
|
||||
} until(i > 10);
|
||||
}
|
||||
set_data(begin_cell()
|
||||
.store_uint(1, 32)
|
||||
.store_uint(2, 32)
|
||||
.store_uint(i, 32)
|
||||
.end_cell());
|
||||
}
|
||||
13
crypto/func/test/w4.fc
Normal file
13
crypto/func/test/w4.fc
Normal file
|
|
@ -0,0 +1,13 @@
|
|||
_ main(cell dict, int t3) {
|
||||
int index = -1;
|
||||
do {
|
||||
(index, slice value, int found) = dict.udict_get_next?(32, index);
|
||||
if (found) {
|
||||
(int temp1, int temp2) = (value~load_uint(16), value~load_uint(32));
|
||||
if (t3 > temp2) {
|
||||
dict~udict_delete_get?(32, index);
|
||||
}
|
||||
}
|
||||
} until ( ~ found);
|
||||
return dict;
|
||||
}
|
||||
14
crypto/func/test/w5.fc
Normal file
14
crypto/func/test/w5.fc
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
(cell) recv_external(slice in_msg) impure {
|
||||
cell mydict = new_dict();
|
||||
builder r = begin_cell().store_int(10, 16);
|
||||
mydict~udict_set_builder(32, 1, r );
|
||||
int index = -1;
|
||||
do {
|
||||
(var index, var value, var found) = mydict.udict_get_next?(32, index);
|
||||
} until ( ~ found );
|
||||
return mydict;
|
||||
}
|
||||
|
||||
() recv_internal() impure {
|
||||
;; Nothing
|
||||
}
|
||||
12
crypto/func/test/w6.fc
Normal file
12
crypto/func/test/w6.fc
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
int test(int x) method_id {
|
||||
int i = 0;
|
||||
;; int f = false;
|
||||
do {
|
||||
i = i + 1;
|
||||
if (i > 5) {
|
||||
return 1;
|
||||
}
|
||||
int f = (i * i == 64);
|
||||
} until (f);
|
||||
return -1;
|
||||
}
|
||||
14
crypto/func/test/w7.fc
Normal file
14
crypto/func/test/w7.fc
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
int test(int y) {
|
||||
int x = 1;
|
||||
if (y > 0) {
|
||||
return 1;
|
||||
}
|
||||
return x > 0;
|
||||
}
|
||||
|
||||
int f(int y) {
|
||||
if (y > 0) {
|
||||
return 1;
|
||||
}
|
||||
return 2;
|
||||
}
|
||||
|
|
@ -182,3 +182,48 @@ dictnew constant special-dict
|
|||
-2 constant run_ticktock
|
||||
-3 constant split_prepare
|
||||
-4 constant split_install
|
||||
|
||||
// public key conversion
|
||||
|
||||
|
||||
// restricted wallet creation
|
||||
"auto/restricted-wallet-code.fif" include =: RWCode1
|
||||
"auto/restricted-wallet2-code.fif" include =: RWCode2
|
||||
|
||||
// pubkey amount --
|
||||
{ over ."Key " pubkey>$ type ." -> "
|
||||
RWCode1 // code
|
||||
<b 1 32 u, 3 roll 256 u, b> // data
|
||||
empty_cell // libs
|
||||
3 roll // balance
|
||||
0 // split_depth
|
||||
0 // ticktock
|
||||
2 // mode: create
|
||||
register_smc
|
||||
Masterchain 6 .Addr cr
|
||||
} : create-wallet1
|
||||
|
||||
// D x t -- D'
|
||||
{ <b rot Gram, swap rot 16 b>idict! not abort"cannot add value"
|
||||
} : rdict-entry
|
||||
// balance -- dict
|
||||
{ dictnew
|
||||
over -32768 rdict-entry
|
||||
over 3/4 */ 92 rdict-entry
|
||||
over 1/2 */ 183 rdict-entry
|
||||
swap 1/4 */ 366 rdict-entry
|
||||
0 548 rdict-entry
|
||||
} : make-rdict
|
||||
|
||||
// pubkey amount --
|
||||
{ over ."Key " pubkey>$ type ." -> "
|
||||
RWCode2 // code
|
||||
<b 1 32 u, 3 pick 256 u, 3 roll make-rdict dict, b> // data
|
||||
empty_cell // libs
|
||||
3 roll // balance
|
||||
0 // split_depth
|
||||
0 // ticktock
|
||||
2 // mode: create
|
||||
register_smc
|
||||
Masterchain 6 .Addr cr
|
||||
} : create-wallet2
|
||||
|
|
|
|||
31
crypto/smartcont/asm-to-cpp.fif
Executable file
31
crypto/smartcont/asm-to-cpp.fif
Executable file
|
|
@ -0,0 +1,31 @@
|
|||
#!/usr/bin/fift -s
|
||||
"TonUtil.fif" include
|
||||
"Asm.fif" include
|
||||
|
||||
{ ."usage: " @' $0 type ." <source> <destination> <name>" cr
|
||||
."Compiles asm from <source> file and stores serialization in a way prepared for usage from c++ to <destination> " cr 1 halt
|
||||
} : usage
|
||||
|
||||
|
||||
$# 3 - ' usage if
|
||||
|
||||
|
||||
$1 =: source
|
||||
$2 =: destination
|
||||
$3 =: name
|
||||
|
||||
."Include source from " source type cr
|
||||
source include
|
||||
|
||||
boc>B
|
||||
."Convert boc to base64" cr
|
||||
B>base64
|
||||
|
||||
{ char " chr tuck $+ $+ } : wrp
|
||||
wrp // "<code>"
|
||||
"with_tvm_code(" name wrp $+ +", " swap ");" 10 hold $+ $+ // "with_tm_code("<code>");\n"
|
||||
|
||||
$>B
|
||||
|
||||
."Store tvm code to " destination type cr
|
||||
destination B>file
|
||||
1
crypto/smartcont/auto/config-code.cpp
Normal file
1
crypto/smartcont/auto/config-code.cpp
Normal file
|
|
@ -0,0 +1 @@
|
|||
with_tvm_code("config", "te6ccgECEwEAAhQAART/APSkE/Sg8sgLAQIBIAIDAgLPBAUCAvEPEAIBIAYHAgEgDA0CASAICQIBIAoLAOkAdDTA/pAMCD6RAGkA3GwE7EjxwCxkl8D4ALTH9M/IoIQTlZTVLqOPTIB1NFx+DMgbpIwf5TQ1wv/4gNwBLqbMiHwAiH4I7wCvLCRAuKdgCRY8AGCEO52T0vwBOAxghDudk9v8AXgECRfBCDAAAGDHrCx8qWAAJTtRNDUUDOAIPQVyMwBzxbJ7VSAAMzQ0wcBwBHyidMf0x/TD9MPMCDCAPKJvvKJgACscIAYyMsFUAXPFhTLbssfyz/JAfsAgAgEgDg4AW0cfgz0NcL//gjghBOQ29kcIIAxP/IyxAUy/+DHfoCE8tqEssfyz8BzxbJcPsAgACSAQPADgAK0MO1E0NSAIIAkUzH0aiBukxAjW444INAg10nCJ44p0wfXCx8BwBH4IxK+sI4VAYAiVBBE9G5UUyH0bjCAJEAT9FowkxAjW+KUEDRfA+LiyMwBzxbJ7VSABASARAf6DCNcYINMf0x/TH/gjErnyY+1E0NTTH9P/0VFBuvKhBfkBVBBj+RDyovgAIoIQQ2ZQIbqcMgHTH9TRQBSAIPQVjjcighBOQ29kupYyAdTR+wSOJCKCEFBiSyG6lTEx0//RjhMighBOQ+8FupQyAfAGlDAB8mDi4uIC4gGkyBLMEgAOyx/L/8ntVA==");
|
||||
323
crypto/smartcont/auto/config-code.fif
Normal file
323
crypto/smartcont/auto/config-code.fif
Normal file
|
|
@ -0,0 +1,323 @@
|
|||
// automatically generated from `smartcont/stdlib.fc` `smartcont/config-code.fc`
|
||||
PROGRAM{
|
||||
DECLPROC set_conf_param
|
||||
DECLPROC check_validator_set
|
||||
DECLPROC send_answer
|
||||
DECLPROC send_confirmation
|
||||
DECLPROC send_error
|
||||
DECLPROC recv_internal
|
||||
DECLPROC change_elector_code
|
||||
DECLPROC recv_external
|
||||
DECLPROC run_ticktock
|
||||
set_conf_param PROC:<{
|
||||
// index value
|
||||
c4 PUSH // index value _3
|
||||
CTOS // index value cs
|
||||
LDREF // index value cfg_dict cs
|
||||
s3 s3 XCHG2
|
||||
32 PUSHINT // cs value index cfg_dict _9=32
|
||||
DICTISETREF // cs cfg_dict
|
||||
NEWC // cs cfg_dict _11
|
||||
STREF // cs _12
|
||||
SWAP // _12 cs
|
||||
STSLICER // _13
|
||||
ENDC // _14
|
||||
c4 POP
|
||||
}>
|
||||
check_validator_set PROC:<{
|
||||
// vset
|
||||
CTOS // cs
|
||||
8 LDU // _4 cs
|
||||
SWAP // cs _4
|
||||
17 EQINT // cs _8
|
||||
9 THROWIFNOT
|
||||
32 LDU // utime_since cs
|
||||
32 LDU // utime_since utime_until cs
|
||||
16 LDU // utime_since utime_until total cs
|
||||
16 LDU // utime_since utime_until total _42 _41
|
||||
DROP // utime_since utime_until total main
|
||||
DUP // utime_since utime_until total main main
|
||||
0 GTINT // utime_since utime_until total main _28
|
||||
9 THROWIFNOT
|
||||
GEQ // utime_since utime_until _31
|
||||
9 THROWIFNOT
|
||||
}>
|
||||
send_answer PROC:<{
|
||||
// addr query_id ans_tag mode
|
||||
0 PUSHINT // addr query_id ans_tag mode _4=0
|
||||
24 PUSHINT // addr query_id ans_tag mode _4=0 _5=24
|
||||
NEWC // addr query_id ans_tag mode _4=0 _5=24 _6
|
||||
6 STU // addr query_id ans_tag mode _4=0 _8
|
||||
s0 s5 XCHG2 // _4=0 query_id ans_tag mode _8 addr
|
||||
STSLICER // _4=0 query_id ans_tag mode _9
|
||||
s1 s4 XCHG // mode query_id ans_tag _4=0 _9
|
||||
111 STU // mode query_id ans_tag _23
|
||||
32 STU // mode query_id _25
|
||||
64 STU // mode _27
|
||||
ENDC // mode _28
|
||||
SWAP // _28 mode
|
||||
SENDRAWMSG
|
||||
}>
|
||||
send_confirmation PROC:<{
|
||||
// addr query_id ans_tag
|
||||
64 PUSHINT // addr query_id ans_tag _3=64
|
||||
send_answer CALLDICT
|
||||
}>
|
||||
send_error PROC:<{
|
||||
// addr query_id ans_tag
|
||||
64 PUSHINT // addr query_id ans_tag _3=64
|
||||
send_answer CALLDICT
|
||||
}>
|
||||
recv_internal PROC:<{
|
||||
// in_msg_cell in_msg
|
||||
SWAP // in_msg in_msg_cell
|
||||
CTOS // in_msg cs
|
||||
4 LDU // in_msg flags cs
|
||||
LDMSGADDR // in_msg flags _74 _73
|
||||
DROP // in_msg flags s_addr
|
||||
DUP // in_msg flags s_addr s_addr
|
||||
REWRITESTDADDR // in_msg flags s_addr src_wc src_addr
|
||||
SWAP // in_msg flags s_addr src_addr src_wc
|
||||
INC // in_msg flags s_addr src_addr _15
|
||||
s0 s3 XCHG
|
||||
1 PUSHINT // in_msg _15 s_addr src_addr flags _16=1
|
||||
AND // in_msg _15 s_addr src_addr _17
|
||||
s1 s3 XCHG // in_msg src_addr s_addr _15 _17
|
||||
OR // in_msg src_addr s_addr _18
|
||||
s3 PUSH // in_msg src_addr s_addr _18 in_msg
|
||||
SEMPTY // in_msg src_addr s_addr _18 _19
|
||||
OR // in_msg src_addr s_addr _20
|
||||
IFJMP:<{ // in_msg src_addr s_addr
|
||||
3 BLKDROP //
|
||||
}> // in_msg src_addr s_addr
|
||||
s0 s2 XCHG // s_addr src_addr in_msg
|
||||
32 LDU // s_addr src_addr tag in_msg
|
||||
64 LDU // s_addr src_addr tag query_id in_msg
|
||||
s2 PUSH
|
||||
1314280276 PUSHINT // s_addr src_addr tag query_id in_msg tag _29=1314280276
|
||||
EQUAL // s_addr src_addr tag query_id in_msg _30
|
||||
IFJMP:<{ // s_addr src_addr tag query_id in_msg
|
||||
s2 POP // s_addr src_addr in_msg query_id
|
||||
SWAP // s_addr src_addr query_id in_msg
|
||||
LDREF // s_addr src_addr query_id vset in_msg
|
||||
ENDS
|
||||
1 PUSHINT // s_addr src_addr query_id vset _36=1
|
||||
CONFIGOPTPARAM // s_addr src_addr query_id vset elector_param
|
||||
DUP // s_addr src_addr query_id vset elector_param elector_param
|
||||
ISNULL // s_addr src_addr query_id vset elector_param _39
|
||||
IF:<{ // s_addr src_addr query_id vset elector_param
|
||||
DROP // s_addr src_addr query_id vset
|
||||
-1 PUSHINT // s_addr src_addr query_id vset _40=-1
|
||||
}>ELSE<{ // s_addr src_addr query_id vset elector_param
|
||||
CTOS // s_addr src_addr query_id vset _42
|
||||
256 PLDU // s_addr src_addr query_id vset _40
|
||||
}> // s_addr src_addr query_id vset elector_addr
|
||||
s0 s3 XCHG
|
||||
FALSE
|
||||
s0 s4 XCHG // s_addr ok query_id vset src_addr elector_addr
|
||||
EQUAL // s_addr ok query_id vset _47
|
||||
IF:<{ // s_addr ok query_id vset
|
||||
s2 POP // s_addr vset query_id
|
||||
OVER // s_addr vset query_id vset
|
||||
check_validator_set CALLDICT // s_addr vset query_id t_since t_until
|
||||
OVER
|
||||
NOW // s_addr vset query_id t_since t_until t_since t
|
||||
GREATER // s_addr vset query_id t_since t_until _53
|
||||
s0 s2 XCHG // s_addr vset query_id _53 t_until t_since
|
||||
GREATER // s_addr vset query_id _53 _54
|
||||
AND // s_addr vset query_id ok
|
||||
}>ELSE<{
|
||||
s0 s2 XCHG // s_addr vset query_id ok
|
||||
}>
|
||||
IFJMP:<{ // s_addr vset query_id
|
||||
36 PUSHINT // s_addr vset query_id _56=36
|
||||
ROT // s_addr query_id _56=36 vset
|
||||
set_conf_param CALLDICT
|
||||
4000730955 PUSHINT // s_addr query_id _58=4000730955
|
||||
send_confirmation CALLDICT
|
||||
}> // s_addr vset query_id
|
||||
NIP // s_addr query_id
|
||||
4000730991 PUSHINT // s_addr query_id _60=4000730991
|
||||
send_error CALLDICT
|
||||
}> // s_addr src_addr tag query_id in_msg
|
||||
s2 s4 XCHG
|
||||
4 BLKDROP // tag
|
||||
DUP // tag tag
|
||||
0 EQINT // tag _64
|
||||
SWAP
|
||||
31 PUSHPOW2 // _64 tag _67
|
||||
AND // _64 _68
|
||||
OR // _69
|
||||
37 THROWIFNOT
|
||||
}>
|
||||
change_elector_code PROC:<{
|
||||
// cs
|
||||
1 PUSHINT // cs _2=1
|
||||
CONFIGOPTPARAM // cs _3
|
||||
CTOS // cs _4
|
||||
256 PLDU // cs dest_addr
|
||||
NOW // cs dest_addr query_id
|
||||
1313042276 PUSHINT // cs dest_addr query_id _9=1313042276
|
||||
0 PUSHINT // cs dest_addr query_id _9=1313042276 _10=0
|
||||
50431 PUSHINT // cs dest_addr query_id _9=1313042276 _10=0 _11=50431
|
||||
NEWC // cs dest_addr query_id _9=1313042276 _10=0 _11=50431 _12
|
||||
17 STU // cs dest_addr query_id _9=1313042276 _10=0 _14
|
||||
s1 s4 XCHG // cs _10=0 query_id _9=1313042276 dest_addr _14
|
||||
256 STU // cs _10=0 query_id _9=1313042276 _16
|
||||
30 PUSHPOW2 // cs _10=0 query_id _9=1313042276 _16 _19
|
||||
STGRAMS // cs _10=0 query_id _9=1313042276 _20
|
||||
s1 s3 XCHG // cs _9=1313042276 query_id _10=0 _20
|
||||
107 STU // cs _9=1313042276 query_id _34
|
||||
s1 s2 XCHG // cs query_id _9=1313042276 _34
|
||||
32 STU // cs query_id _36
|
||||
64 STU // cs _38
|
||||
SWAP // _38 cs
|
||||
STSLICER // _39
|
||||
ENDC // _40
|
||||
0 PUSHINT // _40 _41=0
|
||||
SENDRAWMSG
|
||||
}>
|
||||
recv_external PROC:<{
|
||||
// in_msg
|
||||
9 PUSHPOW2 // in_msg _3=512
|
||||
LDSLICEX // signature in_msg
|
||||
DUP // signature in_msg cs
|
||||
32 LDU // signature in_msg action cs
|
||||
32 LDU // signature in_msg action msg_seqno cs
|
||||
32 LDU // signature in_msg action msg_seqno valid_until cs
|
||||
NOW // signature in_msg action msg_seqno valid_until cs _19
|
||||
s1 s2 XCHG // signature in_msg action msg_seqno cs valid_until _19
|
||||
LESS // signature in_msg action msg_seqno cs _20
|
||||
35 THROWIF
|
||||
c4 PUSH // signature in_msg action msg_seqno cs _23
|
||||
CTOS // signature in_msg action msg_seqno cs cs2
|
||||
LDREF // signature in_msg action msg_seqno cs cfg_dict cs2
|
||||
32 LDU // signature in_msg action msg_seqno cs cfg_dict stored_seqno cs2
|
||||
256 LDU // signature in_msg action msg_seqno cs cfg_dict stored_seqno public_key cs2
|
||||
ENDS
|
||||
s4 s1 XCPU // signature in_msg action public_key cs cfg_dict stored_seqno msg_seqno stored_seqno
|
||||
EQUAL // signature in_msg action public_key cs cfg_dict stored_seqno _38
|
||||
33 THROWIFNOT
|
||||
s0 s5 XCHG // signature stored_seqno action public_key cs cfg_dict in_msg
|
||||
HASHSU // signature stored_seqno action public_key cs cfg_dict _41
|
||||
s0 s6 s3 XC2PU // cfg_dict stored_seqno action public_key cs _41 signature public_key
|
||||
CHKSIGNU // cfg_dict stored_seqno action public_key cs _42
|
||||
34 THROWIFNOT
|
||||
ACCEPT
|
||||
s2 PUSH
|
||||
1130778657 PUSHINT // cfg_dict stored_seqno action public_key cs action _45=1130778657
|
||||
EQUAL // cfg_dict stored_seqno action public_key cs _46
|
||||
IF:<{ // cfg_dict stored_seqno action public_key cs
|
||||
s2 POP // cfg_dict stored_seqno cs public_key
|
||||
SWAP // cfg_dict stored_seqno public_key cs
|
||||
32 LDU // cfg_dict stored_seqno public_key param_index cs
|
||||
LDREF // cfg_dict stored_seqno public_key param_index param_value cs
|
||||
ENDS
|
||||
s0 s1 s4 XCHG3
|
||||
32 PUSHINT // public_key stored_seqno param_value param_index cfg_dict _56=32
|
||||
DICTISETREF // public_key stored_seqno cfg_dict
|
||||
}>ELSE<{ // cfg_dict stored_seqno action public_key cs
|
||||
s2 PUSH
|
||||
1313042276 PUSHINT // cfg_dict stored_seqno action public_key cs action _58=1313042276
|
||||
EQUAL // cfg_dict stored_seqno action public_key cs _59
|
||||
IF:<{ // cfg_dict stored_seqno action public_key cs
|
||||
s2 POP // cfg_dict stored_seqno cs public_key
|
||||
SWAP // cfg_dict stored_seqno public_key cs
|
||||
LDREF // cfg_dict stored_seqno public_key new_code cs
|
||||
ENDS
|
||||
SETCODE
|
||||
}>ELSE<{ // cfg_dict stored_seqno action public_key cs
|
||||
s2 PUSH
|
||||
1348619041 PUSHINT // cfg_dict stored_seqno action public_key cs action _65=1348619041
|
||||
EQUAL // cfg_dict stored_seqno action public_key cs _66
|
||||
IF:<{ // cfg_dict stored_seqno action public_key cs
|
||||
NIP
|
||||
NIP // cfg_dict stored_seqno cs
|
||||
256 LDU // cfg_dict stored_seqno public_key cs
|
||||
ENDS
|
||||
}>ELSE<{ // cfg_dict stored_seqno action public_key cs
|
||||
s2 PUSH
|
||||
1313074949 PUSHINT // cfg_dict stored_seqno action public_key cs action _71=1313074949
|
||||
EQUAL // cfg_dict stored_seqno action public_key cs _72
|
||||
IF:<{ // cfg_dict stored_seqno action public_key cs
|
||||
s2 POP // cfg_dict stored_seqno cs public_key
|
||||
SWAP // cfg_dict stored_seqno public_key cs
|
||||
change_elector_code CALLDICT
|
||||
}>ELSE<{ // cfg_dict stored_seqno action public_key cs
|
||||
DROP // cfg_dict stored_seqno action public_key
|
||||
SWAP // cfg_dict stored_seqno public_key action
|
||||
32 THROWIF
|
||||
}>
|
||||
}>
|
||||
}>
|
||||
s0 s2 XCHG // public_key stored_seqno cfg_dict
|
||||
}>
|
||||
SWAP // public_key cfg_dict stored_seqno
|
||||
INC // public_key cfg_dict _77
|
||||
NEWC // public_key cfg_dict _77 _78
|
||||
s1 s2 XCHG // public_key _77 cfg_dict _78
|
||||
STREF // public_key _77 _79
|
||||
32 STU // public_key _81
|
||||
256 STU // _83
|
||||
ENDC // _84
|
||||
c4 POP
|
||||
}>
|
||||
run_ticktock PROC:<{
|
||||
// is_tock
|
||||
DROP //
|
||||
c4 PUSH // _2
|
||||
CTOS // cs
|
||||
LDREF // cfg_dict cs
|
||||
32 PUSHINT // cfg_dict cs kl=32
|
||||
36 PUSHINT // cfg_dict cs kl=32 _10=36
|
||||
s3 s1 PUSH2 // cfg_dict cs kl=32 _10=36 cfg_dict kl=32
|
||||
DICTIGETOPTREF // cfg_dict cs kl=32 next_vset
|
||||
DUP // cfg_dict cs kl=32 next_vset next_vset
|
||||
ISNULL // cfg_dict cs kl=32 next_vset _12
|
||||
IFNOT:<{ // cfg_dict cs kl=32 next_vset
|
||||
DUP // cfg_dict cs kl=32 next_vset next_vset
|
||||
CTOS // cfg_dict cs kl=32 next_vset ds
|
||||
DUP // cfg_dict cs kl=32 next_vset ds ds
|
||||
SBITS // cfg_dict cs kl=32 next_vset ds _15
|
||||
39 GTINT // cfg_dict cs kl=32 next_vset ds _17
|
||||
IF:<{ // cfg_dict cs kl=32 next_vset ds
|
||||
8 LDU // cfg_dict cs kl=32 next_vset tag ds
|
||||
32 PLDU // cfg_dict cs kl=32 next_vset tag since
|
||||
SWAP // cfg_dict cs kl=32 next_vset since tag
|
||||
17 EQINT // cfg_dict cs kl=32 next_vset since _26
|
||||
NOW // cfg_dict cs kl=32 next_vset since _26 _27
|
||||
s1 s2 XCHG // cfg_dict cs kl=32 next_vset _26 since _27
|
||||
GEQ // cfg_dict cs kl=32 next_vset _26 _28
|
||||
AND // cfg_dict cs kl=32 next_vset _29
|
||||
IF:<{ // cfg_dict cs kl=32 next_vset
|
||||
SWAP
|
||||
34 PUSHINT
|
||||
s0 s4 s4 XC2PU // kl=32 cs next_vset _32=34 cfg_dict kl=32
|
||||
DICTISETGETOPTREF // kl=32 cs cfg_dict cur_vset
|
||||
s3 s1 s0 PUXCPU // kl=32 cs cur_vset _35=32 cfg_dict kl=32
|
||||
DICTISETGETOPTREF // kl=32 cs _51 _52
|
||||
DROP // kl=32 cs cfg_dict
|
||||
36 PUSHINT // kl=32 cs cfg_dict _38=36
|
||||
s0 s1 s3 XCHG3 // cs _38=36 cfg_dict kl=32
|
||||
DICTIDEL // cs _53 _54
|
||||
DROP // cs cfg_dict
|
||||
}>ELSE<{
|
||||
s2 s3 XCHG
|
||||
2DROP // cs cfg_dict
|
||||
}>
|
||||
}>ELSE<{
|
||||
s3 s4 XCHG
|
||||
3 BLKDROP // cs cfg_dict
|
||||
}>
|
||||
}>ELSE<{
|
||||
s2 s3 XCHG
|
||||
2DROP // cs cfg_dict
|
||||
}>
|
||||
NEWC // cs cfg_dict _40
|
||||
STREF // cs _41
|
||||
SWAP // _41 cs
|
||||
STSLICER // _42
|
||||
ENDC // _43
|
||||
c4 POP
|
||||
}>
|
||||
}END>c
|
||||
1
crypto/smartcont/auto/elector-code.cpp
Normal file
1
crypto/smartcont/auto/elector-code.cpp
Normal file
|
|
@ -0,0 +1 @@
|
|||
with_tvm_code("elector-code", "te6ccgECVAEACrkAART/APSkE/Sg8sgLAQIBIAIDAgFIBAUAUaX//xh2omh6AnoCETdKrPgN+SBOKjgQ+At5ICz4DPkgcXgL+SB4DRhAAgLFBgcCASAKCwIBywgJACyqgjGCEE5Db2SCEM5Db2RwQzCAQPAGAgEgEBECASAzNAIDeqAMDQIBbg4PACSqB+1E0PQFIG6SMHCU0NcLH+IAQqss7UTQ9AUgbpJbcODwAxAmXwaDB/QOb6GT+gAwkjBw4gBzsKV7UTQ9AUgbpIwbeDwAxAmXwZthP+OHiKDB/R+b6FvoSCcAvoAMFIQbwJQA28Cklow4gGzEuYwMYAAzs+A7UTQ9AQx9AQwgwf0Dm+hk/oAMJIwcOKACASASEwIBICMkAgEgFBUCASAdHgIBIBYXAgEgGxwBASAYACE7UTQ9AT0BPQE+gDTH9P/0YAL8AdDTAwFxsJJfA+D6QDAhxwCUMQHwEOAB0x8hwACUWwHwEODTPyKCEE5zdEu6lTIQI/AL4DQhghBHZXQkupMT8BHgIYIQTkNvZLqOGVRSRPASloIQzkNvZJKEH+JwEDRDMIBA8AbgIYIQ7nZPS7oighDudk9vulIQsYrgMDMgGRoADDIQIwHwDwAkgx6wm4QfcBA0QzCAQPAG4V8DACkyBb0ABT0ABL0AAH6Assfy//J7VSAAITQ0x/TH/oA+gD0BNIA0gDRgAgEgHyACASAhIgArMgXyx8Vyx9QA/oCAfoC9ADKAMoAyYAAdIAP+DPQ0h/SH9If1wofgAEUcIAYyMsFUAfPFlj6AhXLahPLH8s/IcL/kssfkTHiyQH7AIAAbIIQ7m9FTHBDMIBA8AaACASAlJgIBIC0uAgEgJygCASApKgAjIIQ83RITIIQO5rKAEMwcvAGgAEcghBOVlNUcIIAxP/IyxAVy/+DHfoCFMtqE8sfEss/zMlx+wCAAMxTEoMH9A5voZT6ADCgkTDiyAH6AgKDB/RDgAQEgKwH+I/pE7UTQ9AQhbgSkFLGXEDVfBXDwB+AE0//TH9Mf0//UAdCDCNcZAdGCEGVMUHTIyx9SQMsfUjDLH1Jgy/9SIMv/ydBRFfkRlxBoXwhx8AfhIYMPuZcQaF8IdvAH4AfwAzEF/iANghA7msoAoSCqCyO5mBC8XwwxcvAH4FEioCwA/lF9vZcQrF8Mc/AH4ASXEJtfC3DwB+BTY4MH9A5voSCfMPoAWaAB0z8x0/8wUoC9kTHilxCbXwt08AfgUwG5lxCbXwt18AfgIPKs+AD4I8hY+gLLHxTLHxbL/xjL/0A3gwf0Q3AQVxA0ECMQJnDwBMj0AAHPFsntVCCTcPAI4FsCASAvMAIBIDEyAHkcCB/jjAkgwf0fG+hb6EgjhwC0//TPzH6ANIA0ZQxUTOgl1QYiPAKBwPiUEOgk1BCMOIBsxPmMDMBuvK7gAKEcFMAf447JoMH9HxvoW+hII4nAtP/0z8x+gDSANGUMVEzoI4RVHcIqYRRZqBSF6BLsPAKCQPiUFOgk1BSMOIBsxTmMDUDulMhu7DyuxKgAaGAAVwBgCD0Zm+hkjBw4dM/MdP/MfQE+gD6APQEMdEgwgCUEDTwDZUwECPwDOISgAKMMgL6RHD4M9DXC//tRND0BASkWr2xIW6xkl8E4PADBV8FUhW9BLMUsZJfA+D4AAGRW44d9AT0BPoAQzTwDnDIygAT9AD0AFmg+gIBzxbJ7VTigAgEgNTYCAUhOTwIBIDc4AgEgPT4CASA5OgIBIDs8AKU8AEH+kQBpLEhwACxlwWgVRMB8ALgUwKAIPQOb6GOJ9M/0//0BPoA+gALoMgVyz8Ty//0AAH6AgH6AlAGzxYBgCBURkT0Q5QwBaAB4hA1QUPwAoADZDEh+kQBpJ8wghD////+cBA0E4BA8Abg7UTQ9AT0BFAzgwf0Zm+hjhBfBIIQ/////nAQNBOAQPAG4TYF+gDRyBL0ABX0AAHPFsntVIIQ+W9zJHCAGMjLBVAEzxZQBPoCEstqEssfyz/JgED7AIABpHD4MyBuk18EcODQ1wv/I/pEAaQCvbGTXwNw4PgAAdQh+wQgxwCSXwSZAe1TAfEGgvIA4n+AAAxwgAgEgP0ACASBJSgA1HACjhMCbyIhbxACbxEkqKsPErYIEqBY5DAxgAQEgQQP+gBD4M9DTD9MPMdMP0XG2CXBtf45GKYMH9HxvoW+hII4wAvoA0x/TH9P/0//RA6PIFct/FMofUkDL/8nQURq2CMjLHxPL/8v/QBSBAaD0QQOklBA0WjDiAbNDMOYwNFi2CFMBuZZfB21tcCDgbYrmMzSlXJJvEeRwIIrmMjI0NEJDRABqA4EBoPSSb6FvoSCOIAHTf1EZtggB0x8x1wv/A9Mf0/8x1wv/QTAUbwRQBW8Ck0YWW+IEsxQASgJvIgFvEASkU0i+jhBUZQbwFFMCvJMyMiKSEzDik1A0MOJTNr4BXiLAAFJDuRKxll8EbW1wIOAg/iAipZJvEeRvEG8QcCBtbYrmMzMzNVIUuvKxECMBRQL+BW8iAW8kUxyDB/QOb6HyvfoAMdM/MdcL/1OLuY5XUTmoqw9SQLYIUUShJKo7LakEUYWgghCOgSeKI5KAc5KAU+LIywfLH1JAy/9SkMs/I5MTy/+TUAMw4gGAEFRKmfRDcCTIy/8Zyz9QBfoCF8oAQBmDB/RDlgoQRgNfA+IjikZHAAhLc/AKARiK4gOkKW4QShBGREBIAAZLc1sBASBLAa08AGAIvgz+QBTAbqTXwdw4CKOL1MkgCD0Dm+hjh/THzEg0x/T/zBQBLryufgjUAOgyMsfWM8WQASAIPRDlBUTXwPik0QUW+J/iuYgbpIwcJDiUAPwAn+BNAf4B8AM0+CMluZNfCHDgcPgzbpRfCPAT4IAR+DPQ+gD6APoA0x/RU2G5lF8M8BPgBJRfC/AT4AaTXwpw4BA4KFEyUHfwFSDAACCzKgYQWhBJEDhMzPAEIo4TMjIyMjLIEvQA9AABzxbJ7VTwE+HwBTL4IwGgpsQotgmAEPgz0IAQTADI1yHXCw9SYLYIUxOggBHIywdSMMsfyx8Xyw8Wyw8J0BnPFslw+DPQ1wv/UxjwCQn0BHAL+QBQY6ApoMjLHxnLH8v/FfQAUAP6AnD6AhbKAEA0gCD0Q8gT9AD0APQAAc8Wye1UfwCkIYAg9HxvoW+hII4/AtM/0/9TF7qOLTQD9AT6APoAKKsCUZmhUCmgyBXLPxbL/xL0AAH6AgH6AljPFgGAIFRBRPRDcJYQNRA0XwPik0MDMOKzEgIBIFBRAgEgUlMAGQhbpJbcJUB+QABuuKAAlQB8AMFXwWTXwNw4QL0BFExgCD0Dm+hk18EcOGAQNch1wv/gCL4MyHwGIAk+DNY8BixjhNwyMoAEvQA9AABzxbJ7VTwFzB/4F8DcIACTPABf44+JIAg9HxvoW+hII4kAtMfMPgju1MUvbCOETFUFUTwDhSgVHYTVHNY8AJwlEYVUETilhA3FkUFMOKzECYQRRTmBl8GbrOAA4QxgCT4M26SW3Dhcfgz0NcL//go+kQBpAK9sZJbcOCAIvgzIG6TXwNw4PAFMDIC0IAo1yHXCx/4I1EToVy5k18GcOBcocE8kTGRMOKAEfgz0PoAMAOg/iBSAqFwbXAQRRA0cPAEyPQA9AABzxbJ7VR/g");
|
||||
1712
crypto/smartcont/auto/elector-code.fif
Normal file
1712
crypto/smartcont/auto/elector-code.fif
Normal file
File diff suppressed because it is too large
Load diff
1
crypto/smartcont/auto/highload-wallet-code.cpp
Normal file
1
crypto/smartcont/auto/highload-wallet-code.cpp
Normal file
|
|
@ -0,0 +1 @@
|
|||
with_tvm_code("highload-wallet", "te6ccgEBBgEAhgABFP8A9KQT9KDyyAsBAgEgAgMCAUgEBQC88oMI1xgg0x/TH9Mf+CMTu/Jj7UTQ0x/TH9P/0VEyuvKhUUS68qIE+QFUEFX5EPKj9ATR+AB/jhghgBD0eG+hb6EgmALTB9QwAfsAkTLiAbPmWwGkyMsfyx/L/8ntVAAE0DAAEaCZL9qJoa4WPw==");
|
||||
79
crypto/smartcont/auto/highload-wallet-code.fif
Normal file
79
crypto/smartcont/auto/highload-wallet-code.fif
Normal file
|
|
@ -0,0 +1,79 @@
|
|||
// automatically generated from `smartcont/stdlib.fc` `smartcont/highload-wallet-code.fc`
|
||||
PROGRAM{
|
||||
DECLPROC recv_internal
|
||||
DECLPROC recv_external
|
||||
85143 DECLMETHOD seqno
|
||||
recv_internal PROC:<{
|
||||
// in_msg
|
||||
DROP //
|
||||
}>
|
||||
recv_external PROC:<{
|
||||
// in_msg
|
||||
9 PUSHPOW2 // in_msg _3=512
|
||||
LDSLICEX // signature in_msg
|
||||
DUP // signature in_msg cs
|
||||
32 LDU // signature in_msg _9 cs
|
||||
32 LDU // signature in_msg _9 _12 cs
|
||||
32 LDU // signature in_msg subwallet_id valid_until msg_seqno cs
|
||||
NOW // signature in_msg subwallet_id valid_until msg_seqno cs _19
|
||||
s1 s3 XCHG // signature in_msg subwallet_id cs msg_seqno valid_until _19
|
||||
LEQ // signature in_msg subwallet_id cs msg_seqno _20
|
||||
35 THROWIF
|
||||
c4 PUSH // signature in_msg subwallet_id cs msg_seqno _23
|
||||
CTOS // signature in_msg subwallet_id cs msg_seqno ds
|
||||
32 LDU // signature in_msg subwallet_id cs msg_seqno _28 ds
|
||||
32 LDU // signature in_msg subwallet_id cs msg_seqno _28 _31 ds
|
||||
256 LDU // signature in_msg subwallet_id cs msg_seqno stored_seqno stored_subwallet public_key ds
|
||||
ENDS
|
||||
s3 s2 XCPU // signature in_msg subwallet_id cs public_key stored_seqno stored_subwallet msg_seqno stored_seqno
|
||||
EQUAL // signature in_msg subwallet_id cs public_key stored_seqno stored_subwallet _39
|
||||
33 THROWIFNOT
|
||||
s4 s4 XCPU // signature in_msg stored_subwallet cs public_key stored_seqno subwallet_id stored_subwallet
|
||||
EQUAL // signature in_msg stored_subwallet cs public_key stored_seqno _42
|
||||
34 THROWIFNOT
|
||||
s0 s4 XCHG // signature stored_seqno stored_subwallet cs public_key in_msg
|
||||
HASHSU // signature stored_seqno stored_subwallet cs public_key _45
|
||||
s0 s5 s5 XC2PU // public_key stored_seqno stored_subwallet cs _45 signature public_key
|
||||
CHKSIGNU // public_key stored_seqno stored_subwallet cs _46
|
||||
35 THROWIFNOT
|
||||
LDDICT // public_key stored_seqno stored_subwallet dict cs
|
||||
ENDS
|
||||
ACCEPT
|
||||
-1 PUSHINT // public_key stored_seqno stored_subwallet dict i=-1
|
||||
UNTIL:<{
|
||||
OVER
|
||||
16 PUSHINT // public_key stored_seqno stored_subwallet dict i dict _57=16
|
||||
DICTIGETNEXT
|
||||
NULLSWAPIFNOT
|
||||
NULLSWAPIFNOT // public_key stored_seqno stored_subwallet dict cs i f
|
||||
DUP // public_key stored_seqno stored_subwallet dict cs i f f
|
||||
IF:<{ // public_key stored_seqno stored_subwallet dict cs i f
|
||||
s0 s2 XCHG // public_key stored_seqno stored_subwallet dict f i cs
|
||||
8 LDU // public_key stored_seqno stored_subwallet dict f i mode cs
|
||||
LDREF // public_key stored_seqno stored_subwallet dict f i mode _100 _99
|
||||
DROP // public_key stored_seqno stored_subwallet dict f i mode _63
|
||||
SWAP // public_key stored_seqno stored_subwallet dict f i _63 mode
|
||||
SENDRAWMSG
|
||||
}>ELSE<{
|
||||
s2 POP // public_key stored_seqno stored_subwallet dict f i
|
||||
}>
|
||||
SWAP // public_key stored_seqno stored_subwallet dict i f
|
||||
NOT // public_key stored_seqno stored_subwallet dict i _66
|
||||
}> // public_key stored_seqno stored_subwallet dict i
|
||||
2DROP // public_key stored_seqno stored_subwallet
|
||||
SWAP // public_key stored_subwallet stored_seqno
|
||||
INC // public_key stored_subwallet _68
|
||||
NEWC // public_key stored_subwallet _68 _69
|
||||
32 STU // public_key stored_subwallet _71
|
||||
32 STU // public_key _73
|
||||
256 STU // _75
|
||||
ENDC // _76
|
||||
c4 POP
|
||||
}>
|
||||
seqno PROC:<{
|
||||
//
|
||||
c4 PUSH // _0
|
||||
CTOS // _1
|
||||
32 PLDU // _3
|
||||
}>
|
||||
}END>c
|
||||
1
crypto/smartcont/auto/highload-wallet-v2-code.cpp
Normal file
1
crypto/smartcont/auto/highload-wallet-v2-code.cpp
Normal file
|
|
@ -0,0 +1 @@
|
|||
with_tvm_code("highoad-wallet-v2", "te6ccgEBBwEA1wABFP8A9KQT9KDyyAsBAgEgAgMCAUgEBQHu8oMI1xgg0x/TP/gjqh9TILnyY+1E0NMf0z/T//QE0VNggED0Dm+hMfJgUXO68qIH+QFUEIf5EPKjAvQE0fgAf44YIYAQ9HhvoW+hIJgC0wfUMAH7AJEy4gGz5luDJaHIQDSAQPRDiuYxyBLLHxPLP8v/9ADJ7VQGAATQMABBoZfl2omhpj5jpn+n/mPoCaKkQQCB6BzfQmMktv8ld0fFADoggED0lm+hb6EyURCUMFMDud4gkjM2k0MTW+IBsw==");
|
||||
134
crypto/smartcont/auto/highload-wallet-v2-code.fif
Normal file
134
crypto/smartcont/auto/highload-wallet-v2-code.fif
Normal file
|
|
@ -0,0 +1,134 @@
|
|||
// automatically generated from `smartcont/stdlib.fc` `smartcont/highload-wallet-v2-code.fc`
|
||||
PROGRAM{
|
||||
DECLPROC recv_internal
|
||||
DECLPROC recv_external
|
||||
117746 DECLMETHOD processed?
|
||||
recv_internal PROC:<{
|
||||
// in_msg
|
||||
DROP //
|
||||
}>
|
||||
recv_external PROC:<{
|
||||
// in_msg
|
||||
9 PUSHPOW2 // in_msg _3=512
|
||||
LDSLICEX // signature in_msg
|
||||
DUP // signature in_msg cs
|
||||
32 LDU // signature in_msg _8 cs
|
||||
64 LDU // signature in_msg subwallet_id query_id cs
|
||||
NOW // signature in_msg subwallet_id query_id cs _15
|
||||
32 LSHIFT# // signature in_msg subwallet_id query_id cs bound
|
||||
s2 s0 PUSH2 // signature in_msg subwallet_id query_id cs bound query_id bound
|
||||
LESS // signature in_msg subwallet_id query_id cs bound _19
|
||||
35 THROWIF
|
||||
c4 PUSH // signature in_msg subwallet_id query_id cs bound _22
|
||||
CTOS // signature in_msg subwallet_id query_id cs bound ds
|
||||
32 LDU // signature in_msg subwallet_id query_id cs bound _28 ds
|
||||
64 LDU // signature in_msg subwallet_id query_id cs bound _28 _31 ds
|
||||
256 LDU // signature in_msg subwallet_id query_id cs bound _28 _31 _34 ds
|
||||
LDDICT // signature in_msg subwallet_id query_id cs bound stored_subwallet last_cleaned public_key old_queries ds
|
||||
ENDS
|
||||
s6 s0 PUSH2
|
||||
64 PUSHINT // signature in_msg subwallet_id query_id cs bound stored_subwallet last_cleaned public_key old_queries query_id old_queries _42=64
|
||||
DICTUGET
|
||||
NULLSWAPIFNOT // signature in_msg subwallet_id query_id cs bound stored_subwallet last_cleaned public_key old_queries _115 _116
|
||||
NIP // signature in_msg subwallet_id query_id cs bound stored_subwallet last_cleaned public_key old_queries found?
|
||||
32 THROWIF
|
||||
s7 s3 XCPU // signature in_msg old_queries query_id cs bound stored_subwallet last_cleaned public_key subwallet_id stored_subwallet
|
||||
EQUAL // signature in_msg old_queries query_id cs bound stored_subwallet last_cleaned public_key _47
|
||||
34 THROWIFNOT
|
||||
s0 s7 XCHG // signature public_key old_queries query_id cs bound stored_subwallet last_cleaned in_msg
|
||||
HASHSU // signature public_key old_queries query_id cs bound stored_subwallet last_cleaned _50
|
||||
s0 s8 s7 XC2PU // last_cleaned public_key old_queries query_id cs bound stored_subwallet _50 signature public_key
|
||||
CHKSIGNU // last_cleaned public_key old_queries query_id cs bound stored_subwallet _51
|
||||
35 THROWIFNOT
|
||||
s0 s2 XCHG // last_cleaned public_key old_queries query_id stored_subwallet bound cs
|
||||
LDDICT // last_cleaned public_key old_queries query_id stored_subwallet bound dict cs
|
||||
ENDS
|
||||
ACCEPT
|
||||
-1 PUSHINT // last_cleaned public_key old_queries query_id stored_subwallet bound dict i=-1
|
||||
UNTIL:<{
|
||||
OVER
|
||||
16 PUSHINT // last_cleaned public_key old_queries query_id stored_subwallet bound dict i dict _62=16
|
||||
DICTIGETNEXT
|
||||
NULLSWAPIFNOT
|
||||
NULLSWAPIFNOT // last_cleaned public_key old_queries query_id stored_subwallet bound dict cs i f
|
||||
DUP // last_cleaned public_key old_queries query_id stored_subwallet bound dict cs i f f
|
||||
IF:<{ // last_cleaned public_key old_queries query_id stored_subwallet bound dict cs i f
|
||||
s0 s2 XCHG // last_cleaned public_key old_queries query_id stored_subwallet bound dict f i cs
|
||||
8 LDU // last_cleaned public_key old_queries query_id stored_subwallet bound dict f i mode cs
|
||||
LDREF // last_cleaned public_key old_queries query_id stored_subwallet bound dict f i mode _125 _124
|
||||
DROP // last_cleaned public_key old_queries query_id stored_subwallet bound dict f i mode _68
|
||||
SWAP // last_cleaned public_key old_queries query_id stored_subwallet bound dict f i _68 mode
|
||||
SENDRAWMSG
|
||||
}>ELSE<{
|
||||
s2 POP // last_cleaned public_key old_queries query_id stored_subwallet bound dict f i
|
||||
}>
|
||||
SWAP // last_cleaned public_key old_queries query_id stored_subwallet bound dict i f
|
||||
NOT // last_cleaned public_key old_queries query_id stored_subwallet bound dict i _71
|
||||
}> // last_cleaned public_key old_queries query_id stored_subwallet bound dict i
|
||||
2DROP // last_cleaned public_key old_queries query_id stored_subwallet bound
|
||||
38 PUSHPOW2 // last_cleaned public_key old_queries query_id stored_subwallet bound _74
|
||||
SUB // last_cleaned public_key old_queries query_id stored_subwallet bound
|
||||
NEWC // last_cleaned public_key old_queries query_id stored_subwallet bound _77
|
||||
s0 s3 s4 XCHG3
|
||||
64 PUSHINT // last_cleaned public_key stored_subwallet bound _77 query_id old_queries _78=64
|
||||
DICTUSETB // last_cleaned public_key stored_subwallet bound old_queries
|
||||
UNTIL:<{
|
||||
DUP
|
||||
64 PUSHINT // last_cleaned public_key stored_subwallet bound old_queries old_queries _85=64
|
||||
DICTUREMMIN
|
||||
NULLSWAPIFNOT
|
||||
NULLSWAPIFNOT // last_cleaned public_key stored_subwallet bound old_queries _126 _128 _127 _129
|
||||
s2 POP // last_cleaned public_key stored_subwallet bound old_queries old_queries' f i
|
||||
s1 s0 XCPU // last_cleaned public_key stored_subwallet bound old_queries old_queries' i f f
|
||||
IF:<{ // last_cleaned public_key stored_subwallet bound old_queries old_queries' i f
|
||||
DROP // last_cleaned public_key stored_subwallet bound old_queries old_queries' i
|
||||
s0 s3 PUSH2 // last_cleaned public_key stored_subwallet bound old_queries old_queries' i i bound
|
||||
LESS // last_cleaned public_key stored_subwallet bound old_queries old_queries' i f
|
||||
}> // last_cleaned public_key stored_subwallet bound old_queries old_queries' i f
|
||||
DUP // last_cleaned public_key stored_subwallet bound old_queries old_queries' i f f
|
||||
IF:<{ // last_cleaned public_key stored_subwallet bound old_queries old_queries' i f
|
||||
s3 POP
|
||||
s6 POP // last_cleaned public_key stored_subwallet bound f old_queries
|
||||
}>ELSE<{
|
||||
s3 s1 s3 XCHG3
|
||||
2DROP // last_cleaned public_key stored_subwallet bound f old_queries
|
||||
}>
|
||||
SWAP // last_cleaned public_key stored_subwallet bound old_queries f
|
||||
NOT // last_cleaned public_key stored_subwallet bound old_queries _90
|
||||
}> // last_cleaned public_key stored_subwallet bound old_queries
|
||||
NIP // last_cleaned public_key stored_subwallet old_queries
|
||||
NEWC // last_cleaned public_key stored_subwallet old_queries _91
|
||||
s1 s2 XCHG // last_cleaned public_key old_queries stored_subwallet _91
|
||||
32 STU // last_cleaned public_key old_queries _93
|
||||
s1 s3 XCHG // old_queries public_key last_cleaned _93
|
||||
64 STU // old_queries public_key _95
|
||||
256 STU // old_queries _97
|
||||
STDICT // _98
|
||||
ENDC // _99
|
||||
c4 POP
|
||||
}>
|
||||
processed? PROC:<{
|
||||
// query_id
|
||||
c4 PUSH // query_id _2
|
||||
CTOS // query_id ds
|
||||
32 LDU // query_id _29 _28
|
||||
NIP // query_id ds
|
||||
64 LDU // query_id _11 ds
|
||||
256 LDU // query_id _11 _33 _32
|
||||
NIP // query_id _11 ds
|
||||
LDDICT // query_id last_cleaned old_queries ds
|
||||
ENDS
|
||||
s2 s(-1) PUXC
|
||||
64 PUSHINT // query_id last_cleaned query_id old_queries _22=64
|
||||
DICTUGET
|
||||
NULLSWAPIFNOT // query_id last_cleaned _36 _37
|
||||
NIP // query_id last_cleaned found
|
||||
IF:<{ // query_id last_cleaned
|
||||
2DROP //
|
||||
TRUE // _24
|
||||
}>ELSE<{ // query_id last_cleaned
|
||||
LEQ // _26
|
||||
NEGATE // _24
|
||||
}>
|
||||
}>
|
||||
}END>c
|
||||
1
crypto/smartcont/auto/simple-wallet-code.cpp
Normal file
1
crypto/smartcont/auto/simple-wallet-code.cpp
Normal file
|
|
@ -0,0 +1 @@
|
|||
with_tvm_code("simple-wallet", "te6ccgEBBAEATwABFP8A9KQT9KDyyAsBAgEgAgMABNIwAG7ygwjXGCDTH+1E0NMf0//RUTG68qED+QFUEEL5EPKi+ABRINdKltMH1AL7AN7RpMjLH8v/ye1U");
|
||||
45
crypto/smartcont/auto/simple-wallet-code.fif
Normal file
45
crypto/smartcont/auto/simple-wallet-code.fif
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
// automatically generated from `smartcont/stdlib.fc` `smartcont/simple-wallet-code.fc`
|
||||
PROGRAM{
|
||||
DECLPROC recv_internal
|
||||
DECLPROC recv_external
|
||||
recv_internal PROC:<{
|
||||
// in_msg
|
||||
DROP //
|
||||
}>
|
||||
recv_external PROC:<{
|
||||
// in_msg
|
||||
9 PUSHPOW2 // in_msg _3=512
|
||||
LDSLICEX // signature in_msg
|
||||
DUP // signature in_msg cs
|
||||
32 LDU // signature in_msg msg_seqno cs
|
||||
c4 PUSH // signature in_msg msg_seqno cs _11
|
||||
CTOS // signature in_msg msg_seqno cs cs2
|
||||
32 LDU // signature in_msg msg_seqno cs stored_seqno cs2
|
||||
256 LDU // signature in_msg msg_seqno cs stored_seqno public_key cs2
|
||||
ENDS
|
||||
s3 s1 XCPU // signature in_msg public_key cs stored_seqno msg_seqno stored_seqno
|
||||
EQUAL // signature in_msg public_key cs stored_seqno _23
|
||||
33 THROWIFNOT
|
||||
s0 s3 XCHG // signature stored_seqno public_key cs in_msg
|
||||
HASHSU // signature stored_seqno public_key cs _26
|
||||
s0 s4 s2 XC2PU // cs stored_seqno public_key _26 signature public_key
|
||||
CHKSIGNU // cs stored_seqno public_key _27
|
||||
34 THROWIFNOT
|
||||
ACCEPT
|
||||
s2 s0 XCPU // public_key stored_seqno cs cs
|
||||
SREFS // public_key stored_seqno cs _32
|
||||
IF:<{ // public_key stored_seqno cs
|
||||
8 LDU // public_key stored_seqno mode cs
|
||||
LDREF // public_key stored_seqno mode _37 cs
|
||||
s0 s2 XCHG // public_key stored_seqno cs _37 mode
|
||||
SENDRAWMSG
|
||||
}> // public_key stored_seqno cs
|
||||
ENDS
|
||||
INC // public_key _42
|
||||
NEWC // public_key _42 _43
|
||||
32 STU // public_key _45
|
||||
256 STU // _47
|
||||
ENDC // _48
|
||||
c4 POP
|
||||
}>
|
||||
}END>c
|
||||
1
crypto/smartcont/auto/wallet-code.cpp
Normal file
1
crypto/smartcont/auto/wallet-code.cpp
Normal file
|
|
@ -0,0 +1 @@
|
|||
with_tvm_code("wallet", "te6ccgEBBgEAaAABFP8A9KQT9KDyyAsBAgEgAgMCAUgEBQCA8oMI1xgg0x/TH/gjErvyY+1E0NMf0//RUTG68qED+QFUEEL5EPKi+AACkyDXSpbTB9QC+wDo0aTIyx/L/8ntVAAE0DAAEaCZL9qJoa4WPw==");
|
||||
59
crypto/smartcont/auto/wallet-code.fif
Normal file
59
crypto/smartcont/auto/wallet-code.fif
Normal file
|
|
@ -0,0 +1,59 @@
|
|||
// automatically generated from `smartcont/stdlib.fc` `smartcont/wallet-code.fc`
|
||||
PROGRAM{
|
||||
DECLPROC recv_internal
|
||||
DECLPROC recv_external
|
||||
85143 DECLMETHOD seqno
|
||||
recv_internal PROC:<{
|
||||
// in_msg
|
||||
DROP //
|
||||
}>
|
||||
recv_external PROC:<{
|
||||
// in_msg
|
||||
9 PUSHPOW2 // in_msg _3=512
|
||||
LDSLICEX // signature in_msg
|
||||
DUP // signature in_msg cs
|
||||
32 LDU // signature in_msg _8 cs
|
||||
32 LDU // signature in_msg msg_seqno valid_until cs
|
||||
NOW // signature in_msg msg_seqno valid_until cs _15
|
||||
s1 s2 XCHG // signature in_msg msg_seqno cs valid_until _15
|
||||
LEQ // signature in_msg msg_seqno cs _16
|
||||
35 THROWIF
|
||||
c4 PUSH // signature in_msg msg_seqno cs _19
|
||||
CTOS // signature in_msg msg_seqno cs ds
|
||||
32 LDU // signature in_msg msg_seqno cs _23 ds
|
||||
256 LDU // signature in_msg msg_seqno cs stored_seqno public_key ds
|
||||
ENDS
|
||||
s3 s1 XCPU // signature in_msg public_key cs stored_seqno msg_seqno stored_seqno
|
||||
EQUAL // signature in_msg public_key cs stored_seqno _31
|
||||
33 THROWIFNOT
|
||||
s0 s3 XCHG // signature stored_seqno public_key cs in_msg
|
||||
HASHSU // signature stored_seqno public_key cs _34
|
||||
s0 s4 s2 XC2PU // cs stored_seqno public_key _34 signature public_key
|
||||
CHKSIGNU // cs stored_seqno public_key _35
|
||||
34 THROWIFNOT
|
||||
ACCEPT
|
||||
s0 s2 XCHG // public_key stored_seqno cs
|
||||
WHILE:<{
|
||||
DUP // public_key stored_seqno cs cs
|
||||
SREFS // public_key stored_seqno cs _40
|
||||
}>DO<{ // public_key stored_seqno cs
|
||||
8 LDU // public_key stored_seqno mode cs
|
||||
LDREF // public_key stored_seqno mode _45 cs
|
||||
s0 s2 XCHG // public_key stored_seqno cs _45 mode
|
||||
SENDRAWMSG
|
||||
}> // public_key stored_seqno cs
|
||||
ENDS
|
||||
INC // public_key _50
|
||||
NEWC // public_key _50 _51
|
||||
32 STU // public_key _53
|
||||
256 STU // _55
|
||||
ENDC // _56
|
||||
c4 POP
|
||||
}>
|
||||
seqno PROC:<{
|
||||
//
|
||||
c4 PUSH // _0
|
||||
CTOS // _1
|
||||
32 PLDU // _3
|
||||
}>
|
||||
}END>c
|
||||
|
|
@ -121,7 +121,7 @@ dup make_special dup constant smc3_addr
|
|||
."address = " x. cr
|
||||
|
||||
// SmartContract #4 (elector)
|
||||
"elector-code.fif" include // code in separate source file
|
||||
"auto/elector-code.fif" include // code in separate source file
|
||||
<b 0 1 1+ 1+ 5 + u, 0 256 u, b> // data
|
||||
GR$10 // balance: 10 grams
|
||||
0 // split_depth
|
||||
|
|
|
|||
|
|
@ -133,7 +133,7 @@ dup make_special dup constant smc3_addr
|
|||
* SmartContract #4 (elector)
|
||||
*
|
||||
*/
|
||||
"elector-code.fif" include // code in separate source file
|
||||
"auto/elector-code.fif" include // code in separate source file
|
||||
<b 0 1 1+ 1+ 4 + 32 + u, 0 256 u, b> // data: dict dict dict grams uint32 uint256
|
||||
empty_cell // libraries
|
||||
GR$10 // balance: 10 grams
|
||||
|
|
@ -202,8 +202,7 @@ smc1_addr config.minter_smc!
|
|||
// 17 add-validator
|
||||
// newkeypair nip dup ."Validator #2 public key = " Bx. cr
|
||||
// 239 add-validator
|
||||
// 100000 =: orig_vset_valid_for
|
||||
100 =: orig_vset_valid_for // original validator set valid 100 seconds only (DEBUG)
|
||||
100000 =: orig_vset_valid_for // original validator set valid 100000 seconds
|
||||
now dup orig_vset_valid_for + 0 config.validators!
|
||||
|
||||
/*
|
||||
|
|
@ -211,7 +210,7 @@ now dup orig_vset_valid_for + 0 config.validators!
|
|||
* SmartContract #5 (Configuration smart contract)
|
||||
*
|
||||
*/
|
||||
"config-code.fif" include // code in separate source file
|
||||
"auto/config-code.fif" include // code in separate source file
|
||||
<b 0 32 u,
|
||||
"config-master" +suffix +".pk" load-generate-keypair drop
|
||||
B,
|
||||
|
|
|
|||
|
|
@ -19,8 +19,8 @@ def? $3 { @' $3 } { "new-wallet" } cond constant file-base
|
|||
."Creating new v2 high-load wallet in workchain " wc .
|
||||
."with subwallet id " subwallet-id . cr
|
||||
|
||||
// Create new high-load wallet; source code included from `highload-wallet-v2-code.fif`
|
||||
"highload-wallet-v2-code.fif" include
|
||||
// Create new high-load wallet; source code included from `auto/highload-wallet-v2-code.fif`
|
||||
"auto/highload-wallet-v2-code.fif" include
|
||||
// code
|
||||
<b subwallet-id 32 i, 0 64 u,
|
||||
file-base +".pk" load-generate-keypair
|
||||
|
|
|
|||
|
|
@ -18,8 +18,8 @@ def? $3 { @' $3 } { "new-wallet" } cond constant file-base
|
|||
."Creating new high-load wallet in workchain " wc .
|
||||
."with subwallet id " subwallet-id . cr
|
||||
|
||||
// Create new high-load wallet; source code included from `highload-wallet-code.fif`
|
||||
"highload-wallet-code.fif" include
|
||||
// Create new high-load wallet; source code included from `auto/highload-wallet-code.fif`
|
||||
"auto/highload-wallet-code.fif" include
|
||||
// code
|
||||
<b 0 32 u, subwallet-id 32 i,
|
||||
file-base +".pk" load-generate-keypair
|
||||
|
|
|
|||
33
crypto/smartcont/new-restricted-wallet.fif
Normal file
33
crypto/smartcont/new-restricted-wallet.fif
Normal file
|
|
@ -0,0 +1,33 @@
|
|||
#!/usr/bin/fift -s
|
||||
"TonUtil.fif" include
|
||||
"Asm.fif" include
|
||||
|
||||
{ ."usage: " @' $0 type ." <public-key> [<savefile>]" cr
|
||||
."Creates a restricted wallet in the masterchain controlled by the private key corresponding to the specified public key" cr
|
||||
."and saves its address into <savefile>.addr ('rwallet.addr' by default)" cr 1 halt
|
||||
} : usage
|
||||
$# 1- -2 and ' usage if
|
||||
|
||||
-1 =: wc
|
||||
$1 parse-pubkey =: PubKey
|
||||
def? $2 { @' $2 } { "rwallet" } cond constant file-base
|
||||
|
||||
."Creating new restricted wallet in workchain " wc . ."controlled by public key " PubKey .pubkey cr
|
||||
|
||||
// Create new restricted wallet; code taken from `auto/restricted-wallet-code.fif`
|
||||
"auto/restricted-wallet-code.fif" include // code
|
||||
<b 0 32 u, PubKey 256 u, b> // data
|
||||
null // no libraries
|
||||
<b b{0011} s, 3 roll ref, rot ref, swap dict, b> // create StateInit
|
||||
dup ."StateInit: " <s csr. cr
|
||||
dup hashu wc swap 2dup 2constant wallet_addr
|
||||
."new wallet address = " 2dup .addr cr
|
||||
2dup file-base +".addr" save-address-verbose
|
||||
."Non-bounceable address (for init): " 2dup 7 .Addr cr
|
||||
."Bounceable address (for later access): " 6 .Addr cr
|
||||
<b b{1000100} s, wallet_addr addr, b{000010} s, swap
|
||||
<s s, b{0} s, 0 256 u, 0 256 u, 0 32 u, -1 32 i, b>
|
||||
dup ."External message for initialization is " <s csr. cr
|
||||
2 boc+>B dup Bx. cr
|
||||
file-base +"-query.boc" tuck B>file
|
||||
."(Saved wallet creating query to file " type .")" cr
|
||||
47
crypto/smartcont/new-restricted-wallet2.fif
Normal file
47
crypto/smartcont/new-restricted-wallet2.fif
Normal file
|
|
@ -0,0 +1,47 @@
|
|||
#!/usr/bin/fift -s
|
||||
"TonUtil.fif" include
|
||||
"Asm.fif" include
|
||||
|
||||
{ ."usage: " @' $0 type ." <public-key> <amount> [<savefile>]" cr
|
||||
."Creates a restricted lockup wallet in the masterchain controlled by the private key corresponding to the specified public key" cr
|
||||
."and saves its address into <savefile>.addr ('rwallet.addr' by default)" cr 1 halt
|
||||
} : usage
|
||||
$# 2- -2 and ' usage if
|
||||
|
||||
-1 =: wc
|
||||
$1 parse-pubkey =: PubKey
|
||||
$2 $>GR =: amount
|
||||
def? $3 { @' $3 } { "rwallet" } cond constant file-base
|
||||
|
||||
."Creating new restricted lockup wallet in workchain " wc . ."controlled by public key " PubKey .pubkey
|
||||
." with nominal amount " amount .GR cr
|
||||
|
||||
// D x t -- D'
|
||||
{ <b rot Gram, swap rot 16 b>idict! not abort"cannot add value"
|
||||
} : rdict-entry
|
||||
// balance -- dict
|
||||
{ dictnew
|
||||
over -32768 rdict-entry
|
||||
over 3/4 */ 92 rdict-entry
|
||||
over 1/2 */ 183 rdict-entry
|
||||
swap 1/4 */ 366 rdict-entry
|
||||
0 548 rdict-entry
|
||||
} : make-rdict
|
||||
|
||||
// Create new restricted wallet; code taken from `auto/restricted-wallet2-code.fif`
|
||||
"auto/restricted-wallet-code.fif" include // code
|
||||
<b 0 32 u, PubKey 256 u, amount make-rdict dict, b> // data
|
||||
null // no libraries
|
||||
<b b{0011} s, 3 roll ref, rot ref, swap dict, b> // create StateInit
|
||||
dup ."StateInit: " <s csr. cr
|
||||
dup hashu wc swap 2dup 2constant wallet_addr
|
||||
."new wallet address = " 2dup .addr cr
|
||||
2dup file-base +".addr" save-address-verbose
|
||||
."Non-bounceable address (for init): " 2dup 7 .Addr cr
|
||||
."Bounceable address (for later access): " 6 .Addr cr
|
||||
<b b{1000100} s, wallet_addr addr, b{000010} s, swap
|
||||
<s s, b{0} s, 0 256 u, 0 256 u, 0 32 u, -1 32 i, b>
|
||||
dup ."External message for initialization is " <s csr. cr
|
||||
2 boc+>B dup Bx. cr
|
||||
file-base +"-query.boc" tuck B>file
|
||||
."(Saved wallet creating query to file " type .")" cr
|
||||
|
|
@ -13,7 +13,7 @@ def? $2 { @' $2 } { "new-wallet" } cond constant file-base
|
|||
|
||||
."Creating new advanced wallet in workchain " wc . cr
|
||||
|
||||
// Create new advanced wallet; code adapted from `wallet-code.fif`
|
||||
// Create new advanced wallet; code adapted from `auto/wallet-code.fif`
|
||||
<{ SETCP0 DUP IFNOTRET // return if recv_internal
|
||||
DUP 85143 INT EQUAL IFJMP:<{ // "seqno" get-method
|
||||
DROP c4 PUSHCTR CTOS 32 PLDU // cnt
|
||||
|
|
|
|||
67
crypto/smartcont/restricted-wallet-code.fc
Normal file
67
crypto/smartcont/restricted-wallet-code.fc
Normal file
|
|
@ -0,0 +1,67 @@
|
|||
;; Restricted wallet (a variant of wallet-code.fc)
|
||||
;; until configuration parameter -13 is set, accepts messages only to elector smc
|
||||
|
||||
() recv_internal(slice in_msg) impure {
|
||||
;; do nothing for internal messages
|
||||
}
|
||||
|
||||
_ restricted?() inline {
|
||||
var p = config_param(-13);
|
||||
return null?(p) ? true : begin_parse(p).preload_uint(32) > now();
|
||||
}
|
||||
|
||||
_ check_destination(msg, dest) inline_ref {
|
||||
var cs = msg.begin_parse();
|
||||
var flags = cs~load_uint(4);
|
||||
if (flags & 8) {
|
||||
;; external messages are always valid
|
||||
return true;
|
||||
}
|
||||
var (s_addr, d_addr) = (cs~load_msg_addr(), cs~load_msg_addr());
|
||||
var (dest_wc, dest_addr) = parse_std_addr(d_addr);
|
||||
return (dest_wc == -1) & (dest_addr == dest);
|
||||
}
|
||||
|
||||
() recv_external(slice in_msg) impure {
|
||||
var signature = in_msg~load_bits(512);
|
||||
var cs = in_msg;
|
||||
var (msg_seqno, valid_until) = (cs~load_uint(32), cs~load_uint(32));
|
||||
throw_if(35, valid_until <= now());
|
||||
var ds = get_data().begin_parse();
|
||||
var (stored_seqno, public_key) = (ds~load_uint(32), ds~load_uint(256));
|
||||
ds.end_parse();
|
||||
throw_unless(33, msg_seqno == stored_seqno);
|
||||
ifnot (msg_seqno) {
|
||||
accept_message();
|
||||
set_data(begin_cell().store_uint(stored_seqno + 1, 32).store_uint(public_key, 256).end_cell());
|
||||
return ();
|
||||
}
|
||||
throw_unless(34, check_signature(slice_hash(in_msg), signature, public_key));
|
||||
accept_message();
|
||||
var restrict = restricted?();
|
||||
var elector = config_param(1).begin_parse().preload_uint(256);
|
||||
cs~touch();
|
||||
while (cs.slice_refs()) {
|
||||
var mode = cs~load_uint(8);
|
||||
var msg = cs~load_ref();
|
||||
var ok = true;
|
||||
if (restrict) {
|
||||
ok = check_destination(msg, elector);
|
||||
}
|
||||
if (ok) {
|
||||
send_raw_message(msg, mode);
|
||||
}
|
||||
}
|
||||
cs.end_parse();
|
||||
set_data(begin_cell().store_uint(stored_seqno + 1, 32).store_uint(public_key, 256).end_cell());
|
||||
}
|
||||
|
||||
;; Get methods
|
||||
|
||||
int seqno() method_id {
|
||||
return get_data().begin_parse().preload_uint(32);
|
||||
}
|
||||
|
||||
int balance() method_id {
|
||||
return restricted?() ? 0 : get_balance().first();
|
||||
}
|
||||
69
crypto/smartcont/restricted-wallet2-code.fc
Normal file
69
crypto/smartcont/restricted-wallet2-code.fc
Normal file
|
|
@ -0,0 +1,69 @@
|
|||
;; Restricted wallet (a variant of wallet-code.fc)
|
||||
;; until configuration parameter -13 is set, accepts messages only to elector smc
|
||||
|
||||
() recv_internal(slice in_msg) impure {
|
||||
;; do nothing for internal messages
|
||||
}
|
||||
|
||||
_ days_passed() inline {
|
||||
var p = config_param(-13);
|
||||
return null?(p) ? -1 : (now() - begin_parse(p).preload_uint(32)) / 86400;
|
||||
}
|
||||
|
||||
() recv_external(slice in_msg) impure {
|
||||
var signature = in_msg~load_bits(512);
|
||||
var cs = in_msg;
|
||||
var (msg_seqno, valid_until) = (cs~load_uint(32), cs~load_uint(32));
|
||||
throw_if(35, valid_until <= now());
|
||||
var ds = get_data().begin_parse();
|
||||
var (stored_seqno, public_key, rdict) = (ds~load_uint(32), ds~load_uint(256), ds~load_dict());
|
||||
ds.end_parse();
|
||||
throw_unless(33, msg_seqno == stored_seqno);
|
||||
ifnot (msg_seqno) {
|
||||
accept_message();
|
||||
set_data(begin_cell()
|
||||
.store_uint(stored_seqno + 1, 32)
|
||||
.store_uint(public_key, 256)
|
||||
.store_dict(rdict)
|
||||
.end_cell());
|
||||
return ();
|
||||
}
|
||||
throw_unless(34, check_signature(slice_hash(in_msg), signature, public_key));
|
||||
accept_message();
|
||||
var ts = days_passed();
|
||||
var (_, value, found) = rdict.idict_get_preveq?(16, ts);
|
||||
if (found) {
|
||||
raw_reserve(value~load_grams(), 2);
|
||||
}
|
||||
cs~touch();
|
||||
while (cs.slice_refs()) {
|
||||
var mode = cs~load_uint(8);
|
||||
var msg = cs~load_ref();
|
||||
send_raw_message(msg, mode);
|
||||
}
|
||||
cs.end_parse();
|
||||
set_data(begin_cell()
|
||||
.store_uint(stored_seqno + 1, 32)
|
||||
.store_uint(public_key, 256)
|
||||
.store_dict(rdict)
|
||||
.end_cell());
|
||||
}
|
||||
|
||||
;; Get methods
|
||||
|
||||
int seqno() method_id {
|
||||
return get_data().begin_parse().preload_uint(32);
|
||||
}
|
||||
|
||||
int balance() method_id {
|
||||
var ds = get_data().begin_parse().skip_bits(32 + 256);
|
||||
var rdict = ds~load_dict();
|
||||
ds.end_parse();
|
||||
var ts = days_passed();
|
||||
var balance = get_balance().first();
|
||||
var (_, value, found) = rdict.idict_get_preveq?(16, ts);
|
||||
if (found) {
|
||||
balance = max(balance - value~load_grams(), 0);
|
||||
}
|
||||
return balance;
|
||||
}
|
||||
|
|
@ -3,6 +3,7 @@
|
|||
|
||||
int now() asm "NOW";
|
||||
slice my_address() asm "MYADDR";
|
||||
tuple get_balance() asm "BALANCE";
|
||||
|
||||
int cell_hash(cell c) asm "HASHCU";
|
||||
int slice_hash(slice s) asm "HASHSU";
|
||||
|
|
@ -100,9 +101,13 @@ cell dict_set_builder(cell dict, int key_len, slice index, builder value) asm(va
|
|||
(cell, slice, slice, int) dict_delete_get_max(cell dict, int key_len) asm(-> 0 2 1 3) "DICTREMMAX" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(cell, (slice, slice, int)) ~dict::delete_get_max(cell dict, int key_len) asm(-> 0 2 1 3) "DICTREMMAX" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(int, slice, int) udict_get_next?(cell dict, int key_len, int pivot) asm(pivot dict key_len -> 1 0 2) "DICTUGETNEXT" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(int, slice, int) udict_get_nexteq?(cell dict, int key_len, int pivot) asm(pivot dict key_len -> 1 0 2) "DICTUGETNEXTEQ" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(int, slice, int) udict_get_prev?(cell dict, int key_len, int pivot) asm(pivot dict key_len -> 1 0 2) "DICTUGETPREV" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(int, slice, int) udict_get_preveq?(cell dict, int key_len, int pivot) asm(pivot dict key_len -> 1 0 2) "DICTUGETPREVEQ" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(int, slice, int) idict_get_next?(cell dict, int key_len, int pivot) asm(pivot dict key_len -> 1 0 2) "DICTIGETNEXT" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(int, slice, int) idict_get_nexteq?(cell dict, int key_len, int pivot) asm(pivot dict key_len -> 1 0 2) "DICTIGETNEXTEQ" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(int, slice, int) idict_get_prev?(cell dict, int key_len, int pivot) asm(pivot dict key_len -> 1 0 2) "DICTIGETPREV" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
(int, slice, int) idict_get_preveq?(cell dict, int key_len, int pivot) asm(pivot dict key_len -> 1 0 2) "DICTIGETPREVEQ" "NULLSWAPIFNOT" "NULLSWAPIFNOT";
|
||||
cell new_dict() asm "NEWDICT";
|
||||
int dict_empty?(cell c) asm "DICTEMPTY";
|
||||
|
||||
|
|
|
|||
|
|
@ -2,7 +2,7 @@
|
|||
"TonUtil.fif" include
|
||||
|
||||
{ ."usage: " @' $0 type ." <filename-base> <seqno> [<savefile>]" cr
|
||||
."Creates a request to simple configuration smart contract requesting to change configuration smart contract code to the one currently stored in config-code.fif, "
|
||||
."Creates a request to simple configuration smart contract requesting to change configuration smart contract code to the one currently stored in auto/config-code.fif, "
|
||||
."with private key loaded from file <filename-base>.pk, "
|
||||
."and saves it into <savefile>.boc ('config-query.boc' by default)" cr 1 halt
|
||||
} : usage
|
||||
|
|
@ -12,7 +12,7 @@ $# dup 2 < swap 3 > or ' usage if
|
|||
0 constant seqno
|
||||
-1 constant idx
|
||||
true constant bounce
|
||||
"config-code.fif" constant config-source
|
||||
"auto/config-code.fif" constant config-source
|
||||
100 constant interval // valid for 100 seconds
|
||||
|
||||
$1 =: file-base
|
||||
|
|
|
|||
|
|
@ -2,7 +2,7 @@
|
|||
"TonUtil.fif" include
|
||||
|
||||
{ ."usage: " @' $0 type ." <filename-base> <seqno> [<savefile>]" cr
|
||||
."Creates a request to simple configuration smart contract requesting to change elector smart contract code to the one currently stored in elector-code.fif, "
|
||||
."Creates a request to simple configuration smart contract requesting to change elector smart contract code to the one currently stored in auto/elector-code.fif, "
|
||||
."with private key loaded from file <filename-base>.pk, "
|
||||
."and saves it into <savefile>.boc ('config-query.boc' by default)" cr 1 halt
|
||||
} : usage
|
||||
|
|
@ -12,7 +12,7 @@ $# dup 2 < swap 3 > or ' usage if
|
|||
0 constant seqno
|
||||
-1 constant idx
|
||||
true constant bounce
|
||||
"elector-code.fif" constant elector-source
|
||||
"auto/elector-code.fif" constant elector-source
|
||||
100 constant interval // valid for 100 seconds
|
||||
|
||||
$1 =: file-base
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue