Java и Native dll

Сейчас на форуме: vsv1 (+5 невидимых)

Посл.ответ	Сообщение
zds Ранг: 57.0 (постоянный), 10thx Активность: 0.05↗0.08 Статус: Участник	Создано: 13 февраля 2016 23:49 · Поправил: zds · Личное сообщение · #1 здравствуйте, прошу помочь со следующим вопросом разбираю java прогу. class файлы упакованы в exe. использует в качестве защиты native dll т.к. я с java не очень - могу в нести мелкие исправления\дополнения в байткод, а здесь нужно вносить довольно глобальные изменения, да еще разбираться с упаковкой в exe файл, то я решил пойти более простым как мне кажется путем - подменить native dll на свою. в принципе я разобрал в теории, что в эту dll отправляется и что ожидается на выходе. но возникли проблемы с реализацией этой dll, а точнее с совместимостью типов вот допустим одна из функций: Code: private static native String getLibVersion(int ai[]); используется так Code: int ai[] = new int[4]; String tt = getLibVersion(ai); if(2 == ai[0]) .... т.е. должны получить строку, а так же в массив должен быть заполнен со строкой более менее разобрался используя этот компонент http://akini.mbnet.fi/java/jni/ Code: function Java_com_lic_getLibVersion(PEnv: PJNIEnv; Obj: JObject; var ar: JIntArray): JString; stdcall; var s: string; a: TIntegerDynArray; begin SetLength(a,4); a[0]:=2; ar:=JNI_IntegersToJIntArray(PEnv,a); Result := JNI_WideStringToJString(PEnv,'555'); end; exports Java_com_lic_getLibVersion; но вот вернуть заполненный массив не получается. может есть у кого какие идеи? вот кстати как выглядит эта функция в оригинале Code: int __stdcall Java_com_lic_getLibVersion(int a1, int a2, int a3) { char v4; // [sp+0h] [bp-10h]@1 getLibVersion((int)&v4); byte_1002C3D8 = 1; getLibVersion((int)&v4); return ((int* (__stdcall )(int, int, _DWORD, signed int, char** ))((_DWORD )a1 + 844))(a1, a3, 0, 4, &v4); } Добавлено спустя 48 минут* решил вопрос сам может кому пригодится Code: function Java_com_lic_getLibVersion(PEnv: PJNIEnv; Obj: JObject; ar: JIntArray): JString; stdcall; var Elements, Ptr: PJInt; b: JBoolean; Values: array of JInt; begin //первый способ b:=true; //??? Elements := PEnv^.GetIntArrayElements(PEnv, ar, b); if Elements <> nil then begin Ptr := Elements; Ptr^ := 1; Inc(Ptr); Ptr^ := 2; Inc(Ptr); Ptr^ := 3; Inc(Ptr); Ptr^ := 4; PEnv^.ReleaseIntArrayElements(PEnv, ar, Elements, 0); end; //второй способ SetLength(Values, 4); Values[0] := 1; Values[1] := 2; Values[2] := 3; Values[3] := 4; PEnv^.SetIntArrayRegion(PEnv, ar, 0, Length(Values), @Values[0]); Result := JNI_WideStringToJString(PEnv,'my_string');

Для печати