1
0
mirror of https://github.com/vlang/v.git synced 2023-08-10 21:13:21 +03:00

net.http: support -d trace_http_request and -d trace_http_response

This commit is contained in:
Delyan Angelov
2021-03-30 18:11:00 +03:00
parent 205fb88d90
commit 683eaad66f
3 changed files with 36 additions and 14 deletions

View File

@ -6,15 +6,23 @@ module http
#flag windows -I @VROOT/thirdparty/vschannel
#flag -l ws2_32 -l crypt32 -l secur32 -l user32
#include "vschannel.c"
fn C.new_tls_context() C.TlsContext
fn (req &Request) ssl_do(port int, method Method, host_name string, path string) ?Response {
mut ctx := C.new_tls_context()
C.vschannel_init(&ctx)
mut buff := unsafe {malloc(C.vsc_init_resp_buff_size)}
mut buff := unsafe { malloc(C.vsc_init_resp_buff_size) }
addr := host_name
sdata := req.build_request_headers(method, host_name, path)
$if trace_http_request ? {
eprintln('> $sdata')
}
length := int(C.request(&ctx, port, addr.to_wide(), sdata.str, &buff))
C.vschannel_cleanup(&ctx)
return parse_response(unsafe {buff.vstring_with_len(length)})
response_text := unsafe { buff.vstring_with_len(length) }
$if trace_http_response ? {
eprintln('< $response_text')
}
return parse_response(response_text)
}