luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

[GB.NET.CURL]

Browse source 
* BUG: HttpClient: Headers are now correctly parsed when the content length is zero.
* BUG: HttpClient: Remove the initial space of the reason string.


git-svn-id: svn://localhost/gambas/trunk@8045 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2017-01-07 13:05:09 +00:00
parent aab46220f6
commit 8605000ce5
1 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gb.net.curl/src/CHttpClient.c
View file

@ -54,6 +54,9 @@ static void http_parse_header(CHTTPCLIENT *_object)
char *p;
int ret;
if (THIS_HTTP->return_string)
return;
if (!THIS_HTTP->headers || GB.Array.Count(THIS_HTTP->headers) == 0)
return;
@ -72,9 +75,12 @@ static void http_parse_header(CHTTPCLIENT *_object)
p++;
}
if (*p != ' ')
return;
p++;
THIS_HTTP->return_code = ret;
//GB.FreeString(&THIS_HTTP->return_string);
THIS_HTTP->return_string = GB.NewString(p, header + len - p);
@ -122,8 +128,7 @@ static size_t http_read_curl(void *ptr, size_t size, size_t nmemb, void *_object
static int http_write_curl(void *buffer, size_t size, size_t nmemb, void *_object)
{
if (!THIS_HTTP->return_code)
http_parse_header(THIS_HTTP);
http_parse_header(THIS_HTTP);
nmemb *= size;
@ -514,6 +519,7 @@ END_PROPERTY
BEGIN_PROPERTY(HttpClient_ReturnCode)
http_parse_header(THIS_HTTP);
GB.ReturnInteger(THIS_HTTP->return_code);
END_PROPERTY
@ -521,6 +527,7 @@ END_PROPERTY
BEGIN_PROPERTY(HttpClient_ReturnString)
http_parse_header(THIS_HTTP);
GB.ReturnString(THIS_HTTP->return_string);
END_PROPERTY
@ -528,6 +535,7 @@ END_PROPERTY
BEGIN_PROPERTY(HttpClient_Headers)
http_parse_header(THIS_HTTP);
GB.ReturnObject(THIS_HTTP->headers);
END_PROPERTY