Changeset 389 for azure_iot_hub/trunk/asp3_dcre/tecsgen/tecslib/plugin/lib/GenOpaqueMarshaler.rb

Timestamp:

May 22, 2019, 10:03:37 PM (5 years ago)

Author:

coas-nagasima

Message:

ビルドが通るよう更新

File:

• azure_iot_hub/trunk/asp3_dcre/tecsgen/tecslib/plugin/lib/GenOpaqueMarshaler.rb (modified) (75 diffs, 1 prop)

azure_iot_hub/trunk/asp3_dcre/tecsgen/tecslib/plugin/lib/GenOpaqueMarshaler.rb

@@ -6 +6 @@
 #   Copyright (C) 2008-2018 by TOPPERS Project
 #--
-#   上記著作権è€
-は，以下の(1)～(4)ã®æ¡ä»¶ã‚’æº€ãŸã™å ´åˆã«é™ã‚Šï¼Œæœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§
-#   ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
-#   変・再é
-å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する．
-#   (1) æœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§ã‚¢ã‚’ã‚½ãƒ¼ã‚¹ã‚³ãƒ¼ãƒ‰ã®å½¢ã§åˆ©ç”¨ã™ã‚‹å ´åˆã«ã¯ï¼Œä¸Šè¨˜ã®è‘—ä½œ
-#       権表示，この利用条件および下記の無保証規定が，そのままの形でソー
-#       スコード中に含まれていること．
-#   (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
-#       用できる形で再é
-å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é
-å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
-#       è€
-マニュアルなど）に，上記の著作権表示，この利用条件および下記
-#       の無保証規定を掲載すること．
-#   (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
-#       用できない形で再é
-å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
-#       と．
-#     (a) 再é
-å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€
-マニュアルなど）に，上記の著
-#         作権表示，この利用条件および下記の無保証規定を掲載すること．
-#     (b) 再é
-å¸ƒã®å½¢æ
-‹ã‚’，別に定める方法によって，TOPPERSプロジェクトに
-#         å ±å‘Šã™ã‚‹ã“ã¨ï¼Ž
-#   (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
-#       害からも，上記著作権è€
-およびTOPPERSプロジェクトをå
-è²¬ã™ã‚‹ã“と．
-#       また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
-#       由に基づく請求からも，上記著作権è€
-およびTOPPERSプロジェクトを
-#       å
-è²¬ã™ã‚‹ã“と．
+#   上記著作権者は，以下の(1)～(4)の条件を満たす場合に限り，本ソフトウェ
+#   ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
+#   変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
+#   (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
+#       権表示，この利用条件および下記の無保証規定が，そのままの形でソー
+#       スコード中に含まれていること．
+#   (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
+#       用できる形で再配布する場合には，再配布に伴うドキュメント（利用
+#       者マニュアルなど）に，上記の著作権表示，この利用条件および下記
+#       の無保証規定を掲載すること．
+#   (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
+#       用できない形で再配布する場合には，次のいずれかの条件を満たすこ
+#       と．
+#     (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
+#         作権表示，この利用条件および下記の無保証規定を掲載すること．
+#     (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
+#         報告すること．
+#   (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
+#       害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
+#       また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
+#       由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
+#       免責すること．
 #  
-#   本ソフトウェアは，無保証で提供されているものである．上記著作権è€
-お
-#   よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
-#   に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
-#   アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
-#   ã®è²¬ä»»ã‚’è² ã‚ãªã„ï¼Ž
+#   本ソフトウェアは，無保証で提供されているものである．上記著作権者お
+#   よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
+#   に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
+#   アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
+#   の責任を負わない．
 #  
 #   $Id$
@@ -54 +39 @@
 
 #== GenOpaqueMarshaler
-# OpaqueRPCPlugin, sharedOpaqueRPCPlugin å
-±é€šã®è¦ç´ を集めたモジュール
+# OpaqueRPCPlugin, sharedOpaqueRPCPlugin 共通の要素を集めたモジュール
 module GenOpaqueMarshaler
 
-  # プラグイン引数名と Proc
+  # プラグイン引数名と Proc
   RPCPluginArgProc = {
     "clientChannelCelltype" => Proc.new { |obj,rhs| obj.set_clientChannelCelltype rhs },
@@ -79 +63 @@
   }
 
-  ##### プラグイン引数チェック関数
-
-  #=== プラグイン引数 taskPriority のチェック
+  ##### プラグイン引数チェック関数
+
+  #=== プラグイン引数 taskPriority のチェック
   def set_taskPriority( rhs )
     @taskPriority = rhs
   end
 
-  #=== プラグイン引数 serverChannelCelltype のチェック
+  #=== プラグイン引数 serverChannelCelltype のチェック
   def set_serverChannelCelltype( rhs )
     @serverChannelCelltype = rhs.to_sym
@@ -98 +82 @@
   end
 
-  #=== プラグイン引数 clientChannelCelltype のチェック
+  #=== プラグイン引数 clientChannelCelltype のチェック
   def set_clientChannelCelltype( rhs )
     @clientChannelCelltype = rhs.to_sym
@@ -110 +94 @@
   end
 
-  #=== プラグイン引数 serverChannelCell のチェック
+  #=== プラグイン引数 serverChannelCell のチェック
   def set_serverChannelCell( rhs )
     @serverChannelCell = rhs.to_sym
-    # ChannelCell はプラグインで生成されるため、ここではチェックできない
+    # ChannelCell はプラグインで生成されるため、ここではチェックできない
     # path = [ "::", @serverChannelCell ]
     # obj = Namespace.find( path )
@@ -121 +105 @@
   end
 
-  #=== プラグイン引数 clientChannelCell のチェック
+  #=== プラグイン引数 clientChannelCell のチェック
   def set_clientChannelCell( rhs )
     @clientChannelCell = rhs.to_sym
-    # ChannelCell はプラグインで生成されるため、ここではチェックできない
+    # ChannelCell はプラグインで生成されるため、ここではチェックできない
     # path = [ "::", @clientChannelCell ]
     # obj = Namespace.find( path )
@@ -132 +116 @@
   end
 
-  #=== プラグイン引数 serverChannelInitializer のチェック
+  #=== プラグイン引数 serverChannelInitializer のチェック
   def set_serverChannelInitializer( rhs )
     @serverChannelInitializer = rhs.to_sym
   end
 
-  #=== プラグイン引数 clientChannelInitializer のチェック
+  #=== プラグイン引数 clientChannelInitializer のチェック
   def set_clientChannelInitializer( rhs )
     @clientChannelInitializer = rhs.to_sym
   end
 
-  #=== タスクタイプ taskCellype のチェック
+  #=== タスクタイプ taskCellype のチェック
   def set_taskCelltype( rhs )
     @taskCelltype = rhs.to_sym
@@ -154 +138 @@
   end
 
-  #=== タスクタイプ stack\size のチェック
+  #=== タスクタイプ stack\size のチェック
   def set_stackSize( rhs )
     @stackSize = rhs
   end
 
-  #=== プラグイン引数 PPAllocatorSize のチェック
+  #=== プラグイン引数 PPAllocatorSize のチェック
   def set_PPAllocatorSize( rhs )
     @PPAllocatorSize = rhs
   end
 
-  #=== プラグイン引数 TDRCelltype のチェック
+  #=== プラグイン引数 TDRCelltype のチェック
   def set_TDRCelltype( rhs )
     @TDRCelltype = rhs.to_sym
@@ -176 +160 @@
   end
 
-  #=== プラグイン引数 substituteAllocator のチェック
-  # オプション引数が、以下の形式であることをチェック
+  #=== プラグイン引数 substituteAllocator のチェック
+  # オプション引数が、以下の形式であることをチェック
   #     substituteAllocator(Alloc.eAlloc=>Subst.eAlloc,Alloc2.eAlloc=>Subst2.eAlloc)
   def set_substituteAllocator( rhs )
-    #str::String : ç ´å£Šã•ã‚Œã‚‹ï¼ˆãƒžãƒƒãƒã—ãŸæ®‹ã‚Šã«ãªã‚‹ï¼‰ã€‚str.empty? で空になったことをチェックできる
-    #regexp::Regexp : 期å¾
-するトークンにマッチする正規表現。 "\A" 出始める
-    #expected::String: 期å¾
-するトークン、regexp ãŒå‡ºç¾ã—ãªã‹ã£ãŸå ´åˆã«ã‚¨ãƒ©ãƒ¼ãƒ¡ãƒƒã‚»ãƒ¼ã‚¸ã¨ã—ã¦è¡¨ç¤º
+    #str::String : 破壊される（マッチした残りになる）。str.empty? で空になったことをチェックできる
+    #regexp::Regexp : 期待するトークンにマッチする正規表現。 "\A" 出始める
+    #expected::String: 期待するトークン、regexp が出現しなかった場合にエラーメッセージとして表示
     def optparse (str,regexp,expected)
       str.strip!
@@ -198 +180 @@
     ident_rexpr = /\A(\w[\w\d]*)/
 
-    # "Alloc.eAlloc=>CAlloc.eAlloc" の形式になっていることをチェック
+    # "Alloc.eAlloc=>CAlloc.eAlloc" の形式になっていることをチェック
     while true
       lhs_alloc_cell = optparse( opt, ident_rexpr, "allocator cell name" )
@@ -221 +203 @@
       break if ! rhs_alloc_ent
 
-#  ここでは、右辺のチェックはできない。右辺のセルは前方参ç
-§ã¨ãªã‚‹
+#  ここでは、右辺のチェックはできない。右辺のセルは前方参照となる
 #      path = [ "::", rhs_alloc_cell.to_sym ]   # mikan namespace
 #      obj = Namespace.find( path )
@@ -229 +210 @@
 #      else
 #        ct = obj.get_celltype
-#        if ct #  nil なら既にエラー
+#        if ct #  nil なら既にエラー
 #          ent = ct.find rhs_alloc_ent
 #          if ! ent.instance_of? Port || ent.get_port_type != :ENTRY || ent.get_signature == nil || ! ent.get_signature.is_allocator?
@@ -250 +231 @@
   end
 
-  #=== プラグイン引数 noServerChannelOpenerCode のチェック
+  #=== プラグイン引数 noServerChannelOpenerCode のチェック
   def set_noServerChannelOpenerCode( rhs )
     rhs = rhs.to_sym
@@ -262 +243 @@
   end
 
-  #=== プラグイン引数 clientSemaphoreCelltype のチェック
+  #=== プラグイン引数 clientSemaphoreCelltype のチェック
   def set_clientSemaphoreCelltype rhs
     @semaphoreCelltype = rhs.to_sym
@@ -272 +253 @@
   end
 
-  #=== プラグイン引数 clientSemaphoreInitializer のチェック
+  #=== プラグイン引数 clientSemaphoreInitializer のチェック
   def set_clientSemaphoreInitializer rhs
     @semaphoreInitializer = rhs.to_sym
   end
 
-  #=== プラグイン引数 clientErrorHandler のチェック
+  #=== プラグイン引数 clientErrorHandler のチェック
   def set_clientErrorHandler rhs
     @clientErrorHandler = rhs.to_sym
   end
 
-  #=== プラグイン引数 serverErrorHandler のチェック
+  #=== プラグイン引数 serverErrorHandler のチェック
   def set_serverErrorHandler rhs
     @serverErrorHandler = rhs.to_sym
@@ -288 +269 @@
 
 
-  #===  セルの名前を得る
-  # ThroughPlugin::get_cell_name plugin.rb をオーバーライド
+  #===  セルの名前を得る
+  # ThroughPlugin::get_cell_name plugin.rb をオーバーライド
   def get_cell_name
     @cell_name
@@ -295 +276 @@
   end
 
-  #=== marshaler のセルタイプ名を設定する
+  #=== marshaler のセルタイプ名を設定する
   def initialize_opaque_marshaler
 
-    # オプション設定される変数のデフォルトを設定
+    # オプション設定される変数のデフォルトを設定
     @taskPriority = 11
     @stackSize  = 4096
@@ -309 +290 @@
     @taskCelltype = :"tTask"
     @PPAllocatorSize = nil
-    # @TDRCelltype  = :"tTDR"   # "tNBOTDR" に変更の予定
+    # @TDRCelltype  = :"tTDR"   # "tNBOTDR" に変更の予定
     @TDRCelltype  = :"tNBOTDR"
     @substituteAllocator = {}
@@ -324 +305 @@
     @marshaler_celltype_file_name = "#{$gen}/#{@marshaler_celltype_name}.cdl"
 
-    # signature で対応できないものをチェック
+    # signature で対応できないものをチェック
     @signature.each_param{ |func_decl, param_decl|
       if param_decl.get_direction == :OUT then
@@ -337 +318 @@
   end
 
-  #=== GenOpaqueMarshaler# Opener Code の生成時のチェック
+  #=== GenOpaqueMarshaler# Opener Code の生成時のチェック
   def check_opener_code
-    # サーバーチャンネルセルタイプが entry sServerChannelOpener eOpener を持つかどうかをチェック
-    # mikan entry か (call でないか) をチェックしていない
+    # サーバーチャンネルセルタイプが entry sServerChannelOpener eOpener を持つかどうかをチェック
+    # mikan entry か (call でないか) をチェックしていない
     # scct = Namespace.find ["::", @serverChannelCelltype] # mikan namespace
     nsp = NamespacePath.analyze( @serverChannelCelltype.to_s )
@@ -360 +341 @@
   end
 
-  #=== GenOpaqueMarshaler# PPAllocator のå¿
-要性をチェックする
+  #=== GenOpaqueMarshaler# PPAllocator の必要性をチェックする
   def check_PPAllocator
     if @signature.need_PPAllocator?(true) then
@@ -374 +354 @@
   def gen_marshaler_celltype
     f = CFile.open( @marshaler_celltype_file_name, "w" )
-    # 同じå†
-容を二度書く可能性あり (AppFile は不可)
+    # 同じ内容を二度書く可能性あり (AppFile は不可)
 
     if @PPAllocatorSize then
@@ -404 +383 @@
   end
 
-  #===  å—ã‘å£é–¢æ•°ã®æœ¬ä½“ã‚³ãƒ¼ãƒ‰ã‚’ç”Ÿæˆï¼ˆé ­éƒ¨ã¨æœ«å°¾ã¯åˆ¥é€”å‡ºåŠ›ï¼‰
-  #ct_name:: Symbol    (through プラグインで生成された) セルタイプ名 ．Symbol として送られてくる（らしい）
+  #===  受け口関数の本体コードを生成（頭部と末尾は別途出力）
+  #ct_name:: Symbol    (through プラグインで生成された) セルタイプ名 ．Symbol として送られてくる（らしい）
   def gen_ep_func_body( file, b_singleton, ct_name, global_ct_name, sig_name, ep_name, func_name, func_global_name, func_type, params )
 
-    # unmarshaler クラスか?
+    # unmarshaler クラスか?
     if ct_name == @unmarshaler_celltype_name.to_sym then
       gen_ep_func_body_unmarshal( file, b_singleton, ct_name, global_ct_name, sig_name, ep_name, func_name, func_global_name, func_type, params )
@@ -416 +395 @@
   end
 
-  #===  marshal コードの生成
+  #===  marshal コードの生成
   def gen_ep_func_body_marshal( file, b_singleton, ct_name, global_ct_name, sig_name, ep_name, func_name, func_global_name, func_type, params )
 
@@ -422 +401 @@
     b_ret_er = false
 
-    # 関数の戻り値のå
-ƒã®åž‹ã‚’å¾—ã‚‹(typedef ã•ã‚Œã¦ã„ã‚‹å ´åˆ)
+    # 関数の戻り値の元の型を得る(typedef されている場合)
     type = func_type.get_type.get_original_type
 
-    # 戻り値記憶用の変数を出力（void 型の関数では出力しない）
+    # 戻り値記憶用の変数を出力（void 型の関数では出力しない）
     if ! type.is_void? then
       file.print( "\t#{func_type.get_type.get_type_str}\t\tretval_;\n" )
@@ -439 +417 @@
     file.print( "\tint16_t\tstate_;\n" )
 
-    # 関数 ID （整数値）
+    # 関数 ID （整数値）
     func_id = "FUNCID_#{@signature.get_global_name}_#{func_name}".upcase
     fid = @signature.get_id_from_func_name( func_name )
     file.print( "\tint16_t\tfunc_id_ = #{func_id};      /* (id of '#{func_name}') = #{fid}*/\n" )
 
-    # シングルトンでないか？
+    # シングルトンでないか？
     if ! b_singleton then
 
-      # singleton でなければ p_cellcb 取得コードを出力
+      # singleton でなければ p_cellcb 取得コードを出力
       file.print <<EOT
         #{ct_name}_CB *p_cellcb;
@@ -455 +433 @@
 EOT
 
-      # エラーを返すか？
+      # エラーを返すか？
       if b_ret_er then
         file.print <<EOT
@@ -465 +443 @@
         file.print <<EOT
         }else{
-                /* エラー処理コードをここに記述 */
+                /* エラー処理コードをここに記述 */
         }
 
@@ -481 +459 @@
     end
 
-    # channel lock コード
+    # channel lock コード
     file.print <<EOT
 
@@ -492 +470 @@
 EOT
 
-    # SOP を送信
-    file.print "        /* SOPの送出 */\n"
+    # SOP を送信
+    file.print "        /* SOPの送出 */\n"
     file.print "        SET_RPC_STATE( state_, RPCSTATE_CLIENT_SEND_SOP );\n"
     file.print "        if( ( ercd_ = cTDR_sendSOP( true ) ) != E_OK )\n"
     file.print "                goto error_reset;\n"
 
-    # func_id を送信
-    file.print "        /* 関数 id の送出 */\n"
+    # func_id を送信
+    file.print "        /* 関数 id の送出 */\n"
     file.print "        if( ( ercd_ = cTDR_putInt16( func_id_ ) ) != E_OK )\n"
     file.print "                goto error_reset;\n"
@@ -506 +484 @@
     # p "#{ct_name}, #{sig_name}, #{func_name}, #{func_global_name}"
 
-    b_get = false    # marshal なら put
+    b_get = false    # marshal なら put
     b_marshal = true  # marshal
 
-    # in 方向のå
-¥å‡ºåŠ›ã‚’出力
+    # in 方向の入出力を出力
     if func_type.has_inward? then
-      file.print "      /* å
-¥åŠ›å¼•æ•°é€å‡º */\n"
+      file.print "      /* 入力引数送出 */\n"
       file.print "      SET_RPC_STATE( state_, RPCSTATE_CLIENT_SEND_BODY );\n"
       print_params( params, file, 1, b_marshal, b_get, true, "eClientEntry", func_name )
@@ -525 +501 @@
       b_continue = "false"
     end
-    file.print "        /* EOPの送出（パケットの掃きだし） */\n"
+    file.print "        /* EOPの送出（パケットの掃きだし） */\n"
     file.print "        SET_RPC_STATE( state_, RPCSTATE_CLIENT_SEND_EOP );\n"
     file.print "        if( (ercd_=cTDR_sendEOP(#{b_continue})) != E_OK )\n"
     file.print "                goto error_reset;\n\n"
 
-    # send のメモリをデアロケート
+    # send のメモリをデアロケート
     if func_type.has_send? then
       file.print "      /* dealloc send parameter while executing */\n"
@@ -541 +517 @@
     if ! func_type.is_oneway? then
 
-      file.print "      /* パケットの始まりをチェック */\n"
+      file.print "      /* パケットの始まりをチェック */\n"
       file.print "      SET_RPC_STATE( state_, RPCSTATE_CLIENT_RECV_SOP );\n"
       file.print "      if( (ercd_=cTDR_receiveSOP( true )) != E_OK )\n"
       file.print "              goto error_reset;\n"
 
-      b_get = true     # marshaler は get
-      file.print "      /* 戻り値の受け取り */\n"
+      b_get = true     # marshaler は get
+      file.print "      /* 戻り値の受け取り */\n"
       print_param( "retval_", func_type.get_type, file, 1, :RETURN, nil, nil, b_marshal, b_get )
 
@@ -559 +535 @@
         indent = "      " * indent_level
 
-        file.print "#{indent}/* 出力値の受け取り */\n"
+        file.print "#{indent}/* 出力値の受け取り */\n"
         file.print "#{indent}SET_RPC_STATE( state_, RPCSTATE_CLIENT_RECV_BODY );\n"
         print_params( params, file, indent_level, b_marshal, b_get, true, "eClientEntry", func_name )
@@ -569 +545 @@
       end
 
-      file.print "\n    /* パケットの終わりをチェック */\n"
+      file.print "\n    /* パケットの終わりをチェック */\n"
       file.print "      SET_RPC_STATE( state_, RPCSTATE_CLIENT_RECV_EOP );\n"
       file.print "      if( (ercd_=cTDR_receiveEOP(false)) != E_OK )\n"  # b_continue = false
@@ -576 +552 @@
     end # ! func_type.is_oneway?
 
-    # channel lock コード
+    # channel lock コード
     file.print <<EOT
         /* Channel Unlock */
@@ -593 +569 @@
 
     if( b_void == false )then
-      # 呼びå
-ƒã«æˆ»ã‚Šå€¤ã‚’リターン
+      # 呼び元に戻り値をリターン
       file.print( "     return retval_;\n" )
     else
@@ -604 +579 @@
 error_reset:
 EOT
-    # send のメモリをデアロケート
+    # send のメモリをデアロケート
     if func_type.has_send? then
       file.print "      /* dealloc send parameter */\n"
@@ -613 +588 @@
     end
 
-    # receive のメモリをデアロケート
+    # receive のメモリをデアロケート
     if func_type.has_receive? then
       file.print( "     /* receive parameter */\n" )
@@ -625 +600 @@
 EOT
 
-    # channel lock コード
+    # channel lock コード
     file.print <<EOT
         /* Channel Unlock */
@@ -636 +611 @@
 
     if( b_ret_er != false )then
-      # 呼びå
-ƒã«æˆ»ã‚Šå€¤ã‚’リターン
+      # 呼び元に戻り値をリターン
       file.print( "     return ERCD( E_RPC, MERCD( ercd_ ) );\n" )
     else
@@ -645 +619 @@
   end
 
-  #===  unmarshal コードの生成
+  #===  unmarshal コードの生成
   def gen_ep_func_body_unmarshal( file, b_singleton, ct_name, global_ct_name, sig_name, ep_name, func_name, func_global_name, func_type, params )
 
     b_ret_er = true
 
-    # func_id を得るコードを生成
+    # func_id を得るコードを生成
     file.print <<EOT
 
@@ -672 +646 @@
         file.print <<EOT
         }else{
-                /* エラー処理コードをここに記述 */
+                /* エラー処理コードをここに記述 */
         }
 EOT
@@ -683 +657 @@
 #endif
 
-        /* SOPのチェック */
+        /* SOPのチェック */
         SET_RPC_STATE( state_, RPCSTATE_SERVER_RECV_SOP );
         if( (ercd_=cTDR_receiveSOP( false )) != E_OK )
                 goto error_reset;
-        /* func_id の取得 */
+        /* func_id の取得 */
         if( (ercd_=cTDR_getInt16( &func_id_ )) != E_OK )
                 goto error_reset;
@@ -697 +671 @@
 EOT
 
-    # signature に含まれる すべての関数について
+    # signature に含まれる すべての関数について
     @signature.get_function_head_array.each { |f|
       f_name = f.get_name
@@ -711 +685 @@
 
     if @PPAllocatorSize then
-      ppallocator_dealloc_str = "       /* PPAllocator のすべてを解放 */\n       cPPAllocator_dealloc_all();"
+      ppallocator_dealloc_str = "       /* PPAllocator のすべてを解放 */\n     cPPAllocator_dealloc_all();"
     else
       ppallocator_dealloc_str = ""
@@ -734 +708 @@
   end
 
-  #=== PREAMBLE 部のコード生成
-  # ã‚¢ãƒ³ãƒžãƒ¼ã‚·ãƒ£ãƒ©ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®å ´åˆã€ã‚¢ãƒ³ãƒžãƒ¼ã‚·ãƒ£ãƒ©é–¢æ•°ã®ãƒ—ãƒ­ãƒˆã‚¿ã‚¤ãƒ—å®£è¨€ã‚’ç”Ÿæˆ
+  #=== PREAMBLE 部のコード生成
+  # アンマーシャラセルタイプの場合、アンマーシャラ関数のプロトタイプ宣言を生成
   def gen_preamble file, b_singleton, ct_name, global_name
     if ct_name != @unmarshaler_celltype_name.to_sym then
@@ -741 +715 @@
     end
 
-    # string.h の include (memset, strlen のため)
+    # string.h の include (memset, strlen のため)
     file.print "/* header file (strlen, memset) */\n"
     file.print "#include\t<string.h>\n\n"
 
-    file.print "/* アンマーシャラ関数のプロトタイプ宣言 */\n"
-    # signature に含まれる すべての関数について
+    file.print "/* アンマーシャラ関数のプロトタイプ宣言 */\n"
+    # signature に含まれる すべての関数について
     @signature.get_function_head_array.each { |f|
       f_name = f.get_name
@@ -756 +730 @@
   end
 
-  #=== POSTAMBLE 部のコード生成
-  # ã‚¢ãƒ³ãƒžãƒ¼ã‚·ãƒ£ãƒ©ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®å ´åˆã€å€‹ã€
-のアンマーシャラ関数の生成
+  #=== POSTAMBLE 部のコード生成
+  # アンマーシャラセルタイプの場合、個々のアンマーシャラ関数の生成
   def gen_postamble file, b_singleton, ct_name, global_name
     if ct_name != @unmarshaler_celltype_name.to_sym then
@@ -764 +737 @@
     end
 
-    file.print "\n/*** アンマーシャラ関数 ***/\n\n"
+    file.print "\n/*** アンマーシャラ関数 ***/\n\n"
     @signature.get_function_head_array.each { |f|
       f_name = f.get_name
@@ -770 +743 @@
       id = @signature.get_id_from_func_name( f_name )
 
-      # 関数は返り値を持つか?
+      # 関数は返り値を持つか?
       b_ret_er = false
       init_retval = ""
@@ -794 +767 @@
       file.print "      ER      ercd_;\n"
 
-      # 引数を受取る変数の定義
+      # 引数を受取る変数の定義
       params = f.get_declarator.get_type.get_paramlist.get_items
            # FuncHead->  Decl->    FuncType->ParamList
@@ -803 +776 @@
         dir = par.get_direction
         if( dir == :RECEIVE )then
-          # type は PtrType で、それを取り除いた型
+          # type は PtrType で、それを取り除いた型
           type = type.get_type
         end
@@ -821 +794 @@
         end
 
-        type_str = type.get_type_str.gsub( /\bconst\b */, "" ) # "const" を外す
+        type_str = type.get_type_str.gsub( /\bconst\b */, "" ) # "const" を外す
         file.printf( "  %-12s %s%s%s%s%s;\n", type_str, aster, name, aster2, type.get_type_str_post, init )
 
@@ -833 +806 @@
       end
 
-      # in 方向のå
-¥å‡ºåŠ›ã‚’å
-¥åŠ›
-      file.print "\n    /* å
-¥åŠ›å¼•æ•°å—取 */\n"
+      # in 方向の入出力を入力
+      file.print "\n    /* 入力引数受取 */\n"
       file.print "      SET_RPC_STATE( *state_, RPCSTATE_SERVER_RECV_BODY );\n"
-      b_get = true    # unmarshal では get
+      b_get = true    # unmarshal では get
       b_marshal  = false
       print_params( params, file, 1, b_marshal, b_get, true, "cServerCall", f_name )
@@ -846 +816 @@
 
 
-      # パケットの受信完了
-      file.print "      /* パケット終わりをチェック */\n"
+      # パケットの受信完了
+      file.print "      /* パケット終わりをチェック */\n"
       file.print "      SET_RPC_STATE( *state_, RPCSTATE_SERVER_RECV_EOP );\n"
       if ! f_type.is_oneway? then
@@ -857 +827 @@
       file.print "              goto error_reset;\n\n"
 
-      # out のメモリをアロケート
+      # out のメモリをアロケート
       dir = :OUT; alloc_cp = "cPPAllocator_alloc"; alloc_cp_extra = nil; nest = 1
       alloc_for_out_params( params, file, nest, dir, alloc_cp, alloc_cp_extra )
 
-      # 対象関数を呼出す
-      file.print "      /* 対象関数の呼出し */\n"
+      # 対象関数を呼出す
+      file.print "      /* 対象関数の呼出し */\n"
       file.print "      SET_RPC_STATE( *state_, RPCSTATE_SERVER_EXEC );\n"
       if b_void then
@@ -881 +851 @@
       file.print( " );\n" )
 
-      # 戻り値、出力引数の受取コードの生成
-
-      # oneway ã®å ´åˆå‡ºåŠ›ã€æˆ»ã‚Šå€¤ãŒç„¡ãã€å—å–ã‚’å¾
-たない（非同期な呼出し）
+      # 戻り値、出力引数の受取コードの生成
+
+      # oneway の場合出力、戻り値が無く、受取を待たない（非同期な呼出し）
       if ! f.is_oneway? then
 
-        file.print "\n  /* SOPの送出 */\n"
+        file.print "\n  /* SOPの送出 */\n"
         file.print "    SET_RPC_STATE( *state_, RPCSTATE_SERVER_SEND_SOP );\n"
 
@@ -893 +862 @@
         file.print "            goto error_reset;\n"
 
-        b_get = false     # unmarshaler は put
+        b_get = false     # unmarshaler は put
         if( ! b_void )then
-          file.print "  /* 戻り値の送出 */\n"
+          file.print "  /* 戻り値の送出 */\n"
           print_param( "retval_", f_type.get_type, file, 1, :RETURN, nil, nil, b_marshal, b_get )
         end
@@ -908 +877 @@
           indent = "    " * indent_level
 
-          file.print "#{indent}/* 出力値の送出 */\n"
+          file.print "#{indent}/* 出力値の送出 */\n"
           file.print "#{indent}SET_RPC_STATE( *state_, RPCSTATE_SERVER_SEND_BODY );\n"
           print_params( params, file, indent_level, b_marshal, b_get, true, "cServerCall", f_name )
           print_params( params, file, indent_level, b_marshal, b_get, false, "cServerCall", f_name )
 
-          # receive のメモリをデアロケート
+          # receive のメモリをデアロケート
           if f_type.has_receive? then
             file.print "#{indent}/* dealloc receive parameter */\n"
@@ -925 +894 @@
         end
 
-        file.print "    /* パケットの終わり（掃きだし） */\n"
+        file.print "    /* パケットの終わり（掃きだし） */\n"
         file.print "    SET_RPC_STATE( *state_, RPCSTATE_SERVER_SEND_EOP );\n"
         file.print "    if( (ercd_=cTDR_sendEOP(false)) != E_OK )\n"  # b_continue = false
@@ -936 +905 @@
 error_reset:
 EOT
-      # send のリセット用デアロケート
+      # send のリセット用デアロケート
       if f_type.has_send? then
         file.print "    /* dealloc send parameter */\n"
@@ -945 +914 @@
       end
 
-      # receive のメモリをデアロケート
+      # receive のメモリをデアロケート
       if f_type.has_receive? && b_ret_er then
         file.print "    /* dealloc receive parameter */\n"
@@ -957 +926 @@
       file.print "}\n\n"
 
-      # ここ（個ã€
-の関数）ではエラーハンドラーは呼び出さない。呼びå
-ƒï¼ˆã‚µãƒ¼ãƒãƒ¼ã®ãƒ¡ã‚¤ãƒ³é–¢æ•°ï¼‰ã§å‘¼ã³å‡ºã™ã€‚
+      # ここ（個々の関数）ではエラーハンドラーは呼び出さない。呼び元（サーバーのメイン関数）で呼び出す。
     }
   end
@@ -966 +933 @@
   #b_marshal:: bool
   #b_get:: bool
-  #  b_marshal = true  && b_get == false   :  マーシャラでå
-¥åŠ›å¼•æ•°é€å‡º
-  #  b_marshal = true  && b_get == true    :  マーシャラで出力引数受取
-  #  b_marshal = false && b_get == false   :  アンマーシャラでå
-¥åŠ›å¼•æ•°å—取
-  #  b_marshal = false && b_get == true    :  アンマーシャラで出力引数送出
-  #b_referenced:: size_is, count_is, string で参ç
-§ã•ã‚Œã¦ã„るものを出力
+  #  b_marshal = true  && b_get == false   :  マーシャラで入力引数送出
+  #  b_marshal = true  && b_get == true    :  マーシャラで出力引数受取
+  #  b_marshal = false && b_get == false   :  アンマーシャラで入力引数受取
+  #  b_marshal = false && b_get == true    :  アンマーシャラで出力引数送出
+  #b_referenced:: size_is, count_is, string で参照されているものを出力
   def print_params( params, file, nest, b_marshal, b_get, b_referenced, port_name, func_name )
     params.each{ |param|
@@ -996 +960 @@
         case dir
         when :OUT, :INOUT
-          alloc_cp = nil        # inout の b_get==true&&b_marsha==true のときアロケータコードは不用
+          alloc_cp = nil        # inout の b_get==true&&b_marsha==true のときアロケータコードは不用
           alloc_cp_extra = nil
           print_param( param.get_name, param.get_type, file, nest, dir, nil, nil, b_marshal, b_get, alloc_cp, alloc_cp_extra )
@@ -1003 +967 @@
           alloc_cp_extra = nil
           if b_get then
-            outer = "(*"         # マーシャラ側では、ポインタが (send と比べ) 一つ多い
+            outer = "(*"         # マーシャラ側では、ポインタが (send と比べ) 一つ多い
             outer2 = ")"
           else
-            outer = nil          # アンマーシャラ側では、ポインタが一つ外されている
+            outer = nil          # アンマーシャラ側では、ポインタが一つ外されている
             outer2 = nil
           end
@@ -1016 +980 @@
   end
 
-  #=== アロケータコードを生成 (out のアンマーシャラ用)
+  #=== アロケータコードを生成 (out のアンマーシャラ用)
   def alloc_for_out_params( params, file, nest, dir, alloc_cp, alloc_cp_extra )
     params.each{ |param|
@@ -1026 +990 @@
   end
 
-  #=== アロケータコードを生成 (out のアンマーシャラ用個別パラメータの生成)
+  #=== アロケータコードを生成 (out のアンマーシャラ用個別パラメータの生成)
   def alloc_for_out_param( name, type, file, nest, outer, outer2, alloc_cp, alloc_cp_extra )
     org_type = type.get_original_type
@@ -1039 +1003 @@
       count = type.get_count; size = type.get_size; string = type.get_string
       if count || size || string then
-        loop_counter_type = IntType.new(16)   # mikan 方を size_is, count_is の引数の型とする
+        loop_counter_type = IntType.new(16)   # mikan 方を size_is, count_is の引数の型とする
         if count then
           len = type.get_count.to_s
@@ -1052 +1016 @@
         end
 
-        # size_is に max æŒ‡å®šãŒã‚ã‚‹å ´åˆã€length が max をè¶
-えているかチェックするコードを生成
+        # size_is に max 指定がある場合、length が max を超えているかチェックするコードを生成
         if org_type.get_max != nil && string == nil then
           file.print "#{indent}if( #{len} > #{type.get_max} ){\t/* GenOpaqueMarshaler max check 2 */\n"
@@ -1092 +1055 @@
   end
 
-  #=== 引数の一括デアロケートコードの生成
-  # send：マーシャラの最後、receive：アンマーシャラの最後で一括して引数をデアロケートする
+  #=== 引数の一括デアロケートコードの生成
+  # send：マーシャラの最後、receive：アンマーシャラの最後で一括して引数をデアロケートする
   def dealloc_for_params( params, file, nest, dir, dealloc_cp, b_reset = false )
     if b_reset then
@@ -1107 +1070 @@
         aster = ""
         if dir == :RECEIVE then
-          type = type.get_type.get_original_type   # ポインタを一つ外す
+          type = type.get_type.get_original_type   # ポインタを一つ外す
           if b_reset then
             aster = "*"
@@ -1128 +1091 @@
   end
 
-  #== out で nullable な引数のæƒ
-å ±ã‚’æ¸¡ã™
-  # out nullable ã®å ´åˆã€in, send, receive のように、値を渡す直前ではなく、呼出し時に渡す
+  #== out で nullable な引数の情報を渡す
+  # out nullable の場合、in, send, receive のように、値を渡す直前ではなく、呼出し時に渡す
   def  print_out_nullable( params, file, nest, b_marshal );
     indent = "\t" * nest
@@ -1140 +1102 @@
         file.print "#{indent}\tgoto error_reset;\n"
       else
-        # 呼びå
-ˆã¯ alloc_for_out_param で nullable の対応する
+        # 呼び先は alloc_for_out_param で nullable の対応する
         file.print "#{indent}if( (ercd_=cTDR_getInt8( &b_#{param.get_name}_null_)) != E_OK )\n"
         file.print "#{indent}\tgoto error_reset;\n"