Add backend clojure unit tests

Author: DrTom

bin/clj-test

@@ -3,4 +3,4 @@ set -euo
 PROJECT_DIR="$(cd -- "$(dirname "${BASH_SOURCE}")" ; cd .. > /dev/null 2>&1 && pwd -P)"
 cd $PROJECT_DIR
 source $PROJECT_DIR/clojure/bin/activate
-clj -M:test
+clojure -M:test "$@"

cider-ci.yml

@@ -1,11 +1,33 @@
 jobs:
 
-  build-media-service-uberjar:
-    name: Build media-service uberjar
+  backend-unit-tests:
+    name: Clojure Backend Unit Tests
     run_when:
       any branch has been updated:
         type: branch
         include_match: ^.*$
+    context:
+      task_defaults:
+        environment_variables:
+          MADEK_MEDIA_SERVICE_DIR: "{{CIDER_CI_WORKING_DIR}}"
+      tasks:
+        run-tests:
+          name: Run backend clojure unit tests
+          traits:
+            JDK 8: true
+          scripts:
+            run-tests:
+              body: |
+                ${MADEK_MEDIA_SERVICE_DIR}/bin/clj-test
+
+  build-media-service-uberjar:
+    name: Build media-service uberjar
+    depends_on: &UBERJAR_DEPENDS
+      backend-unit-tests-passed:
+        type: job
+        job_key: backend-unit-tests
+        states: [passed]
+    run_when: *UBERJAR_DEPENDS
     context:
       task_defaults:
         environment_variables:

cider-ci/uberjar_task-component.yml

@@ -10,7 +10,6 @@ git_options:
 
 traits:
   JDK 8: true
-  Leiningen 2: true
 
 environment_variables:
   NVM_NODEJS_VERSION: "14"

deps.edn

@@ -63,7 +63,9 @@
              :main-opts ["-m" "depot.outdated.main"]}
   :resources {:extra-paths ["resources"]}
   :test {:extra-paths ["test"]
-         :extra-deps {com.cognitect/test-runner
+         :extra-deps {io.github.cognitect-labs/test-runner
                       {:git/url "https://github.com/cognitect-labs/test-runner.git"
-                       :sha "4e7e1c0dfd5291fa2134df052443dc29695d8cbe"}}
-         :main-opts ["-m" "cognitect.test-runner"]}}}
+                       :sha "dd6da11611eeb87f08780a30ac8ea6012d4c05ce"}}
+         :main-opts ["-m" "cognitect.test-runner"]
+         :exec-fn cognitect.test-runner.api/test
+         }}}

src/all/madek/media_service/run.clj

@@ -90,7 +90,8 @@
                           flatten (into []))]
     (reset! options* options)
     (cond
-      (:help options) (println (main-usage summary {:args args :options options}))
+      (:help options) (do
+                        (println (main-usage summary {:args args :options options})))
       :else (do (logging/info "run with options:" (str options ) )
                 (.addShutdownHook (Runtime/getRuntime) (Thread. #(shutdown)))
                 (state/init)

test/madek/media_service/legacy/session/signature_test.clj

@@ -5,7 +5,7 @@
   ))
 
 (def  fixed-signature
-"0caf649feee4953d87bf903ac1176c45e028df16")
+  "0caf649feee4953d87bf903ac1176c45e028df16")
 
 (deftest fixed-valid?-test []
-(is (= true (valid? fixed-signature "secret" "message"))))
+  (is (= true (valid? fixed-signature "secret" "message"))))

test/madek/media_service/main_test.clj

@@ -0,0 +1,20 @@
+(ns madek.media-service.main-test
+  (:require
+    [clojure.test :refer :all]
+    [madek.media-service.main]
+    ))
+
+; madek.media-service.main requires everything needed to run the backend starting
+; from madek.media-service.main/-main
+
+
+(deftest main-entry-function-exists-test []
+  (is (fn? madek.media-service.main/-main)))
+
+
+(deftest call-run-scope-with-help-opt-test []
+  (let [run-scope-help (with-out-str
+                         (madek.media-service.main/-main
+                           "run" "--help"))]
+    (is (re-find #"Madek Media-Service" run-scope-help))
+    (is (re-find #"usage" run-scope-help))))