306 lines
4.1 KiB
C++
306 lines
4.1 KiB
C++
/*++
|
|
|
|
Copyright (c) 1994-95 Microsoft Corporation
|
|
|
|
Module Name:
|
|
|
|
statobj.cpp
|
|
|
|
Abstract:
|
|
|
|
Statistic object implementation.
|
|
|
|
Author:
|
|
|
|
Don Ryan (donryan) 04-Jan-1995
|
|
|
|
Environment:
|
|
|
|
User Mode - Win32
|
|
|
|
Revision History:
|
|
|
|
--*/
|
|
|
|
#include "stdafx.h"
|
|
#include "llsmgr.h"
|
|
|
|
#ifdef _DEBUG
|
|
#undef THIS_FILE
|
|
static char BASED_CODE THIS_FILE[] = __FILE__;
|
|
#endif
|
|
|
|
IMPLEMENT_DYNCREATE(CStatistic, CCmdTarget)
|
|
|
|
BEGIN_MESSAGE_MAP(CStatistic, CCmdTarget)
|
|
//{{AFX_MSG_MAP(CStatistic)
|
|
// NOTE - the ClassWizard will add and remove mapping macros here.
|
|
//}}AFX_MSG_MAP
|
|
END_MESSAGE_MAP()
|
|
|
|
BEGIN_DISPATCH_MAP(CStatistic, CCmdTarget)
|
|
//{{AFX_DISPATCH_MAP(CStatistic)
|
|
DISP_PROPERTY_EX(CStatistic, "Application", GetApplication, SetNotSupported, VT_DISPATCH)
|
|
DISP_PROPERTY_EX(CStatistic, "LastUsed", GetLastUsed, SetNotSupported, VT_DATE)
|
|
DISP_PROPERTY_EX(CStatistic, "Parent", GetParent, SetNotSupported, VT_DISPATCH)
|
|
DISP_PROPERTY_EX(CStatistic, "TotalUsed", GetTotalUsed, SetNotSupported, VT_I4)
|
|
DISP_PROPERTY_EX(CStatistic, "EntryName", GetEntryName, SetNotSupported, VT_BSTR)
|
|
DISP_DEFVALUE(CStatistic, "EntryName")
|
|
//}}AFX_DISPATCH_MAP
|
|
END_DISPATCH_MAP()
|
|
|
|
|
|
CStatistic::CStatistic(
|
|
CCmdTarget* pParent,
|
|
LPCTSTR pEntry,
|
|
DWORD dwFlags,
|
|
long lLastUsed,
|
|
long lTotalUsed
|
|
)
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Constructor for statistic object.
|
|
|
|
Arguments:
|
|
|
|
pParent - creator of object.
|
|
pEntry - user or server product.
|
|
dwFlags - details about license.
|
|
lLastUsed - date user last used product.
|
|
lTotalUsed - total times user used product.
|
|
|
|
Return Values:
|
|
|
|
None.
|
|
|
|
--*/
|
|
|
|
{
|
|
EnableAutomation();
|
|
|
|
#ifdef ENABLE_PARENT_CHECK
|
|
ASSERT(pParent &&
|
|
(pParent->IsKindOf(RUNTIME_CLASS(CUser)) ||
|
|
pParent->IsKindOf(RUNTIME_CLASS(CProduct))));
|
|
#endif // ENABLE_PARENT_CHECK
|
|
|
|
m_pParent = pParent;
|
|
|
|
ASSERT(pEntry && *pEntry);
|
|
|
|
m_strEntry = pEntry;
|
|
|
|
m_lLastUsed = lLastUsed;
|
|
m_lTotalUsed = lTotalUsed;
|
|
|
|
m_bIsValid = dwFlags & LLS_FLAG_LICENSED;
|
|
}
|
|
|
|
|
|
CStatistic::~CStatistic()
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Destructor for statistic object.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Values:
|
|
|
|
None.
|
|
|
|
--*/
|
|
|
|
{
|
|
//
|
|
// Nothing to do here.
|
|
//
|
|
}
|
|
|
|
|
|
void CStatistic::OnFinalRelease()
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
When the last reference for an automation object is released
|
|
OnFinalRelease is called. This implementation deletes object.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Values:
|
|
|
|
None.
|
|
|
|
--*/
|
|
|
|
{
|
|
delete this;
|
|
}
|
|
|
|
|
|
LPDISPATCH CStatistic::GetApplication()
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Returns the application object.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Values:
|
|
|
|
VT_DISPATCH.
|
|
|
|
--*/
|
|
|
|
{
|
|
return theApp.GetAppIDispatch();
|
|
}
|
|
|
|
|
|
BSTR CStatistic::GetEntryName()
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Returns the name of user or server product.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Values:
|
|
|
|
VT_BSTR.
|
|
|
|
--*/
|
|
|
|
{
|
|
return m_strEntry.AllocSysString();
|
|
}
|
|
|
|
|
|
DATE CStatistic::GetLastUsed()
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Returns the date the user last used the server product.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Values:
|
|
|
|
VT_DATE.
|
|
|
|
--*/
|
|
|
|
{
|
|
return SecondsSince1980ToDate(m_lLastUsed);
|
|
}
|
|
|
|
|
|
BSTR CStatistic::GetLastUsedString()
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Returns the date last used as a string.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Values:
|
|
|
|
VT_BSTR.
|
|
|
|
--*/
|
|
|
|
{
|
|
VARIANT vaIn;
|
|
VARIANT vaOut;
|
|
|
|
VariantInit(&vaIn);
|
|
VariantInit(&vaOut);
|
|
|
|
vaIn.vt = VT_DATE;
|
|
vaIn.date = SecondsSince1980ToDate(m_lLastUsed);
|
|
|
|
BSTR bstrDate = NULL;
|
|
|
|
if (SUCCEEDED(VariantChangeType(&vaOut, &vaIn, 0, VT_BSTR)))
|
|
{
|
|
bstrDate = vaOut.bstrVal;
|
|
}
|
|
|
|
return bstrDate;
|
|
}
|
|
|
|
|
|
LPDISPATCH CStatistic::GetParent()
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Returns the parent of the object.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Values:
|
|
|
|
VT_DISPATCH.
|
|
|
|
--*/
|
|
|
|
{
|
|
return m_pParent ? m_pParent->GetIDispatch(TRUE) : NULL;
|
|
}
|
|
|
|
|
|
long CStatistic::GetTotalUsed()
|
|
|
|
/*++
|
|
|
|
Routine Description:
|
|
|
|
Returns total number of times client used product.
|
|
|
|
Arguments:
|
|
|
|
None.
|
|
|
|
Return Values:
|
|
|
|
VT_I4.
|
|
|
|
--*/
|
|
|
|
{
|
|
return m_lTotalUsed;
|
|
}
|
|
|
|
|