omg_deps.clj

  build-deps {:docs "Builds a layer for dependencies"
              :requires ([clojure.java.shell :refer [sh]]
                         [clojure.edn :as edn])
              :task (let [{:keys [deps-path target-dir work-dir]} (th/parse-args)
                          deps-zipfile (th/deps-zipfile target-dir)]
                      (when-not deps-path
                        (th/error "Mising required argument: --deps-path"))

                      (fs/create-dirs target-dir work-dir)

                      (let [tmp-dir (fs/create-temp-dir)
                            deps (->> deps-path slurp edn/read-string :deps)]
                        (spit (fs/file work-dir "deps.edn")
                              {:deps deps
                               :mvn/local-repo (format "%s/m2-repo" tmp-dir)})

                        (println "Downloading deps into" (str tmp-dir))
                        (let [current-env (into {} (System/getenv))
                              {:keys [exit err]}
                              (sh "clojure" "-Spath"
                                  :dir work-dir
                                  :env (assoc current-env
                                              "GITLIBS" (format "%s/gitlibs" tmp-dir)))]
                          (when (not= 0 exit)
                            (println "Error:" err)))

                        (println "Compressing custom runtime layer:" deps-zipfile)
                        (let [{:keys [exit err]}
                              (sh "zip" "-r" deps-zipfile
                                  "gitlib"
                                  :dir (str tmp-dir))]
                          (when (not= 0 exit)
                            (println "Error:" err)))

                        (fs/delete-tree tmp-dir)))}