大熊 — Wed, 12 May 2010 14:05:00 GMT

在成功实现Java调用C++之后�Q�接下来惛_��能否通过JNA实现Java调用Fortran�Q�今天试验了一下，�q�是比较�Ҏ��的�?br />
�|�上有一个Java调用F95的例子，但是我考虑不仅要实现F95的调用，�q�要实现F77的调用，所以费了一些周折�?br />
问题的关键在于F77��E�名自动��d��了一个尾部的下划�U�，所以sub1�q�个�q�程�Q�到Java一端，��变成了sub1_�Q�知道了�q�一点，后面��q��单了�?br />
1、创��Z��个动态链接库��目FortranDLL�Q�新��Z��个简单的fortran源程序for1.f�Q?br />       subroutine sub1(i)
          INTEGER i;
          PRINT*, "SUB1 CALLED"
          PRINT*, i
      END subroutine
�~�译代码生成libFortranDLL.dll�?br />
2、新��Z��个Java��目�Q�包含JNA�?br /> 创徏一个动态库接口代码FLib.java�Q?br />

import com.sun.jna.Library;
import com.sun.jna.ptr.ByReference;

public interface FLib extends Library {
void sub1_(ByReference i);
}

创徏一个主�E�序Main.java

import com.sun.jna.Native;
import com.sun.jna.ptr.IntByReference;

public class Main {

    public static void main(String[] args) {
        // Loading dynamically the library
        FLib lib2 = (FLib) Native.loadLibrary("libFortranDLL", FLib.class);
        IntByReference a = new IntByReference(1234);
        lib2.sub1_(a);
    }
}

注意�Q�关键在于接口当中的sub_�q�个命名规则�Q�否则无法找到找到指定过�E�，另外默认情况下，fortran使用引用参数�Q�所以不能简单实用int作�ؓ参数�Q�必��d��用引用参数�?br />
�q�行�E�序�Q�得到如下结果：

run�Q?br /> SUB1 CALLED
1234
成功生成�Q��L��_��1 �U�）

3、G95的调用更��单一些，可以直接使用bind指定输出�q�程�Q�函敎ͼ�名，可以完全不必考虑�~�译器的命名规则�Q�比f77的方式可�U�L��性更好一些�?br />
可以参考这里：http://www.javaforge.com/wiki/66061

大熊 2010-05-12 22:05 发表评论

JNA实现Java调用C++动态链接库

大熊 — Tue, 11 May 2010 02:51:00 GMT

今天偶然看到了JNA的介�l�，下蝲下来试了一下，很好用，相比较JNI要简单很多。做了一个可以callback的c++动态链接库�Q�实��C��java和c++的互相调用�?/p>

1、开发环境：

开发工��P��Netbeans 6.8�Q�包含了Java和C++开发插�Ӟ��用一个工��h��较方便，可以同时开发C++的dll和Java代码�?/p>

C++环境�Q�MingW 5.1.6+MSYS、g++ 3.4.5

Java环境�Q�JDK 1.6.0_18

2、C++代码

用Netbeans创徏一个动态链接库��目JNALib�Q�创��Z��个c++源文件clib.cpp�Q�生成结果�ؓlibJNALib.dll

#include <stdlib.h>
#include <iostream>
using namespace std;
extern "C"
{
    typedef void (*OpenFunc)(const char*,int);

    OpenFunc openfunc = NULL;

    void init(OpenFunc func) {
        cout << "init called" <<endl;
        openfunc = func;
    }

    void test() {
        if (openfunc == NULL) {
            cout << "openfunc is NULL" << endl;
        }
        (*openfunc)("test", 0);
    }
}

注意�Q�其中OpenFunc声明了一个回调类型，也就是一个函数指针，可以通过init��java中的OpenFunc�Ҏ��传递进来，讄��q�个函数指针�Q�如此一来，可以实现C++到Java的回调�?/p>

3、Java代码

创徏一个Java��目JNADemo�Q�创��Z��个包clibtest�Q�创��Z��下java代码�Q?/p>

package clibtest;

import com.sun.jna.Callback;
import com.sun.jna.Library;

public interface CLib extends Library{

    public interface OpenFunc extends Callback {
        void invoke(String filename, int i);
    }
    void init(OpenFunc openfunc);
    void test();
}

package clibtest;

import com.sun.jna.Native;

public class hello {

    public static void main(String[] args) {
        // Loading dynamically the library
        CLib lib = (CLib) Native.loadLibrary("libJNALib", CLib.class);

        lib.init(new CLib.OpenFunc() {

            public void invoke(String filename, int i) {
                System.out.println("callback called.");
                System.out.println(filename);
            }
        });

        lib.test();
    }
}

4、项目结构如�?/strong>

5、编译C++��目�Q�生成libJNALib.dll�Q�拷贝到JNADemo�ȝ��录，目录�l�构如下�Q?/strong>

6、运行程序，�l�果如下�Q?/strong>

大熊 2010-05-11 10:51 发表评论

亚洲成人综合网站,www.久久久,国产精品调教

JNA实现Java调用C++动态链接库