mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
562 lines
14 KiB
562 lines
14 KiB
#include "stdafx.h"
|
|
|
|
extern "C"
|
|
{
|
|
#define _NTSEAPI_ // We already have the security API hdrs
|
|
#include <getuser.h> // User browser
|
|
}
|
|
|
|
#include "catscfg.h"
|
|
#include "permissi.h"
|
|
#ifdef GATEWAY // Not used in Shuttle
|
|
#include "diskcach.h"
|
|
#endif
|
|
#include "catsvc.h"
|
|
|
|
#ifdef GATEWAY // Not used in Shuttle
|
|
#include "filterpa.h"
|
|
#endif
|
|
|
|
// ===========================================================================
|
|
// Standard configuration Information
|
|
// ===========================================================================
|
|
|
|
//
|
|
// Is this server discoverable by INETSLOC?
|
|
//
|
|
#define INETSLOC_DISCOVERY TRUE
|
|
|
|
#if (INETSLOC_DISCOVERY) && !defined(_SVCLOC_)
|
|
#error You must include svcloc.h.
|
|
#endif
|
|
|
|
//
|
|
// If INETSLOC_DISCOVERY == TRUE, define the discovery MASK here.
|
|
//
|
|
#if (INETSLOC_DISCOVERY)
|
|
#ifdef GATEWAY
|
|
#define INETSLOC_MASK INET_GATEWAY_SERVICE
|
|
#else // Shuttle
|
|
#define INETSLOC_MASK INET_MSN_SERVICE
|
|
#endif // _GATEWAY
|
|
#else // (!INETSLOC_DISCOVERY)
|
|
#define INETSLOC_MASK (ULONGLONG)(0x00000000)
|
|
#endif // (INETSLOC_DISCOVERY)
|
|
|
|
//
|
|
// Can we change the service state (start/pause/continue)?
|
|
//
|
|
#define CAN_CHANGE_SERVICE_STATE TRUE
|
|
|
|
//
|
|
// Can we pause this service?
|
|
//
|
|
#define CAN_PAUSE_SERVICE TRUE
|
|
|
|
//
|
|
// Name used for this service by the service controller manager.
|
|
//
|
|
#ifdef GATEWAY
|
|
#define SERVICE_SC_NAME _T("InetGatewaySvc")
|
|
#else // SHUTTLE
|
|
#define SERVICE_SC_NAME _T("MsnSvc")
|
|
#endif // GATEWAY
|
|
|
|
//
|
|
// Short descriptive name of the service. This
|
|
// is what will show up as the name of the service
|
|
// in the internet manager tool.
|
|
//
|
|
// Issue: I'm assuming here that this name does NOT
|
|
// require localisation.
|
|
//
|
|
#ifdef GATEWAY
|
|
#define SERVICE_SHORT_NAME _T("Gateway")
|
|
#else // SHUTTLE
|
|
#define SERVICE_SHORT_NAME _T("MSN Access")
|
|
#endif // GATEWAY
|
|
|
|
//
|
|
// Longer name. This is the text that shows up in
|
|
// the tooltips text on the internet manager
|
|
// tool. This probably should be localised.
|
|
//
|
|
#ifdef GATEWAY
|
|
#define SERVICE_LONG_NAME _T("Gateway Service")
|
|
#else // SHUTTLE
|
|
#define SERVICE_LONG_NAME _T("MSN Access Service")
|
|
#endif // GATEWAY
|
|
|
|
//
|
|
// Use normal colour mapping.
|
|
//
|
|
#define NORMAL_TB_MAPPING TRUE
|
|
|
|
//
|
|
// Toolbar button background mask. This is
|
|
// the colour that gets masked out in
|
|
// the bitmap file and replaced with the
|
|
// actual button background. This setting
|
|
// is automatically assumed to be lt. gray
|
|
// if NORMAL_TB_MAPPING (above) is TRUE
|
|
//
|
|
#define BUTTON_BMP_BACKGROUND RGB(192, 192, 192) // Lt. Gray
|
|
|
|
//
|
|
// Resource ID of the toolbar button bitmap.
|
|
//
|
|
// The bitmap must be 16x16
|
|
//
|
|
#ifdef GATEWAY
|
|
#define BUTTON_BMP_ID IDB_GATEWAY
|
|
#else
|
|
#define BUTTON_BMP_ID IDB_SHUTTLE
|
|
#endif
|
|
|
|
//
|
|
// Similar to BUTTON_BMP_BACKGROUND, this is the
|
|
// background mask for the service ID
|
|
//
|
|
#define SERVICE_BMP_BACKGROUND BUTTON_BMP_BACKGROUND
|
|
|
|
//
|
|
// Bitmap id which is used in the service view
|
|
// of the service manager.
|
|
//
|
|
// The bitmap must be 16x16, and can be the
|
|
// same as BUTTON_BMP_ID bitmap.
|
|
//
|
|
#define SERVICE_BMP_ID BUTTON_BMP_ID
|
|
|
|
// ===========================================================================
|
|
// End Of Standard configuration Information
|
|
// ===========================================================================
|
|
|
|
//
|
|
// Catapult Property sheet
|
|
//
|
|
|
|
BEGIN_MESSAGE_MAP(CCatSheet, INetPropertySheet)
|
|
//{{AFX_MSG_MAP(InetPropertySheet)
|
|
ON_COMMAND(ID_HELP, OnHelp)
|
|
//}}AFX_MSG_MAP
|
|
END_MESSAGE_MAP()
|
|
|
|
CCatSheet::CCatSheet(
|
|
UINT nIDCaption,
|
|
CStringList *pServerList,
|
|
CWnd* pParentWnd,
|
|
UINT iSelectPage
|
|
)
|
|
: INetPropertySheet(nIDCaption, INETSLOC_MASK,
|
|
pServerList, pParentWnd, iSelectPage)
|
|
{
|
|
}
|
|
|
|
CCatSheet::CCatSheet(
|
|
LPCTSTR pszCaption,
|
|
CStringList *pServerList,
|
|
CWnd* pParentWnd,
|
|
UINT iSelectPage
|
|
)
|
|
: INetPropertySheet(pszCaption, INETSLOC_MASK,
|
|
pServerList, pParentWnd, iSelectPage)
|
|
{
|
|
}
|
|
|
|
//
|
|
// Initialise by calling calling the INet api's.
|
|
// This sets the error code.
|
|
//
|
|
void
|
|
CCatSheet::Initialize()
|
|
{
|
|
INetPropertySheet::Initialize();
|
|
}
|
|
|
|
//
|
|
// Support for this was added in MFC 3.2, but our
|
|
// CFM doesn't yet support this.
|
|
//
|
|
void
|
|
CCatSheet::OnHelp()
|
|
{
|
|
//
|
|
// this could have been provided by CPropertySheet::OnCmdMsg
|
|
// but we can't add virtual in a point release
|
|
//
|
|
CWnd* pOwner = GetWindow(GW_OWNER);
|
|
ASSERT(pOwner != this);
|
|
CString lpszText( "MSN Access Server help is currently unavailable.");
|
|
|
|
if (pOwner == NULL || !pOwner->MessageBox( lpszText))
|
|
{
|
|
//
|
|
// last crack goes to the current CWinThread object
|
|
//
|
|
CWinThread* pThread = AfxGetThread();
|
|
if (pThread != NULL)
|
|
{
|
|
// pThread->MessageBox( lpszText);
|
|
}
|
|
}
|
|
}
|
|
|
|
//
|
|
// Global DLL instance
|
|
//
|
|
HINSTANCE hInstance;
|
|
|
|
// ============================================================================
|
|
// ISM API Functions
|
|
// ============================================================================
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Return service-specific information back to
|
|
// to the application. This function is called
|
|
// by the service manager immediately after
|
|
// LoadLibary(); The size element must be
|
|
// set prior to calling this API.
|
|
//
|
|
DLL_BASED DWORD APIENTRY
|
|
ISMQueryServiceInfo(
|
|
ISMSERVICEINFO * psi // Service information returned.
|
|
)
|
|
{
|
|
if ( psi == NULL
|
|
|| psi->dwSize < ISMSERVICEINFO_SIZE
|
|
)
|
|
{
|
|
TRACEEOLID(_T("ISMQueryServiceInfo: ISMSERVICEINFO invalid"));
|
|
ASSERT(0);
|
|
return ERROR_INVALID_PARAMETER;
|
|
}
|
|
|
|
#ifdef _DEBUG
|
|
|
|
if (psi->dwSize != ISMSERVICEINFO_SIZE)
|
|
{
|
|
TRACEEOLID(_T("Warning: internet manager is newer than DLL"));
|
|
}
|
|
|
|
#endif // _DEBUG
|
|
|
|
psi->dwSize = ISMSERVICEINFO_SIZE;
|
|
psi->dwVersion = ISM_VERSION;
|
|
|
|
psi->flServiceInfoFlags = 0
|
|
#if (INETSLOC_DISCOVERY)
|
|
| ISMI_INETSLOCDISCOVER
|
|
#endif
|
|
#if (CAN_CONTROL_SERVICE)
|
|
| ISMI_CANCONTROLSERVICE
|
|
#endif
|
|
#if (CAN_PAUSE_SERVICE)
|
|
| ISMI_CANPAUSESERVICE
|
|
#endif
|
|
#if (NORMAL_TB_MAPPING)
|
|
| ISMI_NORMALTBMAPPING
|
|
#endif
|
|
; /**/
|
|
|
|
ASSERT(::lstrlen(SERVICE_LONG_NAME) <= MAX_LNLEN);
|
|
ASSERT(::lstrlen(SERVICE_SHORT_NAME) <= MAX_SNLEN);
|
|
|
|
psi->ullDiscoveryMask = INETSLOC_MASK;
|
|
psi->rgbButtonBkMask = BUTTON_BMP_BACKGROUND;
|
|
psi->nButtonBitmapID = BUTTON_BMP_ID;
|
|
psi->rgbServiceBkMask = SERVICE_BMP_BACKGROUND;
|
|
psi->nServiceBitmapID = SERVICE_BMP_ID;
|
|
::lstrcpy(psi->atchShortName, SERVICE_SHORT_NAME);
|
|
::lstrcpy(psi->atchLongName, SERVICE_LONG_NAME);
|
|
|
|
return ERROR_SUCCESS;
|
|
}
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Discover machines running this service. This is
|
|
// only necessary for services not discovered with
|
|
// inetscloc (which don't give a mask)
|
|
//
|
|
DLL_BASED DWORD APIENTRY
|
|
ISMDiscoverServers(
|
|
ISMSERVERINFO * psi, // Server info buffer.
|
|
DWORD * pdwBufferSize, // Size required/available.
|
|
int * cServers // Number of servers in buffer.
|
|
)
|
|
{
|
|
#if (INETSLOC_DISCOVERY)
|
|
*cServers = 0;
|
|
*pdwBufferSize = 0L;
|
|
|
|
TRACEEOLID(_T("Warning: service manager called bogus ISMDiscoverServers"));
|
|
|
|
return ERROR_SUCCESS;
|
|
|
|
#else
|
|
|
|
#error Service specific discovery function must be provided.
|
|
|
|
#endif // (INETSLOC_DISCOVERY)
|
|
}
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Get information about a specific server with
|
|
// regards to this service.
|
|
//
|
|
DLL_BASED DWORD APIENTRY
|
|
ISMQueryServerInfo(
|
|
LPTSTR lpstrServerName, // Name of server.
|
|
ISMSERVERINFO * psi // Server information returned.
|
|
)
|
|
{
|
|
if ( psi == NULL
|
|
|| psi->dwSize < ISMSERVERINFO_SIZE
|
|
|| ::lstrlen(lpstrServerName) > MAX_SERVERNAME_LEN
|
|
)
|
|
{
|
|
TRACEEOLID(_T("ISMQueryServerInfo: bad parameters"));
|
|
ASSERT(0);
|
|
return ERROR_INVALID_PARAMETER;
|
|
}
|
|
|
|
#ifdef _DEBUG
|
|
|
|
if (psi->dwSize != ISMSERVERINFO_SIZE)
|
|
{
|
|
TRACEEOLID(_T("Warning internet manager is newer than DLL"));
|
|
}
|
|
|
|
#endif // _DEBUG
|
|
|
|
psi->dwSize = ISMSERVERINFO_SIZE;
|
|
::lstrcpy(psi->atchServerName, lpstrServerName);
|
|
|
|
//
|
|
// Start with NULL comment
|
|
//
|
|
*psi->atchComment = _T('\0');
|
|
|
|
DWORD err = ::QueryInetServiceStatus(psi->atchServerName,
|
|
SERVICE_SC_NAME, &(psi->nState));
|
|
|
|
if (err == ERROR_SUCCESS)
|
|
{
|
|
//
|
|
// Try to get comment
|
|
//
|
|
::GetInetComment(psi->atchServerName, INETSLOC_MASK,
|
|
(sizeof(psi->atchComment)-1) / sizeof(psi->atchComment[0]),
|
|
psi->atchComment);
|
|
}
|
|
|
|
return err;
|
|
}
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Change the service state of the servers (to paused/continue, started,
|
|
// stopped, etc)
|
|
//
|
|
DLL_BASED DWORD APIENTRY
|
|
ISMChangeServiceState(
|
|
int nNewState, // INetService* definition.
|
|
int * pnCurrentState, // Ptr to current state (will be changed
|
|
DWORD dwReserved, // Reserved: must be 0
|
|
LPTSTR lpstrServers // Double NULL terminated list of servers.
|
|
)
|
|
{
|
|
if ( dwReserved != 0L
|
|
|| nNewState < INetServiceStopped
|
|
|| nNewState > INetServicePaused
|
|
)
|
|
{
|
|
TRACEEOLID(_T("ISMChangeServiceState: Invalid information passed"));
|
|
ASSERT(0);
|
|
return ERROR_INVALID_PARAMETER;
|
|
}
|
|
|
|
//
|
|
// BUGBUG: SINGLE SELECTION ONLY!
|
|
//
|
|
return ChangeInetServiceState(lpstrServers,
|
|
SERVICE_SC_NAME, nNewState, pnCurrentState);
|
|
}
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Display configuration property sheet.
|
|
//
|
|
DLL_BASED DWORD APIENTRY
|
|
ISMConfigureServers(
|
|
HWND hWnd, // Main app window handle
|
|
DWORD dwReserved, // Reserved: must be 0
|
|
LPTSTR lpstrServers // Double NULL terminated list of servers
|
|
)
|
|
{
|
|
DWORD err;
|
|
|
|
if ( dwReserved != 0L )
|
|
{
|
|
TRACEEOLID(_T("ISMConfigureServers: Invalid information passed"));
|
|
ASSERT(0);
|
|
return ERROR_INVALID_PARAMETER;
|
|
}
|
|
|
|
//
|
|
// convert the list of servers to a
|
|
// more manageable CStringList.
|
|
//
|
|
TCHAR * pBuf = lpstrServers;
|
|
CStringList strlServers;
|
|
while ( *pBuf != TCHAR('\0' ))
|
|
{
|
|
CString strTmp = pBuf;
|
|
strlServers.AddTail( strTmp );
|
|
pBuf += strTmp.GetLength() + 1;
|
|
}
|
|
|
|
if ( strlServers.GetCount() == 0 )
|
|
{
|
|
TRACEEOLID(_T("Error: strlServers Count == 0."));
|
|
return ERROR_INVALID_PARAMETER;
|
|
}
|
|
|
|
//
|
|
// Save the resource handle.
|
|
//
|
|
HINSTANCE hOldInstance = ::AfxGetResourceHandle();
|
|
ASSERT( hInstance != NULL );
|
|
|
|
//
|
|
// Load resources out of our own resource segment
|
|
//
|
|
::AfxSetResourceHandle( hInstance );
|
|
|
|
CString strCaption;
|
|
|
|
if (strlServers.GetCount() == 1)
|
|
{
|
|
CString str;
|
|
|
|
VERIFY(str.LoadString(IDS_CAPTION));
|
|
strCaption.Format(str, lpstrServers+2);
|
|
}
|
|
else // Multiple server caption
|
|
{
|
|
VERIFY(strCaption.LoadString(IDS_CAPTION_MULTIPLE));
|
|
}
|
|
|
|
CCatSheet Sheet( strCaption, &strlServers, CWnd::FromHandle(hWnd) );
|
|
|
|
//
|
|
// Call the APIs and build the property pages
|
|
//
|
|
Sheet.Initialize();
|
|
err = Sheet.QueryError();
|
|
|
|
if (err == NO_ERROR)
|
|
{
|
|
CCatServicePage pageService(&Sheet);
|
|
CPermissionsPage pagePermissions(&Sheet);
|
|
#ifdef GATEWAY // Not used in Shuttle
|
|
CDiskCachePage pageDiskCache(&Sheet);
|
|
#endif // GATEWAY
|
|
|
|
//
|
|
// Set logging page information
|
|
//
|
|
LoggingPage pageLogging(&Sheet);
|
|
|
|
#ifdef GATEWAY // Not used in Shuttle
|
|
CFilterPage pageFilter(&Sheet);
|
|
#endif // GATEWAY
|
|
|
|
//
|
|
// Add property pages
|
|
//
|
|
Sheet.AddPage( &pageService );
|
|
Sheet.AddPage( &pagePermissions );
|
|
#ifdef GATEWAY // Not used in Shuttle
|
|
Sheet.AddPage( &pageDiskCache );
|
|
#endif // GATEWAY
|
|
Sheet.AddPage( &pageLogging );
|
|
|
|
#ifdef GATEWAY // Not used in Shuttle
|
|
Sheet.AddPage( &pageFilter );
|
|
#endif // GATEWAY
|
|
|
|
if ( Sheet.DoModal() == IDOK )
|
|
{
|
|
//
|
|
// Save each dirty page, but don't
|
|
// bother with the DDV stuff, as that's
|
|
// already done at this point.
|
|
// ||
|
|
// \/
|
|
err = Sheet.SavePages(FALSE);
|
|
}
|
|
}
|
|
|
|
//
|
|
// reset the resource handle to the application's
|
|
// resource segment.
|
|
//
|
|
::AfxSetResourceHandle( hOldInstance );
|
|
|
|
return err;
|
|
}
|
|
|
|
// ============================================================================
|
|
// End of ISM API Functions
|
|
// ============================================================================
|
|
|
|
//
|
|
// Perform additional initialisation as necessary
|
|
//
|
|
void
|
|
InitializeDLL()
|
|
{
|
|
#ifdef _DEBUG
|
|
afxMemDF |= checkAlwaysMemDF;
|
|
#endif // _DEBUG
|
|
|
|
CWndIpAddress::CreateWindowClass( hInstance );
|
|
}
|
|
|
|
//
|
|
// DLL Main entry point
|
|
//
|
|
DLL_BASED BOOL WINAPI
|
|
LibMain(
|
|
HINSTANCE hDll,
|
|
DWORD dwReason,
|
|
LPVOID lpReserved
|
|
)
|
|
{
|
|
BOOL bResult = TRUE ;
|
|
|
|
switch ( dwReason )
|
|
{
|
|
case DLL_PROCESS_ATTACH:
|
|
case DLL_THREAD_ATTACH:
|
|
ASSERT( hDll != NULL );
|
|
hInstance = hDll;
|
|
InitializeDLL();
|
|
break ;
|
|
|
|
case DLL_THREAD_DETACH:
|
|
case DLL_PROCESS_DETACH:
|
|
//
|
|
// termination
|
|
//
|
|
break ;
|
|
}
|
|
|
|
ASSERT( hInstance != NULL );
|
|
|
|
return bResult ;
|
|
}
|