/////////////////////////////////////////////////////////////////////////////
-// Name: url.cpp
+// Name: src/common/url.cpp
// Purpose: URL parser
// Author: Guilhem Lavaux
// Modified by:
// Created: 20/07/1997
// RCS-ID: $Id$
// Copyright: (c) 1997, 1998 Guilhem Lavaux
-// Licence: wxWindows license
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
-#pragma implementation "url.h"
-#endif
-
// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
#ifdef __BORLANDC__
-#pragma hdrstop
+ #pragma hdrstop
#endif
-#if wxUSE_SOCKETS
+#if wxUSE_URL
+
+#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>
-// wxWindows headers
-#include <wx/string.h>
-#include <wx/list.h>
-#include <wx/utils.h>
+IMPLEMENT_CLASS(wxProtoInfo, wxObject)
+IMPLEMENT_CLASS(wxURL, wxURI)
-// wxSocket header
-#include "wx/url.h"
+// Protocols list
+wxProtoInfo *wxURL::ms_protocols = NULL;
-#if !USE_SHARED_LIBRARY
-IMPLEMENT_CLASS(wxProtoInfo, wxObject)
-IMPLEMENT_CLASS(wxURL, wxObject)
+// Enforce linking of protocol classes:
+USE_PROTOCOL(wxFileProto)
+
+#if wxUSE_PROTOCOL_HTTP
+USE_PROTOCOL(wxHTTP)
+
+ wxHTTP *wxURL::ms_proxyDefault = NULL;
+ bool wxURL::ms_useDefaultProxy = false;
#endif
-// Protocols list
-wxProtoInfo *wxURL::g_protocols = NULL;
-wxHTTP *wxURL::g_proxy;
+#if wxUSE_PROTOCOL_FTP
+USE_PROTOCOL(wxFTP)
+#endif
// --------------------------------------------------------------
-// wxURL
+//
+// wxURL
+//
// --------------------------------------------------------------
// --------------------------------------------------------------
-// --------- wxURL CONSTRUCTOR DESTRUCTOR -----------------------
+// Construction
// --------------------------------------------------------------
-wxURL::wxURL(const wxString& url)
+wxURL::wxURL(const wxString& url) : wxURI(url)
{
- m_protocol = NULL;
- if (g_proxy->IsConnected()) {
- m_protocol = g_proxy;
- m_protoname = "proxy";
- m_path = url;
- return;
- }
- m_url = url;
- m_error = wxURL_NOERR;
- ParseURL();
+ Init(url);
+ ParseURL();
}
-bool wxURL::ParseURL()
+wxURL::wxURL(const wxURI& url) : wxURI(url)
+{
+ Init(url.BuildURI());
+ ParseURL();
+}
+
+void wxURL::Init(const wxString& url)
{
- wxString last_url = m_url;
-
- // Clean up
- CleanData();
-
- // Extract protocol name
- if (!PrepProto(last_url)) {
- 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) {
- // Extract it
- if (!PrepHost(last_url)) {
- m_error = wxURL_SNTXERR;
- return FALSE;
+ m_protocol = NULL;
+ m_error = wxURL_NOERR;
+ m_url = url;
+#if wxUSE_URL_NATIVE
+ m_nativeImp = CreateNativeImpObject();
+#endif
+
+#if wxUSE_PROTOCOL_HTTP
+ if ( ms_useDefaultProxy && !ms_proxyDefault )
+ {
+ SetDefaultProxy( wxGetenv(wxT("HTTP_PROXY")) );
+
+ if ( !ms_proxyDefault )
+ {
+ // don't try again
+ ms_useDefaultProxy = false;
+ }
}
- }
- // Extract full path
- if (!PrepPath(last_url)) {
- m_error = wxURL_NOPATH;
- return FALSE;
- }
+ m_useProxy = ms_proxyDefault != NULL;
+ m_proxy = ms_proxyDefault;
+#endif // wxUSE_PROTOCOL_HTTP
- m_error = wxURL_NOERR;
- return TRUE;
}
-void wxURL::CleanData()
+// --------------------------------------------------------------
+// Assignment
+// --------------------------------------------------------------
+
+wxURL& wxURL::operator = (const wxURI& url)
{
- if (m_protoname != _T("proxy"))
- delete m_protocol;
+ wxURI::operator = (url);
+ Init(url.BuildURI());
+ ParseURL();
+ return *this;
}
-
-wxURL::~wxURL()
+wxURL& wxURL::operator = (const wxString& url)
{
- CleanData();
+ wxURI::operator = (url);
+ Init(url);
+ ParseURL();
+ return *this;
}
// --------------------------------------------------------------
-// --------- wxURL urls decoders --------------------------------
+// ParseURL
+//
+// Builds the URL and takes care of the old protocol stuff
// --------------------------------------------------------------
-bool wxURL::PrepProto(wxString& url)
+bool wxURL::ParseURL()
{
- int pos;
-
- // Find end
- pos = url.Find(':');
- if (pos == -1)
- return FALSE;
+ // 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())
+ {
+ 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;
+ }
+ }
+ }
- m_protoname = url(0, pos);
+#if wxUSE_PROTOCOL_HTTP
+ if (m_useProxy)
+ {
+ // Third, we rebuild the URL.
+ m_url = m_scheme + wxT(":");
+ if (m_protoinfo->m_needhost)
+ m_url = m_url + wxT("//") + m_server;
- url = url(pos+1, url.Length());
+ // We initialize specific variables.
+ m_protocol = m_proxy; // FIXME: we should clone the protocol
+ }
+#endif // wxUSE_PROTOCOL_HTTP
- return TRUE;
+ m_error = wxURL_NOERR;
+ return true;
}
-bool wxURL::PrepHost(wxString& url)
+// --------------------------------------------------------------
+// Destruction/Cleanup
+// --------------------------------------------------------------
+
+void wxURL::CleanData()
{
- wxString temp_url;
- int pos, pos2;
+#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();
+}
- if ((url.GetChar(0) != '/') || (url.GetChar(1) != '/'))
- return FALSE;
+wxURL::~wxURL()
+{
+ CleanData();
+#if wxUSE_PROTOCOL_HTTP
+ if (m_proxy && m_proxy != ms_proxyDefault)
+ delete m_proxy;
+#endif // wxUSE_PROTOCOL_HTTP
+#if wxUSE_URL_NATIVE
+ delete m_nativeImp;
+#endif
+}
- url = url(2, url.Length());
+// --------------------------------------------------------------
+// FetchProtocol
+// --------------------------------------------------------------
- pos = url.Find('/');
- if (pos == -1)
- pos = url.Length();
+bool wxURL::FetchProtocol()
+{
+ wxProtoInfo *info = ms_protocols;
- if (pos == 0)
- return FALSE;
+ while (info)
+ {
+ 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;
+ }
+ return false;
+}
- temp_url = url(0, pos);
- url = url(url.Find('/'), url.Length());
+// --------------------------------------------------------------
+// GetInputStream
+// --------------------------------------------------------------
- // Retrieve service number
- pos2 = temp_url.Find(':', TRUE);
- if (pos2 != -1 && pos2 < pos) {
- m_servname = temp_url(pos2+1, pos);
- if (!m_servname.IsNumber())
- return FALSE;
- temp_url = temp_url(0, pos2);
- }
+wxInputStream *wxURL::GetInputStream()
+{
+ if (!m_protocol)
+ {
+ m_error = wxURL_NOPROTO;
+ return NULL;
+ }
- // Retrieve user and password.
- pos2 = temp_url.Find('@');
- // Even if pos2 equals -1, this code is right.
- m_hostname = temp_url(pos2+1, temp_url.Length());
+ 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)));
+ }
+ }
- m_user = "";
- m_password = "";
+#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
+#endif // wxUSE_URL_NATIVE
- if (pos2 == -1)
- return TRUE;
+#if wxUSE_SOCKETS
+ wxIPV4address addr;
- temp_url = temp_url(0, pos2);
- pos2 = temp_url.Find(':');
+ // m_protoinfo is NULL when we use a proxy
+ if (!m_useProxy && m_protoinfo->m_needhost)
+ {
+ if (!addr.Hostname(m_server))
+ {
+ m_error = wxURL_NOHOST;
+ return NULL;
+ }
+
+ addr.Service(m_port);
+
+ if (!m_protocol->Connect(addr, true)) // Watcom needs the 2nd arg for some reason
+ {
+ m_error = wxURL_CONNERR;
+ return NULL;
+ }
+ }
+#endif
- if (pos2 == -1)
- return FALSE;
+ wxString fullPath;
- m_user = temp_url(0, pos2);
- m_password = temp_url(pos2+1, url.Length());
+ // When we use a proxy, we have to pass the whole URL to it.
+ if (m_useProxy)
+ fullPath += m_url;
- return TRUE;
-}
+ if(m_path.empty())
+ fullPath += wxT("/");
+ else
+ fullPath += m_path;
-bool wxURL::PrepPath(wxString& url)
-{
- if (url.Length() != 0)
- m_path = url;
- else
- m_path = "/";
- return TRUE;
-}
+ if (HasQuery())
+ fullPath += wxT("?") + m_query;
-bool wxURL::FetchProtocol()
-{
- wxProtoInfo *info = g_protocols;
+ if (HasFragment())
+ fullPath += wxT("#") + m_fragment;
- while (info) {
- if (m_protoname == info->m_protoname) {
- if (m_servname.IsNull())
- m_servname = info->m_servname;
+ wxInputStream *the_i_stream = m_protocol->GetInputStream(fullPath);
- m_protoinfo = info;
- m_protocol = (wxProtocol *)m_protoinfo->m_cinfo->CreateObject();
- return TRUE;
+ if (!the_i_stream)
+ {
+ m_error = wxURL_PROTOERR;
+ return NULL;
}
- info = info->next;
- }
- return FALSE;
-}
-// --------------------------------------------------------------
-// --------- wxURL get ------------------------------------------
-// --------------------------------------------------------------
+ return the_i_stream;
+}
-wxInputStream *wxURL::GetInputStream(void)
+#if wxUSE_PROTOCOL_HTTP
+void wxURL::SetDefaultProxy(const wxString& url_proxy)
{
- wxIPV4address addr;
- wxInputStream *the_i_stream = NULL;
-
- if (!m_protocol)
- if (!ParseURL())
- return NULL;
-
- if (!m_protocol) {
- m_error = wxURL_NOPROTO;
- return NULL;
- }
-
- m_error = wxURL_NOERR;
- if (m_user != _T("")) {
- m_protocol->SetUser(m_user);
- m_protocol->SetPassword(m_password);
- }
-
- if (m_protoinfo->m_needhost) {
- if (!addr.Hostname(m_hostname)) {
- m_error = wxURL_NOHOST;
- return NULL;
+ if ( !url_proxy )
+ {
+ if ( ms_proxyDefault )
+ {
+ ms_proxyDefault->Close();
+ delete ms_proxyDefault;
+ ms_proxyDefault = NULL;
+ }
}
-
- addr.Service(m_servname);
-
- if (!m_protocol->Connect(addr, TRUE)) // Watcom needs the 2nd arg for some reason
+ else
{
- m_error = wxURL_CONNERR;
- return NULL;
+ 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
}
- }
-
- the_i_stream = m_protocol->GetInputStream(m_path);
- if (!the_i_stream) {
- m_error = wxURL_PROTOERR;
- return NULL;
- }
-
- return the_i_stream;
}
-void wxURL::SetDefaultProxy(const wxString& url_proxy)
+void wxURL::SetProxy(const wxString& url_proxy)
{
- g_proxy->Close();
+ if ( !url_proxy )
+ {
+ if ( m_proxy && m_proxy != ms_proxyDefault )
+ {
+ m_proxy->Close();
+ delete m_proxy;
+ }
- if (url_proxy.IsNull())
- return;
+ m_useProxy = false;
+ }
+ else
+ {
+ wxString tmp_str;
+ wxString hostname, port;
+ int pos;
+ wxIPV4address addr;
+
+ tmp_str = url_proxy;
+ pos = tmp_str.Find(wxT(':'));
+ // This is an invalid proxy name.
+ if (pos == wxNOT_FOUND)
+ return;
+
+ hostname = tmp_str(0, pos);
+ port = tmp_str(pos+1, tmp_str.length()-pos);
+
+ addr.Hostname(hostname);
+ addr.Service(port);
+
+ // Finally, create the whole stuff.
+ if (m_proxy && m_proxy != ms_proxyDefault)
+ delete m_proxy;
+ m_proxy = new wxHTTP();
+ m_proxy->Connect(addr, true); // Watcom needs the 2nd arg for some reason
+
+ CleanData();
+ // Reparse url.
+ m_useProxy = true;
+ ParseURL();
+ }
+}
+#endif // wxUSE_PROTOCOL_HTTP
- wxString tmp_str = url_proxy;
- int pos = tmp_str.Find(':');
- wxString hostname = tmp_str(0, pos),
- port = tmp_str(pos, tmp_str.Length()-pos);
- wxIPV4address addr;
+// ----------------------------------------------------------------------
+// wxURLModule
+//
+// A module which deletes the default proxy if we created it
+// ----------------------------------------------------------------------
- addr.Hostname(hostname);
- addr.Service(port);
-
- g_proxy->Connect(addr, TRUE); // Watcom needs the 2nd arg for some reason
-}
+#if wxUSE_SOCKETS
-void wxURL::SetProxy(const wxString& url_proxy)
+class wxURLModule : public wxModule
{
- if (url_proxy.IsNull()) {
- m_proxy.Close();
- return;
- }
+public:
+ wxURLModule();
- CleanData();
+ virtual bool OnInit();
+ virtual void OnExit();
- wxString tmp_str;
- wxString hostname, port;
- int pos;
- wxIPV4address addr;
+private:
+ DECLARE_DYNAMIC_CLASS(wxURLModule)
+};
- tmp_str = url_proxy;
- pos = tmp_str.Find(':');
- hostname = tmp_str(0, pos);
- port = tmp_str(pos, tmp_str.Length()-pos);
+IMPLEMENT_DYNAMIC_CLASS(wxURLModule, wxModule)
- addr.Hostname(hostname);
- addr.Service(port);
+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(_T("wxSocketModule")));
+}
- m_proxy.Connect(addr, TRUE); // Watcom needs the 2nd arg for some reason
+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)
- m_protocol = &m_proxy;
- m_protoname = "proxy";
- m_path = url_proxy;
+ if ( wxGetenv(_T("HTTP_PROXY")) )
+ {
+ wxURL::ms_useDefaultProxy = true;
+ }
+#endif // wxUSE_PROTOCOL_HTTP
+ return true;
}
-wxString wxURL::ConvertToValidURI(const wxString& uri)
+void wxURLModule::OnExit()
{
- wxString out_str;
- wxString hexa_code;
- size_t i;
-
- for (i=0;i<uri.Len();i++) {
- wxChar c = uri.GetChar(i);
-
- if (c == _T(' '))
- out_str += _T('+');
- else {
- if (!isalpha(c) && c != _T('.') && c != _T('+') && c != _T('.') &&
- c != _T('/')) {
- hexa_code.Printf(_T("%%%02X"), c);
- out_str += hexa_code;
- } else
- out_str += c;
- }
- }
-
- return out_str;
+#if wxUSE_PROTOCOL_HTTP
+ delete wxURL::ms_proxyDefault;
+ wxURL::ms_proxyDefault = NULL;
+#endif // wxUSE_PROTOCOL_HTTP
}
-#endif
- // wxUSE_SOCKETS
+#endif // wxUSE_SOCKETS
+
+
+#endif // wxUSE_URL