Function scriptpubkey_p2tr

bitcoin/script.c:346–364

}

u8 *scriptpubkey_p2tr(const tal_t *ctx, const struct pubkey *inner_pubkey)
{
	unsigned char key_bytes[33];
	unsigned char tweaked_key_bytes[33];
	size_t out_len = sizeof(key_bytes);
	u8 *script = tal_arr(ctx, u8, 0);

	add_op(&script, OP_1);

	secp256k1_ec_pubkey_serialize(secp256k1_ctx, key_bytes, &out_len, &inner_pubkey->pubkey, SECP256K1_EC_COMPRESSED);
	/* Only commit to inner pubkey in tweak */
	if (wally_ec_public_key_bip341_tweak(key_bytes, 33, /* merkle_root*/ NULL, 0, 0 /* flags */, tweaked_key_bytes, sizeof(tweaked_key_bytes)) != WALLY_OK)
		abort();

	/* Cut off the first byte from the serialized compressed key */
	script_push_bytes(&script, tweaked_key_bytes + 1, sizeof(tweaked_key_bytes) - 1);
	assert(tal_count(script) == BITCOIN_SCRIPTPUBKEY_P2TR_LEN);
	return script;
}

u8 *scriptpubkey_p2tr_derkey(const tal_t *ctx, const u8 inner_der[33])
{