Новичок
Профиль
Группа: Участник
Сообщений: 1
Регистрация: 6.6.2006
Репутация: нет
Всего: нет
|
Доброго времени суток. Есть DLL написанная на Delphi, включающая в себя несколько функций для работы с платежной системой. Необходимо вызывать ети функции на Java. Для этого написал DLL на VisualC++ работающую с этими процедурами. Если работать с этой DLL с помощью программы на VisualC++ - то все работает отлично. Потом включил в эту DLL хедер сгенирированный javah, и описал нужные мне native методы для Java. таким образом моя DLL загружает DLL на Delphi и вызывает необходимые функции. Но если на Java вызвать любой метод вызываемый из DLL на Delphi, то метод успешно выполняется но Java как будто зависает (процесс не завершается). Попробывав загружать DLL на Delphi не в моей DLL а при инициализации Java класа, после выполнения метода иолучаю всплывающее окно, говоряшее о том что чтения определенного участка памяти запрещенно... Буду благодарен если кто подскажет где можно капнуть вот кусок кода моей DLL на VisualC++ | Код |
#define _getStrUTF(_T) env->GetStringUTFChars(_T,JNI_FALSE)
#define _dropStr(_T,_A) env->ReleaseStringUTFChars(_T,_A);
#define _append(_str,_SB) callStringSetMethod(env,_SB,appendMethod,_str)
typedef bool (__stdcall *colSetConnection)(LPCSTR,LPCSTR,LPCSTR,LPCSTR,int,int,LPSTR);
void callStringSetMethod(JNIEnv* env,jobject obj,jmethodID jmi, const char* str){
int size = 0;
size = MultiByteToWideChar( 1251, 0, str,strlen(str), NULL,0);
wchar_t* res = (wchar_t* )malloc(size);
size = MultiByteToWideChar( 1251, 0, str, strlen(str), res,size);
jstring jStr = env->NewString(res,size);
env->CallObjectMethod(obj,jmi,jStr);
env->ReleaseStringChars(jStr,res);
free(res);
}
BOOL APIENTRY DllMain( HANDLE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved
)
{
return TRUE;
}
JNIEXPORT jint JNICALL Java_ContactOnlineNetwork_loadLib(JNIEnv* env, jobject jobj, jstring jstr){
try{
char* dllName = "COL.dll";
if(GetModuleHandle(dllName)) throw 9;
const char* path = env->GetStringUTFChars(jstr,JNI_FALSE);
char dllPath[1000];
sprintf(dllPath,"%s\\%s",path,dllName);
hLib = LoadLibrary(dllPath);
env->ReleaseStringUTFChars(jstr,path);
if(!hLib)
throw 1;
ColSetConnection = (colSetConnection)GetProcAddress(hLib,"colSetConnection");
if(!ColSetConnection)
throw 2;
return 0;
}
catch (int i)
{
if(i != 1 && !hLib) FreeLibrary(hLib);
DWORD error = GetLastError();
char errMsg[1000];
::FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM,NULL,error,0,errMsg,1000,NULL);
printf(errMsg);
return error;
}
}
JNIEXPORT jint JNICALL Java_ContactOnlineNetwork_freeLib
(JNIEnv *, jobject){
try{
if(hLib){
FreeLibrary(hLib);
return 0;}
return 1;
}
catch(...){
return GetLastError();
}
}
JNIEXPORT jboolean JNICALL Java_ContactOnlineNetwork_colSetConnection
(JNIEnv *env, jobject jobj, jstring jServer, jstring jUser, jstring jPwd, jstring jRole, jint jConnType, jint jPort, jobject jErrMsg){
if(!appendMethod){
jclass cls = env->GetObjectClass(jErrMsg);
char method[100];
sprintf(method,"(%s)%s;",otString,otStringBuffer);
appendMethod = env->GetMethodID(cls,"append",method);
}
const char* Server = _getStrUTF(jServer);
const char* User = _getStrUTF(jUser);
const char* Pwd = _getStrUTF(jPwd);
const char* Role = _getStrUTF(jRole);
char ErrMsg[1000];
ErrMsg[0] = 0;
bool connectionResult = (ColSetConnection)(Server,
User,
Pwd,
Role,
jConnType,
jPort,ErrMsg);
_append(ErrMsg,jErrMsg);
_dropStr(jServer,Server);
_dropStr(jUser,User);
_dropStr(jPwd,Pwd);
_dropStr(jRole,Role);
return connectionResult;
}
|
Вот Java код | Код |
public class ContactOnlineNetwork {
public native int loadLib(String path);
public native int freeLib();
public native boolean colSetConnection(String Server, String UserName, String UserPwd,
String UserRole, int con_type, int server_port,
StringBuffer Err_Msg);
static{
System.load("C:\\Program Files\\Microsoft Visual Studio\\MyProjects\\jniTest\\Release\\jniTest.dll");
}
public static void main(String args[]){
ContactOnlineNetwork Test = new ContactOnlineNetwork();
System.out.println(Test.loadLib("C:\\ContactDLL"));
StringBuffer ErrMsg = new StringBuffer();
Test.colSetConnection("XXX","XXX","XXX","",0,00,ErrMsg);
System.out.println(ErrMsg);
System.out.println(Test.freeLib());//Umiraet tut esli vizvan Test.colSetConnection
}//Umiraet tut esli colSetConnection ne vizivaetsa
}
|
|
Проблемы с JNI 
Загрузка ...
