On Mon, 19 Dec 2011, Mattias Gaertner wrote:
On Mon, 19 Dec 2011 09:27:16 +0100 (CET)
michael.vancann...@wisa.be wrote:
On Mon, 19 Dec 2011, Mattias Gaertner wrote:
Hi,
For some reason TFPHTTPClient.Post hangs when accessing a "solr"
server over "tomcat". It works with "solr" over "jetty".
"curl" works fine with both, so I guess the tomcat server works
normally.
Here is the code:
client:=TFPHTTPClient.Create(nil);
client.RequestHeaders.Add('Content-Type: text/xml');
client.RequestBody:=ms; // a TMemoStream with some xml to post
client.Post(URL);
It hangs here:
procedure TFPCustomHTTPClient.ReadResponse
...
else if L<0 then
// No content-length, so we read till no more data available.
Repeat
R:=Transfer(ReadBufLen);
until (R=0);
Is there a remedy?
Can you check what happens with strace?
It means that the server didn't send a 'content-length' header, which is
strange in itself.
Yes, it does not send the Content-Length.
The comment is right.
If I skip the repeat loop, it works, but I don't get the response.
The response is a small xml snippet.
What does 'strace' say ?
Michael.
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
