mirror of
https://github.com/xcat2/xcat-core.git
synced 2026-10-21 23:28:19 +00:00
Daniel Hilst
052d2d5fbe
Master added a workflow and several tests after this branch renamed xCAT-genesis-builder to xCAT-genesis-base. They still name files under xCAT-genesis-builder/, which no longer exists, so they fail or read nothing. The OpenEmbedded workflow, six bats files and four unit tests now use the new paths. Two of those unit tests could reach the code only as shell. genesis_ubuntu_build_root.t cut the package list out of builddeb-genesis-base and evaluated it through bash. genesis_payload_verification.t ran the bash verifier and parsed its stderr. XCAT::GenesisBuildRoot::required_packages() now returns the build-root package list, and builddeb-genesis-base calls it. XCAT::GenesisPayload holds the mandatory-command list and the payload check, and verify-genesis-payload runs its main() with the same arguments, exit codes and messages. stage_genesis_base_sources() stages the module beside the script. Both modules use core Perl only. The two tests now call these functions with chosen inputs and assert the exact results. genesis_base_sources_staged.t expects the module in the staged tarball. Signed-off-by: Daniel Hilst <392820+dhilst@users.noreply.github.com>
47 lines
1.7 KiB
Perl
47 lines
1.7 KiB
Perl
#!/usr/bin/env perl
|
|
# The genesis specs name their package after the target arch: xCAT-genesis-scripts-<tarch> and
|
|
# xCAT-genesis-base-<tarch>. %{tarch} comes from an %ifarch ladder, and an arch missing from that
|
|
# ladder leaves the macro unexpanded instead of failing, so rpm builds a package whose Name
|
|
# carries the macro.
|
|
#
|
|
# Expand each spec with rpmspec for every arch xCAT supports and assert the Name carries that arch.
|
|
use strict;
|
|
use warnings;
|
|
|
|
use FindBin;
|
|
use Test::More;
|
|
|
|
my $root = "$FindBin::Bin/../..";
|
|
|
|
sub command_exists { my ($c) = @_; return system("command -v $c >/dev/null 2>&1") == 0 }
|
|
|
|
plan skip_all => 'rpmspec is not installed' unless command_exists('rpmspec');
|
|
|
|
# arch under test => the tarch the spec must resolve it to (x86 and ppc64 are historical names
|
|
# genesis keeps; see genesis_tarch_from_targetarch in buildrpms.pl).
|
|
my %tarch = (
|
|
x86_64 => 'x86_64',
|
|
i686 => 'x86',
|
|
ppc64le => 'ppc64',
|
|
aarch64 => 'aarch64',
|
|
riscv64 => 'riscv64',
|
|
);
|
|
|
|
my %spec = (
|
|
'xCAT-genesis-scripts' => "$root/xCAT-genesis-scripts/xCAT-genesis-scripts.spec",
|
|
'xCAT-genesis-base' => "$root/xCAT-genesis-base/xCAT-genesis-base.spec",
|
|
);
|
|
|
|
for my $pkg (sort keys %spec) {
|
|
my $spec = $spec{$pkg};
|
|
ok(-f $spec, "$pkg spec is present") or next;
|
|
for my $arch (sort keys %tarch) {
|
|
my $name = `rpmspec --target $arch -q --qf '%{NAME}' --define 'version 2.19.0' --define 'release snap0' @{[quotemeta $spec]} 2>/dev/null`;
|
|
chomp $name;
|
|
is($name, "$pkg-$tarch{$arch}", "$pkg on $arch is named $pkg-$tarch{$arch}");
|
|
unlike($name, qr/%\{/, "$pkg on $arch leaves no unexpanded macro in its name");
|
|
}
|
|
}
|
|
|
|
done_testing();
|