was missing in xti merge

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

diff --git a/src/common/url.cpp b/src/common/url.cpp
index fc8187bd3c7091a25b015782d95273a51a116c61..c0fb31cac2b8d7042f6ce8236cedeca290007b3c 100644 (file)
--- a/src/common/url.cpp
+++ b/src/common/url.cpp
@@ -1,5 +1,5 @@
 /////////////////////////////////////////////////////////////////////////////
 /////////////////////////////////////////////////////////////////////////////

-// Name:        url.cpp
+// Name:        src/common/url.cpp

 // Purpose:     URL parser
 // Author:      Guilhem Lavaux
 // Modified by:
 // Purpose:     URL parser
 // Author:      Guilhem Lavaux
 // Modified by:


@@ -9,29 +9,27 @@
 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 

-#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
-#pragma implementation "url.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
 
 #if wxUSE_URL
 
 #endif
 
 #if wxUSE_URL
 

-#include "wx/string.h"
-#include "wx/list.h"
-#include "wx/utils.h"
-#include "wx/module.h"

 #include "wx/url.h"
 
 #include "wx/url.h"
 

+#ifndef WX_PRECOMP
+    #include "wx/list.h"
+    #include "wx/string.h"
+    #include "wx/utils.h"
+    #include "wx/module.h"
+#endif
+

 #include <string.h>
 #include <ctype.h>
 
 #include <string.h>
 #include <ctype.h>
 

-IMPLEMENT_CLASS(wxProtoInfo, wxObject)

 IMPLEMENT_CLASS(wxURL, wxURI)
 
 // Protocols list
 IMPLEMENT_CLASS(wxURL, wxURI)
 
 // Protocols list


@@ -40,14 +38,17 @@ wxProtoInfo *wxURL::ms_protocols = NULL;
 // Enforce linking of protocol classes:
 USE_PROTOCOL(wxFileProto)
 
 // Enforce linking of protocol classes:
 USE_PROTOCOL(wxFileProto)
 

-#if wxUSE_SOCKETS
+#if wxUSE_PROTOCOL_HTTP

 USE_PROTOCOL(wxHTTP)
 USE_PROTOCOL(wxHTTP)

-USE_PROTOCOL(wxFTP)

 
     wxHTTP *wxURL::ms_proxyDefault = NULL;
     bool wxURL::ms_useDefaultProxy = false;
 #endif
 
 
     wxHTTP *wxURL::ms_proxyDefault = NULL;
     bool wxURL::ms_useDefaultProxy = false;
 #endif
 

+#if wxUSE_PROTOCOL_FTP
+USE_PROTOCOL(wxFTP)
+#endif
+

 // --------------------------------------------------------------
 //
 //                          wxURL
 // --------------------------------------------------------------
 //
 //                          wxURL


@@ -64,9 +65,15 @@ wxURL::wxURL(const wxString& url) : wxURI(url)
     ParseURL();
 }
 
     ParseURL();
 }
 

-wxURL::wxURL(const wxURI& url) : wxURI(url)
+wxURL::wxURL(const wxURI& uri) : wxURI(uri)

 {
 {

-    Init(url.BuildURI());
+    Init(uri.BuildURI());
+    ParseURL();
+}
+
+wxURL::wxURL(const wxURL& url) : wxURI(url)
+{
+    Init(url.GetURL());

     ParseURL();
 }
 
     ParseURL();
 }
 


@@ -79,7 +86,7 @@ void wxURL::Init(const wxString& url)
     m_nativeImp = CreateNativeImpObject();
 #endif
 
     m_nativeImp = CreateNativeImpObject();
 #endif
 

-#if wxUSE_SOCKETS
+#if wxUSE_PROTOCOL_HTTP

     if ( ms_useDefaultProxy && !ms_proxyDefault )
     {
         SetDefaultProxy( wxGetenv(wxT("HTTP_PROXY")) );
     if ( ms_useDefaultProxy && !ms_proxyDefault )
     {
         SetDefaultProxy( wxGetenv(wxT("HTTP_PROXY")) );


@@ -93,7 +100,7 @@ void wxURL::Init(const wxString& url)
 
     m_useProxy = ms_proxyDefault != NULL;
     m_proxy = ms_proxyDefault;
 
     m_useProxy = ms_proxyDefault != NULL;
     m_proxy = ms_proxyDefault;

-#endif // wxUSE_SOCKETS
+#endif // wxUSE_PROTOCOL_HTTP

 
 }
 
 
 }
 


@@ -101,18 +108,39 @@ void wxURL::Init(const wxString& url)
 // Assignment
 // --------------------------------------------------------------
 
 // Assignment
 // --------------------------------------------------------------
 

-wxURL& wxURL::operator = (const wxURI& url)
+wxURL& wxURL::operator = (const wxString& url)

 {
     wxURI::operator = (url);
 {
     wxURI::operator = (url);

-    Init(url.BuildURI());
+    Free();
+    Init(url);

     ParseURL();
     ParseURL();

+

     return *this;
 }
     return *this;
 }

-wxURL& wxURL::operator = (const wxString& url)
+
+wxURL& wxURL::operator = (const wxURI& uri)

 {
 {

-    wxURI::operator = (url);
-    Init(url);
-    ParseURL();
+    if (&uri != this)
+    {
+        wxURI::operator = (uri);
+        Free();
+        Init(uri.BuildURI());
+        ParseURL();
+    }
+
+    return *this;
+}
+
+wxURL& wxURL::operator = (const wxURL& url)
+{
+    if (&url != this)
+    {
+        wxURI::operator = (url);
+        Free();
+        Init(url.GetURL());
+        ParseURL();
+    }
+

     return *this;
 }
 
     return *this;
 }
 


@@ -124,56 +152,55 @@ wxURL& wxURL::operator = (const wxString& url)
 
 bool wxURL::ParseURL()
 {
 
 bool wxURL::ParseURL()
 {

-  // If the URL was already parsed (m_protocol != NULL), pass this section.
-  if (!m_protocol)
-  {
-    // Clean up
-    CleanData();
-
-    // Make sure we have a protocol/scheme
-    if (!HasScheme())
+    // If the URL was already parsed (m_protocol != NULL), pass this section.
+    if (!m_protocol)

     {
     {

-      m_error = wxURL_SNTXERR;
-      return false;
-    }
+        // Clean up
+        CleanData();

 
 

-    // Find and create the protocol object
-    if (!FetchProtocol())
-    {
-      m_error = wxURL_NOPROTO;
-      return false;
+        // Make sure we have a protocol/scheme
+        if (!HasScheme())
+        {
+            m_error = wxURL_SNTXERR;
+            return false;
+        }
+
+        // Find and create the protocol object
+        if (!FetchProtocol())
+        {
+            m_error = wxURL_NOPROTO;
+            return false;
+        }
+
+        // Do we need a host name ?
+        if (m_protoinfo->m_needhost)
+        {
+            //  Make sure we have one, then
+            if (!HasServer())
+            {
+                m_error = wxURL_SNTXERR;
+                return false;
+            }
+        }

     }
 
     }
 

-    // Do we need a host name ?
-    if (m_protoinfo->m_needhost)
+#if wxUSE_PROTOCOL_HTTP
+    if (m_useProxy)

     {
     {

-      //  Make sure we have one, then
-      if (!HasServer())
-      {
-        m_error = wxURL_SNTXERR;
-        return false;
-      }
+        // Third, we rebuild the URL.
+        m_url = m_scheme + wxT(":");
+        if (m_protoinfo->m_needhost)
+            m_url = m_url + wxT("//") + m_server;
+
+        // We initialize specific variables.
+        if (m_protocol)
+            m_protocol->Destroy();
+        m_protocol = m_proxy; // FIXME: we should clone the protocol

     }
     }

-  }
-
-#if wxUSE_SOCKETS
-  if (m_useProxy)
-  {
-    // destroy the previously created protocol as we'll be using m_proxy
-    delete m_protocol;
-
-    // Third, we rebuild the URL.
-    m_url = m_scheme + wxT(":");
-    if (m_protoinfo->m_needhost)
-      m_url = m_url + wxT("//") + m_server;
-
-    // We initialize specific variables.
-    m_protocol = m_proxy; // FIXME: we should clone the protocol
-  }
-#endif
+#endif // wxUSE_PROTOCOL_HTTP

 
 

-  m_error = wxURL_NOERR;
-  return true;
+    m_error = wxURL_NOERR;
+    return true;

 }
 
 // --------------------------------------------------------------
 }
 
 // --------------------------------------------------------------


@@ -182,45 +209,57 @@ bool wxURL::ParseURL()
 
 void wxURL::CleanData()
 {
 
 void wxURL::CleanData()
 {

-#if wxUSE_SOCKETS
-  if (!m_useProxy)
-#endif
-    delete m_protocol;
+#if wxUSE_PROTOCOL_HTTP
+    if (!m_useProxy)
+#endif // wxUSE_PROTOCOL_HTTP
+    {
+        if (m_protocol)
+        {
+            // Need to safely delete the socket (pending events)
+            m_protocol->Destroy();
+            m_protocol = NULL;
+        }
+    }

 }
 
 }
 

-wxURL::~wxURL()
+void wxURL::Free()

 {
     CleanData();
 {
     CleanData();

-#if wxUSE_SOCKETS
+#if wxUSE_PROTOCOL_HTTP

     if (m_proxy && m_proxy != ms_proxyDefault)
         delete m_proxy;
     if (m_proxy && m_proxy != ms_proxyDefault)
         delete m_proxy;

-#endif
+#endif // wxUSE_PROTOCOL_HTTP

 #if wxUSE_URL_NATIVE
     delete m_nativeImp;
 #endif
 }
 
 #if wxUSE_URL_NATIVE
     delete m_nativeImp;
 #endif
 }
 

+wxURL::~wxURL()
+{
+    Free();
+}
+

 // --------------------------------------------------------------
 // FetchProtocol
 // --------------------------------------------------------------
 
 bool wxURL::FetchProtocol()
 {
 // --------------------------------------------------------------
 // FetchProtocol
 // --------------------------------------------------------------
 
 bool wxURL::FetchProtocol()
 {

-  wxProtoInfo *info = ms_protocols;
+    wxProtoInfo *info = ms_protocols;

 
 

-  while (info)
-  {
-    if (m_scheme == info->m_protoname)
+    while (info)

     {
     {

-        if (m_port.IsNull())
-            m_port = info->m_servname;
-        m_protoinfo = info;
-        m_protocol = (wxProtocol *)m_protoinfo->m_cinfo->CreateObject();
-        return true;
+        if (m_scheme == info->m_protoname)
+        {
+            if (m_port.IsNull())
+                m_port = info->m_servname;
+            m_protoinfo = info;
+            m_protocol = (wxProtocol *)m_protoinfo->m_cinfo->CreateObject();
+            return true;
+        }
+        info = info->next;

     }
     }

-    info = info->next;
-  }
-  return false;
+    return false;

 }
 
 // --------------------------------------------------------------
 }
 
 // --------------------------------------------------------------


@@ -229,110 +268,129 @@ bool wxURL::FetchProtocol()
 
 wxInputStream *wxURL::GetInputStream()
 {
 
 wxInputStream *wxURL::GetInputStream()
 {

-  if (!m_protocol)
-  {
-    m_error = wxURL_NOPROTO;
-    return NULL;
-  }
-
-  m_error = wxURL_NOERR;
-  if (HasUser())
-  {
-      size_t dwPasswordPos = m_user.find(':');
-
-      if (dwPasswordPos == wxString::npos)
-          m_protocol->SetUser(m_user);
-      else
-      {
-          m_protocol->SetUser(m_user(0, dwPasswordPos));
-          m_protocol->SetPassword(m_user(dwPasswordPos+1, m_user.length() + 1));
-      }
-  }
+    if (!m_protocol)
+    {
+        m_error = wxURL_NOPROTO;
+        return NULL;
+    }
+
+    m_error = wxURL_NOERR;
+    if (HasUserInfo())
+    {
+        size_t dwPasswordPos = m_userinfo.find(':');
+
+        if (dwPasswordPos == wxString::npos)
+            m_protocol->SetUser(Unescape(m_userinfo));
+        else
+        {
+            m_protocol->SetUser(Unescape(m_userinfo(0, dwPasswordPos)));
+            m_protocol->SetPassword(Unescape(m_userinfo(dwPasswordPos+1, m_userinfo.length() + 1)));
+        }
+    }

 
 #if wxUSE_URL_NATIVE
 
 #if wxUSE_URL_NATIVE

-  // give the native implementation to return a better stream
-  // such as the native WinINet functionality under MS-Windows
-  if (m_nativeImp)
-  {
-    wxInputStream *rc;
-    rc = m_nativeImp->GetInputStream(this);
-    if (rc != 0)
-        return rc;
-  }
-  // else use the standard behaviour
+    // give the native implementation to return a better stream
+    // such as the native WinINet functionality under MS-Windows
+    if (m_nativeImp)
+    {
+        wxInputStream *rc;
+        rc = m_nativeImp->GetInputStream(this);
+        if (rc != 0)
+            return rc;
+    }
+    // else use the standard behaviour

 #endif // wxUSE_URL_NATIVE
 
 #if wxUSE_SOCKETS
     wxIPV4address addr;
 
 #endif // wxUSE_URL_NATIVE
 
 #if wxUSE_SOCKETS
     wxIPV4address addr;
 

-  // m_protoinfo is NULL when we use a proxy
-  if (!m_useProxy && m_protoinfo->m_needhost)
-  {
-    if (!addr.Hostname(m_server))
+    // m_protoinfo is NULL when we use a proxy
+    if (
+#if wxUSE_PROTOCOL_HTTP
+         !m_useProxy &&
+#endif // wxUSE_PROTOCOL_HTTP
+         m_protoinfo->m_needhost )

     {
     {

-      m_error = wxURL_NOHOST;
-      return NULL;
-    }
+        if (!addr.Hostname(m_server))
+        {
+            m_error = wxURL_NOHOST;
+            return NULL;
+        }

 
 

-    addr.Service(m_port);
+        addr.Service(m_port);

 
 

-    if (!m_protocol->Connect(addr, true)) // Watcom needs the 2nd arg for some reason
-    {
-      m_error = wxURL_CONNERR;
-      return NULL;
+        if (!m_protocol->Connect(addr, true)) // Watcom needs the 2nd arg for some reason
+        {
+            m_error = wxURL_CONNERR;
+            return NULL;
+        }

     }
     }

-  }
-#endif
+#endif // wxUSE_SOCKETS
+
+    wxString fullPath;
+
+#if wxUSE_PROTOCOL_HTTP
+    // When we use a proxy, we have to pass the whole URL to it.
+    if (m_useProxy)
+        fullPath += m_url;
+#endif // wxUSE_PROTOCOL_HTTP
+
+    if(m_path.empty())
+        fullPath += wxT("/");
+    else
+        fullPath += m_path;
+
+    if (HasQuery())
+        fullPath += wxT("?") + m_query;

 
 

-  // When we use a proxy, we have to pass the whole URL to it.
-  wxInputStream *the_i_stream =
-       (m_useProxy) ? m_protocol->GetInputStream(m_url) :
-                      m_protocol->GetInputStream(m_path);
+    if (HasFragment())
+        fullPath += wxT("#") + m_fragment;

 
 

-  if (!the_i_stream)
-  {
-    m_error = wxURL_PROTOERR;
-    return NULL;
-  }
+    wxInputStream *the_i_stream = m_protocol->GetInputStream(fullPath);
+
+    if (!the_i_stream)
+    {
+        m_error = wxURL_PROTOERR;
+        return NULL;
+    }

 
 

-  return the_i_stream;
+    return the_i_stream;

 }
 
 }
 

-#if wxUSE_SOCKETS
+#if wxUSE_PROTOCOL_HTTP

 void wxURL::SetDefaultProxy(const wxString& url_proxy)
 {
 void wxURL::SetDefaultProxy(const wxString& url_proxy)
 {

-  if ( !url_proxy )
-  {
-      if ( ms_proxyDefault )
-      {
-          ms_proxyDefault->Close();
-          delete ms_proxyDefault;
-          ms_proxyDefault = NULL;
-      }
-  }
-  else
-  {
-      wxString tmp_str = url_proxy;
-      int pos = tmp_str.Find(wxT(':'));
-      if (pos == wxNOT_FOUND)
-          return;
-
-      wxString hostname = tmp_str(0, pos),
-      port = tmp_str(pos+1, tmp_str.Length()-pos);
-      wxIPV4address addr;
-
-      if (!addr.Hostname(hostname))
-          return;
-      if (!addr.Service(port))
-          return;
-
-      if (ms_proxyDefault)
-          // Finally, when all is right, we connect the new proxy.
-          ms_proxyDefault->Close();
-      else
-          ms_proxyDefault = new wxHTTP();
-      ms_proxyDefault->Connect(addr, true); // Watcom needs the 2nd arg for some reason
-  }
+    if ( !url_proxy )
+    {
+        if ( ms_proxyDefault )
+        {
+            ms_proxyDefault->Close();
+            wxDELETE(ms_proxyDefault);
+        }
+    }
+    else
+    {
+        wxString tmp_str = url_proxy;
+        int pos = tmp_str.Find(wxT(':'));
+        if (pos == wxNOT_FOUND)
+            return;
+
+        wxString hostname = tmp_str(0, pos),
+        port = tmp_str(pos+1, tmp_str.length()-pos);
+        wxIPV4address addr;
+
+        if (!addr.Hostname(hostname))
+            return;
+        if (!addr.Service(port))
+            return;
+
+        if (ms_proxyDefault)
+            // Finally, when all is right, we connect the new proxy.
+            ms_proxyDefault->Close();
+        else
+            ms_proxyDefault = new wxHTTP();
+        ms_proxyDefault->Connect(addr, true); // Watcom needs the 2nd arg for some reason
+    }

 }
 
 void wxURL::SetProxy(const wxString& url_proxy)
 }
 
 void wxURL::SetProxy(const wxString& url_proxy)


@@ -361,7 +419,7 @@ void wxURL::SetProxy(const wxString& url_proxy)
             return;
 
         hostname = tmp_str(0, pos);
             return;
 
         hostname = tmp_str(0, pos);

-        port = tmp_str(pos+1, tmp_str.Length()-pos);
+        port = tmp_str(pos+1, tmp_str.length()-pos);

 
         addr.Hostname(hostname);
         addr.Service(port);
 
         addr.Hostname(hostname);
         addr.Service(port);


@@ -378,7 +436,7 @@ void wxURL::SetProxy(const wxString& url_proxy)
         ParseURL();
     }
 }
         ParseURL();
     }
 }

-#endif // wxUSE_SOCKETS
+#endif // wxUSE_PROTOCOL_HTTP

 
 // ----------------------------------------------------------------------
 // wxURLModule
 
 // ----------------------------------------------------------------------
 // wxURLModule


@@ -391,6 +449,8 @@ void wxURL::SetProxy(const wxString& url_proxy)
 class wxURLModule : public wxModule
 {
 public:
 class wxURLModule : public wxModule
 {
 public:

+    wxURLModule();
+

     virtual bool OnInit();
     virtual void OnExit();
 
     virtual bool OnInit();
     virtual void OnExit();
 


@@ -400,28 +460,37 @@ private:
 
 IMPLEMENT_DYNAMIC_CLASS(wxURLModule, wxModule)
 
 
 IMPLEMENT_DYNAMIC_CLASS(wxURLModule, wxModule)
 

+wxURLModule::wxURLModule()
+{
+    // we must be cleaned up before wxSocketModule as otherwise deleting
+    // ms_proxyDefault from our OnExit() won't work (and can actually crash)
+    AddDependency(wxClassInfo::FindClass(wxT("wxSocketModule")));
+}
+

 bool wxURLModule::OnInit()
 {
 bool wxURLModule::OnInit()
 {

+#if wxUSE_PROTOCOL_HTTP

     // env var HTTP_PROXY contains the address of the default proxy to use if
     // set, but don't try to create this proxy right now because it will slow
     // down the program startup (especially if there is no DNS server
     // available, in which case it may take up to 1 minute)
 
     // env var HTTP_PROXY contains the address of the default proxy to use if
     // set, but don't try to create this proxy right now because it will slow
     // down the program startup (especially if there is no DNS server
     // available, in which case it may take up to 1 minute)
 

-    if ( getenv("HTTP_PROXY") )
+    if ( wxGetenv(wxT("HTTP_PROXY")) )

     {
         wxURL::ms_useDefaultProxy = true;
     }
     {
         wxURL::ms_useDefaultProxy = true;
     }

-
+#endif // wxUSE_PROTOCOL_HTTP

     return true;
 }
 
 void wxURLModule::OnExit()
 {
     return true;
 }
 
 void wxURLModule::OnExit()
 {

-    delete wxURL::ms_proxyDefault;
-    wxURL::ms_proxyDefault = NULL;
+#if wxUSE_PROTOCOL_HTTP
+    wxDELETE(wxURL::ms_proxyDefault);
+#endif // wxUSE_PROTOCOL_HTTP

 }
 
 #endif // wxUSE_SOCKETS
 
 }
 
 #endif // wxUSE_SOCKETS
 

-#endif // wxUSE_URL

 
 

+#endif // wxUSE_URL