Google OAuth с Indy в Delphi

Question

Я использую Indy10 с Delphi и пытаюсь заставить работать OAuth от Google. Первый шаг - сделать запрос к методу OAuthGetRequestToken. Код ниже возвращает ошибку 400. Любая помощь будет принята с благодарностью.

procedure TForm1.Button1Click(Sender: TObject);
    var
      IdHTTP: TIdHTTP;
      IdSSLIOHandlerSocket1: TIdSSLIOHandlerSocketOpenSSL;
      Params: TStringList;
      mString: String;
    begin
      Params := tstringlist.create;
      IdSSLIOHandlerSocket1 := TIdSSLIOHandlerSocketOpenSSL.create(nil);
      IdHTTP := TIdHTTP.create(nil);

      with IdSSLIOHandlerSocket1 do begin
        SSLOptions.Method := sslvSSLv3;
        SSLOptions.Mode :=  sslmUnassigned;
        SSLOptions.VerifyMode := [];
        SSLOptions.VerifyDepth := 2;
      end;
      with IdHTTP do begin
        IOHandler := IdSSLIOHandlerSocket1;
        ReadTimeout := 0;
        AllowCookies := True;
        ProxyParams.BasicAuthentication := False;
        ProxyParams.ProxyPort := 0;
        Request.ContentLength := -1;
        Request.ContentRangeEnd := 0;
        Request.ContentRangeStart := 0;
        Request.ContentType := 'application/x-www-form-urlencoded';
        request.host := 'https://www.google.com';
        Request.Accept := 'text/html, */*';

        Request.BasicAuthentication := False;
        Request.UserAgent := 'Mozilla/3.0 (compatible; Indy Library)';
        HTTPOptions := [hoForceEncodeParams];
      end;
      Params.Add('scope=https://www.google.com/analytics/feeds/');
      Params.Add('oauth_consumer_key=anonymous');
      Params.Add('oauth_signature_method=HMAC-SHA1');
      Params.Add('oauth_signature=wOJIO9A2W5mFwDgiDvZbTSMK%2FPY%3D');
      Params.Add('oauth_timestamp=137131200');
      Params.Add('oauth_nonce=4572616e48616d6d65724c61686176');
      showmessage(HTTPDecode(IdHTTP.Post('https://www.google.com/accounts/OAuthGetRequestToken',Params)));

    end;

Answer 1

Посмотрите на ответ DataString (где возбуждено исключение), он даст вам более подробную причину проблемы.
Например, пытаясь с вашим кодом, я сначала получил "метку времени слишком далеко от текущего времени", затем после обновления oauth_timestamp я получил "Неверную подпись"...

Answer 2

Попробуйте направить ваш запрос через HTTP Fiddler.

Я обнаружил, что это отличный инструмент для отслеживания ошибок на уровне http/https.

--jeroen

Answer 3

Проверьте, получаете ли вы ответное сообщение и в заголовке ответа, кроме 400. Большинство веб-сервисов предоставляют какое-то текстовое описание того, что происходит не так.

Также убедитесь, что библиотека OpenSSL действительно загружена, в противном случае Indy может откатиться к некодированной связи, которую сервер может не принять.