Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Callbacks & CORBA [Delphi, Windows]

sands © (2004-11-04 11:25:00)
Hi, All!
Использую механизм call-back. Вот выдержки из моих idl:

module _archiver {
interface KrArchiver {
...
}
}

module _kernel {
interface KrBase {
// Register archiver client-application on server side
boolean regArchiverApp( in _archiver::KrArchiver arhApp );
// UnRegister archiver client-application on server side
boolean unregArchiverApp( in _archiver::KrArchiver arhApp );
...
}
}

Проблема в том, что серверу приходят ссылки на stub, которые каждый раз разные!
Возможно ли средствами CORBA однозначно определить, какое из клиентских приложений(ранее вызвавших regArchiverApp(...)) вызывает unregArchiverApp(...)? Или надо городить свой "огород"?

sands (2004-11-09 08:46:00) [1]
inic
Пришлось сделать почти так, как ты и говорил! Но немножко не так... :)
Вот изменненый IDL:
module _kernel { interface KrBase { // Register archiver client-application on server side any regArchiverApp( in _archiver::KrArchiver arhApp ); // UnRegister archiver client-application on server side boolean unregArchiverApp( in any arhAppID ); ... } }
Или с учетом особенностей реализации CORBA в Delphi:
module _kernel { interface KrBase { // Register archiver client-application on server side unsigned long regArchiverApp( in _archiver::KrArchiver arhApp ); // UnRegister archiver client-application on server side boolean unregArchiverApp( in unsigned long arhAppID ); ... } }

При вызове клиентом метода regArchiverApp сервер возвращает ссылку на полученный стаб, которую клиент должен сохранить у себя и передать в unregArchiverApp при завершении работы.
Т.е. в качестве уникального идентификатора клиента я использую ссылку на стаб объекта, которую получил сервер (они же - ссылки - храняться на сервере в списке). Да, ссылку получаю методом <имя класса>Helper.Insert(...), восстанавливаю через <имя класса>Helper.Extract(...)

inic (2004-11-04 16:28:00) [2]
sands © (04.11.04 11:25)

Мои "исследования" показали, что нет, ИМХО конечно.

Может быть сделать так:

1. Каждый клиент при создании сам себе генерит уникальный InstanceName.
2. Это имя должно быть передано вместе со стабом серваку.
3. Сервак регистрирует этого клиента, записывая в некий свой StringList:
StringList.AddObject(InstanceNameКлиента, Пробинденный стаб клиента).

Далее при дерегестрации клиента, когда серваку прийдет стаб, он ищет в StringList пробинденный стаб, сопоставляя имена, и удаляет эту запись. Следовательно имя/ID должно быть свойством клиента-объекта.

Ну а посылать оповещения клиентам в случае, если сервер инициирует завершение, можно просто перебирая StringList.

ЗЫ Как-то запутано написал

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »