The default user key can be set in the USER_KEY variable and otherwise
is ~/.ssh/id_rsa. Note that on Windows we treat ~ as the windows user
home (and not the documents folder).
Details
The my_pubkey() function looks for the public key by appending .pub
to the above key path. If this file does not exist, it reads the private key file
and automatically derives the corresponding pubkey. In the latter case the user
may be prompted for a passphrase if the private key is protected.
Examples
# Set random RSA key as default
key <- rsa_keygen()
write_pem(key, tmp <- tempfile(), password = "")
rm(key)
Sys.setenv("USER_KEY" = tmp)
# Check the new keys
print(my_key())
#> [2048-bit rsa private key]
#> md5: 0e21e61b35a145d0d82a487d028b3319
#> sha256: 563a44cc92d6b6a83cbd66e75275d0a8ed369b4dc4b3d75a7b5e0134aba9da10
print(my_pubkey())
#> [2048-bit rsa public key]
#> md5: 0e21e61b35a145d0d82a487d028b3319
#> sha256: 563a44cc92d6b6a83cbd66e75275d0a8ed369b4dc4b3d75a7b5e0134aba9da10