You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
45 lines
1.9 KiB
Clojure
45 lines
1.9 KiB
Clojure
(ns dda.c4k-nextcloud.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]))
|
|
|
|
(s/def ::aws-access-key-id cm/bash-env-string?)
|
|
(s/def ::aws-secret-access-key cm/bash-env-string?)
|
|
(s/def ::restic-password cm/bash-env-string?)
|
|
(s/def ::restic-repository cm/bash-env-string?)
|
|
|
|
#?(:cljs
|
|
(defmethod yaml/load-resource :backup [resource-name]
|
|
(case 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]
|
|
(->
|
|
(yaml/from-string (yaml/load-resource "backup/config.yaml"))
|
|
(cm/replace-key-value :restic-repository restic-repository))))
|
|
|
|
(defn generate-cron []
|
|
(yaml/from-string (yaml/load-resource "backup/cron.yaml")))
|
|
|
|
(defn generate-backup-restore-deployment [my-conf]
|
|
(let [backup-restore-yaml (yaml/from-string (yaml/load-resource "backup/backup-restore-deployment.yaml"))]
|
|
(if (and (contains? my-conf :local-integration-test) (= true (:local-integration-test my-conf)))
|
|
(cm/replace-named-value backup-restore-yaml "CERTIFICATE_FILE" "/var/run/secrets/localstack-secrets/ca.crt")
|
|
backup-restore-yaml)))
|
|
|
|
(defn generate-secret [my-auth]
|
|
(let [{:keys [aws-access-key-id aws-secret-access-key restic-password]} my-auth]
|
|
(->
|
|
(yaml/from-string (yaml/load-resource "backup/secret.yaml"))
|
|
(cm/replace-key-value :aws-access-key-id (b64/encode aws-access-key-id))
|
|
(cm/replace-key-value :aws-secret-access-key (b64/encode aws-secret-access-key))
|
|
(cm/replace-key-value :restic-password (b64/encode restic-password)))))
|