R: eBay OAuth - запрос на предоставление учетных данных клиента - PullRequest
Новая
       125

R: eBay OAuth - запрос на предоставление учетных данных клиента

0 голосов
/ 25 апреля 2020

Я пытаюсь разобраться с OAuth и решил поиграть с eBay API. Следуя их инструкциям для получения токена доступа к Приложению, я получаю 400 ошибку . 

library(jsonlite)
library(httr)

# OAuth credentials
client_id <- "x"
client_secret <- "x"
# Required - https://developer.ebay.com/api-docs/static/oauth-base64-credentials.html
encod_oauth <- base64_enc(paste0(client_id, ":", client_secret))

auth_token_res <- 
  POST("https://api.sandbox.ebay.com/identity/v1/oauth2/token",
       add_headers("Content-Type" = "application/x-www-form-urlencoded",
                   Authorization = paste0("Basic ", encod_oauth)),
       body = list(grant_type = "client_credentials", 
                   scope = urlEncode("https://api.ebay.com/oauth/api_scope", reserved = T)))

Изучение содержимого, по-видимому, это связано с grant_type в теле. 

content(auth_token_res)
$error_description
[1] "grant type in request is not supported by the authorization server"

Что не так с запросом тела и почему?

...