Feature: Using with service accounts

[sebble]

I don't see a mechanism to authenticate (and impersonate) with service accounts using gcalendr alone. This was not too hard by using gargle, but is bypassing the internal .auth variable and may lead to inconsistent results.

My code is like:

impersonation_token = function(email, path) {
  cred <- gargle::credentials_service_account(
    scopes = c(
      "https://www.googleapis.com/auth/calendar.readonly",
      "https://www.googleapis.com/auth/calendar.events.readonly"),
    path = path,
    subject = email
  )
  return(httr::config(token = cred))
}

gcalendr::calendar_events(.., token = impersonation_token(..))

The gargle documentation kindly suggests that it is "a reasonable feature request" to expose the subject property through your gcalendr_auth method, but I realise this is perhaps non-trivial.

So consider this a feature request/discussion, and if I can help, please advise.

• https://cran.r-project.org/web/packages/gargle/vignettes/non-interactive-auth.html#provide-a-service-account-token-directly