Библиотечная ручка в Фортране ⇐ Linux

[Anonymous]

У меня есть dll/so на языке Fortran, которому необходимо знать свой собственный дескриптор программы.
В Windows я могу получить дескриптор из процедуры DLLMain:

Код: Выделить всё

integer(4) function DllMain(hInst, ul_reason_being_called, lpReserved)
!DEC$ ATTRIBUTES STDCALL, ALIAS : 'DllMain' :: DllMain
integer(8) hInst, ul_reason_being_called, lpReserved, program_handle
program_handle = hInst
DllMain = 1
end

Но насколько я понимаю, функция DLLMain вызывается только в Windows. Как я могу получить дескриптор в Linux?
Dll открывает дочернюю dll, которой необходимо вызвать метод в родительской dll. Для этого мне нужен дескриптор родительской dll: getprocaddress(parent_dll_handle, 'method_name')

Подробнее здесь: https://stackoverflow.com/questions/797 ... in-fortran