blob: c834550ca297e8f14cfccaa49bc81cd540cb9a8a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
(define-module (digilent-agent)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module (guix build-system qt)
#:use-module (gnu packages qt))
(define-public digilent-agent
(let ((revision "2")
(commit "0fdfa84e9cdc101731b17cc59df8bd22cdbc6e68"))
(package
(name "digilent-agent")
(version (git-version "1.0.1" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
;; It's my own fork, not the Digilent official one
;; because I removed tracking
(url "https://github.com/ekaitz-zarraga/digilent-agent")
(commit commit)
(recursive? #t)))
(file-name (git-file-name name version))
(sha256
(base32 "1nzkfj5wpazpi3r49s47i923kbcbw34qp81b8s8l9v3p8cq8s2j0"))))
(build-system qt-build-system)
(native-inputs
`(("qtserialport" ,qtserialport-5)
("qtbase" ,qtbase-5)))
(arguments
(list
#:tests? #f
#:phases
#~(modify-phases %standard-phases
(add-before 'configure 'fix-pro
(lambda _
(let ((out #$output))
; 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")))
(substitute* "src/main.cpp"
(("\\/usr\\/share")
(string-append out "/share")))
(substitute* "share/applications/digilent-agent.desktop"
(("\\/usr\\/bin")
(string-append out "/bin"))))))
(replace 'configure
(lambda _ (invoke "qmake")))
(add-after 'install 'install-desktop
(lambda _ (copy-recursively "share"
(string-append #$output "/share")))))))
(synopsis "Digilent connector for Digilent devices such as OpenScope MZ")
(description "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://digilent.com/reference/software/digilent-agent/start")
(license (list license:gpl3 license:expat)))))
|
