#!/usr/bin/env perl
# Copyright 2016-2026 The Hush developers
# Distributed under the GPLv3 software license, see the accompanying
# file COPYING or https://www.gnu.org/licenses/gpl-3.0.en.html

use strict;
use warnings;
use 5.010;

my $flags = $ENV{TEST_FLAGS} || '--tracerpc';
my $test_dir = './qa/rpc-tests';

$ENV{PYTHONPATH} = "./qa/rpc-tests/test_framework/";
#$ENV{PYTHON_DEBUG} = 1;

my @tests_to_run = qw{
    lockzins.py
    shieldcoinbase_donation.py
};

my $exit = 0;
my $failed_tests = 0;
my $time=time();
my $num_tests = @tests_to_run;

print "# Running $num_tests tests";
for my $test (@tests_to_run) {
    # send both stderr+stdout to our output file
    my $cmd = "$test_dir/$test $flags 1>test-$time.txt 2>&1";
    system($cmd);

    print ".";

    if($?) {
        say "$cmd FAILED!";
        $exit = 1;
        $failed_tests++;
    }
}
print "\n";

if ($exit) {
    say "FAIL! Number of failed tests: $failed_tests . Details in test-$time.txt";
} else {
    say "PASS!";
}
exit($exit);