(define-public java-openjfx

  (package

    (name "java-openjfx")

    ;; This is the last version that can be built for java8

    (version "8.202")

    (source (origin

              (method url-fetch)

              (uri (string-append "http://hg.openjdk.java.net/openjfx/8u-dev/rt"

                                  "/archive/85d09981ae0d.tar.gz"))

              (file-name (string-append name "-" version ".tar.gz"))

              (sha256

               (base32

                "038yg2c9swmckw5ch8cvzxf5hw0fdvxa3wljnw5yhbhqgvawpz3a"))))

    (build-system ant-build-system)

    (arguments

     `(#:jar-name "java-openjfx.jar"

       #:source-dir "buildSrc/src/main/java"

       #:test-dir "buildSrc/src/test"

       #:phases

       (modify-phases %standard-phases

         (add-before 'configure 'generate-jsl-parser

           (lambda _

             (zero? (system* "antlr3" "-o" "buildSrc/src/main/java/com/sun/scenario/effect/compiler"

                             "buildSrc/src/main/antlr/JSL.g")))))))

    (inputs

     `(("antlr3" ,antlr3)

       ("java-stringtemplate" ,java-stringtemplate)))

    (native-inputs

     `(("java-junit" ,java-junit)

       ("java-hamcrest-core" ,java-hamcrest-core)))

    (home-page "https://openjfx.io")

    (synopsis "")

    (description "")

    (license license:gpl2)));with classpath exception

(define-public java-openjfx-base

  (package (inherit java-openjfx)

    (name "java-openjfx-base")

    (arguments

     `(#:jar-name "java-openjfx-base.jar"

       #:source-dir "modules/base/src/main/java:modules/base/src/main/java8:modules/base/src/main/version-info"

       #:test-dir "modules/base/src/test"

       #:phases

       (modify-phases %standard-phases

         (add-before 'check 'remove-empty-file

           (lambda _

             ;; These files are completely commented, but junit expects them to

             ;; contain a class, so tests fail.

             (delete-file "modules/base/src/test/java/com/sun/javafx/property/adapter/PropertyDescriptorTest.java")

             (delete-file "modules/base/src/test/java/com/sun/javafx/property/adapter/ReadOnlyPropertyDescriptorTest.java")

             (delete-file "modules/base/src/test/java/javafx/beans/property/PropertiesTest.java")

             (delete-file "modules/base/src/test/java/javafx/beans/property/adapter/ReadOnlyJavaBeanPropertyBuilder_General_Test.java")

             ;; This one fails

             (delete-file "modules/base/src/test/java/com/sun/javafx/runtime/VersionInfoTest.java"))))))

    (inputs

     `(("java-openjfx" ,java-openjfx)))))

(define-public java-openjfx-graphics

  (package (inherit java-openjfx)

    (name "java-openjfx-graphics")

    (arguments

     `(#:jar-name "java-openjfx-graphics.jar"

       #:source-dir "modules/graphics/src/main/java"

       #:tests? #f; require X?

       #:test-dir "modules/graphics/src/test"))

    (inputs

     `(("java-openjfx" ,java-openjfx)

       ("java-openjfx-base" ,java-openjfx-base)

       ("java-swt" ,java-swt)))))

(define-public java-openjfx-media

  (package (inherit java-openjfx)

    (name "java-openjfx-media")

    (inputs

     `(("java-openjxf-graphics" ,java-openjfx-graphics)

       ("java-openjxf-base" ,java-openjfx-base)

       ("java-openjfx" ,java-openjfx)))

    (arguments

     `(#:jar-name "java-openjfx-media.jar"

       #:source-dir "modules/media/src/main/java"

       #:tests? #f)))); no tests

(define-public java-xmp

  (package

    (name "java-xmp")

    (version "5.1.3")

    (source (origin

              (method url-fetch)

              (uri (string-append "http://download.macromedia.com/pub/developer"

                                  "/xmp/sdk/XMPCoreJava-" version ".zip"))

              (sha256

               (base32

                "14nai2mmsg7l5ya2y5mx4w4lr1az3sk2fjz6hiy4zdrsavgvl1g7"))))

    (build-system ant-build-system)

    (arguments

     `(#:build-target "build"

       #:tests? #f; no tests

       #:phases

       (modify-phases %standard-phases

         (add-after 'unpack 'chdir

           (lambda _

             (chdir "XMPCore")

             #t))

         (replace 'install

           (install-jars "."))

         (add-after 'install 'install-doc

           (lambda* (#:key outputs #:allow-other-keys)

             (copy-recursively

               "docs"

               (string-append (assoc-ref outputs "out") "/share/doc/java-xmp"))

             #t)))))

    (native-inputs

     `(("unzip" ,unzip)))

    (home-page "")

    (synopsis "")

    (description "")

    (license license:bsd-3)))

(define-public java-metadata-extractor

  (package

    (name "java-metadata-extractor")

    (version "2.11.0")

    (source (origin

              (method git-fetch)

              (uri (git-reference

                     (url "https://github.com/drewnoakes/metadata-extractor")

                     (commit version)))

              (file-name (git-file-name name version))

              (sha256

               (base32

                "06yrq0swrl1r40yjbk5kqzjxr04jlkq9lfi711jvfgjf5kp2qinj"))))

    (build-system ant-build-system)

    (arguments

     `(#:jar-name "metadata-extractor.jar"

       #:source-dir "Source"

       #:test-dir "Tests"

       #:phases

       (modify-phases %standard-phases

         (add-before 'check 'fix-test-dir

           (lambda _

             (substitute* "build.xml"

               (("/java\">") "\">"))

             #t)))))

    (propagated-inputs

     `(("java-xmp" ,java-xmp)))

    (native-inputs

     `(("java-hamcrest-core" ,java-hamcrest-core)

       ("java-junit" ,java-junit)))

    (home-page "https://github.com/drewnoakes/metadata-extractor")

    (synopsis "")

    (description "")

    (license license:asl2.0)))

(define-public java-signpost-core

  (package

    (name "java-signpost-core")

    (version "1.2.1.2")

    (source (origin

              (method git-fetch)

              (uri (git-reference

                     (url "https://github.com/mttkay/signpost")

                     (commit version)))

              (file-name (git-file-name name version))

              (sha256

               (base32

                "1l04yj2znch3hpyw90c4g4jan453w7d88l84bgl0c72i2kbb8z7h"))))

    (build-system ant-build-system)

    (arguments

     `(#:jar-name "signpost-core.jar"

       #:source-dir "signpost-core/src/main/java"

       #:test-dir "signpost-core/src/test"

       ;; Tests all fail with InstantiationException from mockito

       #:tests? #f))

    (propagated-inputs

     `(("java-commons-codec" ,java-commons-codec)))

    (home-page "https://github.com/mttkay/signpost")

    (synopsis "")

    (description "")

    (license license:asl2.0)))

(define-public java-svg-salamander

  (package

    (name "java-svg-salamander")

    (version "1.1.2")

    (source (origin

              (method git-fetch)

              (uri (git-reference

                     (url "https://github.com/blackears/svgSalamander")

                     (commit (string-append "v" version))))

              (file-name (git-file-name name version))

              (sha256

               (base32

                "1zv3kjdkf6iqf02x6ln76254y634j2ji448y706a65lsbfjmmicf"))

              (modules '((guix build utils)))

              (snippet

                `(for-each delete-file (find-files "." ".*.jar")))

              (patches

                (search-patches "java-svg-salamander-Fix-non-det.patch"))))

    (build-system ant-build-system)

    ;(arguments

    ; `(#:jar-name "svg-core.jar"

    ;   #:source-dir "svg-core/src/main/java"

    ;   #:tests? #f; no tests

    ;   #:phases

    ;   (modify-phases %standard-phases

    ;     (add-before 'build 'copy-res

    ;       (lambda _

    ;         (copy-recursively "src/main/res" "build/classes")

    ;         #t)))))

    (arguments

     `(#:tests? #f; no tests

       #:phases

       (modify-phases %standard-phases

         (add-after 'unpack 'chdir

           (lambda _

             (chdir "svg-core")

             #t))

         (add-before 'build 'copy-jars

           (lambda* (#:key inputs #:allow-other-keys)

             (copy-file (car (find-files (assoc-ref inputs "javacc") "\\.jar$"))

                        "../libraries/javacc.jar")

             (copy-file (car (find-files (assoc-ref inputs "ant") "ant\\.jar$"))

                        "../libraries/ant.jar")

             #t))

         (replace 'install

           (install-jars "dist")))))

    (native-inputs

     `(("javacc" ,javacc)))

    (home-page "https://github.com/blackears/svgSalamander")

    (synopsis "")

    (description "")

    (license license:bsd-2)))

(define-public java-josm

  (package

    (name "java-josm")

    (version "15031")

    (source (origin

              (method git-fetch)

              (uri (git-reference

                     (url "https://github.com/openstreetmap/josm.git")

                     (commit "04d4c64b1b5698c0f9af40938f32194bc25bf75f")))

              (sha256

               (base32

                "0dgxa0yqh2sxl6nvpzw9507y5rdfxvmy54bhk2gfk1hxh3hvgmxh"))

              (file-name (git-file-name name version))

              (modules '((guix build utils)))

              (snippet

                `(begin

                   (for-each delete-file (find-files "." ".*.jar"))

                   (for-each delete-file-recursively

                     '("src/org/apache"

                       "src/org/glassfish"

                       "src/org/tukaani"

                       "src/javax"

                       "src/oauth"

                       "src/com"))

                   #t))))

    (build-system ant-build-system)

    (native-inputs

     `(("javacc" ,javacc)))

    (inputs

     `(("java-commons-jcs" ,java-commons-jcs)

       ("java-commons-compress" ,java-commons-compress-latest)

       ("java-jmapviewer" ,java-jmapviewer)

       ("java-jsonp-api" ,java-jsonp-api)

       ("java-jsonp-impl" ,java-jsonp-impl); runtime dependency

       ("java-metadata-extractor" ,java-metadata-extractor)

       ("java-openjfx" ,java-openjfx)

       ("java-openjfx-base" ,java-openjfx-base)

       ("java-openjfx-media" ,java-openjfx-media)

       ("java-openjfx-graphics" ,java-openjfx-graphics)

       ("java-signpost-core" ,java-signpost-core)

       ("java-svg-salamander" ,java-svg-salamander)))

    (arguments

     `(#:tests? #f

       #:jar-name "josm.jar"

       #:phases

       (modify-phases %standard-phases

         (add-after 'unpack 'rm-build.xml

           (lambda* _

             (delete-file "build.xml")

             #t))

         (add-before 'build 'fix-revision

           (lambda* _

             (with-output-to-file "REVISION.XML"

               (lambda _

                 (display

                   (string-append "<info><entry><commit revision=\"" ,version "\">"

                                  "<date>1970-01-01 00:00:00 +0000</date>"

                                  "</commit></entry></info>"))))

             #t))

         (add-before 'build 'generate-parser

           (lambda* _

             (let* ((dir "src/org/openstreetmap/josm/gui/mappaint/mapcss")

                    (out (string-append dir "/parsergen"))

                    (file (string-append dir "/MapCSSParser.jj")))

               (mkdir-p "src/org/openstreetmap/josm/gui/mappaint/mapcss/parsergen")

               (invoke "javacc" "-DEBUG_PARSER=false"

                       "-DEBUG_TOKEN_MANAGER=false" "-JDK_VERSION=1.8"

                       "-GRAMMAR_ENCODING=UTF-8"

                       (string-append "-OUTPUT_DIRECTORY=" out)

                       file))

             #t))

         (add-after 'build 'generate-epsg

           (lambda _

             (system* "javac" "scripts/BuildProjectionDefinitions.java"

                      "-cp" "build/classes")

             (mkdir-p "data/projection")

             (with-output-to-file "data/projection/custom-epsg"

               (lambda _ (display "")))

             (invoke "java" "-cp" "build/classes:scripts:."

                     "BuildProjectionDefinitions" ".")

             #t))

         (add-after 'generate-epsg 'copy-data

           (lambda _

             (mkdir-p "build/classes")

             (rename-file "data" "build/classes/data")

             #t))

         (add-before 'install 'regenerate-jar

           (lambda _

             ;; We need to regenerate the jar file to add data.

             (delete-file "build/jar/josm.jar")

             (invoke "jar" "-cf" "build/jar/josm.jar" "-C"

                     "build/classes" ".")

             #t))

         (add-before 'build 'copy-styles

           (lambda _

             (mkdir-p "build/classes")

             (rename-file "styles" "build/classes/styles")

             #t))

         (add-before 'build 'copy-images

           (lambda _

             (mkdir-p "build/classes")

             (rename-file "images" "build/classes/images")

             #t))

         (add-before 'build 'copy-revision

           (lambda _

             (mkdir-p "build/classes")

             (with-output-to-file "build/classes/REVISION"

               (lambda _

                 (display

                   (string-append "Revision: " ,version "\n"

                                  "Is-Local-Build: true\n"

                                  "Build-Date: 1970-01-01 00:00:00 +0000\n"))))

             #t))

         (add-after 'install 'install-bin

           (lambda* (#:key outputs inputs #:allow-other-keys)

             (let* ((out (assoc-ref outputs "out"))

                    (bin (string-append out "/bin")))

               (mkdir-p bin)

               (with-output-to-file (string-append bin "/josm")

                 (lambda _

                   (display

                     (string-append "#!/bin/sh\n"

                                    (assoc-ref inputs "jdk") "/bin/java"

                                    " -cp " out "/share/java/josm.jar:"

                                    (getenv "CLASSPATH")

                                    " org.openstreetmap.josm.gui.MainApplication"))))

               (chmod (string-append bin "/josm") #o755))

             #t)))))

    (home-page "https://josm.openstreetmap.de")

    (synopsis "OSM editor")

    (description "OSM editor.")

    (license license:gpl2+)))

(define-public java-commons-jcs

  (package

    (name "java-commons-jcs")

    (version "2.2.1")

    (source (origin

              (method url-fetch)

              (uri (string-append "mirror://apache/commons/jcs/source/"

                                  "commons-jcs-dist-" version "-src.tar.gz"))

              (sha256

               (base32

                "0syhq2npjbrl0azqfjm0gvash1qd5qjy4qmysxcrqjsk0nf9fa1q"))))

    (build-system ant-build-system)

    (arguments

     `(#:jar-name "commons-jcs.jar"

       #:source-dir "commons-jcs-core/src/main/java"

       #:test-dir "commons-jcs-core/src/test"

       #:tests? #f; requires hsqldb

       #:phases

       (modify-phases %standard-phases

         (add-before 'build 'prepare

           (lambda _

             (substitute* "commons-jcs-core/src/main/java/org/apache/commons/jcs/auxiliary/disk/jdbc/dsfactory/SharedPoolDataSourceFactory.java"

                (("commons.dbcp") "commons.dbcp2")

                ((".*\\.setMaxActive.*") ""))

             ;;; Remove dependency on velocity-tools

             (delete-file "commons-jcs-core/src/main/java/org/apache/commons/jcs/admin/servlet/JCSAdminServlet.java")

             #t)))))

    (propagated-inputs

     `(("java-classpathx-servletapi" ,java-classpathx-servletapi)

       ("java-commons-logging-minimal" ,java-commons-logging-minimal)

       ("java-commons-httpclient" ,java-commons-httpclient)

       ("java-commons-dbcp" ,java-commons-dbcp2)))

    (native-inputs

     `(("java-junit" ,java-junit)))

    (home-page "https://commons.apache.org/proper/commons-jcs/")

    (synopsis "")

    (description "")

    (license license:asl2.0)))

(define-public java-treelayout

  (package

    (name "java-treelayout")

    (version "1.0.3")

    (source (origin

              (method url-fetch)

              (uri (string-append

                     "https://github.com/abego/treelayout/archive/v" version

                     ".tar.gz"))

              (file-name (string-append name "-" version ".tar.gz"))

              (sha256

               (base32

                "04dp7hx84c955w5g4ry7kbjaz74appczia8fz5r8pydwhwzl8fgw"))))

    (build-system ant-build-system)

    (arguments

     `(#:jar-name (string-append ,name "-" ,version ".jar")

       #:source-dir "org.abego.treelayout/src/main/java"

       #:test-dir "org.abego.treelayout/src/test"))

    (inputs

     `(("java-junit" ,java-junit)))

    (native-inputs

     `(("java-hamcrest-core" ,java-hamcrest-core)))

    (home-page "http://treelayout.sourceforge.net")

    (synopsis "")

    (description "")

    (license license:bsd-3)))

(define-public java-jsr250

  (package

    (name "java-jsr250")

    (version "1.3")

    (source (origin

              (method url-fetch)

              (uri (string-append "https://repo1.maven.org/maven2/"

                                  "javax/annotation/javax.annotation-api/"

                                  version "/javax.annotation-api-"

                                  version "-sources.jar"))

              (sha256

               (base32

                "08clh8n4n9wfglf75qsqfjs6yf79f7x6hqx38cn856pksszv50kz"))))

    (build-system ant-build-system)

    (arguments

     `(#:tests? #f ; no tests included

       #:jar-name "jsr250.jar"))

    (home-page "https://jcp.org/en/jsr/detail?id=250")

    (synopsis "Security-related annotations")

    (description "This package provides annotations for security.  It provides

packages in the @code{javax.annotation} and @code{javax.annotation.security}

namespaces.")

    (license (list license:cddl1.0 license:gpl2)))); gpl2 only, with classpath exception