data_request_access(path_data = NULL, path_user = NULL, quiet = FALSE) data_key( path_data = NULL, path_user = NULL, test = TRUE, quiet = FALSE, cache = TRUE )
Path to the data. If not given, then we look recursively down below the working directory for a ".cyphr" directory, and use that as the data directory.
Path to the directory with your user key. Usually this can be omitted. This argument is passed in as both
keypair_openssl(). Briefly, if this argument is not given we look at the environment variables
USER_KEY- if set then these must refer to path of your public and private keys. If these environment variables are not set then we fall back on
~/.ssh/id_rsa, which should work in most environments. Alternatively, provide a path to a directory where the file
id_rsacan be found.
Suppress printing of informative messages.
Test that the encryption is working? (Recommended)
Cache the key within the session. This will be useful if you are using ssh keys that have passwords, as if the key is found within the cache, then you will not have to re-enter your password. Using
cache = FALSEneither looks for the key in the cache, nor saves it.
# The workflow here does not really lend itself to an example, # please see the vignette. # Suppose that Alice has created a data directory: path_alice <- tempfile() cyphr::ssh_keygen(path_alice, password = FALSE) path_data <- tempfile() dir.create(path_data, FALSE, TRUE) cyphr::data_admin_init(path_data, path_user = path_alice) #> Generating data key #> Authorising ourselves #> Adding key fb:12:8a:7a:c2:44:78:a2:e4:1f:1a:6d:8c:3c:02:25:21:52:eb:2a:0c:c7:40:d3:d6:7e:a1:24:99:74:24:54 #> user: root #> host: a07fc6233936 #> date: 2022-06-20 13:44:47 #> Verifying # If Bob can also write to the data directory (e.g., it is a # shared git repo, on a shared drive, etc), then he can request # access path_bob <- tempfile() cyphr::ssh_keygen(path_bob, password = FALSE) hash <- cyphr::data_request_access(path_data, path_user = path_bob) #> A request has been added #> Email someone with access to add you #> #> hash: 20:e5:ca:55:d2:e7:34:24:bb:44:32:3d:7e:74:01:20:ca:ed:c6:9f:eb:4c:13:41:27:f4:73:90:c4:17:ad:4d #> #> If you are using git, you will need to commit and push first: #> #> git add .cyphr #> git commit -m "Please add me to the dataset" #> git push # Alice can authorise Bob cyphr::data_admin_authorise(path_data, path_user = path_alice, yes = TRUE) #> There is 1 request for access #> Adding key 20:e5:ca:55:d2:e7:34:24:bb:44:32:3d:7e:74:01:20:ca:ed:c6:9f:eb:4c:13:41:27:f4:73:90:c4:17:ad:4d #> user: root #> host: a07fc6233936 #> date: 2022-06-20 13:44:47 #> Added 1 key #> If you are using git, you will need to commit and push: #> #> git add .cyphr #> git commit -m "Authorised root" #> git push # After which Bob can get the data key cyphr::data_key(path_data, path_user = path_bob) #> <cyphr_key: sodium> # See the vignette for more details. This is not the best medium # to explore this. # Cleanup unlink(path_alice, recursive = TRUE) unlink(path_bob, recursive = TRUE) unlink(path_data, recursive = TRUE)