(define-module (my-packages)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix download)
  #:use-module (guix packages)
  #:use-module (guix build-system python)
    #:use-module (guix build-system gnu)
  #:use-module (gnu packages python)
  #:use-module (gnu packages ssh)
  #:use-module (gnu packages networking)
  #:use-module (gnu packages linux)
  #:use-module (gnu packages base)
  #:use-module (gnu packages )
  )

(define-public python-clustershell
  (package
   (name "python-clustershell")
   (version "1.8")
   (source
    (origin
     (method url-fetch)
     (uri (string-append "https://github.com/cea-hpc/clustershell/archive/v"
                         version
                         ".tar.gz"))
     (sha256
      (base32 "1qyf6zp5ikk8rk7zvx5ssbgr9si2bqv3a3415590kd07s7i16nmd"))))
   (build-system python-build-system)
   (propagated-inputs `(("python-pyyaml" ,python-pyyaml)
                        ("openssh" ,openssh)
                        ("iperf" ,iperf)))
   (home-page "https://cea-hpc.github.io/clustershell/")
   (synopsis
    "Scalable event-driven Python Framework for cluster administration")
   (description
    "ClusterShell is an event-driven open source Python framework, designed to
run local or distant commands in parallel on server farms or on large Linux
clusters. It will take care of common issues encountered on HPC clusters, such
as operating on groups of nodes, running distributed commands using optimized
execution algorithms, as well as gathering results and merging identical
outputs, or retrieving return codes. ClusterShell takes advantage of existing
remote shell facilities already installed on your systems, like SSH.")
   (license license:lgpl2.1)))

(define-public perftest
  (package
   (name "perftest")
   (version "4.2-0.8")
   (source (origin
            (method url-fetch)
            (uri "https://github.com/linux-rdma/perftest/releases/download/V4.2-0.8/perftest-4.2-0.8.g0e24e67.tar.gz")
            (sha256
             (base32 "1r3pxn7cx3grb8myb4q1b0pk447pc06cifd0v7ym13xw00372dlx"))
            (patches (search-patches "0001-fix-netinet-ip.h-include.patch"))))
   (build-system gnu-build-system)
   (inputs `(("rdma-core" ,rdma-core)
             ("glibc" ,glibc)))
   (home-page "https://github.com/linux-rdma/perftest/")
   (synopsis "Open Fabrics Enterprise Distribution (OFED) Performance Tests")
   (description "This is a collection of tests written over uverbs intended for
use as a performance micro-benchmark. The tests may be used for HW or SW tuning
as well as for functional testing.

The collection contains a set of bandwidth and latency benchmark such as:
@enumerate
@item Send        - @code{ib_send_bw} and @code{ib_send_lat}
@item RDMA Read   - @code{ib_read_bw} and @code{ib_read_lat}
@item RDMA Write  - @code{ib_write_bw} and @code{ib_wriet_lat}
@item RDMA Atomic - @code{ib_atomic_bw} and @code{ib_atomic_lat}
@item Native Ethernet (when working with MOFED2) - @code{raw_ethernet_bw}, @code{raw_ethernet_lat}
@end enumerate")
   (license license:gpl2)))