45828 (665172), страница 2

// код, генерируемый средой разработки

…

// хэндл тестируемой DLL

HINSTANCE hDll = NULL;

// тип указателя на функцию ViewStringGridWnd

typedef HWND (__stdcall *ViewStringGridWndProcAddr) (int Count, double* Values);

// хэндл окна с VCL-компонентом StringGrid

HWND hGrid = NULL;

// тип указателя на функцию SumFunc

typedef int (__cdecl *SumFuncProcAddr) (int a, int b);

// код, генерируемый средой разработки

…

// обработчик нажатия кнопки SumFunc

void CUsingExplicitDLLDlg::OnSumFunc()

{

// указатель на функцию SumFunc

SumFuncProcAddr ProcAddr = NULL;

if( hDll != NULL )

{

// получение адреса функции

ProcAddr = (SumFuncProcAddr) GetProcAddress(hDll, "SumFunc");

if( ProcAddr != NULL )

{

// вызов функции

int result = (ProcAddr)(5, 6);

// отображение результата в заголовке диалога

char str[10];

this->SetWindowText(itoa(result, str ,10));

}

}

}

// обработчик нажатия кнопки ViewStringGridWnd

void CUsingExplicitDLLDlg::OnViewStringGridWnd()

{

// указатель на функцию ViewStringGridWnd

ViewStringGridWndProcAddr ProcAddr = NULL;

if( hDll != NULL )

{

// получение адреса функции

ProcAddr = (ViewStringGridWndProcAddr) GetProcAddress(hDll,

"ViewStringGridWnd");

if( ProcAddr != NULL )

{

// инициализация аргументов

const int count = 5;

double Values[count] = {2.14, 3.56, 6.8, 8, 5.6564};

// закрываем ранее созданное окно, чтобы они не плодились

if( hGrid != NULL )

::SendMessage(hGrid, WM_CLOSE, 0, 0);

// вызов функции

hGrid = (ProcAddr)(count, Values);

}

}

}

// обработчик события окна WM_DESTROY

void CUsingExplicitDLLDlg::OnDestroy()

{

CDialog::OnDestroy();

// закрываем окно с компонентом StringGrid, если оно было создано

if( hGrid != NULL )

::SendMessage(hGrid, WM_CLOSE, 0, 0);

// выгрузка dll из памяти

FreeLibrary( hDll );

}

// обработчик события окна WM_CREATE

int CUsingExplicitDLLDlg::OnCreate(LPCREATESTRUCT lpCreateStruct)

{

if (CDialog::OnCreate(lpCreateStruct) == -1)

return -1;

// загрузка dll в память

hDll = LoadLibrary("ExplicitDll.dll");

return 0;

}

ПРИМЕЧАНИЕ

Следует отметить, что использование экспортируемых unmanaged-функций из управляемого кода (managed code) в .NET осуществляется исключительно посредством явной загрузки dll. К процессу вызова функции в этом случае помимо стандартных шагов (таких как загрузка dll в память посредством LoadLibrary, получение адреса требуемой функции с помощью GetProcAddress и непосредственно вызов), добавляется также процесс маршалинга (marshaling), то есть процесс преобразования типов данных .NET в их аналоги в традиционном двоичном коде (при проталкивании аргументов в стек) и обратно (при анализе возвращаемого значения). Для указания, что метод импортируется из dll, используется атрибут DllImport, параметры которого содержат информацию, необходимую для вызова LoadLibrary и GetProcAddress.

#ifndef _IMPLICITDLL_

#define _IMPLICITDLL_

// если макрос-идентификатор _DLLEXPORT_ был определен ранее,

// то макрос _DECLARATOR_ пометит функцию как экспортируемую,

// в противном случае функция будет помечена как импортируемая.

// Данная конструкция из директив препроцессора позволяет

// воспользоваться заголовочным файлом библиотеки как на этапе

// создания DLL, так и на этапе ее использования, а именно, при

// неявном связывании.

#ifdef _DLLEXPORT_

#define _DECLARATOR_ __declspec(dllexport)

#else

#define _DECLARATOR_ __declspec(dllimport)

#endif

extern "C"

{

int _DECLARATOR_ __cdecl SumFunc(int a, int b);

HWND _DECLARATOR_ __cdecl ViewStringGridWnd(int Count, double* Values);

}

#endif

#include

#include

// определение _DLLEXPORT_, дабы вместо макроса _DECLARATOR_

// в заголовочном файле было подставлено __declspec(dllexport),

// и функции были объявлены как экспортируемые

#define _DLLEXPORT_

#include "ImplicitLinking_cdecl.h"

int __cdecl SumFunc( int a, int b )

{ // тело функции такое же как в предыдущем разделе

}

HWND __cdecl ViewStringGridWnd( int Count, double* Values )

{ // тело функции такое же как в предыдущем разделе

}

#pragma argsused

int WINAPI DllEntryPoint(HINSTANCE hinst,

unsigned long reason,

void* lpReserved)

{

return 1;

}

ПРИМЕЧАНИЕ

Таблица импорта любого PE-файла содержит массив структур IMAGE_IMPORT_DESCRIPTOR. Каждая такая структура соответствует одной из dll, с которой неявно связан PE-файл. Структура IMAGE_IMPORT_DESCRIPTOR среди прочих полей содержит поле с RVA строки-наименования dll, которой она соответствует, и два поля с RVA массивов двойных слов, предназначенных для хранения информации об импортируемых функциях. При запуске приложения загрузчик PE-файлов заполняет один из этих массивов (так называемую таблицу адресов импорта) адресами импортируемых функций, загрузив перед этим dll, в которой эти функции находятся. Адрес импортируемой функции вычисляется как сумма адреса, по которому была загружена экспортирующая данную функцию dll, и смещения (RVA) самой функции относительно начала dll.

EXPORTS

; MSVC name = Borland name

SumFunc = _SumFunc

ViewStringGridWnd = _ViewStringGridWnd

libRARY IMPLICITLINKING_CDECL.DLL

EXPORTS

SumFunc @4 ; SumFunc

ViewStringGridWnd @5 ; ViewStringGridWnd

_SumFunc @1 ; _SumFunc

_ViewStringGridWnd @2 ; _ViewStringGridWnd

___CPPdebugHook @3 ; ___CPPdebugHook

libRARY IMPLICITLINKING_CDECL.DLL

EXPORTS

SumFunc @4 ; SumFunc

ViewStringGridWnd @5 ; ViewStringGridWnd

ПРИМЕЧАНИЕ

В единственной статье, которую мне удалось найти по данной теме (на сайте bcbdev.com), рекомендовалось, помимо удаления из .def-файла посторонних функций, заменить наименование секции EXPORTS на IMPORTS. Делать этого не следует по той простой причине, что утилита lib.exe (по крайней мере, поставляемая с 6-ой и 7-ой Visual Studio) секцию IMPORTS не поддерживает, поэтому игнорирует все последующие описания функций и создает пустой .lib-файл. Утилита lib.exe находится в каталоге $(VC)\Bin, но запустить ее обычно с первого раза не удается, поскольку для работы ей требуется библиотека mspdb60.dll (для lib.exe, поставляемой с Visual Studio 7 – mspdb70.dll). mspdb60.dll лежит в папке $(Microsoft Visual Studio)\Common\MSDev98\Bin, а mspdb70.dll – в папке $(Microsoft Visual Studio .NET)\Common7\IDE.

lib.exe /def:ImplicitLinking_cdecl.def

lib.exe /def:ImplicitLinking_cdecl.def /out:ImplicitLinking_cdecl.lib