You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

28 lines
619 B

#' Raw interface to zdns
#'
#' Pass in command-line arguments via `args`. Not a recommended function
#' unless you _really_ know what you're doing. Run `zdns_help()`
#' to see a list of options.
#'
#' @md
#' @export
zdns_exec <- function(args=c(), stdout="", stdin="") {
if (!dir.exists(path.expand("~/.zdnsr"))) {
message("Bootstrapping public nameservers list...")
refresh_publc_nameservers_list()
}
zdns_bin <- Sys.which("zdns")
res <- system2(zdns_bin, args=args, stdout=stdout, stdin=stdin)
invisible(res)
}
#' @rdname zdns_exec
#' @export
zdns_help <- function(x) {
zdns_exec("--help")
}