Commit | Line | Data |
b58ecb01 |
1 | #!/bin/bash |
2 | |
3 | source maint/travis-ci_scripts/common.bash |
4 | if [[ -n "$SHORT_CIRCUIT_SMOKE" ]] ; then return ; fi |
5 | |
b2435630 |
6 | CPAN_MIRROR=$(echo "$PERL_CPANM_OPT" | grep -oP -- '--mirror\s+\S+' | head -n 1 | cut -d ' ' -f 2) |
7 | if ! [[ "$CPAN_MIRROR" =~ "http://" ]] ; then |
b58ecb01 |
8 | echo_err "Unable to extract primary cpan mirror from PERL_CPANM_OPT - something is wrong" |
9 | echo_err "PERL_CPANM_OPT: $PERL_CPANM_OPT" |
8785f110 |
10 | CPAN_MIRROR="http://cpan.metacpan.org/" |
d71417ff |
11 | PERL_CPANM_OPT="$PERL_CPANM_OPT --mirror $CPAN_MIRROR" |
b2435630 |
12 | echo_err "Using $CPAN_MIRROR for the time being" |
b58ecb01 |
13 | fi |
14 | |
b2435630 |
15 | export PERL_MM_USE_DEFAULT=1 PERL_MM_NONINTERACTIVE=1 PERL_AUTOINSTALL_PREFER_CPAN=1 PERLBREW_CPAN_MIRROR="$CPAN_MIRROR" |
b58ecb01 |
16 | |
2f51deb1 |
17 | # try CPAN's latest offering if requested |
18 | if [[ "$DEVREL_DEPS" == "true" ]] ; then |
19 | |
20 | if [[ "$CLEANTEST" == "true" ]] ; then |
21 | echo_err "DEVREL_DEPS combined with CLEANTEST makes no sense - it is only possible with cpanm" |
22 | exit 1 |
23 | fi |
24 | |
25 | PERL_CPANM_OPT="$PERL_CPANM_OPT --dev" |
26 | |
8cddfc1b |
27 | # FIXME inline-upgrade cpanm, work around https://github.com/travis-ci/travis-ci/issues/1477 |
28 | cpanm_loc="$(which cpanm)" |
29 | run_or_err "Upgrading cpanm ($cpanm_loc) to latest stable" \ |
30 | "wget -q -O $cpanm_loc cpanmin.us && chmod a+x $cpanm_loc" |
2f51deb1 |
31 | fi |
32 | |
b58ecb01 |
33 | # Fixup CPANM_OPT to behave more like a traditional cpan client |
a1f6d93c |
34 | export PERL_CPANM_OPT="--verbose --no-interactive --no-man-pages $( echo $PERL_CPANM_OPT | sed 's/--skip-satisfied//' )" |
b58ecb01 |
35 | |
36 | if [[ -n "$BREWVER" ]] ; then |
4bbabf15 |
37 | # since perl 5.14 a perl can safely be built concurrently with -j$large |
38 | # (according to brute force testing and my power bill) |
39 | if [[ "$BREWVER" == "blead" ]] || perl -Mversion -e "exit !!(version->new(q($BREWVER)) < 5.014)" ; then |
40 | perlbrew_jopt="$NUMTHREADS" |
41 | fi |
42 | |
43 | run_or_err "Compiling/installing Perl $BREWVER (without testing, using ${perlbrew_jopt:-1} threads, may take up to 5 minutes)" \ |
44 | "perlbrew install --as $BREWVER --notest --noman --verbose $BREWOPTS -j${perlbrew_jopt:-1} $BREWVER" |
b58ecb01 |
45 | |
d2b1fee9 |
46 | # can not do 'perlbrew uss' in the run_or_err subshell above, or a $() |
47 | # furthermore `perlbrew use` returns 0 regardless of whether the perl is |
48 | # found (won't be there unless compilation suceeded, wich *ALSO* returns 0) |
49 | perlbrew use $BREWVER |
50 | |
51 | if [[ "$( perlbrew use | grep -oP '(?<=Currently using ).+' )" != "$BREWVER" ]] ; then |
52 | echo_err "Unable to switch to $BREWVER - compilation failed...?" |
53 | echo_err "$LASTOUT" |
54 | exit 1 |
55 | fi |
56 | |
2c754d14 |
57 | # no brewver - this means a travis perl, which means we want to clean up |
58 | # the presently installed libs |
59 | # Idea stolen from |
60 | # https://github.com/kentfredric/Dist-Zilla-Plugin-Prereqs-MatchInstalled-All/blob/master/maint-travis-ci/sterilize_env.pl |
61 | elif [[ "$CLEANTEST" == "true" ]] && [[ "$POISON_ENV" != "true" ]] ; then |
62 | |
63 | echo_err "$(tstamp) Cleaning precompiled Travis-Perl" |
64 | perl -MConfig -MFile::Find -e ' |
65 | my $sitedirs = { |
66 | map { $Config{$_} => 1 } |
67 | grep { $_ =~ /site(lib|arch)exp$/ } |
68 | keys %Config |
69 | }; |
70 | find({ bydepth => 1, no_chdir => 1, follow_fast => 1, wanted => sub { |
71 | ! $sitedirs->{$_} and ( -d _ ? rmdir : unlink ) |
72 | } }, keys %$sitedirs ) |
73 | ' |
74 | |
75 | echo_err "Post-cleanup contents of sitelib of the pre-compiled Travis-Perl $TRAVIS_PERL_VERSION:" |
76 | echo_err "$(tree $(perl -MConfig -e 'print $Config{sitelib_stem}'))" |
77 | echo_err |
b58ecb01 |
78 | fi |
79 | |
80 | # configure CPAN.pm - older versions go into an endless loop |
81 | # when trying to autoconf themselves |
82 | CPAN_CFG_SCRIPT=" |
83 | require CPAN; |
84 | require CPAN::FirstTime; |
85 | *CPAN::FirstTime::conf_sites = sub {}; |
86 | CPAN::Config->load; |
b2435630 |
87 | \$CPAN::Config->{urllist} = [qw{ $CPAN_MIRROR }]; |
b58ecb01 |
88 | \$CPAN::Config->{halt_on_failure} = 1; |
89 | CPAN::Config->commit; |
90 | " |
91 | run_or_err "Configuring CPAN.pm" "perl -e '$CPAN_CFG_SCRIPT'" |