Changeset 389 for azure_iot_hub/trunk/asp3_dcre/tecsgen/tecslib/plugin/HRPPlugin.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/HRPPlugin.rb (modified) (18 diffs, 1 prop)

azure_iot_hub/trunk/asp3_dcre/tecsgen/tecslib/plugin/HRPPlugin.rb

@@ -6 +6 @@
 #   Copyright (C) 2014-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$
@@ -56 +41 @@
 require_tecsgen_lib "HRPKernelObjectManager.rb"
 #
-# 各メソッドの役割りは、DomainPlugin.rb を参ç
-§ã®ã“と
-# HRPカーネル用ドメインプラグイン
+# 各メソッドの役割りは、DomainPlugin.rb を参照のこと
+# HRPカーネル用ドメインプラグイン
 class HRPPlugin < DomainPlugin
   
@@ -72 +56 @@
     else
       cdl_error( "HRPPlugin: '$1' is unacceptable domain kind, specify 'kernel' or 'user'", option )
-      @option = "kernel"   # とりあえず kernel を設定しておく
+      @option = "kernel"   # とりあえず kernel を設定しておく
     end
   end
 
   def add_through_plugin( join, current_region, next_region, through_type )
-    # join.get_owner:Cell  左辺のセル
-    # join.get_definition:Port 呼び口
-    # join.get_subscript:Integer or nil 呼び口é
-åˆ—の添数 (Join::@subscript の説明参ç
-§)
-    # join.get_cell:Cell 右辺のセル
-    # join.get_port_name:Symbol 受け口
-    # get_rhs_subscript:Integer or nil 受け口é
-åˆ—の添数 (Join::@rhs_subscript の説明参ç
-§)
+    # join.get_owner:Cell  左辺のセル
+    # join.get_definition:Port 呼び口
+    # join.get_subscript:Integer or nil 呼び口配列の添数 (Join::@subscript の説明参照)
+    # join.get_cell:Cell 右辺のセル
+    # join.get_port_name:Symbol 受け口
+    # get_rhs_subscript:Integer or nil 受け口配列の添数 (Join::@rhs_subscript の説明参照)
     # return []
     dbgPrint "MyDomainPlugin: add_through_plugin: #{current_region.get_name}=>#{next_region.get_name}, #{join.get_owner.get_name}.#{join.get_definition.get_name}=>#{join.get_cell.get_name}.#{join.get_port_name}, #{through_type}\n"
@@ -110 +90 @@
                                                  get_real_celltype(join.get_rhs_port1).
                                                  get_global_name)                #oyama: get_name => get_global_name 
-        # 結合å
-ˆãŒã‚«ãƒ¼ãƒãƒ«ã‚ªãƒ–ジェクトセル
+        # 結合先がカーネルオブジェクトセル
         # @plugin_body = HRP2SVCPlugin.new(cell_name, plugin_arg, next_cell, next_cell_port_name, signature, celltype, caller_cell)
-        # 何もしないthrough
+        # 何もしないthrough
         # puts "***** #{join.get_cell.get_celltype.get_name} is kernel object"
         return []
@@ -121 +100 @@
     # elsif next_domain.nil?
     elsif next_domain.get_option.to_s == "OutOfDomain"
-    #     # 結合å
-ˆãŒç„¡æ‰€å±ž
-    #     # 何もしないthrough
+    #     # 結合先が無所属
+    #     # 何もしないthrough
     #     # @plugin_body = HRP2SVCPlugin.new(cell_name, plugin_arg, next_cell, next_cell_port_name, signature, celltype, caller_cell)
         # puts "***** nil"
@@ -129 +107 @@
     #elsif @start_region.get_param != :KERNEL_DOMAIN && @end_region.get_param == :KERNEL_DOMAIN
     elsif current_domain.get_option.to_s != "kernel" && next_domain.get_option.to_s == "kernel"
-        # ユーザドメインからカーネルドメインへの結合
+        # ユーザドメインからカーネルドメインへの結合
         # @plugin_body = HRP2SVCPlugin.new(cell_name, plugin_arg, next_cell, next_cell_port_name, signature, celltype, caller_cell)
         # puts "***** svc"
         return [ :HRPSVCPlugin, "" ]
     elsif current_domain != next_domain
-        # 別のユーザドメインへの結合
+        # 別のユーザドメインへの結合
         # @plugin_body = HRP2RPCPlugin.new(cell_name, plugin_arg, next_cell, next_cell_port_name, signature, celltype, caller_cell)
         # puts "***** rpc"
@@ -141 +119 @@
         return [ :HRPRPCPlugin, "noClientSemaphore=false,PPAllocatorSize=256" ]
     else
-        # その他
-        # 何もしないthrough
+        # その他
+        # 何もしないthrough
         # @plugin_body = HRP2SVCPlugin.new(cell_name, plugin_arg, next_cell, next_cell_port_name, signature, celltype, caller_cell)
         dbgPrint "warning: at HRP Join Check"
@@ -156 +134 @@
   end
 
-  #== ドメイン種別を返す
+  #== ドメイン種別を返す
   #return::Symbol :kernel, :user, :OutOfDomain
   def get_kind
@@ -165 +143 @@
   end
 
-  # ATT_MODを生成済みかどうか                   # 2017.8.27
+  # ATT_MODを生成済みかどうか                   # 2017.8.27
   @@generate_memory_module = false
 
-  @@include_extsvc_fncd = false  # 17.07.26 暫定
+  @@include_extsvc_fncd = false  # 17.07.26 暫定
   # 
-  #  ATT_MODの生成
-  #  gen_factory実行時には，すべてのセルタイププラグインを生成済みのはずなので，
-  #  カーネルAPIコードのメモリ保護を省略できる．
+  #  ATT_MODの生成
+  #  gen_factory実行時には，すべてのセルタイププラグインを生成済みのはずなので，
+  #  カーネルAPIコードのメモリ保護を省略できる．
   #
   def gen_factory
@@ -187 +165 @@
     if @@generate_memory_module == false
 
-      # INCLUDE を出力
-      #  すべてのドメインに対する cfg をå
-ˆã«ç”Ÿæˆã—ておく
-      #  ã‚‚ã—ã€ãƒ‰ãƒ¡ã‚¤ãƒ³ã«å±žã™ã‚‹ã‚«ãƒ¼ãƒãƒ«ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆã‚‚ã€ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚‚ãªã„å ´åˆã§ã‚‚ã€cfg が出力される
+      # INCLUDE を出力
+      #  すべてのドメインに対する cfg を先に生成しておく
+      #  もし、ドメインに属するカーネルオブジェクトも、モジュールもない場合でも、cfg が出力される
       regions = DomainType.get_domain_regions[ :HRP ]
       file = AppFile.open( "#{$gen}/tecsgen.cfg" )
@@ -219 +196 @@
 
       # 
-      #  ATT_MODの生成
+      #  ATT_MODの生成
       #
       Cell.get_cell_list2.each { |cell|
-        # すべてのセルを走査してセルタイプをチェック
+        # すべてのセルを走査してセルタイプをチェック
         ct = cell.get_celltype
         if ct.class == Celltype && check_celltype_list.include?( ct ) == false
-          # チェック済みセルタイプに登録
+          # チェック済みセルタイプに登録
           check_celltype_list << ct
 
-          # æœªãƒã‚§ãƒƒã‚¯ã®ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã ã£ãŸå ´åˆ
+          # 未チェックのセルタイプだった場合
           # puts "check for ATT_MOD : #{ct.classget_global_name}"
           # puts "check for ATT_MOD : #{ct.get_global_name}"
 
-          # カーネルAPIのコード，データはメモリ保護しない # HRP3 oyama delete by Takada's request
+          # カーネルAPIのコード，データはメモリ保護しない # HRP3 oyama delete by Takada's request
           # next if HRPKernelObjectManager.include_celltype?( ct.get_name )
 
-          # å¿
-要のないセルタイプのコード，データはメモリ保護しない
+          # 必要のないセルタイプのコード，データはメモリ保護しない
           next if ! ct.need_generate?
 
-          # HRPのドメインリージョンを取得
+          # HRPのドメインリージョンを取得
           regions = ct.get_domain_roots
           regions_hrp = regions[ :HRP ]
@@ -248 +224 @@
           # puts ""
 
-          # セル管理ブロックとスケルトンのメモリ保護
-          # gen_celltype_names_domain 相当の処理
+          # セル管理ブロックとスケルトンのメモリ保護
+          # gen_celltype_names_domain 相当の処理
           if regions_hrp.include?( Region.get_root ) == false && regions_hrp.length > 1
-            # ドメインが複数で，OutOfDomainã«ã‚»ãƒ«ãŒå­˜åœ¨ã—ãªã„ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®å ´åˆ
-            # å
-±æœ‰ã®ã‚»ãƒ«ç®¡ç†ãƒ–ロックとスケルトンコードを登録する
+            # ドメインが複数で，OutOfDomainにセルが存在しないセルタイプの場合
+            # 共有のセル管理ブロックとスケルトンコードを登録する
             file = AppFile.open( "#{$gen}/tecsgen.cfg" )
             file.printf "%-60s/* HRPPlugin 003 */\n", "ATT_MOD(\"#{ct.get_global_name}_tecsgen.o\");"
@@ -270 +245 @@
           }
 
-          # ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã‚³ãƒ¼ãƒ‰ãŒãªã„å ´åˆã¯ã‚¹ã‚­ãƒƒãƒ—
+          # セルタイプコードがない場合はスキップ
           next if ct.is_all_entry_inline? && ! ct.is_active?
 
-          # セルタイプコードのメモリ保護
-          # gen_celltype_names_domain2 相当の処理
+          # セルタイプコードのメモリ保護
+          # gen_celltype_names_domain2 相当の処理
           if regions_hrp.include?( Region.get_root ) == true || regions_hrp.length > 1
-            # OutOfDomainã«ã‚»ãƒ«ãŒå­˜åœ¨ã™ã‚‹ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®å ´åˆ
-            # ã¾ãŸã¯ï¼Œè¤‡æ•°ã®ãƒ‰ãƒ¡ã‚¤ãƒ³ã«ã‚»ãƒ«ãŒå­˜åœ¨ã™ã‚‹ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®å ´åˆ
-            # セルタイプコードをå
-±æœ‰ã™ã‚‹ã‚ˆã†ã«ç™»éŒ²ã™ã‚‹
+            # OutOfDomainにセルが存在するセルタイプの場合
+            # または，複数のドメインにセルが存在するセルタイプの場合
+            # セルタイプコードを共有するように登録する
             file = AppFile.open( "#{$gen}/tecsgen.cfg" )
           else
-            # OutOfDomainã§ãªã„å˜ä¸€ã®ãƒ‰ãƒ¡ã‚¤ãƒ³ã«ã‚»ãƒ«ãŒå­˜åœ¨ã™ã‚‹ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®å ´åˆ
-            # セルタイプコードを専有するように登録する
+            # OutOfDomainでない単一のドメインにセルが存在するセルタイプの場合
+            # セルタイプコードを専有するように登録する
             file = AppFile.open( "#{$gen}/tecsgen_#{regions_hrp[0].get_global_name}.cfg" )
           end
@@ -290 +264 @@
           file.close
         else
-          # 何もしない
+          # 何もしない
         end
       }
@@ -296 +270 @@
       @@generate_memory_module = true
     else
-      # 何もしない
+      # 何もしない
     end
   end
@@ -309 +283 @@
       @@inter_domain_join_set[ rhs_cell ] = []
     end
-    # 左辺のドメインルートを記録
+    # 左辺のドメインルートを記録
     @@inter_domain_join_set[ rhs_cell ] << join
   end
@@ -339 +313 @@
     cell_domain_root = cell.get_region.get_domain_root
     if cell_domain_root.get_domain_type.get_kind != :OutOfDomain then
-      domain_roots << cell.get_region.get_domain_root  # 結合å
-ˆã®ãƒ‰ãƒ¡ã‚¤ãƒ³ã‚‚含める
+      domain_roots << cell.get_region.get_domain_root  # 結合先のドメインも含める
     end
     domain_roots.each{ |dr|
@@ -364 +337 @@
     }
     if acv == "" then
-      # 呼びå
-ˆã‚»ãƒ«ãŒç„¡æ‰€å±žã‹ã¤ã€å‘¼ã³å
-ƒã‚‚ç„¡æ‰€å±žã®ã¿ã€ã¾ãŸã¯çµåˆç„¡ã—ã®å ´åˆ
+      # 呼び先セルが無所属かつ、呼び元も無所属のみ、または結合無しの場合
       acv = "TACP_SHARED"
     end