linux fortran system函数,C#调用Fortran生成的DLL

最近在编水动力学模型，用Fortran编写，运行效率相对较快，可视化部分则采用C#来做。由于涉及两门语言，便会产生交互问题，最佳搭配是用Fortran生成DLL，由C#来调，反过来的话则比较困难。我采用的运行环境是VS2010+IVF11.0，下面稍微讲一下方法，记录一下。

C#中导入DLL，需要显式的引用：

[System.Runtime.InteropServices.DllImport("READTS.dll", CharSet = System.Runtime.InteropServices.CharSet.Ansi, CallingConvention = CallingConvention.Cdecl)]

若直接采用[System.Runtime.InteropServices.DllImport("READTS.dll")]的话，编译能通过，但调试时可能会如下错误：

“对 PInvoke 函数的调用导致堆栈不对称”

这主要是由于系统默认的CallingConvention是“StdCall”，需要改为“Cdecl”。

Fortran与C#进行数据交换时，数值比较容易，字符则相对麻烦。Fortran默认采用引用地址的方式，而C#对数值是采用“传值”，对字符串是采用“传址”，而且二者对字符的处理完全不同。

在数值交换时，最好在Fortran里显式的声明为“传值”，方法如下：

!DEC$ ATTRIBUTES REFERENCE::Time_step

上面的“Time_step”为需要传递的数值参数，对于字符则无须声明为传值。在传递字符时，容易出现字符长度不一致，所以在Fortran中最好不要指明字符的长度，而采用(len=*)来声明，这样的话，传进来的字符是多长便是多长，如：

character(len=*)::filename_inp

对于数组的传递，在C#中只需要传递数组的第一个元素，这包括方法(函数)的声明与使用，但需要指出的是Fortran与C#中的数组的行和列是相反的，这个在数组使用与传递时需要做一定的变换。在传递字符时，需要同时传递字符及字符长度，所以在方法(函数)的声明时，也需要声明长度变量:

public static extern void READ_TS(ref int Item_num, ref int Time_step_num, ref double Time_step,string filename_inp, int Z);

上面的string filename_inp为要传递的字符串, int Z为字符串的长度。

对于字符串数组的传递，特别是传回来，感觉有些麻烦，也没有摸索出方法，就采用了TXT方式交互，对于数据量级不是很大的情况下，速度还可以。