From 016b72a6681c32bddd614267eef26c49271decf6 Mon Sep 17 00:00:00 2001 From: dmcmahill Date: Sun, 13 Oct 2002 04:30:05 +0000 Subject: initial import of p5-Parallel-Pvm-1.3.0 Parallel::Pvm is a perl extension for the parallel virtual machine (PVM) message-passing system. --- parallel/p5-Parallel-Pvm/DESCR | 2 ++ parallel/p5-Parallel-Pvm/MESSAGE | 14 +++++++++ parallel/p5-Parallel-Pvm/Makefile | 41 +++++++++++++++++++++++++++ parallel/p5-Parallel-Pvm/PLIST | 4 +++ parallel/p5-Parallel-Pvm/distinfo | 5 ++++ parallel/p5-Parallel-Pvm/files/hello.pl | 38 +++++++++++++++++++++++++ parallel/p5-Parallel-Pvm/files/hello_other.pl | 16 +++++++++++ parallel/p5-Parallel-Pvm/patches/patch-aa | 14 +++++++++ 8 files changed, 134 insertions(+) create mode 100644 parallel/p5-Parallel-Pvm/DESCR create mode 100644 parallel/p5-Parallel-Pvm/MESSAGE create mode 100644 parallel/p5-Parallel-Pvm/Makefile create mode 100644 parallel/p5-Parallel-Pvm/PLIST create mode 100644 parallel/p5-Parallel-Pvm/distinfo create mode 100755 parallel/p5-Parallel-Pvm/files/hello.pl create mode 100755 parallel/p5-Parallel-Pvm/files/hello_other.pl create mode 100644 parallel/p5-Parallel-Pvm/patches/patch-aa (limited to 'parallel/p5-Parallel-Pvm') diff --git a/parallel/p5-Parallel-Pvm/DESCR b/parallel/p5-Parallel-Pvm/DESCR new file mode 100644 index 00000000000..c640ff5daf1 --- /dev/null +++ b/parallel/p5-Parallel-Pvm/DESCR @@ -0,0 +1,2 @@ +Parallel::Pvm is a perl extension for the parallel virtual machine +(PVM) message-passing system. diff --git a/parallel/p5-Parallel-Pvm/MESSAGE b/parallel/p5-Parallel-Pvm/MESSAGE new file mode 100644 index 00000000000..403b0ad2088 --- /dev/null +++ b/parallel/p5-Parallel-Pvm/MESSAGE @@ -0,0 +1,14 @@ +=========================================================================== +$NetBSD: MESSAGE,v 1.1.1.1 2002/10/13 04:30:05 dmcmahill Exp $ + +The two examples included here are crafted after the C language hello +and hello_other programs which come with PVM. To run this example, +start the pvm daemon by running + + ${PVM_ROOT}/lib/pvmd & + +Now execute the hello.pl program by running + + ${PREFIX}/share/examples/p5-Parallel-Pvm/hello.pl + +=========================================================================== diff --git a/parallel/p5-Parallel-Pvm/Makefile b/parallel/p5-Parallel-Pvm/Makefile new file mode 100644 index 00000000000..bdd2840fef0 --- /dev/null +++ b/parallel/p5-Parallel-Pvm/Makefile @@ -0,0 +1,41 @@ +# $NetBSD: Makefile,v 1.1.1.1 2002/10/13 04:30:05 dmcmahill Exp $ +# + +DISTNAME= Parallel-Pvm-1.3.0 +PKGNAME= p5-${DISTNAME} +SVR4_PKGNAME= p5pvm +CATEGORIES= parallel perl5 +MASTER_SITES= ${MASTER_SITE_PERL_CPAN:=Parallel/} +EXTRACT_SUFX= .tgz + +MAINTAINER= packages@netbsd.org +HOMEPAGE= http://www.epm.ornl.gov/pvm/pvm_home.html +COMMENT= Perl module for PVM (Parallel Virtual Machine) + +#DEPENDS+= pvm-3.4.3:../../parallel/pvm3 + +PVM_ROOT?= ${LOCALBASE}/pvm3 +CONFIGURE_ENV+= PVM_ROOT=${PVM_ROOT} PVM_ARCH=${PVM_ARCH} +MAKE_ENV+= PVM_ROOT=${PVM_ROOT} PVM_ARCH=${PVM_ARCH} +PERL5_PACKLIST= ${PERL5_SITEARCH}/auto/Parallel/Pvm/.packlist +MESSAGE_SUBST+= PVM_ROOT=${PVM_ROOT} +EXAMPLES_DIR= ${PREFIX}/share/examples/p5-Parallel-Pvm +USE_BUILDLINK2= YES + +do-configure: + @cd ${WRKSRC}; ${SETENV} ${MAKE_ENV} ${PERL5} Makefile.PL + +post-build: +.for f in hello.pl hello_other.pl + ${SED} -e 's;@exampledir@;${EXAMPLES_DIR};g' -e 's;@perl@;${PERL5};g' \ + ${FILESDIR}/${f} > ${WRKDIR}/${f} +.endfor + +post-install: + ${INSTALL_SCRIPT_DIR} ${EXAMPLES_DIR} + ${INSTALL_SCRIPT} ${WRKDIR}/hello.pl ${EXAMPLES_DIR} + ${INSTALL_SCRIPT} ${WRKDIR}/hello_other.pl ${EXAMPLES_DIR} + +.include "../../lang/perl5/module.mk" +.include "../../parallel/pvm3/buildlink2.mk" +.include "../../mk/bsd.pkg.mk" diff --git a/parallel/p5-Parallel-Pvm/PLIST b/parallel/p5-Parallel-Pvm/PLIST new file mode 100644 index 00000000000..516b4b321d9 --- /dev/null +++ b/parallel/p5-Parallel-Pvm/PLIST @@ -0,0 +1,4 @@ +@comment $NetBSD: PLIST,v 1.1.1.1 2002/10/13 04:30:05 dmcmahill Exp $ +share/examples/p5-Parallel-Pvm/hello.pl +share/examples/p5-Parallel-Pvm/hello_other.pl +@dirrm share/examples/p5-Parallel-Pvm diff --git a/parallel/p5-Parallel-Pvm/distinfo b/parallel/p5-Parallel-Pvm/distinfo new file mode 100644 index 00000000000..ff6129aacf9 --- /dev/null +++ b/parallel/p5-Parallel-Pvm/distinfo @@ -0,0 +1,5 @@ +$NetBSD: distinfo,v 1.1.1.1 2002/10/13 04:30:05 dmcmahill Exp $ + +SHA1 (Parallel-Pvm-1.3.0.tgz) = fd8c5f449e826e7e1b1e02288cc8679ad2ccece7 +Size (Parallel-Pvm-1.3.0.tgz) = 17792 bytes +SHA1 (patch-aa) = 57e52fb332a943a6542d486145a28a77693a6dec diff --git a/parallel/p5-Parallel-Pvm/files/hello.pl b/parallel/p5-Parallel-Pvm/files/hello.pl new file mode 100755 index 00000000000..cfad6447a4c --- /dev/null +++ b/parallel/p5-Parallel-Pvm/files/hello.pl @@ -0,0 +1,38 @@ +#!@perl@ +# +# $NetBSD: hello.pl,v 1.1.1.1 2002/10/13 04:30:05 dmcmahill Exp $ +# + +use Parallel::Pvm; +use File::Basename; + +$mytid = Parallel::Pvm::mytid ; +printf "My task ID is %x\n", $mytid; + +# spawn 1 copy of "hello_other" +$cmd="@exampledir@/hello_other.pl"; + +($ntask, @tids) = Parallel::Pvm::spawn($cmd, 1); +print "ntask = $ntask\n"; +print "tids = @tids\n"; + +if ($ntask == 1) { + # receive a message from the task we have spawned + $bufid=Parallel::Pvm::recv(); + + if ($bufid >= 0) { + ($info,$bytes,$tag,$stid) = Parallel::Pvm::bufinfo($bufid) ; + print "info = $info\n"; + print "bytes = $bytes\n"; + print "tag = $tag\n"; + printf "stid = %x\n",$stid; + $str = Parallel::Pvm::unpack; + printf "from t%x: \"%s\"\n",$stid,$str; + } +} else { + printf "can't start hello_other\n"; +} + +Parallel::Pvm::exit(); + + diff --git a/parallel/p5-Parallel-Pvm/files/hello_other.pl b/parallel/p5-Parallel-Pvm/files/hello_other.pl new file mode 100755 index 00000000000..5fbc13f3359 --- /dev/null +++ b/parallel/p5-Parallel-Pvm/files/hello_other.pl @@ -0,0 +1,16 @@ +#!@perl@ +# +# $NetBSD: hello_other.pl,v 1.1.1.1 2002/10/13 04:30:05 dmcmahill Exp $ +# + +use Parallel::Pvm; +use Sys::Hostname; +my $host = hostname(); + +$ptid = Parallel::Pvm::parent; +Parallel::Pvm::initsend(PvmDataDefault) ; +$buf=Parallel::Pvm::pack("Hi from hello_other.pl running on $host"); +Parallel::Pvm::send($ptid,$buf); +Parallel::Pvm::exit; +exit 0; + diff --git a/parallel/p5-Parallel-Pvm/patches/patch-aa b/parallel/p5-Parallel-Pvm/patches/patch-aa new file mode 100644 index 00000000000..e9115a868bd --- /dev/null +++ b/parallel/p5-Parallel-Pvm/patches/patch-aa @@ -0,0 +1,14 @@ +$NetBSD: patch-aa,v 1.1.1.1 2002/10/13 04:30:05 dmcmahill Exp $ + +--- MANIFEST.orig Fri Sep 21 05:08:13 2001 ++++ MANIFEST +@@ -2,7 +2,7 @@ MANIFEST + Makefile.PL + Pvm.pm + Pvm.xs +-t/bigmsg.t ++t/01_bigmsg.t + ChangeLog +-t/group.t ++t/02_group.t + README -- cgit v1.2.3