77 lines
2.9 KiB
Clojure
77 lines
2.9 KiB
Clojure
(ns dda.c4k-nextcloud.browser
|
|
(:require
|
|
[clojure.tools.reader.edn :as edn]
|
|
[dda.c4k-common.common :as cm]
|
|
[dda.c4k-nextcloud.core :as core]
|
|
[dda.c4k-common.browser :as br]))
|
|
|
|
(defn generate-content []
|
|
(cm/concat-vec
|
|
[(assoc
|
|
(br/generate-needs-validation) :content
|
|
(cm/concat-vec
|
|
(br/generate-group
|
|
"config"
|
|
(br/generate-text-area
|
|
"config" "Your config.edn:"
|
|
"{:fqdn \"cloud.your.domain\"
|
|
:issuer \"staging\"
|
|
:pv-storage-size-gb \"400\"
|
|
:pvc-storage-class-name \"local-path\"
|
|
:postgres-data-volume-path \"/var/postgres\"
|
|
:restic-repository \"s3://yourbucket/your-repo\"
|
|
:mon-cfg {:cluster-name \"cloud\"
|
|
:cluster-stage \"test\"
|
|
:grafana-cloud-url \"https://prometheus-prod-01-eu-west-0.grafana.net/api/prom/push\"}}"
|
|
"9"))
|
|
(br/generate-group
|
|
"auth"
|
|
(br/generate-text-area
|
|
"auth" "Your auth.edn:"
|
|
"{:postgres-db-user \"nextcloud\"
|
|
:postgres-db-password \"nextcloud-db-password\"
|
|
:nextcloud-admin-password \"nextcloud-admin-password\"
|
|
:nextcloud-admin-user \"nextcloud-admin-user\"
|
|
:aws-access-key-id \"aws-id\"
|
|
:aws-secret-access-key \"aws-secret\"
|
|
:restic-password \"restic-password\"}
|
|
:mon-auth {:grafana-cloud-user \"your-user-id\"
|
|
:grafana-cloud-password \"your-cloud-password\"}}"
|
|
"9"))
|
|
[(br/generate-br)]
|
|
(br/generate-button "generate-button" "Generate c4k yaml")))]
|
|
(br/generate-output "c4k-nextcloud-output" "Your c4k deployment.yaml:" "25")))
|
|
|
|
(defn generate-content-div
|
|
[]
|
|
{:type :element
|
|
:tag :div
|
|
:content
|
|
(generate-content)})
|
|
|
|
(defn validate-all! []
|
|
(br/validate! "config" core/config? :deserializer edn/read-string)
|
|
(br/validate! "auth" core/auth? :deserializer edn/read-string)
|
|
(br/set-form-validated!))
|
|
|
|
(defn add-validate-listener [name]
|
|
(-> (br/get-element-by-id name)
|
|
(.addEventListener "blur" #(do (validate-all!)))))
|
|
|
|
(defn init []
|
|
(br/append-hickory (generate-content-div))
|
|
(-> js/document
|
|
(.getElementById "generate-button")
|
|
(.addEventListener "click"
|
|
#(do (validate-all!)
|
|
(-> (cm/generate-cm
|
|
(br/get-content-from-element "config" :deserializer edn/read-string)
|
|
(br/get-content-from-element "auth" :deserializer edn/read-string)
|
|
core/config-defaults
|
|
core/config-objects
|
|
core/auth-objects
|
|
false
|
|
false)
|
|
(br/set-output!)))))
|
|
(add-validate-listener "config")
|
|
(add-validate-listener "auth"))
|
