diff options
author | Joey Hess <joeyh@joeyh.name> | 2016-08-11 16:50:29 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2016-08-11 16:50:29 -0400 |
commit | 34c15caaaa96689dd342999f7d9a098903fd25b9 (patch) | |
tree | be6297c2b2c04074c7c8caef47e5fae94b75fd49 /keysafe.hs | |
parent | 3d33805c61db111dbd324df4a19eddb6aad42606 (diff) | |
download | keysafe-34c15caaaa96689dd342999f7d9a098903fd25b9.tar.gz |
more todo
Diffstat (limited to 'keysafe.hs')
-rw-r--r-- | keysafe.hs | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -40,6 +40,8 @@ retrievedemo :: IO () retrievedemo = do let sis = shardIdents tunables name keyid shards <- mapM retrieveShard (drop 1 $ getIdents sis) + -- TODO: need to try all orders of shards until one works, + -- because the shard numbers are not preserved let esk = combineShards tunables shards kek <- genKeyEncryptionKey tunables name password -- TODO: need to solve the encryption puzzle |