From 9366217997d759a4150cf5e44d83b947ac2028ab Mon Sep 17 00:00:00 2001
From: "Artyom V. Poptsov" <poptsov.artyom@gmail.com>
Date: Sun, 19 Jan 2025 09:41:24 +0300
Subject: [PATCH] gnu: Add mbpoll.

* gnu/packages/engineering.scm (mbpoll): New variable.

Change-Id: I356425b47ae4a5201465c9f1e0244602a1cf9dc2
---
 gnu/packages/engineering.scm | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm
index ba8242ba1240233a8861556bb94eb855b54cd11b..762dd399326e878d7fb4603d7978c2cae0a7d2ad 100644
--- a/gnu/packages/engineering.scm
+++ b/gnu/packages/engineering.scm
@@ -244,6 +244,33 @@ their devices.")
 plans and designs.")
     (license license:gpl2)))
 
+(define-public mbpoll
+  (package
+    (name "mbpoll")
+    (version "1.5.2")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/epsilonrt/mbpoll")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0h5qsgy5hkrq92nxfkl564w21g5vp9nnch04fdqij06ckvzf7vdc"))))
+    (build-system cmake-build-system)
+    (arguments
+     (list
+      #:tests? #f)) ;no tests
+    (native-inputs (list pkg-config))
+    (inputs (list libmodbus))
+    (home-page "https://github.com/epsilonrt/mbpoll")
+    (synopsis
+     "Command line utility to communicate with ModBus slave (RTU or TCP)")
+    (description
+     "@code{mbpoll} is a command line utility to communicate with
+@url{https://en.wikipedia.org/wiki/Modbus, ModBus} slave (RTU or TCP).")
+    (license license:gpl3)))
+
 (define-public geda-gaf
   (package
     (name "geda-gaf")