summaryrefslogtreecommitdiffhomepage
path: root/keysafe.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2016-09-15 22:49:38 -0400
committerJoey Hess <joeyh@joeyh.name>2016-09-15 22:49:38 -0400
commit845fb2d60585be5567ac10aa0a53ab45c628648c (patch)
treee58456868911cd16451f4695ff7d076a701a78bb /keysafe.hs
parent4fc681f78b2e659d3db3da99fe7c640416fb3b43 (diff)
downloadkeysafe-845fb2d60585be5567ac10aa0a53ab45c628648c.tar.gz
Added --backup-server and --restore-server
To aid in backing up keysafe servers with minimal information leakage. This commit was sponsored by Andrea Rota.
Diffstat (limited to 'keysafe.hs')
-rw-r--r--keysafe.hs5
1 files changed, 5 insertions, 0 deletions
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 _ =