netchck.cpp
上传用户:zhongxx05
上传日期:2007-06-06
资源大小:33641k
文件大小:11k
- /* ***** BEGIN LICENSE BLOCK *****
- * Version: RCSL 1.0/RPSL 1.0
- *
- * Portions Copyright (c) 1995-2002 RealNetworks, Inc. All Rights Reserved.
- *
- * The contents of this file, and the files included with this file, are
- * subject to the current version of the RealNetworks Public Source License
- * Version 1.0 (the "RPSL") available at
- * http://www.helixcommunity.org/content/rpsl unless you have licensed
- * the file under the RealNetworks Community Source License Version 1.0
- * (the "RCSL") available at http://www.helixcommunity.org/content/rcsl,
- * in which case the RCSL will apply. You may also obtain the license terms
- * directly from RealNetworks. You may not use this file except in
- * compliance with the RPSL or, if you have a valid RCSL with RealNetworks
- * applicable to this file, the RCSL. Please see the applicable RPSL or
- * RCSL for the rights, obligations and limitations governing use of the
- * contents of the file.
- *
- * This file is part of the Helix DNA Technology. RealNetworks is the
- * developer of the Original Code and owns the copyrights in the portions
- * it created.
- *
- * This file, and the files included with this file, is distributed and made
- * available on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
- * EXPRESS OR IMPLIED, AND REALNETWORKS HEREBY DISCLAIMS ALL SUCH WARRANTIES,
- * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, FITNESS
- * FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
- *
- * Technology Compatibility Kit Test Suite(s) Location:
- * http://www.helixcommunity.org/content/tck
- *
- * Contributor(s):
- *
- * ***** END LICENSE BLOCK ***** */
- #include "prefdefs.h"
- #include "netchck.h"
- #include "hxtick.h"
- #include "hxassert.h"
- CHXNetCheck::CHXNetCheck(UINT32 timeout) :
- XHXNetCheck(timeout),
- m_phxNetServices(0),
- m_phxTCPSocket(0),
- m_pContext(0),
- m_fConnected(FALSE),
- m_fFailed(FALSE),
- m_lRefCount(0)
- {
- }
- CHXNetCheck::~CHXNetCheck()
- {
- if (m_pContext)
- m_pContext->Release();
- m_pContext = NULL;
-
- if (m_phxNetServices)
- m_phxNetServices->Release();
- m_phxNetServices = NULL;
- if (m_phxTCPSocket)
- m_phxTCPSocket->Release();
- m_phxTCPSocket = NULL;
-
- }
- /////////////////////////////////////////////////////////////////////////
- // Method:
- // IUnknown::QueryInterface
- // Purpose:
- // Implement this to export the interfaces supported by your
- // object.
- //
- STDMETHODIMP CHXNetCheck::QueryInterface(REFIID riid, void** ppvObj)
- {
- if (IsEqualIID(riid, IID_IUnknown))
- {
- AddRef();
- *ppvObj = this;
- return HXR_OK;
- }
- if (IsEqualIID(riid, IID_IHXTCPResponse))
- {
- AddRef();
- *ppvObj = (IHXTCPResponse*)this;
- return HXR_OK;
- }
- *ppvObj = NULL;
- return HXR_NOINTERFACE;
- }
- /////////////////////////////////////////////////////////////////////////
- // Method:
- // IUnknown::AddRef
- // Purpose:
- // Everyone usually implements this the same... feel free to use
- // this implementation.
- //
- STDMETHODIMP_(UINT32) CHXNetCheck::AddRef()
- {
- return InterlockedIncrement(&m_lRefCount);
- }
- /////////////////////////////////////////////////////////////////////////
- // Method:
- // IUnknown::Release
- // Purpose:
- // Everyone usually implements this the same... feel free to use
- // this implementation.
- //
- STDMETHODIMP_(UINT32) CHXNetCheck::Release()
- {
- if (InterlockedDecrement(&m_lRefCount) > 0)
- {
- return m_lRefCount;
- }
- delete this;
- return 0;
- }
- /*
- * IHXTCPResponse methods
- */
- /************************************************************************
- * Method:
- * IHXTCPResponse::ConnectDone
- * Purpose:
- * A Connect operation has been completed or an error has occurred.
- */
- STDMETHODIMP CHXNetCheck::ConnectDone (HX_RESULT status)
- {
- HX_ASSERT(m_fConnected == FALSE); // We shouldn't be getting called if
- // we aren't expecting it.
- if (status == HXR_OK)
- m_fConnected = TRUE;
- else
- m_fFailed = TRUE;
- return HXR_OK;
- }
- /************************************************************************
- * Method:
- * IHXTCPResponse::ReadDone
- * Purpose:
- * A Read operation has been completed or an error has occurred.
- * The data is returned in the IHXBuffer.
- */
- STDMETHODIMP CHXNetCheck::ReadDone (HX_RESULT status,
- IHXBuffer* pBuffer)
- {
- HX_ASSERT(FALSE);
- return HXR_OK;
- }
- /************************************************************************
- * Method:
- * IHXTCPResponse::WriteReady
- * Purpose:
- * This is the response method for WantWrite.
- * If HX_RESULT is ok, then the TCP channel is ok to Write to.
- */
- STDMETHODIMP CHXNetCheck::WriteReady (HX_RESULT status)
- {
- HX_ASSERT(FALSE);
- return HXR_OK;
- }
- /************************************************************************
- * Method:
- * IHXTCPResponse::Closed
- * Purpose:
- * This method is called to inform you that the TCP channel has
- * been closed by the peer or closed due to error.
- */
- STDMETHODIMP CHXNetCheck::Closed(HX_RESULT status)
- {
- m_fConnected = FALSE;
- return HXR_OK;
- }
- //******************************************************************************
- //
- // Method: CHXNetCheck::Init
- //
- // Purpose: Sets up the CHXNetCheck object with a context.
- //
- //
- // Notes: n/a
- //
- //******************************************************************************
- HX_RESULT
- CHXNetCheck::Init(IUnknown *pContext)
- {
- if (!pContext)
- return HXR_FAILED;
- m_pContext = pContext;
- m_pContext->AddRef();
- m_pContext->QueryInterface(IID_IHXNetworkServices, (void**)&m_phxNetServices);
- return HXR_OK;
- }
- //******************************************************************************
- //
- // Method: CHXNetCheck::FInternetAvailable
- //
- // Purpose: Checks to see if the internet is available. Returns true if it is,
- // false otherwise.
- //
- //
- // Notes: n/a
- //
- //******************************************************************************
- BOOL
- CHXNetCheck::FInternetAvailable(BOOL fPing,BOOL fProxy)
- {
- BOOL fRet = TRUE;
- UINT16 nPort = DEF_HTTP_PORT;
-
- #ifdef UNIMPLEMENTED
- HKEY hKey = 0 ;
- DWORD fAutoDial = 0 ;
- DWORD regType = 0 ;
- DWORD cbBuf;
- if (fProxy)
- return TRUE;
- // check the autodial bit in the registry.
- RegOpenKey(HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Internet Settings",
- &hKey);
- cbBuf = sizeof(fAutoDial);
- if (hKey)
- RegQueryValueEx(hKey, "EnableAutodial", NULL, ®Type, (BYTE *) &fAutoDial, &cbBuf);
- if (!fAutoDial) // if it's not set, go ahead and try the network
- {
- if (fPing)
- fRet = Ping("209.66.98.23", nPort, FALSE);
- else
- fRet = TRUE;
- goto Ret;
- }
- else // See if we have an active RAS connection
- {
- DWORD cRasConns = 0;
- RASCONN rgRasConn[5];
- DWORD cb = sizeof(rgRasConn);
-
- if (!m_hRasApiModule)
- m_hRasApiModule= LoadLibrary("rasapi32.dll");
- if (!m_hRasApiModule) // Dialup networking is not installed.
- {
- if (fPing)
- fRet = Ping("209.66.98.23", nPort, FALSE);
- else
- fRet = TRUE;
- goto Ret;
- }
- if (!m_pRasEnumConnections)
- m_pRasEnumConnections =
- (FPRASENUMCONNECTIONS)GetProcAddress(m_hRasApiModule, (LPCSTR) MAKELONG(565,0));
- if (!m_pRasEnumConnections) // Dialup networking is not installed.
- {
- if (fPing)
- fRet = Ping("209.66.98.23", nPort, FALSE);
- else
- fRet = TRUE;
- goto Ret;
- }
- rgRasConn[0].dwSize = sizeof(RASCONN);
- m_pRasEnumConnections(rgRasConn, &cb, &cRasConns);
-
- if (cRasConns)
- {
- if (fPing)
- fRet = Ping("209.66.98.23", nPort, FALSE);
- else
- fRet = TRUE;
- goto Ret;
- }
- else
- {
- fRet = FALSE;
- goto Ret;
- }
- }
- Ret:
- #endif
- return (fRet);
- }
- //******************************************************************************
- //
- // Method: CHXNetCheck::Ping
- //
- // Purpose: Tests to see if we can open a TCP connection to the given hostname.
- // if fAynchronous is true, we call back a response object provided by
- // the caller (through Init). Otherwise we block.
- //
- //
- // Notes: n/a
- //
- //******************************************************************************
- BOOL CHXNetCheck::Ping(const char *szHostName, UINT16 nPort, BOOL fAsynchronous)
- {
- ULONG32 ulStartTime, ulCurrentTime, ulInterval, ulElapsedTime=0;
- BOOL fRet = FALSE;
-
- if (!m_phxTCPSocket)
- m_phxNetServices->CreateTCPSocket(&m_phxTCPSocket);
- m_fFailed = m_fConnected = FALSE;
- m_phxTCPSocket->Init(this);
-
- m_phxTCPSocket->Connect(szHostName, nPort);
- ulInterval = 30000;
-
- // Get start time
- ulStartTime = HX_GET_TICKCOUNT();
- while (!m_fFailed && !m_fConnected && (ulElapsedTime < ulInterval))
- {
- SleepWell(1000);
- ulCurrentTime = HX_GET_TICKCOUNT();
- ulElapsedTime = CALCULATE_ELAPSED_TICKS(ulStartTime, ulCurrentTime);
- }
- fRet = m_fConnected;
- m_phxTCPSocket->Release();
- m_phxTCPSocket = NULL;
- return (fRet);
- }
- //******************************************************************************
- //
- // Method: CHXNetCheck::SleepWell
- //
- // Purpose: This method sleeps but continues to pump messages. This allows us to
- // block properly, even under such platforms as Win16.
- //
- //
- // Notes: n/a
- //
- //******************************************************************************
- void CHXNetCheck::SleepWell(ULONG32 ulInterval)
- {
- #if 0
- ULONG32 ulStartTime, ulCurrentTime;
- MSG msg;
-
- // Get start time
- ulStartTime = HX_GET_TICKCOUNT();
- do
- {
- // Keep pumping messages
- if(PeekMessage(&msg, NULL,0,0,PM_REMOVE))
- {
- TranslateMessage(&msg);
- DispatchMessage(&msg);
- }
- // If we have waited ulInterval time then drop out
- ulCurrentTime = HX_GET_TICKCOUNT();
- } while (CALCULATE_ELAPSED_TICKS(ulStartTime, ulCurrentTime) < ulInterval);
- #endif
- }
- BOOL
- CHXNetCheck::SmartPing()
- {
- HX_ASSERT(FALSE);
- return FALSE;
- }