关于JAVA调用C的DLL库中的函数问题，传入一个含有指针的结构体指针

Posted 2023-04-02

比如有个结构体：

typedef struct _SSM_EVENT



WORD wEventCode; //事件编码

int nReference; //参考值

PVOID pvBuffer; //事件信息缓冲指针

 DWORD dwParam; //输出参数

SSM_EVENT, *PSSM_EVENT;

PVOID是一个指向300空间的一个指针，可以理解为一个char[]数组,现在java需要调用c里dll库的一个函数，其中一个参数为该结构体指针*PSSM_EVENT，传入时有的参数含有值。1.那么我该如何传入这个带有值的参数。2.我该怎么获取这个结构体的值，尤其是指针的值。无论是使用jnative,jna,jin什么样的第三方jar包都可以。
结构体里面含有一个指针的属性，在JAVA分配创建一段内存，我通过第三方JAR包传递并返回这段内存，该JAR包提供的函数可以读取这段内存里面的值，但现在由于上述的结构，这段内存里面含有一个指针值，也就是说在返回的这段内存里面的值里，由一个指针地址值，但我需要的是这个指针指向的地址里面的数据，而不是这个指针地址值，我该怎么取呢？现在这个是最主要的问题了

参考技术A 在java里定义对应的，分配地址空间大小相同的结构体。
java应该也可以定义struct.
比如dword可以定义为long.
把c中的pvoid定义找出来，也定义一个struct.追问

定义结构体没有问题，现在关键是JAVA没有指针的概念，而dll库需要传递的是一个结构体指针，关键是指针，怎么传。现在这个问题已经解决了，还有另外一个问题，请看我的追加提问

追答

c还是可以重调java的，可以参考网上资料，指针地址什么的，可以传递。这个你自己考虑一下。

追问

那这样就更麻烦了，我可以在c++重新写个函数，调用DLL，返回需要的值。但是因为现在比较急，我没有时间研究那么多的，所以我想尽量只在JAVA做，现在就差这一步了。

追答

java的变量就是指针，定义java结构体后，一样可以取到相同的值。c是什么值，java就是什么值。

追问

c传回来是指针，是个地址值，java现在能获取到的是这个地址值，怎么通过这个地址值去获取内存的数据？

参考技术B 没做过这么复杂的。
但你想调用DLL，
应该是通过native生成的方法。你通过这个方法中的参数进行交互。 参考技术C 我觉得用java调用这个肯定是使用jni了。这个是无疑了，网上jni的api和教程挺多的。查查就知道了。然后说得到指针指向的值而不是地址，这步操作是c语言的语法问题，也就是说c的源码取值和取地址那里写对了就可以了。jni只是用来调用的。

关于delphi调用C++的DLL中char*参数的问题

我现在在用delphi做一个接口，接口DLL是使用C++开发的，接口规范如下：
dll动态链接库文件名为：networkBillPrn.dll,无须注册,将dll文件放在系统文件目录或HIS系统的同一文件目录。方法: int CallBillService(char * inParams, char * outParams)传入参数inParams是json数据格式,传入参数outParams是以实参方式传入的，它的值是His系统调用票据系统的接口的返回结果，也是json数据格式,返回值是表示outParams的字符串长度。
我是这样实现的：
var
billTest: TbillTest;
//调用方法CallBillService
function CallBillService(inParams:PChar; outParams:PChar): Integer; stdcall; external 'NetworkBillPrnDll.dll';
implementation

$R *.dfm

procedure TbillTest.btn1Click(Sender: TObject);
var
jo,jt:ISuperObject;
billAddr,inParam:String;
returnNum:Integer;
outParam:PChar;
begin
billAddr:=UpperCase(Trim(Edit_Addr.Text));
jo:=SO('"billAddr":"http://202.99.207.176:7001/BILL/BsExecute","appVersion":"1.0.0.1","deptNode":"16100101","secretKey":"A990AA3E8D9FDE5D04EA0BAE88450A0B0D4BA8931778CDCA17","methodName":"getValidBillNo","busName":"hisMz","billReg":"测试"');
inParam:=jo.AsString;
//将json内容写入日志文件
writeTxt(PChar(inParam),'测试服务器端-输入');
outParam:='';
//执行到下面这条语句报错
returnNum:= CallBillService(PChar(inParam),outParam);
writeTxt(outParam,'测试服务器端-输出');
ShowMessage(IntToStr(returnNum));
end;

procedure TbillTest.writeTxt(tmpString:string;operaName:string);
var
wText: TextFile;
shijian:string;
begin
shijian:=DateTimeToStr(Now());
AssignFile(wText, 'logo.txt');
Append(wText);
Writeln(wText,'-----时间:' + shijian + '--操作:' + operaName + '-----');
Writeln(wText, tmpString);
CloseFile(wText);
end;

end.
请高手给予解答，谢谢。

&符号在c++中是表示引用类型，在c#中类似ref,在dellphi作为参数有var关键字来表示：BOOLNVS_Login(ULONG&lLoginID,constchar*szNvsIP,intnNvsPort,constchar*szUser,constchar*szPwd)转为delphi:functionNVS_Login(varlLoginID:DWORD;constszNvsIP:PChar;constszUser:PChar;constszPwd:PChar):boolean; 参考技术A 调用前，参数变量，初始化一下

~
~
~追问

怎么初始化，能给举一个例子吗？