Generate self-signed x509 certificate and 4096 bit RSA private/public key pair for use with authenticated, encrypted TLS communications.
Arguments
- cn
[default 'localhost'] character issuer common name (CN) for the certificate. This can be either a hostname or an IP address, but must match the actual server URL as client authentication will depend on it.
- valid
[default '20301231235959'] character ‘not after’ date-time in ‘yyyymmddhhmmss’ format. The certificate is not valid after this time.
Value
A list of length 2, comprising $server and $client.
These may be passed directly to the relevant argument of
tls_config.
Details
For interactive sessions only, a status message is printed at the start of key / certificate generation and also when complete.
Examples
if (interactive()) {
# Only run examples in interactive R sessions
cert <- write_cert(cn = "127.0.0.1")
ser <- tls_config(server = cert$server)
cli <- tls_config(client = cert$client)
s <- socket(listen = "tls+tcp://127.0.0.1:5555", tls = ser)
s1 <- socket(dial = "tls+tcp://127.0.0.1:5555", tls = cli)
# secure TLS connection established
close(s1)
close(s)
cert
}