fixing focus handling for generic controls in carbon-cfm

[wxWidgets.git] / src / common / http.cpp

diff --git a/src/common/http.cpp b/src/common/http.cpp
index c23a40089462d669dab29648a3e78c252accda13..fcab146c82aa4f0d10cc77ad03ed59c72d287ce9 100644 (file)
--- a/src/common/http.cpp
+++ b/src/common/http.cpp
@@ -6,252 +6,387 @@
 // Created:     August 1997
 // RCS-ID:      $Id$
 // Copyright:   (c) 1997, 1998 Guilhem Lavaux
 // Created:     August 1997
 // RCS-ID:      $Id$
 // Copyright:   (c) 1997, 1998 Guilhem Lavaux

-// Licence:     wxWindows license
+// Licence:     wxWindows licence

 /////////////////////////////////////////////////////////////////////////////
 
 /////////////////////////////////////////////////////////////////////////////
 

-#ifdef __GNUG__
-#pragma implementation "http.h"
-#endif
-

 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__

-#pragma hdrstop
+  #pragma hdrstop

 #endif
 
 #endif
 

-#ifndef WX_PRECOMP
-#endif
+#if wxUSE_PROTOCOL_HTTP

 
 #include <stdio.h>
 #include <stdlib.h>
 
 #include <stdio.h>
 #include <stdlib.h>

+
+#ifndef WX_PRECOMP

 #include "wx/string.h"
 #include "wx/string.h"

+#include "wx/app.h"
+#endif
+

 #include "wx/tokenzr.h"
 #include "wx/socket.h"
 #include "wx/protocol/protocol.h"
 #include "wx/tokenzr.h"
 #include "wx/socket.h"
 #include "wx/protocol/protocol.h"

+#include "wx/url.h"

 #include "wx/protocol/http.h"
 #include "wx/sckstrm.h"
 
 #include "wx/protocol/http.h"
 #include "wx/sckstrm.h"
 

-#if !USE_SHARED_LIBRARY

 IMPLEMENT_DYNAMIC_CLASS(wxHTTP, wxProtocol)
 IMPLEMENT_DYNAMIC_CLASS(wxHTTP, wxProtocol)

-IMPLEMENT_PROTOCOL(wxHTTP, "http", "80", TRUE)
-#endif
-
-#define HTTP_BSIZE 2048
+IMPLEMENT_PROTOCOL(wxHTTP, wxT("http"), wxT("80"), true)

 
 wxHTTP::wxHTTP()
 
 wxHTTP::wxHTTP()

-  : wxProtocol(),
-    m_headers(wxKEY_STRING)
+  : wxProtocol()

 {
 {

-  m_addr = NULL;
-  m_read = FALSE;
+    m_addr = NULL;
+    m_read = false;
+    m_proxy_mode = false;
+    m_post_buf = wxEmptyString;
+    m_http_response = 0;

 
 

-  SetNotify(REQ_LOST);
+    SetNotify(wxSOCKET_LOST_FLAG);

 }
 
 wxHTTP::~wxHTTP()
 {
 }
 
 wxHTTP::~wxHTTP()
 {

-  // wxString isn't a wxObject
-  wxNode *node = m_headers.First();
-  wxString *string;
-
-  while (node) {
-    string = (wxString *)node->Data();
-    delete string;
-    node = node->Next();
-  }
+    ClearHeaders();
+
+    delete m_addr;

 }
 
 }
 

-wxString wxHTTP::GetContentType()
+void wxHTTP::ClearHeaders()

 {
 {

-  return GetHeader("Content-Type");
+  m_headers.clear();

 }
 
 }
 

-void wxHTTP::SetHeader(const wxString& header, const wxString& h_data)
+wxString wxHTTP::GetContentType()

 {
 {

-  if (m_read) {
-    m_headers.Clear();
-    m_read = FALSE;
-  }
-
-  wxNode *node = m_headers.Find(header);
-
-  if (!node)
-    m_headers.Append(header, (wxObject *)(new wxString(h_data)));
-  else {
-    wxString *str = (wxString *)node->Data();
-    (*str) = h_data;
-  }
+    return GetHeader(wxT("Content-Type"));

 }
 
 }
 

-wxString wxHTTP::GetHeader(const wxString& header)
+void wxHTTP::SetProxyMode(bool on)

 {
 {

-  wxNode *node = m_headers.Find(header);
-  if (!node)
-    return (char *)NULL;
-
-  return *((wxString *)node->Data());
+    m_proxy_mode = on;

 }
 
 }
 

-void wxHTTP::SendHeaders()
+wxHTTP::wxHeaderIterator wxHTTP::FindHeader(const wxString& header)

 {
 {

-  wxNode *head = m_headers.First();
-
-  while (head) {
-    wxString *str = (wxString *)head->Data();
-    char buf[100];
-
-    sprintf(buf, "%s: %s\n\r", head->GetKeyString()/*key.string*/, str->GetData());
-    Write(buf, strlen(buf));
-
-    head = head->Next();
-  }
+    wxHeaderIterator it = m_headers.begin();
+    for ( wxHeaderIterator en = m_headers.end(); it != en; ++it )
+    {
+        if ( wxStricmp(it->first, header) == 0 )
+            break;
+    }
+
+    return it;

 }
 
 }
 

-bool wxHTTP::ParseHeaders()
+wxHTTP::wxHeaderConstIterator wxHTTP::FindHeader(const wxString& header) const

 {
 {

-  wxString line;
+    wxHeaderConstIterator it = m_headers.begin();
+    for ( wxHeaderConstIterator en = m_headers.end(); it != en; ++it )
+    {
+        if ( wxStricmp(it->first, header) == 0 )
+            break;
+    }
+
+    return it;
+}

 
 

-  m_headers.Clear();
-  m_read = TRUE;
+void wxHTTP::SetHeader(const wxString& header, const wxString& h_data)
+{
+    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;
+}

 
 

-  while (1) {
-    m_error = GetLine(this, line);
-    if (m_error != wxPROTO_NOERR)
-      return FALSE;
+wxString wxHTTP::GetHeader(const wxString& header) const
+{
+    wxHeaderConstIterator it = FindHeader(header);

 
 

-    if (line.Length() == 0)
-      break;
+    return it == m_headers.end() ? wxGetEmptyString() : it->second;
+}

 
 

-    int pos = line.Find(':');
-    if (pos == -1)
-      return FALSE;
+void wxHTTP::SetPostBuffer(const wxString& post_buf)
+{
+    m_post_buf = post_buf;
+}

 
 

-    wxString left_str = line(0, pos);
-    wxString right_str = line(pos+1, line.Length());
+void wxHTTP::SendHeaders()
+{
+    typedef wxStringToStringHashMap::iterator iterator;
+    wxString buf;

 
 

-    right_str = right_str.Strip(wxString::leading);
+    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());

 
 

-    wxString *str = new wxString(right_str);
+        const wxWX2MBbuf cbuf = buf.mb_str();
+        Write(cbuf, strlen(cbuf));
+    }
+}

 
 

-    m_headers.Append(left_str, (wxObject *) str);
-  }
-  return TRUE;
+bool wxHTTP::ParseHeaders()
+{
+    wxString line;
+    wxStringTokenizer tokenzr;
+
+    ClearHeaders();
+    m_read = true;
+
+#if defined(__VISAGECPP__)
+// VA just can't stand while(1)
+    bool bOs2var = true;
+    while(bOs2var)
+#else
+    while (1)
+#endif
+    {
+        m_perr = ReadLine(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;

 }
 
 }
 

-bool wxHTTP::Connect(const wxString& host)
+bool wxHTTP::Connect(const wxString& host, unsigned short port)

 {
 {

-  wxIPV4address *addr;
+    wxIPV4address *addr;

 
 

-  if (m_connected) {
-    delete m_addr;
-    m_addr = NULL;
-    Close();
-  }
+    if (m_addr) {
+        delete m_addr;
+        m_addr = NULL;
+        Close();
+    }

 
 

-  m_addr = addr = new wxIPV4address();
+    m_addr = addr = new wxIPV4address();

 
 

-  if (!addr->Hostname(host)) {
-    delete m_addr;
-    m_addr = NULL;
-    m_error = wxPROTO_NETERR;
-    return FALSE;
-  }
+    if (!addr->Hostname(host)) {
+        delete m_addr;
+        m_addr = NULL;
+        m_perr = wxPROTO_NETERR;
+        return false;
+    }

 
 

-  if (!addr->Service("http"))
-    addr->Service(80);
+    if ( port )
+        addr->Service(port);
+    else if (!addr->Service(wxT("http")))
+        addr->Service(80);

 
 

-  return TRUE;
+    SetHeader(wxT("Host"), host);
+
+    return true;

 }
 
 }
 

-bool wxHTTP::Connect(wxSockAddress& addr)
+bool wxHTTP::Connect(wxSockAddress& addr, bool WXUNUSED(wait))

 {
 {

-  struct sockaddr *raw_addr;
-  size_t len;
+    if (m_addr) {
+        delete m_addr;
+        Close();
+    }

 
 

-  m_addr = (wxSockAddress *)(addr.GetClassInfo()->CreateObject());
+    m_addr = addr.Clone();

 
 

-  addr.Build(raw_addr, len);
-  m_addr->Disassemble(raw_addr, len);
+    wxIPV4address *ipv4addr = wxDynamicCast(&addr, wxIPV4address);
+    if (ipv4addr)
+        SetHeader(wxT("Host"), ipv4addr->OrigHostname());

 
 

-  return TRUE;
+    return true;

 }
 
 bool wxHTTP::BuildRequest(const wxString& path, wxHTTP_Req req)
 {
 }
 
 bool wxHTTP::BuildRequest(const wxString& path, wxHTTP_Req req)
 {

-  char *tmp_buf;
-  char buf[HTTP_BSIZE];
-
-  switch (req) {
-  case wxHTTP_GET:
-    tmp_buf = "GET";
-    break;
-  default:
-    return FALSE;
-  }
-
-  sprintf(buf, "%s %s HTTP/1.0\n\r", tmp_buf, (const char *)path);
-  Write(buf, strlen(buf));
-  SendHeaders();
-  sprintf(buf, "\n\r");
-  Write(buf, strlen(buf));
-
-  wxString tmp_str;
-
-  m_error = GetLine(this, tmp_str);
-  if (m_error != wxPROTO_NOERR)
-    return FALSE;
-
-  if (!tmp_str.Contains("HTTP/")) {
-    // TODO: support HTTP v0.9 which can have no header.
-    SetHeader("Content-Length", "-1");
-    SetHeader("Content-Type", "none/none");
-    return TRUE;
-  }
-
-  wxStringTokenizer token(tmp_str,' ');
-  wxString tmp_str2;
-
-  token.NextToken();
-  tmp_str2 = token.NextToken();
-
-  switch (atoi(tmp_str2)) {
-  case 200:
-    break;
-  default:
-    m_error = wxPROTO_NOFILE;
-    return FALSE;
-  }
-
-  return ParseHeaders();
+    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() && 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 = 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;
+    }
+
+    wxString tmp_str;
+    m_perr = ReadLine(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;
+            RestoreState();
+            return false;
+    }
+
+    ret_value = ParseHeaders();
+    RestoreState();
+    return ret_value;

 }
 
 }
 

-class wxHTTPStream : public wxSocketInputStream {
+class wxHTTPStream : public wxSocketInputStream
+{

 public:
 public:

-  wxHTTP *m_http;
-  wxHTTPStream(wxHTTP *http) : wxSocketInputStream(*http), m_http(http) {}
-  virtual ~wxHTTPStream(void) { m_http->Abort(); }
+    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(); }
+
+protected:
+    size_t OnSysRead(void *buffer, size_t bufsize);
+
+    DECLARE_NO_COPY_CLASS(wxHTTPStream)

 };
 
 };
 

+size_t wxHTTPStream::OnSysRead(void *buffer, size_t bufsize)
+{
+    if (m_httpsize > 0 && m_read_bytes >= m_httpsize)
+    {
+        m_lasterror = wxSTREAM_EOF;
+        return 0;
+    }
+
+    size_t ret = wxSocketInputStream::OnSysRead(buffer, bufsize);
+    m_read_bytes += 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 ;
+    }
+
+    return ret;
+}
+

 bool wxHTTP::Abort(void)
 {
 bool wxHTTP::Abort(void)
 {

-  return wxSocketClient::Close();
+    return wxSocketClient::Close();

 }
 
 wxInputStream *wxHTTP::GetInputStream(const wxString& path)
 {
 }
 
 wxInputStream *wxHTTP::GetInputStream(const wxString& path)
 {

-  wxHTTPStream *inp_stream = new wxHTTPStream(this);
+    wxHTTPStream *inp_stream;
+
+    wxString new_path;
+
+    m_perr = wxPROTO_CONNERR;
+    if (!m_addr)
+        return NULL;

 
 

-  if (!m_addr || m_connected) {
-    m_error = wxPROTO_CONNERR;
-    return NULL;
-  }
+    // We set m_connected back to false so wxSocketBase will know what to do.
+#ifdef __WXMAC__
+    wxSocketClient::Connect(*m_addr , false );
+    wxSocketClient::WaitOnConnect(10);

 
 

-  if (!wxProtocol::Connect(*m_addr))
-    return NULL;
+    if (!wxSocketClient::IsConnected())
+        return NULL;
+#else
+    if (!wxProtocol::Connect(*m_addr))
+        return NULL;
+#endif
+
+    if (!BuildRequest(path, m_post_buf.empty() ? wxHTTP_GET : wxHTTP_POST))
+        return NULL;
+
+    inp_stream = new wxHTTPStream(this);
+
+    if (!GetHeader(wxT("Content-Length")).empty())
+        inp_stream->m_httpsize = wxAtoi(WXSTRINGCAST GetHeader(wxT("Content-Length")));
+    else
+        inp_stream->m_httpsize = (size_t)-1;

 
 

-  if (!BuildRequest(path, wxHTTP_GET))
-    return NULL;
+    inp_stream->m_read_bytes = 0;

 
 

-  return inp_stream;
+    Notify(false);
+    SetFlags(wxSOCKET_BLOCK | wxSOCKET_WAITALL);
+
+    return inp_stream;

 }
 }

+
+#endif // wxUSE_PROTOCOL_HTTP
+