--- /dev/null
+/////////////////////////////////////////////////////////////////////////////
+// Name: palmos/dialup.cpp
+// Purpose: Palm OS implementation of network/dialup classes and functions
+// Author: Vadim Zeitlin
+// Modified by:
+// Created: 07.07.99
+// RCS-ID: $Id$
+// Copyright: (c) Vadim Zeitlin
+// Licence: wxWindows licence
+/////////////////////////////////////////////////////////////////////////////
+
+// ============================================================================
+// declarations
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// headers
+// ----------------------------------------------------------------------------
+
+// for compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
+
+#ifdef __BORLANDC__
+ #pragma hdrstop
+#endif
+
+#if wxUSE_DIALUP_MANAGER
+
+#ifndef WX_PRECOMP
+ #include "wx/log.h"
+ #include "wx/intl.h"
+ #include "wx/event.h"
+#endif
+
+#include "wx/timer.h"
+#include "wx/app.h"
+#include "wx/generic/choicdgg.h"
+
+#include "wx/dynlib.h"
+#include "wx/dialup.h"
+
+DEFINE_EVENT_TYPE(wxEVT_DIALUP_CONNECTED)
+DEFINE_EVENT_TYPE(wxEVT_DIALUP_DISCONNECTED)
+
+// This needs to be written using Palm OS Network API calls, but for now this
+// will do.
+#if (!defined(__PALMOS__)
+
+#include <ras.h>
+#include <raserror.h>
+
+#include <wininet.h>
+
+// Not in VC++ 5
+#ifndef INTERNET_CONNECTION_LAN
+#define INTERNET_CONNECTION_LAN 2
+#endif
+#ifndef INTERNET_CONNECTION_PROXY
+#define INTERNET_CONNECTION_PROXY 4
+#endif
+
+// ----------------------------------------------------------------------------
+// constants
+// ----------------------------------------------------------------------------
+
+// this message is sent by the secondary thread when RAS status changes
+#define wxWM_RAS_STATUS_CHANGED (WM_USER + 10010)
+#define wxWM_RAS_DIALING_PROGRESS (WM_USER + 10011)
+
+// ----------------------------------------------------------------------------
+// types
+// ----------------------------------------------------------------------------
+
+// the signatures of RAS functions: all this is quite heavy, but we must do it
+// to allow running wxWin programs on machine which don't have RAS installed
+// (this does exist) - if we link with rasapi32.lib, the program will fail on
+// startup because of the missing DLL...
+
+#ifndef UNICODE
+ typedef DWORD (APIENTRY * RASDIAL)( LPRASDIALEXTENSIONS, LPCSTR, LPRASDIALPARAMSA, DWORD, LPVOID, LPHRASCONN );
+ typedef DWORD (APIENTRY * RASENUMCONNECTIONS)( LPRASCONNA, LPDWORD, LPDWORD );
+ typedef DWORD (APIENTRY * RASENUMENTRIES)( LPCSTR, LPCSTR, LPRASENTRYNAMEA, LPDWORD, LPDWORD );
+ typedef DWORD (APIENTRY * RASGETCONNECTSTATUS)( HRASCONN, LPRASCONNSTATUSA );
+ typedef DWORD (APIENTRY * RASGETERRORSTRING)( UINT, LPSTR, DWORD );
+ typedef DWORD (APIENTRY * RASHANGUP)( HRASCONN );
+ typedef DWORD (APIENTRY * RASGETPROJECTIONINFO)( HRASCONN, RASPROJECTION, LPVOID, LPDWORD );
+ typedef DWORD (APIENTRY * RASCREATEPHONEBOOKENTRY)( HWND, LPCSTR );
+ typedef DWORD (APIENTRY * RASEDITPHONEBOOKENTRY)( HWND, LPCSTR, LPCSTR );
+ typedef DWORD (APIENTRY * RASSETENTRYDIALPARAMS)( LPCSTR, LPRASDIALPARAMSA, BOOL );
+ typedef DWORD (APIENTRY * RASGETENTRYDIALPARAMS)( LPCSTR, LPRASDIALPARAMSA, LPBOOL );
+ typedef DWORD (APIENTRY * RASENUMDEVICES)( LPRASDEVINFOA, LPDWORD, LPDWORD );
+ typedef DWORD (APIENTRY * RASGETCOUNTRYINFO)( LPRASCTRYINFOA, LPDWORD );
+ typedef DWORD (APIENTRY * RASGETENTRYPROPERTIES)( LPCSTR, LPCSTR, LPRASENTRYA, LPDWORD, LPBYTE, LPDWORD );
+ typedef DWORD (APIENTRY * RASSETENTRYPROPERTIES)( LPCSTR, LPCSTR, LPRASENTRYA, DWORD, LPBYTE, DWORD );
+ typedef DWORD (APIENTRY * RASRENAMEENTRY)( LPCSTR, LPCSTR, LPCSTR );
+ typedef DWORD (APIENTRY * RASDELETEENTRY)( LPCSTR, LPCSTR );
+ typedef DWORD (APIENTRY * RASVALIDATEENTRYNAME)( LPCSTR, LPCSTR );
+ typedef DWORD (APIENTRY * RASCONNECTIONNOTIFICATION)( HRASCONN, HANDLE, DWORD );
+
+ static const wxChar gs_funcSuffix = _T('A');
+#else // Unicode
+ typedef DWORD (APIENTRY * RASDIAL)( LPRASDIALEXTENSIONS, LPCWSTR, LPRASDIALPARAMSW, DWORD, LPVOID, LPHRASCONN );
+ typedef DWORD (APIENTRY * RASENUMCONNECTIONS)( LPRASCONNW, LPDWORD, LPDWORD );
+ typedef DWORD (APIENTRY * RASENUMENTRIES)( LPCWSTR, LPCWSTR, LPRASENTRYNAMEW, LPDWORD, LPDWORD );
+ typedef DWORD (APIENTRY * RASGETCONNECTSTATUS)( HRASCONN, LPRASCONNSTATUSW );
+ typedef DWORD (APIENTRY * RASGETERRORSTRING)( UINT, LPWSTR, DWORD );
+ typedef DWORD (APIENTRY * RASHANGUP)( HRASCONN );
+ typedef DWORD (APIENTRY * RASGETPROJECTIONINFO)( HRASCONN, RASPROJECTION, LPVOID, LPDWORD );
+ typedef DWORD (APIENTRY * RASCREATEPHONEBOOKENTRY)( HWND, LPCWSTR );
+ typedef DWORD (APIENTRY * RASEDITPHONEBOOKENTRY)( HWND, LPCWSTR, LPCWSTR );
+ typedef DWORD (APIENTRY * RASSETENTRYDIALPARAMS)( LPCWSTR, LPRASDIALPARAMSW, BOOL );
+ typedef DWORD (APIENTRY * RASGETENTRYDIALPARAMS)( LPCWSTR, LPRASDIALPARAMSW, LPBOOL );
+ typedef DWORD (APIENTRY * RASENUMDEVICES)( LPRASDEVINFOW, LPDWORD, LPDWORD );
+ typedef DWORD (APIENTRY * RASGETCOUNTRYINFO)( LPRASCTRYINFOW, LPDWORD );
+ typedef DWORD (APIENTRY * RASGETENTRYPROPERTIES)( LPCWSTR, LPCWSTR, LPRASENTRYW, LPDWORD, LPBYTE, LPDWORD );
+ typedef DWORD (APIENTRY * RASSETENTRYPROPERTIES)( LPCWSTR, LPCWSTR, LPRASENTRYW, DWORD, LPBYTE, DWORD );
+ typedef DWORD (APIENTRY * RASRENAMEENTRY)( LPCWSTR, LPCWSTR, LPCWSTR );
+ typedef DWORD (APIENTRY * RASDELETEENTRY)( LPCWSTR, LPCWSTR );
+ typedef DWORD (APIENTRY * RASVALIDATEENTRYNAME)( LPCWSTR, LPCWSTR );
+ typedef DWORD (APIENTRY * RASCONNECTIONNOTIFICATION)( HRASCONN, HANDLE, DWORD );
+
+ static const wxChar gs_funcSuffix = _T('W');
+#endif // ASCII/Unicode
+
+// structure passed to the secondary thread
+struct WXDLLEXPORT wxRasThreadData
+{
+ wxRasThreadData()
+ {
+ hWnd = 0;
+ hEventRas =
+ hEventQuit = 0;
+ dialUpManager = NULL;
+ }
+
+ ~wxRasThreadData()
+ {
+ if ( hWnd )
+ DestroyWindow(hWnd);
+
+ if ( hEventQuit )
+ CloseHandle(hEventQuit);
+
+ if ( hEventRas )
+ CloseHandle(hEventRas);
+ }
+
+ HWND hWnd; // window to send notifications to
+ HANDLE hEventRas, // automatic event which RAS signals when status changes
+ hEventQuit; // manual event which we signal when we terminate
+
+ class WXDLLEXPORT wxDialUpManagerMSW *dialUpManager; // the owner
+};
+
+// ----------------------------------------------------------------------------
+// wxDialUpManager class for MSW
+// ----------------------------------------------------------------------------
+
+class WXDLLEXPORT wxDialUpManagerMSW : public wxDialUpManager
+{
+public:
+ // ctor & dtor
+ wxDialUpManagerMSW();
+ virtual ~wxDialUpManagerMSW();
+
+ // implement base class pure virtuals
+ virtual bool IsOk() const;
+ virtual size_t GetISPNames(wxArrayString& names) const;
+ virtual bool Dial(const wxString& nameOfISP,
+ const wxString& username,
+ const wxString& password,
+ bool async);
+ virtual bool IsDialing() const;
+ virtual bool CancelDialing();
+ virtual bool HangUp();
+ virtual bool IsAlwaysOnline() const;
+ virtual bool IsOnline() const;
+ virtual void SetOnlineStatus(bool isOnline = TRUE);
+ virtual bool EnableAutoCheckOnlineStatus(size_t nSeconds);
+ virtual void DisableAutoCheckOnlineStatus();
+ virtual void SetWellKnownHost(const wxString& hostname, int port);
+ virtual void SetConnectCommand(const wxString& commandDial,
+ const wxString& commandHangup);
+
+ // for RasTimer
+ void CheckRasStatus();
+
+ // for wxRasStatusWindowProc
+ void OnConnectStatusChange();
+ void OnDialProgress(RASCONNSTATE rasconnstate, DWORD dwError);
+
+ // for wxRasDialFunc
+ static HWND GetRasWindow() { return ms_hwndRas; }
+ static wxDialUpManagerMSW *GetDialer() { return ms_dialer; }
+
+private:
+ // return the error string for the given RAS error code
+ static wxString GetErrorString(DWORD error);
+
+ // find the (first) handle of the active connection
+ static HRASCONN FindActiveConnection();
+
+ // notify the application about status change
+ void NotifyApp(bool connected, bool fromOurselves = FALSE) const;
+
+ // destroy the thread data and the thread itself
+ void CleanUpThreadData();
+
+ // number of times EnableAutoCheckOnlineStatus() had been called minus the
+ // number of times DisableAutoCheckOnlineStatus() had been called
+ int m_autoCheckLevel;
+
+ // timer used for polling RAS status
+ class WXDLLEXPORT RasTimer : public wxTimer
+ {
+ public:
+ RasTimer(wxDialUpManagerMSW *dialUpManager)
+ { m_dialUpManager = dialUpManager; }
+
+ virtual void Notify() { m_dialUpManager->CheckRasStatus(); }
+
+ private:
+ wxDialUpManagerMSW *m_dialUpManager;
+
+ DECLARE_NO_COPY_CLASS(RasTimer)
+ } m_timerStatusPolling;
+
+ // thread handle for the thread sitting on connection change event
+ HANDLE m_hThread;
+
+ // data used by this thread and our hidden window to send messages between
+ // each other
+ wxRasThreadData *m_data;
+
+ // the handle of rasapi32.dll when it's loaded
+ wxDynamicLibrary m_dllRas;
+
+ // the hidden window we use for passing messages between threads
+ static HWND ms_hwndRas;
+
+ // the handle of the connection we initiated or 0 if none
+ static HRASCONN ms_hRasConnection;
+
+ // the pointers to RAS functions
+ static RASDIAL ms_pfnRasDial;
+ static RASENUMCONNECTIONS ms_pfnRasEnumConnections;
+ static RASENUMENTRIES ms_pfnRasEnumEntries;
+ static RASGETCONNECTSTATUS ms_pfnRasGetConnectStatus;
+ static RASGETERRORSTRING ms_pfnRasGetErrorString;
+ static RASHANGUP ms_pfnRasHangUp;
+ static RASGETPROJECTIONINFO ms_pfnRasGetProjectionInfo;
+ static RASCREATEPHONEBOOKENTRY ms_pfnRasCreatePhonebookEntry;
+ static RASEDITPHONEBOOKENTRY ms_pfnRasEditPhonebookEntry;
+ static RASSETENTRYDIALPARAMS ms_pfnRasSetEntryDialParams;
+ static RASGETENTRYDIALPARAMS ms_pfnRasGetEntryDialParams;
+ static RASENUMDEVICES ms_pfnRasEnumDevices;
+ static RASGETCOUNTRYINFO ms_pfnRasGetCountryInfo;
+ static RASGETENTRYPROPERTIES ms_pfnRasGetEntryProperties;
+ static RASSETENTRYPROPERTIES ms_pfnRasSetEntryProperties;
+ static RASRENAMEENTRY ms_pfnRasRenameEntry;
+ static RASDELETEENTRY ms_pfnRasDeleteEntry;
+ static RASVALIDATEENTRYNAME ms_pfnRasValidateEntryName;
+
+ // this function is not supported by Win95
+ static RASCONNECTIONNOTIFICATION ms_pfnRasConnectionNotification;
+
+ // if this flag is different from -1, it overrides IsOnline()
+ static int ms_userSpecifiedOnlineStatus;
+
+ // this flag tells us if we're online
+ static int ms_isConnected;
+
+ // this flag tells us whether a call to RasDial() is in progress
+ static wxDialUpManagerMSW *ms_dialer;
+
+ DECLARE_NO_COPY_CLASS(wxDialUpManagerMSW)
+};
+
+// ----------------------------------------------------------------------------
+// private functions
+// ----------------------------------------------------------------------------
+
+static LRESULT WINAPI wxRasStatusWindowProc(HWND hWnd, UINT message,
+ WPARAM wParam, LPARAM lParam);
+
+static DWORD wxRasMonitorThread(wxRasThreadData *data);
+
+static void WINAPI wxRasDialFunc(UINT unMsg,
+ RASCONNSTATE rasconnstate,
+ DWORD dwError);
+
+// ============================================================================
+// implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// init the static variables
+// ----------------------------------------------------------------------------
+
+HRASCONN wxDialUpManagerMSW::ms_hRasConnection = 0;
+
+HWND wxDialUpManagerMSW::ms_hwndRas = 0;
+
+RASDIAL wxDialUpManagerMSW::ms_pfnRasDial = 0;
+RASENUMCONNECTIONS wxDialUpManagerMSW::ms_pfnRasEnumConnections = 0;
+RASENUMENTRIES wxDialUpManagerMSW::ms_pfnRasEnumEntries = 0;
+RASGETCONNECTSTATUS wxDialUpManagerMSW::ms_pfnRasGetConnectStatus = 0;
+RASGETERRORSTRING wxDialUpManagerMSW::ms_pfnRasGetErrorString = 0;
+RASHANGUP wxDialUpManagerMSW::ms_pfnRasHangUp = 0;
+RASGETPROJECTIONINFO wxDialUpManagerMSW::ms_pfnRasGetProjectionInfo = 0;
+RASCREATEPHONEBOOKENTRY wxDialUpManagerMSW::ms_pfnRasCreatePhonebookEntry = 0;
+RASEDITPHONEBOOKENTRY wxDialUpManagerMSW::ms_pfnRasEditPhonebookEntry = 0;
+RASSETENTRYDIALPARAMS wxDialUpManagerMSW::ms_pfnRasSetEntryDialParams = 0;
+RASGETENTRYDIALPARAMS wxDialUpManagerMSW::ms_pfnRasGetEntryDialParams = 0;
+RASENUMDEVICES wxDialUpManagerMSW::ms_pfnRasEnumDevices = 0;
+RASGETCOUNTRYINFO wxDialUpManagerMSW::ms_pfnRasGetCountryInfo = 0;
+RASGETENTRYPROPERTIES wxDialUpManagerMSW::ms_pfnRasGetEntryProperties = 0;
+RASSETENTRYPROPERTIES wxDialUpManagerMSW::ms_pfnRasSetEntryProperties = 0;
+RASRENAMEENTRY wxDialUpManagerMSW::ms_pfnRasRenameEntry = 0;
+RASDELETEENTRY wxDialUpManagerMSW::ms_pfnRasDeleteEntry = 0;
+RASVALIDATEENTRYNAME wxDialUpManagerMSW::ms_pfnRasValidateEntryName = 0;
+RASCONNECTIONNOTIFICATION wxDialUpManagerMSW::ms_pfnRasConnectionNotification = 0;
+
+int wxDialUpManagerMSW::ms_userSpecifiedOnlineStatus = -1;
+int wxDialUpManagerMSW::ms_isConnected = -1;
+wxDialUpManagerMSW *wxDialUpManagerMSW::ms_dialer = NULL;
+
+// ----------------------------------------------------------------------------
+// ctor and dtor: the dynamic linking happens here
+// ----------------------------------------------------------------------------
+
+// the static creator function is implemented here
+wxDialUpManager *wxDialUpManager::Create()
+{
+ return new wxDialUpManagerMSW;
+}
+
+#ifdef __VISUALC__
+ // warning about "'this' : used in base member initializer list" - so what?
+ #pragma warning(disable:4355)
+#endif // VC++
+
+wxDialUpManagerMSW::wxDialUpManagerMSW()
+ : m_timerStatusPolling(this),
+ m_dllRas(_T("RASAPI32"))
+{
+ // initialize our data
+ m_autoCheckLevel = 0;
+ m_hThread = 0;
+ m_data = new wxRasThreadData;
+
+ if ( !m_dllRas.IsLoaded() )
+ {
+ wxLogError(_("Dial up functions are unavailable because the remote access service (RAS) is not installed on this machine. Please install it."));
+ }
+ else if ( !ms_pfnRasDial )
+ {
+ // resolve the functions we need
+
+ // this will contain the name of the function we failed to resolve
+ // if any at the end
+ const char *funcName = NULL;
+
+ // get the function from rasapi32.dll and abort if it's not found
+ #define RESOLVE_RAS_FUNCTION(type, name) \
+ ms_pfn##name = (type)m_dllRas.GetSymbol( wxString(_T(#name)) \
+ + gs_funcSuffix); \
+ if ( !ms_pfn##name ) \
+ { \
+ funcName = #name; \
+ goto exit; \
+ }
+
+ // a variant of above macro which doesn't abort if the function is
+ // not found in the DLL
+ #define RESOLVE_OPTIONAL_RAS_FUNCTION(type, name) \
+ ms_pfn##name = (type)m_dllRas.GetSymbol( wxString(_T(#name)) \
+ + gs_funcSuffix);
+
+ RESOLVE_RAS_FUNCTION(RASDIAL, RasDial);
+ RESOLVE_RAS_FUNCTION(RASENUMCONNECTIONS, RasEnumConnections);
+ RESOLVE_RAS_FUNCTION(RASENUMENTRIES, RasEnumEntries);
+ RESOLVE_RAS_FUNCTION(RASGETCONNECTSTATUS, RasGetConnectStatus);
+ RESOLVE_RAS_FUNCTION(RASGETERRORSTRING, RasGetErrorString);
+ RESOLVE_RAS_FUNCTION(RASHANGUP, RasHangUp);
+ RESOLVE_RAS_FUNCTION(RASGETENTRYDIALPARAMS, RasGetEntryDialParams);
+
+ // suppress error messages about missing (non essential) functions
+ {
+ wxLogNull noLog;
+
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASGETPROJECTIONINFO, RasGetProjectionInfo);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASCREATEPHONEBOOKENTRY, RasCreatePhonebookEntry);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASEDITPHONEBOOKENTRY, RasEditPhonebookEntry);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASSETENTRYDIALPARAMS, RasSetEntryDialParams);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASGETENTRYPROPERTIES, RasGetEntryProperties);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASSETENTRYPROPERTIES, RasSetEntryProperties);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASRENAMEENTRY, RasRenameEntry);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASDELETEENTRY, RasDeleteEntry);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASVALIDATEENTRYNAME, RasValidateEntryName);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASGETCOUNTRYINFO, RasGetCountryInfo);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASENUMDEVICES, RasEnumDevices);
+ RESOLVE_OPTIONAL_RAS_FUNCTION(RASCONNECTIONNOTIFICATION, RasConnectionNotification);
+ }
+
+ // keep your preprocessor name space clean
+ #undef RESOLVE_RAS_FUNCTION
+ #undef RESOLVE_OPTIONAL_RAS_FUNCTION
+
+exit:
+ if ( funcName )
+ {
+ static const wxChar *msg = wxTRANSLATE(
+"The version of remote access service (RAS) installed on this machine is too\
+old, please upgrade (the following required function is missing: %s)."
+ );
+
+ wxLogError(wxGetTranslation(msg), funcName);
+ m_dllRas.Unload();
+ return;
+ }
+ }
+
+ // enable auto check by default
+ EnableAutoCheckOnlineStatus(0);
+}
+
+wxDialUpManagerMSW::~wxDialUpManagerMSW()
+{
+ CleanUpThreadData();
+}
+
+// ----------------------------------------------------------------------------
+// helper functions
+// ----------------------------------------------------------------------------
+
+wxString wxDialUpManagerMSW::GetErrorString(DWORD error)
+{
+ wxChar buffer[512]; // this should be more than enough according to MS docs
+ DWORD dwRet = ms_pfnRasGetErrorString(error, buffer, WXSIZEOF(buffer));
+ switch ( dwRet )
+ {
+ case ERROR_INVALID_PARAMETER:
+ // this was a standard Win32 error probably
+ return wxString(wxSysErrorMsg(error));
+
+ default:
+ {
+ wxLogSysError(dwRet,
+ _("Failed to retrieve text of RAS error message"));
+
+ wxString msg;
+ msg.Printf(_("unknown error (error code %08x)."), error);
+ return msg;
+ }
+
+ case 0:
+ // we want the error message to start from a lower case letter
+ buffer[0] = wxTolower(buffer[0]);
+
+ return wxString(buffer);
+ }
+}
+
+HRASCONN wxDialUpManagerMSW::FindActiveConnection()
+{
+ // enumerate connections
+ DWORD cbBuf = sizeof(RASCONN);
+ LPRASCONN lpRasConn = (LPRASCONN)malloc(cbBuf);
+ if ( !lpRasConn )
+ {
+ // out of memory
+ return 0;
+ }
+
+ lpRasConn->dwSize = sizeof(RASCONN);
+
+ DWORD nConnections = 0;
+ DWORD dwRet = ERROR_BUFFER_TOO_SMALL;
+
+ while ( dwRet == ERROR_BUFFER_TOO_SMALL )
+ {
+ dwRet = ms_pfnRasEnumConnections(lpRasConn, &cbBuf, &nConnections);
+
+ if ( dwRet == ERROR_BUFFER_TOO_SMALL )
+ {
+ LPRASCONN lpRasConnOld = lpRasConn;
+ lpRasConn = (LPRASCONN)realloc(lpRasConn, cbBuf);
+ if ( !lpRasConn )
+ {
+ // out of memory
+ free(lpRasConnOld);
+
+ return 0;
+ }
+ }
+ else if ( dwRet == 0 )
+ {
+ // ok, success
+ break;
+ }
+ else
+ {
+ // an error occured
+ wxLogError(_("Cannot find active dialup connection: %s"),
+ GetErrorString(dwRet).c_str());
+ return 0;
+ }
+ }
+
+ HRASCONN hrasconn;
+
+ switch ( nConnections )
+ {
+ case 0:
+ // no connections
+ hrasconn = 0;
+ break;
+
+ default:
+ // more than 1 connection - we don't know what to do with this
+ // case, so give a warning but continue (taking the first
+ // connection) - the warning is really needed because this function
+ // is used, for example, to select the connection to hang up and so
+ // we may hang up the wrong connection here...
+ wxLogWarning(_("Several active dialup connections found, choosing one randomly."));
+ // fall through
+
+ case 1:
+ // exactly 1 connection, great
+ hrasconn = lpRasConn->hrasconn;
+ }
+
+ free(lpRasConn);
+
+ return hrasconn;
+}
+
+void wxDialUpManagerMSW::CleanUpThreadData()
+{
+ if ( m_hThread )
+ {
+ if ( !SetEvent(m_data->hEventQuit) )
+ {
+ wxLogLastError(_T("SetEvent(RasThreadQuit)"));
+ }
+ else // sent quit request to the background thread
+ {
+ // the thread still needs m_data so we can't free it here, rather
+ // let the thread do it itself
+ m_data = NULL;
+ }
+
+ CloseHandle(m_hThread);
+
+ m_hThread = 0;
+ }
+
+ if ( m_data )
+ {
+ delete m_data;
+ m_data = NULL;
+ }
+}
+
+// ----------------------------------------------------------------------------
+// connection status
+// ----------------------------------------------------------------------------
+
+void wxDialUpManagerMSW::CheckRasStatus()
+{
+ // use int, not bool to compare with -1
+ int isConnected = FindActiveConnection() != 0;
+ if ( isConnected != ms_isConnected )
+ {
+ if ( ms_isConnected != -1 )
+ {
+ // notify the program
+ NotifyApp(isConnected != 0);
+ }
+ // else: it's the first time we're called, just update the flag
+
+ ms_isConnected = isConnected;
+ }
+}
+
+void wxDialUpManagerMSW::NotifyApp(bool connected, bool fromOurselves) const
+{
+ wxDialUpEvent event(connected, fromOurselves);
+ (void)wxTheApp->ProcessEvent(event);
+}
+
+// this function is called whenever the status of any RAS connection on this
+// machine changes by RAS itself
+void wxDialUpManagerMSW::OnConnectStatusChange()
+{
+ // we know that status changed, but we don't know whether we're connected
+ // or not - so find it out
+ CheckRasStatus();
+}
+
+// this function is called by our callback which we give to RasDial() when
+// calling it asynchronously
+void wxDialUpManagerMSW::OnDialProgress(RASCONNSTATE rasconnstate,
+ DWORD dwError)
+{
+ if ( !GetDialer() )
+ {
+ // this probably means that CancelDialing() was called and we get
+ // "disconnected" notification
+ return;
+ }
+
+ // we're only interested in 2 events: connected and disconnected
+ if ( dwError )
+ {
+ wxLogError(_("Failed to establish dialup connection: %s"),
+ GetErrorString(dwError).c_str());
+
+ // we should still call RasHangUp() if we got a non 0 connection
+ if ( ms_hRasConnection )
+ {
+ ms_pfnRasHangUp(ms_hRasConnection);
+ ms_hRasConnection = 0;
+ }
+
+ ms_dialer = NULL;
+
+ NotifyApp(FALSE /* !connected */, TRUE /* we dialed ourselves */);
+ }
+ else if ( rasconnstate == RASCS_Connected )
+ {
+ ms_isConnected = TRUE;
+ ms_dialer = NULL;
+
+ NotifyApp(TRUE /* connected */, TRUE /* we dialed ourselves */);
+ }
+}
+
+// ----------------------------------------------------------------------------
+// implementation of wxDialUpManager functions
+// ----------------------------------------------------------------------------
+
+bool wxDialUpManagerMSW::IsOk() const
+{
+ return m_dllRas.IsLoaded();
+}
+
+size_t wxDialUpManagerMSW::GetISPNames(wxArrayString& names) const
+{
+ // fetch the entries
+ DWORD size = sizeof(RASENTRYNAME);
+ RASENTRYNAME *rasEntries = (RASENTRYNAME *)malloc(size);
+ rasEntries->dwSize = sizeof(RASENTRYNAME);
+
+ DWORD nEntries;
+ DWORD dwRet;
+ do
+ {
+ dwRet = ms_pfnRasEnumEntries
+ (
+ NULL, // reserved
+ NULL, // default phone book (or all)
+ rasEntries, // [out] buffer for the entries
+ &size, // [in/out] size of the buffer
+ &nEntries // [out] number of entries fetched
+ );
+
+ if ( dwRet == ERROR_BUFFER_TOO_SMALL )
+ {
+ // reallocate the buffer
+ rasEntries = (RASENTRYNAME *)realloc(rasEntries, size);
+ }
+ else if ( dwRet != 0 )
+ {
+ // some other error - abort
+ wxLogError(_("Failed to get ISP names: %s"),
+ GetErrorString(dwRet).c_str());
+
+ free(rasEntries);
+
+ return 0u;
+ }
+ }
+ while ( dwRet != 0 );
+
+ // process them
+ names.Empty();
+ for ( size_t n = 0; n < (size_t)nEntries; n++ )
+ {
+ names.Add(rasEntries[n].szEntryName);
+ }
+
+ free(rasEntries);
+
+ // return the number of entries
+ return names.GetCount();
+}
+
+bool wxDialUpManagerMSW::Dial(const wxString& nameOfISP,
+ const wxString& username,
+ const wxString& password,
+ bool async)
+{
+ // check preconditions
+ wxCHECK_MSG( IsOk(), FALSE, wxT("using uninitialized wxDialUpManager") );
+
+ if ( ms_hRasConnection )
+ {
+ wxFAIL_MSG(wxT("there is already an active connection"));
+
+ return TRUE;
+ }
+
+ // get the default ISP if none given
+ wxString entryName(nameOfISP);
+ if ( !entryName )
+ {
+ wxArrayString names;
+ size_t count = GetISPNames(names);
+ switch ( count )
+ {
+ case 0:
+ // no known ISPs, abort
+ wxLogError(_("Failed to connect: no ISP to dial."));
+
+ return FALSE;
+
+ case 1:
+ // only one ISP, choose it
+ entryName = names[0u];
+ break;
+
+ default:
+ // several ISPs, let the user choose
+ {
+ wxString *strings = new wxString[count];
+ for ( size_t i = 0; i < count; i++ )
+ {
+ strings[i] = names[i];
+ }
+
+ entryName = wxGetSingleChoice
+ (
+ _("Choose ISP to dial"),
+ _("Please choose which ISP do you want to connect to"),
+ count,
+ strings
+ );
+
+ delete [] strings;
+
+ if ( !entryName )
+ {
+ // cancelled by user
+ return FALSE;
+ }
+ }
+ }
+ }
+
+ RASDIALPARAMS rasDialParams;
+ rasDialParams.dwSize = sizeof(rasDialParams);
+ wxStrncpy(rasDialParams.szEntryName, entryName, RAS_MaxEntryName);
+
+ // do we have the username and password?
+ if ( !username || !password )
+ {
+ BOOL gotPassword;
+ DWORD dwRet = ms_pfnRasGetEntryDialParams
+ (
+ NULL, // default phonebook
+ &rasDialParams, // [in/out] the params of this entry
+ &gotPassword // [out] did we get password?
+ );
+
+ if ( dwRet != 0 )
+ {
+ wxLogError(_("Failed to connect: missing username/password."));
+
+ return FALSE;
+ }
+ }
+ else
+ {
+ wxStrncpy(rasDialParams.szUserName, username, UNLEN);
+ wxStrncpy(rasDialParams.szPassword, password, PWLEN);
+ }
+
+ // default values for other fields
+ rasDialParams.szPhoneNumber[0] = '\0';
+ rasDialParams.szCallbackNumber[0] = '\0';
+ rasDialParams.szCallbackNumber[0] = '\0';
+
+ rasDialParams.szDomain[0] = '*';
+ rasDialParams.szDomain[1] = '\0';
+
+ // apparently, this is not really necessary - passing NULL instead of the
+ // phone book has the same effect
+#if 0
+ wxString phoneBook;
+ if ( wxGetOsVersion() == wxWINDOWS_NT )
+ {
+ // first get the length
+ UINT nLen = ::GetSystemDirectory(NULL, 0);
+ nLen++;
+
+ if ( !::GetSystemDirectory(phoneBook.GetWriteBuf(nLen), nLen) )
+ {
+ wxLogSysError(_("Cannot find the location of address book file"));
+ }
+
+ phoneBook.UngetWriteBuf();
+
+ // this is the default phone book
+ phoneBook << "\\ras\\rasphone.pbk";
+ }
+#endif // 0
+
+ // TODO may be we should disable auto check while async dialing is in
+ // progress?
+
+ ms_dialer = this;
+
+ DWORD dwRet = ms_pfnRasDial
+ (
+ NULL, // no extended features
+ NULL, // default phone book file (NT only)
+ &rasDialParams,
+ 0, // use callback for notifications
+ async ? (void *)wxRasDialFunc // cast needed for gcc 3.1
+ : 0, // no notifications, sync operation
+ &ms_hRasConnection
+ );
+
+ if ( dwRet != 0 )
+ {
+ // can't pass a wxWCharBuffer through ( ... )
+ wxLogError(_("Failed to %s dialup connection: %s"),
+ wxString(async ? _("initiate") : _("establish")).c_str(),
+ GetErrorString(dwRet).c_str());
+
+ // we should still call RasHangUp() if we got a non 0 connection
+ if ( ms_hRasConnection )
+ {
+ ms_pfnRasHangUp(ms_hRasConnection);
+ ms_hRasConnection = 0;
+ }
+
+ ms_dialer = NULL;
+
+ return FALSE;
+ }
+
+ // for async dialing, we're not yet connected
+ if ( !async )
+ {
+ ms_isConnected = TRUE;
+ }
+
+ return TRUE;
+}
+
+bool wxDialUpManagerMSW::IsDialing() const
+{
+ return GetDialer() != NULL;
+}
+
+bool wxDialUpManagerMSW::CancelDialing()
+{
+ if ( !GetDialer() )
+ {
+ // silently ignore
+ return FALSE;
+ }
+
+ wxASSERT_MSG( ms_hRasConnection, wxT("dialing but no connection?") );
+
+ ms_dialer = NULL;
+
+ return HangUp();
+}
+
+bool wxDialUpManagerMSW::HangUp()
+{
+ wxCHECK_MSG( IsOk(), FALSE, wxT("using uninitialized wxDialUpManager") );
+
+ // we may terminate either the connection we initiated or another one which
+ // is active now
+ HRASCONN hRasConn;
+ if ( ms_hRasConnection )
+ {
+ hRasConn = ms_hRasConnection;
+
+ ms_hRasConnection = 0;
+ }
+ else
+ {
+ hRasConn = FindActiveConnection();
+ }
+
+ if ( !hRasConn )
+ {
+ wxLogError(_("Cannot hang up - no active dialup connection."));
+
+ return FALSE;
+ }
+
+ DWORD dwRet = ms_pfnRasHangUp(hRasConn);
+ if ( dwRet != 0 )
+ {
+ wxLogError(_("Failed to terminate the dialup connection: %s"),
+ GetErrorString(dwRet).c_str());
+ }
+
+ ms_isConnected = FALSE;
+
+ return TRUE;
+}
+
+bool wxDialUpManagerMSW::IsAlwaysOnline() const
+{
+ // assume no permanent connection by default
+ bool isAlwaysOnline = FALSE;
+
+ // try to use WinInet functions
+
+ // NB: we could probably use wxDynamicLibrary here just as well,
+ // but we allow multiple instances of wxDialUpManagerMSW so
+ // we might as well use the ref counted version here too.
+
+ wxDynamicLibrary hDll(_T("WININET"));
+ if ( hDll.IsLoaded() )
+ {
+ typedef BOOL (WINAPI *INTERNETGETCONNECTEDSTATE)(LPDWORD, DWORD);
+ INTERNETGETCONNECTEDSTATE pfnInternetGetConnectedState;
+
+ #define RESOLVE_FUNCTION(type, name) \
+ pfn##name = (type)hDll.GetSymbol(_T(#name))
+
+ RESOLVE_FUNCTION(INTERNETGETCONNECTEDSTATE, InternetGetConnectedState);
+
+ if ( pfnInternetGetConnectedState )
+ {
+ DWORD flags = 0;
+ if ( pfnInternetGetConnectedState(&flags, 0 /* reserved */) )
+ {
+ // there is some connection to the net, see of which type
+ isAlwaysOnline = (flags & (INTERNET_CONNECTION_LAN |
+ INTERNET_CONNECTION_PROXY)) != 0;
+ }
+ //else: no Internet connection at all
+ }
+ }
+
+ return isAlwaysOnline;
+}
+
+bool wxDialUpManagerMSW::IsOnline() const
+{
+ wxCHECK_MSG( IsOk(), FALSE, wxT("using uninitialized wxDialUpManager") );
+
+ if ( IsAlwaysOnline() )
+ {
+ // always => now
+ return true;
+ }
+
+ if ( ms_userSpecifiedOnlineStatus != -1 )
+ {
+ // user specified flag overrides our logic
+ return ms_userSpecifiedOnlineStatus != 0;
+ }
+ else
+ {
+ // return TRUE if there is at least one active connection
+ return FindActiveConnection() != 0;
+ }
+}
+
+void wxDialUpManagerMSW::SetOnlineStatus(bool isOnline)
+{
+ wxCHECK_RET( IsOk(), wxT("using uninitialized wxDialUpManager") );
+
+ ms_userSpecifiedOnlineStatus = isOnline;
+}
+
+bool wxDialUpManagerMSW::EnableAutoCheckOnlineStatus(size_t nSeconds)
+{
+ wxCHECK_MSG( IsOk(), FALSE, wxT("using uninitialized wxDialUpManager") );
+
+ if ( m_autoCheckLevel++ )
+ {
+ // already checking
+ return TRUE;
+ }
+
+ bool ok = ms_pfnRasConnectionNotification != 0;
+
+ if ( ok )
+ {
+ // we're running under NT 4.0, Windows 98 or later and can use
+ // RasConnectionNotification() to be notified by a secondary thread
+
+ // first, see if we don't have this thread already running
+ if ( m_hThread != 0 )
+ {
+ if ( ::ResumeThread(m_hThread) != (DWORD)-1 )
+ return TRUE;
+
+ // we're leaving a zombie thread... but what else can we do?
+ wxLogLastError(wxT("ResumeThread(RasThread)"));
+
+ ok = FALSE;
+ }
+ }
+
+ // create all the stuff we need to be notified about RAS connection
+ // status change
+
+ if ( ok )
+ {
+ // first create an event to wait on
+ m_data->hEventRas = CreateEvent
+ (
+ NULL, // security attribute (default)
+ FALSE, // manual reset (no, it is automatic)
+ FALSE, // initial state (not signaled)
+ NULL // name (no)
+ );
+ if ( !m_data->hEventRas )
+ {
+ wxLogLastError(wxT("CreateEvent(RasStatus)"));
+
+ ok = FALSE;
+ }
+ }
+
+ if ( ok )
+ {
+ // create the event we use to quit the thread: using a manual event
+ // here avoids problems with missing the event if wxDialUpManagerMSW
+ // is created and destroyed immediately, before wxRasStatusWindowProc
+ // starts waiting on the event
+ m_data->hEventQuit = CreateEvent
+ (
+ NULL, // default security
+ TRUE, // manual event
+ FALSE, // initially non signalled
+ NULL // nameless
+ );
+ if ( !m_data->hEventQuit )
+ {
+ wxLogLastError(wxT("CreateEvent(RasThreadQuit)"));
+
+ CleanUpThreadData();
+
+ ok = FALSE;
+ }
+ }
+
+ if ( ok && !ms_hwndRas )
+ {
+ // create a hidden window to receive notification about connections
+ // status change
+ extern const wxChar *wxCanvasClassName;
+ ms_hwndRas = ::CreateWindow(wxCanvasClassName, NULL,
+ 0, 0, 0, 0,
+ 0, NULL,
+ (HMENU)NULL, wxGetInstance(), 0);
+ if ( !ms_hwndRas )
+ {
+ wxLogLastError(wxT("CreateWindow(RasHiddenWindow)"));
+
+ CleanUpThreadData();
+
+ ok = FALSE;
+ }
+
+ // and subclass it
+ wxSetWindowProc(ms_hwndRas, wxRasStatusWindowProc);
+ }
+
+ m_data->hWnd = ms_hwndRas;
+
+ if ( ok )
+ {
+ // start the secondary thread
+ m_data->dialUpManager = this;
+
+ DWORD tid;
+ m_hThread = CreateThread
+ (
+ NULL,
+ 0,
+ (LPTHREAD_START_ROUTINE)wxRasMonitorThread,
+ (void *)m_data,
+ 0,
+ &tid
+ );
+
+ if ( !m_hThread )
+ {
+ wxLogLastError(wxT("CreateThread(RasStatusThread)"));
+
+ CleanUpThreadData();
+ }
+ }
+
+ if ( ok )
+ {
+ // start receiving RAS notifications
+ DWORD dwRet = ms_pfnRasConnectionNotification
+ (
+ (HRASCONN)INVALID_HANDLE_VALUE,
+ m_data->hEventRas,
+ 3 /* RASCN_Connection | RASCN_Disconnection */
+ );
+
+ if ( dwRet != 0 )
+ {
+ wxLogDebug(wxT("RasConnectionNotification() failed: %s"),
+ GetErrorString(dwRet).c_str());
+
+ CleanUpThreadData();
+ }
+ else
+ {
+ return TRUE;
+ }
+ }
+
+ // we're running under Windows 95 and have to poll ourselves
+ // (or, alternatively, the code above for NT/98 failed)
+ m_timerStatusPolling.Stop();
+ if ( nSeconds == 0 )
+ {
+ // default value
+ nSeconds = 60;
+ }
+ m_timerStatusPolling.Start(nSeconds * 1000);
+
+ return TRUE;
+}
+
+void wxDialUpManagerMSW::DisableAutoCheckOnlineStatus()
+{
+ wxCHECK_RET( IsOk(), wxT("using uninitialized wxDialUpManager") );
+
+ if ( --m_autoCheckLevel )
+ {
+ // still checking
+ return;
+ }
+
+ if ( m_hThread )
+ {
+ // we have running secondary thread, it's just enough to suspend it
+ if ( SuspendThread(m_hThread) == (DWORD)-1 )
+ {
+ wxLogLastError(wxT("SuspendThread(RasThread)"));
+ }
+ }
+ else
+ {
+ // even simpler - just stop the timer
+ m_timerStatusPolling.Stop();
+ }
+}
+
+// ----------------------------------------------------------------------------
+// stubs which don't do anything in MSW version
+// ----------------------------------------------------------------------------
+
+void wxDialUpManagerMSW::SetWellKnownHost(const wxString& WXUNUSED(hostname),
+ int WXUNUSED(port))
+{
+ wxCHECK_RET( IsOk(), wxT("using uninitialized wxDialUpManager") );
+
+ // nothing to do - we don't use this
+}
+
+void wxDialUpManagerMSW::SetConnectCommand(const wxString& WXUNUSED(dial),
+ const wxString& WXUNUSED(hangup))
+{
+ wxCHECK_RET( IsOk(), wxT("using uninitialized wxDialUpManager") );
+
+ // nothing to do - we don't use this
+}
+
+// ----------------------------------------------------------------------------
+// callbacks
+// ----------------------------------------------------------------------------
+
+static DWORD wxRasMonitorThread(wxRasThreadData *data)
+{
+ HANDLE handles[2];
+ handles[0] = data->hEventRas;
+ handles[1] = data->hEventQuit;
+
+ bool cont = TRUE;
+ while ( cont )
+ {
+ DWORD dwRet = WaitForMultipleObjects(2, handles, FALSE, INFINITE);
+
+ switch ( dwRet )
+ {
+ case WAIT_OBJECT_0:
+ // RAS connection status changed
+ SendMessage(data->hWnd, wxWM_RAS_STATUS_CHANGED,
+ 0, (LPARAM)data);
+ break;
+
+ case WAIT_OBJECT_0 + 1:
+ cont = FALSE;
+ break;
+
+ default:
+ wxFAIL_MSG( _T("unexpected return of WaitForMultipleObjects()") );
+ // fall through
+
+ case WAIT_FAILED:
+#ifdef __WXDEBUG__
+ // using wxLogLastError() from here is dangerous: we risk to
+ // deadlock the main thread if wxLog sends output to GUI
+ DWORD err = GetLastError();
+ wxMessageOutputDebug().Printf
+ (
+ wxT("WaitForMultipleObjects(RasMonitor) failed: 0x%08lx (%s)"),
+ err,
+ wxSysErrorMsg(err)
+ );
+#endif // __WXDEBUG__
+
+ // no sense in continuing, who knows if the handles we're
+ // waiting for even exist yet...
+ return (DWORD)-1;
+ }
+ }
+
+ // we don't need it any more now and if this thread ran, it is our
+ // responsability to free the data
+ delete data;
+
+ return 0;
+}
+
+static LRESULT APIENTRY wxRasStatusWindowProc(HWND hWnd, UINT message,
+ WPARAM wParam, LPARAM lParam)
+{
+ switch ( message )
+ {
+ case wxWM_RAS_STATUS_CHANGED:
+ {
+ wxRasThreadData *data = (wxRasThreadData *)lParam;
+ data->dialUpManager->OnConnectStatusChange();
+ }
+ break;
+
+ case wxWM_RAS_DIALING_PROGRESS:
+ {
+ wxDialUpManagerMSW *dialMan = wxDialUpManagerMSW::GetDialer();
+
+ dialMan->OnDialProgress((RASCONNSTATE)wParam, lParam);
+ }
+ break;
+
+ default:
+ return ::DefWindowProc(hWnd, message, wParam, lParam);
+ }
+
+ return 0;
+}
+
+static void WINAPI wxRasDialFunc(UINT WXUNUSED(unMsg),
+ RASCONNSTATE rasconnstate,
+ DWORD dwError)
+{
+ wxDialUpManagerMSW *dialUpManager = wxDialUpManagerMSW::GetDialer();
+
+ wxCHECK_RET( dialUpManager, wxT("who started to dial then?") );
+
+ SendMessage(dialUpManager->GetRasWindow(), wxWM_RAS_DIALING_PROGRESS,
+ rasconnstate, dwError);
+}
+
+#endif // __PALMOS__
+
+#endif // wxUSE_DIALUP_MANAGER
+
projects / wxWidgets.git / blobdiff