Commit | Line | Data |
b58ecb01 |
1 | #!/bin/bash |
2 | |
b58ecb01 |
3 | if [[ -n "$SHORT_CIRCUIT_SMOKE" ]] ; then return ; fi |
4 | |
61fbcea7 |
5 | # we need a mirror that both has the standard index and a backpan version rolled |
6 | # into one, due to MDV testing |
7 | CPAN_MIRROR="http://cpan.metacpan.org/" |
8 | |
9 | PERL_CPANM_OPT="$PERL_CPANM_OPT --mirror $CPAN_MIRROR" |
b58ecb01 |
10 | |
07292953 |
11 | # do not set PERLBREW_CPAN_MIRROR - not all backpan-like mirrors have the perl tarballs |
1864ab54 |
12 | export PERL_MM_USE_DEFAULT=1 PERL_MM_NONINTERACTIVE=1 PERL_AUTOINSTALL_PREFER_CPAN=1 HARNESS_TIMER=1 MAKEFLAGS="-j$VCPU_USE" |
b58ecb01 |
13 | |
2f51deb1 |
14 | # try CPAN's latest offering if requested |
15 | if [[ "$DEVREL_DEPS" == "true" ]] ; then |
16 | |
2f51deb1 |
17 | PERL_CPANM_OPT="$PERL_CPANM_OPT --dev" |
18 | |
2f51deb1 |
19 | fi |
20 | |
b58ecb01 |
21 | # Fixup CPANM_OPT to behave more like a traditional cpan client |
a1f6d93c |
22 | export PERL_CPANM_OPT="--verbose --no-interactive --no-man-pages $( echo $PERL_CPANM_OPT | sed 's/--skip-satisfied//' )" |
b58ecb01 |
23 | |
24 | if [[ -n "$BREWVER" ]] ; then |
4bbabf15 |
25 | # since perl 5.14 a perl can safely be built concurrently with -j$large |
26 | # (according to brute force testing and my power bill) |
27 | if [[ "$BREWVER" == "blead" ]] || perl -Mversion -e "exit !!(version->new(q($BREWVER)) < 5.014)" ; then |
1864ab54 |
28 | perlbrew_jopt="$VCPU_USE" |
4bbabf15 |
29 | fi |
30 | |
31 | run_or_err "Compiling/installing Perl $BREWVER (without testing, using ${perlbrew_jopt:-1} threads, may take up to 5 minutes)" \ |
32 | "perlbrew install --as $BREWVER --notest --noman --verbose $BREWOPTS -j${perlbrew_jopt:-1} $BREWVER" |
b58ecb01 |
33 | |
d2b1fee9 |
34 | # can not do 'perlbrew uss' in the run_or_err subshell above, or a $() |
35 | # furthermore `perlbrew use` returns 0 regardless of whether the perl is |
36 | # found (won't be there unless compilation suceeded, wich *ALSO* returns 0) |
37 | perlbrew use $BREWVER |
38 | |
39 | if [[ "$( perlbrew use | grep -oP '(?<=Currently using ).+' )" != "$BREWVER" ]] ; then |
40 | echo_err "Unable to switch to $BREWVER - compilation failed...?" |
41 | echo_err "$LASTOUT" |
42 | exit 1 |
43 | fi |
44 | |
2c754d14 |
45 | # no brewver - this means a travis perl, which means we want to clean up |
46 | # the presently installed libs |
1864ab54 |
47 | elif [[ "$CLEANTEST" == "true" ]] && [[ "$POISON_ENV" != "true" ]] ; then |
48 | purge_sitelib |
b58ecb01 |
49 | fi |
50 | |
51 | # configure CPAN.pm - older versions go into an endless loop |
52 | # when trying to autoconf themselves |
53 | CPAN_CFG_SCRIPT=" |
54 | require CPAN; |
55 | require CPAN::FirstTime; |
56 | *CPAN::FirstTime::conf_sites = sub {}; |
57 | CPAN::Config->load; |
b2435630 |
58 | \$CPAN::Config->{urllist} = [qw{ $CPAN_MIRROR }]; |
b58ecb01 |
59 | \$CPAN::Config->{halt_on_failure} = 1; |
60 | CPAN::Config->commit; |
61 | " |
62 | run_or_err "Configuring CPAN.pm" "perl -e '$CPAN_CFG_SCRIPT'" |
afeb40d2 |
63 | |
64 | # poison the environment |
65 | if [[ "$POISON_ENV" = "true" ]] ; then |
66 | |
16c65a37 |
67 | # look through lib, find all mentioned DBIC* ENVvars and set them to true and see if anything explodes |
68 | toggle_booleans=( $(grep -P '\$ENV\{' -r lib/ --exclude-dir Optional | grep -oP '\bDBIC\w+' | sort -u | grep -vP '^(DBIC_TRACE(_PROFILE)?|DBIC_.+_DEBUG)$') ) |
69 | |
70 | # some extra pollutants |
71 | toggle_booleans+=( \ |
7154ff35 |
72 | DBICTEST_SQLITE_USE_FILE \ |
c26b30de |
73 | DBICTEST_RUN_ALL_TESTS \ |
afeb40d2 |
74 | DBICTEST_SQLITE_REVERSE_DEFAULT_ORDER \ |
16c65a37 |
75 | ) |
afeb40d2 |
76 | |
fd2c6658 |
77 | # if we have Moose - try to run everything under replicated |
78 | # FIXME - when switching to Moo kill this |
79 | if [[ "$CLEANTEST" != "true" ]] && perl -M5.008003 -e 1 &>/dev/null ; then |
16c65a37 |
80 | toggle_booleans+=( DBICTEST_VIA_REPLICATED ) |
fd2c6658 |
81 | fi |
82 | |
afeb40d2 |
83 | # some people do in fact set this - boggle!!! |
e52712a8 |
84 | # it of course won't work before 5.8.4 |
85 | if perl -M5.008004 -e 1 &>/dev/null ; then |
16c65a37 |
86 | toggle_booleans+=( PERL_STRICTURES_EXTRA ) |
e52712a8 |
87 | fi |
afeb40d2 |
88 | |
16c65a37 |
89 | for var in "${toggle_booleans[@]}" |
90 | do |
91 | if [[ -z "${!var}" ]] ; then |
92 | export $var=1 |
93 | echo "POISON_ENV: setting $var to 1" |
94 | fi |
95 | done |
96 | |
97 | # bogus nonexisting DBI_* |
98 | export DBI_DSN="dbi:ODBC:server=NonexistentServerAddress" |
99 | export DBI_DRIVER="ADO" |
100 | |
afeb40d2 |
101 | # emulate a local::lib-like env |
102 | # trick cpanm into executing true as shell - we just need the find+unpack |
103 | run_or_err "Downloading latest stable DBIC from CPAN" \ |
104 | "SHELL=/bin/true cpanm --look DBIx::Class" |
105 | |
106 | export PERL5LIB="$( ls -d ~/.cpanm/latest-build/DBIx-Class-*/lib | tail -n1 ):$PERL5LIB" |
107 | |
108 | # perldoc -l <mod> searches $(pwd)/lib in addition to PERL5LIB etc, hence the cd / |
109 | echo_err "Latest stable DBIC (without deps) locatable via \$PERL5LIB at $(cd / && perldoc -l DBIx::Class)" |
110 | |
111 | fi |
112 | |
113 | if [[ "$CLEANTEST" != "true" ]] ; then |
114 | # using SQLT if will be available |
115 | # not doing later because we will be running in a subshell |
116 | export DBICTEST_SQLT_DEPLOY=1 |
117 | |
118 | fi |