Add list passwords command

src/dda/backup/cred_rot/domain.clj

@@ -38,6 +38,21 @@
 
 ; Refer to "docs/CredentialRotation.md" for specifics
 
+(defn-spec list-passwords-command ::cd/command
+  [config ::config]
+  (let [{:keys [restic-repository password-file
+                certificate-file new-password-file]} config]
+    (into 
+     []
+     (concat ["restic" "-r" restic-repository "key" "list" "--json"]
+             (cond
+               (some? certificate-file)
+               ["--cacert" certificate-file]
+               (some? password-file)
+               ["--password-file" password-file]
+               :else
+               [])))))
+
 (defn-spec add-new-password! nil?
   [new-password-file ::new-password-file]
   ; TODO