jaggar/iac-cljs-configs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

thunk func

Browse Source
This commit is contained in:
GigiaJ
2025-11-24 09:40:03 -06:00
parent 27ed391745
commit b4071b44e6
1 changed files with 7 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
src/main/core.cljs
View File

@@ -27,17 +27,16 @@
"hetzner-k3s" "hetzner-k3s"
"base" "base"
"/home/jaggar/dotfiles/iac" "/home/jaggar/dotfiles/iac"
(execute #(execute
base-resources-definition base-resources-definition
(fn [output] (let [_ (js/console.log output)] (fn [output] #js {:kubeconfig (p-> output .-cluster "generic:execute" .-kubeconfig)}))))
#js {:kubeconfig (p-> output .-cluster "generic:execute" .-kubeconfig)})))))
(def init-stack (def init-stack
(define-stack (define-stack
"hetzner-k3s" "hetzner-k3s"
"init" "init"
"/home/jaggar/dotfiles/iac" "/home/jaggar/dotfiles/iac"
(execute #(execute
initialize-resources-definition initialize-resources-definition
(fn [output] #js {:vaultAddress (p-> output .-openbao "generic:execute" .-address) (fn [output] #js {:vaultAddress (p-> output .-openbao "generic:execute" .-address)
:vaultToken (p-> output .-openbao "generic:execute" "root-token")})))) :vaultToken (p-> output .-openbao "generic:execute" "root-token")}))))
@@ -47,7 +46,7 @@
"hetzner-k3s" "hetzner-k3s"
"shared" "shared"
"/home/jaggar/dotfiles/iac" "/home/jaggar/dotfiles/iac"
(execute #(execute
shared-resources-definition shared-resources-definition
(fn [output] (let [secrets (p-> output .-harbor "vault:prepare" "stringData")] (fn [output] (let [secrets (p-> output .-harbor "vault:prepare" "stringData")]
#js {:url (p-> secrets .-host (fn [x] (str "https://" x))) #js {:url (p-> secrets .-host (fn [x] (str "https://" x)))
@@ -59,14 +58,14 @@
"hetzner-k3s" "hetzner-k3s"
"prepare" "prepare"
"/home/jaggar/dotfiles/iac" "/home/jaggar/dotfiles/iac"
(execute preparation-resources-definition (fn [output] {})))) #(execute preparation-resources-definition (fn [output] {}))))
(def deployment-stack (def deployment-stack
(define-stack (define-stack
"hetzner-k3s" "hetzner-k3s"
"deployment" "deployment"
"/home/jaggar/dotfiles/iac" "/home/jaggar/dotfiles/iac"
(execute deployment-resources-definition (fn [output] {})))) #(execute deployment-resources-definition (fn [output] {}))))
(defn deploy-stack (defn deploy-stack