From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:56583) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1drVWw-0003PF-4j for guix-patches@gnu.org; Mon, 11 Sep 2017 16:42:07 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1drVWt-0000bI-0i for guix-patches@gnu.org; Mon, 11 Sep 2017 16:42:06 -0400 Received: from debbugs.gnu.org ([208.118.235.43]:53709) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1drVWs-0000bB-SE for guix-patches@gnu.org; Mon, 11 Sep 2017 16:42:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1drVWs-0005SW-JB for guix-patches@gnu.org; Mon, 11 Sep 2017 16:42:02 -0400 Subject: [bug#28423] gnu: Add imb-openmpi. Resent-Message-ID: Received: from eggs.gnu.org ([2001:4830:134:3::10]:56349) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1drVVv-0003IB-0n for guix-patches@gnu.org; Mon, 11 Sep 2017 16:41:04 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1drVVr-0000E9-Sv for guix-patches@gnu.org; Mon, 11 Sep 2017 16:41:03 -0400 Received: from tranquility.mcc.ac.uk ([130.88.200.145]:19193) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1drVVr-0000Dz-LP for guix-patches@gnu.org; Mon, 11 Sep 2017 16:40:59 -0400 Received: from asmtp2.its.manchester.ac.uk ([130.88.13.150]) by tranquility.mcc.ac.uk with esmtps (TLSv1:DHE-RSA-AES256-SHA:256) (Exim 4.85 (FreeBSD)) (envelope-from ) id 1drVVp-0001iL-Nq for guix-patches@gnu.org; Mon, 11 Sep 2017 21:40:57 +0100 Received: from albion.it.manchester.ac.uk ([130.88.138.79]:58222) by asmtp2.its.manchester.ac.uk with esmtpsa (TLSv1.2:ECDHE-RSA-AES256-GCM-SHA384:256) (Exim 4.89) (envelope-from ) id 1drVVp-00021m-E0 for guix-patches@gnu.org; Mon, 11 Sep 2017 21:40:57 +0100 From: Dave Love Date: Mon, 11 Sep 2017 21:40:56 +0100 Message-ID: <877ex5j7dz.fsf@albion.it.manchester.ac.uk> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="DES-Sundevil-mega-Irish-Republican-Army-MSCJ" List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 28423@debbugs.gnu.org --DES-Sundevil-mega-Irish-Republican-Army-MSCJ Content-Type: text/plain I'm not sure whether this should be in benchmark or in mpi, as an MPI benchmark. --DES-Sundevil-mega-Irish-Republican-Army-MSCJ Content-Type: text/x-diff; charset=utf-8 Content-Disposition: attachment; filename=0001-gnu-Add-imb-openmpi.patch Content-Transfer-Encoding: quoted-printable >From b4807fe0ea923d9a92675a063384cfb397096f26 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Tue, 1 Aug 2017 17:56:03 +0100 Subject: [PATCH 1/4] gnu: Add imb-openmpi. * mpi.scm (gnu, imb): New function. (imb-openmpi): New package. --- gnu/packages/mpi.scm | 57 ++++++++++++++++++++++++++++++++++++++++++++++++= ++++ 1 file changed, 57 insertions(+) diff --git a/gnu/packages/mpi.scm b/gnu/packages/mpi.scm index 031bce035..6120b990c 100644 --- a/gnu/packages/mpi.scm +++ b/gnu/packages/mpi.scm @@ -199,3 +199,60 @@ This version has an implementation of `MPI_Init_thread= ' that provides =E2=80=98MPI_THREAD_MULTIPLE=E2=80=99. This won't work correctly with all= transports (e.g. openib), and the performance is generally worse than the vanilla openmpi package, which only provides =E2=80=98MPI_THREAD_FUNNELED=E2=80=99.")))) + +;; Parameterized in anticipation of m(va)pich +(define (imb mpi) + (package + (name (string-append "imb-" (package-name mpi))) + (version "2017.2") + (source + (origin + (method url-fetch) + (uri (let* ((parts (string-split version #\.) ) + (major (car parts)) + (minor (cadr parts))) + (string-append + "https://software.intel.com/sites/default/files/managed/76/6= c/IMB_" + major "_Update" minor ".tgz"))) + (sha256 (base32 "11nczxm686rsppmw9gjc2p2sxc0jniv5kv18yxm1lzp5qfh5rqy= b")))) + (build-system gnu-build-system) + (inputs + `((,(package-name mpi) ,mpi))) + (propagated-inputs + `((,(package-name mpi) ,mpi))) + (arguments + `(#:phases + (modify-phases %standard-phases + (delete 'configure) + (delete 'check) + (replace 'build + (lambda* _ + (let ((mpi-home (dirname (dirname (which "mpicc"))))) + (zero? + ;; Not safe for parallel build + (system + (format #f "make -C imb/src -f make_mpich SHELL=3Dsh MPI_= HOME=3D~a" + mpi-home)))))) + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let ((bin (string-append (assoc-ref outputs "out") "/bin"))) + (mkdir-p bin) + (zero? + (system + (string-append + "cd imb/src && install -m755 IMB-IO IMB-EXT IMB-MPI1 IMB= -NBC IMB-RMA " + bin))))))))) + (home-page "https://software.intel.com/en-us/articles/intel-mpi-benchm= arks") + (synopsis (format #f "Intel MPI Benchmarks, ~a version" (package-name = mpi))) + (description (format #f "\ +A set of MPI performance measurements for point-to-point and global +communication, and file, operations for a range of message sizes. +The generated benchmark data fully characterize: + * Performance of a cluster system, including node performance, + network latency, and throughput; + * Efficiency of the MPI implementation. + +This is the ~a version" (package-name mpi))) + (license cpl1.0))) + +(define-public imb-openmpi (imb openmpi)) --=20 2.11.0 --DES-Sundevil-mega-Irish-Republican-Army-MSCJ--