#!/usr/bin/env perl

use 5.16.0;
use strict;
use warnings FATAL => 'all';
use Test::More;
use Capture::Tiny qw/ capture_merged /;
use FindBin '$RealBin';
use lib $RealBin;
use Test::Sbotools qw/ make_slackbuilds_txt set_lo sboinstall /;

$ENV{TEST_MULTILIB} //= 0;
if ($ENV{TEST_INSTALL} and ($ENV{TEST_MULTILIB} == 2)) {
	plan tests => 5;
} else {
	plan skip_all => 'Only run these tests if TEST_INSTALL=1 and TEST_MULTILIB=2';
}
$ENV{TEST_ONLINE} //= 0;

sub cleanup {
	capture_merged {
		system(qw!/sbin/removepkg multilibsbo multilibsbo-compat32 multilibsbo2 multilibsbo2-compat32 multilibsbo4 multilibsbo4-compat32!);
		unlink "$RealBin/LO-multilib/multilibsbo/perf.dummy";
		unlink "$RealBin/LO-multilib/multilibsbo2/perf.dummy";
		unlink "$RealBin/LO-multilib/multilibsbo3/perf.dummy";
		unlink "$RealBin/LO-multilib/multilibsbo4/git-lfs-linux-amd64-1.1.0.tar.gz";
		unlink "$RealBin/LO-multilib/multilibsbo4/git-lfs-linux-386-1.1.0.tar.gz";
		system(qw!rm -rf /tmp/SBo/multilibsbo-1.0!);
		system(qw!rm -rf /tmp/SBo/multilibsbo2-1.0!);
		system(qw!rm -rf /tmp/SBo/multilibsbo3-1.0!);
		system(qw!rm -rf /tmp/SBo/multilibsbo4-1.0!);
		system(qw!rm -rf /tmp/package-multilibsbo!);
		system(qw!rm -rf /tmp/package-multilibsbo2!);
		system(qw!rm -rf /tmp/package-multilibsbo3!);
		system(qw!rm -rf /tmp/package-multilibsbo4!);
	};
}

cleanup();
make_slackbuilds_txt();
set_lo("$RealBin/LO-multilib");

# 1: Testing multilibsbo
sboinstall qw/ -p multilibsbo /, { input => "y\ny\ny", expected => qr/Cleaning for multilibsbo-compat32-1[.]0[.][.][.]\n/ };
system(qw!/sbin/removepkg multilibsbo multilibsbo-compat32!);

# 2: Testing multilibsbo with dependencies
sboinstall qw/ -p multilibsbo2 /, { input => "y\ny\ny\ny\ny", expected => qr/Cleaning for multilibsbo2-compat32-1[.]0[.][.][.]\n/ };

# 3: Testing 32-bit only multilibsbo3
sboinstall 'multilibsbo3', { input => "y\ny", expected => qr/Cleaning for multilibsbo3-1[.]0[.][.][.]/ };

# 4-5: Testing which source is being used for multilibsbo4
SKIP: {
	skip "TEST_ONLINE is not true", 2 unless $ENV{TEST_ONLINE};
	sboinstall 'multilibsbo4', { input => "y\ny", expected => qr!tar xvf .*/git-lfs-linux-amd64-1.1.0.tar.gz! };
	sboinstall qw/ -p multilibsbo4 /, { input => "y\ny", expected => qr!tar xvf .*/git-lfs-linux-386-1.1.0.tar.gz! };
}

# Cleanup
END {
	cleanup();
}