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
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")
|
|
}
|