X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Makefile.PL;h=0c7edc090ed4f79a1c05d5d5a5e569f19c25fe05;hb=HEAD;hp=d1a2d0cbe43087eebcaf90360557a1f7ba8babd1;hpb=4e9083012c0eeba2bcda808b317be999971b87d3;p=p5sagit%2Fnamespace-clean.git diff --git a/Makefile.PL b/Makefile.PL index d1a2d0c..0c7edc0 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -2,127 +2,185 @@ use strict; use warnings; use 5.008001; -use ExtUtils::MakeMaker; - -my $mymeta_works = eval { ExtUtils::MakeMaker->VERSION('6.5707'); 1 }; -my $mymeta = $mymeta_works || eval { ExtUtils::MakeMaker->VERSION('6.5702'); 1 }; - -my %BUILD_DEPS = ( - 'Test::More' => '0.88', -); - -my %RUN_DEPS = ( - 'Package::Stash' => '0.23', -); - -my %OPT_RUN_DEPS = (can_cc() ? ( - 'B::Hooks::EndOfScope' => '0.07', # when changing, also change version in namespace/clean.pm - is_smoker() ? ( 'Devel::Hide' => 0 ) : (), # make sure we smoke the pure-perl version -) : () ); +my %META = ( + name => 'namespace-clean', + license => 'perl_5', + + abstract => 'Keep imports and functions out of your namespace', + author => [ + 'Robert \'phaylon\' Sedlacek ', + 'Florian Ragwitz ', + 'Jesse Luehrs ', + 'Peter Rabbitson ', + 'Father Chrysostomos ', + ], + + prereqs => { + configure => { + requires => { + 'ExtUtils::MakeMaker' => 0, + } + }, + runtime => { + requires => { + 'B::Hooks::EndOfScope' => '0.12', + 'perl' => '5.008001', + }, + }, + test => { + requires => { + 'Test::More' => '0.47', + } + }, + }, -my %META_BITS = ( resources => { + x_IRC => 'irc://irc.perl.org/#toolchain', homepage => 'http://search.cpan.org/dist/namespace-clean', - - # EUMM not supporting nested meta :( - #repository => { - # type => 'git', - # url => 'git://git.shadowcat.co.uk/p5sagit/namespace-clean.git', - # web => 'http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit/namespace-clean.git', - #} - #bugtracker => { - # mailto => 'bug-namespace-clean@rt.cpan.org', - # web => 'http://rt.cpan.org/Public/Dist/Display.html?Name=namespace-clean', - #}, - - repository => 'git://git.shadowcat.co.uk/p5sagit/namespace-clean.git', - bugtracker => 'http://rt.cpan.org/Public/Dist/Display.html?Name=namespace-clean', + repository => { + type => 'git', + url => 'git://git.shadowcat.co.uk/p5sagit/namespace-clean.git', + web => 'https://github.com/p5sagit/namespace-clean', + }, + bugtracker => { + mailto => 'bug-namespace-clean@rt.cpan.org', + web => 'http://rt.cpan.org/Public/Dist/Display.html?Name=namespace-clean', + }, }, ); -my %WriteMakefileArgs = ( - 'NAME' => 'namespace::clean', - 'VERSION_FROM' => 'lib/namespace/clean.pm', - 'ABSTRACT' => 'Keep imports and functions out of your namespace', - 'AUTHOR' => 'Robert \'phaylon\' Sedlacek , Florian Ragwitz , Jesse Luehrs ', - - 'PREREQ_PM' => { - %RUN_DEPS, %OPT_RUN_DEPS, - $mymeta_works ? () : (%BUILD_DEPS), - }, - - $mymeta_works - ? ( # BUILD_REQUIRES makes MYMETA right, requires stops META being wrong - 'BUILD_REQUIRES' => \%BUILD_DEPS, - 'META_ADD' => { - %META_BITS, - requires => \%RUN_DEPS, - }, - ) - : ( # META_ADD both to get META right - only Makefile written - 'META_ADD' => { - %META_BITS, - requires => \%RUN_DEPS, - build_requires => \%BUILD_DEPS, - }, - ) - , - - ($mymeta and !$mymeta_works) ? ( 'NO_MYMETA' => 1 ) : (), - - 'LICENSE' => 'perl', +my %MM_ARGS = ( ( + # a sub-namer is needed if using the debugger on some perls + do { + # sigh... so much unmitigated stupidity on #p5p these days... + local @INC = ('lib', @INC); + require namespace::clean::_Util; + } + and + namespace::clean::_Util::DEBUGGER_NEEDS_CV_RENAME() + and + namespace::clean::_Util::_namer_load_error() + and + usable_compiler_present() +) + # when changing version, also change $sn_ver in namespace/clean/_Util.pm + ? ( PREREQ_PM => { 'Sub::Name' => '0.04' } ) + : () ); +## XS-checking BOILERPLATE ################################################### +sub usable_compiler_present { + return 0 if parse_args()->{PUREPERL_ONLY}; + + my $ucp; + + local $@; + eval { + # poor man's inc::latest + my $euhc_fn = 'ExtUtils/HasCompiler.pm'; + my $euhc_found_in_INC_dir; + + ( ($euhc_found_in_INC_dir) = grep { + not length ref $_ + and + -f "$_/$euhc_fn" + and + -r "$_/$euhc_fn" + } @INC ) + and + ( + MM->parse_version("$euhc_found_in_INC_dir/$euhc_fn") + > + MM->parse_version("inc/$euhc_fn") + ) + and + eval { require ExtUtils::HasCompiler }; -unless ( eval { ExtUtils::MakeMaker->VERSION('6.56') } ) { - my $br = delete $WriteMakefileArgs{BUILD_REQUIRES}; - my $pp = $WriteMakefileArgs{PREREQ_PM}; - for my $mod ( keys %$br ) { - if ( exists $pp->{$mod} ) { - $pp->{$mod} = $br->{$mod} if $br->{$mod} > $pp->{$mod}; + unless ( $INC{'ExtUtils/HasCompiler.pm'} ) { + local @INC = ( "inc", @INC ); + require ExtUtils::HasCompiler; } - else { - $pp->{$mod} = $br->{$mod}; - } - } -} - -delete $WriteMakefileArgs{CONFIGURE_REQUIRES} - unless eval { ExtUtils::MakeMaker->VERSION('6.52') }; - -WriteMakefile(%WriteMakefileArgs); - -# can we locate a (the) C compiler -sub can_cc { - my @chunks = split(/ /, $Config::Config{cc}) or return; - - # $Config{cc} may contain args; try to find out the program part - while (@chunks) { - return can_run("@chunks") || (pop(@chunks), next); + $ucp = ExtUtils::HasCompiler::can_compile_loadable_object(quiet => 1) + ? 1 + : 0 + ; + + 1; + }; + + if( my $used_fn = $INC{'ExtUtils/HasCompiler.pm'} ) { + printf + "ExtUtils::HasCompiler::can_compile_loadable_object() v%s (loaded from %s) returned: %s\n", + ExtUtils::HasCompiler->VERSION, + $used_fn, + ( defined($ucp) ? $ucp : "UNKNOWN" ), + ; + } + else { + print "Something went wrong when trying to load/use ExtUtils::HasCompiler:\n$@\n\n"; } - return; + $ucp; } -# check if we can run some command -sub can_run { - my ($cmd) = @_; - return $cmd if -x $cmd; - if (my $found_cmd = MM->maybe_command($cmd)) { - return $found_cmd; - } +# FIXME - this has been cargo-culted from +# https://metacpan.org/source/HAARG/strictures-2.000002/Makefile.PL +# There likely will be better ways to handle %ENV and @ARGV directly within +# EU::HC in the future +sub parse_args { + # copied from EUMM + require ExtUtils::MakeMaker; + require Text::ParseWords; + ExtUtils::MakeMaker::parse_args( + my $tmp = {}, + Text::ParseWords::shellwords($ENV{PERL_MM_OPT} || ''), + @ARGV, + ); + return $tmp->{ARGS} || {}; +} +## END XS-checking BOILERPLATE ############################################### + + +## BOILERPLATE ############################################################### +require ExtUtils::MakeMaker; + +# have to do this since old EUMM dev releases miss the eval $VERSION line +my $eumm_version = eval $ExtUtils::MakeMaker::VERSION; +my $mymeta = $eumm_version >= 6.57_02; +my $mymeta_broken = $mymeta && $eumm_version < 6.57_07; + +($MM_ARGS{NAME} = $META{name}) =~ s/-/::/g; +($MM_ARGS{VERSION_FROM} = "lib/$MM_ARGS{NAME}.pm") =~ s{::}{/}g; +$META{license} = [ $META{license} ] + if $META{license} && !ref $META{license}; +$MM_ARGS{LICENSE} = $META{license}[0] + if $META{license} && $eumm_version >= 6.30; +$MM_ARGS{NO_MYMETA} = 1 + if $mymeta_broken; +$MM_ARGS{META_ADD} = { 'meta-spec' => { version => 2 }, %META } + unless -f 'META.yml'; + +for (qw(configure build test runtime)) { + my $key = $_ eq 'runtime' ? 'PREREQ_PM' : uc $_.'_REQUIRES'; + my $r = $MM_ARGS{$key} = { + %{$META{prereqs}{$_}{requires} || {}}, + %{delete $MM_ARGS{$key} || {}}, + }; + defined $r->{$_} or delete $r->{$_} for keys %$r; +} - for my $dir ((split /$Config::Config{path_sep}/, $ENV{PATH}), '.') { - next if $dir eq ''; - my $abs = File::Spec->catfile($dir, $cmd); - return $abs if (-x $abs or $abs = MM->maybe_command($abs)); - } +$MM_ARGS{MIN_PERL_VERSION} = delete $MM_ARGS{PREREQ_PM}{perl} || 0; - return; -} +delete $MM_ARGS{MIN_PERL_VERSION} + if $eumm_version < 6.47_01; +$MM_ARGS{BUILD_REQUIRES} = {%{$MM_ARGS{BUILD_REQUIRES}}, %{delete $MM_ARGS{TEST_REQUIRES}}} + if $eumm_version < 6.63_03; +$MM_ARGS{PREREQ_PM} = {%{$MM_ARGS{PREREQ_PM}}, %{delete $MM_ARGS{BUILD_REQUIRES}}} + if $eumm_version < 6.55_01; +delete $MM_ARGS{CONFIGURE_REQUIRES} + if $eumm_version < 6.51_03; -sub is_smoker { - return ( $ENV{AUTOMATED_TESTING} && ! $ENV{PERL5_CPANM_IS_RUNNING} && ! $ENV{RELEASE_TESTING} ) -} +ExtUtils::MakeMaker::WriteMakefile(%MM_ARGS); +## END BOILERPLATE ###########################################################