Digilent-Agent

1 files changed, 59 insertions, 0 deletions

diff --git a/digilent-agent.scm b/digilent-agent.scm
new file mode 100644
index 0000000..eb80f3c
--- /dev/null
+++ b/digilent-agent.scm
@@ -0,0 +1,59 @@
+(define-module (digilent-agent)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (guix packages)
+  #:use-module (guix git-download)
+  #:use-module (guix build-system cmake)
+  #:use-module (gnu packages qt))
+
+(define-public digilent-agent
+  (let ((commit-ref "21cb099312b90dda92acb6dfd4b00ad922d90206"))
+    (package
+      (name "digilent-agent")
+      (version "v1.0.1")
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                       (url "https://github.com/Digilent/digilent-agent.git")
+                       (commit commit-ref)
+                       (recursive? #t)))
+                (sha256
+                  (base32 "1xw0zn8b9zmxicq9ks1v9wsq1qrl0vqw1x1llf2iavamw7q8s3y6"))))
+      (build-system cmake-build-system)
+      (native-inputs
+        `(("qtserialport" ,qtserialport)
+          ("qtbase" ,qtbase)))
+      (arguments
+        `(#:tests? #f
+          #:phases
+            (modify-phases
+              %standard-phases
+              (replace
+                'configure
+                (lambda* (#:key outputs #:allow-other-keys)
+                         (let ((out (assoc-ref outputs "out")))
+                           ; Need o overwrite stuff in digilent-agent.pro from:
+                           ; 8< ----
+                           ; TARGET = digilent-agent
+                           ; target.path = /usr/bin
+                           ;
+                           ; wwwRoot.path = /usr/share/digilent-agent/www
+                           ; wwwRoot.files = www/*
+                           ;
+                           ; INSTALLS += target
+                           ; INSTALLS += wwwRoot
+                           ; ---- >8
+                           ; Where it says /usr/ we need to add our output dir
+                           (substitute* "digilent-agent.pro"
+                                        (("\\/usr\\/bin")
+                                         (string-append out "/bin"))
+                                        (("\\/usr\\/share")
+                                         (string-append out "/share")))
+                           (invoke "qmake")))))))
+      (synopsis "The Digilent Agent is a service that runs in the system tray
+                and enables browser based applications to communicate with
+                Digilent hardware.")
+                (home-page
+                  "https://reference.digilentinc.com/reference/software/digilent-agent/start")
+                (description
+                  "Digilent connector for Digilent devices such as OpenScope MZ.")
+                (license license:lgpl3))))