File: plugins_test.clj

package info (click to toggle)
trapperkeeper-clojure 3.1.0-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, bullseye, sid
  • size: 924 kB
  • sloc: sh: 81; xml: 73; makefile: 26; java: 5
file content (47 lines) | stat: -rw-r--r-- 2,253 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
(ns puppetlabs.trapperkeeper.plugins-test
  (:require [clojure.test :refer :all]
            [clojure.java.io :refer [file resource]]
            [puppetlabs.trapperkeeper.plugins :refer :all]
            [puppetlabs.trapperkeeper.core :as trapperkeeper]
            [puppetlabs.trapperkeeper.app :refer [get-service service-graph]]
            [puppetlabs.trapperkeeper.testutils.bootstrap :refer [bootstrap-with-empty-config]]
            [schema.test :as schema-test]))

(use-fixtures :once schema-test/validate-schemas)

(deftest test-jars-in-dir
  (let [jars (jars-in-dir (file "plugin-test-resources/plugins"))]
    (is (= 1 (count jars)))
    (is (= "plugin-test-resources/plugins/test-service.jar" (.getPath (first jars))))))

(deftest test-bad-directory
  (testing "TK throws an exception if --plugins is provided with a dir that does not exist."
    (is (thrown-with-msg?
         IllegalArgumentException
         #".*directory.*does not exist.*"
         (bootstrap-with-empty-config ["--plugins" "/this/does/not/exist"])))))

;(deftest test-no-duplicates
;  (testing "duplicate test passes on .jar with just a service in it"
;    ;; `verify-no-duplicate-resources` throws an exception if a duplicate is found.
;    (verify-no-duplicate-resources (file "plugin-test-resources/plugins/test-service.jar"))))

(deftest test-duplicates
  (testing "duplicate test fails when an older version of kitchensink is included"
    (is (thrown-with-msg?
         IllegalArgumentException
         #".*Class or namespace.*found in both.*"
         (verify-no-duplicate-resources
          (file "plugin-test-resources/bad-plugins"))))))

;(deftest test-plugin-service
;  (testing "TK can load and use service defined in plugin .jar"
;    (let [app (bootstrap-with-empty-config
;               ["--plugins" "./plugin-test-resources/plugins"
;                "--bootstrap-config" "./dev-resources/bootstrapping/plugin/bootstrap.cfg"])
;          service-fn (-> (service-graph app)
;                         :PluginTestService
;                         :moo)]
;      (is (= "This message comes from the plugin test service." (service-fn)))
;      ;; Can it also load resources from that jar
;      (is (resource "test_services/plugin_test_services.clj")))))