nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: brdf-explorer: Update to 1.0.0-1.5b2cd46f3. 

* gnu/packages/graphics.scm (brdf-explorer): Update to 1.0.0-1.5b2cd46f3.
[source]: Use git-fetch method.
[arguments]: Adjust configure phase.
[native-inputs]: Replace qt with qttools.
[inputs]: Replace qt with qtbase.
This commit is contained in:
Ricardo Wurmus 2017-05-24 23:23:42 +02:00
parent ff51a87cae
commit 9b91fb32f8
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 53 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

106
gnu/packages/graphics.scm
View File

@ -2,7 +2,7 @@
;;; Copyright © 2015, 2016 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2015, 2016 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2015 Tomáš Čech <sleep_walker@gnu.org> ;;; Copyright © 2015 Tomáš Čech <sleep_walker@gnu.org>
;;; Copyright © 2016 Leo Famulari <leo@famulari.name> ;;; Copyright © 2016 Leo Famulari <leo@famulari.name>
;;; Copyright © 2016 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2016, 2017 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2016 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2016 Andreas Enge <andreas@enge.fr>
;;; ;;;
@ -23,7 +23,7 @@
(define-module (gnu packages graphics) (define-module (gnu packages graphics)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix svn-download) #:use-module (guix git-download)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
@ -423,66 +423,66 @@ output.")
(license (license:non-copyleft "file://LICENSE")))) (license (license:non-copyleft "file://LICENSE"))))
(define-public brdf-explorer (define-public brdf-explorer
(package ;; There are no release tarballs, and not even tags in the repo,
(name "brdf-explorer") ;; so use the latest revision.
(version "17") ;svn revision (let ((commit "5b2cd46f38a06e47207fa7229b72d37beb945019")
(source (origin (revision "1"))
;; There are no release tarballs, and not even tags in the repo, (package
;; so use the latest revision. (name "brdf-explorer")
(method svn-fetch) (version (string-append "1.0.0-" revision "." (string-take commit 9)))
(uri (svn-reference (source (origin
(url "https://github.com/wdas/brdf") (method git-fetch)
(revision (string->number version)))) (uri (git-reference
(sha256 (url "https://github.com/wdas/brdf.git")
(base32 (commit commit)))
"1458fwsqxramh0gpnp24x7brfpl9afhvr1wqg6c78xqwf32960m5")) (sha256
(file-name (string-append name "-" version "-checkout")))) (base32
(build-system gnu-build-system) "06vzbiajzbi2xl8jlff5d45bc9wd68i3jdndfab1f3jgfrd8bsgx"))
(arguments (file-name (string-append name "-" version "-checkout"))))
`(#:phases (modify-phases %standard-phases (build-system gnu-build-system)
(replace 'configure (arguments
(lambda* (#:key outputs #:allow-other-keys) `(#:phases (modify-phases %standard-phases
(let ((out (assoc-ref outputs "out"))) (replace 'configure
(chdir "trunk") (lambda* (#:key outputs #:allow-other-keys)
(zero? (system* "qmake" (let ((out (assoc-ref outputs "out")))
(string-append (zero? (system* "qmake"
"prefix=" out)))))) (string-append "prefix=" out))))))
(add-after 'install 'wrap-program (add-after 'install 'wrap-program
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin")) (bin (string-append out "/bin"))
(data (string-append (data (string-append
out "/share/brdf"))) out "/share/brdf")))
(with-directory-excursion bin (with-directory-excursion bin
(rename-file "brdf" ".brdf-real") (rename-file "brdf" ".brdf-real")
(call-with-output-file "brdf" (call-with-output-file "brdf"
(lambda (port) (lambda (port)
(format port "#!/bin/sh (format port "#!/bin/sh
# Run the thing from its home, otherwise it just bails out. # Run the thing from its home, otherwise it just bails out.
cd \"~a\" cd \"~a\"
exec -a \"$0\" ~a/.brdf-real~%" exec -a \"$0\" ~a/.brdf-real~%"
data bin))) data bin)))
(chmod "brdf" #o555)))))))) (chmod "brdf" #o555))))))))
(native-inputs (native-inputs
`(("qt" ,qt-4))) ;for 'qmake' `(("qttools" ,qttools))) ;for 'qmake'
(inputs (inputs
`(("qt" ,qt-4) `(("qtbase" ,qtbase)
("mesa" ,mesa) ("mesa" ,mesa)
("glew" ,glew) ("glew" ,glew)
("freeglut" ,freeglut) ("freeglut" ,freeglut)
("zlib" ,zlib))) ("zlib" ,zlib)))
(home-page "http://www.disneyanimation.com/technology/brdf.html") (home-page "http://www.disneyanimation.com/technology/brdf.html")
(synopsis (synopsis
"Analyze bidirectional reflectance distribution functions (BRDFs)") "Analyze bidirectional reflectance distribution functions (BRDFs)")
(description (description
"BRDF Explorer is an application that allows the development and analysis "BRDF Explorer is an application that allows the development and analysis
of bidirectional reflectance distribution functions (BRDFs). It can load and of bidirectional reflectance distribution functions (BRDFs). It can load and
plot analytic BRDF functions (coded as functions in OpenGL's GLSL shader plot analytic BRDF functions (coded as functions in OpenGL's GLSL shader
language), measured material data from the MERL database, and anisotropic language), measured material data from the MERL database, and anisotropic
measured material data from MIT CSAIL. Graphs and visualizations update in measured material data from MIT CSAIL. Graphs and visualizations update in
real time as parameters are changed, making it a useful tool for evaluating real time as parameters are changed, making it a useful tool for evaluating
and understanding different BRDFs (and other component functions).") and understanding different BRDFs (and other component functions).")
(license license:ms-pl))) (license license:ms-pl))))
(define-public agg (define-public agg
(package (package