Updated debug output for HTTP library.

git-svn-id: svn://kolibrios.org@7296 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
hidnplayr 2018-07-01 10:40:55 +00:00
parent 077316eb68
commit 078acfa312

View File

@ -23,7 +23,7 @@
TIMEOUT = 500 ; in 1/100 s TIMEOUT = 500 ; in 1/100 s
__DEBUG__ = 1 __DEBUG__ = 1
__DEBUG_LEVEL__ = 2 __DEBUG_LEVEL__ = 1
format MS COFF format MS COFF
@ -480,6 +480,8 @@ locals
port dd ? port dd ?
endl endl
DEBUGF 1, "HTTP POST (%s).\n", [URL]
and [flags], 0xff00 ; filter out invalid flags and [flags], 0xff00 ; filter out invalid flags
pusha pusha
@ -502,6 +504,7 @@ endl
; Connect to the other side. ; Connect to the other side.
.open_new: .open_new:
DEBUGF 1, "Opening new connection.\n"
stdcall open_connection, [hostname], [port] stdcall open_connection, [hostname], [port]
test eax, eax test eax, eax
jz .error jz .error
@ -600,6 +603,7 @@ endl
HTTP_init_buffer [buffer], [socketnum], [flags] HTTP_init_buffer [buffer], [socketnum], [flags]
popa popa
mov eax, [buffer] ; return buffer ptr mov eax, [buffer] ; return buffer ptr
DEBUGF 1, "HTTP POST complete.\n"
ret ret
.error: .error:
@ -1913,9 +1917,9 @@ str_post_ct db 13, 10, 'Content-Type: '
.length = $ - str_post_ct .length = $ - str_post_ct
str_proxy_auth db 13, 10, 'Proxy-Authorization: Basic ' str_proxy_auth db 13, 10, 'Proxy-Authorization: Basic '
.length = $ - str_proxy_auth .length = $ - str_proxy_auth
str_close db 'User-Agent: KolibriOS libHTTP/1.1', 13, 10, 'Connection: Close', 13, 10, 13, 10 str_close db 'User-Agent: KolibriOS libHTTP/1.1', 13, 10, 'Connection: close', 13, 10, 13, 10
.length = $ - str_close .length = $ - str_close
str_keep db 'User-Agent: KolibriOS libHTTP/1.1', 13, 10, 'Connection: Keepalive', 13, 10, 13, 10 str_keep db 'User-Agent: KolibriOS libHTTP/1.1', 13, 10, 'Connection: keep-alive', 13, 10, 13, 10
.length = $ - str_keep .length = $ - str_keep
str_http db 'http://', 0 str_http db 'http://', 0