JAVA(JNI,Jnative,JNA)分别调用delphi的动态链接库(dll)

最新推荐文章于 2021-03-14 13:49:46 发布
最新推荐文章于 2021-03-14 13:49:46 发布
阅读量5.2k 收藏 4
点赞数
文章标签： delphi java jni integer byte structure
      首先我介绍一下本项目所要解决的技术问题:项目是要求用JAVA来调用delphi提供的动态链接库,而且硬件厂商已经提供了库以及接口文档.由于以前没有接触过这样的问题,所以考虑到要跟硬件设备打交道,首先通过查相关的资料,得出在JAVA里面用JNI可以直接访问C提供的动态链接库．但是问题是库是用delphi生成的，貌似用JNI不能直接访问,所以只能用C封装delphi的库供JNI访问,但是这样很麻烦,而且双层封装不稳定,最后在网上看到有人用Jnative可以直接访问delphi的dll库,所以就转向Jnative,但是通过折腾里面还是从在了很多问题,最后通过JavaEye问答讨论,用JNA比用Jnative好用一点,所以最终还是用JNA解决了所需要的问题.下面我就把所需的原码贴出来希望大家指点并讨论.

  1)下面是硬件厂商提供的dll接口文档(为了说明问题我只提供了几个接口的文档):
一、调用参数说明
本动态库中所有函数均需要一个指向下列结构的指针作为参数,这个结构包含了函数运行时所需要的数据。()
Java代码
  1. //下面是delphi接口函数所需要的结构体   
  2.  TParaBuf=record   
  3.    ComNo:integer;        //串口号   
  4.    Baud:integer;         //波特率 （一般设为115200）  
  5.    Sys_Sec:array [1..3] of integer;   //系统扇区1,2,3 （一般设为0，1，2）  
  6.    User_Sec:array [1..3] of integer;   //用户扇区1,2,3 （一般设为3，4，5，可以自由设置）  
  7.    AuthorNo:array [1..6] of PChar;     //授权码1,2,3,4,5,6 （该授权码由授权卡内的授权码计算得到。）  
  8.  end;   
  9.  TPParaBuf=^TParaBuf;   //指向以上结构的指针。  
 //下面是delphi接口函数所需要的结构体
  TParaBuf=record
    ComNo:integer;        //串口号
    Baud:integer;         //波特率 （一般设为115200）
    Sys_Sec:array [1..3] of integer;   //系统扇区1,2,3 （一般设为0，1，2）
    User_Sec:array [1..3] of integer;   //用户扇区1,2,3 （一般设为3，4，5，可以自由设置）
    AuthorNo:array [1..6] of PChar;     //授权码1,2,3,4,5,6 （该授权码由授权卡内的授权码计算得到。）
  end;
  TPParaBuf=^TParaBuf;	//指向以上结构的指针。


二、函数说明
Java代码
  1. ReadAuthorInfo   
  2. 读取授权卡上的客户编号和客户名称。   
  3.   function ReadAuthorInfo(   
  4.    buf:TPParaBuf;   
  5.    pCustNo,pCustName:PChar):integer;   
  6.   
  7.     参数   
  8.     buf   
  9.         指向参数内存块的指针。    
  10.     pCustNo   
  11.         用于返回客户编号。客户编号固定为4字节，所以调用前必须先开辟足够的空间。   
  12.     pCustName   
  13.         用于返回客户名称。客户名称固定为14字节，所以调用前必须先开辟足够的空间。   
  14.   
  15.     返回值   
  16.         如果函数调用成功，返回值为0。   
  17. 如果函数调用失败，返回值不为0。如需得到错误描述，请调用GetErrMsg。  
ReadAuthorInfo
读取授权卡上的客户编号和客户名称。
  function ReadAuthorInfo(
   buf:TPParaBuf;
   pCustNo,pCustName:PChar):integer;

	参数
	buf
		指向参数内存块的指针。	
	pCustNo
		用于返回客户编号。客户编号固定为4字节，所以调用前必须先开辟足够的空间。
	pCustName
		用于返回客户名称。客户名称固定为14字节，所以调用前必须先开辟足够的空间。

	返回值
		如果函数调用成功，返回值为0。
如果函数调用失败，返回值不为0。如需得到错误描述，请调用GetErrMsg。


Java代码
  1. ReadAuthorCard   
  2. 读取授权卡上的授权码。   
  3.   function ReadAuthorCard(   
  4. buf:TPParaBuf):integer;   
  5.   
  6.     参数   
  7.     buf   
  8.         指向参数内存块的指针。   
  9.   
  10.     返回值   
  11.         如果函数调用成功，返回值为0。   
  12. 如果函数调用失败，返回值不为0。如需得到错误描述，请调用GetErrMsg。   
  13. 说明   
  14. 调用本函数可以获取授权码，该码保存于参数块中，供其它函数调用。   
  15.   
  16. Authorize   
  17. 对新卡进行授权操作。   
  18.   function Authorize(   
  19. buf:TPParaBuf):integer;   
  20.   
  21.     参数   
  22.     buf   
  23.         指向参数内存块的指针。   
  24.   
  25.     返回值   
  26.         如果函数调用成功，返回值为0。   
  27. 如果函数调用失败，返回值不为0。如需得到错误描述，请调用GetErrMsg。  
ReadAuthorCard
读取授权卡上的授权码。
  function ReadAuthorCard(
buf:TPParaBuf):integer;

	参数
	buf
		指向参数内存块的指针。

	返回值
		如果函数调用成功，返回值为0。
如果函数调用失败，返回值不为0。如需得到错误描述，请调用GetErrMsg。
说明
调用本函数可以获取授权码，该码保存于参数块中，供其它函数调用。

Authorize
对新卡进行授权操作。
  function Authorize(
buf:TPParaBuf):integer;

	参数
	buf
		指向参数内存块的指针。

	返回值
		如果函数调用成功，返回值为0。
如果函数调用失败，返回值不为0。如需得到错误描述，请调用GetErrMsg。

   三.
   1)以上的每个函数的参数都要指向delphi提供的一个结构体,但是怎样用JNA来模仿delphi里面的结构体呢,具体如下:
Java代码
  1.   public class ParaBuf  extends Structure{   
  2.     public int comNo;   
  3.     public int  baud;   
  4.     public int[] sysSec = null;   
  5.     public int[] userSec = null;   
  6.     public ByteByReference[] authorNo = new ByteByReference[6];   
  7. }  
  public class ParaBuf  extends Structure{
	public int comNo;
	public int  baud;
	public int[] sysSec = null;
	public int[] userSec = null;
	public ByteByReference[] authorNo = new ByteByReference[6];
}

delphi结构体里面 的成员变量:
Java代码
  1. AuthorNo:array [1..6] of PChar;  
AuthorNo:array [1..6] of PChar;
可以理解为一个指针数组,但是用JAVA的byte[]是不能替代PChar类型的数组,通过摸索用ByteByReference定义的数组可以跟delphi里面的PChar型数组对应.
本结构体类必须要继承JNA开源包的Structure抽象类!
2)定义跟动态链接库的结构函数(我把访问接口函数封装在里一个接口里面)如下:
Java代码
  1. public interface PCSCard extends StdCallLibrary {   
  2.         //这句是利用Native.loadLibrary加载所要访问的动态链接库  
  3.     PCSCard INSTANCE = (PCSCard)Native.loadLibrary("pcsCardDll", PCSCard.class);//, DEFAULT_OPTIONS);  
  4.         //下面三个函数为库的接口函数,其中ParaBuf paraBuf,表示为一个结构体参数  
  5.     int ReadAuthorInfo(ParaBuf paraBuf, byte[] customerNo,byte[] customerName);//(读取授权卡上的客户编号和客户名称。)  
  6.     int ReadAuthorCard(ParaBuf paraBuf);//(读取授权卡上的授权码。)  
  7.     int Authorize(ParaBuf paraBuf);//(对新卡进行授权操作。)     
  8. }  
public interface PCSCard extends StdCallLibrary {
        //这句是利用Native.loadLibrary加载所要访问的动态链接库
	PCSCard INSTANCE = (PCSCard)Native.loadLibrary("pcsCardDll", PCSCard.class);//, DEFAULT_OPTIONS);
        //下面三个函数为库的接口函数,其中ParaBuf paraBuf,表示为一个结构体参数
	int ReadAuthorInfo(ParaBuf paraBuf, byte[] customerNo,byte[] customerName);//(读取授权卡上的客户编号和客户名称。)
	int ReadAuthorCard(ParaBuf paraBuf);//(读取授权卡上的授权码。)
	int Authorize(ParaBuf paraBuf);//(对新卡进行授权操作。)	
}


3)定义访问2)中所定义的接口函数:
Java代码
  1.   public class PCSCardDemo {   
  2.        
  3.     /**  
  4.      * 得到一个调用dll函数的INSTANCE:  
  5.      * @return  
  6.      */  
  7.     public PCSCard getpCSCardInstance(){   
  8.         PCSCard lib=PCSCard.INSTANCE;   
  9.         return lib;   
  10.     }   
  11.     /**  
  12.      * 设置系统结构体指针参数:  
  13.      * @return 结构体指针对象:  
  14.      */  
  15.     public ParaBuf setParaBuf(){   
  16.         ParaBuf paraBuf=new ParaBuf();   
  17.         paraBuf.comNo=1;   
  18.         paraBuf.baud=115200;   
  19.         paraBuf.sysSec=new int[3];   
  20.         paraBuf.sysSec[0]=0;   
  21.         paraBuf.sysSec[1]=1;   
  22.         paraBuf.sysSec[2]=2;   
  23.         paraBuf.userSec=new int[3];   
  24.         paraBuf.userSec[0]=3;   
  25.         paraBuf.userSec[1]=4;   
  26.         paraBuf.userSec[2]=5;   
  27.         return paraBuf;   
  28.     }   
  29.     /**  
  30.      * 读取授权卡上的授权码:  
  31.      * @param lib  
  32.      * @param paraBuf  
  33.      * @return  
  34.      */  
  35.    public ParaBuf readAuthorCard(PCSCard lib,ParaBuf paraBuf){   
  36.         int authorCard = lib.ReadAuthorCard(paraBuf);   
  37.     System.out.println("return authorCard:" + authorCard);   
  38.     ByteByReference[] by = paraBuf.authorNo;   
  39.     for(int i=0;i<3;i++){   
  40.         System.out.println(paraBuf.sysSec[i]);   
  41.     }   
  42.     for(int i=0;i<3;i++){   
  43.         System.out.println(paraBuf.userSec[i]);   
  44.     }   
  45.     for(ByteByReference c : by) {   
  46.         if(0 != c.getValue()) {   
  47.             System.out.println(c.getValue());   
  48.         }   
  49.     }   
  50.     getErrMsg(lib,authorCard);   
  51.     return paraBuf;   
  52.    }   
  53.       
  54.     /**  
  55.      * 对新卡进行授权操作:  
  56.      */  
  57.     public int authorize(PCSCard lib,ParaBuf paraBuf){   
  58.        int returnl =  lib.Authorize(paraBuf);   
  59. //函数getErrMsg为调用返回错误信息的函数   
  60.        getErrMsg(lib,returnl);   
  61.         return returnl;   
  62.            
  63.     }   
  64.     /**  
  65.      * 得到错误信息:  
  66.      * @param lib  
  67.      * @param msgNo  
  68.      * @return  
  69.      */  
  70.    public String getErrMsg(PCSCard lib,int msgNo){   
  71.         byte[] msg = new byte[14];   
  72.         boolean bResult=lib.GetErrMsg(msgNo, msg);   
  73.         System.out.println("Return:\t" + bResult);   
  74.         System.out.println("error message:\t" + new String(msg));   
  75.         return new String(msg);   
  76.    }   
  77.     public static void main(String[] args) throws UnsupportedEncodingException {   
  78.         /*  
  79.          * 初始化:  
  80.          */  
  81.         PCSCardDemo pcscard = new PCSCardDemo();   
  82.         PCSCard lib=pcscard.getpCSCardInstance();               //对结构体进行初始化  
  83.         ParaBuf paraBuf=pcscard.setParaBuf();   
  84.   
  85.     /**  
  86.     * 读取授权卡上的授权码:  
  87.     */  
  88. //pcscard.readAuthorCard(lib, paraBuf);   
  89. //System.out.println("authorNo:\t");   
  90.         /*  
  91.          * 读取授权卡信息:  
  92.          */  
  93. //int read = pcscard.readAuthorInfo(lib, paraBuf);  
  94.     /**  
  95.      * 对新卡进行授权操作,在授权的时候必须得到授权卡的授权码  
  96.      */  
  97. //pcscard.authorize(lib,pcscard.readAuthorCard(lib, paraBuf));  
  98.     }   
  99. }  
  public class PCSCardDemo {
	
	/**
	 * 得到一个调用dll函数的INSTANCE:
	 * @return
	 */
	public PCSCard getpCSCardInstance(){
		PCSCard lib=PCSCard.INSTANCE;
		return lib;
	}
	/**
	 * 设置系统结构体指针参数:
	 * @return 结构体指针对象:
	 */
	public ParaBuf setParaBuf(){
		ParaBuf paraBuf=new ParaBuf();
		paraBuf.comNo=1;
		paraBuf.baud=115200;
		paraBuf.sysSec=new int[3];
		paraBuf.sysSec[0]=0;
		paraBuf.sysSec[1]=1;
		paraBuf.sysSec[2]=2;
		paraBuf.userSec=new int[3];
		paraBuf.userSec[0]=3;
		paraBuf.userSec[1]=4;
		paraBuf.userSec[2]=5;
		return paraBuf;
	}
	/**
	 * 读取授权卡上的授权码:
	 * @param lib
	 * @param paraBuf
	 * @return
	 */
   public ParaBuf readAuthorCard(PCSCard lib,ParaBuf paraBuf){
		int authorCard = lib.ReadAuthorCard(paraBuf);
	System.out.println("return authorCard:" + authorCard);
	ByteByReference[] by = paraBuf.authorNo;
	for(int i=0;i<3;i++){
		System.out.println(paraBuf.sysSec[i]);
	}
	for(int i=0;i<3;i++){
		System.out.println(paraBuf.userSec[i]);
	}
	for(ByteByReference c : by) {
		if(0 != c.getValue()) {
			System.out.println(c.getValue());
		}
	}
	getErrMsg(lib,authorCard);
	return paraBuf;
   }
   
	/**
	 * 对新卡进行授权操作:
	 */
	public int authorize(PCSCard lib,ParaBuf paraBuf){
       int returnl =  lib.Authorize(paraBuf);
//函数getErrMsg为调用返回错误信息的函数
       getErrMsg(lib,returnl);
		return returnl;
		
	}
    /**
     * 得到错误信息:
     * @param lib
     * @param msgNo
     * @return
     */
   public String getErrMsg(PCSCard lib,int msgNo){
		byte[] msg = new byte[14];
		boolean bResult=lib.GetErrMsg(msgNo, msg);
		System.out.println("Return:\t" + bResult);
		System.out.println("error message:\t" + new String(msg));
	    return new String(msg);
   }
	public static void main(String[] args) throws UnsupportedEncodingException {
		/*
		 * 初始化:
		 */
		PCSCardDemo pcscard = new PCSCardDemo();
		PCSCard lib=pcscard.getpCSCardInstance();		        //对结构体进行初始化
		ParaBuf paraBuf=pcscard.setParaBuf();

	/**
	* 读取授权卡上的授权码:
	*/
//pcscard.readAuthorCard(lib, paraBuf);
//System.out.println("authorNo:\t");
        /*
         * 读取授权卡信息:
         */
//int read = pcscard.readAuthorInfo(lib, paraBuf);
	/**
	 * 对新卡进行授权操作,在授权的时候必须得到授权卡的授权码
	 */
//pcscard.authorize(lib,pcscard.readAuthorCard(lib, paraBuf));
	}
}


以上就是访问delphi动态链接库的整个过程.

转自：http://www.iteye.com/topic/340823

 

补充一个调用例子：

Java中调用例子
CallDll.java
==================
package libPassChk;

public class CallDll {
static {
System.loadLibrary("libPassChk");
}
public native boolean IsValidPassword(String APass, String AEncodedPass);
}

调用的例子
import libPassChk.*;

public class TestCallDll {
public static void main(String[] args) {
CallDll jc = new CallDll();
String j;

if (jc.IsValidPassword("", "ddd")){
System.out.println("ok");
}else{
System.out.println("not ok");
}
}
}



 

rznice
关注
Java调用Delphi编写的Dll
小祝的专栏
05-14 648
1、java使用jna调用delphi的dll 2、jna依赖包设置 <dependency> <groupId>com.sun.jna</groupId> <artifactId>jna</artifactId> <version>3.0.9</version> </dependency> 3、delphi代码 unit Unit1; interface uses Vcl
dll动态库生成与调用（2）：Java程序利用JNI、JNA调用动态库
Stone Ocean
05-12 1575
简介 本文主要内容是使用JNA、JNI调用dll动态库。 因为JNI的使用在菜鸟教程中已经有了比较完整的介绍，所以我在本文中就只是提了一下JNI需要注意的事项，菜鸟教程的网址我已经贴在JNI那一章节。JNI教程中使用的是eclipse，如果你使用IDEA，那么你可以看JNA教程中是如何设定库目录的。 开发环境 IDE: Visual Studio 2015、IDEA 2019.1 JNA(Java...
通过 JNI 让 JAVA 与 Delphi 程序交互
07-30 1223
有些时候,要写一些程序,在 JAVA 里面好难实现, 但如果使用其它编程语言却又比较容易时,我们不妨通过 JNI 来让不同语言的程序共同完成.JNI 的教程, 网上 C 的比较多,Java 也提供了 javah.exe 为 C 语言的 JNI 程序生成头文件, 如果你是一个 Delphi 编程员, 能否让 JAVA 与 Delphi 程序交互呢? 答案是肯定的,今天我们就来看一下一个简单的例子.H
java 调用 delphi,java 调用 delphi编写的dll
weixin_30882521的博客
03-14 241
有些时候,要写一些程序,在 JAVA 里面好难实现, 但如果使用其它编程语言却又比较容易时,我们不妨通过 JNI 来让不同语言的程序共同完成.JNI 的教程, 网上 C 的比较多,Java 也提供了 javah.exe 为 C 语言的 JNI 程序生成头文件, 如果你是一个 Delphi 编程员, 能否让 JAVA 与 Delphi 程序交互呢? 答案是肯定的,今天我们就来看一下一个简单的例子.H...
java 调用 delphi编写的dll
喜欢自己正在做的
05-19 4753
使用JNI（JAVA本地接口）来调用dll完成用delphi实现的功能：1. 编写Java类，在类内部静态加载要调用的dll文件，然后给出使用的函数的声明（用native关键字），示例如下：public class CompileDllCaller ...{    static ...{        System.loadLibrary("CompileDllCaller");   
Java中调用Delphi编写的DLL
weixin_33889245的博客
09-26 630
2019独角兽企业重金招聘Python工程师标准>>> ...
JNI：Java调用Delphi编写的dll
07-11 2006
JNI：Java调用Delphi编写的dll 标签： JNI  delphi  java  UnsatisfiedLinkError  loadLibrary 分类： 编程(JAVA)2011-08-31 11:36 环境：Windows xp/Eclipse3.6/Delphi2007 一、Java代码： package com
springboot+jna/jni调用动态so/dll库
04-13
它涉及到Spring Boot应用如何利用Java Native Interface (JNI) 和 Java Native Access (JNA) 这两种技术来调用操作系统级别的动态链接库（.so for Linux, .dll for Windows）。 **Spring Boot** Spring Boot是...
JAVA通过JNI或JNA方式调用C/C++ DLL demo
最新发布
11-08
JAVA通过JNI或JNA方式调用C/C++ DLL demo。内含可用的DLL文件。可用于学习java调用动态库的方式。
java使用(jna)调用c/c++第三方动态库 dll文件 所用jar包
01-24
Java 使用 JNA（Java Native Access）调用C/C++编写的第三方动态库（DLL文件）是一种常见的技术，它允许Java程序直接与本地操作系统接口交互，而无需编写JNI（Java Native Interface）代码。JNA 提供了一种相对简洁...
jna和JNative
03-15
java调用本地的dll库所用的开发包java调用本地的dll库所用的开发包java调用本地的dll库所用的开发包
java调用C++动态链接库dll接口
03-06
本项目涉及的"java调用C++动态链接库dll接口"是解决这种跨语言交互问题的一种方法，主要利用了Java Native Interface（JNA）这一技术。 JNA是Java平台的标准库，它允许Java代码直接调用本机库（如DLL或.so文件）的...
java调用delphi dll文件_Java中调用Delphi编写的DLL
weixin_39793434的博客
02-17 238
到这里,我们已经可以从 Delphi 中获得 Java 对象的属性了, 还可以调用一个 Java 对象的方法,是不是很酷呢?你学到了没?###########################说明1###############################现在,我们还要再了解一个获取 "属性ID" 时的那个签名上面例子中: fid := JVM.GetFieldID(c, 'str', 'Lja...
JNI JNA JNATIVE
小萍萍的博客
04-21 446
调用动态链接库（dll文件），实现跨语言调用
Java调用Delphi DLL（通过C++调用和直接调用两种方式）
DoYou?'s csdn
05-05 1460
文章来自[SVN中文技术网]转发请保留本站地址：http://www.svn8.com/java/Socket/20080924/1002.html  文章摘要：关于Delphi的DLL，先前在VC,VB，PB这些开发工具中调用都是没有问题的，但是在Java中还没有做过，于是Google，据说是直接调可能有问题，最好在中间用C++转一下。 一、Java->C++->Delphi
Java调用Delphi编写的Dll之实例Delphi使用PWideChar
叶炎灵的博客
03-29 641
Delphi 代码 unit UnitDll; interface uses StrUtils, SysUtils, Dialogs; function DoBusinessWide(pvData: PWideChar): PWideChar; stdcall; implementation function DoBusinessWide(pvData: PWideChar): PW...
利用java jndi调用 delphi写的dll
Sid雨小烛的空间
12-30 312
项目背景： 由于系统由CS+BS架构，在CS架构的基础上增加BS发布浏览检索部分等功能，需要公用一些表，但有些数据表是经过delphi特殊算法加密的，在java中很难找到对应的算法解密。 [b]解决方法：[/b] 1）可以利用delphi写webservice供java调用 2）delphi写httpserver提供解析服务 3）利用jndi使delphi输出java可调用的dll ...
java 调用 delphi_Java调用Delphi开发的Dll小结
weixin_39857792的博客
03-05 299
《Java调用Delphi开发的Dll小结》由会员分享，可在线阅读，更多相关《Java调用Delphi开发的Dll小结(3页珍藏版)》请在人人文库网上搜索。1、由于工作原因需要在JAVA开发的项目中调用DELPHI开发的dll动态库，查询了很多资料总结出方法有以下几种：1、通过JNI调用，这种方式如果调用C/C+开发的dll动态库文件没有什么问题但是问题是库是用DELPHI生成的，用JNI不能直接...
java调用delphi dll文件_Java调用Delphi开发的Dll小结
weixin_42363277的博客
02-17 231
由于工作原因需要在JA V A开发的项目中调用DELPHI开发的dll动态库，查询了很多资料总结出方法有以下几种：1、通过JNI调用，这种方式如果调用C/C++开发的dll动态库文件没有什么问题．但是问题是库是用DELPHI生成的，用JNI不能直接访问，所以只能用C封装DELPHI的库供JNI访问，但是这样很麻烦，而且双层封装不稳定；又或者在使用DELPHI开发dll时引用一个jni.pas的接口...
Java通过JNA调用动态链接库详解
本文档详细介绍了如何使用Java Native Access (JNA) 来调用动态链接库 (DLL)。JNA 是一个强大的库，它允许Java应用程序直接与C/C++编写的代码进行交互，从而简化了Java与Windows API或其他平台原生函数的集成。 ...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值