Changeset 15015

Timestamp:

05/23/17 11:00:24 (6 years ago)

Author:

Mark Evenson

Message:

Move the failing test for maven dependencies into ABCL-ASDF

This test only makes sends if ABCL-ASDF can be loaded.

Fixed 't/resolve-multiple-maven-dependencies.lisp' to running, but now
failing on download of HeRMIT artifact:

Java exception
'org.eclipse.aether.resolution.DependencyResolutionException?: The
following artifacts could not be resolved:
net.sourceforge.owlapi:org.semanticweb.hermit:jar:1.3.8.413,
net.sourceforge.owlapi:owlapi-distribution:jar:4.2.6,
net.sourceforge.owlapi:pellet-cli-ignazio1977:jar:2.4.0-ignazio1977,
org.semanticweb.elk:elk-reasoner:jar:0.4.3,
net.sourceforge.owlapi:owlexplanation:jar:2.0.0: Could not find
artifact net.sourceforge.owlapi:org.semanticweb.hermit:jar:1.3.8.413'.

Location:

trunk/abcl/contrib/abcl-asdf

Files:

• abcl-asdf-tests.asd (modified) (1 diff)
• t/resolve-multiple-maven-dependencies.lisp (moved) (moved from trunk/abcl/t/resolve-multiple-maven-dependencies.lisp) (4 diffs)
• t/resolve.lisp (modified) (1 diff)

trunk/abcl/contrib/abcl-asdf/abcl-asdf-tests.asd

@@ -16 +16 @@
                         :components ((:test-file "log4j")
                                      (:test-file "resolve")
+                                     (:test-file "resolve-multiple-maven-dependencies")
                                      (:test-file "maven"))))
   :perform (asdf:test-op (op c)

trunk/abcl/contrib/abcl-asdf/t/resolve-multiple-maven-dependencies.lisp

@@ +1 @@
+(in-package :cl-user)
+(require :jss)
+
 ;; https://maven.apache.org/guides/introduction/introduction-to-optional-and-excludes-dependencies.html
 ;; if a artifact is root then its optional dependencies are
@@ -24 +27 @@
  "
   (let ((collect-request (java:jnew (jss:find-java-class "CollectRequest")))
-  (exclusions-collection (new 'hashset) )
+  (exclusions-collection (jss:new 'hashset) )
   (compile-scope #"JavaScopes.COMPILE"))
     (loop for e  in exclusions
-    for (groupid artifactid) = (split-at-char e #\:)
+    for (groupid artifactid) = (abcl/build:split-string e #\:)
     ;; If i have scope be compile-scope it doesn't get excluded!!
-    for exclusion = (new 'aether.graph.Exclusion groupid artifactid "" "jar")
+    for exclusion = (jss:new 'aether.graph.Exclusion groupid artifactid "" "jar")
     do (#"add" exclusions-collection exclusion))
     (loop for a in dependencies
     for artifact = (abcl-asdf::make-artifact (#"replaceAll" a "/" ":"))
-    for dependency = (new 'aether.graph.Dependency artifact compile-scope)
+    for dependency = (jss:new 'aether.graph.Dependency artifact compile-scope)
     do  
        ;; setExclusions returns a new dependency. We have to use that. That passed dependency is not modified!
@@ -45 +48 @@
     (loop for a in managed-dependencies
     for artifact = (abcl-asdf::make-artifact (#"replaceAll" a "/" ":"))
-    for dependency = (new 'aether.graph.Dependency artifact compile-scope)
+    for dependency = (jss:new 'aether.graph.Dependency artifact compile-scope)
     do (setq dependency (#"setExclusions" dependency exclusions-collection))
        (#"addManagedDependency" collect-request dependency))
@@ -51 +54 @@
        (abcl-asdf::ensure-repository-system)
        (abcl-asdf::ensure-session) collect-request))
-    (nodelist-generator (new 'PreorderNodeListGenerator))
-    (dependency-request (new 'DependencyRequest)))
-      (#"setRoot" dependency-request (#"getRoot" dependencies))
-      (#"resolveDependencies" (abcl-asdf::ensure-repository-system) (abcl-asdf::ensure-session) dependency-request)
-      (#"accept" (#"getRoot" dependencies) nodelist-generator)
-      (split-at-char (#"getClassPath" nodelist-generator) #\:)
-      )))
-
+    (nodelist-generator (jss:new 'PreorderNodeListGenerator))
+    (dependency-request (jss:new 'DependencyRequest)))
+      (#"setRoot" dependency-request
+                  (#"getRoot" dependencies))
+      (#"resolveDependencies" (abcl-asdf::ensure-repository-system)
+                              (abcl-asdf::ensure-session)
+                              dependency-request)
+      (#"accept" (#"getRoot" dependencies)
+                 nodelist-generator)
+      (abcl/build:split-string (#"getClassPath" nodelist-generator) #\:))))
 
 
 (prove:plan 3)
-(let ((deps  (resolve-multiple-maven-dependencies '("net.sourceforge.owlapi:org.semanticweb.hermit:1.3.8.413"
-             "net.sourceforge.owlapi:owlapi-distribution:4.2.6"
-             "net.sourceforge.owlapi/pellet-cli-ignazio1977/2.4.0-ignazio1977"
-             "org.semanticweb.elk/elk-reasoner/0.4.3"
-             "net.sourceforge.owlapi/owlexplanation/2.0.0")
-           '("net.sourceforge.owlapi:owlapi-distribution:4.2.6")
-           '("net.sourceforge.owlapi:owlapi-osgidistribution"
-             "edu.stanford.protege:org.protege.editor.owl")
-           )))
+(let ((deps (resolve-multiple-maven-dependencies
+             '("net.sourceforge.owlapi:org.semanticweb.hermit:1.3.8.413"
+               "net.sourceforge.owlapi:owlapi-distribution:4.2.6"
+               "net.sourceforge.owlapi/pellet-cli-ignazio1977/2.4.0-ignazio1977"
+               "org.semanticweb.elk/elk-reasoner/0.4.3"
+               "net.sourceforge.owlapi/owlexplanation/2.0.0")
+             '("net.sourceforge.owlapi:owlapi-distribution:4.2.6")
+             '("net.sourceforge.owlapi:owlapi-osgidistribution"
+               "edu.stanford.protege:org.protege.editor.owl"))))
   (prove:ok (= (length deps) 87))
   (prove:ok (not (find "owlapi-osgidistribution" deps :test 'search)))

trunk/abcl/contrib/abcl-asdf/t/resolve.lisp

@@ -5 +5 @@
    (and result
         (format *standard-output* "~&~A~%" result)
-        (type-p result 'cons))))
+        (type-p result 'cons)))
+ "Resolving ABCL from distributed Maven POM graph.")
 
 (prove:finalize)