Blame Makefile.PL

Packit d0f5c2
#
Packit d0f5c2
# $Id: Makefile.PL,v 2.22 2017/10/06 22:21:53 dankogai Exp $
Packit d0f5c2
#
Packit d0f5c2
use 5.007003;
Packit d0f5c2
use strict;
Packit d0f5c2
use warnings;
Packit d0f5c2
use utf8;
Packit d0f5c2
use ExtUtils::MakeMaker;
Packit d0f5c2
use File::Spec;
Packit d0f5c2
use Config;
Packit d0f5c2
Packit d0f5c2
# Just for sure :)
Packit d0f5c2
my %ARGV = map { my @r = split /=/,$_; defined $r[1] or $r[1]=1; @r } @ARGV;
Packit d0f5c2
$ARGV{DEBUG} and warn "$_ => $ARGV{$_}\n" for sort keys  %ARGV;
Packit d0f5c2
$ENV{PERL_CORE} ||= $ARGV{PERL_CORE} if $ARGV{PERL_CORE};
Packit d0f5c2
# similar strictness as in core
Packit d0f5c2
my $ccflags = $Config{ccflags};
Packit d0f5c2
if (!$ENV{PERL_CORE}) {
Packit d0f5c2
  if (my $gccver = $Config{gccversion}) {
Packit d0f5c2
    $gccver =~ s/\.//g; $gccver =~ s/ .*//;
Packit d0f5c2
    $gccver .= "0" while length $gccver < 3;
Packit d0f5c2
    $gccver = 0+$gccver;
Packit d0f5c2
    $ccflags .= ' -Werror=declaration-after-statement' if $gccver > 412;
Packit d0f5c2
    $ccflags .= ' -Wpointer-sign' if !$Config{d_cplusplus} and $gccver > 400;
Packit d0f5c2
    $ccflags .= ' -fpermissive' if $Config{d_cplusplus};
Packit d0f5c2
  }
Packit d0f5c2
}
Packit d0f5c2
Packit d0f5c2
my %tables = 
Packit d0f5c2
    (
Packit d0f5c2
     def_t => [
Packit d0f5c2
           'ascii.ucm',
Packit d0f5c2
           '8859-1.ucm',
Packit d0f5c2
           'cp1252.ucm',
Packit d0f5c2
           'null.ucm',
Packit d0f5c2
           'ctrl.ucm',
Packit d0f5c2
           ]
Packit d0f5c2
     );
Packit d0f5c2
Packit d0f5c2
my @exe_files = qw(bin/enc2xs
Packit d0f5c2
           bin/piconv
Packit d0f5c2
           bin/encguess
Packit d0f5c2
           );
Packit d0f5c2
my @more_exe_files = qw(
Packit d0f5c2
            unidump
Packit d0f5c2
            );
Packit d0f5c2
my @pmlibdirs = qw(lib Encode);
Packit d0f5c2
Packit d0f5c2
$ARGV{MORE_SCRIPTS} and push @exe_files, @more_exe_files;
Packit d0f5c2
$ARGV{INSTALL_UCM}   and push @pmlibdirs, "ucm";
Packit d0f5c2
Packit d0f5c2
WriteMakefile(
Packit d0f5c2
    NAME         => "Encode",
Packit d0f5c2
    EXE_FILES    => \@exe_files,
Packit d0f5c2
    VERSION_FROM => 'Encode.pm',
Packit d0f5c2
    ABSTRACT_FROM=> 'Encode.pm',
Packit d0f5c2
    AUTHOR       => 'Dan Kogai <dankogai@dan.co.jp>',
Packit d0f5c2
    OBJECT       => '$(O_FILES)',
Packit d0f5c2
    'dist'       => {
Packit d0f5c2
        COMPRESS     => 'gzip -9f',
Packit d0f5c2
        SUFFIX       => 'gz',
Packit d0f5c2
        DIST_DEFAULT => 'all tardist',
Packit d0f5c2
    },
Packit d0f5c2
    CCFLAGS     => $ccflags,
Packit d0f5c2
    INC         => '-I' . File::Spec->catfile( '.', 'Encode' ),
Packit d0f5c2
    LICENSE     => 'perl',
Packit d0f5c2
    PREREQ_PM   => {
Packit d0f5c2
        Exporter   => '5.57',   # use Exporter 'import';
Packit d0f5c2
	parent     => '0.221',  # version bundled with 5.10.1
Packit d0f5c2
        Storable   => '0',      # bundled with Perl 5.7.3
Packit d0f5c2
    },
Packit d0f5c2
    TEST_REQUIRES => {
Packit d0f5c2
        'Test::More' => '0.81_01',
Packit d0f5c2
    },
Packit d0f5c2
    PMLIBDIRS   => \@pmlibdirs,
Packit d0f5c2
    INSTALLDIRS => ($] < 5.011 ? 'perl' : 'site'),
Packit d0f5c2
    META_MERGE        => {
Packit d0f5c2
        resources => {
Packit d0f5c2
            repository  =>  'https://github.com/dankogai/p5-encode',
Packit d0f5c2
        },
Packit d0f5c2
        x_contributors => [
Packit d0f5c2
            'Alex Davies <alex.davies@talktalk.net>',
Packit d0f5c2
            'Alex Kapranoff <alex@kapranoff.ru>',
Packit d0f5c2
            'Alex Vandiver <alex@chmrr.net>',
Packit d0f5c2
            'Andreas J. Koenig <andreas.koenig@anima.de>',
Packit d0f5c2
            'Andrew Pennebaker <andrew.pennebaker@networkedinsights.com>',
Packit d0f5c2
            'Andy Grundman <andyg@activestate.com>',
Packit d0f5c2
            'Anton Tagunov <tagunov@motor.ru>',
Packit d0f5c2
            'Autrijus Tang <autrijus@autrijus.org>',
Packit d0f5c2
            'Benjamin Goldberg <goldbb2@earthlink.net>',
Packit d0f5c2
            'Bjoern Hoehrmann <derhoermi@gmx.net>',
Packit d0f5c2
            'Bjoern Jacke <debianbugs@j3e.de>',
Packit d0f5c2
            'bulk88 <bulk88@hotmail.com>',
Packit d0f5c2
            'Craig A. Berry <craigberry@mac.com>',
Packit d0f5c2
            'Curtis Jewell <csjewell@cpan.org>',
Packit d0f5c2
            'Dan Kogai <dankogai@dan.co.jp>',
Packit d0f5c2
            'Dave Evans <dave@rudolf.org.uk>',
Packit d0f5c2
            'David Golden <dagolden@cpan.org>',
Packit d0f5c2
            'David Steinbrunner <dsteinbrunner@pobox.com>',
Packit d0f5c2
            'Deng Liu <dengliu@ntu.edu.tw>',
Packit d0f5c2
            'Dominic Dunlop <domo@computer.org>',
Packit d0f5c2
            'drry',
Packit d0f5c2
            'Elizabeth Mattijsen <liz@dijkmat.nl>',
Packit d0f5c2
            'Flavio Poletti <flavio@polettix.it>',
Packit d0f5c2
            'Gerrit P. Haase <gp@familiehaase.de>',
Packit d0f5c2
            'Gisle Aas <gisle@ActiveState.com>',
Packit d0f5c2
            'Graham Barr <gbarr@pobox.com>',
Packit d0f5c2
            'Graham Knop <haarg@haarg.org>',
Packit d0f5c2
            'Graham Ollis <perl@wdlabs.com>',
Packit d0f5c2
            'Gurusamy Sarathy <gsar@activestate.com>',
Packit d0f5c2
            'H.Merijn Brand <h.m.brand@xs4all.nl>',
Packit d0f5c2
            'Hugo van der Sanden <hv@crypt.org>',
Packit d0f5c2
            'chansen <chansen@cpan.org>',
Packit d0f5c2
            'Chris Nandor <pudge@pobox.com>',
Packit d0f5c2
            'Inaba Hiroto <inaba@st.rim.or.jp>',
Packit d0f5c2
            'Jarkko Hietaniemi <jhi@iki.fi>',
Packit d0f5c2
            'Jesse Vincent <jesse@fsck.com>',
Packit d0f5c2
            'Jungshik Shin <jshin@mailaps.org>',
Packit d0f5c2
            'Karen Etheridge <ether@cpan.org>',
Packit d0f5c2
            'Karl Williamson <khw@cpan.org>',
Packit d0f5c2
            'Kenichi Ishigaki <ishigaki@cpan.org>',
Packit d0f5c2
            'KONNO Hiroharu <hiroharu.konno@bowneglobal.co.jp>',
Packit d0f5c2
            'Laszlo Molnar <ml1050@freemail.hu>',
Packit d0f5c2
            'Makamaka <makamaka@donzoko.net>',
Packit d0f5c2
            'Mark-Jason Dominus <mjd@plover.com>',
Packit d0f5c2
            'Masahiro Iuchi <masahiro.iuchi@gmail.com>',
Packit d0f5c2
            'MATSUNO Tokuhiro <tokuhirom+cpan@gmail.com>',
Packit d0f5c2
            'Mattia Barbon <mbarbon@dsi.unive.it>',
Packit d0f5c2
            'Michael G Schwern <schwern@pobox.com>',
Packit d0f5c2
            'Michael LaGrasta <michael@lagrasta.com>',
Packit d0f5c2
            'Miron Cuperman <miron@hyper.to>',
Packit d0f5c2
            'Moritz Lenz <moritz@faui2k3.org>',
Packit d0f5c2
            'MORIYAMA Masayuki <msyk@mtg.biglobe.ne.jp>',
Packit d0f5c2
            'Nick Ing-Simmons <nick@ing-simmons.net>',
Packit d0f5c2
            'Nicholas Clark <nick@ccl4.org>',
Packit d0f5c2
            'Olivier Mengué <dolmen@cpan.org>',
Packit d0f5c2
            'otsune',
Packit d0f5c2
            'Pali <pali@cpan.org>',
Packit d0f5c2
            'Paul Marquess <paul_marquess@yahoo.co.uk>',
Packit d0f5c2
            'Peter Prymmer <pvhp@best.com>',
Packit d0f5c2
            'Peter Rabbitson <ribasushi@cpan.org>',
Packit d0f5c2
            'Philip Newton <pne@cpan.org>',
Packit d0f5c2
            'Piotr Fusik <pfusik@op.pl>',
Packit d0f5c2
            'Rafael Garcia-Suarez <rgarciasuarez@mandriva.com>',
Packit d0f5c2
            'Randy Stauner <randy@magnificent-tears.com>',
Packit d0f5c2
            'Reini Urban <rurban@cpan.org>',
Packit d0f5c2
            'Robin Barker <rmb1@cise.npl.co.uk>',
Packit d0f5c2
            'SADAHIRO Tomoyuki <SADAHIRO@cpan.org>',
Packit d0f5c2
            'Simon Cozens <simon@netthink.co.uk>',
Packit d0f5c2
            'Slaven Rezic <SREZIC@cpan.org>',
Packit d0f5c2
            'Spider Boardman <spider@web.zk3.dec.com>',
Packit d0f5c2
            'Steve Hay <steve.m.hay@googlemail.com>',
Packit d0f5c2
            'Steve Peters <steve@fisharerojo.org>',
Packit d0f5c2
            'SUGAWARA Hajime <sugawara@hdt.co.jp>',
Packit d0f5c2
            'SUZUKI Norio <ZAP00217@nifty.com>',
Packit d0f5c2
            'szr8 <blz.marcel@gmail.com>',
Packit d0f5c2
            'Tatsuhiko Miyagawa <miyagawa@bulknews.net>',
Packit d0f5c2
            'Tels <perl_dummy@bloodgate.com>',
Packit d0f5c2
            'Tony Cook <tony@develop-help.com>',
Packit d0f5c2
            'Vadim Konovalov <vkonovalov@peterstar.ru>',
Packit d0f5c2
            'Victor <victor@vsespb.ru>',
Packit d0f5c2
            'Ville Skyttä <ville.skytta@iki.fi>',
Packit d0f5c2
            'Vincent van Dam <vvandam@sandvine.com>',
Packit d0f5c2
            'Yitzchak Scott-Thoennes <sthoenna@efn.org>',
Packit d0f5c2
        ],
Packit d0f5c2
    },
Packit d0f5c2
);
Packit d0f5c2
Packit d0f5c2
package MY;
Packit d0f5c2
Packit d0f5c2
Packit d0f5c2
sub post_initialize
Packit d0f5c2
{
Packit d0f5c2
    my ($self) = @_;
Packit d0f5c2
    my %o;
Packit d0f5c2
    # Find existing O_FILES
Packit d0f5c2
    foreach my $f (@{$self->{'O_FILES'}})
Packit d0f5c2
    {
Packit d0f5c2
    $o{$f} = 1;
Packit d0f5c2
    }
Packit d0f5c2
    my $x = $self->{'OBJ_EXT'};
Packit d0f5c2
    # Add the table O_FILES
Packit d0f5c2
    foreach my $e (keys %tables)
Packit d0f5c2
    {
Packit d0f5c2
    $o{$e.$x} = 1;
Packit d0f5c2
    }
Packit d0f5c2
    # Trick case-blind filesystems.
Packit d0f5c2
    delete $o{'encode'.$x};
Packit d0f5c2
    $o{'Encode'.$x} = 1;
Packit d0f5c2
    # Reset the variable
Packit d0f5c2
    $self->{'O_FILES'} = [sort keys %o];
Packit d0f5c2
    my @files;
Packit d0f5c2
    foreach my $table (sort keys %tables)
Packit d0f5c2
    {
Packit d0f5c2
    foreach my $ext (qw($(OBJ_EXT) .c .h .exh .fnm))
Packit d0f5c2
    {
Packit d0f5c2
    push (@files,$table.$ext);
Packit d0f5c2
    }
Packit d0f5c2
    $self->{SOURCE} .= " $table.c"
Packit d0f5c2
    if $^O eq 'MacOS' && $self->{SOURCE} !~ /\b$table\.c\b/;
Packit d0f5c2
}
Packit d0f5c2
$self->{'clean'}{'FILES'} .= join(' ',@files);
Packit d0f5c2
return '';
Packit d0f5c2
}
Packit d0f5c2
Packit d0f5c2
sub postamble
Packit d0f5c2
{
Packit d0f5c2
    my $self = shift;
Packit d0f5c2
    my $dir  = $self->catdir($self->curdir,'ucm');
Packit d0f5c2
    my $str  = "# Encode\$(OBJ_EXT) does not depend on .c files directly\n";
Packit d0f5c2
    $str  .= "# (except Encode.c), but on .h and .exh files written by enc2xs\n";
Packit d0f5c2
    $str  .= $^O eq 'MacOS' ? 'Encode.c.{$(MACPERL_BUILD_EXT_STATIC)}.o :' : 'Encode$(OBJ_EXT) :';
Packit d0f5c2
    $str  .= ' Encode.c';
Packit d0f5c2
    foreach my $table (sort keys %tables)
Packit d0f5c2
    {
Packit d0f5c2
    $str .= " $table.c";
Packit d0f5c2
    }
Packit d0f5c2
    $str .= "\n\n";
Packit d0f5c2
    foreach my $table (sort keys %tables)
Packit d0f5c2
    {
Packit d0f5c2
    my $numlines = 1;
Packit d0f5c2
    my $lengthsofar = length($str);
Packit d0f5c2
    my $continuator = '';
Packit d0f5c2
    my $enc2xs = $self->catfile('bin', 'enc2xs');
Packit d0f5c2
    $str .= "$table.c : $enc2xs Makefile.PL";
Packit d0f5c2
    foreach my $file (@{$tables{$table}})
Packit d0f5c2
    {
Packit d0f5c2
        $str .= $continuator.' '.$self->catfile($dir,$file);
Packit d0f5c2
        if ( length($str)-$lengthsofar > 128*$numlines )
Packit d0f5c2
        {
Packit d0f5c2
        $continuator .= " \\\n\t";
Packit d0f5c2
        $numlines++;
Packit d0f5c2
        } else {
Packit d0f5c2
        $continuator = '';
Packit d0f5c2
        }
Packit d0f5c2
    }
Packit d0f5c2
    my $plib   = $self->{PERL_CORE} ? '"-I$(PERL_LIB)"' : '';
Packit d0f5c2
    $plib .= " -MCross=$::Cross::platform" if defined $::Cross::platform;
Packit d0f5c2
    my $ucopts = '-"Q" -"O"';
Packit d0f5c2
    $str .=
Packit d0f5c2
        qq{\n\t\$(PERL) $plib $enc2xs $ucopts -o \$\@ -f $table.fnm\n\n};
Packit d0f5c2
    open (FILELIST, ">$table.fnm")
Packit d0f5c2
        || die "Could not open $table.fnm: $!";
Packit d0f5c2
    foreach my $file (@{$tables{$table}})
Packit d0f5c2
    {
Packit d0f5c2
        print FILELIST $self->catfile($dir,$file) . "\n";
Packit d0f5c2
    }
Packit d0f5c2
    close(FILELIST);
Packit d0f5c2
    }
Packit d0f5c2
    return $str;
Packit d0f5c2
}