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

Fix our DNS decl

Browse Source
This commit is contained in:
GigiaJ
2025-11-22 17:02:41 -06:00
parent 08ff3e46fa
commit 0d2807cebc
1 changed files with 14 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
iac/src/main/infra/dns.cljs
View File

@@ -14,7 +14,7 @@
(defn- get-node-ips [] (defn- get-node-ips []
(str "kubectl get nodes -o jsonpath='{range .items[*]}{.status.addresses[?(@.type==\"ExternalIP\")].address}{\"\\n\"}{end}'")) (str "kubectl get nodes -o jsonpath='{range .items[*]}{.status.addresses[?(@.type==\"ExternalIP\")].address}{\"\\n\"}{end}'"))
(defn setup-dns [{:keys [pulumi-cfg secrets]}] (defn setup-dns [{:keys [pulumi-cfg secrets dependencies]}]
(let [get-node-ips (local/Command. (let [get-node-ips (local/Command.
"get-node-ips" "get-node-ips"
(clj->js {:create (get-node-ips) (clj->js {:create (get-node-ips)
@@ -33,21 +33,23 @@
(filter seq)))] (filter seq)))]
(.apply secrets (.apply secrets
(fn [secret-data] (fn [secret-data]
(let [hostname-to-zone (-> (.-data secret-data) (let [hostname-to-zone (js->clj secret-data :keywordize-keys true)]
(js->clj :keywordize-keys true))]
(vec (vec
(for [[hostname zone-id] hostname-to-zone (for [[hostname zone-id] hostname-to-zone
[index ip] (map-indexed vector node-ips) [index ip] (map-indexed vector node-ips)
:when (and hostname zone-id ip)] :when (and hostname zone-id ip)]
(new cloudflare/DnsRecord
(str "dns-" (name hostname) "-node-" index)
(clj->js {:zoneId zone-id (new cloudflare/DnsRecord
:name hostname (str "dns-" (name hostname) "-node-" index)
:content ip (clj->js {:zoneId zone-id
:type (get-record-type ip) :name hostname
:ttl 300 :content ip
:proxied true}) :type (get-record-type ip)
(clj->js {:provider cloudflare-provider})))))))))))) :ttl 1
:proxied true})
(clj->js {:provider cloudflare-provider})
(clj->js {:dependsOn dependencies}))))))))))))
(def config (def config
{:stack [:vault:prepare :generic:execute] {:stack [:vault:prepare :generic:execute]