| Interstage Application Server アプリケーション作成ガイド (データベース連携サービス編) |
|
目次
索引
|
| 第3章 クライアントアプリケーションの作成 | > 3.2 クライアントアプリケーションソースの作成（C++言語） | > 3.2.2 ソースの作成 |
動的起動インタフェースでサーバアプリケーションを呼び出す場合の、クライアントアプリケーションの記述例について説明します。
初期化処理として、ORBのオブジェクトリファレンスを取得します。オブジェクトリファレンスを取得するには、初期化メソッドを呼び出します。記述例を以下に示します。
main(argc, argv )
int argc;
char *argv[]; {
CORBA::ORB_ptr orb; // ORBのオブジェクトリファレンス
CORBA::Environment_ptr env; // 例外情報
int current_argc = argc;
env = new CORBA::Environment; // 例外情報
orb = CORBA::ORB_init(current_argc, argv, FJ_OM_ORBid, *env); |
実行するオブジェクトをネーミングサービスから検索するために、ネーミングサービスのオブジェクトリファレンスを取得します。ネーミングサービスのオブジェクトリファレンスには、CORBAインタフェースのオブジェクトリファレンスの取り出しメソッドを使用します。処理の記述例を以下に示します。
// NamingServiceのオブジェクトリファレンスを獲得 CORBA::Object_ptr obj = orb->resolve_initial_references( CORBA_ORB_ObjectId_NameService, *env ); // NamingContextクラスへの変換 CosNaming::NamingContext_ptr NamingContext_obj = CosNaming::NamingContext::_narrow( obj ); CORBA::release(obj); |
インタフェースリポジトリには、IDLで定義されたモジュール名、インタフェース名、オペレーション名、パラメタが階層構造で格納されています。インタフェースリポジトリからサーバアプリケーションの情報を獲得する方法について、以下に示します。
インタフェースリポジトリからサーバアプリケーションの情報を取得するためには、InterfaceDefオブジェクトのオブジェクトリファレンスが必要です。InterfaceDefオブジェクトのオブジェクトリファレンスを求めるには、オブジェクト名をパラメタとして、ネーミングサービスからサーバアプリケーションのオブジェクトリファレンスを求め、その後、CORBA_Object::get::interface()メソッドにより、InterfaceDefオブジェクトリファレンスを取得します。処理の記述例を以下に示します。
CORBA::Object_ptr obj; // オブジェクトリファレンス格納域 CosNaming::Name_ptr name; // CosNaming::Nameのインスタンス
CosNaming::NameComponent_var *name_component; // オブジェクト名格納域
//CosNaming::NameComponent_var領域の獲得
name_component = CosNaming::Name::allocbuf(1);
name_component[0]->id = (const CORBA::Char *)"ODdemo::calculator";
//オブジェクト名
name_component[0]->kind = (const CORBA::Char *)""; //オブジェクトのタイプ
name = new CosNaming::Name(1,1,name_component,CORBA_TRUE );
//CosNaming::Name領域の獲得
// サーバアプリケーションのオブジェクトリファレンスを獲得
obj = NamingContext_obj-> resolve( *name, *env );
//InterfaceDefオブジェクトリファレンス取得
CORBA::InterfaceDef_ptr intf = obj->_get_interface( *env ); |
サーバアプリケーションのメソッド名をパラメタとして、CORBA::InterfaceDef::lookup_name()メソッドを使用することにより、インタフェースリポジトリから指定されたメソッドを検索します。結果として、指定したメソッド情報が格納されたOperationDefオブジェクトのオブジェクトリファレンスが通知されます。
// メソッドのOperationDefオブジェクトリファレンス取得
CORBA::ContainedSeq_ptr intf_opr = intf->lookup_name(
"calculate", // メソッド名
-1,
CORBA::dk_Operation, // Operation情報の取得
CORBA_FALSE,
*env );
// OperationDefクラスへの変換
CORBA::OperationDef_ptr OperationDef_obj
= CORBA::OperationDef::_narrow((*intf_opr)[0]); |
OperationDefオブジェクトリファレンスをパラメタとして、CORBA::OperationDef::describe()メソッドにより、サーバアプリケーションがもっているメソッドのパラメタの情報(パラメタの名前、個数、パラメタの型等)をインタフェースリポジトリから検索します。
// 指定されたメソッドのパラメタ情報を検索 CORBA::Contained::Description *description = OperationDef_obj->describe( *env ); |
トランザクションを開始するために、Currentインタフェースのオブジェクトリファレンスを取得し、CosTransactions::Current::beginメソッドを呼び出します。処理の記述例を以下に示します。
CosTransactions::Current_ptr Current; /*トランザクション開始オブジェクトリファレンス*/
/*トランザクション開始インタフェースのオブジェクトリファレンスを獲得 */
obj = orb->resolve_initial_refarences(
CORBA_ORB_ObjectId_TransactionCurrent,
*env);
Current = CosTransactions::Current::_narrow(obj);
/* トランザクション開始メソッドの呼び出し */
Current->begin(*env); |
サーバアプリケーションに渡すパラメタを格納するための領域を保持するリストオブジェクトを生成するために、CORBA::ORB::create_list()メソッドに、何個のパラメタを格納するかを指定します。これにより、NVListオブジェクトリファレンスが通知されます。処理の記述例を以下に示します。
CORBA::Any tmp_any = *description->value; // Contained_Description構造体から
// パラメタ情報構造体の抽出
CORBA::OperationDescription *opr_description =
(CORBA::OperationDescription *)tmp_any.value();
//パラメタ情報の抽出
CORBA::ParDescriptionSeq *params = opr_description->parameters;
CORBA::NVList *arg_list; // NVList
orb->create_list( params->length(), arg_list, *env ); //リストオブジェクトの生成 |
CORBA_NVListオブジェクトリファレンス、サーバアプリケーションのパラメタの名前、型、値および長さをパラメタとしてCORBA::NVList::add_value()メソッドにより、サーバアプリケーションに渡すパラメタをリストオブジェクトに設定します。処理の記述例を以下に示します。
CORBA::Any p1, p2;
CORBA::Long x = 10, y = 20;
p1 <<= x;
p2 <<= y;
//パラメタの設定
arg_list->add_value(
((*params)[0])->name, //パラメタ名
p1, //パラメタの型および値
CORBA::ARG_IN, //パラメタのタイプ(in,out, inout)
*env );
//パラメタの設定
arg_list->add_value(
((*params)[1])->name, //パラメタ名
p2, //パラメタの型および値
CORBA::ARG_IN, //パラメタのタイプ(in,out, inout)
*env ); |
CORBA::Object::create_request()メソッドにより、リクエストオブジェクトを作成します。リクエストとは、メソッド名にパラメタを加えたものです。リクエストオブジェクトに対して、サーバオブジェクトのオブジェクトリファレンス、NVListオブジェクトリファレンス、後述するNamedValueと呼ぶサーバの処理結果を格納する領域を指定することによりリクエストオブジェクトのオブジェクトリファレンスが通知されます。処理の記述例を以下に示します。
CORBA::NVList_ptr arg_tmp;
// 復帰パラメタ用リストオブジェクトの生成
orb->create_list(1, arg_tmp, *env);
ODdemo::calculator::result *res = NULL;
CORBA::Any any_tmp( _tc_ODdemo_calculator_result, res, CORBA_FALSE );
// 結果用受取り用変数(CORBA::NamedValue型変数)
CORBA::NamedValue_ptr
result = arg_tmp->add_value(
NULL, // resultの設定
any_tmp,
(CORBA::Flags)0,
*env);
CORBA::Request_ptr request;
// リクエストオブジェクトの生成
obj->_create_request(
CORBA_OBJECT_NIL, // context
"calculate", // メソッド名
arg_list, // 入力パラメタ
result, // 復帰値
request, // 出力パラメタの格納域
CORBA::OUT_LIST_MEMORY,
*env ); |
NamedValueは、サーバの処理結果を格納するための領域です。システムで定義する定義例を以下に示します。
module CORBA
{
struct NamedValue
{
identifier name; // パラメタの名前
any argument; // パラメタの値
long len; // パラメタの長さ
Flags arg_modes; // パラメタの引き渡し方法(in,out,inout)
};
};
|
class CORBA
{
class NamedValue
{
public:
const char *name(CORBA::Environment &) const;
// パラメタの名前
Any *value(CORBA::Environment &) const;
// パラメタの値
Flags flags(CORBA::Environment &) const;
// パラメタの引き渡し方法(in,out,inout)
};
}; |
サーバアプリケーションに対してリクエストを送信します。リクエストの方法として、以下に示す方法があります。
それぞれについて、以下に示します。
リクエストオブジェクトのオブジェクトリファレンスをパラメタとして、CORBA::Request::invoke()メソッドにより、サーバアプリケーションを呼び出します。処理の記述例を以下に示します。
|
request->invoke( *env ); |
リクエストオブジェクトのオブジェクトリファレンスをパラメタとして、CORBA::Request::send_deferred()メソッドにより、サーバアプリケーションを呼び出します。サーバアプリケーションの処理結果は、CORBA::Request:get_response()メソッドにより受け取ります。処理の記述例を以下に示します。
|
request->send_deferred( *env ); // 処理の要求 |
CORBA::Request::get_response()サーバアプリケーションからリクエストが完了していないことが判明した場合、再度CORBA::Request::get_response()メソッドを呼び出します。
リクエストオブジェクトのオブジェクトリファレンスをパラメタとして、CORBA::release()関数により、リクエストオブジェクトを削除します。また同様に、NVListオブジェクトのオブジェクトリファレンスをパラメタとしてCORBA::release()関数により、NVListオブジェクト削除をします。処理の記述例を以下に示します。
|
CORBA::release( request ); // リクエストオブジェクトの削除 |
サーバアプリケーションのメソッド呼び出しの結果を復帰状態から判断し、トランザクションの状態を決定します。トランザクションを正常に終了させる場合には、CosTransactions::Current::commitメソッドを呼び出し、トランザクションをコミットさせます。トランザクションを異常で終了させる場合には、CosTransactions::Current::rollbackメソッドを呼び出し、トランザクションをロールバックさせます。処理の記述例を以下に示します。
/*サーバアプリケーションのメソッド呼び出しの復帰状態を確認 */
if(env->exception())
Current->rollback(*env);
else
Current->commit(CORBA_TRUE, *env); |
|
目次
索引
|