请求访问令牌时AppEngine错误400

时间:2012-09-13 14:38:20

标签: delphi google-app-engine oauth indy

我正在编写一个基于Delphi的PC应用程序,它可以访问AppEngine servlet。我正在尝试使用OAuth 1.0舞蹈来验证用户并允许访问应用程序的受限制部分。 我可以使用浏览器访问受限制的servlet并通过谷歌用户身份验证。 我现在正试图实现舞蹈。 我使用OAuthGetRequestToken成功获取了令牌和令牌密码。

Key := 'XXXX.appspot.com';
Secret := 'YYYY';
URL := 'https://XXXX.appspot.com/_ah/OAuthGetRequestToken';
Consumer := TOAuthConsumer.Create(Key, Secret);
HMAC := TOAuthSignatureMethod_HMAC_SHA1.Create;
ARequest := TOAuthRequest.Create(URL);
ARequest := ARequest.FromConsumerAndToken(Consumer, nil, URL,'','oob','');
ARequest.Sign_Request(HMAC, Consumer, nil,true);
URL := URL + '?' + ARequest.GetString;
idHTTP1.Get(URL,ms);
ARequest.Destroy;
HMAC.Destroy;
Consumer.Destroy;

GET请求和响应如下所示:

GET /_ah/OAuthGetRequestToken HTTP/1.1
Host: XXXX.appspot.com
Accept: */*
Authorization: OAuth oauth_version="1.0", oauth_nonce="1511ec6d98e5b89c561b1af4b3022476", oauth_timestamp="1347534557", oauth_consumer_key="XXXX.appspot.com", oauth_callback="oob", oauth_signature_method="HMAC-SHA1", oauth_signature="JPSgMsipsLumldKsca8SA8gDXgw%3D"

HTTP/1.1 200 OK
Date: Thu, 13 Sep 2012 11:09:18 GMT
Content-Type: text/html
Server: Google Frontend
Content-Length: 88
oauth_token=4%2FY4ReEZt9v8IYHJ_4WnZYkzurXOgw&oauth_token_secret=S9150fuyvo_jjr43Cd47CPzY

接下来,我授权令牌。

URL := 'https://inksureauth.appspot.com/_ah/OAuthAuthorizeToken?oauth_token='+TOAuthUtil.urlEncodeRFC3986(Token.Text);
IdHTTP1.Get(URL,ms);  

我被重定向到谷歌网页进行登录。正如我所说的'oob'用于回调,我在网页上收到了我复制的验证码。

最后,我尝试将令牌换成访问令牌。我失败了。

URL := 'https://XXXX.appspot.com/_ah/OAuthGetAccessToken';
Key := 'XXXX.appspot.com';
Secret := 'YYYY';
Consumer := TOAuthConsumer.Create(Key, Secret);
ARequest := TOAuthRequest.Create(URL);
AToken := TOAuthToken.Create(TOAuthUtil.urlEncodeRFC3986(Token.Text), TokenSecret.Text);
ARequest.HTTPURL := URL;
ARequest := ARequest.FromConsumerAndToken(Consumer,AToken , URL,'','','VERIFICATION CODE FROM WEB PAGE');
HMAC := TOAuthSignatureMethod_HMAC_SHA1.Create;
ARequest.Sign_Request(HMAC, Consumer, AToken,true);
URL := URL + '?' + ARequest.GetString;
IdHTTP1.Disconnect;
IdHTTP1.Get(URL,ms);
HMAC.Destroy;
ARequest.Destroy;
Consumer.Destroy;

GET命令如下所示:

GET /_ah/OAuthGetAccessToken?oauth_version=1.0&oauth_nonce=4A86BEECE494C25AF94882F74DEE6231&oauth_timestamp=1347545383&oauth_consumer_key=XXXX.appspot.com&oauth_verifier=yGEhCENYOlni2ayo8aNckyPG&oauth_token=4%2FEKGFo9i2wmuMGcBLmbmQhqDba0z4&oauth_signature_method=HMAC-SHA1&oauth_signature=2ZwRvGp8LnXenTXrjYo5%2FtFHW30%3D HTTP/1.1

回复:

HTTP/1.1 400 Bad Request
Date: Thu, 13 Sep 2012 14:09:44 GMT
Content-Type: text/html; charset=UTF-8
Server: Google Frontend
Content-Length: 273


<html><head>
<meta http-equiv="content-type" content="text/html;charset=utf-8">
<title>400 Bad Request</title>
</head>
<body text=#000000 bgcolor=#ffffff>
<h1>Error: Bad Request</h1>
<h2>Your client has issued a malformed or illegal request.</h2>
<h2></h2>
</body></html>

我使用OAuth操场访问同一个应用程序,并且它成功检索了访问密钥。我将playground的请求参数与我的应用程序生成的参数进行了比较,它们是兼容的。我使用我的签名功能来签署游乐场生成的请求以及匹配的签名。还有什么其他原因可以让最后一步失败? 是否有可能从“您的客户发出格式错误或非法请求”之后的身份验证服务器获得更具信息性的响应?

更新:我已经使用我的应用程序成功检索到Google日历的访问令牌。使用相同的代码,我将更改回AppEngine应用程序,并在GetAccessToken步骤中失败。

1 个答案:

答案 0 :(得分:0)

Google moved to Oauth 2.0 meanwhile. You can find OAuth 2.0 client authentication solution here:

https://github.com/lordcrc/IndySASLOAuth2

Simple OAuth2 SASL authenticator for Indy.

Uses the Delphi REST client libraries.

Tested on Delphi XE6.

Licensed under the Apache 2.0 license