summaryrefslogtreecommitdiffhomepage
path: root/CmdLine.hs
diff options
context:
space:
mode:
Diffstat (limited to 'CmdLine.hs')
-rw-r--r--CmdLine.hs6
1 files changed, 5 insertions, 1 deletions
diff --git a/CmdLine.hs b/CmdLine.hs
index 6c5bafd..702c97d 100644
--- a/CmdLine.hs
+++ b/CmdLine.hs
@@ -31,7 +31,7 @@ data CmdLine = CmdLine
, chaffMaxDelay :: Maybe Seconds
}
-data Mode = Backup | Restore | UploadQueued | AutoStart | Server | BackupServer FilePath | RestoreServer FilePath | Chaff HostName | Benchmark | Test
+data Mode = Backup | Restore | UploadQueued | AutoStart | Server | BackupServer FilePath | RestoreServer FilePath | Chaff HostName | CheckServers | Benchmark | Test
deriving (Show)
data ServerConfig = ServerConfig
@@ -135,6 +135,10 @@ parseMode =
<> metavar "HOSTNAME"
<> help "Upload random data to a keysafe server."
)
+ <|> flag' CheckServers
+ ( long "check-servers"
+ <> help "Tries to connect to each server in the server list. Displays the server's MOTD, and the amount of data stored on it. Prints message to stderr and exits nonzero if any of the servers are not accessible."
+ )
<|> flag' Benchmark
( long "benchmark"
<> help "Benchmark speed of keysafe's cryptographic primitives."