Package 'MolgenisAuth'

Title: 'OpenID Connect' Discovery and Authentication
Description: Discover 'OpenID Connect' endpoints and authenticate using device flow. Used by 'MOLGENIS' packages.
Authors: Fleur Kelpin [aut] , Tommy de Boer [aut] , Sido Haakma [aut] , Mariska Slofstra [aut, cre] , MOLGENIS org [cph, fnd]
Maintainer: Mariska Slofstra <[email protected]>
License: GPL-3
Version: 0.0.28
Built: 2024-11-11 04:44:41 UTC
Source: https://github.com/molgenis/molgenis-r-auth

Help Index

Authenticate using device flow

Description

Get an ID token using the OpenIDConnect Device Flow.

Usage

device_flow_auth(endpoint, client_id, scopes = c("openid", "offline_access"))

Arguments

endpoint

An list with a device endpoint specified in it
client_id

The client ID for which the token should be obtained
scopes

the requested scopes, default to c("openid", "offline_access")

Value

The credentials retrieved from the token endpoint

Examples

## Not run: 
endpoint <- discover("https://auth.molgenis.org")
device_flow_auth(endpoint, "b396233b-cdb2-449e-ac5c-a0d28b38f791")

## End(Not run)

Discover OpenID Connect Endpoints

Description

Performs OpenID Connect discovery on an ID Provider.

Usage

discover(auth_server)

Arguments

auth_server

the server

Value

An list with the discovered endpoints.

Examples

## Not run: 
discover("https://auth.molgenis.org")
discover("https://accounts.google.com")

## End(Not run)