R/OIDCConfig.r

# Looker API 3.0 Reference
# 
# ### Authorization  The Looker API uses Looker **API3** credentials for authorization and access control. Looker admins can create API3 credentials on Looker's **Admin/Users** page. Pass API3 credentials to the **/login** endpoint to obtain a temporary access_token. Include that access_token in the Authorization header of Looker API requests. For details, see [Looker API Authorization](https://looker.com/docs/r/api/authorization)  ### Client SDKs  The Looker API is a RESTful system that should be usable by any programming language capable of making HTTPS requests. Client SDKs for a variety of programming languages can be generated from the Looker API's Swagger JSON metadata to streamline use of the Looker API in your applications. A client SDK for Ruby is available as an example. For more information, see [Looker API Client SDKs](https://looker.com/docs/r/api/client_sdks)  ### Try It Out!  The 'api-docs' page served by the Looker instance includes 'Try It Out!' buttons for each API method. After logging in with API3 credentials, you can use the \"Try It Out!\" buttons to call the API directly from the documentation page to interactively explore API features and responses.  ### Versioning  Future releases of Looker will expand this API release-by-release to securely expose more and more of the core power of Looker to API client applications. API endpoints marked as \"beta\" may receive breaking changes without warning. Stable (non-beta) API endpoints should not receive breaking changes in future releases. For more information, see [Looker API Versioning](https://looker.com/docs/r/api/versioning) 
# 
# OpenAPI spec version: 3.0.0
# 
# Generated by: https://github.com/swagger-api/swagger-codegen.git


#' OIDCConfig Class
#'
#' @field enabled 
#' @field identifier 
#' @field secret 
#' @field scopes 
#' @field issuer 
#' @field audience 
#' @field authorization_endpoint 
#' @field token_endpoint 
#' @field userinfo_endpoint 
#' @field user_attribute_map_email 
#' @field user_attribute_map_first_name 
#' @field user_attribute_map_last_name 
#' @field new_user_migration_types 
#' @field alternate_email_login_allowed 
#' @field test_slug 
#' @field modified_at 
#' @field modified_by 
#' @field default_new_user_roles 
#' @field default_new_user_groups 
#' @field default_new_user_role_ids 
#' @field default_new_user_group_ids 
#' @field set_roles_from_groups 
#' @field groups_attribute 
#' @field groups 
#' @field groups_with_role_ids 
#' @field auth_requires_role 
#' @field user_attributes 
#' @field user_attributes_with_ids 
#' @field url 
#' @field can 
#'
#' @importFrom R6 R6Class
#' @importFrom jsonlite fromJSON toJSON
#' @export
OIDCConfig <- R6::R6Class(
  'OIDCConfig',
  public = list(
    `enabled` = NULL,
    `identifier` = NULL,
    `secret` = NULL,
    `scopes` = NULL,
    `issuer` = NULL,
    `audience` = NULL,
    `authorization_endpoint` = NULL,
    `token_endpoint` = NULL,
    `userinfo_endpoint` = NULL,
    `user_attribute_map_email` = NULL,
    `user_attribute_map_first_name` = NULL,
    `user_attribute_map_last_name` = NULL,
    `new_user_migration_types` = NULL,
    `alternate_email_login_allowed` = NULL,
    `test_slug` = NULL,
    `modified_at` = NULL,
    `modified_by` = NULL,
    `default_new_user_roles` = NULL,
    `default_new_user_groups` = NULL,
    `default_new_user_role_ids` = NULL,
    `default_new_user_group_ids` = NULL,
    `set_roles_from_groups` = NULL,
    `groups_attribute` = NULL,
    `groups` = NULL,
    `groups_with_role_ids` = NULL,
    `auth_requires_role` = NULL,
    `user_attributes` = NULL,
    `user_attributes_with_ids` = NULL,
    `url` = NULL,
    `can` = NULL,
    initialize = function(`enabled`, `identifier`, `secret`, `scopes`, `issuer`, `audience`, `authorization_endpoint`, `token_endpoint`, `userinfo_endpoint`, `user_attribute_map_email`, `user_attribute_map_first_name`, `user_attribute_map_last_name`, `new_user_migration_types`, `alternate_email_login_allowed`, `test_slug`, `modified_at`, `modified_by`, `default_new_user_roles`, `default_new_user_groups`, `default_new_user_role_ids`, `default_new_user_group_ids`, `set_roles_from_groups`, `groups_attribute`, `groups`, `groups_with_role_ids`, `auth_requires_role`, `user_attributes`, `user_attributes_with_ids`, `url`, `can`){
      if (!missing(`enabled`)) {
        self$`enabled` <- `enabled`
      }
      if (!missing(`identifier`)) {
        stopifnot(is.character(`identifier`), length(`identifier`) == 1)
        self$`identifier` <- `identifier`
      }
      if (!missing(`secret`)) {
        stopifnot(is.character(`secret`), length(`secret`) == 1)
        self$`secret` <- `secret`
      }
      if (!missing(`scopes`)) {
        stopifnot(is.list(`scopes`), length(`scopes`) != 0)
        lapply(`scopes`, function(x) stopifnot(is.character(x)))
        self$`scopes` <- `scopes`
      }
      if (!missing(`issuer`)) {
        stopifnot(is.character(`issuer`), length(`issuer`) == 1)
        self$`issuer` <- `issuer`
      }
      if (!missing(`audience`)) {
        stopifnot(is.character(`audience`), length(`audience`) == 1)
        self$`audience` <- `audience`
      }
      if (!missing(`authorization_endpoint`)) {
        stopifnot(is.character(`authorization_endpoint`), length(`authorization_endpoint`) == 1)
        self$`authorization_endpoint` <- `authorization_endpoint`
      }
      if (!missing(`token_endpoint`)) {
        stopifnot(is.character(`token_endpoint`), length(`token_endpoint`) == 1)
        self$`token_endpoint` <- `token_endpoint`
      }
      if (!missing(`userinfo_endpoint`)) {
        stopifnot(is.character(`userinfo_endpoint`), length(`userinfo_endpoint`) == 1)
        self$`userinfo_endpoint` <- `userinfo_endpoint`
      }
      if (!missing(`user_attribute_map_email`)) {
        stopifnot(is.character(`user_attribute_map_email`), length(`user_attribute_map_email`) == 1)
        self$`user_attribute_map_email` <- `user_attribute_map_email`
      }
      if (!missing(`user_attribute_map_first_name`)) {
        stopifnot(is.character(`user_attribute_map_first_name`), length(`user_attribute_map_first_name`) == 1)
        self$`user_attribute_map_first_name` <- `user_attribute_map_first_name`
      }
      if (!missing(`user_attribute_map_last_name`)) {
        stopifnot(is.character(`user_attribute_map_last_name`), length(`user_attribute_map_last_name`) == 1)
        self$`user_attribute_map_last_name` <- `user_attribute_map_last_name`
      }
      if (!missing(`new_user_migration_types`)) {
        stopifnot(is.character(`new_user_migration_types`), length(`new_user_migration_types`) == 1)
        self$`new_user_migration_types` <- `new_user_migration_types`
      }
      if (!missing(`alternate_email_login_allowed`)) {
        self$`alternate_email_login_allowed` <- `alternate_email_login_allowed`
      }
      if (!missing(`test_slug`)) {
        stopifnot(is.character(`test_slug`), length(`test_slug`) == 1)
        self$`test_slug` <- `test_slug`
      }
      if (!missing(`modified_at`)) {
        stopifnot(is.character(`modified_at`), length(`modified_at`) == 1)
        self$`modified_at` <- `modified_at`
      }
      if (!missing(`modified_by`)) {
        stopifnot(is.character(`modified_by`), length(`modified_by`) == 1)
        self$`modified_by` <- `modified_by`
      }
      if (!missing(`default_new_user_roles`)) {
        stopifnot(is.list(`default_new_user_roles`), length(`default_new_user_roles`) != 0)
        lapply(`default_new_user_roles`, function(x) stopifnot(R6::is.R6(x)))
        self$`default_new_user_roles` <- `default_new_user_roles`
      }
      if (!missing(`default_new_user_groups`)) {
        stopifnot(is.list(`default_new_user_groups`), length(`default_new_user_groups`) != 0)
        lapply(`default_new_user_groups`, function(x) stopifnot(R6::is.R6(x)))
        self$`default_new_user_groups` <- `default_new_user_groups`
      }
      if (!missing(`default_new_user_role_ids`)) {
        stopifnot(is.list(`default_new_user_role_ids`), length(`default_new_user_role_ids`) != 0)
        lapply(`default_new_user_role_ids`, function(x) stopifnot(is.character(x)))
        self$`default_new_user_role_ids` <- `default_new_user_role_ids`
      }
      if (!missing(`default_new_user_group_ids`)) {
        stopifnot(is.list(`default_new_user_group_ids`), length(`default_new_user_group_ids`) != 0)
        lapply(`default_new_user_group_ids`, function(x) stopifnot(is.character(x)))
        self$`default_new_user_group_ids` <- `default_new_user_group_ids`
      }
      if (!missing(`set_roles_from_groups`)) {
        self$`set_roles_from_groups` <- `set_roles_from_groups`
      }
      if (!missing(`groups_attribute`)) {
        stopifnot(is.character(`groups_attribute`), length(`groups_attribute`) == 1)
        self$`groups_attribute` <- `groups_attribute`
      }
      if (!missing(`groups`)) {
        stopifnot(is.list(`groups`), length(`groups`) != 0)
        lapply(`groups`, function(x) stopifnot(R6::is.R6(x)))
        self$`groups` <- `groups`
      }
      if (!missing(`groups_with_role_ids`)) {
        stopifnot(is.list(`groups_with_role_ids`), length(`groups_with_role_ids`) != 0)
        lapply(`groups_with_role_ids`, function(x) stopifnot(R6::is.R6(x)))
        self$`groups_with_role_ids` <- `groups_with_role_ids`
      }
      if (!missing(`auth_requires_role`)) {
        self$`auth_requires_role` <- `auth_requires_role`
      }
      if (!missing(`user_attributes`)) {
        stopifnot(is.list(`user_attributes`), length(`user_attributes`) != 0)
        lapply(`user_attributes`, function(x) stopifnot(R6::is.R6(x)))
        self$`user_attributes` <- `user_attributes`
      }
      if (!missing(`user_attributes_with_ids`)) {
        stopifnot(is.list(`user_attributes_with_ids`), length(`user_attributes_with_ids`) != 0)
        lapply(`user_attributes_with_ids`, function(x) stopifnot(R6::is.R6(x)))
        self$`user_attributes_with_ids` <- `user_attributes_with_ids`
      }
      if (!missing(`url`)) {
        stopifnot(is.character(`url`), length(`url`) == 1)
        self$`url` <- `url`
      }
      if (!missing(`can`)) {
        self$`can` <- `can`
      }
    },
    toJSON = function() {
      OIDCConfigObject <- list()
      if (!is.null(self$`enabled`)) {
        OIDCConfigObject[['enabled']] <- self$`enabled`
      }
      if (!is.null(self$`identifier`)) {
        OIDCConfigObject[['identifier']] <- self$`identifier`
      }
      if (!is.null(self$`secret`)) {
        OIDCConfigObject[['secret']] <- self$`secret`
      }
      if (!is.null(self$`scopes`)) {
        OIDCConfigObject[['scopes']] <- self$`scopes`
      }
      if (!is.null(self$`issuer`)) {
        OIDCConfigObject[['issuer']] <- self$`issuer`
      }
      if (!is.null(self$`audience`)) {
        OIDCConfigObject[['audience']] <- self$`audience`
      }
      if (!is.null(self$`authorization_endpoint`)) {
        OIDCConfigObject[['authorization_endpoint']] <- self$`authorization_endpoint`
      }
      if (!is.null(self$`token_endpoint`)) {
        OIDCConfigObject[['token_endpoint']] <- self$`token_endpoint`
      }
      if (!is.null(self$`userinfo_endpoint`)) {
        OIDCConfigObject[['userinfo_endpoint']] <- self$`userinfo_endpoint`
      }
      if (!is.null(self$`user_attribute_map_email`)) {
        OIDCConfigObject[['user_attribute_map_email']] <- self$`user_attribute_map_email`
      }
      if (!is.null(self$`user_attribute_map_first_name`)) {
        OIDCConfigObject[['user_attribute_map_first_name']] <- self$`user_attribute_map_first_name`
      }
      if (!is.null(self$`user_attribute_map_last_name`)) {
        OIDCConfigObject[['user_attribute_map_last_name']] <- self$`user_attribute_map_last_name`
      }
      if (!is.null(self$`new_user_migration_types`)) {
        OIDCConfigObject[['new_user_migration_types']] <- self$`new_user_migration_types`
      }
      if (!is.null(self$`alternate_email_login_allowed`)) {
        OIDCConfigObject[['alternate_email_login_allowed']] <- self$`alternate_email_login_allowed`
      }
      if (!is.null(self$`test_slug`)) {
        OIDCConfigObject[['test_slug']] <- self$`test_slug`
      }
      if (!is.null(self$`modified_at`)) {
        OIDCConfigObject[['modified_at']] <- self$`modified_at`
      }
      if (!is.null(self$`modified_by`)) {
        OIDCConfigObject[['modified_by']] <- self$`modified_by`
      }
      if (!is.null(self$`default_new_user_roles`)) {
        OIDCConfigObject[['default_new_user_roles']] <- lapply(self$`default_new_user_roles`, function(x) x$toJSON())
      }
      if (!is.null(self$`default_new_user_groups`)) {
        OIDCConfigObject[['default_new_user_groups']] <- lapply(self$`default_new_user_groups`, function(x) x$toJSON())
      }
      if (!is.null(self$`default_new_user_role_ids`)) {
        OIDCConfigObject[['default_new_user_role_ids']] <- self$`default_new_user_role_ids`
      }
      if (!is.null(self$`default_new_user_group_ids`)) {
        OIDCConfigObject[['default_new_user_group_ids']] <- self$`default_new_user_group_ids`
      }
      if (!is.null(self$`set_roles_from_groups`)) {
        OIDCConfigObject[['set_roles_from_groups']] <- self$`set_roles_from_groups`
      }
      if (!is.null(self$`groups_attribute`)) {
        OIDCConfigObject[['groups_attribute']] <- self$`groups_attribute`
      }
      if (!is.null(self$`groups`)) {
        OIDCConfigObject[['groups']] <- lapply(self$`groups`, function(x) x$toJSON())
      }
      if (!is.null(self$`groups_with_role_ids`)) {
        OIDCConfigObject[['groups_with_role_ids']] <- lapply(self$`groups_with_role_ids`, function(x) x$toJSON())
      }
      if (!is.null(self$`auth_requires_role`)) {
        OIDCConfigObject[['auth_requires_role']] <- self$`auth_requires_role`
      }
      if (!is.null(self$`user_attributes`)) {
        OIDCConfigObject[['user_attributes']] <- lapply(self$`user_attributes`, function(x) x$toJSON())
      }
      if (!is.null(self$`user_attributes_with_ids`)) {
        OIDCConfigObject[['user_attributes_with_ids']] <- lapply(self$`user_attributes_with_ids`, function(x) x$toJSON())
      }
      if (!is.null(self$`url`)) {
        OIDCConfigObject[['url']] <- self$`url`
      }
      if (!is.null(self$`can`)) {
        OIDCConfigObject[['can']] <- self$`can`
      }

      OIDCConfigObject
    },
    fromJSON = function(OIDCConfigJson) {
      OIDCConfigObject <- jsonlite::fromJSON(OIDCConfigJson)
      if (!is.null(OIDCConfigObject$`enabled`)) {
        self$`enabled` <- OIDCConfigObject$`enabled`
      }
      if (!is.null(OIDCConfigObject$`identifier`)) {
        self$`identifier` <- OIDCConfigObject$`identifier`
      }
      if (!is.null(OIDCConfigObject$`secret`)) {
        self$`secret` <- OIDCConfigObject$`secret`
      }
      if (!is.null(OIDCConfigObject$`scopes`)) {
        self$`scopes` <- OIDCConfigObject$`scopes`
      }
      if (!is.null(OIDCConfigObject$`issuer`)) {
        self$`issuer` <- OIDCConfigObject$`issuer`
      }
      if (!is.null(OIDCConfigObject$`audience`)) {
        self$`audience` <- OIDCConfigObject$`audience`
      }
      if (!is.null(OIDCConfigObject$`authorization_endpoint`)) {
        self$`authorization_endpoint` <- OIDCConfigObject$`authorization_endpoint`
      }
      if (!is.null(OIDCConfigObject$`token_endpoint`)) {
        self$`token_endpoint` <- OIDCConfigObject$`token_endpoint`
      }
      if (!is.null(OIDCConfigObject$`userinfo_endpoint`)) {
        self$`userinfo_endpoint` <- OIDCConfigObject$`userinfo_endpoint`
      }
      if (!is.null(OIDCConfigObject$`user_attribute_map_email`)) {
        self$`user_attribute_map_email` <- OIDCConfigObject$`user_attribute_map_email`
      }
      if (!is.null(OIDCConfigObject$`user_attribute_map_first_name`)) {
        self$`user_attribute_map_first_name` <- OIDCConfigObject$`user_attribute_map_first_name`
      }
      if (!is.null(OIDCConfigObject$`user_attribute_map_last_name`)) {
        self$`user_attribute_map_last_name` <- OIDCConfigObject$`user_attribute_map_last_name`
      }
      if (!is.null(OIDCConfigObject$`new_user_migration_types`)) {
        self$`new_user_migration_types` <- OIDCConfigObject$`new_user_migration_types`
      }
      if (!is.null(OIDCConfigObject$`alternate_email_login_allowed`)) {
        self$`alternate_email_login_allowed` <- OIDCConfigObject$`alternate_email_login_allowed`
      }
      if (!is.null(OIDCConfigObject$`test_slug`)) {
        self$`test_slug` <- OIDCConfigObject$`test_slug`
      }
      if (!is.null(OIDCConfigObject$`modified_at`)) {
        self$`modified_at` <- OIDCConfigObject$`modified_at`
      }
      if (!is.null(OIDCConfigObject$`modified_by`)) {
        self$`modified_by` <- OIDCConfigObject$`modified_by`
      }
      if (!is.null(OIDCConfigObject$`default_new_user_roles`)) {
        self$`default_new_user_roles` <- lapply(OIDCConfigObject$`default_new_user_roles`, function(x) {
          default_new_user_rolesObject <- Role$new()
          default_new_user_rolesObject$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE))
          default_new_user_rolesObject
        })
      }
      if (!is.null(OIDCConfigObject$`default_new_user_groups`)) {
        self$`default_new_user_groups` <- lapply(OIDCConfigObject$`default_new_user_groups`, function(x) {
          default_new_user_groupsObject <- Group$new()
          default_new_user_groupsObject$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE))
          default_new_user_groupsObject
        })
      }
      if (!is.null(OIDCConfigObject$`default_new_user_role_ids`)) {
        self$`default_new_user_role_ids` <- OIDCConfigObject$`default_new_user_role_ids`
      }
      if (!is.null(OIDCConfigObject$`default_new_user_group_ids`)) {
        self$`default_new_user_group_ids` <- OIDCConfigObject$`default_new_user_group_ids`
      }
      if (!is.null(OIDCConfigObject$`set_roles_from_groups`)) {
        self$`set_roles_from_groups` <- OIDCConfigObject$`set_roles_from_groups`
      }
      if (!is.null(OIDCConfigObject$`groups_attribute`)) {
        self$`groups_attribute` <- OIDCConfigObject$`groups_attribute`
      }
      if (!is.null(OIDCConfigObject$`groups`)) {
        self$`groups` <- lapply(OIDCConfigObject$`groups`, function(x) {
          groupsObject <- OIDCGroupRead$new()
          groupsObject$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE))
          groupsObject
        })
      }
      if (!is.null(OIDCConfigObject$`groups_with_role_ids`)) {
        self$`groups_with_role_ids` <- lapply(OIDCConfigObject$`groups_with_role_ids`, function(x) {
          groups_with_role_idsObject <- OIDCGroupWrite$new()
          groups_with_role_idsObject$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE))
          groups_with_role_idsObject
        })
      }
      if (!is.null(OIDCConfigObject$`auth_requires_role`)) {
        self$`auth_requires_role` <- OIDCConfigObject$`auth_requires_role`
      }
      if (!is.null(OIDCConfigObject$`user_attributes`)) {
        self$`user_attributes` <- lapply(OIDCConfigObject$`user_attributes`, function(x) {
          user_attributesObject <- OIDCUserAttributeRead$new()
          user_attributesObject$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE))
          user_attributesObject
        })
      }
      if (!is.null(OIDCConfigObject$`user_attributes_with_ids`)) {
        self$`user_attributes_with_ids` <- lapply(OIDCConfigObject$`user_attributes_with_ids`, function(x) {
          user_attributes_with_idsObject <- OIDCUserAttributeWrite$new()
          user_attributes_with_idsObject$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE))
          user_attributes_with_idsObject
        })
      }
      if (!is.null(OIDCConfigObject$`url`)) {
        self$`url` <- OIDCConfigObject$`url`
      }
      if (!is.null(OIDCConfigObject$`can`)) {
        self$`can` <- OIDCConfigObject$`can`
      }
    },
    toJSONString = function() {
       sprintf(
        '{
           "enabled": %s,
           "identifier": %s,
           "secret": %s,
           "scopes": [%s],
           "issuer": %s,
           "audience": %s,
           "authorization_endpoint": %s,
           "token_endpoint": %s,
           "userinfo_endpoint": %s,
           "user_attribute_map_email": %s,
           "user_attribute_map_first_name": %s,
           "user_attribute_map_last_name": %s,
           "new_user_migration_types": %s,
           "alternate_email_login_allowed": %s,
           "test_slug": %s,
           "modified_at": %s,
           "modified_by": %s,
           "default_new_user_roles": [%s],
           "default_new_user_groups": [%s],
           "default_new_user_role_ids": [%s],
           "default_new_user_group_ids": [%s],
           "set_roles_from_groups": %s,
           "groups_attribute": %s,
           "groups": [%s],
           "groups_with_role_ids": [%s],
           "auth_requires_role": %s,
           "user_attributes": [%s],
           "user_attributes_with_ids": [%s],
           "url": %s,
           "can": %s
        }',
        self$`enabled`,
        self$`identifier`,
        self$`secret`,
        lapply(self$`scopes`, function(x) paste(paste0('"', x, '"'), sep=",")),
        self$`issuer`,
        self$`audience`,
        self$`authorization_endpoint`,
        self$`token_endpoint`,
        self$`userinfo_endpoint`,
        self$`user_attribute_map_email`,
        self$`user_attribute_map_first_name`,
        self$`user_attribute_map_last_name`,
        self$`new_user_migration_types`,
        self$`alternate_email_login_allowed`,
        self$`test_slug`,
        self$`modified_at`,
        self$`modified_by`,
        lapply(self$`default_new_user_roles`, function(x) paste(x$toJSON(), sep=",")),
        lapply(self$`default_new_user_groups`, function(x) paste(x$toJSON(), sep=",")),
        lapply(self$`default_new_user_role_ids`, function(x) paste(paste0('"', x, '"'), sep=",")),
        lapply(self$`default_new_user_group_ids`, function(x) paste(paste0('"', x, '"'), sep=",")),
        self$`set_roles_from_groups`,
        self$`groups_attribute`,
        lapply(self$`groups`, function(x) paste(x$toJSON(), sep=",")),
        lapply(self$`groups_with_role_ids`, function(x) paste(x$toJSON(), sep=",")),
        self$`auth_requires_role`,
        lapply(self$`user_attributes`, function(x) paste(x$toJSON(), sep=",")),
        lapply(self$`user_attributes_with_ids`, function(x) paste(x$toJSON(), sep=",")),
        self$`url`,
        self$`can`
      )
    },
    fromJSONString = function(OIDCConfigJson) {
      OIDCConfigObject <- jsonlite::fromJSON(OIDCConfigJson)
      self$`enabled` <- OIDCConfigObject$`enabled`
      self$`identifier` <- OIDCConfigObject$`identifier`
      self$`secret` <- OIDCConfigObject$`secret`
      self$`scopes` <- OIDCConfigObject$`scopes`
      self$`issuer` <- OIDCConfigObject$`issuer`
      self$`audience` <- OIDCConfigObject$`audience`
      self$`authorization_endpoint` <- OIDCConfigObject$`authorization_endpoint`
      self$`token_endpoint` <- OIDCConfigObject$`token_endpoint`
      self$`userinfo_endpoint` <- OIDCConfigObject$`userinfo_endpoint`
      self$`user_attribute_map_email` <- OIDCConfigObject$`user_attribute_map_email`
      self$`user_attribute_map_first_name` <- OIDCConfigObject$`user_attribute_map_first_name`
      self$`user_attribute_map_last_name` <- OIDCConfigObject$`user_attribute_map_last_name`
      self$`new_user_migration_types` <- OIDCConfigObject$`new_user_migration_types`
      self$`alternate_email_login_allowed` <- OIDCConfigObject$`alternate_email_login_allowed`
      self$`test_slug` <- OIDCConfigObject$`test_slug`
      self$`modified_at` <- OIDCConfigObject$`modified_at`
      self$`modified_by` <- OIDCConfigObject$`modified_by`
      self$`default_new_user_roles` <- lapply(OIDCConfigObject$`default_new_user_roles`, function(x) Role$new()$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE)))
      self$`default_new_user_groups` <- lapply(OIDCConfigObject$`default_new_user_groups`, function(x) Group$new()$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE)))
      self$`default_new_user_role_ids` <- OIDCConfigObject$`default_new_user_role_ids`
      self$`default_new_user_group_ids` <- OIDCConfigObject$`default_new_user_group_ids`
      self$`set_roles_from_groups` <- OIDCConfigObject$`set_roles_from_groups`
      self$`groups_attribute` <- OIDCConfigObject$`groups_attribute`
      self$`groups` <- lapply(OIDCConfigObject$`groups`, function(x) OIDCGroupRead$new()$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE)))
      self$`groups_with_role_ids` <- lapply(OIDCConfigObject$`groups_with_role_ids`, function(x) OIDCGroupWrite$new()$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE)))
      self$`auth_requires_role` <- OIDCConfigObject$`auth_requires_role`
      self$`user_attributes` <- lapply(OIDCConfigObject$`user_attributes`, function(x) OIDCUserAttributeRead$new()$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE)))
      self$`user_attributes_with_ids` <- lapply(OIDCConfigObject$`user_attributes_with_ids`, function(x) OIDCUserAttributeWrite$new()$fromJSON(jsonlite::toJSON(x, auto_unbox = TRUE)))
      self$`url` <- OIDCConfigObject$`url`
      self$`can` <- OIDCConfigObject$`can`
    }
  )
)
haarthi/R_sdk documentation built on May 18, 2019, 11:28 p.m.