ORB の輪

// Bank.idl

module Bank {
  interface Account {
    long getBalance();
    string getName();
  };
};

module CosNaming {
    typedef string Istring;
    struct NameComponent {
        Istring id;
        Istring kind;
    };
    typedef sequence<NameComponent> Name;
};

module CosNaming {  
    interface NamingContext {
        void    bind(in Name n, in Object obj)      
                    raises(NotFound, CannotProceed, InvalidName, AlreadyBound);
        void    rebind(in Name n, in Object obj)    
                    raises(NotFound, CannotProceed, InvalidName);
        void    bind_context(in Name n, in NamingContext nc)        
                    raises(NotFound, CannotProceed, InvalidName, AlreadyBound);
        void    rebind_context(in Name n, in NamingContext nc)  
                    raises(NotFound, CannotProceed, InvalidName);
        Object  resolve (in Name n)
                    raises(NotFound, CannotProceed, InvalidName);
        void    unbind(in Name n)
                    raises(NotFound, CannotProceed, InvalidName);
        NamingContext   new_context();
        NamingContext   bind_new_context(in Name n)
                    raises(NotFound, AlreadyBound, CannotProceed, InvalidName);
        void    destroy()
                    raises(NotEmpty);
        void    list(in unsigned long how_many, out BindingList bl, out BindingIterator bi);
    };
};

// AccountImpl.java

public class AccountImpl extends Bank.AccountPOA {
  private String _name;
  private int   _balance;

  public AccountImpl(String name, int balance) {
    _name = name;
    _balance = balance;
  }
  public int getBalance() {
    return _balance;
  }
  public String getName() {
    return _name;
  }
}

  1:// Server.java
  2:
  3:import org.omg.PortableServer.*;
  4:import org.omg.CosNaming.*;
  5:import org.omg.CosNaming.NamingContextPackage.*;
  6:import java.io.*;
  7:
  8:public class Server {
  9:
 10:  public static void main(String[] args) {
 11:    try {
 12:      // ORB の初期化
 13:      org.omg.CORBA.ORB orb = org.omg.CORBA.ORB.init(args,null);
 14:
 15:      // RootPOA のオブジェクトリファレンスを取得
 16:      org.omg.CORBA.Object obj = orb.resolve_initial_references("RootPOA");
 17:      POA rootPOA = POAHelper.narrow(obj);
 18:
 19:      // サーバントの生成
 20:      AccountImpl accountServant = new AccountImpl("OGIS-RI",5000);
 21:
 22:      // RootPOA 上でサーバントを活性化
 23:      rootPOA.activate_object(accountServant);
 24:
 25:      // POA マネージャの活性化
 26:      rootPOA.the_POAManager().activate();
 27:
 28:      // サーバントからオブジェクトリファレンスを取得
 29:      org.omg.CORBA.Object reference = rootPOA.servant_to_reference(accountServant);
 30:
 31:      // ネーミングサービスのルートコンテキストのリファレンスを取得
 32:      obj = orb.resolve_initial_references("NameService");
 33:
 34:      // ルートコンテキストのリファレンスを NamingContext 型に変換
 35:      NamingContext rootCtx = NamingContextHelper.narrow(obj);
 36:
 37:      // 名前を作成する
 38:      NameComponent[] nameCtx = { new NameComponent("Bank", "") };
 39:
 40:      NamingContext bankCtx;
 41:      try{
 42:          // ネーミングコンテキストを取得する
 43:          obj = rootCtx.resolve(nameCtx);
 44:          bankCtx = NamingContextHelper.narrow(obj);
 45:      }catch(NotFound e){
 46:          // ネーミングコンテキストが存在しない場合
 47:          // 作成した名前でネーミングコンテキストを登録
 48:          System.out.println("Exception: " + e);
 49:          bankCtx = rootCtx.bind_new_context(nameCtx); 
 50:      }
 51:
 52:      // 登録する名前を作成する
 53:      NameComponent[] nameObj = { new NameComponent("OGIS-RI", "Account") };
 54:      try{
 55:          // 作成した名前で Account のオブジェクトリファレンスを登録
 56:          bankCtx.bind(nameObj,reference); 
 57:      }catch(AlreadyBound e){
 58:          // 既にオブジェクトリファレンスが登録されている場合
 59:          // 再度、作成した名前でオブジェクトリファレンスを登録
 60:          System.out.println("Exception: " + e);
 61:          bankCtx.rebind(nameObj, reference);
 62:      }
 63:      
 64:      // クライアントからのリクエストに待機
 65:      System.out.println("Server is ready.");
 66:      orb.run();
 67:    }
 68:    catch (Exception e) {
 69:      e.printStackTrace();
 70:    }
 71:  }
 72:}

  1:#include "BankImpl.h"
  2:#include "CosNaming_c.hh"
  3:#include "CosNamingExt_c.hh"
  4:
  5:// USE_STD_NS is a define setup by VisiBroker to use the std namespace
  6:USE_STD_NS
  7:
  8:int main(int argc, char* const* argv) 
  9:{
 10:  try {
 11:    // ORB の初期化
 12:    CORBA::ORB_var orb = CORBA::ORB_init(argc, argv);
 13:
 14:    // RootPOA のオブジェクトリファレンスを取得
 15:    CORBA::Object_var obj = orb->resolve_initial_references("RootPOA");
 16:    PortableServer::POA_var rootPOA = PortableServer::POA::_narrow(obj);
 17:    
 18:    // サーバントの生成
 19:    AccountImpl accountServant(10000.0,"NAGATA"); 
 20:
 21:    // RootPOA 上でサーバントの活性化
 22:    rootPOA->activate_object(&accountServant);
 23:
 24:    // POA マネージャの取得
 25:    PortableServer::POAManager_var poa_manager = rootPOA->the_POAManager();
 26:
 27:    // POA マネージャの活性化
 28:    poa_manager->activate();
 29:
 30:    // サーバントからオブジェクトリファレンスを取得
 31:    CORBA::Object_var reference = rootPOA->servant_to_reference(&accountServant);
 32:
 33:    // ネーミングサービスのルートコンテキストのリファレンスを取得
 34:    obj = orb->resolve_initial_references("NameService");
 35:
 36:    // ルートコンテキストのリファレンスを NamingContext 型に変換
 37:    CosNaming::NamingContext_var rootCtx = CosNaming::NamingContext::_narrow(obj);
 38:
 39:    // 名前を作成する
 40:    CosNaming::Name nameCtx; 
 41:    nameCtx.length(1); 
 42:    nameCtx[0].id = CORBA::string_dup("Bank"); 
 43:    nameCtx[0].kind = CORBA::string_dup(""); 
 44:
 45:    CosNaming::NamingContext_var bankCtx;
 46:    try{
 47:        // ネーミングコンテキストを取得する
 48:        obj = rootCtx->resolve(nameCtx);
 49:        bankCtx = CosNaming::NamingContext::_narrow(obj);
 50:    }catch(const CosNaming::NamingContext::NotFound& e){
 51:        cout << "Exception: " << e << endl;
 52:        // ネーミングコンテキストが存在しない場合
 53:        // 作成した名前でネーミングコンテキストを登録
 54:        bankCtx = rootCtx->bind_new_context(nameCtx); 
 55:    }
 56:
 57:    // 登録する名前を作成する
 58:    CosNaming::Name nameObj; 
 59:    nameObj.length(1);
 60:    nameObj[0].id   = CORBA::string_dup("Nagata"); 
 61:    nameObj[0].kind = CORBA::string_dup("Account"); 
 62:
 63:    try{
 64:        // 作成した名前で Account のオブジェクトリファレンスを登録
 65:        bankCtx->bind(nameObj,reference); 
 66:    }catch(const CosNaming::NamingContext::AlreadyBound& e){
 67:        // 既にオブジェクトリファレンスが登録されている場合
 68:        // 再度、作成した名前でオブジェクトリファレンスを登録
 69:        cout << "Exception: " << e << endl;
 70:        bankCtx->rebind(nameObj, reference);
 71:    }
 72:
 73:    // クライアントからのリクエストに待機
 74:    cout << "Server is ready" << endl;
 75:    orb->run();
 76:  }
 77:  catch(const CORBA::Exception& e) {
 78:    cerr << e << endl;
 79:    return 1;
 80:  }
 81:  return 0;
 82:}

  1:// Client.java
  2:
  3:import org.omg.CosNaming.*;
  4:import java.io.*;
  5:
  6:public class Client {
  7:
  8:  public static void main(String[] args) {
  9:    try {
 10:      // ORB の初期化
 11:      org.omg.CORBA.ORB orb = org.omg.CORBA.ORB.init(args,null);
 12:
 13:      // ネーミングサービスのルートコンテキストのリファレンスを取得
 14:      org.omg.CORBA.Object obj = orb.resolve_initial_references("NameService");
 15:
 16:      // ルートコンテキストのリファレンスを NamingContextExt 型に変換
 17:      NamingContextExt rootCtx = NamingContextExtHelper.narrow(obj);
 18:
 19:      Bank.Account account;
 20:
 21:      System.out.println("");
 22:      System.out.println("------------------- Case 1 -------------------");
 23:      // Bank のネーミングコンテキストを取得してから Account オブジェクトの
 24:      // リファレンスを取得する方法
 25:
 26:      // Bank のネーミングコンテキストを取得する
 27:      obj = rootCtx.resolve(rootCtx.to_name("Bank"));
 28:      NamingContextExt bankCtx = NamingContextExtHelper.narrow(obj);
 29:
 30:      // JacORB で登録した Account オブジェクトを取得する
 31:      // NamingContextExt の to_nmae() メソッドを利用して文字列から名前を作成している
 32:      obj = bankCtx.resolve(bankCtx.to_name("OGIS-RI.Account"));
 33:      account = Bank.AccountHelper.narrow(obj);
 34:
 35:      // Account オブジェクトの情報を表示する
 36:      infoAccount(account);
 37:
 38:      // VisiBrokerORB で登録した Account オブジェクトを取得する
 39:      // NamingContextExt の resolve_str() メソッドを利用して
 40:      // 文字列から直接リファレンスを取得している
 41:      obj = bankCtx.resolve_str("Nagata.Account");
 42:      account = Bank.AccountHelper.narrow(obj);
 43:
 44:      // Account オブジェクトの情報を表示する
 45:      infoAccount(account);
 46:
 47:      System.out.println("------------------- Case 2 -------------------");
 48:      // Account オブジェクトの名前階層を直接指定して取得する方法
 49:
 50:      // 取得したいオブジェクトの名前を作成する
 51:      NameComponent[] name = { new NameComponent("Bank", "")
 52:                              ,new NameComponent("OGIS-RI", "Account") };
 53:
 54:      // JacORB で登録した Account オブジェクトを取得する
 55:      obj = rootCtx.resolve(name);
 56:      account = Bank.AccountHelper.narrow(obj);
 57:
 58:      // Account オブジェクトの情報を表示する
 59:      infoAccount(account);
 60:
 61:      // VisiBrokerORB で登録した Account オブジェクトを取得する
 62:      // NamingContextExt の to_name メソッドを利用して文字列から名前を作成している
 63:      obj = rootCtx.resolve(rootCtx.to_name("Bank/Nagata.Account"));
 64:      account = Bank.AccountHelper.narrow(obj);
 65:
 66:      // Account オブジェクトの情報を表示する
 67:      infoAccount(account);
 68:
 69:      System.out.println("");
 70:      System.out.println("------------------- Case 3 -------------------");
 71:      // 名前を指定せずに名前階層を検索して Account オブジェクトを取得する方法
 72:      listAccount(rootCtx);
 73:    }
 74:    catch(Exception e) {
 75:      e.printStackTrace();
 76:    }
 77:  }
 78:
 79:  // 指定された Account オブジェクトの情報を表示するメソッド
 80:  private static void infoAccount(Bank.Account account){
 81:      System.out.println
 82:        ("The balance in " + account.getName() + "'s account is "
 83:                           + account.getBalance() + " yen.");
 84:  }
 85:
 86:  // 指定されたネーミングコンテキスト以下の名前階層を検索し、
 87:  // Account オブジェクトの情報を表示するメソッド
 88:  private static void listAccount(NamingContext ctx){
 89:    try{
 90:      int how_many = 0;
 91:
 92:      // list メソッドに渡す out モードの Holder クラスを作成
 93:      BindingListHolder listHdr = new BindingListHolder();
 94:      BindingIteratorHolder iteratorHdr = new BindingIteratorHolder();
 95:
 96:      // ctx ネーミングコンテキストに登録されているオブジェクトを取得する
 97:      ctx.list(how_many, listHdr, iteratorHdr);
 98:
 99:      //  list メソッドの結果を Holder クラスから取り出す
100:      BindingIterator iterator = iteratorHdr.value;
101:
102:      // iterator メソッドに渡す out モードの Holder クラスを作成
103:      BindingHolder nodeHdr = new BindingHolder();
104:
105:      // ctx ネーミングコンテクスト直下に登録されている
106:      // すべてのオブジェクトに対して以下の処理を繰り返す
107:      while( iterator.next_one(nodeHdr) == true ){
108:        // next_one メソッドの結果を Holder クラスから取り出す
109:        Binding node = nodeHdr.value;
110:
111:        // 登録タイプがネーミングコンテキストの場合
112:        if( node.binding_type == BindingType.ncontext ){
113:           try{
114:             // 登録されているネーミングコンテキストを取得し、
115:             // そのネーミングコンテキスト以下に Account オブジェクトが
116:             // 存在するかどうか検索する
117:             org.omg.CORBA.Object obj = ctx.resolve(node.binding_name);
118:             NamingContext subCtx = NamingContextHelper.narrow(obj);
119:             listAccount(subCtx);
120:           }catch(Exception e){
121:             e.printStackTrace();
122:           }
123:        }
124:
125:        // 登録タイプが CORBA オブジェクトの場合 
126:        if( node.binding_type == BindingType.nobject ){
127:           try{
128:             // 登録されている CORBA オブジェクトのリファレンスを取得する
129:             // 登録されている CORBA オブジェクトが Account オブジェクトで
130:             // ない場合は、CORBA.BAD_PARAM 例外が発生する
131:             org.omg.CORBA.Object obj = ctx.resolve(node.binding_name);
132:             Bank.Account account = Bank.AccountHelper.narrow(obj);
133:
134:             // Account オブジェクトの情報を表示する
135:             infoAccount(account);
136:           }catch(org.omg.CORBA.BAD_PARAM exp){
137:             // Account オブジェクトでない場合は何もしない
138:           }catch(Exception e){
139:             e.printStackTrace();
140:           }
141:        }
142:      }
143:    }catch(Exception e){
144:        e.printStackTrace();
145:    }
146:  }
147:}

 22:      System.out.println("------------------- Case 1 -------------------");
 23:      // Bank のネーミングコンテキストを取得してから Account オブジェクトの
 24:      // リファレンスを取得する方法
 25:
 26:      // Bank のネーミングコンテキストを取得する
 27:      obj = rootCtx.resolve(rootCtx.to_name("Bank"));
 28:      NamingContextExt bankCtx = NamingContextExtHelper.narrow(obj);
 29:
 30:      // JacORB で登録した Account オブジェクトを取得する
 31:      // NamingContextExt の to_nmae() メソッドを利用して文字列から名前を作成している
 32:      obj = bankCtx.resolve(bankCtx.to_name("OGIS-RI.Account"));
 33:      account = Bank.AccountHelper.narrow(obj);
 34:
 35:      // Account オブジェクトの情報を表示する
 36:      infoAccount(account);
 37:
 38:      // VisiBrokerORB で登録した Account オブジェクトを取得する
 39:      // NamingContextExt の resolve_str() メソッドを利用して
 40:      // 文字列から直接リファレンスを取得している
 41:      obj = bankCtx.resolve_str("Nagata.Account");
 42:      account = Bank.AccountHelper.narrow(obj);
 43:
 44:      // Account オブジェクトの情報を表示する
 45:      infoAccount(account);

 47:      System.out.println("------------------- Case 2 -------------------");
 48:      // Account オブジェクトの名前階層を直接指定して取得する方法
 49:
 50:      // 取得したいオブジェクトの名前を作成する
 51:      NameComponent[] name = { new NameComponent("Bank", "")
 52:                              ,new NameComponent("OGIS-RI", "Account") };
 53:
 54:      // JacORB で登録した Account オブジェクトを取得する
 55:      obj = rootCtx.resolve(name);
 56:      account = Bank.AccountHelper.narrow(obj);
 57:
 58:      // Account オブジェクトの情報を表示する
 59:      infoAccount(account);
 60:
 61:      // VisiBrokerORB で登録した Account オブジェクトを取得する
 62:      // NamingContextExt の to_name メソッドを利用して文字列から名前を作成している
 63:      obj = rootCtx.resolve(rootCtx.to_name("Bank/Nagata.Account"));
 64:      account = Bank.AccountHelper.narrow(obj);
 65:
 66:      // Account オブジェクトの情報を表示する
 67:      infoAccount(account);

 70:      System.out.println("------------------- Case 3 -------------------");
 71:      // 名前を指定せずに名前階層を検索して Account オブジェクトを取得する方法
 72:      listAccount(rootCtx);

 86:  // 指定されたネーミングコンテキスト以下の名前階層を検索し、
 87:  // Account オブジェクトの情報を表示するメソッド
 88:  private static void listAccount(NamingContext ctx){
 89:    try{
 90:      int how_many = 0;
 91:
 92:      // list メソッドに渡す out モードの Holder クラスを作成
 93:      BindingListHolder listHdr = new BindingListHolder();
 94:      BindingIteratorHolder iteratorHdr = new BindingIteratorHolder();
 95:
 96:      // ctx ネーミングコンテキストに登録されているオブジェクトを取得する
 97:      ctx.list(how_many, listHdr, iteratorHdr);
 98:
 99:      //  list メソッドの結果を Holder クラスから取り出す
100:      BindingIterator iterator = iteratorHdr.value;
101:
102:      // iterator メソッドに渡す out モードの Holder クラスを作成
103:      BindingHolder nodeHdr = new BindingHolder();
104:
105:      // ctx ネーミングコンテクスト直下に登録されている
106:      // すべてのオブジェクトに対して以下の処理を繰り返す
107:      while( iterator.next_one(nodeHdr) == true ){
108:        // next_one メソッドの結果を Holder クラスから取り出す
109:        Binding node = nodeHdr.value;
110:
111:        // 登録タイプがネーミングコンテキストの場合
112:        if( node.binding_type == BindingType.ncontext ){
113:           try{
114:             // 登録されているネーミングコンテキストを取得し、
115:             // そのネーミングコンテキスト以下に Account オブジェクトが
116:             // 存在するかどうか検索する
117:             org.omg.CORBA.Object obj = ctx.resolve(node.binding_name);
118:             NamingContext subCtx = NamingContextHelper.narrow(obj);
119:             listAccount(subCtx);
120:           }catch(Exception e){
121:             e.printStackTrace();
122:           }
123:        }
124:
125:        // 登録タイプが CORBA オブジェクトの場合 
126:        if( node.binding_type == BindingType.nobject ){
127:           try{
128:             // 登録されている CORBA オブジェクトのリファレンスを取得する
129:             // 登録されている CORBA オブジェクトが Account オブジェクトで
130:             // ない場合は、CORBA.BAD_PARAM 例外が発生する
131:             org.omg.CORBA.Object obj = ctx.resolve(node.binding_name);
132:             Bank.Account account = Bank.AccountHelper.narrow(obj);
133:
134:             // Account オブジェクトの情報を表示する
135:             infoAccount(account);
136:           }catch(org.omg.CORBA.BAD_PARAM exp){
137:             // Account オブジェクトでない場合は何もしない
138:           }catch(Exception e){
139:             e.printStackTrace();
140:           }
141:        }
142:      }
143:    }catch(Exception e){
144:        e.printStackTrace();
145:    }
146:  }
147:}

corbaloc:iiop:1.2@localhost:10000/NameService

corbaloc::localhost:10000/NameService

corbaname::localhost:10000/NameService#Bank/OGIS-RI.Account

org.omg.CORBA.Object obj = orb.string_to_object("corbaname::localhost:10000/NameService#Bank/OGIS-RI.Account");

ORBInitRef.NameService=https://www.x.y.z/~user/NS_Ref

@echo off
java org.jacorb.idl.parser %*

@echo off
rem call java interpreter
java -Dorg.omg.CORBA.ORBClass=org.jacorb.orb.ORB -Dorg.omg.CORBA.ORBSingletonClass=org.jacorb.orb.ORBSingleton %*

@echo off

set VBROKERDIR=C:\bes51
set VBROKER_ADM=%VBROKERDIR%\var\servers\%COMPUTERNAME%\adm

set JAVA_HOME=%VBROKERDIR%\jdk

set include=%include%;%VBROKERDIR%\include;
set lib=%lib%;%VBROKERDIR%\lib

set PATH=%VBROKERDIR%\bin;%JAVA_HOME%\bin;%path%

echo Set Environment for Borland Enterprise Server 5.1

@echo off

set JAVA_HOME=C:\jdk141
set PATH=%JAVA_HOME%\bin;%PATH%

echo Set Environment for JDK 1.4.1

@echo off

REM JacORB 1.4.1 Enviroment
set JACORB_HOME=C:\JacORB141
set CLASSPATH=%JACORB_HOME%\lib\jacorb.jar;%CLASSPATH%
set CLASSPATH=%JACORB_HOME%\lib\idl.jar;%CLASSPATH%

set PATH=%JACORB_HOME%\bin;%PATH%

echo Set Environment for JacORB 1.4.1