Leaked source code of windows server 2003
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.
 
 
 
 
 
 

1635 lines
38 KiB

/*++
Copyright (c) 1994-2001 Microsoft Corporation
Module Name :
iissite.cpp
Abstract:
IIS Site Object
Author:
Ronald Meijer (ronaldm)
Sergei Antonov (sergeia)
Project:
Internet Services Manager
Revision History:
10/28/2000 sergeia Split from iisobj.cpp
--*/
#include "stdafx.h"
#include "common.h"
#include "inetprop.h"
#include "InetMgrApp.h"
#include "iisobj.h"
#include "machsht.h"
#include "errors.h"
#include "impexp.h"
#include "tracker.h"
#ifdef _DEBUG
#undef THIS_FILE
static char BASED_CODE THIS_FILE[] = __FILE__;
#endif
#define new DEBUG_NEW
extern CPropertySheetTracker g_OpenPropertySheetTracker;
//
// CIISSite implementation
//
// <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
//
// Site Result View definition
//
/* static */ int
CIISSite::_rgnLabels[COL_TOTAL] =
{
IDS_RESULT_SERVICE_DESCRIPTION,
IDS_RESULT_SERVICE_ID,
IDS_RESULT_SERVICE_STATE,
IDS_RESULT_SERVICE_DOMAIN_NAME,
IDS_RESULT_SERVICE_IP_ADDRESS,
IDS_RESULT_SERVICE_TCP_PORT,
IDS_RESULT_SERVICE_SSL_PORT,
IDS_RESULT_STATUS,
};
int
CIISSite::_rgnLabels2[COL_TOTAL2] =
{
IDS_RESULT_SERVICE_DESCRIPTION,
IDS_RESULT_SERVICE_ID,
IDS_RESULT_SERVICE_STATE,
// 0, // blank
IDS_RESULT_SERVICE_IP_ADDRESS,
IDS_RESULT_SERVICE_TCP_PORT,
// 0, // blank
IDS_RESULT_STATUS,
};
/* static */ int
CIISSite::_rgnWidths[COL_TOTAL] =
{
180,
90,
70,
120,
105,
40,
60,
200,
};
/* static */ int
CIISSite::_rgnWidths2[COL_TOTAL2] =
{
180,
90,
70,
// 0, // blank
105,
40,
// 0, // blank
200,
};
/* static */ CComBSTR CIISSite::_bstrStarted;
/* static */ CComBSTR CIISSite::_bstrStopped;
/* static */ CComBSTR CIISSite::_bstrPaused;
/* static */ CComBSTR CIISSite::_bstrUnknown;
/* static */ CComBSTR CIISSite::_bstrPending;
/* static */ CComBSTR CIISSite::_bstrAllUnassigned;
/* static */ BOOL CIISSite::_fStaticsLoaded = FALSE;
/* static */
void
CIISSite::LoadStatics()
{
if (!_fStaticsLoaded)
{
_fStaticsLoaded =
_bstrStarted.LoadString(IDS_STARTED) &&
_bstrStopped.LoadString(IDS_STOPPED) &&
_bstrPaused.LoadString(IDS_PAUSED) &&
_bstrUnknown.LoadString(IDS_UNKNOWN) &&
_bstrPending.LoadString(IDS_PENDING) &&
_bstrAllUnassigned.LoadString(IDS_IP_ALL_UNASSIGNED);
}
}
/* static */
void
CIISSite::InitializeHeaders(LPHEADERCTRL lpHeader)
/*++
Routine Description:
Initialize the result headers
Arguments:
LPHEADERCTRL lpHeader : Header control
Return Value:
None
--*/
{
CIISObject::BuildResultView(lpHeader, COL_TOTAL, _rgnLabels, _rgnWidths);
// CIISDirectory::InitializeHeaders(lpHeader);
LoadStatics();
}
void
CIISSite::InitializeHeaders2(LPHEADERCTRL lpHeader)
/*++
Routine Description:
Initialize the result headers
Arguments:
LPHEADERCTRL lpHeader : Header control
Return Value:
None
--*/
{
CIISObject::BuildResultView(lpHeader, COL_TOTAL2, _rgnLabels2, _rgnWidths2);
// CIISDirectory::InitializeHeaders(lpHeader);
LoadStatics();
}
/* virtual */
void
CIISSite::InitializeChildHeaders(
IN LPHEADERCTRL lpHeader
)
/*++
Routine Description:
Build result view for immediate descendant type
Arguments:
LPHEADERCTRL lpHeader : Header control
Return Value:
None
--*/
{
CIISDirectory::InitializeHeaders(lpHeader);
}
CIISSite::CIISSite(
IN CIISMachine * pOwner,
IN CIISService * pService,
IN LPCTSTR szNodeName
)
/*++
Routine Description:
Constructor. Determine if the given service is administrable,
and resolve the details
Arguments:
CIISMachine * pOwner : Owner machine object
CIISService * pService : Service type
LPCTSTR szNodeName : Node name (numeric)
Return Value:
N/A
Notes:
This constructor does not immediately resolve the display name of the
site. It will only resolve its display information when asked
--*/
: CIISMBNode(pOwner, szNodeName),
m_pService(pService),
m_fResolved(FALSE),
m_strDisplayName(),
//
// Data members -- plonk in some defaults
//
m_dwState(MD_SERVER_STATE_INVALID),
m_fWolfPackEnabled(FALSE),
m_fFrontPageWeb(FALSE),
m_sPort(80),
m_sSSLPort(443),
m_dwID(::_ttol(szNodeName)),
m_dwIPAddress(0L),
m_dwWin32Error(ERROR_SUCCESS),
m_dwEnumError(ERROR_SUCCESS),
m_bstrHostHeaderName(),
m_bstrComment(),
m_fUsingActiveDir(FALSE)
{
ASSERT_PTR(m_pService);
m_pService->AddRef();
}
CIISSite::CIISSite(
IN CIISMachine * pOwner,
IN CIISService * pService,
IN LPCTSTR szNodeName,
IN DWORD dwState,
IN BOOL fClusterEnabled,
IN USHORT sPort,
IN DWORD dwID,
IN DWORD dwIPAddress,
IN DWORD dwWin32Error,
IN LPOLESTR szHostHeaderName,
IN LPOLESTR szComment
)
/*++
Routine Description:
Construct with full information
Arguments:
CIISMachine * pOwner : Owner machine object
CIISService * pService : Service type
LPCTSTR szNodeName : Node name (numeric)
plus datamembers
Return Value:
N/A
--*/
: CIISMBNode(pOwner, szNodeName),
m_pService(pService),
m_fResolved(TRUE),
m_strDisplayName(),
//
// Data Members
//
m_dwState(dwState),
m_fWolfPackEnabled(fClusterEnabled),
m_sPort(sPort),
m_dwID(dwID),
m_dwIPAddress(dwIPAddress),
m_dwWin32Error(dwWin32Error),
m_bstrHostHeaderName(szHostHeaderName),
m_bstrComment(szComment),
m_fUsingActiveDir(FALSE)
{
ASSERT_PTR(m_pService);
m_pService->AddRef();
}
CIISSite::~CIISSite()
{
m_pService->Release();
}
/* virtual */
HRESULT
CIISSite::RefreshData()
/*++
Routine Description:
Refresh relevant configuration data required for display.
Arguments:
None
Return Value:
HRESULT
--*/
{
CError err;
CWaitCursor wait;
CComBSTR bstrPath;
CMetaKey * pKey = NULL;
do
{
err = BuildMetaPath(bstrPath);
BREAK_ON_ERR_FAILURE(err);
// We need instance key here
CString path_inst;
CMetabasePath::GetInstancePath(bstrPath, path_inst);
BOOL fContinue = TRUE;
while (fContinue)
{
fContinue = FALSE;
if (NULL == (pKey = new CMetaKey(QueryInterface(), path_inst)))
{
TRACEEOLID("RefreshData: OOM");
err = ERROR_NOT_ENOUGH_MEMORY;
break;
}
err = pKey->QueryResult();
if (IsLostInterface(err))
{
SAFE_DELETE(pKey);
fContinue = OnLostInterface(err);
}
}
BREAK_ON_ERR_FAILURE(err);
CInstanceProps inst(pKey, _T(""), m_dwID);
err = inst.LoadData();
BREAK_ON_ERR_FAILURE(err);
m_dwState = inst.m_dwState;
//
// Don't be confused -- cluster enabled refers
// to wolfpack and has nothing to do with app server
//
m_fWolfPackEnabled = inst.IsClusterEnabled();
m_sPort = (SHORT)inst.m_nTCPPort;
m_dwID = inst.QueryInstance();
m_dwIPAddress = inst.m_iaIpAddress;
m_dwWin32Error = inst.m_dwWin32Error;
m_bstrHostHeaderName = inst.m_strDomainName;
m_bstrComment = inst.m_strComment;
m_strDisplayName.Empty();
{
CStringListEx list;
pKey->QueryValue(MD_SECURE_BINDINGS, list);
UINT port = 0;
CInstanceProps::FindMatchingSecurePort(list, inst.m_iaIpAddress, port);
m_sSSLPort = (USHORT)port;
}
// Check if it is Frontpage controlled site
pKey->QueryValue(MD_FRONTPAGE_WEB, m_fFrontPageWeb);
// check if it's using ActiveDirectory...
if (IsFtpSite())
{
INT iFtpUserIsolation = 0;
m_fUsingActiveDir = FALSE;
pKey->QueryValue(MD_USER_ISOLATION, iFtpUserIsolation);
if (2 == iFtpUserIsolation)
{
m_fUsingActiveDir = TRUE;
}
}
CChildNodeProps child(pKey, SZ_MBN_ROOT);
err = child.LoadData();
BREAK_ON_ERR_FAILURE(err);
m_strRedirectPath = child.GetRedirectedPath();
}
while(FALSE);
SAFE_DELETE(pKey);
m_dwEnumError = err.Win32Error();
return err;
}
/* virtual */
int
CIISSite::QueryImage() const
/*++
Routine Description:
Return bitmap index for the site
Arguments:
None
Return Value:
Bitmap index
--*/
{
ASSERT_PTR(m_pService);
if (!m_fResolved)
{
TRACEEOLID("Resolving name for site #" << QueryNodeName());
if (m_hScopeItem == NULL)
{
//
// BUGBUG:
//
// This is probably related to MMC bug #324519
// where we're asked for the display info immediately
// after adding the item to the console view. This
// appears to fail only on refresh because the scope
// item handle is missing, and we can't build a metabase
// path yet.
//
TRACEEOLID("BUGBUG: Prematurely asked for display information");
//ASSERT(FALSE);
return iError;
}
CIISSite * that = (CIISSite *)this;
CError err = that->RefreshData();
that->m_fResolved = err.Succeeded();
}
if (!m_fResolved || m_pService == NULL)
{
return iError;
}
if (FAILED(m_dwWin32Error))
{
return m_pService->QuerySiteImageErr();
}
else
{
if (m_dwState == MD_SERVER_STATE_STOPPED)
{
return m_pService->QuerySiteImageStopped();
}
else
{
return m_pService->QuerySiteImage();
}
}
}
/* virtual */
LPOLESTR
CIISSite::QueryDisplayName()
/*++
Routine Description:
Return primary display name of this site.
Arguments:
None
Return Value:
The display name
--*/
{
AFX_MANAGE_STATE(::AfxGetStaticModuleState());
if (!m_fResolved)
{
TRACEEOLID("Resolving name for site #" << QueryNodeName());
if (m_hScopeItem == NULL)
{
//
// BUGBUG:
//
// This is probably related to MMC bug #324519
// where we're asked for the display info immediately
// after adding the item to the console view. This
// appears to fail only on refresh because the scope
// item handle is missing, and we can't build a metabase
// path yet.
//
TRACEEOLID("BUGBUG: Prematurely asked for display information");
//ASSERT(FALSE);
return OLESTR("");
}
CError err = RefreshData();
m_fResolved = err.Succeeded();
}
if (m_strDisplayName.IsEmpty())
{
CIPAddress ia(m_dwIPAddress);
CInstanceProps::GetDisplayText(
m_strDisplayName,
m_bstrComment,
m_bstrHostHeaderName,
ia,
m_sPort,
m_dwID
);
}
CString buf = m_strDisplayName;
if (m_dwState == MD_SERVER_STATE_STOPPED)
{
buf.Format(IDS_STOPPED_SITE_FMT, m_strDisplayName);
}
else if (m_dwState == MD_SERVER_STATE_PAUSED)
{
buf.Format(IDS_PAUSED_SITE_FMT, m_strDisplayName);
}
m_bstrDisplayNameStatus = buf;
// return (LPTSTR)(LPCTSTR)m_strDisplayName;
return m_bstrDisplayNameStatus;
}
/* virtual */
LPOLESTR
CIISSite::GetResultPaneColInfo(int nCol)
/*++
Routine Description:
Return result pane string for the given column number
Arguments:
int nCol : Column number
Return Value:
String
--*/
{
ASSERT(_fStaticsLoaded);
TCHAR sz[255];
if(IsFtpSite())
{
switch(nCol)
{
case COL_ID2:
nCol = COL_ID;
break;
case COL_DESCRIPTION2:
nCol = COL_DESCRIPTION;
break;
case COL_STATE2:
nCol = COL_STATE;
break;
case COL_IP_ADDRESS2:
nCol = COL_IP_ADDRESS;
break;
case COL_TCP_PORT2:
nCol = COL_TCP_PORT;
break;
case COL_STATUS2:
nCol = COL_STATUS;
break;
default:
nCol = 0;
break;
}
}
switch(nCol)
{
case COL_ID:
{
CString buf;
buf.Format(_T("%u"), m_dwID);
_bstrResult = buf;
return _bstrResult;
}
case COL_DESCRIPTION:
return QueryDisplayName();
case COL_STATE:
switch(m_dwState)
{
case MD_SERVER_STATE_STARTED:
return _bstrStarted;
case MD_SERVER_STATE_PAUSED:
return _bstrPaused;
case MD_SERVER_STATE_STOPPED:
return _bstrStopped;
case MD_SERVER_STATE_STARTING:
case MD_SERVER_STATE_PAUSING:
case MD_SERVER_STATE_CONTINUING:
case MD_SERVER_STATE_STOPPING:
return _bstrPending;
}
return OLESTR("");
case COL_DOMAIN_NAME:
return m_bstrHostHeaderName;
case COL_IP_ADDRESS:
{
CIPAddress ia(m_dwIPAddress);
if (ia.IsZeroValue())
{
_bstrResult = _bstrAllUnassigned;
}
else
{
_bstrResult = ia;
}
}
return _bstrResult;
case COL_SSL_PORT:
if (m_sSSLPort != 0)
{
_bstrResult = ::_itot(m_sSSLPort, sz, 10);
return _bstrResult;
}
else
return OLESTR("");
case COL_TCP_PORT:
_bstrResult = ::_itot(m_sPort, sz, 10);
return _bstrResult;
case COL_STATUS:
{
AFX_MANAGE_STATE(::AfxGetStaticModuleState());
CError err(m_dwWin32Error);
if (err.Succeeded())
{
return OLESTR("");
}
SetErrorOverrides(err, TRUE);
_bstrResult = err;
}
return _bstrResult;
}
ASSERT_MSG("Bad column number");
return OLESTR("");
}
/* virtual */
int
CIISSite::CompareResultPaneItem(CIISObject * pObject, int nCol)
/*++
Routine Description:
Compare two CIISObjects on sort item criteria
Arguments:
CIISObject * pObject : Object to compare against
int nCol : Column number to sort on
Return Value:
0 if the two objects are identical
<0 if this object is less than pObject
>0 if this object is greater than pObject
--*/
{
ASSERT_READ_PTR(pObject);
if (nCol == 0)
{
return CompareScopeItem(pObject);
}
//
// First criteria is object type
//
int n1 = QuerySortWeight();
int n2 = pObject->QuerySortWeight();
if (n1 != n2)
{
return n1 - n2;
}
//
// Both are CIISSite objects
//
CIISSite * pSite = (CIISSite *)pObject;
if(IsFtpSite())
{
switch(nCol)
{
case COL_ID2:
nCol = COL_ID;
break;
case COL_DESCRIPTION2:
nCol = COL_DESCRIPTION;
break;
case COL_STATE2:
nCol = COL_STATE;
break;
case COL_IP_ADDRESS2:
nCol = COL_IP_ADDRESS;
break;
case COL_TCP_PORT2:
nCol = COL_TCP_PORT;
break;
case COL_STATUS2:
nCol = COL_STATUS;
break;
default:
nCol = 0;
break;
}
}
switch(nCol)
{
//
// Special case columns
//
case COL_IP_ADDRESS:
{
CIPAddress ia1(m_dwIPAddress);
CIPAddress ia2(pSite->QueryIPAddress());
return ia1.CompareItem(ia2);
}
case COL_ID:
n1 = GetInstance();
n2 = pSite->GetInstance();
return n1 - n2;
case COL_TCP_PORT:
n1 = QueryPort();
n2 = pSite->QueryPort();
return n1 - n2;
case COL_SSL_PORT:
n1 = QuerySSLPort();
n2 = pSite->QuerySSLPort();
return n1 - n2;
case COL_STATUS:
{
DWORD dw1 = QueryWin32Error();
DWORD dw2 = pSite->QueryWin32Error();
return dw1 - dw2;
}
case COL_DESCRIPTION:
case COL_STATE:
case COL_DOMAIN_NAME:
default:
//
// Lexical sort
//
return ::lstrcmpi(
GetResultPaneColInfo(nCol),
pObject->GetResultPaneColInfo(nCol)
);
}
}
/* virtual */
HRESULT
CIISSite::BuildURL(CComBSTR & bstrURL) const
/*++
Routine Description:
Recursively build up the URL from the current node
and its parents. For a site node, add the machine name.
Arguments:
CComBSTR & bstrURL : Returns URL
Return Value:
HRESULT
--*/
{
HRESULT hr = S_OK;
//
// Prepend parent portion (protocol in this case)
//
CIISMBNode * pNode = GetParentNode();
if (pNode)
{
hr = pNode->BuildURL(bstrURL);
}
if (SUCCEEDED(hr))
{
CString strOwner;
///////////////////////////////////////////////////////////////////////////
//
// Try to build an URL. Use in order of priority:
//
// Domain name:port/root
// ip address:port/root
// computer name:port/root
//
if (m_bstrHostHeaderName.Length())
{
strOwner = m_bstrHostHeaderName;
}
else if (m_dwIPAddress != 0L)
{
CIPAddress ia(m_dwIPAddress);
ia.QueryIPAddress(strOwner);
}
else
{
if (IsLocal())
{
//
// Security reasons restrict this to "localhost" oftentimes
//
strOwner = _bstrLocalHost;
}
else
{
LPOLESTR lpOwner = QueryMachineName();
strOwner = PURE_COMPUTER_NAME(lpOwner);
}
}
TCHAR szPort[6]; // 65536 max.
_itot(m_sPort, szPort, 10);
strOwner += _T(":");
strOwner += szPort;
bstrURL.Append(strOwner);
}
return hr;
}
/*virtual*/
HRESULT
CIISSite::AddMenuItems(
LPCONTEXTMENUCALLBACK piCallback,
long * pInsertionAllowed,
DATA_OBJECT_TYPES type
)
{
ASSERT_READ_PTR(piCallback);
//
// Add base menu items
//
HRESULT hr = CIISObject::AddMenuItems(
piCallback,
pInsertionAllowed,
type
);
if (SUCCEEDED(hr))
{
ASSERT(pInsertionAllowed != NULL);
if ((*pInsertionAllowed & CCM_INSERTIONALLOWED_NEW) != 0)
{
AddMenuSeparator(piCallback);
if (IsFtpSite())
{
if (GetOwner()->CanAddInstance() && !GetOwner()->IsWorkstation())
{
AddMenuItemByCommand(piCallback, IDM_NEW_FTP_SITE);
if (IsConfigImportExportable())
{
AddMenuItemByCommand(piCallback, IDM_NEW_FTP_SITE_FROM_FILE);
}
}
AddMenuItemByCommand(piCallback, IDM_NEW_FTP_VDIR);
if (IsConfigImportExportable())
{
AddMenuItemByCommand(piCallback, IDM_NEW_FTP_VDIR_FROM_FILE);
}
}
else if (IsWebSite())
{
if (GetOwner()->CanAddInstance() && !GetOwner()->IsWorkstation())
{
AddMenuItemByCommand(piCallback, IDM_NEW_WEB_SITE);
if (IsConfigImportExportable())
{
AddMenuItemByCommand(piCallback, IDM_NEW_WEB_SITE_FROM_FILE);
}
}
AddMenuItemByCommand(piCallback, IDM_NEW_WEB_VDIR);
if (IsConfigImportExportable())
{
AddMenuItemByCommand(piCallback, IDM_NEW_WEB_VDIR_FROM_FILE);
}
}
}
if (IsConfigImportExportable() && (*pInsertionAllowed & CCM_INSERTIONALLOWED_TASK) != 0)
{
AddMenuSeparator(piCallback);
AddMenuItemByCommand(piCallback, IDM_TASK_EXPORT_CONFIG_WIZARD);
}
}
return hr;
}
HRESULT
CIISSite::InsertNewInstance(DWORD inst)
{
return m_pService->InsertNewInstance(inst);
}
HRESULT
CIISSite::InsertNewAlias(CString alias)
{
CError err;
if (!IsExpanded())
{
SelectScopeItem();
IConsoleNameSpace2 * pConsoleNameSpace
= (IConsoleNameSpace2 *)GetConsoleNameSpace();
pConsoleNameSpace->Expand(QueryScopeItem());
HSCOPEITEM hChildItem = NULL;
LONG_PTR cookie;
HRESULT hr = pConsoleNameSpace->GetChildItem(m_hScopeItem, &hChildItem, &cookie);
while(SUCCEEDED(hr) && hChildItem)
{
CIISObject * pItem = (CIISObject *)cookie;
ASSERT_PTR(pItem);
if (0 == alias.Compare(pItem->QueryDisplayName()))
{
pItem->SelectScopeItem();
break;
}
hr = pConsoleNameSpace->GetNextItem(hChildItem, &hChildItem, &cookie);
}
}
else
{
// Now we should insert and select this new site
CIISDirectory * pAlias = new CIISDirectory(m_pOwner, m_pService, alias);
if (pAlias != NULL)
{
pAlias->AddRef();
err = pAlias->AddToScopePaneSorted(QueryScopeItem(), FALSE);
if (err.Succeeded())
{
VERIFY(SUCCEEDED(pAlias->SelectScopeItem()));
}
else
{
pAlias->Release();
}
}
else
{
err = ERROR_NOT_ENOUGH_MEMORY;
}
}
return err;
}
/* virtual */
HRESULT
CIISSite::Command(
long lCommandID,
CSnapInObjectRootBase * pObj,
DATA_OBJECT_TYPES type
)
/*++
Routine Description:
Handle command from context menu.
Arguments:
long lCommandID : Command ID
CSnapInObjectRootBase * pObj : Base object
DATA_OBJECT_TYPES type : Data object type
Return Value:
HRESULT
--*/
{
AFX_MANAGE_STATE(::AfxGetStaticModuleState());
HRESULT hr = S_OK;
DWORD dwCommand = 0;
DWORD inst = 0;
CError err;
CString alias;
CComBSTR bstrMetaPath;
BOOL bNeedMetabase = FALSE;
BOOL bHaveMetabase = FALSE;
switch (lCommandID)
{
case IDM_STOP:
case IDM_START:
case IDM_PAUSE:
case IDM_NEW_FTP_SITE:
case IDM_NEW_FTP_VDIR:
case IDM_NEW_WEB_SITE:
case IDM_NEW_WEB_VDIR:
bNeedMetabase = TRUE;
break;
default:
bNeedMetabase = FALSE;
}
if (bNeedMetabase)
{
// WARNING:bstrMetaPath will be used by switch statement below
VERIFY(SUCCEEDED(BuildMetaPath(bstrMetaPath)));
err = CheckForMetabaseAccess(METADATA_PERMISSION_READ,this,TRUE,bstrMetaPath);
if (!IsLostInterface(err))
{
// reset error if an other error other than No interface
err.Reset();
}
if (err.Succeeded())
{
bHaveMetabase = TRUE;
}
}
switch (lCommandID)
{
case IDM_STOP:
if (bHaveMetabase)
{
dwCommand = MD_SERVER_COMMAND_STOP;
}
break;
case IDM_START:
if (bHaveMetabase)
{
dwCommand = m_dwState == MD_SERVER_STATE_PAUSED ?
MD_SERVER_COMMAND_CONTINUE : MD_SERVER_COMMAND_START;
}
break;
case IDM_PAUSE:
if (bHaveMetabase)
{
dwCommand = m_dwState == MD_SERVER_STATE_PAUSED ?
MD_SERVER_COMMAND_CONTINUE : MD_SERVER_COMMAND_PAUSE;
}
break;
case IDM_NEW_FTP_SITE:
if (bHaveMetabase)
{
hr = AddFTPSite(pObj, type, &inst);
if (inst != 0)
{
hr = InsertNewInstance(inst);
}
}
break;
case IDM_NEW_FTP_VDIR:
if (bHaveMetabase)
{
hr = CIISMBNode::AddFTPVDir(pObj, type, alias);
if (!alias.IsEmpty())
{
hr = InsertNewAlias(alias);
}
}
break;
case IDM_NEW_WEB_SITE:
if (bHaveMetabase)
{
hr = AddWebSite(pObj, type, &inst,
m_pOwner->QueryMajorVersion(), m_pOwner->QueryMinorVersion());
if (inst != 0)
{
hr = InsertNewInstance(inst);
}
}
break;
case IDM_NEW_WEB_VDIR:
if (bHaveMetabase)
{
hr = CIISMBNode::AddWebVDir(pObj, type, alias,
m_pOwner->QueryMajorVersion(), m_pOwner->QueryMinorVersion());
if (!alias.IsEmpty())
{
hr = InsertNewAlias(alias);
}
}
break;
//
// Pass on to base class
//
default:
hr = CIISMBNode::Command(lCommandID, pObj, type);
}
if (dwCommand)
{
DWORD svc_mode, svc_state;
CString name, buf;
hr = m_pService->GetServiceState(svc_mode, svc_state, name);
if (FAILED(hr))
{
return hr;
}
switch (svc_mode)
{
case SERVICE_DISABLED:
AfxFormatString1(buf, IDS_NO_START_SERVICE_DISABLED, name);
if (IDYES == AfxMessageBox(buf, MB_YESNO|MB_ICONQUESTION|MB_DEFBUTTON1))
{
hr = m_pService->EnableService();
break;
}
return hr;
case SERVICE_DEMAND_START:
AfxFormatString1(buf, IDS_NO_START_SERVICE_MANUAL, name);
if (svc_state != SERVICE_RUNNING)
{
if (IDYES == AfxMessageBox(buf, MB_YESNO|MB_ICONQUESTION|MB_DEFBUTTON1))
{
hr = m_pService->StartService();
break;
}
return hr;
}
break;
default:
break;
}
hr = ChangeState(dwCommand);
// make sure if a site has been started,
// that the service is shown as started too...
if (SUCCEEDED(m_pService->RefreshData()))
{
m_pService->RefreshDisplay(FALSE);
// Refresh our data if we refreshed the service level one...
RefreshDisplay();
}
}
return hr;
}
/* virtual */
HRESULT
CIISSite::CreatePropertyPages(
LPPROPERTYSHEETCALLBACK lpProvider,
LONG_PTR handle,
IUnknown * pUnk,
DATA_OBJECT_TYPES type
)
/*++
Routine Description:
Create the property pages for the given object
Arguments:
LPPROPERTYSHEETCALLBACK lpProvider : Provider
LONG_PTR handle : Handle.
IUnknown * pUnk,
DATA_OBJECT_TYPES type
Return Value:
HRESULT
--*/
{
AFX_MANAGE_STATE(::AfxGetStaticModuleState());
CError err;
if (S_FALSE == (HRESULT)(err = CIISMBNode::CreatePropertyPages(lpProvider, handle, pUnk, type)))
{
return S_OK;
}
if (ERROR_ALREADY_EXISTS == err.Win32Error())
{
return S_FALSE;
}
if (err.Succeeded())
{
CComBSTR bstrPath;
err = BuildMetaPath(bstrPath);
if (err.Succeeded())
{
err = CheckForMetabaseAccess(METADATA_PERMISSION_READ,this,TRUE,bstrPath);
if (err.Succeeded())
{
// cache handle for user in MMCPropertyChangeNotify
m_ppHandle = handle;
err = ShowPropertiesDlg(
lpProvider, QueryAuthInfo(), bstrPath,
GetMainWindow(GetConsole()), (LPARAM)this, (LPARAM)GetParentNode(), handle
);
}
}
}
err.MessageBoxOnFailure();
return err;
}
HRESULT
CIISSite::ChangeState(DWORD dwCommand)
/*++
Routine Description:
Change the state of this instance (started/stopped/paused)
Arguments:
DWORD dwCommand : MD_SERVER_COMMAND_START, etc.
Return Value:
HRESULT
--*/
{
CError err;
CComBSTR bstrPath;
AFX_MANAGE_STATE(::AfxGetStaticModuleState());
SetErrorOverrides(err);
do
{
CWaitCursor wait;
err = BuildMetaPath(bstrPath);
// We need instance key here
CString path_inst;
CMetabasePath::GetInstancePath(bstrPath, path_inst);
BREAK_ON_ERR_FAILURE(err)
CInstanceProps ip(QueryAuthInfo(), path_inst);
err = ip.LoadData();
BREAK_ON_ERR_FAILURE(err)
err = ip.ChangeState(dwCommand);
BREAK_ON_ERR_FAILURE(err)
err = RefreshData();
if (err.Succeeded())
{
err = RefreshDisplay();
}
}
while(FALSE);
if (ERROR_ALREADY_EXISTS == err.Win32Error())
{
// if the service is trying to start
// and the Port is already in use by another
// site then it will report this error...
if (MD_SERVER_COMMAND_START == dwCommand ||
MD_SERVER_COMMAND_CONTINUE == dwCommand)
{
::AfxMessageBox(IDS_ERR_PORT_USED,MB_ICONEXCLAMATION);
}
else
{
err.MessageBoxOnFailure();
}
}
else
{
err.MessageBoxOnFailure();
}
return err;
}
/* virtual */
HRESULT
CIISSite::EnumerateScopePane(HSCOPEITEM hParent)
{
m_dwEnumError = 0;
CError err = EnumerateVDirs(hParent, m_pService);
if (err.Succeeded() && !IsFtpSite() && m_strRedirectPath.IsEmpty())
{
if (m_dwEnumError == ERROR_SUCCESS)
{
err = EnumerateWebDirs(hParent, m_pService);
}
}
if (err.Failed())
{
m_dwEnumError = err.Win32Error();
RefreshDisplay();
}
return err;
}
/*virtual*/
HRESULT
CIISSite::EnumerateResultPane(BOOL fExp, IHeaderCtrl * pHdr, IResultData * pResData, BOOL bForRefresh)
{
m_dwEnumError = 0;
CError err = CIISObject::EnumerateResultPane(fExp, pHdr, pResData, bForRefresh);
if ( err.Succeeded()
// && QueryWin32Error() == ERROR_SUCCESS
&& !IsFtpSite()
&& m_strRedirectPath.IsEmpty()
)
{
err = CIISMBNode::EnumerateResultPane_(fExp, pHdr, pResData, m_pService);
if (err.Failed())
{
m_dwEnumError = err.Win32Error();
}
}
return err;
}
/* virtual */
HRESULT
CIISSite::BuildMetaPath(CComBSTR & bstrPath) const
/*++
Routine Description:
Recursively build up the metabase path from the current node
and its parents
Arguments:
CComBSTR & bstrPath : Returns metabase path
Return Value:
HRESULT
Notes:
This will return the home directory path, e.g. "lm/w3svc/2/root",
not the path of the instance.
--*/
{
//
// Build instance path
//
HRESULT hr = CIISMBNode::BuildMetaPath(bstrPath);
if (SUCCEEDED(hr))
{
//
// Add root directory path
//
bstrPath.Append(_cszSeparator);
bstrPath.Append(g_cszRoot);
}
return hr;
}
// CODEWORK: make it work from CIISMBNode::DeleteNode
HRESULT
CIISSite::DeleteNode(IResultData * pResult)
{
CError err;
CComBSTR path;
// check if they have the property sheet open on it.
if (IsMyPropertySheetOpen())
{
::AfxMessageBox(IDS_CLOSE_PROPERTY_SHEET);
return S_OK;
}
// this could be an orphaned property sheet
// check if an orphaned property sheet is open on this item.
CIISObject * pAlreadyOpenProp = NULL;
if (TRUE == g_OpenPropertySheetTracker.FindAlreadyOpenPropertySheet(this,&pAlreadyOpenProp))
{
// Bring it to the foreground, and bail
HWND hHwnd = 0;
if (pAlreadyOpenProp)
{
if (hHwnd = pAlreadyOpenProp->IsMyPropertySheetOpen())
{
if (hHwnd && (hHwnd != (HWND) 1))
{
// Perhapse we should cancel the already
// opened property sheet...just a thought
if (!SetForegroundWindow(hHwnd))
{
// wasn't able to bring this property sheet to
// the foreground, the propertysheet must not
// exist anymore. let's just clean the hwnd
// so that the user will be able to open propertysheet
pAlreadyOpenProp->SetMyPropertySheetOpen(0);
}
else
{
::AfxMessageBox(IDS_CLOSE_PROPERTY_SHEET);
return S_OK;
}
}
}
}
}
err = CIISMBNode::BuildMetaPath(path);
if (err.Succeeded())
{
err = CheckForMetabaseAccess(METADATA_PERMISSION_WRITE,this,TRUE,path);
if (!IsLostInterface(err))
{
// reset error if an other error other than No interface
err.Reset();
}
}
if (err.Succeeded())
{
if (!NoYesMessageBox(IDS_CONFIRM_DELETE))
return err;
do
{
CMetaInterface * pInterface = QueryInterface();
ASSERT(pInterface != NULL);
path.Empty();
err = CIISMBNode::BuildMetaPath(path);
if (err.Failed())
{
TRACEEOLID("BuildMetaPath failed path=" << path);
break;
}
CMetaKey mk(pInterface, METADATA_MASTER_ROOT_HANDLE, METADATA_PERMISSION_WRITE);
if (!mk.Succeeded())
{
break;
}
err = mk.DeleteKey(path);
if (err.Failed())
{
TRACEEOLID("BuildMetaPath DeleteKey path=" << path);
break;
}
// don't hold the Metabasekey open
// (RemoveScopeItem may do a lot of things,and lock the metabase for other read requests)
mk.Close();
err = RemoveScopeItem();
if (!IsFtpSite())
{
// Also, if we delete a w3svc site, it's probably using
// a application, so we have to refresh that stuff too
// this CAppPoolsContainer will only be here if it's iis6
CIISMachine * pOwner = GetOwner();
if (pOwner)
{
CAppPoolsContainer * pPools = pOwner->QueryAppPoolsContainer();
if (pPools)
{
if (pPools->IsExpanded())
{
pPools->RefreshData();
pPools->RefreshDataChildren(_T(""),FALSE); // refresh all app pools, who knows..
}
}
}
}
} while (FALSE);
}
if (err.Failed())
{
DisplayError(err);
}
return err;
}
//
// We are not supporting empty comments on sites. Even if it is OK for
// metabase, it will bring more problems in UI. Empty name will be displayed
// as [Site #N] in UI, and when user will try to rename it again, it could be
// stored in metabase in this format.
//
HRESULT
CIISSite::RenameItem(LPOLESTR new_name)
{
CString strNewName(new_name);
CComBSTR path;
CError err;
if (new_name != NULL && lstrlen(new_name) > 0)
{
err = BuildMetaPath(path);
if (err.Succeeded())
{
// We need instance key here
CString path_inst;
CMetabasePath::GetInstancePath(path, path_inst);
CMetaKey mk(QueryInterface(), path_inst, METADATA_PERMISSION_WRITE);
err = mk.QueryResult();
if (err.Succeeded())
{
// remove extra string that was added to
// the end for display purposes...
if (m_dwState == MD_SERVER_STATE_STOPPED || m_dwState == MD_SERVER_STATE_PAUSED)
{
// These stopped and paused sites will
// Add on to the end of the string (Stopped) or (Paused),
// take it out.
CString buf = _T(".");
if (m_dwState == MD_SERVER_STATE_STOPPED)
{buf.Format(IDS_STOPPED_SITE_FMT, _T(" "));}
else
{buf.Format(IDS_PAUSED_SITE_FMT, _T(" "));}
buf.TrimLeft();
buf.TrimRight();
// Take it out from the new string if it's there...
if (strNewName.GetLength() >= buf.GetLength())
{
CString buf2;
buf2 = strNewName.Right(buf.GetLength());
if (0 == buf2.Compare(buf))
{
// Found it, Trim it off
buf2 = strNewName.Left(strNewName.GetLength() - buf.GetLength());
strNewName = buf2;
}
}
}
err = mk.SetValue(MD_SERVER_COMMENT, strNewName);
if (err.Succeeded())
{
m_strDisplayName = strNewName;
}
}
}
}
return err;
}