从一个实际的例子来了解线程套间模型(.NET and COM interop)

最新推荐文章于 2024-01-06 13:33:45 发布

Msro

最新推荐文章于 2024-01-06 13:33:45 发布

阅读量133

点赞数

文章标签： c#

原文链接：http://www.cnblogs.com/alanyao/p/3370168.html

版权

问题实例：

前些天有一个开发者在微软MSDN .NET开发者论坛上问了一个这样的问题：

“I create multiple instances of MSScriptControlClass on on different threads.

Calling an ExecuteStatement on one thread blocks other instances of MSScriptControlClass from executing on their own thread. I have an old Delphi Binary that seems to allow this behavior. I assume they use the same COM object.

Any ideas?

Thanks in advance.“

大概意思是说他创建了一个.NET的程序，并且在多个线程上都创建了MSScriptControlClass的实例，但问题是任意一个线程上的脚本执行都会阻止其他线程的脚本执行。并且他曾经用Delphi使用这个COM组件的时候并没有这个问题。

问题重现：

为了重现这个问题，我用下面的步骤做了一个简单控制台程序来进行测试：

在Visual Studio里创建了一个C#的控制台程序。
添加了一个名为”Microsoft Script Control 1.0”的COM引用。
添加了下列代码：

        static void Main(string[] args)

        {

            ThreadStart ts = new ThreadStart(LongRunningTask);

            Thread t = new Thread(ts);

            t.Start();

 

            ThreadStart ts1 = new ThreadStart(LongRunningTask1);

            Thread t1 = new Thread(ts1);

            t1.Start();

        }

 

        static void LongRunningTask()

        {

            MSScriptControl.ScriptControlClass scc = new MSScriptControl.ScriptControlClass();

            scc.Language = "VBScript";

            scc.AllowUI = true;

            scc.ExecuteStatement(Properties.Resources.command1);

        }

 

        static void LongRunningTask1()

        {

            MSScriptControl.ScriptControlClass scc = new MSScriptControl.ScriptControlClass();

            scc.Language = "VBScript";

            scc.AllowUI = true;

            scc.ExecuteStatement(Properties.Resources.command2);

        }

以下是Properties.Resources.command1和command2的内容：

commnd1:

For i=1 To 100 Step 1

if i mod 10 = 0 Then MsgBox(i)

command2:

For i=100 To 200 Step 1

if i mod 10 = 0 Then MsgBox(i)

期望的结果是有两个消息框弹出，并且一个显示10而另一个显示100. 那样就能证明脚本的执行可以并行进行。

但是得到的结果却是，要么弹出的是10，要么弹出的是100. 也就是说，线程间确实受到了影响。

问题分析：

这到底是为什么呢？如何来解决这个问题呢?

第一个印入我脑海的是：不同的threads之间对COM 对象的操作被进了了同步保护。所以让我想到了COM 线程套间模型。

先简单介绍一下COM线程套间模型（用来保证COM的线程安全）：

单线程套间模型（STA）：我们可以通过调用CoInitialize 或者CoInitializeEx(NULL, COINIT_APARTMENTTHREADED)来创建STA。在.NET中的话，CLR 运行时会根据我们的设置去调用相应的方法，并不需要我们显示调用。每个调用了CoInitialize的线程都会有一个独立的套间。

多线程套间模型（MTA）：我们可以通过调用CoInitializeEx(NULL, COINIT_MULTITHREADED) 来创建MTA。在.NET中的话，CLR 运行时会根据我们的设置去调用相应的方法，并不需要我们显示调用。所有调用了CoInitializeEx(NULL, COINIT_MULTITHREADED)的线程共享同一个套间。

根据上述描述，多线程套间模型是最有可能出现线程间同步控制的。那么我们来验证一下我们在.NET测试程序中创建的线程是否是MTA。这里我有必要强调一下.Net中托管线程的线程模型。在.NET中，线程模型不是.NET本身的线程安全/线程同步机制，纯粹是为了和之前的线程套间模型兼容。.NET本身是用完成端口、锁、互斥量等等来完成线程同步/线程安全的。

我们只需要在每个线程中调用下面的代码就可以看到当前的设置：

Console.WriteLine(Thread.CurrentThread.GetApartmentState().ToString());

得到的结果是：

主线程：MTA

线程t: Unknown

线程 t1: Unknown

出现Unknown是因为我并没有显示指定用那种线程模型，所以我们得到了默认的Unknown。不过CLR运行时在Unknown的情况下也是调用了CoInitializeEx(NULL, COINIT_MULTITHREADED)，这就意味着线程t和t1都是MTA。现在我们就解释了为什么两个线程会出现互相阻塞的情况。

那么STA模式将是我们解决问题的关键。但是不要急，因为这个COM组件并不一定支持STA，我们需要进一步验证。

Windows SDK提供了一个工具叫做OLE/COM Object Viewer, 那么我们就来看看我们需要调用的接口是否支持。下图就是我找到的关键接口。大家可以清楚的看到高亮的部分显示的是Both，那就是说STA和MTA都支持。

问题解决：

那么我们接下来试一下是不是STA可以解决问题，我在之前创建线程的代码的基础上做出了以下修改：

            ThreadStart ts = new ThreadStart(LongRunningTask);

            Thread t = new Thread(ts);

            t.SetApartmentState(ApartmentState.STA);

            t.Start();

 

            ThreadStart ts1 = new ThreadStart(LongRunningTask1);

            Thread t1 = new Thread(ts1);

            t1.SetApartmentState(ApartmentState.STA);

            t1.Start();

尝试再次运行这个控制台程序，我们会发现这次同时出现了显着着10和100的两个消息框。

结论及注意事项：

通过对上述问题的分析与解决，希望大家可以认识：

在多线程.NET程序中调用COM组件的时候，一定要注意线程套间模型的设置。
对于Scriptcontrol来说，它的开发者实现了多线程调用的线程同步和线程安全策略。但是并不意味着所有的COM组件都不能在MTA下进行多线程并行操作，这也是取决于COM服务是如何实现的。
我们可以通过OLE/COM Object Viewer来查看某个COM服务支持那种线程套间模型，并且对调用线程进行相应设置。

相关文档参考：

Understanding and Using COM Threading Models

http://msdn.microsoft.com/en-us/library/ms809971.aspx

INFO: Descriptions and Workings of OLE Threading Models

http://support.microsoft.com/kb/150777

Processes, Threads, and Apartments

http://msdn.microsoft.com/en-us/library/windows/desktop/ms693344(v=vs.85).aspx

Managed and Unmanaged Threading

http://msdn.microsoft.com/en-us/library/5s8ee185.aspx

COM Clients and Servers

http://msdn.microsoft.com/en-us/library/windows/desktop/ms683835(v=vs.85).aspx

An Overview of Managed/Unmanaged Code Interoperability