mirror of
https://github.com/ultimatepp/ultimatepp.git
synced 2026-05-16 14:16:09 -06:00
637 lines
16 KiB
C++
637 lines
16 KiB
C++
#include "Web.h"
|
|
|
|
NAMESPACE_UPP
|
|
|
|
bool HttpClient_Trace__;
|
|
|
|
#ifdef _DEBUG
|
|
#define LLOG(x) if(HttpClient_Trace__) RLOG(x); else;
|
|
#else
|
|
#define LLOG(x)
|
|
#endif
|
|
|
|
void HttpClient::Trace(bool b)
|
|
{
|
|
HttpClient_Trace__ = b;
|
|
}
|
|
|
|
void HttpClient::Init()
|
|
{
|
|
port = 0;
|
|
timeout_msecs = DEFAULT_TIMEOUT_MSECS;
|
|
max_header_size = DEFAULT_MAX_HEADER_SIZE;
|
|
max_content_size = DEFAULT_MAX_CONTENT_SIZE;
|
|
keepalive = false;
|
|
force_digest = false;
|
|
std_headers = true;
|
|
hasurlvar = false;
|
|
method = METHOD_GET;
|
|
}
|
|
|
|
|
|
HttpClient::HttpClient()
|
|
{
|
|
Init();
|
|
}
|
|
|
|
HttpClient::HttpClient(const char *url)
|
|
{
|
|
Init();
|
|
URL(url);
|
|
}
|
|
|
|
HttpClient::~HttpClient()
|
|
{
|
|
}
|
|
|
|
HttpClient& HttpClient::URL(const char *u)
|
|
{
|
|
const char *t = u;
|
|
while(*t && *t != '?' && *t != '#')
|
|
if(*t++ == '/' && *t == '/') {
|
|
u = ++t;
|
|
break;
|
|
}
|
|
t = u;
|
|
while(*u && *u != ':' && *u != '/' && *u != '?' && *u != '#')
|
|
u++;
|
|
if(strchr(u, '?'))
|
|
hasurlvar = true;
|
|
host = String(t, u);
|
|
port = 0;
|
|
if(*u == ':')
|
|
port = ScanInt(u + 1, &u);
|
|
path = u;
|
|
int q = path.Find('#');
|
|
if(q >= 0)
|
|
path.Trim(q);
|
|
return *this;
|
|
}
|
|
|
|
HttpClient& HttpClient::Proxy(const char *p)
|
|
{
|
|
const char *t = p;
|
|
while(*p && *p != ':')
|
|
p++;
|
|
proxy_host = String(t, p);
|
|
proxy_port = 80;
|
|
if(*p++ == ':' && IsDigit(*p))
|
|
proxy_port = ScanInt(p);
|
|
return *this;
|
|
}
|
|
|
|
String HttpClient::ReadUntilProgress(char until, int start_time, int end_time, Gate2<int, int> progress)
|
|
{
|
|
String out;
|
|
while(!socket.IsEof() && !socket.IsError()) {
|
|
out.Cat(socket.Read(1000, 1000));
|
|
int f = out.Find('\n');
|
|
if(f >= 0) {
|
|
socket.UnRead(out.Mid(f + 1));
|
|
out.Trim(f);
|
|
return out;
|
|
}
|
|
int t = msecs();
|
|
if(t >= end_time) {
|
|
socket.SetErrorText(NFormat(t_("%s:%d receiving headers timed out"), host, port));
|
|
break;
|
|
}
|
|
if(progress(msecs(start_time), end_time - start_time)) {
|
|
aborted = true;
|
|
break;
|
|
}
|
|
}
|
|
return String::GetVoid();
|
|
}
|
|
|
|
HttpClient& HttpClient::Post(const char *id, const String& data)
|
|
{
|
|
Post();
|
|
if(postdata.GetCount())
|
|
postdata << '&';
|
|
postdata << id << '=' << UrlEncode(data);
|
|
return *this;
|
|
}
|
|
|
|
HttpClient& HttpClient::UrlVar(const char *id, const String& data)
|
|
{
|
|
int c = *path.Last();
|
|
if(hasurlvar && c != '&')
|
|
path << '&';
|
|
if(!hasurlvar && c != '?')
|
|
path << '?';
|
|
path << id << '=' << UrlEncode(data);
|
|
hasurlvar = true;
|
|
return *this;
|
|
}
|
|
|
|
String HttpClient::CalculateDigest(String authenticate) const
|
|
{
|
|
const char *p = authenticate;
|
|
String realm, qop, nonce, opaque;
|
|
while(*p) {
|
|
if(!IsAlNum(*p)) {
|
|
p++;
|
|
continue;
|
|
}
|
|
else {
|
|
const char *b = p;
|
|
while(IsAlNum(*p))
|
|
p++;
|
|
String var = ToLower(String(b, p));
|
|
String value;
|
|
while(*p && (byte)*p <= ' ')
|
|
p++;
|
|
if(*p == '=') {
|
|
p++;
|
|
while(*p && (byte)*p <= ' ')
|
|
p++;
|
|
if(*p == '\"') {
|
|
p++;
|
|
while(*p && *p != '\"')
|
|
if(*p != '\\' || *++p)
|
|
value.Cat(*p++);
|
|
if(*p == '\"')
|
|
p++;
|
|
}
|
|
else {
|
|
b = p;
|
|
while(*p && *p != ',' && (byte)*p > ' ')
|
|
p++;
|
|
value = String(b, p);
|
|
}
|
|
}
|
|
if(var == "realm")
|
|
realm = value;
|
|
else if(var == "qop")
|
|
qop = value;
|
|
else if(var == "nonce")
|
|
nonce = value;
|
|
else if(var == "opaque")
|
|
opaque = value;
|
|
}
|
|
}
|
|
String hv1, hv2;
|
|
hv1 << username << ':' << realm << ':' << password;
|
|
String ha1 = MD5String(hv1);
|
|
hv2 << (method == METHOD_GET ? "GET" : method == METHOD_PUT ? "PUT" : method == METHOD_POST ? "POST" : "READ")
|
|
<< ':' << UrlEncode(path);
|
|
String ha2 = MD5String(hv2);
|
|
int nc = 1;
|
|
String cnonce = FormatIntHex(Random(), 8);
|
|
String hv;
|
|
hv << ha1
|
|
<< ':' << nonce
|
|
<< ':' << FormatIntHex(nc, 8)
|
|
<< ':' << cnonce
|
|
<< ':' << qop << ':' << ha2;
|
|
String ha = MD5String(hv);
|
|
String auth;
|
|
auth
|
|
<< "username=" << AsCString(username)
|
|
<< ", realm=" << AsCString(realm)
|
|
<< ", nonce=" << AsCString(nonce)
|
|
<< ", uri=" << AsCString(path)
|
|
<< ", qop=" << AsCString(qop)
|
|
<< ", nc=" << AsCString(FormatIntHex(nc, 8))
|
|
<< ", cnonce=" << cnonce
|
|
<< ", response=" << AsCString(ha);
|
|
if(!IsNull(opaque))
|
|
auth << ", opaque=" << AsCString(opaque);
|
|
return auth;
|
|
}
|
|
|
|
HttpClient& HttpClient::Header(const char *id, const String& data)
|
|
{
|
|
client_headers << id << ": " << data << "\r\n";
|
|
return *this;
|
|
}
|
|
|
|
String HttpClient::Execute(Gate2<int, int> progress)
|
|
{
|
|
int start_time = msecs();
|
|
int end_time = start_time + timeout_msecs;
|
|
aborted = false;
|
|
server_headers = Null;
|
|
status_line = Null;
|
|
status_code = 0;
|
|
is_redirect = false;
|
|
redirect_url = Null;
|
|
if(socket.IsOpen() && IsError())
|
|
Close();
|
|
error = Null;
|
|
use_proxy = !IsNull(proxy_host);
|
|
socket_host = (use_proxy ? proxy_host : host);
|
|
socket_port = (use_proxy ? proxy_port : port);
|
|
|
|
LLOG("socket host = " << socket_host << ":" << socket_port);
|
|
if(!socket.IsOpen() && !CreateClientSocket())
|
|
return String::GetVoid();
|
|
while(!socket.PeekWrite(1000)) {
|
|
int time = msecs();
|
|
if(time >= end_time) {
|
|
error = NFormat(t_("%s:%d: connecting to host timed out"), socket_host, socket_port);
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
if(progress(time - start_time, end_time - start_time)) {
|
|
aborted = true;
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
}
|
|
String request;
|
|
String ctype = contenttype;
|
|
switch(method) {
|
|
case METHOD_GET: request << "GET "; break;
|
|
case METHOD_POST:
|
|
request << "POST ";
|
|
if(IsNull(ctype))
|
|
ctype = "application/x-www-form-urlencoded";
|
|
break;
|
|
case METHOD_PUT:
|
|
request << "PUT ";
|
|
if(IsNull(ctype))
|
|
ctype = "application/x-www-form-urlencoded";
|
|
break;
|
|
case METHOD_HEAD: request << "HEAD "; break;
|
|
default: NEVER(); // invalid method
|
|
}
|
|
String host_port = host;
|
|
if(port)
|
|
host_port << ':' << port;
|
|
String url;
|
|
url << (IsSecure() ? "https://" : "http://") << host_port << Nvl(path, "/");
|
|
if(use_proxy)
|
|
request << url;
|
|
else
|
|
request << Nvl(path, "/");
|
|
request << " HTTP/1.1\r\n";
|
|
if(std_headers) {
|
|
request
|
|
<< "URL: " << url << "\r\n"
|
|
<< "Host: " << host_port << "\r\n"
|
|
<< "Connection: " << (keepalive ? "keep-alive" : "close") << "\r\n";
|
|
if(keepalive)
|
|
request << "Keep-alive: 300\r\n"; // 5 minutes (?)
|
|
request << "Accept: " << Nvl(accept, "*/*") << "\r\n";
|
|
request << "Accept-Encoding: gzip\r\n";
|
|
request << "Agent: " << Nvl(agent, "Ultimate++ HTTP client") << "\r\n";
|
|
if(method == METHOD_POST || method == METHOD_PUT)
|
|
request << "Content-Length: " << postdata.GetLength() << "\r\n";
|
|
if(ctype.GetCount())
|
|
request << "Content-Type: " << ctype << "\r\n";
|
|
}
|
|
if(use_proxy && !IsNull(proxy_username))
|
|
request << "Proxy-Authorization: Basic " << Base64Encode(proxy_username + ':' + proxy_password) << "\r\n";
|
|
if(!IsNull(digest))
|
|
request << "Authorization: Digest " << digest << "\r\n";
|
|
else if(!force_digest && (!IsNull(username) || !IsNull(password)))
|
|
request << "Authorization: Basic " << Base64Encode(username + ":" + password) << "\r\n";
|
|
request << client_headers << "\r\n" << postdata;
|
|
LLOG("host = " << host << ", port = " << port);
|
|
LLOG("request: " << request);
|
|
int written = 0;
|
|
while(msecs() - end_time < 0) {
|
|
int nwrite = socket.WriteWait(request.GetIter(written), min(request.GetLength() - written, 1000), 1000);
|
|
if(socket.IsError()) {
|
|
error = Socket::GetErrorText();
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
if((written += nwrite) >= request.GetLength())
|
|
break;
|
|
if(progress(written, request.GetLength())) {
|
|
aborted = true;
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
}
|
|
if(written < request.GetLength()) {
|
|
error = NFormat(t_("%s:%d: timed out sending request to server"), host, port);
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
|
|
bool expect_status = true;
|
|
|
|
int content_length = -1;
|
|
bool tc_chunked = false;
|
|
bool ce_gzip = false;
|
|
for(;;) {
|
|
String line = ReadUntilProgress('\n', start_time, end_time, progress);
|
|
LLOG("< " << line);
|
|
if(socket.IsError()) {
|
|
error = Socket::GetErrorText();
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
|
|
if(expect_status) {
|
|
status_line = line;
|
|
if(status_line.GetLength() < 5 || MemICmp(status_line, "HTTP/", 5)) {
|
|
error = NFormat(t_("%s:%d: invalid server response: %s"), host, port, status_line);
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
|
|
status_code = 0;
|
|
const char *p = status_line.Begin() + 5;
|
|
while(*p && *p != ' ')
|
|
p++;
|
|
if(*p == ' ' && IsDigit(*++p))
|
|
status_code = stou(p);
|
|
|
|
is_redirect = (status_code >= 300 && status_code < 400);
|
|
expect_status = false;
|
|
continue;
|
|
}
|
|
|
|
const char *p = line;
|
|
for(p = line; *p && (byte)*p <= ' '; p++)
|
|
;
|
|
const char *b = p, *e = line.End();
|
|
while(e > b && (byte)e[-1] < ' ')
|
|
e--;
|
|
if(b >= e) {
|
|
if(status_code == 100) {
|
|
expect_status = true;
|
|
continue;
|
|
}
|
|
break;
|
|
}
|
|
static const char cl[] = "content-length:";
|
|
static const char ce[] = "content-encoding:";
|
|
static const char te[] = "transfer-encoding:";
|
|
static const char lo[] = "location:";
|
|
static const char au[] = "www-authenticate:";
|
|
static const int CL_LENGTH = sizeof(cl) - 1;
|
|
static const int CE_LENGTH = sizeof(ce) - 1;
|
|
static const int TE_LENGTH = sizeof(te) - 1;
|
|
static const int LO_LENGTH = sizeof(lo) - 1;
|
|
static const int AU_LENGTH = sizeof(au) - 1;
|
|
if(!MemICmp(p, cl, CL_LENGTH)) {
|
|
for(p += CL_LENGTH; *p == ' '; p++)
|
|
;
|
|
if(IsDigit(*p)) {
|
|
content_length = stou(p);
|
|
if(content_length > max_content_size) {
|
|
error = NFormat(t_("%s:%d: maximum data length exceeded (%d B)"), host, port, max_content_size);
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
}
|
|
}
|
|
else if(!MemICmp(p, ce, CE_LENGTH)) {
|
|
for(p += CE_LENGTH; *p == ' '; p++)
|
|
;
|
|
static const char gzip[] = "gzip";
|
|
if(e - p == sizeof(gzip) - 1 && !memcmp(p, gzip, sizeof(gzip) - 1))
|
|
ce_gzip = true;
|
|
}
|
|
else if(!MemICmp(p, te, TE_LENGTH)) {
|
|
for(p += TE_LENGTH; *p == ' '; p++)
|
|
;
|
|
static const char ch[] = "chunked";
|
|
if(e - p == sizeof(ch) - 1 && !memcmp(p, ch, sizeof(ch) - 1))
|
|
tc_chunked = true;
|
|
}
|
|
else if(!MemICmp(p, lo, LO_LENGTH)) {
|
|
for(p += LO_LENGTH; *p == ' '; p++)
|
|
;
|
|
redirect_url = String(p, e);
|
|
int q = redirect_url.Find('?');
|
|
int p = path.Find('?');
|
|
if(p >= 0 && q < 0)
|
|
redirect_url.Cat(path.GetIter(p));
|
|
}
|
|
else if(!MemICmp(p, au, AU_LENGTH)) {
|
|
for(p += AU_LENGTH; *p == ' '; p++)
|
|
;
|
|
authenticate = String(p, e);
|
|
}
|
|
if(server_headers.GetLength() + (e - b) + 2 > max_header_size) {
|
|
error = NFormat(t_("%s:%d: maximum header length exceeded (%d B)"), host, port, max_header_size);
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
server_headers.Cat(b, int(e - b));
|
|
server_headers.Cat("\r\n");
|
|
}
|
|
|
|
// if(!keepalive) // mirek 110812
|
|
// socket.StopWrite();
|
|
|
|
if(method == METHOD_HEAD) {
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
String chunked;
|
|
body.Clear();
|
|
|
|
while(body.GetLength() < content_length || content_length < 0 || tc_chunked) {
|
|
if(msecs(end_time) >= 0) {
|
|
error = NFormat(t_("%s:%d: timed out when receiving server response"), host, port);
|
|
Close();
|
|
return String::GetVoid();
|
|
}
|
|
String part = socket.Read(1000);
|
|
LLOG("received part: " << part.GetLength());
|
|
if(!part.IsEmpty()) {
|
|
if(body.GetLength() + part.GetLength() > max_content_size) {
|
|
error = NFormat(t_("Maximum content size exceeded: %d"), body.GetLength() + part.GetLength());
|
|
goto EXIT;
|
|
}
|
|
body.Cat(part);
|
|
if(tc_chunked)
|
|
for(;;) {
|
|
const char *p = body.Begin(), *e = body.End();
|
|
while(p < e && *p != '\n')
|
|
p++;
|
|
if(p >= e)
|
|
break;
|
|
int nextline = int(p + 1 - body.Begin());
|
|
p = body.Begin();
|
|
int part_length = ctoi(*p);
|
|
if((unsigned)part_length >= 16) {
|
|
body.Remove(0, nextline);
|
|
continue;
|
|
}
|
|
for(int i; (unsigned)(i = ctoi(*++p)) < 16; part_length = part_length * 16 + i)
|
|
;
|
|
body.Remove(0, nextline);
|
|
if(part_length <= 0) {
|
|
for(;;) {
|
|
const char *b = body.Begin();
|
|
p = b;
|
|
while(*p && *p != '\n')
|
|
p++;
|
|
if(!*p && socket.IsOpen() && !socket.IsError() && !socket.IsEof()) {
|
|
if(msecs(end_time) >= 0) {
|
|
error = NFormat("Timeout reading footer block (%d B).", body.GetLength());
|
|
break;
|
|
}
|
|
if(body.GetLength() > 3)
|
|
body.Remove(0, body.GetLength() - 3);
|
|
String part = socket.Read(1000);
|
|
body.Cat(part);
|
|
continue;
|
|
}
|
|
const char *l = p;
|
|
if(*p == '\n')
|
|
p++;
|
|
if(l > b && l[-1] == '\r')
|
|
l--;
|
|
if(l == b)
|
|
break;
|
|
server_headers.Cat(b, int(p - b));
|
|
}
|
|
goto EXIT;
|
|
}
|
|
if(body.GetLength() >= part_length) {
|
|
chunked.Cat(body, part_length);
|
|
body.Remove(0, part_length);
|
|
continue;
|
|
}
|
|
for(;;) {
|
|
String part = socket.Read(-msecs(end_time));
|
|
if(part.IsEmpty()) {
|
|
error = NFormat("Timeout reading Transfer-encoding: chunked block (%d B).", part_length);
|
|
goto EXIT;
|
|
}
|
|
body.Cat(part);
|
|
if(body.GetLength() >= part_length) {
|
|
chunked.Cat(body, part_length);
|
|
body.Remove(0, part_length);
|
|
break;
|
|
}
|
|
if(progress(chunked.GetLength() + body.GetLength(), 0)) {
|
|
aborted = true;
|
|
goto EXIT;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if(!socket.IsOpen() || socket.IsError() || socket.IsEof()) {
|
|
LLOG("-> partial input: open = " << socket.IsOpen()
|
|
<< ", error " << socket.IsError() << ", eof " << socket.IsEof());
|
|
if(socket.IsError())
|
|
error = Socket::GetErrorText();
|
|
else if(!tc_chunked && content_length > 0 && body.GetLength() < content_length)
|
|
error = NFormat(t_("Partial input: %d out of %d"), body.GetLength(), content_length);
|
|
break;
|
|
}
|
|
if(progress(chunked.GetLength() + body.GetLength(), max(content_length, 0))) {
|
|
LLOG("-> user abort");
|
|
aborted = true;
|
|
break;
|
|
}
|
|
}
|
|
|
|
EXIT:
|
|
if(!keepalive || socket.IsError() || socket.IsEof())
|
|
Close();
|
|
|
|
if(tc_chunked)
|
|
body = chunked;
|
|
|
|
if(ce_gzip)
|
|
body = GZDecompress(body);
|
|
return body;
|
|
}
|
|
|
|
String HttpClient::ExecuteRedirect(int max_redirect, int retries, Gate2<int, int> progress)
|
|
{
|
|
int nredir = 0;
|
|
for(;;) {
|
|
if(progress(0, 0)) {
|
|
aborted = true;
|
|
return String::GetVoid();
|
|
}
|
|
String data = Execute(progress);
|
|
if(status_code == 401 && !IsNull(username) && !IsNull(authenticate)) {
|
|
if(++nredir > max_redirect) {
|
|
error = NFormat("Maximum number of digest authentication attempts exceeded: %d", max_redirect);
|
|
return String::GetVoid();
|
|
}
|
|
Digest(CalculateDigest(authenticate));
|
|
continue;
|
|
}
|
|
if(status_code >= 400 && status_code < 500) {
|
|
error = status_line;
|
|
return String::GetVoid();
|
|
}
|
|
int r = 0;
|
|
while(data.IsVoid()) {
|
|
if(progress(0, 0)) {
|
|
aborted = true;
|
|
return String::GetVoid();
|
|
}
|
|
if(++r >= retries)
|
|
return String::GetVoid();
|
|
data = Execute(progress);
|
|
}
|
|
if(!IsRedirect())
|
|
return data;
|
|
if(++nredir > max_redirect) {
|
|
error = NFormat("Maximum number of redirections exceeded: %d", max_redirect);
|
|
return String::GetVoid();
|
|
}
|
|
URL(GetRedirectURL());
|
|
}
|
|
}
|
|
|
|
bool HttpClient::CreateClientSocket()
|
|
{
|
|
if(!ClientSocket(socket, socket_host, socket_port ? socket_port : DEFAULT_HTTP_PORT,
|
|
true, NULL, 0, false)) {
|
|
error = Socket::GetErrorText();
|
|
return false;
|
|
}
|
|
// socket.Linger(0); // Mirek 1/2011 - does not seem to be necessary for client
|
|
return true;
|
|
}
|
|
|
|
bool HttpClient::IsSecure()
|
|
{
|
|
return false;
|
|
}
|
|
|
|
String HttpClientGet(String url, String proxy, String username, String password,
|
|
String *server_headers, String *error, Gate2<int, int> progress,
|
|
int timeout, int num_redirect, int retries)
|
|
{
|
|
HttpClient client;
|
|
String out = client
|
|
.URL(url)
|
|
.User(username, password)
|
|
.TimeoutMsecs(timeout)
|
|
.Proxy(proxy)
|
|
.ExecuteRedirect(num_redirect, progress, progress);
|
|
if(server_headers)
|
|
*server_headers = client.GetHeaders();
|
|
if(error)
|
|
*error = client.GetError();
|
|
return out;
|
|
}
|
|
|
|
String HttpClientGet(String url, String proxy, String *server_headers, String *error,
|
|
Gate2<int, int> progress, int timeout, int max_redirect, int retries)
|
|
{
|
|
return HttpClientGet(url, proxy, Null, Null, server_headers, error, progress, timeout, max_redirect, retries);
|
|
}
|
|
|
|
String HttpClientGet(String url, String username, String password,
|
|
String *server_headers, String *error, Gate2<int, int> progress,
|
|
int timeout, int num_redirect, int retries)
|
|
{
|
|
return HttpClientGet(url, Null, username, password, server_headers, error, progress, timeout, num_redirect, retries);
|
|
}
|
|
|
|
String HttpClientGet(String url, String *server_headers, String *error,
|
|
Gate2<int, int> progress, int timeout, int max_redirect, int retries)
|
|
{
|
|
return HttpClientGet(url, Null, Null, Null, server_headers, error, progress, timeout, max_redirect, retries);
|
|
}
|
|
|
|
END_UPP_NAMESPACE
|