tools/get_winlib.R

In wrathematics/rotp: One-Time Password 'Authenticators'

### Taken from the openssl package https://cran.r-project.org/web/packages/openssl/index.html

# Build against mingw-w64 build of openssl
VERSION <- commandArgs(TRUE)
if (!file.exists(sprintf("../windows/openssl-%s/include/openssl/ssl.h", VERSION))){
  if (getRversion() < "3.3.0")
    setInternet2()
  
  download.file(sprintf("https://github.com/rwinlib/openssl/archive/v%s.zip", VERSION), "lib.zip", quiet = TRUE)
  dir.create("../windows", showWarnings = FALSE)
  unzip("lib.zip", exdir = "../windows")
  unlink("lib.zip")
}