一、什麼是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
- 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; i<NumbrGroups(); i++){
pGroup = pSvrObject->GetGroup(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;
- IOPCServer::GetErrorString
爲Server的錯誤代碼返回相應的錯誤字符串,函數聲明:
HRESULT GetErrorString([in] HRESULT dwError, [in] LCID dwLocale, [ out, string ] LPWSTR *ppString);
- IOPCServer::GetGroupByName
通過指定的組名(由同一客戶端建立的)找到該組的接口指針。此方法實現比較簡單,只要根據提供的名子循環從組列表中找到該組的接口指針,並返回給客戶端。函數聲明:
HRESULT GetGroupByName( [in, string] LPCWSTR szName, [in] REFIID riid, [out, iid_is(riid)] LPUNKNOWN *ppUnk );
- IOPCServer::GetStatus
返回當前Server的狀態信息。此方法比較簡單,但要注意的是在使用OPCSERVERSTAUS前要進行內存分配。函數聲明:
HRESULT GetStatus( [out] OPCSERVERSTATUS **ppServerStatus );
- IOPCServer::RemoveGroup
從服務器中刪除指定組,在組列表中找到指定的組,並將其刪除。函數聲明:
HRESULT RemoveGroup( [in] OPCHANDLE hServerGroup, [in] BOOL bForce ;)
使用實例:
for (i = 0; i<NumbrGroups(); i++){
pGroup = pSvrObject->GetGroup(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);
}
}
- IOPCServer::CreateGroupEnumerator
爲Server上所提供的組建立不同的列舉器。函數聲明:
HRESULT CreateGroupEnumerator( [in] OPCENUMSCOPE dwScope,[in] REFIID riid, [out, iid_is(riid)] LPUNKNOWN *ppUnk ;}
``