(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))))