|
|
/*++
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; }
|