|
Packit |
7d6a7d |
################################################################################
|
|
Packit |
7d6a7d |
#
|
|
Packit |
7d6a7d |
# Makefile.PL -- generate Makefile
|
|
Packit |
7d6a7d |
#
|
|
Packit |
7d6a7d |
################################################################################
|
|
Packit |
7d6a7d |
#
|
|
Packit |
7d6a7d |
# Version 3.x, Copyright (C) 2004-2013, Marcus Holland-Moritz.
|
|
Packit |
7d6a7d |
# Version 2.x, Copyright (C) 2001, Paul Marquess.
|
|
Packit |
7d6a7d |
# Version 1.x, Copyright (C) 1999, Kenneth Albanowski.
|
|
Packit |
7d6a7d |
#
|
|
Packit |
7d6a7d |
# This program is free software; you can redistribute it and/or
|
|
Packit |
7d6a7d |
# modify it under the same terms as Perl itself.
|
|
Packit |
7d6a7d |
#
|
|
Packit |
7d6a7d |
################################################################################
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
require 5.003;
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
use strict;
|
|
Packit |
7d6a7d |
use ExtUtils::MakeMaker;
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
use vars '%opt'; # needs to be global, and we can't use 'our'
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
unless ($ENV{'PERL_CORE'}) {
|
|
Packit |
7d6a7d |
$ENV{'PERL_CORE'} = 1 if grep { $_ eq 'PERL_CORE=1' } @ARGV;
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
@ARGV = map { /^--with-(apicheck)$/ && ++$opt{$1} ? () : $_ } @ARGV;
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
WriteMakefile(
|
|
Packit |
7d6a7d |
NAME => 'Devel::PPPort',
|
|
Packit |
7d6a7d |
VERSION_FROM => 'PPPort_pm.PL',
|
|
Packit |
7d6a7d |
PM => { 'PPPort.pm' => '$(INST_LIBDIR)/PPPort.pm' },
|
|
Packit |
7d6a7d |
H => [ qw(ppport.h) ],
|
|
Packit |
7d6a7d |
OBJECT => 'RealPPPort$(OBJ_EXT) $(O_FILES)',
|
|
Packit |
7d6a7d |
XSPROTOARG => '-noprototypes',
|
|
Packit |
7d6a7d |
CONFIGURE => \&configure,
|
|
Packit |
7d6a7d |
META_MERGE => {
|
|
Packit |
7d6a7d |
'meta-spec' => {
|
|
Packit |
7d6a7d |
version => 2,
|
|
Packit |
7d6a7d |
},
|
|
Packit |
7d6a7d |
resources => {
|
|
Packit |
7d6a7d |
bugtracker => {
|
|
Packit |
7d6a7d |
web => 'https://github.com/mhx/Devel-PPPort/issues/',
|
|
Packit |
7d6a7d |
},
|
|
Packit |
7d6a7d |
repository => {
|
|
Packit |
7d6a7d |
type => 'git',
|
|
Packit |
7d6a7d |
url => 'git://github.com/mhx/Devel-PPPort.git',
|
|
Packit |
7d6a7d |
web => 'https://github.com/mhx/Devel-PPPort/',
|
|
Packit |
7d6a7d |
},
|
|
Packit |
7d6a7d |
},
|
|
Packit |
7d6a7d |
},
|
|
Packit |
7d6a7d |
);
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
sub configure
|
|
Packit |
7d6a7d |
{
|
|
Packit |
7d6a7d |
my @clean = qw{ $(H_FILES) RealPPPort.xs RealPPPort.c };
|
|
Packit |
7d6a7d |
my %depend = ('$(OBJECT)' => '$(H_FILES)');
|
|
Packit |
7d6a7d |
my @C_FILES = qw{ module2.c module3.c },
|
|
Packit |
7d6a7d |
my %PL_FILES = (
|
|
Packit |
7d6a7d |
'ppport_h.PL' => 'ppport.h',
|
|
Packit |
7d6a7d |
'PPPort_pm.PL' => 'PPPort.pm',
|
|
Packit |
7d6a7d |
'PPPort_xs.PL' => 'RealPPPort.xs',
|
|
Packit |
7d6a7d |
);
|
|
Packit |
7d6a7d |
my @moreopts;
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
if (eval $ExtUtils::MakeMaker::VERSION >= 6) {
|
|
Packit |
7d6a7d |
push @moreopts, AUTHOR => 'Marcus Holland-Moritz <mhx@cpan.org>';
|
|
Packit |
7d6a7d |
if (-f 'PPPort.pm') {
|
|
Packit |
7d6a7d |
push @moreopts, ABSTRACT_FROM => 'PPPort.pm';
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
if (eval $ExtUtils::MakeMaker::VERSION >= 6.30_01) {
|
|
Packit |
7d6a7d |
print "Setting license tag...\n";
|
|
Packit |
7d6a7d |
push @moreopts, LICENSE => 'perl';
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
if ($ENV{'PERL_CORE'}) {
|
|
Packit |
7d6a7d |
# Pods will be built by installman.
|
|
Packit |
7d6a7d |
push @clean, 'PPPort.pm';
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
else {
|
|
Packit |
7d6a7d |
# Devel::PPPort is in the core since 5.7.3
|
|
Packit |
7d6a7d |
# 5.11.0+ has site before perl
|
|
Packit |
7d6a7d |
push @moreopts, INSTALLDIRS => (
|
|
Packit |
7d6a7d |
($] >= 5.007003 and $] < 5.011)
|
|
Packit |
7d6a7d |
? 'perl'
|
|
Packit |
7d6a7d |
: 'site'
|
|
Packit |
7d6a7d |
);
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
if ($opt{'apicheck'}) {
|
|
Packit |
7d6a7d |
$PL_FILES{'apicheck_c.PL'} = 'apicheck.c';
|
|
Packit |
7d6a7d |
push @C_FILES, qw{ apicheck.c };
|
|
Packit |
7d6a7d |
push @clean, qw{ apicheck.c apicheck.i };
|
|
Packit |
7d6a7d |
$depend{'apicheck.i'} = 'ppport.h';
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
return {
|
|
Packit |
7d6a7d |
C => \@C_FILES,
|
|
Packit |
7d6a7d |
XS => { 'RealPPPort.xs' => 'RealPPPort.c' },
|
|
Packit |
7d6a7d |
PL_FILES => \%PL_FILES,
|
|
Packit |
7d6a7d |
depend => \%depend,
|
|
Packit |
7d6a7d |
clean => { FILES => "@clean" },
|
|
Packit |
7d6a7d |
@moreopts,
|
|
Packit |
7d6a7d |
};
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
sub MY::postamble
|
|
Packit |
7d6a7d |
{
|
|
Packit |
7d6a7d |
package MY;
|
|
Packit |
7d6a7d |
my $post = shift->SUPER::postamble(@_);
|
|
Packit |
7d6a7d |
$post .= <<'POSTAMBLE';
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
purge_all: realclean
|
|
Packit |
7d6a7d |
@$(RM_F) PPPort.pm t/*.t
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
regen_pm:
|
|
Packit |
7d6a7d |
$(PERL) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) PPPort_pm.PL
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
regen_xs:
|
|
Packit |
7d6a7d |
$(PERL) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) PPPort_xs.PL
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
regen_tests:
|
|
Packit |
7d6a7d |
$(PERL) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) mktests.PL
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
regen_h:
|
|
Packit |
7d6a7d |
$(PERL) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) ppport_h.PL
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
regen: regen_pm regen_xs regen_tests regen_h
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
POSTAMBLE
|
|
Packit |
7d6a7d |
return $post;
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
sub MY::c_o
|
|
Packit |
7d6a7d |
{
|
|
Packit |
7d6a7d |
package MY;
|
|
Packit |
7d6a7d |
my $co = shift->SUPER::c_o(@_);
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
if ($::opt{'apicheck'} && $co !~ /^\.c\.i:/m) {
|
|
Packit |
7d6a7d |
print "Adding custom rule for preprocessed apicheck file...\n";
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
$co .= <<'CO'
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
.SUFFIXES: .i
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
.c.i:
|
|
Packit |
7d6a7d |
$(CCCMD) -E -I$(PERL_INC) $(DEFINE) $*.c > $*.i
|
|
Packit |
7d6a7d |
CO
|
|
Packit |
7d6a7d |
}
|
|
Packit |
7d6a7d |
|
|
Packit |
7d6a7d |
return $co;
|
|
Packit |
7d6a7d |
}
|