我正在使用Indy的TIdHTTP。我发出2个不同的请求,一个标头包含“ Last-Modified”标签,另一个标头不包含。带有标签的标头会引发异常:
'Invalid Argument to date encode'
我已经遇到this问题,Remy Lebeau在哪里说TIdHttp现在可以解析ISO8601日期,但是对我来说似乎不起作用。如您在下面看到的,除了更改UserAgent之外,我没有对组件做任何其他事情。我想念什么吗?
url := 'https://api.priceapi.com/v2/jobs/' + JobID+ '?token=' + Token;
http := TIdHTTP.Create(nil);
http.Request.UserAgent := 'XXXXX'; //Some UserAgent
try
ssl := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
try
http.IOHandler := ssl;
try
jo := TJsonObject.ParseJSONValue(http.get(url)) as TJSONObject;
result := jo.GetValue('status').Value;
finally
end;
finally
ssl.Free;
end;
finally
http.Free;
end;
带有最后修改的标题:
Cache-Control: no-cache
Content-Disposition: attachment;
filename="20181025145103_google_shopping_de_5bd1d857bbd7e520c12841d7.json"
Content-Transfer-Encoding: binary
Content-Type: application/json
Last-Modified: 2018-10-25 14:51:23 +0000
Vary: Origin
X-Accel-Buffering: no
X-Content-Type-Options: nosniff
X-Frame-Options: SAMEORIGIN
X-Request-Id: b05aa8fe-7ea9-4152-8470-a75f9816549f
X-Runtime: 0.099212
X-XSS-Protection: 1; mode=block
transfer-encoding: chunked
Connection: keep-alive
没有最后修改的标题:
Cache-Control: max-age=0, private, must-revalidate', nil
Content-Type: application/json; charset=utf-8', nil
ETag: W/"43c4a8865a5ebe565f3920779a962e93"', nil
Vary: Origin', nil
X-Content-Type-Options: nosniff', nil
X-Frame-Options: SAMEORIGIN', nil
X-Request-Id: 344ac82e-0d14-4838-ae7e-627c79b78edc', nil
X-Runtime: 0.062357', nil
X-XSS-Protection: 1; mode=block', nil
Content-Length: 157', nil
Connection: Close', nil
StackTrace:
:744717d2 KERNELBASE.RaiseException + 0x62
HIWBase.System.SysUtils.ConvertError($3B68860)
HIWBase.System.SysUtils.EncodeDate(???,???,???)
HIWBase.IdGlobalProtocols.RawStrInternetToDateTime('07:53:37 +0000',0)
HIWBase.IdGlobalProtocols.GMTToLocalDateTime('07:53:37 +0000')
HIWBase.IdHTTPHeaderInfo.TIdEntityHeaderInfo.ProcessHeaders
HIWBase.IdHTTPHeaderInfo.TIdResponseHeaderInfo.ProcessHeaders
HIWBase.IdHTTP.TIdHTTPProtocol.RetrieveHeaders(255)
HIWBase.IdHTTP.TIdCustomHTTP.DoRequest('GET','My URL',nil,$ADF09E0,(...))
HIWBase.IdHTTP.TIdCustomHTTP.Get('My URL',$ADF09E0,(...))
HIWBase.IdHTTP.TIdCustomHTTP.Get('My URL',(...))
HIWBase.IdHTTP.TIdCustomHTTP.Get('My URL')
我使用的是Indy版本10.6.2.5311
答案 0 :(得分:1)
Last-Modified
标头在RFC 2616 Section 14.29 1 中定义为:
Last-Modified = "Last-Modified" ":" HTTP-date
1:等价定义出现在RFC 7232 Section 2.2中。
HTTP-date
在RFC 2616 Section 3.3 2 中定义为:
HTTP-date = rfc1123-date | rfc850-date | asctime-date rfc1123-date = wkday "," SP date1 SP time SP "GMT" rfc850-date = weekday "," SP date2 SP time SP "GMT" asctime-date = wkday SP date3 SP time SP 4DIGIT date1 = 2DIGIT SP month SP 4DIGIT ; day month year (e.g., 02 Jun 1982) date2 = 2DIGIT "-" month "-" 2DIGIT ; day-month-year (e.g., 02-Jun-82) date3 = month SP ( 2DIGIT | ( SP 1DIGIT )) ; month day (e.g., Jun 2) time = 2DIGIT ":" 2DIGIT ":" 2DIGIT ; 00:00:00 - 23:59:59 wkday = "Mon" | "Tue" | "Wed" | "Thu" | "Fri" | "Sat" | "Sun" weekday = "Monday" | "Tuesday" | "Wednesday" | "Thursday" | "Friday" | "Saturday" | "Sunday" month = "Jan" | "Feb" | "Mar" | "Apr" | "May" | "Jun" | "Jul" | "Aug" | "Sep" | "Oct" | "Nov" | "Dec"
2:等价定义出现在RFC 7231 Section 7.1.1.1中。
您显示的Last-Modified
值与HTTP所允许的任何格式都不匹配。
TIdHTTP
使用Indy的GMTToLocalDateTime()
函数来解析Last-Modified
(以及Date
和Expires
)标头。该功能由HTTP,IMAP,NNTP和电子邮件组件共享,因此,在支持的日期/时间格式上,小更加灵活。例如,它确实解析ISO 8601,您声称其值为Last-Modified
。但是,您显示的值实际上也不符合ISO 8601。如果有的话,它看起来应该更像这样:
Last-Modified: 2018-10-26T08:37:01+00:00
更糟糕的是,根据您提供的堆栈跟踪,GMTToLocalDateTime()
的调用完全没有日期部分:
HIWBase.IdGlobalProtocols.GMTToLocalDateTime('07:53:37 +0000')
在TIdHTTP
中可能发生的 only 方式是HTTP服务器正在发送Last-Modified
(或Date
或Expires
)标头具有该确切值,该值也不符合HTTP或ISO 8601标准,并且GMTToLocalDateTime()
不能按原样进行处理。
简而言之,您要查询的API发送的是{em {1}}不支持解析的非法日期/时间格式(具有讽刺意味的是,因为主要的TIdHTTP
网站会发送格式正确的HTTP日期/时间字符串)。您应该联系网站管理员,并报告他们的API服务器在这方面违反了HTTP协议标准。
话虽这么说,https://www.priceapi.com
在遇到格式错误的日期/时间字符串时不会引发GMTToLocalDateTime()
异常。而是返回'Invalid Argument to date encode'
中的TDateTime
。您可能看到 only 的异常是,如果您在调试器中运行代码。如果为0.0
提供了格式错误的日期/时间字符串,则它可能会提取它认为有效的数字分量,但是当尝试使用它们对最终的GMTToLocalDateTime()
进行编码时会失败。您看到的异常来自RTL的TDateTime
函数,因为该函数输入了无效的月/日/年作为输入。但是EncodeDate()
在内部捕获了该异常。您的代码永远不会在运行时看到它,只有调试器才能看到它。