Compare commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
df8f580f93 | ||
|
|
871fc3ed55 |
@@ -69,10 +69,12 @@
|
|||||||
(map-has-keys? options [:message, :message-file])
|
(map-has-keys? options [:message, :message-file])
|
||||||
{:exit-message (error-msg ["You can't use message and message-file options at the same time!!!"])}
|
{:exit-message (error-msg ["You can't use message and message-file options at the same time!!!"])}
|
||||||
|
|
||||||
(file/is-file-not-exists? (:message-file options))
|
(and (contains? options :message-file)
|
||||||
|
(file/is-file-not-exists? (:message-file options)))
|
||||||
{:exit-message (error-msg ["Please, check the path to the message file!!!"])}
|
{:exit-message (error-msg ["Please, check the path to the message file!!!"])}
|
||||||
|
|
||||||
(file/is-file-exists? (:output-file options))
|
(and (contains? options :output-file)
|
||||||
|
(file/is-file-exists? (:output-file options)))
|
||||||
{:exit-message (error-msg ["Please, choose another file!!! Overwriting was prevented!!!"])}
|
{:exit-message (error-msg ["Please, choose another file!!! Overwriting was prevented!!!"])}
|
||||||
|
|
||||||
(and (map-has-keys? options [:cipher, :key])
|
(and (map-has-keys? options [:cipher, :key])
|
||||||
@@ -145,7 +147,8 @@
|
|||||||
(defn show-and-save-output
|
(defn show-and-save-output
|
||||||
"Print and save the output to a file if needed"
|
"Print and save the output to a file if needed"
|
||||||
[output options]
|
[output options]
|
||||||
(save-output output options)
|
(when (contains? options :output-file)
|
||||||
|
(save-output output options))
|
||||||
(println output))
|
(println output))
|
||||||
|
|
||||||
(defn cracking-actions
|
(defn cracking-actions
|
||||||
|
|||||||
Reference in New Issue
Block a user