从 C# 调用 Fortran dll 函数时出现堆栈溢出异常

Question

我有一个现有的 VB6 程序，它使用以下定义调用 Fortran dll：

Declare Function START Lib "BackEndLib2.dll" Alias "_START@0" () As Integer

我们正在将 VB6 应用程序迁移到 C# (.net 4.0)，现在的定义如下：

[DllImport("BackEndLib2.dll", EntryPoint = "_START@0")]
public static extern short START();

但是，当我调用相同的函数时在c#中，它执行dll调用成功返回托管代码，然后在一段时间后抛出堆栈溢出异常。

我还在 VB.net 中尝试了相同的 dll 调用，得到了相同的结果：

Declare Function START Lib "BackEndLib2.dll" Alias "_START@0" () As Short

知道为什么相同的函数调用在 .NET 4.0 中产生堆栈溢出异常但在 vb6 中成功运行吗？

我猜我正在用 dll 调用破坏堆栈，但我不确定。我尝试了许多不同的参数类型，但到目前为止没有任何效果。

编辑：这似乎只是 WPF 中的一个问题，如果我在 Windows 窗体中创建相同的示例，它不会崩溃。

Answer 1

您的 [DllImport] 声明相当于 VB6 声明语句。最好假设 VB6 声明一开始就是错误的，并且您幸运地逃脱了它。返回类型很奇怪，但这不会导致堆栈问题，因为返回值是通过 CPU 寄存器而不是堆栈传递的。

使用“调试”+“Windows”+“寄存器”开始诊断此问题。注意调用前后ESP的值。如果不一样，那么确实存在声明问题，并且对该函数的大量调用可能会破坏堆栈。顺便说一句，这不太可能，这通常会生成 MDA 警告。如果匹配，则只能是溢出堆栈的 Fortran 代码。

另请记住，您可能会归咎于错误的功能。生成 SOE 的函数可能不是导致堆栈混乱的函数。查看 ESP 值可以让您快速找到麻烦制造者。

Answer 2

根据我的经验，如果您有类似以下的 FORTRAN 声明：

        INTEGER*4 FUNCTION START( )
CDEC$ATTRIBUTES STDCALL, DLLEXPORT :: START
C.....  BODY HERE
        ENDFUNCTION

也许您应该尝试以下操作：

[DllImport(..., CallingConvention = CallingConvention.StdCall)]
public static extern int Start( );

出于好奇，哪个 FORTRAN 编译器生成了该 DLL？您是否指定应将其导出为 STDCALL？您可能还必须将调用约定更改为 C。