From b54e085390dc441f2d80700d0bfbeeb0a8d7cd3f Mon Sep 17 00:00:00 2001 From: mcr Date: Tue, 2 Oct 2001 01:25:35 +0000 Subject: pkg from sen_ml@eccosys.com in support of p5-Crypt-OpenPGP --- math/p5-Math-Pari/Makefile | 31 ++++ math/p5-Math-Pari/distinfo | 4 + math/p5-Math-Pari/files/Makefile.PL | 328 ++++++++++++++++++++++++++++++++++++ math/p5-Math-Pari/pkg/DESCR | 4 + math/p5-Math-Pari/pkg/PLIST | 1 + 5 files changed, 368 insertions(+) create mode 100644 math/p5-Math-Pari/Makefile create mode 100644 math/p5-Math-Pari/distinfo create mode 100644 math/p5-Math-Pari/files/Makefile.PL create mode 100644 math/p5-Math-Pari/pkg/DESCR create mode 100644 math/p5-Math-Pari/pkg/PLIST (limited to 'math/p5-Math-Pari') diff --git a/math/p5-Math-Pari/Makefile b/math/p5-Math-Pari/Makefile new file mode 100644 index 00000000000..064c21c4bac --- /dev/null +++ b/math/p5-Math-Pari/Makefile @@ -0,0 +1,31 @@ +# $NetBSD: Makefile,v 1.1 2001/10/02 01:34:14 mcr Exp $ +# + +DISTNAME= Math-Pari-2.001804 +PKGNAME= p5-${DISTNAME} +CATEGORIES= math perl5 +MASTER_SITES= ${MASTER_SITE_PERL_CPAN:=Math/} + +MAINTAINER= packages@netbsd.org +#HOMEPAGE= +COMMENT= perl5 interface to the pari math library + +DEPENDS+= pari-*:../../math/pari +# XXX: to use or not to use... +#DEPENDS+= gnuplot-*:../../graphics/gnuplot + +USE_PERL5= # defined +PERL5_PACKLIST= ${PERL5_SITEARCH}/auto/Math/Pari/.packlist + +# XXX: could be improved... +post-extract: + if [ ! -d ${BUILD_ROOT}/math/pari/${WRKDIR_BASENAME} ]; then \ + cd ${BUILD_ROOT}/math/pari && ${MAKE}; \ + fi + ${RM} -f ${WRKSRC}/pari-* + ${LN} -sf ${BUILD_ROOT}/math/pari/${WRKDIR_BASENAME}/pari-* ${WRKSRC}/ + +do-configure: + @cd ${WRKSRC}; ${SETENV} ${MAKE_ENV} ${PERL5} Makefile.PL + +.include "../../mk/bsd.pkg.mk" diff --git a/math/p5-Math-Pari/distinfo b/math/p5-Math-Pari/distinfo new file mode 100644 index 00000000000..d1da2ee00bd --- /dev/null +++ b/math/p5-Math-Pari/distinfo @@ -0,0 +1,4 @@ +$NetBSD: distinfo,v 1.1 2001/10/02 01:34:15 mcr Exp $ + +SHA1 (Math-Pari-2.001804.tar.gz) = adb19ceb2acdf716869a519b0d75923c1276df83 +Size (Math-Pari-2.001804.tar.gz) = 100492 bytes diff --git a/math/p5-Math-Pari/files/Makefile.PL b/math/p5-Math-Pari/files/Makefile.PL new file mode 100644 index 00000000000..600621aa121 --- /dev/null +++ b/math/p5-Math-Pari/files/Makefile.PL @@ -0,0 +1,328 @@ +# $Id: Makefile.PL,v 1.1 2001/10/02 01:34:23 mcr Exp $ +use ExtUtils::MakeMaker; +use Config '%Config'; +use File::Copy 'copy'; + +# Uncomment and change this line if I fail to find it +$paridir = "../../../../math/pari/work/pari-2.1.1"; + +unless (-t STDOUT) { # Better reports if run with redirections + my $odef = select STDERR; + $| = 1; + select STDOUT; + $| = 1; + select $odef; +} + +$latmus = 'src/test/in/nfields'; + +sub format_pari { + my $dir = shift; + $dir =~ s/(\d+)\.(\d+).(\d+)/sprintf('%03d%03d%03d',$1,$2,$3)/e; + $dir; +} + +unless (defined $paridir) { + # Assume we are inside: + for $dir ('..', '../..') { + $paridir = $dir, last + if -e "$dir/$latmus"; + } + unless (defined $paridir) { + # Try to find alongside + for $dir ('.', '..', '../..') { + @dirs = <$dir/pari-[234].*>; + @dirs = grep -e "$_/$latmus", @dirs; + last if @dirs; + } + @gooddirs = grep !/alpha|beta/, @dirs; + @gooddirs = grep !/alpha/, @dirs unless @gooddirs; + @gooddirs = @dirs unless @gooddirs; + @gooddirs = sort {format_pari($a) cmp format_pari($b)} @gooddirs; + $paridir = $gooddirs[-1] if @gooddirs; + } +} + +$paridir = get_pari() if !$paridir; + +if ($paridir) { + $pari_version = format_pari($paridir); + print <; + if (@sc_dirs) { + $libs .= " -L$sc_dirs[-1]/lib -lsunmath -lm"; + } else { + warn "Cannot find SUNWspro dirs, needed for -lsunmath, using NOEXP2.\n"; + $noexp2 = 1; + } +} elsif ($os eq "os2") { + $noexp2 = 1; + $define .= " -DMALLOC_PROCS"; +} elsif ($os eq 'linux') { + $noexp2 = 1; +} + + +# We want to find the offset of the least significant byte +# of SV.flags inside an SV. +# It is enough to find the offset of the least significant byte inside a U32. +# (Needed for recognizing Perl code supplied to lisseq and lisexpr.) + +$offset = index($Config{byteorder}, "1"); +$offset = 3 if $offset > 3; # SvFLAGS is actually I32 + +$define .= " -DLSB_in_U32=$offset"; +$parisrc = "$paridir/src"; +$paritests = "$parisrc/test/in"; + +opendir TESTS, $paritests + or die "Cannot find tests in $paritests: $!"; +@tests = readdir TESTS; +closedir TESTS or die "Cannot find tests (close): $!"; +$sou = 'test_eng/ex.t'; +next if -e $targ and -M $targ <= -M $sou; +#if (not -e "$sou-" or -M "$sou-" > -M $sou) { + system "$^X -pe 's,CHANGE_ME,$paridir,' $sou > $sou- " + and die "Could not run test converter: $! $?"; +#} +$sou = "$sou-"; +for $test (@tests) { + next if $test =~ /^\.\.?$/; + next if $test =~ /compat/; + next if -d "$paritests/$test" and $test eq 'CVS'; + next if $test =~ /(~|\.(bak|orig|rej))$/; + $targ = "t/$test.t"; + if (-f $targ) { + chmod 0666, $targ; + unlink $targ; + } + copy $sou, $targ or die "Cannot create test $test.t: $1"; +} +$targ = 'libPARI.pod'; +if (not -e $targ + or -M $targ > -M "$paridir/doc/usersch3.tex" + or -M $targ > -M "paridoc_to_pod") { + if (-f $targ) { + chmod 0666, $targ; + unlink $targ; + } + system "$^X paridoc_to_pod $paridir/doc/usersch3.tex > $targ " + and die "Errors when converting documentation: $! $?" +} + +@paricfg = <$paridir/o.*/paricfg.h>; +push @paricfg, <$paridir/O*/paricfg.h>; + +@paricfg = grep !/Odos/, @paricfg unless $^O =~ /dos|djgcc/i; + +if (@paricfg > 1) { + warn "Found multiple paricfg.h: @paricfg.\n"; + @paricfg = sort { -M $a <=> -M $b} @paricfg; + warn "Choosing newest paricfg.h: $paricfg[0].\n"; +} +if (@paricfg == 0) { + warn < $libs, + INC => "-I$parisrc/headers -I$parisrc -I./libPARI", + NAME => 'Math::Pari', + MYEXTLIB => 'libPARI/libPARI$(LIB_EXT)', + VERSION_FROM => 'Pari.pm', + DEFINE => $define, + dist => {COMPRESS=>'gzip -9f', SUFFIX=>'gz'}, + clean => { FILES => 'pari.ps' }, + ); + + +sub MY::postamble { + ' +$(MYEXTLIB): libPARI/Makefile FORCE + cd libPARI && $(MAKE) $(PASTHRU) +'; +} + +sub MY::const_config +{ + my $self = shift; + my $flags = $self->{'CCCDLFLAGS'}; # Tmp var needed with Perl4 ! + $flags =~ s/(-[fK]?\s*)pic\b/${1}PIC/; + $self->{'CCCDLFLAGS'} = $flags; + if ($^O eq 'MSWin32' && $Config{'ccflags'} =~ /-DPERL_OBJECT/) + { + $self->{'LDFLAGS'} =~ s/-(debug|pdb:\w+)\s+//g; + $self->{'LDDLFLAGS'} =~ s/-(debug|pdb:\w+)\s+//g; + } + return $self->MM::const_config; +} + +sub get_pari { + $host = 'megrez.math.u-bordeaux.fr'; + $dir = '/pub/pari/unix/'; + + print "Did not find PARI build directory around.\n"; + + if (-t STDIN and (-t STDOUT or -p STDOUT)) { # Interactive + $| = 1; + $mess = <; + if ($ans !~ /y/i) { + print "Well, as you wish... I give up...\n"; + return; + } + } else { + print "Non-interactive session, autofetching...\n" + } + + print "Getting PARI from ftp://$host$dir\n"; + + eval { require Net::FTP } + or die "You do not have Net::Ftp installed, cannot download, exiting..."; + + $ftp = Net::FTP->new($host) or die "Cannot create FTP object: $!"; + $ftp->login("anonymous","Math::Pari@") or die "Cannot login anonymously: $!"; + $ftp->cwd($dir) or die "Cannot cwd: $!"; + $ftp->binary() or die "Cannot switch to binary: $!"; + @lst = $ftp->ls() or die "Cannot list: $!"; + #print "list = `@lst'\n"; + + $match = 'pari.*(\d+\.\d+\.\d+).*\.t(ar\.)?gz$'; + $c = 0; + for $file (@lst) { + next unless $file =~ /$match/o; + $c++; + $version = $1; + if ($file =~ /alpha/) { + $alpha{$version} = $file; + } elsif ($file =~ /beta/) { + $beta{$version} = $file; + } else { + $golden{$version} = $file; + } + } + die "Did not find any file matching /$match/ via FTP" + unless $c; + + sub fmt_version {sprintf "%03d%03d%03d", split /\./, shift} + + for $type (qw(alpha beta golden)) { + if (%$type) { + $have{$type}++; + $best = $type; + @files = keys %$type; + print "Available ${type} versions: `@files'\n"; + $ {"latest_$type"} = (sort {fmt_version($a) cmp fmt_version($b)} + keys %$type)[-1]; + $ {"latest_${type}_file"} = $$type{$ {"latest_$type"}}; + print qq(Latest $type is ${"latest_${type}_file"}\n); + } + } + + # Special-case v2.0.14 + if (!%golden and $latest_beta eq '2.0.11' and $latest_alpha eq '2.0.14') { + $best = 'alpha'; # It is tested! + } + + if ($best) { + $file = $ {"latest_${best}_file"}; + $version = $ {"latest_$best"}; + print qq(Picking $best version $version, file $file\n); + if (-f $file) { + print qq(Well, I already have it, using the disk copy...\n); + } else { + print qq(Downloading...\n); + $ftp->get($file) or die "Cannot get: $!"; + print qq(Downloaded...\n); + } + print qq(Extracting...\n); + print "zcat $file | tar -xvf -\n"; + system "zcat $file | tar -xvf -" + and die "Cannot extract: $!, exitcode=$?.\n"; + ($dir = $file) =~ s/\.t(ar\.)?gz$// or die "malformed name `$file'"; + -d $dir or die "Did not find directory $dir!"; + print "cd $dir ; sh ./Configure\n"; + system "cd $dir ; sh ./Configure" + and die "Cannot configure: $!, exitcode=$?.\n"; + print "Configuration of PARI successful.\n"; + my %patches = ('2.0.11' + => [qw( + patch11/diff_pari_gnuplot_aa + patch11/patch_pari_round0 + patch11/patches_round1_short + patch11/diff_pari_fixed_interfaces_011 + patch11/diff_pari_highlevel_hash_011a + patch11/diff_pari_ret_proto_2011)], + '2.0.12' => ['patch12/diff_for_perl_2012'], + '2.0.13' => ['patch13/diff_for_perl_2013', + 'patch13/diff_for_gnuplot_2013'], + '2.0.14' => ['patch14/diff_for_perl_2014', + 'patch14/diff_extra_2014', + 'patch14/diff_last_2014', + 'patch14/diff_plot_2014'], + '2.0.15' => ['patch15/diff_cast_2015', + 'patch15/diff_errout_2015', + 'patch15/diff_gnuplot_2015', + 'patch15/diff_proto_2015', + 'patch15/diff_errpari_2015', + 'patch15/diff_pari_gnuplot_2015'], + '2.0.16' => ['patch16/diff_gnuplot_2016'], + ); + if ($patches{$version}) { + print "Patching...\n"; + foreach $patch (@{$patches{$version}}) { + print "cd $dir ; patch -p1 < ../$patch\n"; + system "cd $dir ; patch -p1 < ../$patch"; + } + print "Finished patching...\n"; + } + } + + $ftp->quit or die "Cannot quit: $!"; + $dir; +} diff --git a/math/p5-Math-Pari/pkg/DESCR b/math/p5-Math-Pari/pkg/DESCR new file mode 100644 index 00000000000..500cdbd7bda --- /dev/null +++ b/math/p5-Math-Pari/pkg/DESCR @@ -0,0 +1,4 @@ +This package is a Perl interface to famous library PARI for +numerical/scientific/number-theoretic calculations. It allows use of most +PARI functions as Perl functions, and (almost) seamless merging of PARI and +Perl data. diff --git a/math/p5-Math-Pari/pkg/PLIST b/math/p5-Math-Pari/pkg/PLIST new file mode 100644 index 00000000000..233af4d0d5f --- /dev/null +++ b/math/p5-Math-Pari/pkg/PLIST @@ -0,0 +1 @@ +@comment $NetBSD: PLIST,v 1.1 2001/10/02 01:34:31 mcr Exp $ -- cgit v1.2.3