Inside COM读书笔记-----调度接口与自动化

最新推荐文章于 2022-06-01 18:26:42 发布
最新推荐文章于 2022-06-01 18:26:42 发布
阅读量4.5k 收藏 1
点赞数 1
分类专栏： COM
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/wangqiulin123456/article/details/8962453
版权

1．  一种新的通信方式


IDispatch为客户和组件提供了另外一种通信方式，有了IDispatch后，COM组件可以通过一个标准的接口提供它所支持的服务，而无需提供多个特定与服务的接口。

 

1.1旧的通信方式


客户和组件之间的通信是通过接口完成的，接口拥有一个有函数指针构成的数组。客户代码需要包含一个以抽象基类形式描述接口的头文件。编译器将读取此头文件，然后为抽象基类中的每一个成员函数分配一个索引。此索引实际上就是相应函数的指针在函数指针数组中的索引。

pIX->FxStringOut(msg);

将解释成：

(*(pIX->pvtbl[indexOfFxStringOut]))(pIX,msg);

其中pvtbl为指向相应类的vtbl的指针，而IndexOfFxStringOut则为FxStringOut的指针在函数指针表中的索引。

在开发宏语言是，宏语言如可能获取到函数在vtbl中的指针的索引以便能够调用它们呢？宏语言调用COM组件中的一个函数时，可以使用三种类型的信息：实现被调用函数的组件ProID、函数名称以及传给函数的参数。我们需要在宏运行时系统能够提供一种通过函数的名称老执行函数的简单方法。这种方法就是IDispatch接口。

 

1.2IDispatch接口


简单来说，IDispatch将接收一个函数的名称并执行它。IDispatch的IDL描述

interfaceIDispatch : IUnknown

{

    typedef [unique] IDispatch * LPDISPATCH;

 

    HRESULT GetTypeInfoCount(

                [out] UINT * pctinfo

            );

 

    HRESULT GetTypeInfo(

                [in] UINT iTInfo,

                [in] LCID lcid,

                [out] ITypeInfo ** ppTInfo

            );

 

    HRESULT GetIDsOfNames(

                [in] REFIID riid,

                [in, size_is(cNames)] LPOLESTR* rgszNames,

                [in] UINT cNames,

                [in] LCID lcid,

                [out, size_is(cNames)] DISPID *rgDispId

            );

 

    [local]

    HRESULT Invoke(

                [in] DISPID dispIdMember,

                [in] REFIID riid,

                [in] LCID lcid,

                [in] WORD wFlags,

                [in, out] DISPPARAMS *pDispParams,

                [out] VARIANT * pVarResult,

                [out] EXCEPINFO * pExcepInfo,

                [out] UINT * puArgErr

            );

 

    [call_as(Invoke)]

    HRESULT RemoteInvoke(

                [in] DISPID dispIdMember,

                [in] REFIID riid,

                [in] LCID lcid,

                [in] DWORD dwFlags,

                [in] DISPPARAMS * pDispParams,

                [out] VARIANT * pVarResult,

                [out] EXCEPINFO * pExcepInfo,

                [out] UINT * pArgErr,

                [in] UINT cVarRef,

                [in, size_is(cVarRef)] UINT *rgVarRefIdx,

                [in, out, size_is(cVarRef)]VARIANTARG * rgVarRef

            );

IDispatch最令人感兴趣的是GetIDsOfNames和Invoke.GetIDsOfNames将读取一个函数的名称并返回其调度ID（DISPID）。DISPID是一个长整数，它标识一个函数。自动化控制程序将把DISPID传给Invoke成员函数。Invoke可以将DISPID作为函数指针数组的索引。

 

  • 调度接口

IDispatch：：Invoke的实现与vtbl还有另外一方面是相似的：他们都可以定义接口。IDispatch：：Invoke的一个实现所实现是我函数集被称为一个调度接口。而COM接口是一个指向一个函数指针数组的指针，此数组的前三个元素分别是：Queryinterface、AddRef和Release。如下给出调度接口的一个图示：

左边是一个传统的COM接口IDispatch，他是以vtbl的方式实现，右边是一个调度接口，Invoke能识别的DISPID对于调度接口至关重要。上图给出的时一种可能实现，GetIDsOfNames通过函数名称获取其DISPID，Invoke通过DISPID来找到相应的函数指针，来执行函数。

同时也可以用一个COM接口实现IDispatch::Invoke：

 

  • 双重接口

上图不是用COM组件实现调度接口的唯一方法。也可以使用如下的方法。让实现IDispatch：：Invoke的COM组件继承IDispatch而不是IUnknown。这样是称作双重接口的方法，通过Invoke能够访问的函数也能够直接通过vtbl访问到。

 

2.IDispatch的使用


           考虑下面的VB程序：

                   Dim Cmpnt As Object

Set Cmpnt = CreateObject("InsideCom.Cmpnt1")

Cmpnt.Fx

通过COM组件实现的IDispatch接口调用Fx，下面看看C++如何实现这个工作。

HRESULT hr = OleInitialize(NULL);

 

wchar_tprogid[] = L"InsideCom.Cmpnt1";

CLSID clsid;

CLSIDFromProgID(progid, &clsid);

IDispatch *pDispach = NULL;

CoCreateInstance(clsid,

    NULL,CLSCTX_INPROC_SERVER,

    IID_IDispatch,(void**)&pDispach);

DISPID dispid;

OLECHAR* name = L"Fx";

pDispach->GetIDsOfNames(

    IID_NULL,&name,

    1,GetUserDefaultLCID(),&dispid);

 

DISPPARAMS dispparamsNoArgs = {

    NULL,NULL,0,0

}

 

pDispach->Invoke(dispid,

    IID_NULL,

    GetUserDefaultLCID(),

    DISPATCH_METHOD,

    &dispparamsNoArgs,

    NULL,NULL, NULL);

 

通过CoCreateInstance返回一个IDispatch指针，通过IDispatch::GetIDsOfNames可以将函数名称转换成一个DISPID在通过IDispatch::Invoke调用相应的函数。

 

2.1Invoke函数的参数


第一个参数是控制程序待调用函数的DISPID，第二个是保留的必须为IID_NULL。第三个是保存的位置信息。其他的下面讨论。

 

  • 方法和属性

COM接口中所有成员都是函数，使用“Set”和“Get”类函数来模拟岁成员变量的访问。例如SetVisible可以设置一个窗口的可见性。则GetVisible可以获取这一属性。

If(pIWindows->GetVisible() == FALSE)

         pIWindows->SetVisible(TRUE);

对于VB用Set和Get就不太理想，在vb中如下调用

If Window.Visible = False Then

         Window.Visible= True

End If

IDL中的propget核propput属性可以将COM函数说明成将其当成一个属性对待。

 

  • 调度参数

IDispatch：：Invoke的第五个参数包含的时传给被调用函数的参数。结构如下

typedef struct tagDISPPARAMS

    {

   VARIANTARG *rgvarg;

   DISPID *rgdispidNamedArgs;

   UINT cArgs;

   UINT cNamedArgs;

    }   DISPPARAMS;

结构的第一个参数是一个参数数组，cArgs成员则是数组中元素的个数。每一个参数类型都是VARIANTARG类型。VARIANT是许多不同类型的一个大联合。

 

  • 返回值的获取

第六个参数pVarResult指向一个VARIANT结构的指针。保存Invoke所执行函数或propget的结果。

  • 异常情况

IDispatch：：Invoke的倒数第二个参数为指向EXCEPINFO结果指针。若Invoke执行函数或属性遇到一个异常情况，则此结构被填入关于此异常情况的一些信息。

typedef struct tagEXCEPINFO {

   WORD  wCode;

   WORD  wReserved;

   BSTR  bstrSource;

   BSTR  bstrDescription;

   BSTR  bstrHelpFile;

   DWORD dwHelpContext;

   PVOID pvReserved;

   HRESULT (__stdcall *pfnDeferredFillIn)(struct tagEXCEPINFO *);

   SCODE scode;

} EXCEPINFO, * LPEXCEPINFO;

在错误代码（wCode）或返回值（scode）中必须包含一个标识的值。而另外一个为0；

EXCEPINFO excepinfo;

HRESULT hr = pDispach->Invoke(...,&excepinfo);

if(FAILED(hr))

{

    if(hr == DISP_E_EXCEPTION)

    {

        if(excepinfo.pfnDeferredFillIn( != NULL))

            (*(excepinfo.pfnDeferredFillIn))(&excepinfo);

        cout<<"Exception information: "<<endl

            <<"Source: "<<excepinfo.bstrSource<<endl

            <<"Description: "<<excepinfo.bstrDescription<<ends;

    }

}

 

3.类型库


         类型库将提供有关组件、接口、方法、属性、参数及结构的类型信息。类型库是一个二进制文件。


3.1类型库的创建


自动化库函数CreateTypeLib可以创建一个类型库。该函数将返回一个可以用相应的信息填充类型库的ICreatetypeLib接口，可以使用IDL生成代理/存根DLL代码。

 

  • Library语句

使用IDL建立类型库的关键是library语句，library关键字之后的方括号的内容都将边缘到类型库中。

[

    object,

    uuid(7AAAE05F-283E-4D79-B98C-5D3DCBE733BB), //IID_IPoint

    helpstring("IPointinterface"),

    oleautomation,

    dual

]

interface IPoint : IDispatch

{

    [propget, helpstring("Returns and sets X coordinate")]

    HRESULTx([out,retval]int *retval);

    [propput, helpstring("Returns and sets X coordinate")]

    HRESULTx([in]intValue);

 

    [propget, helpstring("Returns and sets Y coordinate")]

    HRESULTy([out,retval]int *retval);

    [propput, helpstring("Returns and sets Y coordinate")]

    HRESULTy([in]intValue);

 

    [helpstring("Displaythe Point.")]

    HRESULTdisplay();

}

 

[

    uuid(13BA7D38-8F44-4E80-9DAE-6E01776BEE16),//LIBID_Point

    helpstring("PointComponent Type Library"),

    version(1.0)

]

library Point

{

    importlib("stdole32.tlb");

 

    interface IPoint;

 

    [

        uuid(0615EA9A-0ED9-458D-9F0D-A9E3645338AB),//CLSID_Point

        helpstring("PointClass"),

        appobject

    ]

    coclass Point

    {

        [default] dispinterfaceIPoint;

    }

}

  • 类型库的分发

在生成了类型库之后，既可以将其作为一个单独的文件发行，也可以将其作为一个资源包含在EXE或DLL中。

 

3.2类型库的使用


使用类型库的第一步是装载它，LoadRegTypeLib他将试图从Windows的注册表中装载指定的类型库。若失败则可以使用LoadTypeLib从磁盘装载指定的类型库或者LoadTypeLibFromResource从EXE/dll装载指定的类型库。

    HRESULThr;

    LPTYPELIBpTypeLib = NULL;

 

    hr= LoadRegTypeLib(LIBID_Point,1,0,0,&pTypeLib);

    if(FAILED(hr))

    {

        hr= LoadTypeLib(OLESTR("Point.tlb"),&pTypeLib);

    }

    if(FAILED(hr))

        return hr;

    hr= pTypeLib->GetTypeInfoOfGuid(IID_IPoint,&s_pTypeInfo);

    pTypeLib->Release();

    if(FAILED(hr))

        return hr;

    s_pTypeInfo->AddRef();

    return hr;

 

3.3注册表中的类型库


在HKEY_CLASS_ROOT\TypeLib关键字下地LIBID类表。

 

4．类型库的实现


STDMETHODIMPCPoint::GetTypeInfoCount(__RPC__out UINT *pctinfo)

{

    *pctinfo= 1;

    return S_OK;

}

 

STDMETHODIMP CPoint::GetTypeInfo(UINTiTInfo, LCID lcid, ITypeInfo **ppTInfo)

{

    HRESULThr;

 

    if(iTInfo != 0)

        return TYPE_E_ELEMENTNOTFOUND;

    if(ppTInfo == NULL)

        return E_POINTER;

    if(s_pTypeInfo)

    {

        s_pTypeInfo->AddRef();

        hr= S_OK;

    }

    else

    {

        hr = LoadMyTypeLib();

    }

    if (!hr)

        *ppTInfo= s_pTypeInfo;

    return hr;

}

 

STDMETHODIMP CPoint::GetIDsOfNames(REFIIDriid, LPOLESTR *rgszName, UINT cNames, LCID lcid, DISPID *rgDispId)

{

    HRESULThr;

 

    if(IsEqualIID(riid,IID_NULL))

        return DISP_E_UNKNOWNINTERFACE;

    if (!s_pTypeInfo)

    {

        hr= LoadMyTypeLib();

        if(FAILED(hr))

            return hr;

    }

 

    hr= s_pTypeInfo->GetIDsOfNames(rgszName,cNames,rgDispId);

    return hr;

}

 

STDMETHODIMP CPoint::Invoke(DISPIDdispIdMember, REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)

{

    HRESULThr;

 

    if(IsEqualIID(riid,IID_NULL))

        return DISP_E_UNKNOWNINTERFACE;

    if (!s_pTypeInfo)

    {

        hr= LoadMyTypeLib();

        if(FAILED(hr))

            return hr;

    }

    hr= s_pTypeInfo->Invoke(this,dispIdMember,wFlags,pDispParams,pVarResult,pExcepInfo,puArgErr);

    return hr;

}

 

HRESULT CPoint::LoadMyTypeLib()

{

    HRESULThr;

    LPTYPELIBpTypeLib = NULL;

 

    hr= LoadRegTypeLib(LIBID_Point,1,0,0,&pTypeLib);

    if(FAILED(hr))

    {

        hr= LoadTypeLib(OLESTR("Point.tlb"),&pTypeLib);

    }

    if(FAILED(hr))

        return hr;

    hr= pTypeLib->GetTypeInfoOfGuid(IID_IPoint,&s_pTypeInfo);

    pTypeLib->Release();

    if(FAILED(hr))

        return hr;

    s_pTypeInfo->AddRef();

    return hr;

}

 

 

 

 

 

iot-genius
关注
  • 1
    点赞
  • 踩
  • 1
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 2
    评论
专栏目录
react-inside-ember：从Ember视图进行React
02-04
本自述文件概述了与此Ember应用程序进行协作的细节。 此应用程序的简短介绍可以轻松地转到此处。 先决条件 您需要在计算机上正确安装以下物品。 （带有NPM） 安装 git clone 此存储库 cd klear npm install 运行/...
INSIDE AMPLIFER PHOTOELECTRIC SWITCH-教程与笔记习题
05-22
INSIDE AMPLIFER PHOTOELECTRIC SWITCH
COM---调度接口与自动化
新博客：https://aping-dev.com/
02-19 3263
自动化服务器：实现了IDispatch接口的COM组件。自动化控制程序：通过IDispatch接口同自动化服务器进行通信的COM客户。IDispatch通过COM接口提供的任何服务都可以通过IDispatch接口提供。有了IDispatch，COM可通过一个标准的接口提供它所支持的服务，而无需提供多个特定于服务的接口。IDispatch将接受一个函数名，并执行它。IDispatch定义 可以在编译
接口调度者——API 网关
09-04 472
背景我们知道在微服务架构风格中，一个大应用被拆分成为了多个小的服务系统提供出来，这些小的服务他们自成体系，也就是说这些小系统可以拥有自己的数据库，框架甚至语言等，这些小系统通常以提供 R...
Inside COM读书笔记------接口
IT民工
05-09 1943
1.接口的作用 组件可以充应用程序中删除并可用另外一个组件代替，只要新的组件支持同样的接口。单个组件并不能起决定性作用，相反，用以连接组件的接口对应用程序亲戚到决定性作用。使用组件来构成应用程序最大优点在于可以复用应用程序的结构。 接口可以保护系统免受外界变化的影响、接口可以使得客户用相同的方式处理不同的组件。 2.COM接口的实现 class IX
第11章 调度接口与自动化
jjunjoe的专栏
08-29 957
第11章 调度接口与自动化 1、自动化是建立在COM基础上的。 2、一个自动化服务器实际上就是一个实现了IDispatch接口的COM组件。 3、一个自动化控制器则是一个通过IDispatch接口同自动化服务器进行通信的COM客户。 自动化控制器不会直接调用自动化服务器实
多任务处理：管理调度Executor 接口
爱.NET
12-23 211
系统管理调度：Executor接口 在上一节中我们已经看到，将客户服务器协议的细节封装起来（如EchoProtocol.java），就可以通过同一个协议实现来使用不同的"调度"方法（如，TCPEchoServerThread.java和TCPEchoServerThreadPool.java）。实际上，对于调度方法本身来说也是这样。Executor接口（java.util.concurren...
spring-boot-inside：spring boot技术细节的相关demo
01-30
弹簧靴内 Spring Boot技术细节的相关演示 深度Spring Boot系列： : 微信公众号 欢迎扫一扫下面的微信公众号，订阅“横云断岭的专栏”。
I-BUS Inside Inside the BMW Cars entertainement Serial Bu
08-08
I-BUS Inside Inside the BMW Cars entertainement Serial Bu
Inside Microsoft SQL Server 2008 T-SQL Programming
03-02
《Inside Microsoft SQL Server 2008 T-SQL Programming》这本书深入探讨了SQL Server 2008中的T-SQL编程技术，这是SQL Server数据库管理与开发的核心语言。T-SQL，即Transact-SQL，是SQL的一个扩展，主要用于微软的...
DispID-v1-3.pdf
09-01
displayid 1.3 public version. so detail about display register
RestTemplate远程接口调度
qq_40977467的博客
08-18 202
这里写自定义目录标题欢迎使用Markdown编辑器新的改变功能快捷键合理的创建标题，有助于目录的生成如何改变文本的样式插入链接与图片如何插入一段漂亮的代码片生成一个适合你的列表创建一个表格设定内容居中、居左、居右SmartyPants创建一个自定义列表如何创建一个注脚注释也是必不可少的KaTeX数学公式新的甘特图功能，丰富你的文章UML 图表FLowchart流程图导出与导入导出导入 欢迎使用Markdown编辑器 你好！ 这是你第一次使用 Markdown编辑器 所展示的欢迎页。如果你想学习如何使用Mar
如何查看office事件的DISPID
zero_226的专栏
02-24 1786
最近在学习office插件的开发，遇到一个问题，添加SINK_ENTRY_INFO事件响应时，不知道如何获得dispid，在网上查了一下，在msdn上找到这么一个答案： “Extracts   from   the   IDL   definition   (as   described   in   MSOUTL9.olb   viewed   through   OLE/COM   obje
VC 编程技巧 (五)
dvlinker的技术专栏
11-08 1649
VC 编程技巧 (五)
接口调优的大致思路
qq_25863973的博客
06-01 448
要解决接口查询缓慢的问题，首先要清楚从请求发出到返回，经过了哪些过程。后端接收到请求，首先是后端分配线程处理，而该线程是SpringBoot默认的线程池中的线程。线程池的默认配置在文件TaskExecutionProperties.class中可以看到，大致如下： 假设8个核心线程都正在处理请求，再来新的请求，会进入队列等候，直到核心线程有空出，或者队列满了，线程池会开启非核心线程，来处理队列中等候的任务，但是默认线程池的队列这么长，相比之下，
实现和IE浏览器交互的几种方法的介绍（二）
shifuren的博客
08-20 1146
法。IDispatch是从IUnknown中继承的一个接口的类型，通过COM接口提供的任何服务都可以通过IDispatch接口来实现。IDispatch::Invoke的工作方式同vtbl幕后的工作方式是类似的，Invoke将实现一组按索引来访问的函数，我们可以对Invoke方法进行动态的定制以提供不同的服务。Invoke方法的表示如下： STDMETHOD(Invoke)(DISPID
权威指南：深入探索Microsoft SQL Server 2008 T-SQL编程
2. **数据修改语言（DML）**：详细介绍了INSERT、UPDATE和DELETE语句的使用，以及如何通过触发器实现自动化的数据操作。 3. **数据定义语言（DDL）**：涵盖了创建、修改和删除数据库对象，如表、视图、索引、存储...
评论 2
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

iot-genius

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付：¥1
获取中
扫码支付

您的余额不足，请更换扫码支付或充值

打赏作者

实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值