JNIについて

// OtherSystem.java

// VbCom.OtherSystem COMのラッパークラス
class OtherSystem {

	protected int pComObject = 0;		// COMオブジェクトのポインタ

	static {
		// JNI DLL（VbComWrapper.dll）をロードする
		System.loadLibrary("VbComWrapper");
	}

	public OtherSystem() {
		// コンストラクタ内でCOMのインスタンス生成をしておく
		_create();
	}
	private native void _create();	// COMインスタンスの生成
	public native void dispose();	// COMインスタンスの破棄

	// COMのラッパーメソッド
	public native String getData();					// VbCom.OtherSystem.GetDataメソッド
	public native void sendData(String data);		// VbCom.OtherSystem.GetDataメソッド


	// COMラッパークラスの使い方
	public static void main(String[] args) {
		
		// インスタンス生成
		OtherSystem otherSystem = new OtherSystem();
		
		// 他システムからデータ取得する（VbCom.OtherSystem.GetDataメソッド呼び出し）
		String data = otherSystem.getData();
		System.out.println("data:" + data);
		
		// 他システムへデータを送信する（VbCom.OtherSystem.SendDataメソッド呼び出し）
		otherSystem.sendData("SHOHIN_CODE0002,みかん,￥50");
		
		
		// 用が済めば、disposeメソッドで破棄をすること
		otherSystem.dispose();
	}

}

// JNI実装 (VbComWrapper.dll)

// 必要なヘッダファイルをインクルード
#include <windows.h>
#include <objbase.h>
#include <stdio.h>
#include "OtherSystem.h"	// javahにより自動生成されたヘッダファイル

// COMタイプライブラリをインポート
#import "VbCom.dll"			// VB6のDLL
using namespace VbCom;

// DLLエントリポイント関数の定義
BOOL APIENTRY DllMain( HANDLE hModule, DWORD fdwReason, LPVOID lpReserved)
{
	switch (fdwReason) {
	case DLL_PROCESS_ATTACH:
	case DLL_THREAD_ATTACH:
		// DLLロード時にCOMライブラリを初期化する
		::CoInitialize(NULL);
		break;

	case DLL_THREAD_DETACH:
	case DLL_PROCESS_DETACH:
		// DLLアンロード時にCOMライブラリの後処理をする
		::CoUninitialize();
		break;
	}

    return TRUE;
}

// OtherSystem._createメソッドの実装
JNIEXPORT void JNICALL Java_OtherSystem__1create
  (JNIEnv* env, jobject obj)
{
	// pComObjectフィールドのフィールドID取得
	jclass cls = env->GetObjectClass(obj);
	jfieldID fieldID = env->GetFieldID(cls, "pComObject", "I"); 

	// VbCom.OtherSystemインスタンスを生成
	HRESULT hr;
	_OtherSystem* pOtherSystem = NULL;
	hr = ::CoCreateInstance(__uuidof(OtherSystem), NULL, CLSCTX_INPROC_SERVER, __uuidof(_OtherSystem), (void**)&pOtherSystem);

	if (SUCCEEDED(hr)) {	// 生成に成功
		// pComObjectにVbCom.OtherSystemインスタンスのポインタを格納
		env->SetIntField(obj, fieldID, (jint)pOtherSystem);
	}
	else {					// 生成に失敗
		env->SetIntField(obj, fieldID, (jint)NULL);
		// エラーを出力
		printf("CoCreateInstance failed!!\\n");
	}
}

// OtherSystem.disposeメソッドの実装
JNIEXPORT void JNICALL Java_OtherSystem_dispose
  (JNIEnv* env, jobject obj)
{
	// pComObjectフィールドのフィールドID取得
	jclass cls = env->GetObjectClass(obj);
	jfieldID fieldID = env->GetFieldID(cls, "pComObject", "I"); 

	// VbCom.OtherSystemインスタンスのポインタを取得
	_OtherSystem* pOtherSystem = (_OtherSystem*)env->GetIntField(obj, fieldID);

	if (pOtherSystem) {		// VbCom.OtherSystemインスタンスのポインタがNULLでないとき

		// VbCom.OtherSystemインスタンスを開放する
		pOtherSystem->Release();
		// pComObjectにNULLをセットする
		env->SetIntField(obj, fieldID, (jint)NULL);
	}
}

// OtherSystem.getDataメソッドの実装
JNIEXPORT jstring JNICALL Java_OtherSystem_getData
  (JNIEnv* env, jobject obj)
{
	// pComObjectフィールドのフィールドID取得
	jclass cls = env->GetObjectClass(obj);
	jfieldID fieldID = env->GetFieldID(cls, "pComObject", "I"); 

	// VbCom.OtherSystemインスタンスのポインタを取得
	_OtherSystem* pOtherSystem = (_OtherSystem*)env->GetIntField(obj, fieldID);

	bstr_t data;
	if (pOtherSystem) {
		// VbCom.OtherSystem.GetDataメソッドを呼び出す
		data = pOtherSystem->GetData();
	}

	// 結果を返す
	return env->NewString(data, data.length());
}

// OtherSystem.sendDataメソッドの実装
JNIEXPORT void JNICALL Java_OtherSystem_sendData
  (JNIEnv* env, jobject obj, jstring data)
{
	// pComObjectフィールドのフィールドID取得
	jclass cls = env->GetObjectClass(obj);
	jfieldID fieldID = env->GetFieldID(cls, "pComObject", "I"); 

	// VbCom.OtherSystemインスタンスのポインタを取得
	_OtherSystem* pOtherSystem = (_OtherSystem*)env->GetIntField(obj, fieldID);

	// 引数（文字列）をマーシャリングする
	bstr_t bstrData = env->GetStringChars(data, JNI_FALSE);
	if (pOtherSystem) {
		// VbCom.OtherSystem.SendDataメソッドを呼び出す。
		pOtherSystem->SendData(bstrData);
	}
}