Вниз
Скачать: CL | DM;

Callbacks & CORBA   Найти похожие ветки 

 
sands ©   (2004-11-04 11:25) [0]

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(...)? Или надо городить свой "огород"?


 
inic ©   (2004-11-04 16:28) [1]

sands ©   (04.11.04 11:25)

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

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

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

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

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

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


 
sands ©   (2004-11-09 08:46) [2]

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(...)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c
4-1119625527
TStas
2005-06-24 19:05
2005.08.14
Как заставить приложение грузиться с нужным языком?


14-1121873134
drakoga
2005-07-20 19:25
2005.08.14
Где в Делфи7 компонент NMSMTP


3-1120466958
ААА
2005-07-04 12:49
2005.08.14
Как перейти


14-1121786660
Хинт
2005-07-19 19:24
2005.08.14
Delphi -> PHP


8-1112937769
dimon__
2005-04-08 09:22
2005.08.14
Статическая картинка с web камеры




   Наверх