Fix validator's fallback handler generation

Fixes #1015.
This commit is contained in:
KtorZ
2024-09-10 10:47:41 +02:00
parent 5879dcfd4c
commit 7741be64f8
5 changed files with 155 additions and 15 deletions

View File

@@ -0,0 +1,95 @@
use aiken/collection/dict
use cardano/address.{Address, Script}
use cardano/assets
use cardano/script_context.{ScriptContext, Spending}
use cardano/transaction.{
InlineDatum, Input, Output, OutputReference, ScriptPurpose, Spend, Transaction,
}
validator simple_else {
else(ctx: ScriptContext) {
expect Spending(output_ref, _) = ctx.info
let transaction = ctx.transaction
assert_transaction_id(transaction.id)
assert_script_info(output_ref)
assert_inputs(transaction.inputs)
expect [] = transaction.outputs
expect [] = transaction.reference_inputs
expect [] = transaction.extra_signatories
expect 42 == transaction.fee
assert_redeemers(transaction.redeemers)
expect [] == dict.to_pairs(transaction.datums)
True
}
}
fn assert_transaction_id(id: ByteArray) {
expect
#"c6fbd346681a8f8337f6b3e51e6ec973f1509367eabc3a44c849af58a1d8471b" == id
Void
}
fn assert_script_info(info: OutputReference) {
expect
OutputReference {
transaction_id: #"0000000000000000000000000000000000000000000000000000000000000000",
output_index: 0,
} == info
Void
}
fn assert_inputs(inputs: List<Input>) {
expect [
Input {
output_reference: OutputReference { transaction_id, output_index: 0 },
output: Output {
address,
value: resolved_input_value,
datum: InlineDatum(_),
reference_script: None,
},
},
] = inputs
expect
transaction_id == #"0000000000000000000000000000000000000000000000000000000000000000"
expect resolved_input_value == assets.from_lovelace(1000000000)
expect Address { payment_credential: Script(_), stake_credential: None } =
address
Void
}
fn assert_redeemers(redeemers: Pairs<ScriptPurpose, Data>) {
expect
[
Pair(
Spend(
OutputReference {
transaction_id: #"0000000000000000000000000000000000000000000000000000000000000000",
output_index: 0,
},
),
void(),
),
] == redeemers
Void
}
fn void() -> Data {
let void: Data = Void
void
}