mirror of
https://github.com/pgbackrest/pgbackrest.git
synced 2024-12-14 10:13:05 +02:00
57d7809297
Code generation saved files even when they had not changed, which often caused code generation cascades. So, don't save files unless they have changed. Use rsync to determine which files have changed since the last test run. The manifest of changed files is saved and not removed until all code generation and builds have completed. If an error occurs the work will be redone on the next run. The eventual goal is to do all the builds from the test/repo directory created by rsync but for now it is only used to track changes.
140 lines
4.8 KiB
Perl
140 lines
4.8 KiB
Perl
####################################################################################################################################
|
|
# CiTest.pm - Create Travis configuration file for continuous integration testing
|
|
####################################################################################################################################
|
|
package pgBackRestTest::Common::CiTest;
|
|
|
|
####################################################################################################################################
|
|
# Perl includes
|
|
####################################################################################################################################
|
|
use strict;
|
|
use warnings FATAL => qw(all);
|
|
use Carp qw(confess);
|
|
use English '-no_match_vars';
|
|
|
|
use Cwd qw(abs_path);
|
|
use Exporter qw(import);
|
|
our @EXPORT = qw();
|
|
use File::Basename qw(dirname);
|
|
use POSIX qw(ceil);
|
|
use Time::HiRes qw(gettimeofday);
|
|
|
|
use pgBackRest::DbVersion;
|
|
use pgBackRest::Common::Exception;
|
|
use pgBackRest::Common::Log;
|
|
use pgBackRest::Common::String;
|
|
use pgBackRest::Version;
|
|
|
|
use pgBackRestTest::Common::BuildTest;
|
|
use pgBackRestTest::Common::ContainerTest;
|
|
use pgBackRestTest::Common::DefineTest;
|
|
use pgBackRestTest::Common::ExecuteTest;
|
|
use pgBackRestTest::Common::ListTest;
|
|
use pgBackRestTest::Common::VmTest;
|
|
|
|
####################################################################################################################################
|
|
# new
|
|
####################################################################################################################################
|
|
sub new
|
|
{
|
|
my $class = shift; # Class name
|
|
|
|
# Create the class hash
|
|
my $self = {};
|
|
bless $self, $class;
|
|
|
|
# Assign function parameters, defaults, and log debug info
|
|
(
|
|
my $strOperation,
|
|
$self->{oStorage},
|
|
) =
|
|
logDebugParam
|
|
(
|
|
__PACKAGE__ . '->new', \@_,
|
|
{name => 'oStorage'},
|
|
);
|
|
|
|
# Return from function and log return values if any
|
|
return logDebugReturn
|
|
(
|
|
$strOperation,
|
|
{name => 'self', value => $self, trace => true}
|
|
);
|
|
}
|
|
|
|
####################################################################################################################################
|
|
# process
|
|
####################################################################################################################################
|
|
sub process
|
|
{
|
|
my $self = shift;
|
|
|
|
# Assign function parameters, defaults, and log debug info
|
|
(my $strOperation) = logDebugParam (__PACKAGE__ . '->process', \@_,);
|
|
|
|
# Configure environment
|
|
my $strConfig =
|
|
"branches:\n" .
|
|
" only:\n" .
|
|
" - integration\n" .
|
|
" - /-ci\$/\n" .
|
|
"\n" .
|
|
"dist: trusty\n" .
|
|
"sudo: required\n" .
|
|
"\n" .
|
|
"language: c\n" .
|
|
"\n" .
|
|
"services:\n" .
|
|
" - docker\n" .
|
|
"\n" .
|
|
"env:\n";
|
|
|
|
# Iterate each OS
|
|
foreach my $strVm (VM_LIST)
|
|
{
|
|
$strConfig .= " - PGB_CI=\"--vm=${strVm} test\"\n";
|
|
}
|
|
|
|
$strConfig .= " - PGB_CI=\"doc\"\n";
|
|
|
|
# Configure install and script
|
|
$strConfig .=
|
|
"\n" .
|
|
"before_install:\n" .
|
|
" - sudo apt-get -qq update && sudo apt-get install libxml-checker-perl libdbd-pg-perl libperl-critic-perl" .
|
|
" libtemplate-perl libpod-coverage-perl libtest-differences-perl libhtml-parser-perl lintian debhelper txt2man" .
|
|
" devscripts libjson-perl libio-socket-ssl-perl libxml-libxml-perl libyaml-libyaml-perl python-pip lcov" .
|
|
" libjson-maybexs-perl\n" .
|
|
" - |\n" .
|
|
" # Install & Configure AWS CLI\n" .
|
|
" pip install --upgrade --user awscli\n" .
|
|
" aws configure set region us-east-1\n" .
|
|
" aws configure set aws_access_key_id accessKey1\n" .
|
|
" aws configure set aws_secret_access_key verySecretKey1\n" .
|
|
" aws help --version\n" .
|
|
" aws configure list\n" .
|
|
" - |\n" .
|
|
" # Install Devel::Cover\n" .
|
|
" sudo dpkg -i \${TRAVIS_BUILD_DIR?}/test/package/u14-" . packageDevelCover(VM_ARCH_AMD64) . "\n" .
|
|
" sudo apt-get -f install\n" .
|
|
' ' . LIB_COVER_EXE . " -v\n" .
|
|
"\n" .
|
|
"install:\n" .
|
|
" - |\n" .
|
|
" # User Configuration\n" .
|
|
" sudo adduser --ingroup=\${USER?} --uid=5001 --disabled-password --gecos \"\" " . BACKREST_USER . "\n" .
|
|
" umask 0022\n" .
|
|
" cd ~ && pwd && whoami && umask && groups\n" .
|
|
" mv \${TRAVIS_BUILD_DIR?} " . BACKREST_EXE . "\n" .
|
|
" rm -rf \${TRAVIS_BUILD_DIR?}\n" .
|
|
"\n" .
|
|
"script:\n" .
|
|
" - " . BACKREST_EXE . "/test/travis.pl \${PGB_CI?}\n";
|
|
|
|
buildPutDiffers($self->{oStorage}, '.travis.yml', $strConfig);
|
|
|
|
# Return from function and log return values if any
|
|
return logDebugReturn($strOperation);
|
|
}
|
|
|
|
1;
|