123 lines
		
	
	
	
		
			5.1 KiB
		
	
	
	
		
			Scheme
		
	
	
	
	
	
			
		
		
	
	
			123 lines
		
	
	
	
		
			5.1 KiB
		
	
	
	
		
			Scheme
		
	
	
	
	
	
| ;;; GNU Guix --- Functional package management for GNU
 | |
| ;;; Copyright © 2019 Ricardo Wurmus <rekado@elephly.net>
 | |
| ;;;
 | |
| ;;; This file is part of GNU Guix.
 | |
| ;;;
 | |
| ;;; GNU Guix is free software; you can redistribute it and/or modify it
 | |
| ;;; under the terms of the GNU General Public License as published by
 | |
| ;;; the Free Software Foundation; either version 3 of the License, or (at
 | |
| ;;; your option) any later version.
 | |
| ;;;
 | |
| ;;; GNU Guix is distributed in the hope that it will be useful, but
 | |
| ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
 | |
| ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | |
| ;;; GNU General Public License for more details.
 | |
| ;;;
 | |
| ;;; You should have received a copy of the GNU General Public License
 | |
| ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
 | |
| 
 | |
| (define-module (gnu packages java-graphics)
 | |
|   #:use-module ((guix licenses) #:prefix license:)
 | |
|   #:use-module (guix packages)
 | |
|   #:use-module (guix git-download)
 | |
|   #:use-module (guix utils)
 | |
|   #:use-module (guix build-system ant)
 | |
|   #:use-module (gnu packages)
 | |
|   #:use-module (gnu packages java)
 | |
|   #:use-module (gnu packages xorg)
 | |
|   #:use-module (ice-9 match))
 | |
| 
 | |
| (define-public java-piccolo2d-core
 | |
|   (package
 | |
|     (name "java-piccolo2d-core")
 | |
|     (version "3.0.1")
 | |
|     (source (origin
 | |
|               (method git-fetch)
 | |
|               (uri (git-reference
 | |
|                     (url "https://github.com/piccolo2d/piccolo2d.java")
 | |
|                     (commit (string-append "piccolo2d-complete-" version))))
 | |
|               (file-name (git-file-name name version))
 | |
|               (sha256
 | |
|                (base32
 | |
|                 "1k6gw643k83516lcw04mgac2yi75phdrng44pz9xk6hz066ip21s"))))
 | |
|     (build-system ant-build-system)
 | |
|     (arguments
 | |
|      `(#:jar-name "piccolo2d-core.jar"
 | |
|        #:phases
 | |
|        (modify-phases %standard-phases
 | |
|          (add-after 'unpack 'chdir
 | |
|            (lambda _ (chdir "core") #t)))))
 | |
|     (inputs
 | |
|      `(("java-junit" ,java-junit)))
 | |
|     (home-page "http://piccolo2d.org")
 | |
|     (synopsis "Structured 2D graphics framework")
 | |
|     (description "Piccolo2D is a framework (in the Jazz ZUI tradition) to
 | |
| create robust, full-featured graphical applications in Java, with features
 | |
| such as zooming and multiple representation.  This package provides the core
 | |
| libraries.")
 | |
|     (license license:bsd-3)))
 | |
| 
 | |
| (define-public java-piccolo2d-extras
 | |
|   (package (inherit java-piccolo2d-core)
 | |
|     (name "java-piccolo2d-extras")
 | |
|     (arguments
 | |
|      `(#:jar-name "piccolo2d-extras.jar"
 | |
|        #:phases
 | |
|        (modify-phases %standard-phases
 | |
|          (add-after 'unpack 'chdir
 | |
|            (lambda _ (chdir "extras") #t))
 | |
|          (add-after 'chdir 'remove-failing-test
 | |
|            (lambda _
 | |
|              ;; TODO: These both fail with "Unable to convolve src image"
 | |
|              (delete-file "src/test/java/org/piccolo2d/extras/nodes/PShadowTest.java")
 | |
|              (delete-file "src/test/java/org/piccolo2d/extras/util/ShadowUtilsTest.java")
 | |
|              #t))
 | |
|          (add-before 'check 'start-xorg-server
 | |
|            (lambda* (#:key inputs #:allow-other-keys)
 | |
|              ;; The test suite requires a running X server.
 | |
|              (system (string-append (assoc-ref inputs "xorg-server")
 | |
|                                     "/bin/Xvfb :1 -screen 0 640x480x24 &"))
 | |
|              (setenv "DISPLAY" ":1")
 | |
|              #t)))))
 | |
|     (inputs
 | |
|      `(("java-piccolo2d-core" ,java-piccolo2d-core)
 | |
|        ("java-junit" ,java-junit)))
 | |
|     (native-inputs
 | |
|      `(("xorg-server" ,xorg-server))) ; for tests
 | |
|     (description "Piccolo2D is a framework (in the Jazz ZUI tradition) to
 | |
| create robust, full-featured graphical applications in Java, with features
 | |
| such as zooming and multiple representation.  This package provides additional
 | |
| features not found in the core libraries.")))
 | |
| 
 | |
| (define-public java-marlin-renderer
 | |
|   (package
 | |
|     (name "java-marlin-renderer")
 | |
|     (version "0.9.4.2")
 | |
|     (source (origin
 | |
|               (method git-fetch)
 | |
|               (uri (git-reference
 | |
|                     (url "https://github.com/bourgesl/marlin-renderer.git")
 | |
|                     (commit (string-append "v" (string-map (match-lambda
 | |
|                                                              (#\. #\_)
 | |
|                                                              (c c))
 | |
|                                                            version)))))
 | |
|               (file-name (git-file-name name version))
 | |
|               (sha256
 | |
|                (base32
 | |
|                 "12vb8fmxf1smnyv6w8i1khahy76v6r29j1qwabbykxff8i9ndxqv"))))
 | |
|     (build-system ant-build-system)
 | |
|     (arguments
 | |
|      `(#:jar-name "marlin.jar"
 | |
|        #:test-include (list "src/test/java/RunJUnitTest.java")))
 | |
|     (inputs
 | |
|      `(("java-hamcrest-core" ,java-hamcrest-core)
 | |
|        ("java-junit" ,java-junit)))
 | |
|     (home-page "https://github.com/bourgesl/marlin-renderer/")
 | |
|     (synopsis "Rendering engine")
 | |
|     (description "Marlin is a Java2D @code{RenderingEngine} optimized for
 | |
| performance (improved memory usage and footprint, better multi-threading) and
 | |
| better visual quality based on OpenJDK's @code{pisces} implementation.  It
 | |
| handles shape rendering (@code{Graphics2D} @code{draw(Shape)} /
 | |
| @code{fill(Shape)} with stroke and dash attributes.")
 | |
|     ;; With Classpath Exception
 | |
|     (license license:gpl2)))
 |