要求:
如果发现已经在运行的应用程序,则直接重用当前运行的应用程序进行操作。
分析:
根据要求,分解具体需要解决的技术问题如下:
在WinForm程序中定义一个COM visible接口并实现。
将这个Winform程序变为COM服务器(LocalServer)。
将Winform程序的COM对象加入系统的ROT表中。
验证方法:
客户端通过CoCreateInstance(LocalServer)方式激活这个COM对象,应当看到对应的WinForm程序启动,并且CoCreateInstance成功返回我们所需的Interface指针,
客户端调用Interface的相关方法,Winform程序能够成功执行。
Winform程序运行时,客户端能够在ROT取得Winform程序的IUnknown指针。能够成功QI 成所实现的COM接口,并且调用相关方法成功执行。
解决方案:
1. 在WinForm程序中定义一个COM visible接口并实现
在.Net中定义COM 接口可以通过在接口定义上添加GuidAttribute和InterfaceTypeAttribute,定义该接口的IID并告知CLR该接口需要同时导出为普通的IUnknown COM 接口和OLE automation接口。具体例子如下:
[Guid( " CF7C704A-6AC3-4963-8818-EF1493CEC2D1 " )]
public interface IProvider
{
void Test();
}
实现这个interface,
[Guid( " 58C142C7-E599-4921-BF29-33DC0FCCBECA " )]
public class ProviderImp : IProvider
{
public void Test()
{
System.Diagnostics.Debug.WriteLine("Test");
}
}
这部分和.Net中实现进程内COM服务器是相同的,在.Net Framework SDK的文档中有详细的介绍。关于在.Net中实现COM组件可以参看MSDN。
2. 将这个Winform程序变为COM服务器(LocalServer)
根据COM本质论中的论述实现进程外COM服务器的需要以下几方面条件;
注册表中对应的CLSID下需要添加LocalServer32键,并把default设为EXE程序的路径
进程外服务器需要在启动时主动向SCM(Service Control Manager)中注册COM Class Object,这样SCM才能创建出对应的COM object返回给客户端,因此.Net程序需要提供一个Class Object(一个实现了IClassFactory COM接口的对象)并调用CoRegisterClassObject将其注册到SCM中。
除此之外,.Net中需要使用regasm命令将assembly中的COM visible类型加入注册表。(注意如果assembly没有加入GAC,请在注册的时候加上/codebase参数否则.Net会无法加载对应的assembly产生奇怪的E_NOINTERFACE错误)
具体的实现方式根据使用的.Net版本有所差异:对于.Net v2.0及其后版本而言,.Net RegistrationServices类提供了RegisterTypeForComClients和UnregisterTypeForComClients方法能够帮助我们很方便的实现注册和注销。
private static RegistrationServices msRegSvc = new RegistrationServices();
public static void RegisterServer()
{
Guid clsid = typeof(ProviderImp).GUID;
cookie = msRegSvc.RegisterTypeForComClients(typeof(ProviderImp),
RegistrationClassContext.LocalServer,RegistrationConnectionType.SingleUse);
}
public static void UnregisterServer()
{
msRegSvc.UnregisterTypeForComClients(cookie);
}
对于.Net 2.0之前的情况,我们可以通过下面的方式使用.Net自己的IClassFactory实现来实现SCM的注册
private static void RegisterServerImp(Guid clsid)
{
IntPtr pCF;
Guid IID_IClassFactory = new Guid(0x00000001, 0x0000, 0x0000, 0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46);
uint CLSCTX_LOCAL_SERVER = 4;
uint REGCLS_SINGLEUSE = 0;
int hr;
hr = DllGetClassObject(ref clsid, ref IID_IClassFactory, out pCF);
if (hr < 0)
{
throw new COMException("DLLGetClassObject failed.", hr);
}
hr = CoRegisterClassObject(ref clsid, pCF, CLSCTX_LOCAL_SERVER, REGCLS_SINGLEUSE, out appId);
if (hr < 0)
{
throw new COMException("CoRegisterClassObject failed.", hr);
}
}
private static void UnRegisterServerImp( uint appId)
{
CoRevokeClassObject(appId);
}
3. 将Winform程序的COM对象加入系统的ROT表中
加入ROT表有很多办法,可以通过取得系统IRunningObjectTable接口来直接注册也可以使用OLE的API RegisterActiveObject来实现,这里由于没有特殊要求,我们使用后者来实现。
private static ProviderImp msProvider = new ProviderImp();
private static int dwRegister = 0 ;
public static void RegisterActiveObject()
{
Guid clsidProviderImp = typeof(ProviderImp).GUID;
int hr = RegisterActiveObject(msProvider, ref clsidProviderImp, 0, out dwRegister);
}
public static void RevokeActiveObject()
{
RevokeActiveObject(dwRegister, IntPtr.Zero);
}
附录:
1.相关API的PInvoke定义:
public static extern int CreateBindCtx( int reserved, out IBindCtx bindCtx);
[DllImport( " oleaut32.dll " )]
private static extern int RegisterActiveObject([MarshalAs(UnmanagedType.IUnknown)] object pUnk, ref Guid rclsid, uint dwFlags, out int pdwRegister);
[DllImport( " oleaut32.dll " )]
private static extern uint GetActiveObject( ref Guid rclsid, IntPtr pvReserved, [Out] out IntPtr ppunk);
[DllImport( " oleaut32.dll " )]
private static extern uint RevokeActiveObject( int dwRegister, IntPtr lpReserved);
// from www.pinvoke.net
[DllImport( /**/ /*NOXLATE*/ " ole32.dll " )]
private static extern int CoRegisterClassObject(
[In] ref Guid rclsid,
IntPtr pUnk,
uint dwClsContext,
uint flags,
out uint lpdwRegister);
[DllImport( " ole32.dll " )]
private static extern int CoRevokeClassObject( uint dwRegister);
[DllImport( /**/ /*NOXLATE*/ " mscoree.dll " , ExactSpelling = true )]
private static extern int DllGetClassObject(
ref Guid rclsid,
ref Guid riid,
out IntPtr ppv);
2.C++客户端测试代码
#import " Server.tlb "
class COMHelper
{
public:
COMHelper(){ ::CoInitialize(NULL);}
~COMHelper(){ ::CoUninitialize();}
HRESULT FindRunningInstance(LPOLESTR lpszItem, IUnknown** ppUnk)
{
HRESULT hr = S_OK;
IMonikerPtr pMoniker;
hr = CreateItemMoniker(_T("!"), lpszItem, &pMoniker);
if(!SUCCEEDED(hr))
return hr;
IRunningObjectTablePtr pROT;
GetRunningObjectTable(0, &pROT);
hr = pROT->GetObjectW(pMoniker, ppUnk);
return hr;
}
} ;
int _tmain( int argc, _TCHAR * argv[])
{
COMHelper comSystem;
IUnknownPtr pUnk;
HRESULT hr = S_OK;
//look up the ROT table directly
hr = comSystem.FindRunningInstance(_T("{58C142C7-E599-4921-BF29-33DC0FCCBECA}"), &pUnk);
//alternative approach find running object in OLE way
//hr = ::GetActiveObject(__uuidof(Server::ProviderImp), NULL, &pUnk);
//if no running instance found start a new one.
if(!SUCCEEDED(hr))
{
hr = CoCreateInstance(__uuidof(Server::ProviderImp), NULL, CLSCTX_LOCAL_SERVER,
__uuidof(Server::IProvider), (LPVOID*)&pUnk);
if(!SUCCEEDED(hr))
throw 0;
}
//convert IUnknown to IProvider
Server::IProviderPtr pProvider;
hr = pUnk->QueryInterface(__uuidof(Server::IProvider), (LPVOID*)&pProvider);
if(!SUCCEEDED(hr))
throw 0;
//call IProvider
pProvider->Test();
return 0;
}