Skip to content

Commit

Permalink
escrow txn hooks
Browse files Browse the repository at this point in the history
  • Loading branch information
@dangell7
dangell7 committed Nov 20, 2023
1 parent 90b1f49 commit 29a3356
Show file tree
Hide file tree
Showing 8 changed files with 849 additions and 8 deletions.
4 changes: 0 additions & 4 deletions contracts/txns/txn_escrow_cancel.c
View file

This file was deleted.

101 changes: 101 additions & 0 deletions contracts/txns/txn_escrow_cancel_id.c
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,101 @@
/**
* EscrowCancel Txn
*/
#include "hookapi.h"

// clang-format off
uint8_t txn[274] =
{
/* size,upto */
/* 3, 0 */ 0x12U, 0x00U, 0x04U, /* tt = EscrowCancel */
/* 5, 3 */ 0x22U, 0x80U, 0x00U, 0x00U, 0x00U, /* flags = tfCanonical */
/* 5, 8 */ 0x24U, 0x00U, 0x00U, 0x00U, 0x00U, /* sequence = 0 */
/* 5, 13 */ 0x99U, 0x99U, 0x99U, 0x99U, 0x99U, /* dtag, flipped */
/* 6, 18 */ 0x20U, 0x1AU, 0x00U, 0x00U, 0x00U, 0x00U, /* first ledger seq */
/* 6, 24 */ 0x20U, 0x1BU, 0x00U, 0x00U, 0x00U, 0x00U, /* last ledger seq */
/* 6, 30 */ 0x20U, 0x19U, 0x00U, 0x00U, 0x00U, 0x00U, /* offer sequence */
/* 34, 36 */ 0x50U, 0x23U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* hash256 id */
/* 9, 70 */ 0x68U, 0x40U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, /* fee */
/* 35, 79 */ 0x73U, 0x21U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* pubkey */
/* 22,114 */ 0x81U, 0x14U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* src acc */
/* 22,136 */ 0x82U, 0x14U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* owner acc */
/* 116,158 */ /* emit details */
/* 0,274 */
};
// clang-format on

// ACCOUNTS
#define HOOK_ACC (txn + 116U)

// TXS
#define DTAG_OUT (txn + 14U)
#define FLS_OUT (txn + 20U)
#define LLS_OUT (txn + 26U)
#define OWNER_OUT (txn + 138U)
#define ID_OUT (txn + 38U)
#define EMIT_OUT (txn + 158U)
#define FEE_OUT (txn + 71U)

int64_t hook(uint32_t reserved)
{

TRACESTR("txn_escrow_cancel_id.c: Called.");

// ACCOUNT: Hook Account
hook_account(HOOK_ACC, 20);

// ACCOUNT: Owner Account
uint8_t owner_key[2] = {'O', 'A'};
otxn_param(OWNER_OUT, 20, SBUF(owner_key));

// ACCOUNT: Ewscow ID
uint8_t id_key[2] = {'I', 'D'};
otxn_param(ID_OUT, 32, SBUF(id_key));

// TXN: PREPARE: Init
etxn_reserve(1);

// TXN PREPARE: FirstLedgerSequence
uint32_t fls = (uint32_t)ledger_seq() + 1;
*((uint32_t *)(FLS_OUT)) = FLIP_ENDIAN(fls);

// TXN PREPARE: LastLedgerSequense
uint32_t lls = fls + 4;
*((uint32_t *)(LLS_OUT)) = FLIP_ENDIAN(lls);

// TXN PREPARE: Dest Tag <- Source Tag
if (otxn_field(DTAG_OUT, 4, sfSourceTag) == 4)
*(DTAG_OUT - 1) = 0x2EU;

// TXN PREPARE: Emit Metadata
etxn_details(EMIT_OUT, 116U);

// TXN PREPARE: Fee
{
int64_t fee = etxn_fee_base(SBUF(txn));
uint8_t *b = FEE_OUT;
*b++ = 0b01000000 + ((fee >> 56) & 0b00111111);
*b++ = (fee >> 48) & 0xFFU;
*b++ = (fee >> 40) & 0xFFU;
*b++ = (fee >> 32) & 0xFFU;
*b++ = (fee >> 24) & 0xFFU;
*b++ = (fee >> 16) & 0xFFU;
*b++ = (fee >> 8) & 0xFFU;
*b++ = (fee >> 0) & 0xFFU;
}

TRACEHEX(txn); // <- final tx blob

// TXN: Emit/Send Txn
uint8_t emithash[32];
int64_t emit_result = emit(SBUF(emithash), SBUF(txn));
if (emit_result > 0)
{
accept(SBUF("txn_escrow_cancel_id.c: Tx emitted success."), __LINE__);
}
accept(SBUF("txn_escrow_cancel_id.c: Tx emitted failure."), __LINE__);

_g(1, 1);
// unreachable
return 0;
}
100 changes: 100 additions & 0 deletions contracts/txns/txn_escrow_cancel_seq.c
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,100 @@
/**
* EscrowCancel Txn
*/
#include "hookapi.h"

// clang-format off
uint8_t txn[240] =
{
/* size,upto */
/* 3, 0 */ 0x12U, 0x00U, 0x04U, /* tt = EscrowCancel */
/* 5, 3 */ 0x22U, 0x80U, 0x00U, 0x00U, 0x00U, /* flags = tfCanonical */
/* 5, 8 */ 0x24U, 0x00U, 0x00U, 0x00U, 0x00U, /* sequence = 0 */
/* 5, 13 */ 0x99U, 0x99U, 0x99U, 0x99U, 0x99U, /* dtag, flipped */
/* 6, 18 */ 0x20U, 0x1AU, 0x00U, 0x00U, 0x00U, 0x00U, /* first ledger seq */
/* 6, 24 */ 0x20U, 0x1BU, 0x00U, 0x00U, 0x00U, 0x00U, /* last ledger seq */
/* 6, 30 */ 0x20U, 0x19U, 0x00U, 0x00U, 0x00U, 0x00U, /* offer sequence */
/* 9, 36 */ 0x68U, 0x40U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, /* fee */
/* 35, 45 */ 0x73U, 0x21U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* pubkey */
/* 22, 80 */ 0x81U, 0x14U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* src acc */
/* 22,102 */ 0x82U, 0x14U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* owner acc */
/* 116,124 */ /* emit details */
/* 0,240 */
};
// clang-format on

// ACCOUNTS
#define HOOK_ACC (txn + 82U)

// TXS
#define DTAG_OUT (txn + 14U)
#define FLS_OUT (txn + 20U)
#define LLS_OUT (txn + 26U)
#define OWNER_OUT (txn + 104U)
#define SEQ_OUT (txn + 32U)
#define EMIT_OUT (txn + 124U)
#define FEE_OUT (txn + 37U)

int64_t hook(uint32_t reserved)
{

TRACESTR("txn_escrow_cancel_seq.c: Called.");

// ACCOUNT: Hook Account
hook_account(HOOK_ACC, 20);

// ACCOUNT: Owner Account
uint8_t owner_key[2] = {'O', 'A'};
otxn_param(OWNER_OUT, 20, SBUF(owner_key));

// ACCOUNT: Offer Sequence
uint8_t id_key[3] = {'S', 'E', 'Q'};
otxn_param(SEQ_OUT, 4, SBUF(id_key));

// TXN: PREPARE: Init
etxn_reserve(1);

// TXN PREPARE: FirstLedgerSequence
uint32_t fls = (uint32_t)ledger_seq() + 1;
*((uint32_t *)(FLS_OUT)) = FLIP_ENDIAN(fls);

// TXN PREPARE: LastLedgerSequense
uint32_t lls = fls + 4;
*((uint32_t *)(LLS_OUT)) = FLIP_ENDIAN(lls);

// TXN PREPARE: Dest Tag <- Source Tag
if (otxn_field(DTAG_OUT, 4, sfSourceTag) == 4)
*(DTAG_OUT - 1) = 0x2EU;

// TXN PREPARE: Emit Metadata
etxn_details(EMIT_OUT, 116U);

// TXN PREPARE: Fee
{
int64_t fee = etxn_fee_base(SBUF(txn));
uint8_t *b = FEE_OUT;
*b++ = 0b01000000 + ((fee >> 56) & 0b00111111);
*b++ = (fee >> 48) & 0xFFU;
*b++ = (fee >> 40) & 0xFFU;
*b++ = (fee >> 32) & 0xFFU;
*b++ = (fee >> 24) & 0xFFU;
*b++ = (fee >> 16) & 0xFFU;
*b++ = (fee >> 8) & 0xFFU;
*b++ = (fee >> 0) & 0xFFU;
}

TRACEHEX(txn); // <- final tx blob

// TXN: Emit/Send Txn
uint8_t emithash[32];
int64_t emit_result = emit(SBUF(emithash), SBUF(txn));
if (emit_result > 0)
{
accept(SBUF("txn_escrow_cancel_seq.c: Tx emitted success."), __LINE__);
}
accept(SBUF("txn_escrow_cancel_seq.c: Tx emitted failure."), __LINE__);

_g(1, 1);
// unreachable
return 0;
}
4 changes: 0 additions & 4 deletions contracts/txns/txn_escrow_finish.c
View file

This file was deleted.

101 changes: 101 additions & 0 deletions contracts/txns/txn_escrow_finish_id.c
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,101 @@
/**
* EscrowFinish Txn
*/
#include "hookapi.h"

// clang-format off
uint8_t txn[274] =
{
/* size,upto */
/* 3, 0 */ 0x12U, 0x00U, 0x02U, /* tt = EscrowFinish */
/* 5, 3 */ 0x22U, 0x80U, 0x00U, 0x00U, 0x00U, /* flags = tfCanonical */
/* 5, 8 */ 0x24U, 0x00U, 0x00U, 0x00U, 0x00U, /* sequence = 0 */
/* 5, 13 */ 0x99U, 0x99U, 0x99U, 0x99U, 0x99U, /* dtag, flipped */
/* 6, 18 */ 0x20U, 0x1AU, 0x00U, 0x00U, 0x00U, 0x00U, /* first ledger seq */
/* 6, 24 */ 0x20U, 0x1BU, 0x00U, 0x00U, 0x00U, 0x00U, /* last ledger seq */
/* 6, 30 */ 0x20U, 0x19U, 0x00U, 0x00U, 0x00U, 0x00U, /* offer sequence */
/* 34, 36 */ 0x50U, 0x23U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* hash256 id */
/* 9, 70 */ 0x68U, 0x40U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, 0x00U, /* fee */
/* 35, 79 */ 0x73U, 0x21U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* pubkey */
/* 22,114 */ 0x81U, 0x14U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* src acc */
/* 22,136 */ 0x82U, 0x14U, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* owner acc */
/* 116,158 */ /* emit details */
/* 0,274 */
};
// clang-format on

// ACCOUNTS
#define HOOK_ACC (txn + 116U)

// TXS
#define DTAG_OUT (txn + 14U)
#define FLS_OUT (txn + 20U)
#define LLS_OUT (txn + 26U)
#define OWNER_OUT (txn + 138U)
#define ID_OUT (txn + 38U)
#define EMIT_OUT (txn + 158U)
#define FEE_OUT (txn + 71U)

int64_t hook(uint32_t reserved)
{

TRACESTR("txn_escrow_finish_id.c: Called.");

// ACCOUNT: Hook Account
hook_account(HOOK_ACC, 20);

// ACCOUNT: Owner Account
uint8_t owner_key[2] = {'O', 'A'};
otxn_param(OWNER_OUT, 20, SBUF(owner_key));

// ACCOUNT: Ewscow ID
uint8_t id_key[2] = {'I', 'D'};
otxn_param(ID_OUT, 32, SBUF(id_key));

// TXN: PREPARE: Init
etxn_reserve(1);

// TXN PREPARE: FirstLedgerSequence
uint32_t fls = (uint32_t)ledger_seq() + 1;
*((uint32_t *)(FLS_OUT)) = FLIP_ENDIAN(fls);

// TXN PREPARE: LastLedgerSequense
uint32_t lls = fls + 4;
*((uint32_t *)(LLS_OUT)) = FLIP_ENDIAN(lls);

// TXN PREPARE: Dest Tag <- Source Tag
if (otxn_field(DTAG_OUT, 4, sfSourceTag) == 4)
*(DTAG_OUT - 1) = 0x2EU;

// TXN PREPARE: Emit Metadata
etxn_details(EMIT_OUT, 116U);

// TXN PREPARE: Fee
{
int64_t fee = etxn_fee_base(SBUF(txn));
uint8_t *b = FEE_OUT;
*b++ = 0b01000000 + ((fee >> 56) & 0b00111111);
*b++ = (fee >> 48) & 0xFFU;
*b++ = (fee >> 40) & 0xFFU;
*b++ = (fee >> 32) & 0xFFU;
*b++ = (fee >> 24) & 0xFFU;
*b++ = (fee >> 16) & 0xFFU;
*b++ = (fee >> 8) & 0xFFU;
*b++ = (fee >> 0) & 0xFFU;
}

TRACEHEX(txn); // <- final tx blob

// TXN: Emit/Send Txn
uint8_t emithash[32];
int64_t emit_result = emit(SBUF(emithash), SBUF(txn));
if (emit_result > 0)
{
accept(SBUF("txn_escrow_finish_id.c: Tx emitted success."), __LINE__);
}
accept(SBUF("txn_escrow_finish_id.c: Tx emitted failure."), __LINE__);

_g(1, 1);
// unreachable
return 0;
}
Loading

0 comments on commit 29a3356

Please sign in to comment.