R/DkubeApi.r
In riteshkarvaloc/dkubeR:
# Dkube api server
#
# No description provided (generated by Swagger Codegen https://github.com/swagger-api/swagger-codegen)
#
# OpenAPI spec version: 2.2.1.11
#
# Generated by: https://github.com/swagger-api/swagger-codegen.git
#' @title Dkube operations
#' @description dkube_api.Dkube
#'
#' @field path Stores url path of the request.
#' @field apiClient Handles the client-server communication.
#' @field userAgent Set the user agent of the request.
#'
#' @importFrom R6 R6Class
#'
#' @section Methods:
#' \describe{
#'
#' abort_migration API to terminate migration
#'
#'
#' add_cicd_image API to add new cicd image
#'
#'
#' attach_user_profile Attach profile to a user
#'
#'
#' create_project API to Create a Project
#'
#'
#' create_user_profile Create a user profile in dkube
#'
#'
#' datum_one_abort_download API to abort a download
#'
#'
#' datum_one_restart_download API to restart a failed datum download
#'
#'
#' datum_refresh_one API to refresh the contents of an existing downloaded datum
#'
#'
#' datums_add_one API to add a datum.
#'
#'
#' datums_archive_by_class API to archive or un-archive all datums by class. Refer 'DatumClassType' definition for possible values of class.
#'
#'
#' datums_delete_by_class API to delete all datums by class. Refer 'DatumClassType' definition for possible values of class.
#'
#'
#' datums_deploy_one_model API to deploy a model
#'
#'
#' datums_get_by_class API to get all datums by class. Refer 'DatumClassType' definition for possible values of class.
#'
#'
#' datums_get_metrics API to get metrics of a list of datum
#'
#'
#' datums_get_one_by_class API to get a datums of a class. Refer 'DatumClassType' definition for possible values of class.
#'
#'
#' datums_get_one_version_lineage API to get lineage of a datum version
#'
#'
#' datums_get_one_version_metrics API to get metrics of a model
#'
#'
#' datums_publish_one_model API to publish a model
#'
#'
#' datums_release_one_model API to release a model
#'
#'
#' datums_testdeploy_one_model API to deploy a model in dev cluster
#'
#'
#' delete_cicd_images API to delete cicd images
#'
#'
#' delete_migration API to terminate migration
#'
#'
#' delete_model_catalog_item API to delete modelcatalog version item
#'
#'
#' delete_pipeline_experiment API to delete a pipeline experiment
#'
#'
#' delete_pipeline_experimentby_id API to delete a pipeline experiment by id
#'
#'
#' delete_pipeline_experiments_all API to delete all pipeline experiments
#'
#'
#' delete_pipeline_run API to delete a pipeline run
#'
#'
#' delete_pipeline_run_by_id API to delete a pipeline run by id
#'
#'
#' delete_pipeline_runs_all API to delete all pipeline runs
#'
#'
#' diag API to manage admin related operations.
#'
#'
#' dkubeinfo API to fetch all the information about dkube installation
#'
#'
#' dl_frameworks API to fetch all the frameworks
#'
#'
#' dlsupport API to fetch all the dl support by dkube
#'
#'
#' featureset_add_one API to create a fatureset
#'
#'
#' featureset_commit_version API to commit all output faturesets
#'
#'
#' featureset_copy_version API to copy featureset version to users directory
#'
#'
#' featureset_copy_version_abort API to copy featureset version to users directory
#'
#'
#' featureset_copy_version_status API to copy featureset version to users directory
#'
#'
#' featureset_delete API to delete a featureset
#'
#'
#' featureset_get API to get featureset configuration
#'
#'
#' featureset_get_one_version_lineage API to get lineage of a featureset version
#'
#'
#' featureset_list API to list faturestores
#'
#'
#' featureset_put API to update featureset configuration
#'
#'
#' featureset_update_version API to update fatureset version
#'
#'
#' featuresets_archive API to archive or un-archive featuresets
#'
#'
#' featurespec_list API to list featurespecs for a spec featureset
#'
#'
#' g_p_us_capability API to get GPU's capability of a user, job, cluster, node.
#'
#'
#' get_all_cicd_images API to get all cicd images
#'
#'
#' get_all_datum_prev_cred API to get previous datum creation auth credentials of all users in dkube.
#'
#'
#' get_all_project_submissions API to Get all submissions of a project
#'
#'
#' get_all_projects API to Get All Projects
#'
#'
#' get_datum_prev_cred API to get previous datum creation auth credentials.
#'
#'
#' get_dvs_config API to list dkube version management system config.
#'
#'
#' get_job_groups API to get all job gropus.
#'
#'
#' get_migration_metadata API to export a single job.
#'
#'
#' get_one_project API to Get Single Project
#'
#'
#' get_one_run_lineage API to get lineage of a run
#'
#'
#' get_role API to get details of a required role.
#'
#'
#' get_session_key API to get session key(static jwt token)
#'
#'
#' get_single_user_profile Fetch single user profile
#'
#'
#' inference_monitoring API to update inference job.
#'
#'
#' job_get_collection_all_by_class API to get jobs collection for all jobs of a class.
#'
#'
#' job_group_add_one API to add a job group.
#'
#'
#' jobmigration API to migrate jobs
#'
#'
#' jobs_abort_one API to abort a single job.
#'
#'
#' jobs_add_one API to add a new job.
#'
#'
#' jobs_delete_one_by_uuid API to delete a job by uuid.
#'
#'
#' jobs_get_by_class API to get jobs of a user by class.
#'
#'
#' jobs_get_collection_all API to get jobs collection for all jobs.
#'
#'
#' jobs_get_collection_one API to get jobs collection for single job.
#'
#'
#' jobs_get_one_by_uuid API to get a job by uuid.
#'
#'
#' jobs_list_archive_by_class API to archive or un-archive jobs by class. Refer to 'JobClassType' definition for possible values of class.
#'
#'
#' jobs_list_delete_by_class API to delete jobs by class. Refer to 'JobClassType' definition for possible values of class.
#'
#'
#' jobs_start_one API to start an aborted job.
#'
#'
#' jsonform API to fetch json form for slurm job scheduling
#'
#'
#' list_user_profiles list all user profiles
#'
#'
#' login API to login into dkube. Unique API key is returned using which user can access dkube apis. API key access will be scoped based on the role of the user.
#'
#'
#' logout API to logoff from the dkube. The API key will be revoked and invalidated.
#'
#'
#' logs_get_one API to get logs of a job
#'
#'
#' migration_complete API to notify migration complete
#'
#'
#' migration_status API to send status of migration
#'
#'
#' migration_status_user API to send status of migration
#'
#'
#' model_deploy API to deploy model
#'
#'
#' notification API to post notifications to Dkube API server
#'
#'
#' projects_delete_list API to delete a list of projects
#'
#'
#' repo_update_one API to update a datum.
#'
#'
#' revoke_session_key API to renew the session key(static jwt token)
#'
#'
#' run_group_update API to update a run group.
#'
#'
#' source_migration_init API to initiate_migration
#'
#'
#' start_tensorboard API to start tensorboard for a given job.
#'
#'
#' stop_tensorboard API to stop tensorboard for a given job.
#'
#'
#' storage_volume_export Export the given artifacts as k8s volumes
#'
#'
#' storage_volume_reclaim Reclaims the volumes related to the unique ID
#'
#'
#' submit_project_metrics API to post submission for a project
#'
#'
#' target_migration_init API to initiate_migration
#'
#'
#' tokeninfo API to fetch all claims for a jwt token
#'
#'
#' trigger_runs_by_condition Triggers runs in dkube which satisfies the condition specified
#'
#'
#' update_datum_version_model Update version model info of a datum.
#'
#'
#' update_inference API to update inference job.
#'
#'
#' update_model_catalog API to update modelcatalog version item
#'
#'
#' update_one_project API to update single Project
#'
#'
#' update_run_one Update description of a run.
#'
#'
#' update_template_one API to update a template.
#'
#'
#' user_capability API to get capabilities of a user.
#'
#'
#' user_get_collection_one API to get user collection for single user.
#'
#'
#' users_get_collection_all API to get user collection for all users.
#'
#'
#' volumes_storage API to fetch information about storage.
#'
#' }
#'
#' @export
DkubeApi <- R6::R6Class(
'DkubeApi',
public = list(
userAgent = "Swagger-Codegen/1.0.0/r",
apiClient = NULL,
initialize = function(apiClient){
if (!missing(apiClient)) {
self$apiClient <- apiClient
}
else {
self$apiClient <- ApiClient$new()
}
},
abort_migration = function(migration, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/migrations/{migration}/abort"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
add_cicd_image = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/images"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
attach_user_profile = function(profile, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/userprofiles/{profile}"
if (!missing(`profile`)) {
urlPath <- gsub(paste0("\\{", "profile", "\\}"), `profile`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
create_project = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/projects/create"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20049$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
create_user_profile = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/userprofiles"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datum_one_abort_download = function(user, class, datum, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/abort"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datum_one_restart_download = function(user, class, datum, data, extract, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`extract`)) {
queryParams['extract'] <- extract
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/start"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datum_refresh_one = function(user, class, datum, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/refresh"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_add_one = function(user, data, extract, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`extract`)) {
queryParams['extract'] <- extract
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_archive_by_class = function(user, class, archive, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`archive`)) {
queryParams['archive'] <- archive
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums/class/{class}/archive"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_delete_by_class = function(user, class, data, force, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`force`)) {
queryParams['force'] <- force
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums/class/{class}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_deploy_one_model = function(user, model, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/models/{model}/versions/{version}/deploy"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_by_class = function(user, class, shared, archived, tags, page, versions, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`shared`)) {
queryParams['shared'] <- shared
}
if (!missing(`archived`)) {
queryParams['archived'] <- archived
}
if (!missing(`tags`)) {
queryParams['tags'] <- tags
}
if (!missing(`page`)) {
queryParams['page'] <- page
}
if (!missing(`versions`)) {
queryParams['versions'] <- versions
}
urlPath <- "/users/{user}/datums/class/{class}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20022$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_metrics = function(user, class, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums/class/{class}/metrics"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20024$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_one_by_class = function(user, class, datum, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20021$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_one_version_lineage = function(user, class, datum, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/versions/{version}/lineage"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20029$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_one_version_metrics = function(user, class, datum, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/versions/{version}/metrics"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20025$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_publish_one_model = function(user, model, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/models/{model}/versions/{version}/publish"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_release_one_model = function(user, model, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/models/{model}/versions/{version}/release"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_testdeploy_one_model = function(user, model, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/models/{model}/versions/{version}/testdeploy"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_cicd_images = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/images"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_migration = function(migration, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/migrations/{migration}/delete"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_model_catalog_item = function(user, model, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/modelcatalog/models/{model}/versions/{version}/delete"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_experiment = function(name, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/experiments/{name}"
if (!missing(`name`)) {
urlPath <- gsub(paste0("\\{", "name", "\\}"), `name`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_experimentby_id = function(expid, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/experiments/expid/{expid}"
if (!missing(`expid`)) {
urlPath <- gsub(paste0("\\{", "expid", "\\}"), `expid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_experiments_all = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/experiments"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_run = function(name, exp, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`exp`)) {
queryParams['exp'] <- exp
}
urlPath <- "/pipelines/runs/{name}"
if (!missing(`name`)) {
urlPath <- gsub(paste0("\\{", "name", "\\}"), `name`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_run_by_id = function(runid, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/runs/runid/{runid}"
if (!missing(`runid`)) {
urlPath <- gsub(paste0("\\{", "runid", "\\}"), `runid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_runs_all = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/runs"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
diag = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/admin/diag"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
dkubeinfo = function(authmode, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`authmode`)) {
queryParams['authmode'] <- authmode
}
urlPath <- "/dkubeinfo"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2006$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
dl_frameworks = function(class, project, user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`class`)) {
queryParams['class'] <- class
}
if (!missing(`project`)) {
queryParams['project'] <- project
}
if (!missing(`user`)) {
queryParams['user'] <- user
}
urlPath <- "/dlframeworks"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2002$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
dlsupport = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/dlsupport"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2001$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_add_one = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_commit_version = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/commit"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_copy_version = function(featureset, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}/versions/{version}/copy"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_copy_version_abort = function(featureset, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}/versions/{version}/copyabort"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_copy_version_status = function(featureset, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}/versions/{version}/copy_status"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20060$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_delete = function(data, force, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`force`)) {
queryParams['force'] <- force
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_get = function(featureset, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/featuresets/{featureset}"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20055$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_get_one_version_lineage = function(featureset, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/featuresets/{featureset}/versions/{version}/lineage"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20058$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_list = function(query, versions, tags, archived, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`query`)) {
queryParams['query'] <- query
}
if (!missing(`versions`)) {
queryParams['versions'] <- versions
}
if (!missing(`tags`)) {
queryParams['tags'] <- tags
}
if (!missing(`archived`)) {
queryParams['archived'] <- archived
}
urlPath <- "/featuresets"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20054$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_put = function(featureset, data, indexing, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`indexing`)) {
queryParams['indexing'] <- indexing
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20056$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_update_version = function(featureset, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}/version/{version}"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featuresets_archive = function(archive, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`archive`)) {
queryParams['archive'] <- archive
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/archive"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featurespec_list = function(featureset, query, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`query`)) {
queryParams['query'] <- query
}
urlPath <- "/featuresets/{featureset}/featurespec"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20057$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
g_p_us_capability = function(source, value, class, user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`source`)) {
queryParams['source'] <- source
}
if (!missing(`value`)) {
queryParams['value'] <- value
}
if (!missing(`class`)) {
queryParams['class'] <- class
}
if (!missing(`user`)) {
queryParams['user'] <- user
}
urlPath <- "/stats/resources"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20019$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_all_cicd_images = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/images"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20052$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_all_datum_prev_cred = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/preferences"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20014$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_all_project_submissions = function(project_id, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/projects/{project_id}/submissions"
if (!missing(`project_id`)) {
urlPath <- gsub(paste0("\\{", "project_id", "\\}"), `project_id`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20050$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_all_projects = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/projects"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20048$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_datum_prev_cred = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/preferences"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20014$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_dvs_config = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/dvs/config"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20013$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_job_groups = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/groups"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20017$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_migration_metadata = function(migration, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migrations/{migration}/meta"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- TODO_FILE_MAPPING$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_one_project = function(project_id, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/projects/{project_id}"
if (!missing(`project_id`)) {
urlPath <- gsub(paste0("\\{", "project_id", "\\}"), `project_id`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20049$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_one_run_lineage = function(user, class, runid, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/class/{class}/runs/{runid}/lineage"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`runid`)) {
urlPath <- gsub(paste0("\\{", "runid", "\\}"), `runid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20030$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_role = function(rolename, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/rbac/roles/{rolename}"
if (!missing(`rolename`)) {
urlPath <- gsub(paste0("\\{", "rolename", "\\}"), `rolename`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20016$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_session_key = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/sessionkey"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20018$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_single_user_profile = function(profile, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/userprofiles/{profile}"
if (!missing(`profile`)) {
urlPath <- gsub(paste0("\\{", "profile", "\\}"), `profile`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20035$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
inference_monitoring = function(user, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/inference/{job}/monitoring"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20032$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
job_get_collection_all_by_class = function(user, class, run, template, group, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`run`)) {
queryParams['run'] <- run
}
if (!missing(`template`)) {
queryParams['template'] <- template
}
if (!missing(`group`)) {
queryParams['group'] <- group
}
urlPath <- "/users/{user}/jobs/class/{class}/collection"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20038$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
job_group_add_one = function(user, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/groups"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobmigration = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migration"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_abort_one = function(user, job, class, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/class/{class}/jobs/{job}/abort"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_add_one = function(user, data, run, rerun, subclass, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`run`)) {
queryParams['run'] <- run
}
if (!missing(`rerun`)) {
queryParams['rerun'] <- rerun
}
if (!missing(`subclass`)) {
queryParams['subclass'] <- subclass
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/jobs/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_delete_one_by_uuid = function(uuid, class, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/jobs/class/{class}/uuid/{uuid}"
if (!missing(`uuid`)) {
urlPath <- gsub(paste0("\\{", "uuid", "\\}"), `uuid`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_get_by_class = function(user, class, shared, run, template, group, all, archived, tags, page, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`shared`)) {
queryParams['shared'] <- shared
}
if (!missing(`run`)) {
queryParams['run'] <- run
}
if (!missing(`template`)) {
queryParams['template'] <- template
}
if (!missing(`group`)) {
queryParams['group'] <- group
}
if (!missing(`all`)) {
queryParams['all'] <- all
}
if (!missing(`archived`)) {
queryParams['archived'] <- archived
}
if (!missing(`tags`)) {
queryParams['tags'] <- tags
}
if (!missing(`page`)) {
queryParams['page'] <- page
}
urlPath <- "/users/{user}/jobs/class/{class}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20033$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_get_collection_all = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/collection"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20036$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_get_collection_one = function(user, class, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/class/{class}/job/{job}/collection"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20037$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_get_one_by_uuid = function(uuid, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/jobs/uuid/{uuid}"
if (!missing(`uuid`)) {
urlPath <- gsub(paste0("\\{", "uuid", "\\}"), `uuid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20031$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_list_archive_by_class = function(user, class, archive, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`archive`)) {
queryParams['archive'] <- archive
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/jobs/class/{class}/archive"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_list_delete_by_class = function(user, class, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/jobs/class/{class}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_start_one = function(user, job, class, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/class/{class}/jobs/{job}/start"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jsonform = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/job/scheduling/jsonform"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2005$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
list_user_profiles = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/userprofiles"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20034$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
login = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/login"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2009$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
logout = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/logout"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
logs_get_one = function(user, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/{job}/logs/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
migration_complete = function(migration, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migrations/{migration}/complete"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
migration_status = function(migration, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migrations/{migration}/update"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
migration_status_user = function(migration, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/migrations/{migration}"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
model_deploy = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/model/deploy"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
notification = function(type, op, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/notify/{type}/{op}"
if (!missing(`type`)) {
urlPath <- gsub(paste0("\\{", "type", "\\}"), `type`, urlPath)
}
if (!missing(`op`)) {
urlPath <- gsub(paste0("\\{", "op", "\\}"), `op`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
projects_delete_list = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/projects"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
repo_update_one = function(user, class, repo, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/repos/class/{class}/repo/{repo}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`repo`)) {
urlPath <- gsub(paste0("\\{", "repo", "\\}"), `repo`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
revoke_session_key = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/sessionkey"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20018$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
run_group_update = function(user, rungroup, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/rungroups/{rungroup}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`rungroup`)) {
urlPath <- gsub(paste0("\\{", "rungroup", "\\}"), `rungroup`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
source_migration_init = function(migration, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migrations/{migration}/source/init"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
start_tensorboard = function(user, class, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/class/{class}/job/{job}/tensorboard/start"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
stop_tensorboard = function(user, class, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/class/{class}/job/{job}/tensorboard/stop"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
storage_volume_export = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/storage/volumes/export"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
storage_volume_reclaim = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/storage/volumes/reclaim"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
submit_project_metrics = function(project_id, submission_id, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/projects/{project_id}/{submission_id}"
if (!missing(`project_id`)) {
urlPath <- gsub(paste0("\\{", "project_id", "\\}"), `project_id`, urlPath)
}
if (!missing(`submission_id`)) {
urlPath <- gsub(paste0("\\{", "submission_id", "\\}"), `submission_id`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
target_migration_init = function(migration, upfile, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
body <- list(
"upfile" = httr::upload_file(upfile)
)
urlPath <- "/migrations/{migration}/target/init"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
tokeninfo = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/token/validate"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20010$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
trigger_runs_by_condition = function(conditions, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`conditions`)) {
body <- `conditions`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/triggers/runs"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20012$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_datum_version_model = function(user, uuid, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datum/version/{uuid}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`uuid`)) {
urlPath <- gsub(paste0("\\{", "uuid", "\\}"), `uuid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_inference = function(user, job, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/inference/{job}/update"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_model_catalog = function(user, model, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/modelcatalog/models/{model}/versions/{version}/update"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_one_project = function(project_id, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/projects/{project_id}"
if (!missing(`project_id`)) {
urlPath <- gsub(paste0("\\{", "project_id", "\\}"), `project_id`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PATCH",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_run_one = function(user, class, run, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/{class}/runs/{run}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`run`)) {
urlPath <- gsub(paste0("\\{", "run", "\\}"), `run`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_template_one = function(user, class, template, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/{class}/templates/{template}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`template`)) {
urlPath <- gsub(paste0("\\{", "template", "\\}"), `template`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
user_capability = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/capability"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20020$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
user_get_collection_one = function(user, page, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`page`)) {
queryParams['page'] <- page
}
urlPath <- "/users/{user}/collection"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20040$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
users_get_collection_all = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/collection"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20039$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
volumes_storage = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/storage/volumes"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20047$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
}
)
)
riteshkarvaloc/dkubeR documentation built on Feb. 25, 2021, 9:28 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
# Dkube api server
#
# No description provided (generated by Swagger Codegen https://github.com/swagger-api/swagger-codegen)
#
# OpenAPI spec version: 2.2.1.11
#
# Generated by: https://github.com/swagger-api/swagger-codegen.git
#' @title Dkube operations
#' @description dkube_api.Dkube
#'
#' @field path Stores url path of the request.
#' @field apiClient Handles the client-server communication.
#' @field userAgent Set the user agent of the request.
#'
#' @importFrom R6 R6Class
#'
#' @section Methods:
#' \describe{
#'
#' abort_migration API to terminate migration
#'
#'
#' add_cicd_image API to add new cicd image
#'
#'
#' attach_user_profile Attach profile to a user
#'
#'
#' create_project API to Create a Project
#'
#'
#' create_user_profile Create a user profile in dkube
#'
#'
#' datum_one_abort_download API to abort a download
#'
#'
#' datum_one_restart_download API to restart a failed datum download
#'
#'
#' datum_refresh_one API to refresh the contents of an existing downloaded datum
#'
#'
#' datums_add_one API to add a datum.
#'
#'
#' datums_archive_by_class API to archive or un-archive all datums by class. Refer 'DatumClassType' definition for possible values of class.
#'
#'
#' datums_delete_by_class API to delete all datums by class. Refer 'DatumClassType' definition for possible values of class.
#'
#'
#' datums_deploy_one_model API to deploy a model
#'
#'
#' datums_get_by_class API to get all datums by class. Refer 'DatumClassType' definition for possible values of class.
#'
#'
#' datums_get_metrics API to get metrics of a list of datum
#'
#'
#' datums_get_one_by_class API to get a datums of a class. Refer 'DatumClassType' definition for possible values of class.
#'
#'
#' datums_get_one_version_lineage API to get lineage of a datum version
#'
#'
#' datums_get_one_version_metrics API to get metrics of a model
#'
#'
#' datums_publish_one_model API to publish a model
#'
#'
#' datums_release_one_model API to release a model
#'
#'
#' datums_testdeploy_one_model API to deploy a model in dev cluster
#'
#'
#' delete_cicd_images API to delete cicd images
#'
#'
#' delete_migration API to terminate migration
#'
#'
#' delete_model_catalog_item API to delete modelcatalog version item
#'
#'
#' delete_pipeline_experiment API to delete a pipeline experiment
#'
#'
#' delete_pipeline_experimentby_id API to delete a pipeline experiment by id
#'
#'
#' delete_pipeline_experiments_all API to delete all pipeline experiments
#'
#'
#' delete_pipeline_run API to delete a pipeline run
#'
#'
#' delete_pipeline_run_by_id API to delete a pipeline run by id
#'
#'
#' delete_pipeline_runs_all API to delete all pipeline runs
#'
#'
#' diag API to manage admin related operations.
#'
#'
#' dkubeinfo API to fetch all the information about dkube installation
#'
#'
#' dl_frameworks API to fetch all the frameworks
#'
#'
#' dlsupport API to fetch all the dl support by dkube
#'
#'
#' featureset_add_one API to create a fatureset
#'
#'
#' featureset_commit_version API to commit all output faturesets
#'
#'
#' featureset_copy_version API to copy featureset version to users directory
#'
#'
#' featureset_copy_version_abort API to copy featureset version to users directory
#'
#'
#' featureset_copy_version_status API to copy featureset version to users directory
#'
#'
#' featureset_delete API to delete a featureset
#'
#'
#' featureset_get API to get featureset configuration
#'
#'
#' featureset_get_one_version_lineage API to get lineage of a featureset version
#'
#'
#' featureset_list API to list faturestores
#'
#'
#' featureset_put API to update featureset configuration
#'
#'
#' featureset_update_version API to update fatureset version
#'
#'
#' featuresets_archive API to archive or un-archive featuresets
#'
#'
#' featurespec_list API to list featurespecs for a spec featureset
#'
#'
#' g_p_us_capability API to get GPU's capability of a user, job, cluster, node.
#'
#'
#' get_all_cicd_images API to get all cicd images
#'
#'
#' get_all_datum_prev_cred API to get previous datum creation auth credentials of all users in dkube.
#'
#'
#' get_all_project_submissions API to Get all submissions of a project
#'
#'
#' get_all_projects API to Get All Projects
#'
#'
#' get_datum_prev_cred API to get previous datum creation auth credentials.
#'
#'
#' get_dvs_config API to list dkube version management system config.
#'
#'
#' get_job_groups API to get all job gropus.
#'
#'
#' get_migration_metadata API to export a single job.
#'
#'
#' get_one_project API to Get Single Project
#'
#'
#' get_one_run_lineage API to get lineage of a run
#'
#'
#' get_role API to get details of a required role.
#'
#'
#' get_session_key API to get session key(static jwt token)
#'
#'
#' get_single_user_profile Fetch single user profile
#'
#'
#' inference_monitoring API to update inference job.
#'
#'
#' job_get_collection_all_by_class API to get jobs collection for all jobs of a class.
#'
#'
#' job_group_add_one API to add a job group.
#'
#'
#' jobmigration API to migrate jobs
#'
#'
#' jobs_abort_one API to abort a single job.
#'
#'
#' jobs_add_one API to add a new job.
#'
#'
#' jobs_delete_one_by_uuid API to delete a job by uuid.
#'
#'
#' jobs_get_by_class API to get jobs of a user by class.
#'
#'
#' jobs_get_collection_all API to get jobs collection for all jobs.
#'
#'
#' jobs_get_collection_one API to get jobs collection for single job.
#'
#'
#' jobs_get_one_by_uuid API to get a job by uuid.
#'
#'
#' jobs_list_archive_by_class API to archive or un-archive jobs by class. Refer to 'JobClassType' definition for possible values of class.
#'
#'
#' jobs_list_delete_by_class API to delete jobs by class. Refer to 'JobClassType' definition for possible values of class.
#'
#'
#' jobs_start_one API to start an aborted job.
#'
#'
#' jsonform API to fetch json form for slurm job scheduling
#'
#'
#' list_user_profiles list all user profiles
#'
#'
#' login API to login into dkube. Unique API key is returned using which user can access dkube apis. API key access will be scoped based on the role of the user.
#'
#'
#' logout API to logoff from the dkube. The API key will be revoked and invalidated.
#'
#'
#' logs_get_one API to get logs of a job
#'
#'
#' migration_complete API to notify migration complete
#'
#'
#' migration_status API to send status of migration
#'
#'
#' migration_status_user API to send status of migration
#'
#'
#' model_deploy API to deploy model
#'
#'
#' notification API to post notifications to Dkube API server
#'
#'
#' projects_delete_list API to delete a list of projects
#'
#'
#' repo_update_one API to update a datum.
#'
#'
#' revoke_session_key API to renew the session key(static jwt token)
#'
#'
#' run_group_update API to update a run group.
#'
#'
#' source_migration_init API to initiate_migration
#'
#'
#' start_tensorboard API to start tensorboard for a given job.
#'
#'
#' stop_tensorboard API to stop tensorboard for a given job.
#'
#'
#' storage_volume_export Export the given artifacts as k8s volumes
#'
#'
#' storage_volume_reclaim Reclaims the volumes related to the unique ID
#'
#'
#' submit_project_metrics API to post submission for a project
#'
#'
#' target_migration_init API to initiate_migration
#'
#'
#' tokeninfo API to fetch all claims for a jwt token
#'
#'
#' trigger_runs_by_condition Triggers runs in dkube which satisfies the condition specified
#'
#'
#' update_datum_version_model Update version model info of a datum.
#'
#'
#' update_inference API to update inference job.
#'
#'
#' update_model_catalog API to update modelcatalog version item
#'
#'
#' update_one_project API to update single Project
#'
#'
#' update_run_one Update description of a run.
#'
#'
#' update_template_one API to update a template.
#'
#'
#' user_capability API to get capabilities of a user.
#'
#'
#' user_get_collection_one API to get user collection for single user.
#'
#'
#' users_get_collection_all API to get user collection for all users.
#'
#'
#' volumes_storage API to fetch information about storage.
#'
#' }
#'
#' @export
DkubeApi <- R6::R6Class(
'DkubeApi',
public = list(
userAgent = "Swagger-Codegen/1.0.0/r",
apiClient = NULL,
initialize = function(apiClient){
if (!missing(apiClient)) {
self$apiClient <- apiClient
}
else {
self$apiClient <- ApiClient$new()
}
},
abort_migration = function(migration, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/migrations/{migration}/abort"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
add_cicd_image = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/images"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
attach_user_profile = function(profile, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/userprofiles/{profile}"
if (!missing(`profile`)) {
urlPath <- gsub(paste0("\\{", "profile", "\\}"), `profile`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
create_project = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/projects/create"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20049$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
create_user_profile = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/userprofiles"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datum_one_abort_download = function(user, class, datum, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/abort"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datum_one_restart_download = function(user, class, datum, data, extract, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`extract`)) {
queryParams['extract'] <- extract
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/start"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datum_refresh_one = function(user, class, datum, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/refresh"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_add_one = function(user, data, extract, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`extract`)) {
queryParams['extract'] <- extract
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_archive_by_class = function(user, class, archive, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`archive`)) {
queryParams['archive'] <- archive
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums/class/{class}/archive"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_delete_by_class = function(user, class, data, force, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`force`)) {
queryParams['force'] <- force
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums/class/{class}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_deploy_one_model = function(user, model, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/models/{model}/versions/{version}/deploy"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_by_class = function(user, class, shared, archived, tags, page, versions, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`shared`)) {
queryParams['shared'] <- shared
}
if (!missing(`archived`)) {
queryParams['archived'] <- archived
}
if (!missing(`tags`)) {
queryParams['tags'] <- tags
}
if (!missing(`page`)) {
queryParams['page'] <- page
}
if (!missing(`versions`)) {
queryParams['versions'] <- versions
}
urlPath <- "/users/{user}/datums/class/{class}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20022$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_metrics = function(user, class, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datums/class/{class}/metrics"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20024$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_one_by_class = function(user, class, datum, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20021$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_one_version_lineage = function(user, class, datum, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/versions/{version}/lineage"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20029$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_get_one_version_metrics = function(user, class, datum, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/datums/class/{class}/datum/{datum}/versions/{version}/metrics"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`datum`)) {
urlPath <- gsub(paste0("\\{", "datum", "\\}"), `datum`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20025$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_publish_one_model = function(user, model, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/models/{model}/versions/{version}/publish"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_release_one_model = function(user, model, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/models/{model}/versions/{version}/release"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
datums_testdeploy_one_model = function(user, model, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/models/{model}/versions/{version}/testdeploy"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_cicd_images = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/images"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_migration = function(migration, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/migrations/{migration}/delete"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_model_catalog_item = function(user, model, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/modelcatalog/models/{model}/versions/{version}/delete"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_experiment = function(name, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/experiments/{name}"
if (!missing(`name`)) {
urlPath <- gsub(paste0("\\{", "name", "\\}"), `name`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_experimentby_id = function(expid, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/experiments/expid/{expid}"
if (!missing(`expid`)) {
urlPath <- gsub(paste0("\\{", "expid", "\\}"), `expid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_experiments_all = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/experiments"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_run = function(name, exp, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`exp`)) {
queryParams['exp'] <- exp
}
urlPath <- "/pipelines/runs/{name}"
if (!missing(`name`)) {
urlPath <- gsub(paste0("\\{", "name", "\\}"), `name`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_run_by_id = function(runid, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/runs/runid/{runid}"
if (!missing(`runid`)) {
urlPath <- gsub(paste0("\\{", "runid", "\\}"), `runid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
delete_pipeline_runs_all = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/pipelines/runs"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
diag = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/admin/diag"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
dkubeinfo = function(authmode, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`authmode`)) {
queryParams['authmode'] <- authmode
}
urlPath <- "/dkubeinfo"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2006$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
dl_frameworks = function(class, project, user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`class`)) {
queryParams['class'] <- class
}
if (!missing(`project`)) {
queryParams['project'] <- project
}
if (!missing(`user`)) {
queryParams['user'] <- user
}
urlPath <- "/dlframeworks"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2002$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
dlsupport = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/dlsupport"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2001$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_add_one = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_commit_version = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/commit"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_copy_version = function(featureset, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}/versions/{version}/copy"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_copy_version_abort = function(featureset, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}/versions/{version}/copyabort"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_copy_version_status = function(featureset, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}/versions/{version}/copy_status"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20060$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_delete = function(data, force, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`force`)) {
queryParams['force'] <- force
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_get = function(featureset, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/featuresets/{featureset}"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20055$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_get_one_version_lineage = function(featureset, version, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/featuresets/{featureset}/versions/{version}/lineage"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20058$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_list = function(query, versions, tags, archived, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`query`)) {
queryParams['query'] <- query
}
if (!missing(`versions`)) {
queryParams['versions'] <- versions
}
if (!missing(`tags`)) {
queryParams['tags'] <- tags
}
if (!missing(`archived`)) {
queryParams['archived'] <- archived
}
urlPath <- "/featuresets"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20054$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_put = function(featureset, data, indexing, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`indexing`)) {
queryParams['indexing'] <- indexing
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20056$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featureset_update_version = function(featureset, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/{featureset}/version/{version}"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featuresets_archive = function(archive, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`archive`)) {
queryParams['archive'] <- archive
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/featuresets/archive"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
featurespec_list = function(featureset, query, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`query`)) {
queryParams['query'] <- query
}
urlPath <- "/featuresets/{featureset}/featurespec"
if (!missing(`featureset`)) {
urlPath <- gsub(paste0("\\{", "featureset", "\\}"), `featureset`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20057$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
g_p_us_capability = function(source, value, class, user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`source`)) {
queryParams['source'] <- source
}
if (!missing(`value`)) {
queryParams['value'] <- value
}
if (!missing(`class`)) {
queryParams['class'] <- class
}
if (!missing(`user`)) {
queryParams['user'] <- user
}
urlPath <- "/stats/resources"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20019$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_all_cicd_images = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/images"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20052$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_all_datum_prev_cred = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/preferences"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20014$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_all_project_submissions = function(project_id, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/projects/{project_id}/submissions"
if (!missing(`project_id`)) {
urlPath <- gsub(paste0("\\{", "project_id", "\\}"), `project_id`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20050$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_all_projects = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/projects"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20048$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_datum_prev_cred = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/preferences"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20014$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_dvs_config = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/dvs/config"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20013$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_job_groups = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/groups"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20017$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_migration_metadata = function(migration, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migrations/{migration}/meta"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- TODO_FILE_MAPPING$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_one_project = function(project_id, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/projects/{project_id}"
if (!missing(`project_id`)) {
urlPath <- gsub(paste0("\\{", "project_id", "\\}"), `project_id`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20049$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_one_run_lineage = function(user, class, runid, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/class/{class}/runs/{runid}/lineage"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`runid`)) {
urlPath <- gsub(paste0("\\{", "runid", "\\}"), `runid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20030$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_role = function(rolename, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/rbac/roles/{rolename}"
if (!missing(`rolename`)) {
urlPath <- gsub(paste0("\\{", "rolename", "\\}"), `rolename`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20016$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_session_key = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/sessionkey"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20018$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
get_single_user_profile = function(profile, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/userprofiles/{profile}"
if (!missing(`profile`)) {
urlPath <- gsub(paste0("\\{", "profile", "\\}"), `profile`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20035$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
inference_monitoring = function(user, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/inference/{job}/monitoring"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20032$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
job_get_collection_all_by_class = function(user, class, run, template, group, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`run`)) {
queryParams['run'] <- run
}
if (!missing(`template`)) {
queryParams['template'] <- template
}
if (!missing(`group`)) {
queryParams['group'] <- group
}
urlPath <- "/users/{user}/jobs/class/{class}/collection"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20038$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
job_group_add_one = function(user, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/groups"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobmigration = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migration"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_abort_one = function(user, job, class, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/class/{class}/jobs/{job}/abort"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_add_one = function(user, data, run, rerun, subclass, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`run`)) {
queryParams['run'] <- run
}
if (!missing(`rerun`)) {
queryParams['rerun'] <- rerun
}
if (!missing(`subclass`)) {
queryParams['subclass'] <- subclass
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/jobs/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_delete_one_by_uuid = function(uuid, class, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/jobs/class/{class}/uuid/{uuid}"
if (!missing(`uuid`)) {
urlPath <- gsub(paste0("\\{", "uuid", "\\}"), `uuid`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_get_by_class = function(user, class, shared, run, template, group, all, archived, tags, page, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`shared`)) {
queryParams['shared'] <- shared
}
if (!missing(`run`)) {
queryParams['run'] <- run
}
if (!missing(`template`)) {
queryParams['template'] <- template
}
if (!missing(`group`)) {
queryParams['group'] <- group
}
if (!missing(`all`)) {
queryParams['all'] <- all
}
if (!missing(`archived`)) {
queryParams['archived'] <- archived
}
if (!missing(`tags`)) {
queryParams['tags'] <- tags
}
if (!missing(`page`)) {
queryParams['page'] <- page
}
urlPath <- "/users/{user}/jobs/class/{class}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20033$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_get_collection_all = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/collection"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20036$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_get_collection_one = function(user, class, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/class/{class}/job/{job}/collection"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20037$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_get_one_by_uuid = function(uuid, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/jobs/uuid/{uuid}"
if (!missing(`uuid`)) {
urlPath <- gsub(paste0("\\{", "uuid", "\\}"), `uuid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20031$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_list_archive_by_class = function(user, class, archive, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`archive`)) {
queryParams['archive'] <- archive
}
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/jobs/class/{class}/archive"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_list_delete_by_class = function(user, class, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/jobs/class/{class}/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jobs_start_one = function(user, job, class, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/class/{class}/jobs/{job}/start"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
jsonform = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/job/scheduling/jsonform"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2005$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
list_user_profiles = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/userprofiles"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20034$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
login = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/login"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2009$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
logout = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/logout"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
logs_get_one = function(user, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/{job}/logs/"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
migration_complete = function(migration, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migrations/{migration}/complete"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
migration_status = function(migration, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migrations/{migration}/update"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
migration_status_user = function(migration, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/migrations/{migration}"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
model_deploy = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/model/deploy"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
notification = function(type, op, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/notify/{type}/{op}"
if (!missing(`type`)) {
urlPath <- gsub(paste0("\\{", "type", "\\}"), `type`, urlPath)
}
if (!missing(`op`)) {
urlPath <- gsub(paste0("\\{", "op", "\\}"), `op`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
projects_delete_list = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/projects"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
repo_update_one = function(user, class, repo, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/repos/class/{class}/repo/{repo}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`repo`)) {
urlPath <- gsub(paste0("\\{", "repo", "\\}"), `repo`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
revoke_session_key = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/sessionkey"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20018$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
run_group_update = function(user, rungroup, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/rungroups/{rungroup}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`rungroup`)) {
urlPath <- gsub(paste0("\\{", "rungroup", "\\}"), `rungroup`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
source_migration_init = function(migration, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/migrations/{migration}/source/init"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
start_tensorboard = function(user, class, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/class/{class}/job/{job}/tensorboard/start"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
stop_tensorboard = function(user, class, job, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/jobs/class/{class}/job/{job}/tensorboard/stop"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "DELETE",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
storage_volume_export = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/storage/volumes/export"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
storage_volume_reclaim = function(data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/storage/volumes/reclaim"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse2007$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
submit_project_metrics = function(project_id, submission_id, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/projects/{project_id}/{submission_id}"
if (!missing(`project_id`)) {
urlPath <- gsub(paste0("\\{", "project_id", "\\}"), `project_id`, urlPath)
}
if (!missing(`submission_id`)) {
urlPath <- gsub(paste0("\\{", "submission_id", "\\}"), `submission_id`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
target_migration_init = function(migration, upfile, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
body <- list(
"upfile" = httr::upload_file(upfile)
)
urlPath <- "/migrations/{migration}/target/init"
if (!missing(`migration`)) {
urlPath <- gsub(paste0("\\{", "migration", "\\}"), `migration`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20051$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
tokeninfo = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/token/validate"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20010$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
trigger_runs_by_condition = function(conditions, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`conditions`)) {
body <- `conditions`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/triggers/runs"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20012$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_datum_version_model = function(user, uuid, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/datum/version/{uuid}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`uuid`)) {
urlPath <- gsub(paste0("\\{", "uuid", "\\}"), `uuid`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_inference = function(user, job, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/inference/{job}/update"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`job`)) {
urlPath <- gsub(paste0("\\{", "job", "\\}"), `job`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_model_catalog = function(user, model, version, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/modelcatalog/models/{model}/versions/{version}/update"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`model`)) {
urlPath <- gsub(paste0("\\{", "model", "\\}"), `model`, urlPath)
}
if (!missing(`version`)) {
urlPath <- gsub(paste0("\\{", "version", "\\}"), `version`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "POST",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_one_project = function(project_id, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/projects/{project_id}"
if (!missing(`project_id`)) {
urlPath <- gsub(paste0("\\{", "project_id", "\\}"), `project_id`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PATCH",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_run_one = function(user, class, run, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/{class}/runs/{run}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`run`)) {
urlPath <- gsub(paste0("\\{", "run", "\\}"), `run`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
update_template_one = function(user, class, template, data, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`data`)) {
body <- `data`$toJSONString()
} else {
body <- NULL
}
urlPath <- "/users/{user}/{class}/templates/{template}"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
if (!missing(`class`)) {
urlPath <- gsub(paste0("\\{", "class", "\\}"), `class`, urlPath)
}
if (!missing(`template`)) {
urlPath <- gsub(paste0("\\{", "template", "\\}"), `template`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "PUT",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- ApiResponse$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
user_capability = function(user, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/{user}/capability"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20020$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
user_get_collection_one = function(user, page, ...){
args <- list(...)
queryParams <- list()
headerParams <- character()
if (!missing(`page`)) {
queryParams['page'] <- page
}
urlPath <- "/users/{user}/collection"
if (!missing(`user`)) {
urlPath <- gsub(paste0("\\{", "user", "\\}"), `user`, urlPath)
}
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20040$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
users_get_collection_all = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/users/collection"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20039$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
},
volumes_storage = function(...){
args <- list(...)
queryParams <- list()
headerParams <- character()
urlPath <- "/storage/volumes"
resp <- self$apiClient$callApi(url = paste0(self$apiClient$basePath, urlPath),
method = "GET",
queryParams = queryParams,
headerParams = headerParams,
body = body,
...)
if (httr::status_code(resp) >= 200 && httr::status_code(resp) <= 299) {
returnObject <- InlineResponse20047$new()
result <- returnObject$fromJSON(httr::content(resp, "text", encoding = "UTF-8"))
Response$new(returnObject, resp)
} else if (httr::status_code(resp) >= 400 && httr::status_code(resp) <= 499) {
Response$new("API client error", resp)
} else if (httr::status_code(resp) >= 500 && httr::status_code(resp) <= 599) {
Response$new("API server error", resp)
}
}
)
)
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.