#:use-module (gnu packages docbook)

  #:use-module (gnu packages xml)

       ("java-avalon-framework-api" ,java-avalon-framework-api)

       ("java-httpcomponents-client" ,java-httpcomponents-client)

       ("java-httpcomponents-core" ,java-httpcomponents-core)

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

         (add-after 'unpack 'rm-jcs-embedded

           (lambda _

             (delete-file-recursively "src/org/apache/commons/jcs")))

    (synopsis "Mock library extension framework")

    (description "PowerMock is a framework that extends other mock libraries

such as EasyMock with more powerful capabilities.  PowerMock uses a custom

classloader and bytecode manipulation to enable mocking of static methods,

constructors, final classes and methods, private methods, removal of static

initializers and more.  By using a custom classloader no changes need to be

done to the IDE or continuous integration servers which simplifies adoption.")

    (synopsis "Lightweight Scripting for Java")

    (description "BeanShell is a small, free, embeddable Java source

interpreter with object scripting language features, written in Java.

BeanShell dynamically executes standard Java syntax and extends it with common

scripting conveniences such as loose types, commands, and method closures like

those in Perl and JavaScript.")

       #:test-dir "jmock/src/test"))

    (synopsis "Mock object library")

    (description "Jmock is an expressive Mock Object library for Test Driven

Development.")

;       ("snakeyaml" ,java-snakeyaml)

    (synopsis "Command line parameters parser")

    (description "JCommander is a very small Java framework that makes it

trivial to parse command line parameters.  Parameters are declared with

annotations.")

    (synopsis "Testing framework")

    (description "TestNG is a testing framework inspired from JUnit and NUnit

but introducing some new functionalities that make it more powerful and easier

to use.")

    (synopsis "FEST common utilities")

    (description "Common utilities used in all FEST module.")

    (synopsis "Common FEST testing infrastructure")

    (description "Fest-test contains the common FEST testing infrastructure.")

    (synopsis "FEST fluent assertions")

    (description "FEST-Assert provides a fluent interface for assertions.")

    (synopsis "Java implementation of NaCl")

    (description "Pure Java implementation of the NaCl: Networking and

Cryptography library.")

    (synopsis "Java binding for ??MQ")

    (description "Jeromq provides the java bindings for ??MQ.")

           (lambda _ (chdir "log4j-core") #t)))))

    (synopsis "Core component of the Log4j framework")

    (description "This package provides the core component of the Log4j

logging framework for Java.")))

(define-public java-commons-digester

  (package

    (name "java-commons-digester")

    (version "3.2")

    (source (origin

              (method url-fetch)

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

                                  "commons-digester3-" version "-src.tar.gz"))

              (sha256

               (base32

                "03kc18dfl5ma50cn02ji7rbhm33qpxyd9js6mvzznf8f7y6pmykk"))))

    (build-system ant-build-system)

    (arguments

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

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

       #:phases

       (modify-phases %standard-phases

         (add-before 'build 'copy-resource

           (lambda _

             (copy-recursively "src/main/resources" "build/classes")))

         (add-before 'test 'copy-test-resource

           (lambda _

             (copy-recursively "src/test/resources" "build/test-classes"))))))

    (inputs

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

       ("cglib" ,java-cglib)

       ("beanutils", java-commons-beanutils)))

    (native-inputs

     `(("junit" ,java-junit)

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

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

    (synopsis "")

    (description "")

    (license license:asl2.0)))

(define-public java-commons-validator

  (package

    (name "java-commons-validator")

    (version "1.6")

    (source (origin

              (method url-fetch)

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

                                  "commons-validator-" version "-src.tar.gz"))

              (sha256

               (base32

                "1v2iqhjz4iqwmv38gzf953php770mmhglibixzvxjc2yca3sizkb"))))

    (build-system ant-build-system)

    (arguments

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

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

       #:tests? #f; Require network access (jakarta.apache.org)

       #:test-exclude (list "**/Abstract*.java"

                            ;; Require network access (jakarta.apache.org)

                            "**/ByteTest.java"

                            "**/DateTest.java"

                            "**/DoubleTest.java"

                            "**/EmailTest.java"

                            "**/EntityImportTest.java"

                            "**/ExceptionTest.java"

                            "**/ExtensionTest.java")

       #:phases

       (modify-phases %standard-phases

         (add-before 'build 'copy-resource

           (lambda _

             (copy-recursively "src/main/resources" "build/classes")))

         (add-before 'test 'copy-test-resource

           (lambda _

             (copy-recursively "src/test/resources" "build/test-classes")))

         (add-before 'build 'fix-digester

           (lambda _

             ;; Port from digester 1 to digester 3.

             (substitute* (find-files "src/main/java" ".*\\.java")

               (("commons.digester") "commons.digester3")

               (("org.apache.commons.digester3.xmlrules.DigesterLoader")

                "org.apache.commons.digester3.binder.DigesterLoader"))

             ;; digester is private in this class, so we use the getter

             (substitute* "src/main/java/org/apache/commons/validator/FormSetFactory.java"

               (("digester.peek") "getDigester().peek"))

             (substitute* "src/main/java/org/apache/commons/validator/ValidatorResources.java"

               (("// DEPRECATED")

                "// DEPRECATED\nimport org.apache.commons.digester3.xmlrules.FromXmlRulesModule;")

               (("private Digester initDigester")

                (string-append

                  "private FromXmlRulesModule rulesModule(final URL url) {\n"

                  "  return new FromXmlRulesModule() {\n"

                  "    @Override\n"

                  "    protected void loadRules() {\n"

                  "      loadXMLRules(url);"

                  "    }\n"

                  "  };\n"

                  "}\n"

                  "private Digester initDigester"))

               ;; Copied from digester tests

               (("createDigester\\(rulesUrl\\)")

                "newLoader(rulesModule(rulesUrl)).newDigester()")))))))

    (inputs

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

       ("beanutils" ,java-commons-beanutils)

       ("collections" ,java-commons-collections)

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

    (native-inputs

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

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

    (synopsis "")

    (description "")

    (license license:asl2.0)))

(define-public java-ognl

  (package

    (name "java-ognl")

    (version "3.2.3")

    (source (origin

              (method url-fetch)

              (uri (string-append "https://github.com/jkuhnert/ognl/archive/OGNL_"

                                  (string-map (lambda (x) (if (eq? x #\.) #\_ x)) version)

                                  ".tar.gz"))

              (sha256

               (base32

                "1p4yni36ln69cdl7icylpg87yzgnx9i08k4a5yhcvgmbr49p273w"))))

    (build-system ant-build-system)

    (arguments

     `(#:tests? #f; Tests are run as a dependency of "dist"

       #:jdk ,icedtea-8

       #:make-flags (list "-Dcompile.version=7")

       #:phases

       (modify-phases %standard-phases

         (add-before 'build 'remove-binaries

           (lambda _

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

             #t))

         (add-before 'build 'remove-clover

           (lambda _

             (substitute* "osbuild.xml"

               (("clover-check,") "")

               ((", clover.report"), "")

               ((".*clover-setup.*") "")

               ((".*src/test/\\*\\*/\\*.java.*") "")

               (("<files>") "")

               (("</files>") ""))))

         (replace 'install

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

             (install-file "build/ognl-2.7.2.jar" (string-append (assoc-ref outputs "out") "/share/java")))))))

             ;(zero? (system* "ant" "dist" "-Dcompile.version=7"

             ;                (string-append "-Ddist="

             ;                               (assoc-ref outputs "out")

             ;                               "/share/java")

             ;                (string-append "-Ddocbook.xsl.path="

             ;                               (assoc-ref inputs "docbook-xsl"))

             ;                (string-append "-Ddocbook.xml.path="

             ;                               (assoc-ref inputs "docbook-xml"))

             ;                               )))))))

    (inputs

     `(("javassist" ,java-jboss-javassist)))

    (native-inputs

     `(("junit" ,java-junit)

       ("hamcrest" ,java-hamcrest-core)

       ("docbook-xml" ,docbook-xml)

       ("docbook-xsl" ,docbook-xsl)

       ("libxml2" ,libxml2)))

    (home-page "http://www.opensymphony.com/ognl/"); down ? and ognl.org is not owned by the project

    (synopsis "")

    (description "")

    (license license:asl2.0)))

(define-public java-apache-struts

  (package

    (name "java-apache-struts")

    (version "2.5.13")

    (source (origin

              (method url-fetch)

              (uri (string-append "mirror://apache/struts/" version "/struts-"

                                  version "-src.zip"))

              (sha256

               (base32

                "1pi3ymql7d9axxzi6pd8iqap1d3s2pij88mc7zywbw7mva61y8qy"))))

    (build-system ant-build-system)

    (arguments

     `(#:jar-name "apache-struts.jar"

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

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

    (inputs

     `(("log4j" ,java-log4j-api)

       ("lang3" ,java-commons-lang3)

       ("io" ,java-commons-io)

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

       ("servlet" ,java-classpathx-servletapi)

       ("ognl" ,java-ognl)

       ("velocity" ,java-velocity)

       ("testng" ,java-testng)))

    (native-inputs

     `(("junit" ,java-junit)

       ("unzip" ,unzip)))

    (home-page "https://struts.apache.org/")

    (synopsis "")

    (description "")

    (license license:asl2.0)))

               ((".*download.xml.*") ""))

             ;; Replace digester with digester3

             (substitute* (find-files "src/main/java" ".*\\.java")

               (("commons.digester") "commons.digester3"))

             #t))

       ("digester" ,java-commons-digester)

       ("validator" ,java-commons-validator)

    ;; apache struts