From 845fb2d60585be5567ac10aa0a53ab45c628648c Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 15 Sep 2016 22:49:38 -0400 Subject: Added --backup-server and --restore-server To aid in backing up keysafe servers with minimal information leakage. This commit was sponsored by Andrea Rota. --- keysafe.hs | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'keysafe.hs') diff --git a/keysafe.hs b/keysafe.hs index 1eb52bd..83a010a 100644 --- a/keysafe.hs +++ b/keysafe.hs @@ -21,6 +21,7 @@ import Share import Storage import BackupRecord import HTTP.Server +import ServerBackup import qualified Gpg import Data.Maybe import Data.Time.Clock @@ -72,6 +73,10 @@ dispatch cmdline ui storagelocations tunables possibletunables = do runServer (CmdLine.localstoragedirectory cmdline) (CmdLine.serverConfig cmdline) + go (CmdLine.GenBackup d) _ = + genBackup (CmdLine.localstoragedirectory cmdline) d + go (CmdLine.RestoreBackup d) _ = + restoreBackup (CmdLine.localstoragedirectory cmdline) d go (CmdLine.Chaff hn) _ = storeChaff hn (CmdLine.serverPort (CmdLine.serverConfig cmdline)) go CmdLine.Benchmark _ = -- cgit v1.2.3