Создание динамических переадресаций функций в Delphi и C++Builder

Delphi , Файловая система , DLL и PlugIns

Вопрос о возможности создания динамических библиотек (DLL) с переадресацией экспортируемых функций в Delphi аналогично тому, как это делается в C/C++, является довольно интересным. В C/C++ такая возможность реализуется с помощью директивы препроцессора или файла определения экспортов (.def), что позволяет одной библиотеке "перехватывать" вызовы функций и перенаправлять их в другую библиотеку. Вопрос заключается в том, можно ли достичь подобного результата в Delphi, используя, при необходимости, компилятор CLI.

Описание проблемы

В C/C++ разработчики могут создавать DLL, экспортирующие функции, которые перенаправляются на функции в другой DLL, без использования загрузчика-оболочки. Это достигается с помощью специальных директив, таких как:

#pragma comment(linker, "/export:TestFunc=Real_Lib.dll.TestFunc")

или с использованием файла определения экспортов (.def):

EXPORTS
    TestFunc=c:/Real_Lib.dll.TestFunc

Эти подходы позволяют создать оболочку для DLL, которая перегружает только определенные функции, перенаправляя остальные, без необходимости создания загрузчика-оболочки для каждой экспортируемой функции.

Возможность в Delphi

Вопрос заключается в том, можно ли в Delphi создать подобный оболочечный DLL, который будет переадресовывать вызовы функций в другую DLL. В контексте Delphi это может быть полезно для создания более легковесных и гибких DLL, которые могут использовать функции из других библиотек без необходимости включать весь код в одном DLL.

Пример

Допустим, у нас есть реальная DLL с функцией:

library Real_Lib;
function TestFunc(a, b: Integer): Integer; stdcall;
begin
  Result := a + b;
end;
exports TestFunc;
begin
end.

И оболочечный DLL, который "перехватывает" вызов этой функции:

library Forwarder;
function TestFunc: Integer; stdcall; external 'Real_Lib.dll';
exports TestFunc;
begin
end.

Здесь видно, что параметры функции могут быть безопасно опущены, но все еще требуется указать тип возвращаемой функции.

Программа, использующая оболочечный DLL, будет выглядеть так:

program TestProgram;
{$APPTYPE CONSOLE}
function TestFunc(a, b: Integer): Integer; stdcall; external 'Forwarder.dll';
begin
  Writeln('Result: ', TestFunc(2, 7));
  Readln;
end.

Этот пример компилируется и работает, но Dependency Walker показывает его как обычный экспорт, который просто вызывает импортированную функцию.

Подтвержденный ответ

В соответствии с комментариями, Delphi не поддерживает создание таких DLL напрямую. Для достижения подобного результата потребуется выполнить некоторую постобработку, если вы хотите создать DLL с переадресацией функций из Delphi.

Однако, если использовать C++Builder, который поддерживает файлы определения экспортов (.def) для объявления EXPORTS, возможно, он также поддерживает переадресацию функций. Тем не менее, для точной информации потребуется дополнительное тестирование.

Альтернативный путь

Если Delphi не поддерживает создание таких DLL, можно рассмотреть следующие альтернативные пути:

1. Использование C++Builder для создания DLL с переадресацией экспортов, что может включать создание загрузчика-оболочки с динамической загрузкой и вызовом функций из другого модуля.
2. Использование Delphi для создания DLL, предоставляющей необходимые функции, но с пониманием того, что для переадресации потребуется дополнительная обработка, которую, возможно, придется реализовать самостоятельно, например, путем изменения таблицы экспортов исполняемого файла.

Заключение

Таким образом, хотя Delphi не имеет встроенной поддержки для создания DLL с переадресацией функций, C++Builder может предложить некоторые возможности в этом направлении. В любом случае, разработчикам, возможно, придется использовать дополнительные инструменты или написать собственные утилиты для постобработки библиотек.

Создано по материалам из источника по ссылке.

Вопрос о возможности создания динамических библиотек с переадресацией функций в Delphi, аналогично тому, как это делается в C/C++.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: DLL и PlugIns ::