// Copyright (c) 2021 The Bitcoin Core developers
// Distributed under the MIT software license, see the accompanying
// file COPYING or http://www.opensource.org/licenses/mit-license.php.

#include <policy/fees.h>
#include <validation.h>
#include <wallet/coincontrol.h>
#include <wallet/spend.h>
#include <wallet/test/util.h>
#include <wallet/test/wallet_test_fixture.h>

#include <boost/test/unit_test.hpp>

namespace wallet {
BOOST_FIXTURE_TEST_SUITE(spend_tests, WalletTestingSetup)

BOOST_FIXTURE_TEST_CASE(SubtractFee, TestChain100Setup)
{
    CreateAndProcessBlock({}, GetScriptForRawPubKey(coinbaseKey.GetPubKey()));
    auto wallet = CreateSyncedWallet(*m_node.chain, *m_node.coinjoin_loader, m_node.chainman->ActiveChain(), m_args, coinbaseKey);

    // Check that a subtract-from-recipient transaction slightly less than the
    // coinbase input amount does not create a change output (because it would
    // be uneconomical to add and spend the output), and make sure it pays the
    // leftover input amount which would have been change to the recipient
    // instead of the miner.
    // The spendable coin is the first coinbase; its value follows the
    // Cosanta reward schedule
    const CAmount cb_value{m_coinbase_txns[0]->vout[0].nValue};
    auto check_tx = [&](CAmount leftover_input_amount) {
        CRecipient recipient{GetScriptForRawPubKey({}), cb_value - leftover_input_amount, true /* subtract fee */};
        bilingual_str error;
        CCoinControl coin_control;
        coin_control.m_feerate.emplace(10000);
        coin_control.fOverrideFeeRate = true;
        auto res = CreateTransaction(*wallet, {recipient}, RANDOM_CHANGE_POSITION, coin_control);
        BOOST_CHECK(res);
        const auto& txr = *res;
        BOOST_CHECK_EQUAL(txr.tx->vout.size(), 1);
        BOOST_CHECK_EQUAL(txr.tx->vout[0].nValue, recipient.nAmount + leftover_input_amount - txr.fee);
        BOOST_CHECK_GT(txr.fee, 0);
        return txr.fee;
    };

    // Send full input amount to recipient, check that only nonzero fee is
    // subtracted (to_reduce == fee).
    const CAmount fee{check_tx(0)};

    // Send slightly less than full input amount to recipient, check leftover
    // input amount is paid to recipient not the miner (to_reduce == fee - 123)
    BOOST_CHECK_EQUAL(fee, check_tx(123));

    // Send full input minus fee amount to recipient, check leftover input
    // amount is paid to recipient not the miner (to_reduce == 0)
    BOOST_CHECK_EQUAL(fee, check_tx(fee));

    // Send full input minus more than the fee amount to recipient, check
    // leftover input amount is paid to recipient not the miner (to_reduce ==
    // -123). This overpays the recipient instead of overpaying the miner more
    // than double the neccesary fee.
    BOOST_CHECK_EQUAL(fee, check_tx(fee + 123));
}

static void TestFillInputToWeight(int64_t additional_weight, int64_t expected_scriptsig_size)
{
    static const int64_t EMPTY_INPUT_WEIGHT = ::GetSerializeSize(CTxIn());

    CTxIn input;
    int64_t target_weight = EMPTY_INPUT_WEIGHT + additional_weight;
    BOOST_CHECK(FillInputToWeight(input, target_weight));

    BOOST_CHECK_LE(::GetSerializeSize(input), target_weight);
    BOOST_CHECK_GE(::GetSerializeSize(input), target_weight - 2);

    BOOST_CHECK_EQUAL(input.scriptSig.size(), expected_scriptsig_size);
}

BOOST_FIXTURE_TEST_CASE(FillInputToWeightTest, BasicTestingSetup)
{
    {
        // Less than or equal minimum of 41 should not add any witness data
        CTxIn input;
        BOOST_CHECK(!FillInputToWeight(input, -1));
        BOOST_CHECK_EQUAL(::GetSerializeSize(input), 41);
        BOOST_CHECK(!FillInputToWeight(input, 0));
        BOOST_CHECK_EQUAL(::GetSerializeSize(input), 41);
        BOOST_CHECK(!FillInputToWeight(input, 40));
        BOOST_CHECK_EQUAL(::GetSerializeSize(input), 41);
        BOOST_CHECK(FillInputToWeight(input, 41));
        BOOST_CHECK_EQUAL(::GetSerializeSize(input), 41);
    }

    // Make sure we can add at least one weight
    TestFillInputToWeight(1, 1);

    // 1 byte compact size uint boundary
    TestFillInputToWeight(252, 252);
    TestFillInputToWeight(253, 251);
    TestFillInputToWeight(262, 260);
    TestFillInputToWeight(263, 261);

    // 3 byte compact size uint boundary
    TestFillInputToWeight(65535, 65533);
    TestFillInputToWeight(65536, 65532);
    TestFillInputToWeight(65545, 65541);
    TestFillInputToWeight(65546, 65542);

    // Note: We don't test the next boundary because of memory allocation constraints.
}

BOOST_AUTO_TEST_SUITE_END()
} // namespace wallet
