www.pudn.com > Ge_opc_Server_v1.rar > I_GSM.CPP

// i_gsm.cpp 
// 
//  This file contains the implementation of 
//  the IOPCGroupStateMgt interface for groups in the LHEpipeview server. 
// 
// 
//	(c) COPYRIGHT 1996,1997 INTELLUTION INC. 
// ALL RIGHTS RESERVED 
// 
// Original Author: Al Chisholm 
// 
// Modification Log: 
//	Vers    Date   By    Notes 
//	----  -------- ---   ----- 
//	0.00  11/18/96 ACC 
// 0.02  04/08/97 acc   fix SetName to call proper 'Free' Function 
//                      fix Clone to copy LCID, TimeBias, Deadband 
// 
// 
 
#define WIN32_LEAN_AND_MEAN 
 
#include "OPCLHEpipeview.h" 
 
 
///////////////////////////////////////////////////////////////////////////// 
// Constructor /Destructor functions 
// 
 
/////////////////////////////////////// 
// ILHEpipeviewGSM() 
//   Constructor for this Interface 
// 
/////////////////////////////////////// 
ILHEpipeviewGSM::ILHEpipeviewGSM( LPUNKNOWN parent ) 
{ 
	m_Parent = (LHEpipeviewGroup *)parent; 
} 
 
 
 
/////////////////////////////////////// 
// ~ILHEpipeviewGSM() 
//   Destructor for this Interface 
// 
/////////////////////////////////////// 
ILHEpipeviewGSM::~ILHEpipeviewGSM( void) 
{ 
	m_Parent->m_pILHEpipeviewGSM = 0; 
} 
 
 
///////////////////////////////////////////////////////////////////////////// 
// IUnknown functions Delegate to Parent 
// 
 
STDMETHODIMP_(ULONG) ILHEpipeviewGSM::AddRef( void) 
{ 
	return m_Parent->AddRef(); 
} 
 
STDMETHODIMP_(ULONG) ILHEpipeviewGSM::Release( void) 
{ 
	return m_Parent->Release(); 
} 
 
STDMETHODIMP ILHEpipeviewGSM::QueryInterface( REFIID iid, LPVOID* ppInterface) 
{ 
	return m_Parent->QueryInterface(iid, ppInterface); 
} 
 
 
 
///////////////////////////////////////////////////////////////////////////// 
// ILHEpipeviewGSM (IOPCGroupStateMgt) interface functions 
// 
 
 
/////////////////////////////////////// 
// GetState 
/////////////////////////////////////// 
STDMETHODIMP ILHEpipeviewGSM::GetState( 
	DWORD     * pUpdateRate, 
	BOOL      * pActive, 
	LPWSTR    * ppName, 
	LONG      * pTimeBias, 
	FLOAT     * pPercentDeadband, 
	DWORD     * pLCID, 
	OPCHANDLE * phClientGroup, 
	OPCHANDLE * phServerGroup 
    ) 
{ 
	*pUpdateRate = m_Parent->m_dwRevisedRate; 
	*pActive = m_Parent->m_bActive; 
	*ppName = WSTRClone( m_Parent->m_szName, pIMalloc); 
	*pTimeBias = m_Parent->m_TimeBias; 
	*pPercentDeadband = m_Parent->m_Deadband; 
	*pLCID = m_Parent->m_LCID; 
	*phClientGroup = m_Parent->m_ClientGroupHandle; 
	*phServerGroup = m_Parent->m_ServerGroupHandle; 
 
	return S_OK; 
} 
 
 
/////////////////////////////////////// 
// SetState 
/////////////////////////////////////// 
STDMETHODIMP ILHEpipeviewGSM::SetState( 
	DWORD     * pRequestedUpdateRate, 
	DWORD     * pRevisedUpdateRate, 
	BOOL      * pActive, 
	LONG      * pTimeBias, 
	FLOAT     * pPercentDeadband, 
	DWORD     * pLCID, 
	OPCHANDLE * phClientGroup 
    ) 
{ 
	if(pRequestedUpdateRate) 
	{ 
		// Validate the UpdateRate 
		// 
		DWORD temp = *pRequestedUpdateRate; 
		DWORD MinRate = 250;//zzz should ask server for its resolution 
		temp += (MinRate/2); 
		temp /= MinRate; 
		temp *= MinRate; 
		m_Parent->m_dwRevisedRate = temp; 
	} 
	if(pActive) m_Parent->m_bActive = *pActive; 
	if(phClientGroup) m_Parent->m_ClientGroupHandle = *phClientGroup; 
	if(pPercentDeadband) m_Parent->m_Deadband = *pPercentDeadband; 
	if(pLCID) m_Parent->m_LCID = *pLCID; 
	if(pTimeBias) m_Parent->m_TimeBias = *pTimeBias; 
 
	*pRevisedUpdateRate = m_Parent->m_dwRevisedRate; 
 
	return S_OK; 
} 
 
 
/////////////////////////////////////// 
// SetName 
/////////////////////////////////////// 
STDMETHODIMP ILHEpipeviewGSM::SetName( 
	LPCWSTR szName 
    ) 
{ 
	WSTRFree(m_Parent->m_szName, NULL);		//acc002 
	m_Parent->m_szName = WSTRClone( szName, NULL); 
 
	return S_OK; 
} 
 
 
/////////////////////////////////////// 
// CloneGroup 
/////////////////////////////////////// 
STDMETHODIMP ILHEpipeviewGSM::CloneGroup( 
	LPCWSTR     szName, 
	REFIID      riid, 
	LPUNKNOWN * ppUnk 
    ) 
{ 
	int	i; 
	int	j; 
	LHEpipeviewGroup *oldgroup = m_Parent; 
	LHEpipeviewGroup *newgroup; 
	LHEpipeviewServer &s = *m_Parent->m_ParentServer; 
	HRESULT	r1; 
 
	// find a place in the server to put the new group (similar to i_server::AddGroup) 
	// 
	for(j=0; j= N_GRPS) 
		return E_OUTOFMEMORY; 
 
	// Create the group (returns IUnknown) 
	// and do an 'AddRef' since we will hold this IUnknown 
	// in the Server 
	// 
	newgroup = new LHEpipeviewGroup(m_Parent); 
	if(newgroup == NULL) 
	{ 
		return E_OUTOFMEMORY; 
	} 
	newgroup->AddRef(); 
 
	// And request a 2nd interface for the caller 
	// 
	r1 = newgroup->QueryInterface(riid, (LPVOID*) ppUnk); 
	if(FAILED(r1)) 
	{ 
		// If error - delete group and return 
		delete newgroup; 
		return r1; 
	} 
 
	// If OK then record the group in the server for future use 
	// 
	s.m_groups[j].inuse = 1; 
	s.m_groups[j].pGroup = newgroup; 
 
	// If OK then Copy info from the old group to the new group 
	// (except name and server handle) 
	// 
	newgroup->m_ServerGroupHandle = j; 
	newgroup->m_ClientGroupHandle = oldgroup->m_ClientGroupHandle; 
	newgroup->m_dwRevisedRate = oldgroup->m_dwRevisedRate; 
	newgroup->m_bActive = FALSE; 
	newgroup->m_szName = WSTRClone(szName, NULL); 
	newgroup->m_TimeBias = oldgroup->m_TimeBias; 
	newgroup->m_Deadband = oldgroup->m_Deadband; 
	newgroup->m_LCID = oldgroup->m_LCID; 
 
	// And then copy the ITEMS from the old group to the new group 
	// Note that the Item Handles are preserved (per the OPC specification). 
	// 
	for(i=0; iItemHandles(); i++) 
	{ 
		// Allocate a specific slot/handle in the new group 
		// (Initially empty) 
		// 
		newgroup->ItemReAlloc(i); 
 
		// And if old item is in use then copy it 
		// 
		if(oldgroup->ItemValid(i)) 
		{ 
			newgroup->ItemSet(i, oldgroup->ItemPtr(i)->Clone(newgroup, i)); 
		} 
	} 
	return S_OK; 
}