R/worklink_interfaces.R

In paws.end.user.computing: 'Amazon Web Services' End User Computing Services

# This file is generated by make.paws. Please do not edit here.
#' @importFrom paws.common populate
#' @include worklink_service.R
NULL

.worklink$associate_domain_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DomainName = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string")), AcmCertificateArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$associate_domain_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$associate_website_authorization_provider_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), AuthorizationProviderType = structure(logical(0), tags = list(type = "string")), DomainName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$associate_website_authorization_provider_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(AuthorizationProviderId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$associate_website_certificate_authority_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), Certificate = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$associate_website_certificate_authority_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(WebsiteCaId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$create_fleet_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetName = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string")), OptimizeForEndUserLocation = structure(logical(0), tags = list(type = "boolean")), Tags = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$create_fleet_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$delete_fleet_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$delete_fleet_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_audit_stream_configuration_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_audit_stream_configuration_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(AuditStreamArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_company_network_configuration_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_company_network_configuration_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(VpcId = structure(logical(0), tags = list(type = "string")), SubnetIds = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), SecurityGroupIds = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_device_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DeviceId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_device_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Status = structure(logical(0), tags = list(type = "string")), Model = structure(logical(0), tags = list(type = "string")), Manufacturer = structure(logical(0), tags = list(type = "string")), OperatingSystem = structure(logical(0), tags = list(type = "string")), OperatingSystemVersion = structure(logical(0), tags = list(type = "string")), PatchLevel = structure(logical(0), tags = list(type = "string")), FirstAccessedTime = structure(logical(0), tags = list(type = "timestamp")), LastAccessedTime = structure(logical(0), tags = list(type = "timestamp")), Username = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_device_policy_configuration_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_device_policy_configuration_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(DeviceCaCertificate = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_domain_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DomainName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_domain_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(DomainName = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string")), CreatedTime = structure(logical(0), tags = list(type = "timestamp")), DomainStatus = structure(logical(0), tags = list(type = "string")), AcmCertificateArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_fleet_metadata_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_fleet_metadata_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CreatedTime = structure(logical(0), tags = list(type = "timestamp")), LastUpdatedTime = structure(logical(0), tags = list(type = "timestamp")), FleetName = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string")), OptimizeForEndUserLocation = structure(logical(0), tags = list(type = "boolean")), CompanyCode = structure(logical(0), tags = list(type = "string")), FleetStatus = structure(logical(0), tags = list(type = "string")), Tags = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_identity_provider_configuration_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_identity_provider_configuration_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(IdentityProviderType = structure(logical(0), tags = list(type = "string")), ServiceProviderSamlMetadata = structure(logical(0), tags = list(type = "string")), IdentityProviderSamlMetadata = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_website_certificate_authority_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), WebsiteCaId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$describe_website_certificate_authority_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Certificate = structure(logical(0), tags = list(type = "string")), CreatedTime = structure(logical(0), tags = list(type = "timestamp")), DisplayName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$disassociate_domain_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DomainName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$disassociate_domain_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$disassociate_website_authorization_provider_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), AuthorizationProviderId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$disassociate_website_authorization_provider_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$disassociate_website_certificate_authority_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), WebsiteCaId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$disassociate_website_certificate_authority_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_devices_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), NextToken = structure(logical(0), tags = list(type = "string")), MaxResults = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_devices_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Devices = structure(list(structure(list(DeviceId = structure(logical(0), tags = list(type = "string")), DeviceStatus = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_domains_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), NextToken = structure(logical(0), tags = list(type = "string")), MaxResults = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_domains_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Domains = structure(list(structure(list(DomainName = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string")), CreatedTime = structure(logical(0), tags = list(type = "timestamp")), DomainStatus = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_fleets_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(NextToken = structure(logical(0), tags = list(type = "string")), MaxResults = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_fleets_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetSummaryList = structure(list(structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), CreatedTime = structure(logical(0), tags = list(type = "timestamp")), LastUpdatedTime = structure(logical(0), tags = list(type = "timestamp")), FleetName = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string")), CompanyCode = structure(logical(0), tags = list(type = "string")), FleetStatus = structure(logical(0), tags = list(type = "string")), Tags = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map"))), tags = list(type = "structure"))), tags = list(type = "list")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_tags_for_resource_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceArn = structure(logical(0), tags = list(location = "uri", locationName = "ResourceArn", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_tags_for_resource_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Tags = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_website_authorization_providers_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), NextToken = structure(logical(0), tags = list(type = "string")), MaxResults = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_website_authorization_providers_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(WebsiteAuthorizationProviders = structure(list(structure(list(AuthorizationProviderId = structure(logical(0), tags = list(type = "string")), AuthorizationProviderType = structure(logical(0), tags = list(type = "string")), DomainName = structure(logical(0), tags = list(type = "string")), CreatedTime = structure(logical(0), tags = list(type = "timestamp"))), tags = list(type = "structure"))), tags = list(type = "list")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_website_certificate_authorities_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), MaxResults = structure(logical(0), tags = list(type = "integer")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$list_website_certificate_authorities_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(WebsiteCertificateAuthorities = structure(list(structure(list(WebsiteCaId = structure(logical(0), tags = list(type = "string")), CreatedTime = structure(logical(0), tags = list(type = "timestamp")), DisplayName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$restore_domain_access_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DomainName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$restore_domain_access_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$revoke_domain_access_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DomainName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$revoke_domain_access_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$sign_out_user_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), Username = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$sign_out_user_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$tag_resource_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceArn = structure(logical(0), tags = list(location = "uri", locationName = "ResourceArn", type = "string")), Tags = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$tag_resource_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$untag_resource_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceArn = structure(logical(0), tags = list(location = "uri", locationName = "ResourceArn", type = "string")), TagKeys = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(location = "querystring", locationName = "tagKeys", type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$untag_resource_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_audit_stream_configuration_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), AuditStreamArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_audit_stream_configuration_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_company_network_configuration_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), VpcId = structure(logical(0), tags = list(type = "string")), SubnetIds = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), SecurityGroupIds = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_company_network_configuration_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_device_policy_configuration_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DeviceCaCertificate = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_device_policy_configuration_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_domain_metadata_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DomainName = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_domain_metadata_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_fleet_metadata_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), DisplayName = structure(logical(0), tags = list(type = "string")), OptimizeForEndUserLocation = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_fleet_metadata_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_identity_provider_configuration_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(FleetArn = structure(logical(0), tags = list(type = "string")), IdentityProviderType = structure(logical(0), tags = list(type = "string")), IdentityProviderSamlMetadata = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.worklink$update_identity_provider_configuration_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}