OPC:服务器开发(一)如何开发OPC Server

一、什么是OPC

OPC (OLE for Process Control——用于过程控制的OLE)是基于Microsoft公司的DNA(Distributed Internet Application)构架和COM(Component Object Model)技术的一个工业标准接口,是根据易于扩展性而设计的。

二、OPC的用途

OPC主要适用于过程控制和制造自动化等应用领域。 OPC是以OLE/COM机制作为应用程序的通讯标准。OLE/COM是一种客户/服务器模式,具有语言无关性、代码重用性、易于集成性等优点。OPC规范了接口函数,不管现场设备以何种形式存在,客户都以统一的方式去访问,从而保证软件对客户的透明性,使得用户完全从低层的开发中脱离出来

三、OPC Server的组成

一个设备的OPC Server主要有两部组成,一是OPC标准接口的实现;二是与硬件设备的通信模块。我们在这里主要讨论OPC 标准接口。IOPCServer 是OPC Server的主接口,通过它实现OPC Server在操作系统中的安装和注册。此接口是必须要实现的,其所有方法也必须实现。其它的接口都是可选的我们就不做介绍了,下面主要来介绍如何实现IOPCServer接口。
  在IOPCServer接口中共有六个方法:AddGroup、GetErrorString、GetGroupByName、GetStatus、RemoveGroup、CreateGroupEnumerator

  1. IOPCServer::AddGroup
    此方法是在OPC Server上建立一个组,函数定义:
  HRESULT AddGroup( [in, string] LPCWSTR szName,
  [in] BOOL bActive, 
  [in] DWORD dwRequestedUpdateRate, 
  [in] OPCHANDLE hClientGroup, 
  [unique, in] LONG *pTimeBias, 
  [in] FLOAT * pPercentDeadband, 
  [in] DWORD dwLCID, 
  [out] OPCHANDLE * phServerGroup, 
  [out] DWORD *pRevisedUpdateRate, 
  [in] REFIID riid, 
  [out, iid_is(riid)] LPUNKNOWN * ppUnk ;

使用实例:
  首先要对组名(szName)进行检查,看是否有效或是否已经有这个组。

RequestedName = szName;
if (RequestedName == ""){
     RequestedName = pSvrObject->DefaultGroupName();  
}else{
    RequestedName = pSvrObject->DefaultGroupName(); 
}  
   
for (i = 0; iGetGroup(i);
    if (RequestedName == pGroup->Name)
         return (OPC_E_DUPLICATENAME);    
}

这需要在内存中存储OPC Group(组) 的列表(还要有OPC项的列表)。
如果szName(组名)正确并且没有建立过该组,就开始根据传过来的参数进行组的建立,建立好后将该组加到自己的组列表中以备后用。

if ((dwRequestedUpdateRate == 0) || (dwRequestedUpdateRate < pApp->ServerTickRate))
       ActualRate = pApp->ServerTickRate;
else {
       ActualRate = dwRequestedUpdateRate;
       MinRate = pApp->ServerTickRate;
       ActualRate += (MinRate / 2);
       ActualRate /= MinRate;
       ActualRate *= MinRate;     
}
if (pRevisedUpdateRate)
    *pRevisedUpdateRate = ActualRate;  
pGroup = new (COPCGroup);
if (pGroup == NULL)
    return (E_OUTOFMEMORY); 
pGroup->Name = RequestedName;
pGroup->pSvrObject = pSvrObject;
pGroup->MarkedForDeletion = FALSE;
pGroup->ClientGroupHandle = hClientGroup; 
pGroup->UpdateRate = ActualRate; 
pGroup->IsActive = bActive;
if (pPercentDeadband)
    pGroup->Deadband = *pPercentDeadband;
else   
    pGroup->Deadband = 0.0;
pGroup->LCID = dwLCID;
if (pTimeBias)
    pGroup->TimeBias = *pTimeBias;
 else {
     _ftime( &timebuffer) ;
     pGroup->TimeBias = timebuffer.timezone;
     // pGroup->TimeBias = 300L;                    
}  
r1 = pGroup->QueryInterface(riid, (LPVOID *)ppUnk);
if (FAILED(r1)){
       // If error - delete group and return
       delete (pGroup);
       return r1;
}
pSvrObject->AddNewGroup(pGroup);

最后将新建组的接口指针返回给客户端。

*phServerGroup = pGroup->ServerGroupHandle;
  1. IOPCServer::GetErrorString
    为Server的错误代码返回相应的错误字符串,函数声明:
    HRESULT GetErrorString([in] HRESULT dwError, [in] LCID dwLocale, [ out, string ] LPWSTR *ppString);
  1. IOPCServer::GetGroupByName
    通过指定的组名(由同一客户端建立的)找到该组的接口指针。此方法实现比较简单,只要根据提供的名子循环从组列表中找到该组的接口指针,并返回给客户端。函数声明:
HRESULT GetGroupByName( [in, string] LPCWSTR szName, [in] REFIID riid, [out, iid_is(riid)] LPUNKNOWN *ppUnk );
  1. IOPCServer::GetStatus
    返回当前Server的状态信息。此方法比较简单,但要注意的是在使用OPCSERVERSTAUS前要进行内存分配。函数声明:
HRESULT GetStatus( [out] OPCSERVERSTATUS **ppServerStatus );
  1. IOPCServer::RemoveGroup
    从服务器中删除指定组,在组列表中找到指定的组,并将其删除。函数声明:
  HRESULT RemoveGroup( [in] OPCHANDLE hServerGroup, [in] BOOL bForce ;)

使用实例:

for (i = 0; iGetGroup(i);
    if (groupHandleID == pGroup->ServerGroupHandle){
        pSvrObject->RemoveGroup(i);
         // if no outstanding references delete it
       if (pGroup->RefCount == 0) {
               pSvrObject->LockGroupList();
               delete (pGroup);
               pSvrObject->UnlockGroupList();           
        }elseif (bForce){
               DeletedGroupList.Add((CObject *)pGroup);       
        } else {
               pGroup->MarkedForDeletion = TRUE;
               pGroup->pSvrObject = NULL;
               return (OPC_S_INUSE);          
        }
         return (S_OK);         
    }    
}
  1. IOPCServer::CreateGroupEnumerator
    为Server上所提供的组建立不同的列举器。函数声明:
HRESULT CreateGroupEnumerator( [in] OPCENUMSCOPE dwScope,[in] REFIID riid, [out, iid_is(riid)] LPUNKNOWN *ppUnk ;}
``

你可能感兴趣的:(OPC相关知识,OPC,服务器)