request_oauthlib.OAuth1 эквивалент в R - PullRequest
Новая
       10

request_oauthlib.OAuth1 эквивалент в R

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

Любой знает эквивалент для Python запросы_оаутлиб.OAuth1 в R ?

Я пытаюсь реализовать это Python код в R . Этот блок кода пытается сначала запросить токен, но еще не авторизовать его. 

oauth = OAuth1(client_key=self.consumer_key,
                   client_secret=self.consumer_secret,
                   callback_uri=self.callback_url,
                   signature_type='auth_header')
response = self._session.post(url=self.request_token_url, auth=oauth, timeout=self.timeout)

Я сталкивался с множеством разных вопросов (и ответов от самого себя Хэдли в HTTR github) но мне так и не удалось его воспроизвести. Также видел эту проблему OAuth R .

Вот как я это сделал до сих пор, но после их настройки я получаю ответ API: Wrong Signature или Bad request . Но я никогда не получаю те, которые используют код Python выше. 

my_app <- oauth_app(appname = "app", key = consumer_key, secret = consumer_secret)
oauth <- oauth_signature(REQUEST_TOKEN_URL, method = "POST", my_app, 
                   other_params = c(signature_type = "AUTH_HEADER"))
response <- httr::POST(REQUEST_TOKEN_URL, oauth_header(oauth)))

Я также пытался использовать httr :: oauth1.0_token , но это не так кажется, работает, если я использую OOB. 

my_endpoints <- oauth_endpoint(request = REQUEST_TOKEN_URL, 
                    authorize = AUTHORIZATION_URL, 
                    access = ACCESS_TOKEN_URL)
my_tk <- httr::oauth1.0_token(endpoint = my_endpoints , app = my_app, as_header = TRUE)

Возможно, в моем коде много ошибок в R , поэтому я просто очень хочу знать, есть ли такой эквивалентный код R для этого OAuth1 из Python.

...