X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/a8d628fcc5a14ee693f8acff663ba5b48ecb0114..7198c3368055d88249a338eb33b21f051f674806:/src/common/http.cpp

diff --git a/src/common/http.cpp b/src/common/http.cpp
index 259678ef7b..e238364ece 100644
--- a/src/common/http.cpp
+++ b/src/common/http.cpp
@@ -1,23 +1,19 @@
 /////////////////////////////////////////////////////////////////////////////
-// Name:        http.cpp
+// Name:        src/common/http.cpp
 // Purpose:     HTTP protocol
 // Author:      Guilhem Lavaux
-// Modified by:
+// Modified by: Simo Virokannas (authentication, Dec 2005)
 // Created:     August 1997
 // RCS-ID:      $Id$
 // Copyright:   (c) 1997, 1998 Guilhem Lavaux
 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
-#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
-  #pragma implementation "http.h"
-#endif
-
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__
-  #pragma hdrstop
+    #pragma hdrstop
 #endif
 
 #if wxUSE_PROTOCOL_HTTP
@@ -26,8 +22,8 @@
 #include <stdlib.h>
 
 #ifndef WX_PRECOMP
-#include "wx/string.h"
-#include "wx/app.h"
+    #include "wx/string.h"
+    #include "wx/app.h"
 #endif
 
 #include "wx/tokenzr.h"
@@ -36,22 +32,26 @@
 #include "wx/url.h"
 #include "wx/protocol/http.h"
 #include "wx/sckstrm.h"
+#include "wx/thread.h"
+
+
+// ----------------------------------------------------------------------------
+// wxHTTP
+// ----------------------------------------------------------------------------
 
 IMPLEMENT_DYNAMIC_CLASS(wxHTTP, wxProtocol)
 IMPLEMENT_PROTOCOL(wxHTTP, wxT("http"), wxT("80"), true)
 
-#define HTTP_BSIZE 2048
-
 wxHTTP::wxHTTP()
   : wxProtocol()
 {
-  m_addr = NULL;
-  m_read = false;
-  m_proxy_mode = false;
-  m_post_buf = wxEmptyString;
-  m_http_response = 0;
+    m_addr = NULL;
+    m_read = false;
+    m_proxy_mode = false;
+    m_post_buf = wxEmptyString;
+    m_http_response = 0;
 
-  SetNotify(wxSOCKET_LOST_FLAG);
+    SetNotify(wxSOCKET_LOST_FLAG);
 }
 
 wxHTTP::~wxHTTP()
@@ -63,17 +63,22 @@ wxHTTP::~wxHTTP()
 
 void wxHTTP::ClearHeaders()
 {
-  m_headers.clear();
+    m_headers.clear();
 }
 
-wxString wxHTTP::GetContentType()
+void wxHTTP::ClearCookies()
 {
-  return GetHeader(wxT("Content-Type"));
+    m_cookies.clear();
+}
+
+wxString wxHTTP::GetContentType() const
+{
+    return GetHeader(wxT("Content-Type"));
 }
 
 void wxHTTP::SetProxyMode(bool on)
 {
-  m_proxy_mode = on;
+    m_proxy_mode = on;
 }
 
 wxHTTP::wxHeaderIterator wxHTTP::FindHeader(const wxString& header)
@@ -81,7 +86,7 @@ wxHTTP::wxHeaderIterator wxHTTP::FindHeader(const wxString& header)
     wxHeaderIterator it = m_headers.begin();
     for ( wxHeaderIterator en = m_headers.end(); it != en; ++it )
     {
-        if ( wxStricmp(it->first, header) == 0 )
+        if ( header.CmpNoCase(it->first) == 0 )
             break;
     }
 
@@ -93,7 +98,31 @@ wxHTTP::wxHeaderConstIterator wxHTTP::FindHeader(const wxString& header) const
     wxHeaderConstIterator it = m_headers.begin();
     for ( wxHeaderConstIterator en = m_headers.end(); it != en; ++it )
     {
-        if ( wxStricmp(it->first, header) == 0 )
+        if ( header.CmpNoCase(it->first) == 0 )
+            break;
+    }
+
+    return it;
+}
+
+wxHTTP::wxCookieIterator wxHTTP::FindCookie(const wxString& cookie)
+{
+    wxCookieIterator it = m_cookies.begin();
+    for ( wxCookieIterator en = m_cookies.end(); it != en; ++it )
+    {
+        if ( cookie.CmpNoCase(it->first) == 0 )
+            break;
+    }
+
+    return it;
+}
+
+wxHTTP::wxCookieConstIterator wxHTTP::FindCookie(const wxString& cookie) const
+{
+    wxCookieConstIterator it = m_cookies.begin();
+    for ( wxCookieConstIterator en = m_cookies.end(); it != en; ++it )
+    {
+        if ( cookie.CmpNoCase(it->first) == 0 )
             break;
     }
 
@@ -102,16 +131,16 @@ wxHTTP::wxHeaderConstIterator wxHTTP::FindHeader(const wxString& header) const
 
 void wxHTTP::SetHeader(const wxString& header, const wxString& h_data)
 {
-  if (m_read) {
-    ClearHeaders();
-    m_read = false;
-  }
+    if (m_read) {
+        ClearHeaders();
+        m_read = false;
+    }
 
-  wxHeaderIterator it = FindHeader(header);
-  if (it != m_headers.end())
-    it->second = h_data;
-  else
-    m_headers[header] = h_data;
+    wxHeaderIterator it = FindHeader(header);
+    if (it != m_headers.end())
+        it->second = h_data;
+    else
+        m_headers[header] = h_data;
 }
 
 wxString wxHTTP::GetHeader(const wxString& header) const
@@ -121,6 +150,47 @@ wxString wxHTTP::GetHeader(const wxString& header) const
     return it == m_headers.end() ? wxGetEmptyString() : it->second;
 }
 
+wxString wxHTTP::GetCookie(const wxString& cookie) const
+{
+    wxCookieConstIterator it = FindCookie(cookie);
+
+    return it == m_cookies.end() ? wxGetEmptyString() : it->second;
+}
+
+wxString wxHTTP::GenerateAuthString(const wxString& user, const wxString& pass) const
+{
+    // TODO: Use wxBase64Encode() now that we have it instead of reproducing it
+
+    static const char *base64 = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
+
+    wxString buf;
+    wxString toencode;
+
+    buf.Printf(wxT("Basic "));
+
+    toencode.Printf(wxT("%s:%s"),user.c_str(),pass.c_str());
+
+    size_t len = toencode.length();
+    const wxChar *from = toencode.c_str();
+    while (len >= 3) { // encode full blocks first
+        buf << wxString::Format(wxT("%c%c"), base64[(from[0] >> 2) & 0x3f], base64[((from[0] << 4) & 0x30) | ((from[1] >> 4) & 0xf)]);
+        buf << wxString::Format(wxT("%c%c"), base64[((from[1] << 2) & 0x3c) | ((from[2] >> 6) & 0x3)], base64[from[2] & 0x3f]);
+        from += 3;
+        len -= 3;
+    }
+    if (len > 0) { // pad the remaining characters
+        buf << wxString::Format(wxT("%c"), base64[(from[0] >> 2) & 0x3f]);
+        if (len == 1) {
+            buf << wxString::Format(wxT("%c="), base64[(from[0] << 4) & 0x30]);
+        } else {
+            buf << wxString::Format(wxT("%c%c"), base64[((from[0] << 4) & 0x30) | ((from[1] >> 4) & 0xf)], base64[(from[1] << 2) & 0x3c]);
+        }
+        buf << wxT("=");
+    }
+
+    return buf;
+}
+
 void wxHTTP::SetPostBuffer(const wxString& post_buf)
 {
     m_post_buf = post_buf;
@@ -128,200 +198,249 @@ void wxHTTP::SetPostBuffer(const wxString& post_buf)
 
 void wxHTTP::SendHeaders()
 {
-  typedef wxStringToStringHashMap::iterator iterator;
-  wxString buf;
+    typedef wxStringToStringHashMap::iterator iterator;
+    wxString buf;
 
-  for (iterator it = m_headers.begin(), en = m_headers.end(); it != en; ++it )
-  {
-    buf.Printf(wxT("%s: %s\r\n"), it->first.c_str(), it->second.c_str());
+    for (iterator it = m_headers.begin(), en = m_headers.end(); it != en; ++it )
+    {
+        buf.Printf(wxT("%s: %s\r\n"), it->first.c_str(), it->second.c_str());
 
-    const wxWX2MBbuf cbuf = buf.mb_str();
-    Write(cbuf, strlen(cbuf));
-  }
+        const wxWX2MBbuf cbuf = buf.mb_str();
+        Write(cbuf, strlen(cbuf));
+    }
 }
 
 bool wxHTTP::ParseHeaders()
 {
-  wxString line;
-  wxStringTokenizer tokenzr;
+    wxString line;
+    wxStringTokenizer tokenzr;
 
-  ClearHeaders();
-  m_read = true;
+    ClearHeaders();
+    ClearCookies();
+    m_read = true;
 
-#if defined(__VISAGECPP__)
-// VA just can't stand while(1)
-    bool bOs2var = true;
-    while(bOs2var)
-#else
-  while (1)
-#endif
-  {
-    m_perr = GetLine(this, line);
-    if (m_perr != wxPROTO_NOERR)
-      return false;
-
-    if (line.Length() == 0)
-      break;
-
-    wxString left_str = line.BeforeFirst(':');
-    m_headers[left_str] = line.AfterFirst(':').Strip(wxString::both);
-  }
-  return true;
+    for ( ;; )
+    {
+        m_lastError = ReadLine(this, line);
+        if (m_lastError != wxPROTO_NOERR)
+            return false;
+
+        if ( line.empty() )
+            break;
+
+        wxString left_str = line.BeforeFirst(':');
+        if(!left_str.CmpNoCase("Set-Cookie"))
+        {
+            wxString cookieName = line.AfterFirst(':').Strip(wxString::both).BeforeFirst('=');
+            wxString cookieValue = line.AfterFirst(':').Strip(wxString::both).AfterFirst('=').BeforeFirst(';');
+            m_cookies[cookieName] = cookieValue;
+
+            // For compatibility
+            m_headers[left_str] = line.AfterFirst(':').Strip(wxString::both);
+        }
+        else
+        {
+            m_headers[left_str] = line.AfterFirst(':').Strip(wxString::both);
+        }
+    }
+    return true;
 }
 
 bool wxHTTP::Connect(const wxString& host, unsigned short port)
 {
-  wxIPV4address *addr;
+    wxIPV4address *addr;
 
-  if (m_addr) {
-    delete m_addr;
-    m_addr = NULL;
-    Close();
-  }
+    if (m_addr) {
+        wxDELETE(m_addr);
+        Close();
+    }
 
-  m_addr = addr = new wxIPV4address();
+    m_addr = addr = new wxIPV4address();
 
-  if (!addr->Hostname(host)) {
-    delete m_addr;
-    m_addr = NULL;
-    m_perr = wxPROTO_NETERR;
-    return false;
-  }
+    if (!addr->Hostname(host)) {
+        wxDELETE(m_addr);
+        m_lastError = wxPROTO_NETERR;
+        return false;
+    }
 
-  if ( port ) addr->Service(port);
-  else if (!addr->Service(wxT("http")))
-    addr->Service(80);
+    if ( port )
+        addr->Service(port);
+    else if (!addr->Service(wxT("http")))
+        addr->Service(80);
 
-  SetHeader(wxT("Host"), host);
+    wxString hostHdr = host;
+    if ( port && port != 80 )
+        hostHdr << wxT(":") << port;
+    SetHeader(wxT("Host"), hostHdr);
 
-  return true;
+    m_lastError = wxPROTO_NOERR;
+    return true;
 }
 
-bool wxHTTP::Connect(wxSockAddress& addr, bool WXUNUSED(wait))
+bool wxHTTP::Connect(const wxSockAddress& addr, bool WXUNUSED(wait))
 {
-  if (m_addr) {
-    delete m_addr;
-    Close();
-  }
+    if (m_addr) {
+        delete m_addr;
+        Close();
+    }
 
-  m_addr = addr.Clone();
+    m_addr = addr.Clone();
 
-  wxIPV4address *ipv4addr = wxDynamicCast(&addr, wxIPV4address);
-  if (ipv4addr)
-      SetHeader(wxT("Host"), ipv4addr->OrigHostname());
+    wxIPV4address *ipv4addr = wxDynamicCast(&addr, wxIPV4address);
+    if ( ipv4addr )
+    {
+        wxString hostHdr = ipv4addr->OrigHostname();
+        unsigned short port = ipv4addr->Service();
+        if ( port && port != 80 )
+            hostHdr << wxT(":") << port;
+        SetHeader(wxT("Host"), hostHdr);
+    }
 
-  return true;
+    m_lastError = wxPROTO_NOERR;
+    return true;
 }
 
 bool wxHTTP::BuildRequest(const wxString& path, wxHTTP_Req req)
 {
-  const wxChar *request;
-
-  switch (req) {
-  case wxHTTP_GET:
-    request = wxT("GET");
-    break;
-  case wxHTTP_POST:
-    request = wxT("POST");
-    if ( GetHeader( wxT("Content-Length") ).IsNull() )
-      SetHeader( wxT("Content-Length"), wxString::Format( wxT("%lu"), (unsigned long)m_post_buf.Len() ) );
-    break;
-  default:
-    return false;
-  }
-
-  m_http_response = 0;
-
-  // If there is no User-Agent defined, define it.
-  if (GetHeader(wxT("User-Agent")).IsNull())
-    SetHeader(wxT("User-Agent"), wxT("wxWidgets 2.x"));
-
-  SaveState();
-
-  // we may use non blocking sockets only if we can dispatch events from them
-  SetFlags( wxIsMainThread() && (wxTheApp && wxTheApp->IsMainLoopRunning())
-                ? wxSOCKET_NONE
-                : wxSOCKET_BLOCK );
-  Notify(false);
-
-  wxString buf;
-  buf.Printf(wxT("%s %s HTTP/1.0\r\n"), request, path.c_str());
-  const wxWX2MBbuf pathbuf = wxConvLocal.cWX2MB(buf);
-  Write(pathbuf, strlen(wxMBSTRINGCAST pathbuf));
-  SendHeaders();
-  Write("\r\n", 2);
-
-  if ( req == wxHTTP_POST ) {
-    Write(m_post_buf.mbc_str(), m_post_buf.Len());
-    m_post_buf = wxEmptyString;
-  }
+    const wxChar *request;
 
-  wxString tmp_str;
-  m_perr = GetLine(this, tmp_str);
-  if (m_perr != wxPROTO_NOERR) {
-    RestoreState();
-    return false;
-  }
-
-  if (!tmp_str.Contains(wxT("HTTP/"))) {
-    // TODO: support HTTP v0.9 which can have no header.
-    // FIXME: tmp_str is not put back in the in-queue of the socket.
-    SetHeader(wxT("Content-Length"), wxT("-1"));
-    SetHeader(wxT("Content-Type"), wxT("none/none"));
-    RestoreState();
-    return true;
-  }
-
-  wxStringTokenizer token(tmp_str,wxT(' '));
-  wxString tmp_str2;
-  bool ret_value;
-
-  token.NextToken();
-  tmp_str2 = token.NextToken();
-
-  m_http_response = wxAtoi(tmp_str2);
-
-  switch (tmp_str2[0u]) {
-  case wxT('1'):
-    /* INFORMATION / SUCCESS */
-    break;
-  case wxT('2'):
-    /* SUCCESS */
-    break;
-  case wxT('3'):
-    /* REDIRECTION */
-    break;
-  default:
-    m_perr = wxPROTO_NOFILE;
+    switch (req)
+    {
+        case wxHTTP_GET:
+            request = wxT("GET");
+            break;
+
+        case wxHTTP_POST:
+            request = wxT("POST");
+            if ( GetHeader( wxT("Content-Length") ).empty() )
+                SetHeader( wxT("Content-Length"), wxString::Format( wxT("%lu"), (unsigned long)m_post_buf.Len() ) );
+            break;
+
+        default:
+            return false;
+    }
+
+    m_http_response = 0;
+
+    // If there is no User-Agent defined, define it.
+    if ( GetHeader(wxT("User-Agent")).empty() )
+        SetHeader(wxT("User-Agent"), wxT("wxWidgets 2.x"));
+
+    // Send authentication information
+    if (!m_username.empty() || !m_password.empty()) {
+        SetHeader(wxT("Authorization"), GenerateAuthString(m_username, m_password));
+    }
+
+    SaveState();
+
+    // we may use non blocking sockets only if we can dispatch events from them
+    SetFlags( wxIsMainThread() && wxApp::IsMainLoopRunning() ? wxSOCKET_NONE
+                                                             : wxSOCKET_BLOCK );
+    Notify(false);
+
+    wxString buf;
+    buf.Printf(wxT("%s %s HTTP/1.0\r\n"), request, path.c_str());
+    const wxWX2MBbuf pathbuf = buf.mb_str();
+    Write(pathbuf, strlen(pathbuf));
+    SendHeaders();
+    Write("\r\n", 2);
+
+    if ( req == wxHTTP_POST ) {
+        // Post data can be arbitrary binary data when the "binary" content
+        // transfer encoding is used so don't assume it's ASCII only or
+        // NUL-terminated.
+        {
+            const wxScopedCharBuffer buf(m_post_buf.To8BitData());
+            Write(buf, buf.length());
+        } // delete the buffer before modifying the string it points to, it
+          // wouldn't really be a problem here even if we didn't do this
+          // because we won't use this buffer again but this will avoid any
+          // nasty surprises in the future if this code changes
+
+        m_post_buf = wxEmptyString;
+    }
+
+    wxString tmp_str;
+    m_lastError = ReadLine(this, tmp_str);
+    if (m_lastError != wxPROTO_NOERR) {
+        RestoreState();
+        return false;
+    }
+
+    if (!tmp_str.Contains(wxT("HTTP/"))) {
+        // TODO: support HTTP v0.9 which can have no header.
+        // FIXME: tmp_str is not put back in the in-queue of the socket.
+        m_lastError = wxPROTO_NOERR;
+        SetHeader(wxT("Content-Length"), wxT("-1"));
+        SetHeader(wxT("Content-Type"), wxT("none/none"));
+        RestoreState();
+        return true;
+    }
+
+    wxStringTokenizer token(tmp_str,wxT(' '));
+    wxString tmp_str2;
+    bool ret_value;
+
+    token.NextToken();
+    tmp_str2 = token.NextToken();
+
+    m_http_response = wxAtoi(tmp_str2);
+
+    switch ( tmp_str2[0u].GetValue() )
+    {
+        case wxT('1'):
+            /* INFORMATION / SUCCESS */
+            break;
+
+        case wxT('2'):
+            /* SUCCESS */
+            break;
+
+        case wxT('3'):
+            /* REDIRECTION */
+            break;
+
+        default:
+            m_lastError = wxPROTO_NOFILE;
+            RestoreState();
+            return false;
+    }
+
+    m_lastError = wxPROTO_NOERR;
+    ret_value = ParseHeaders();
     RestoreState();
-    return false;
-  }
+    return ret_value;
+}
 
-  ret_value = ParseHeaders();
-  RestoreState();
-  return ret_value;
+bool wxHTTP::Abort(void)
+{
+    return wxSocketClient::Close();
 }
 
+// ----------------------------------------------------------------------------
+// wxHTTPStream and wxHTTP::GetInputStream
+// ----------------------------------------------------------------------------
+
 class wxHTTPStream : public wxSocketInputStream
 {
 public:
-  wxHTTP *m_http;
-  size_t m_httpsize;
-  unsigned long m_read_bytes;
+    wxHTTP *m_http;
+    size_t m_httpsize;
+    unsigned long m_read_bytes;
 
-  wxHTTPStream(wxHTTP *http) : wxSocketInputStream(*http), m_http(http) {}
-  size_t GetSize() const { return m_httpsize; }
-  virtual ~wxHTTPStream(void) { m_http->Abort(); }
+    wxHTTPStream(wxHTTP *http) : wxSocketInputStream(*http), m_http(http) {}
+    size_t GetSize() const { return m_httpsize; }
+    virtual ~wxHTTPStream(void) { m_http->Abort(); }
 
 protected:
-  size_t OnSysRead(void *buffer, size_t bufsize);
+    size_t OnSysRead(void *buffer, size_t bufsize);
 
-    DECLARE_NO_COPY_CLASS(wxHTTPStream)
+    wxDECLARE_NO_COPY_CLASS(wxHTTPStream);
 };
 
 size_t wxHTTPStream::OnSysRead(void *buffer, size_t bufsize)
 {
-    if (m_httpsize > 0 && m_read_bytes >= m_httpsize)
+    if (m_read_bytes >= m_httpsize)
     {
         m_lasterror = wxSTREAM_EOF;
         return 0;
@@ -330,53 +449,58 @@ size_t wxHTTPStream::OnSysRead(void *buffer, size_t bufsize)
     size_t ret = wxSocketInputStream::OnSysRead(buffer, bufsize);
     m_read_bytes += ret;
 
-    return ret;
-}
+    if (m_httpsize==(size_t)-1 && m_lasterror == wxSTREAM_READ_ERROR )
+    {
+        // if m_httpsize is (size_t) -1 this means read until connection closed
+        // which is equivalent to getting a READ_ERROR, for clients however this
+        // must be translated into EOF, as it is the expected way of signalling
+        // end end of the content
+        m_lasterror = wxSTREAM_EOF;
+    }
 
-bool wxHTTP::Abort(void)
-{
-  return wxSocketClient::Close();
+    return ret;
 }
 
 wxInputStream *wxHTTP::GetInputStream(const wxString& path)
 {
-  wxHTTPStream *inp_stream;
+    wxHTTPStream *inp_stream;
 
-  wxString new_path;
+    wxString new_path;
 
-  m_perr = wxPROTO_CONNERR;
-  if (!m_addr)
-    return NULL;
+    m_lastError = wxPROTO_CONNERR;  // all following returns share this type of error
+    if (!m_addr)
+        return NULL;
 
-  // We set m_connected back to false so wxSocketBase will know what to do.
+    // We set m_connected back to false so wxSocketBase will know what to do.
 #ifdef __WXMAC__
-        wxSocketClient::Connect(*m_addr , false );
-        wxSocketClient::WaitOnConnect(10);
+    wxSocketClient::Connect(*m_addr , false );
+    wxSocketClient::WaitOnConnect(10);
 
     if (!wxSocketClient::IsConnected())
         return NULL;
 #else
-  if (!wxProtocol::Connect(*m_addr))
-    return NULL;
+    if (!wxProtocol::Connect(*m_addr))
+        return NULL;
 #endif
 
-  if (!BuildRequest(path, m_post_buf.IsEmpty() ? wxHTTP_GET : wxHTTP_POST))
-    return NULL;
+    if (!BuildRequest(path, m_post_buf.empty() ? wxHTTP_GET : wxHTTP_POST))
+        return NULL;
 
-  inp_stream = new wxHTTPStream(this);
+    inp_stream = new wxHTTPStream(this);
 
-  if (!GetHeader(wxT("Content-Length")).IsEmpty())
-    inp_stream->m_httpsize = wxAtoi(WXSTRINGCAST GetHeader(wxT("Content-Length")));
-  else
-    inp_stream->m_httpsize = (size_t)-1;
+    if (!GetHeader(wxT("Content-Length")).empty())
+        inp_stream->m_httpsize = wxAtoi(GetHeader(wxT("Content-Length")));
+    else
+        inp_stream->m_httpsize = (size_t)-1;
 
-  inp_stream->m_read_bytes = 0;
+    inp_stream->m_read_bytes = 0;
 
-  Notify(false);
-  SetFlags(wxSOCKET_BLOCK | wxSOCKET_WAITALL);
+    Notify(false);
+    SetFlags(wxSOCKET_BLOCK | wxSOCKET_WAITALL);
 
-  return inp_stream;
+    // no error; reset m_lastError
+    m_lastError = wxPROTO_NOERR;
+    return inp_stream;
 }
 
 #endif // wxUSE_PROTOCOL_HTTP
-