Активация сервера

СОМ и потоки выполнения

Поскольку Windows — многопоточная и многозадачная операционная система, СОМ-клиент и СОМ-сервер могут оказаться в различных процессах (processes) или потоках выполнения (threads) приложения. Кроме того, к серверу может обращаться несколько клиентов. Технология СОМ решает эту проблему при помощи концепции апартаментов (apartments), в которых выполняются СОМ-клиенты и СОМ-серверы. Апартаменты бывают однопоточные (Single Threaded Apartment, STA), многопоточные (Multiple Threaded Apartment, MTA) и нейтральные (Neutral apartment).

При создании однопоточного апартамента организуется очередь вызовов методов, и каждый из них обрабатывается только после того, как будут обработаны все предшествующие вызовы. STA, за редким исключением, является наиболее подходящим выбором для реализации СОМ-серверов.

Внутри многопоточного апартамента может быть создано сколько угодно потоков и объектов, причем каждый объект не привязывается к какому-то конкретному потоку, и любой метод объекта может быть вызван в любом из потоков. СОМ автоматически ведет пул потоков внутри MTA и при вызове со стороны клиента находит свободный поток, в котором вызывает метод требуемого объекта. СОМ-сервер, работающий в MTA, обладает потенциально более высоким быстродействием и доступностью для клиентов, однако он значительно сложнее в разработке.

Нейтральные апартаменты используются при создании серверов СОМ+. Методы объектов в таких апартаментах вызываются в потоке, из которого к ним обратился клиент. Это позволяет уменьшить количество переключении потоков.

Для активации СОМ-сервера клиент должен вызвать функцию CreateComObject, описанную в модуле ComObj.pas:

function CreateComObject(const ClassID: TGUID): IUnknown;

Функция получает в качестве параметра CLSID требуемого объекта и возвращает ссылку на его интерфейс IUnknown. Далее клиент может запросить требуемый интерфейс и работать с ним.

var

COMServer: IComServer;

// Создаем СОМ-объект и запрашиваем у него интерфейс

ComServer:= CreateComObject(IComServer) as IСomServer;

// Работаем с интерфейсом

ComServer.DoSomething;

// Освобождаем интерфейс

ComServer:= nil;

При этом выполняются следующие действия:

1. В реестре по запрошенному идентификатору CLSID ищется запись регистрации сервера.

2. В этой записи находится имя файла модуля сервера.

· Если это исполняемый файл — он запускается на выполнение. Любое приложение, реализующее СОМ-сервер, при старте регистрирует в системе интерфейс фабрики классов. После запуска и регистрации СОМ получает ссылку на фабрику классов. Фабрика классов — это СОМ-сервер, реализующий интерфейс ICIassFactory. Ключевым методом этого интерфейса является метод CreateInstance, который и создает экземпляр объекта, реализующего требуемый интерфейс.

· Если это библиотека, она загружается в адресное пространство вызвавшего процесса и вызывается ее функция DllGetCtassObject, возвращающая ссылку на реализованную в DLL фабрику классов.

3. СОМ вызывает метод CreateInstance и передает полученный интерфейс клиенту.

По завершении работы с СОМ-объектом клиент ®освобождает ссылку на него (что приводит к вызову метода Release). В этот момент СОМ-сервер проверяет, есть ли еще ссылки на созданные им объекты. Если все объекты освобождены, то СОМ-сервер завершает свою работу. В случае если сервер реализован в виде DLL, он должен экспортировать функцию DllCanUnloadNow. Если все объекты из этой библиотеки освобождены, то она выгружается из памяти. Вся работа по созданию и регистрации фабрики объектов и экспорту соответствующих функций из DLL в Delphi уже реализована в составе стандартных библиотек.

Дата добавления: 2014-01-05