#!/usr/bin/env bb
(require
 '[babashka.fs :as fs])
(-> "/usr/local/bin/config.clj" fs/file load-file)

(require
 '[dda.backup.core :as bc]
 '[dda.backup.restic :as rc]
 '[config :as cf])

(defn prepare!
  []
  (bc/create-aws-credentials! cf/aws-config))

(defn list-snapshots!
  []
  (rc/list-snapshots! cf/file-config)
  (rc/list-snapshots! cf/db-role-config)
  (rc/list-snapshots! cf/db-config))

(prepare!)
(list-snapshots!)