#' @title List EFS Mount Target(s)
#' @description List EFS Mount Target(s)
#' @param id Optionally, a character string specifying an EFS File System ID, perhaps as returned by \code{\link{create_efs}} to use to restrict results.
#' @param mount Optionally, a character string specifying an EFS Mount Target ID, perhaps as returned by \code{\link{create_mount}} to use to restrict results.
#' @param n Optionally, an integer specifying the number of results to return.
#' @param marker Optionally, a character string specifying a pagination marker returned by a previous result.
#' @param \dots Additional arguments passed to \code{\link{efsHTTP}}.
#' @return A list.
#' @references \href{http://docs.aws.amazon.com/efs/latest/ug/API_DescribeFileSystems.html}{API Documentation}
#' @seealso \code{\link{create_mount}}, \code{\link{delete_mount}}, \code{\link{efs_list}}
#' @export
list_efs_mounts <- function(id = NULL, mount = NULL, n = NULL, marker = NULL, ...) {
query <- list()
if (!is.null(id)) {
query[["FileSystemId"]] <- get_file_system_id(id)
}
if (!is.null(id)) {
query[["MountTargetId"]] <- mount
}
if (!is.null(n)) {
query[["MaxItems"]] <- as.integer(n)
}
if (!is.null(n)) {
query[["Marker"]] <- marker
}
out <- efsHTTP(verb = "GET", action = "/2015-02-01/mount-targets", query = query, ...)
structure(out$MountTargets, Marker = out$Marker, NextMarker = out$NextMarker)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.