refactor to new commons features

shadow-cljs.edn

@@ -4,7 +4,7 @@
                 "src/test/cljc"
                 "src/test/cljs"
                 "src/test/resources"]
- :dependencies [[org.domaindrivenarchitecture/c4k-common-cljs "6.0.1"]
+ :dependencies [[org.domaindrivenarchitecture/c4k-common-cljs "6.1.0"]
                 [hickory "0.7.1"]]
  :builds {:frontend {:target :browser
                      :modules {:main {:init-fn dda.c4k-forgejo.browser/init}}

src/main/cljc/dda/c4k_forgejo/backup.cljc

@@ -1,10 +1,10 @@
 (ns dda.c4k-forgejo.backup
  (:require
   [clojure.spec.alpha :as s]
-  #?(:cljs [shadow.resource :as rc])
   [dda.c4k-common.yaml :as yaml]
   [dda.c4k-common.base64 :as b64]
-  [dda.c4k-common.common :as cm]))
+  [dda.c4k-common.common :as cm]
+  #?(:cljs [dda.c4k-common.macros :refer-macros [inline-resources]])))
 
 (s/def ::aws-access-key-id cm/bash-env-string?)
 (s/def ::aws-secret-access-key cm/bash-env-string?)
@@ -13,12 +13,7 @@
 
 #?(:cljs
    (defmethod yaml/load-resource :backup [resource-name]
-     (case resource-name
+     (get (inline-resources "backup") resource-name)))
-       "backup/config.yaml" (rc/inline "backup/config.yaml")
-       "backup/cron.yaml" (rc/inline "backup/cron.yaml")
-       "backup/secret.yaml" (rc/inline "backup/secret.yaml")
-       "backup/backup-restore-deployment.yaml" (rc/inline "backup/backup-restore-deployment.yaml")
-       (throw (js/Error. "Undefined Resource!")))))
 
 (defn generate-config [my-conf]
   (let [{:keys [restic-repository]} my-conf]

src/main/cljc/dda/c4k_forgejo/forgejo.cljc

@@ -2,17 +2,15 @@
   (:require
    [clojure.spec.alpha :as s]
    [clojure.string :as st]
-   #?(:cljs [shadow.resource :as rc])
    #?(:clj [orchestra.core :refer [defn-spec]]
       :cljs [orchestra.core :refer-macros [defn-spec]])
-   #?(:clj [clojure.edn :as edn]
-      :cljs [cljs.reader :as edn])
    [dda.c4k-common.yaml :as yaml]
    [dda.c4k-common.common :as cm]
    [dda.c4k-common.ingress :as ing]
    [dda.c4k-common.base64 :as b64]
    [dda.c4k-common.predicate :as pred]
-   [dda.c4k-common.postgres :as postgres]))
+   [dda.c4k-common.postgres :as postgres]
+   #?(:cljs [dda.c4k-common.macros :refer-macros [inline-resources]])))
 
 (defn domain-list?
   [input]
@@ -68,14 +66,7 @@
 
 #?(:cljs
    (defmethod yaml/load-resource :forgejo [resource-name]
-     (case resource-name
+     (get (inline-resources "forgejo") resource-name)))
-       "forgejo/appini-env-configmap.yaml" (rc/inline "forgejo/appini-env-configmap.yaml")
-       "forgejo/deployment.yaml" (rc/inline "forgejo/deployment.yaml")
-       "forgejo/secrets.yaml" (rc/inline "forgejo/secrets.yaml")
-       "forgejo/service.yaml" (rc/inline "forgejo/service.yaml")
-       "forgejo/service-ssh.yaml" (rc/inline "forgejo/service-ssh.yaml")       
-       "forgejo/datavolume.yaml" (rc/inline "forgejo/datavolume.yaml")
-       (throw (js/Error. "Undefined Resource!")))))
 
 (defn generate-appini-env
   [config]

src/test/cljc/dda/c4k_forgejo/backup_test.cljc

@@ -0,0 +1,30 @@
+(ns dda.c4k-forgejo.backup-test
+  (:require
+   #?(:clj [clojure.test :refer [deftest is are testing run-tests]]
+      :cljs [cljs.test :refer-macros [deftest is are testing run-tests]])
+   [clojure.spec.test.alpha :as st]
+   [dda.c4k-forgejo.backup :as cut]))
+
+(st/instrument `cut/generate-config)
+
+(deftest should-generate-backup-config
+  (testing "federated"
+    (is (= {:apiVersion "v1",
+            :kind "ConfigMap",
+            :metadata
+            {:name "backup-config",
+             :labels
+             #:app.kubernetes.io{:name "backup", :part-of "forgejo"}},
+            :data {:restic-repository "s3:s3.amazonaws.com/backup/federated-repo"}}
+           (cut/generate-config
+            {:restic-repository "s3:s3.amazonaws.com/backup/federated-repo"}))))
+  (testing "non-federated"
+    (is (= {:apiVersion "v1",
+            :kind "ConfigMap",
+            :metadata
+            {:name "backup-config",
+             :labels
+             #:app.kubernetes.io{:name "backup", :part-of "forgejo"}},
+            :data {:restic-repository "s3:s3.amazonaws.com/backup/repo"}}
+           (cut/generate-config
+            {:restic-repository "s3:s3.amazonaws.com/backup/repo"})))))

src/test/cljc/dda/c4k_forgejo/forgejo_test.cljc

@@ -51,7 +51,8 @@
                                                 :service-domain-whitelist "test.com,test.net"
                                                 :service-noreply-address "noreply@test.com"})))))
 
-(deftest should-generate-non-federated-deployment
+(deftest should-generate-deployment
+  (testing "non-federated"
     (is (= {:apiVersion "apps/v1",
             :kind "Deployment",
             :metadata {:name "forgejo", :namespace "default", :labels {:app "forgejo"}},
@@ -77,10 +78,8 @@
              :mailer-host "m.t.de"
              :mailer-port "123"
              :service-domain-whitelist "adb.de"
-         :service-noreply-address ""}
+             :service-noreply-address ""}))))
-        ))))
+  (testing "federated-deployment"
-
-(deftest should-generate-federated-deployment
     (is (= {:apiVersion "apps/v1",
             :kind "Deployment",
             :metadata {:name "forgejo", :namespace "default", :labels {:app "forgejo"}},
@@ -106,7 +105,7 @@
              :mailer-host "m.t.de"
              :mailer-port "123"
              :service-domain-whitelist "adb.de"
-           :service-noreply-address ""}))))
+             :service-noreply-address ""})))))
 
 (deftest should-generate-secret
   (is (= {:FORGEJO__database__USER-c1 "",