me
/
guix
Archived
1
0
Fork 0
Code

gnu: i2pd: Reflow package definition. 

* gnu/packages/i2p.scm (i2pd): Reflow package definition.
master
Efraim Flashner 2021-05-25 09:00:33 +03:00
parent e47b7a73be
commit e52c64cb04
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351
1 changed files with 34 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

66
gnu/packages/i2p.scm
View File

@ -42,38 +42,40 @@
(sha256 (sha256
(base32 "1a35grcfw5a9dsj0rnm2i86fjf4px96xbnjj3hkril7hv5jvl37k")))) (base32 "1a35grcfw5a9dsj0rnm2i86fjf4px96xbnjj3hkril7hv5jvl37k"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(inputs `(("boost" ,boost) (inputs
("miniupnpc" ,miniupnpc) `(("boost" ,boost)
("openssl" ,openssl) ("miniupnpc" ,miniupnpc)
("zlib" ,zlib))) ("openssl" ,openssl)
(arguments '(#:configure-flags ("zlib" ,zlib)))
(let ((source (assoc-ref %build-inputs "source"))) (arguments
(list (string-append "-S" source "/build") '(#:configure-flags
"-DWITH_PCH=OFF" (let ((source (assoc-ref %build-inputs "source")))
"-DWITH_STATIC=OFF" (list (string-append "-S" source "/build")
"-DWITH_UPNP=ON" "-DWITH_PCH=OFF"
"-DWITH_LIBRARY=ON" "-DWITH_STATIC=OFF"
"-DBUILD_SHARED_LIBS=ON" "-DWITH_UPNP=ON"
"-DWITH_BINARY=ON")) "-DWITH_LIBRARY=ON"
#:phases "-DBUILD_SHARED_LIBS=ON"
(modify-phases %standard-phases "-DWITH_BINARY=ON"))
(replace 'check #:phases
(lambda* (#:key (modify-phases %standard-phases
(make-flags '()) (replace 'check
(parallel-tests? #t) (lambda* (#:key
#:allow-other-keys) (make-flags '())
(let ((source (assoc-ref %build-inputs "source"))) (parallel-tests? #t)
(copy-recursively (string-append source "/tests") #:allow-other-keys)
"./tests") (let ((source (assoc-ref %build-inputs "source")))
(with-directory-excursion "tests" (copy-recursively (string-append source "/tests")
(substitute* "Makefile" "./tests")
(("../libi2pd/") (string-append source "/libi2pd/"))) (with-directory-excursion "tests"
(apply invoke "make" "all" (substitute* "Makefile"
`(,@(if parallel-tests? (("../libi2pd/") (string-append source "/libi2pd/")))
`("-j" ,(number->string (apply invoke "make" "all"
(parallel-job-count))) `(,@(if parallel-tests?
'()) `("-j" ,(number->string
,@make-flags))))))))) (parallel-job-count)))
'())
,@make-flags)))))))))
(home-page "https://i2pd.website/") (home-page "https://i2pd.website/")
(synopsis "Router for an end-to-end encrypted and anonymous internet") (synopsis "Router for an end-to-end encrypted and anonymous internet")
(description "i2pd is a client for the anonymous I2P network, upon which (description "i2pd is a client for the anonymous I2P network, upon which