Вниз
Скачать: 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.025 c
11-1105356483
RA
2005-01-10 14:28
2005.08.14
Изменения в PStrList


4-1118609407
g-l-u-k
2005-06-13 00:50
2005.08.14
SetDlgItemText


3-1120591292
redlord
2005-07-05 23:21
2005.08.14
где взять SQLClientDataSet


1-1121885796
Cryptopsy
2005-07-20 22:56
2005.08.14
Обновление программных модулей через сеть


14-1122029234
Kerk
2005-07-22 14:47
2005.08.14
Компьютеры..




   Наверх