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

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

@@ -6 +6 @@
 #   Copyright (C) 2008-2014 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$
@@ -55 +40 @@
 #= ParamCopy
 #
-# パラメータコピーするマーシャラ／アンマーシャラコードを生成するメソッド print_param を提供する．
-# RPCPlugin, OpaqueRPCPlugin に include される．
-# RPCPlugin (トランスペアレント) では、oneway 関数で in ã®ãƒã‚¤ãƒ³ã‚¿å¼•æ•°ã®å ´åˆã«é™ã£ã¦ print_param が用いられる．
+# パラメータコピーするマーシャラ／アンマーシャラコードを生成するメソッド print_param を提供する．
+# RPCPlugin, OpaqueRPCPlugin に include される．
+# RPCPlugin (トランスペアレント) では、oneway 関数で in のポインタ引数の場合に限って print_param が用いられる．
 #
 module  GenParamCopy
 
-  #=== 引数の転送コードを生成
+  #=== 引数の転送コードを生成
 
   def print_param( name, type, file, nest, dir, outer, outer2, b_marshal, b_get, alloc_cp = nil, alloc_cp_extra = nil, name_list = nil )
@@ -76 +61 @@
 EOT
         if ( dir == :SEND || dir == :RECEIVE ) && type.get_type.has_pointer? then
-          # send, receive ã®å ´åˆã¯ã€ã‚¨ãƒ©ãƒ¼ãƒªã‚»ãƒƒãƒˆã«å‚™ãˆ NULL にする
+          # send, receive の場合は、エラーリセットに備え NULL にする
           file.print <<EOT
 #{indent}memset( (void *)#{outer}#{name}#{outer2}#{alloc_cp_extra}, 0, sizeof(#{type.get_type.get_type_str}#{type.get_type.get_type_str_post})*(#{size_str});   /* GenParamCopy Alloc1 */
@@ -103 +88 @@
         when :SIGNED
           if bit_size == -1 || bit_size == -11 then
-            sign = "S"   # signed char ã®å ´åˆã®ã¿ S がつく
+            sign = "S"   # signed char の場合のみ S がつく
           else
             sign = ""
@@ -156 +141 @@
         nest = print_nullable_pre( name, type, file, nest, dir, outer, outer2, b_marshal, b_get )
         indent = "\t" * nest
-        loop_counter_type = IntType.new(32)   # mikan 型を size_is, count_is の引数の型とする
+        loop_counter_type = IntType.new(32)   # mikan 型を size_is, count_is の引数の型とする
         file.print "#{indent}{\t/* GenParamCopy 4 */\n"
         file.print "#{indent}   #{loop_counter_type.get_type_str}  i__#{nest}, length__#{nest};\n"
@@ -168 +153 @@
             count_str = count.to_str( name_list, outer, outer2 )
           else
-            # size_is はå¿
-é ˆ. count_is はオプション
+            # size_is は必須. count_is はオプション
             count_str = size_str
           end
           file.print "#{indent} length__#{nest} = #{count_str};\t/* GenParamCopy 5 */\n"
 
-          # size_is に max æŒ‡å®šãŒã‚ã‚‹å ´åˆã€length が max をè¶
-えているかチェックするコードを生成
-              # alloc_cp == nil のとき dir は INOUT, OUT のはず (条件が冗長)。試験が終わっているので、次回見直し時に外す
+          # size_is に max 指定がある場合、length が max を超えているかチェックするコードを生成
+              # alloc_cp == nil のとき dir は INOUT, OUT のはず (条件が冗長)。試験が終わっているので、次回見直し時に外す
           if b_get && type.get_max != nil && ! ( ( dir == :INOUT || dir == :OUT ) && alloc_cp == nil ) then
             file.print "#{indent}       if( length__#{nest} > #{type.get_max.to_s} ){\t/* GenParamCopy max check 1 */\n"
@@ -202 +185 @@
               file.print "#{indent}     length__#{nest} = STRLEN#{b_size}(#{outer}#{name}#{outer2})+1;\t/* GenParamCopy 7 */\n"
             end
-            size_str = "length__#{nest}"     # string ã®å ´åˆã€strnlen ä»¥ä¸Šã®é ˜åŸŸã‚’ç¢ºä¿ã—ãªã„
+            size_str = "length__#{nest}"     # string の場合、strnlen 以上の領域を確保しない
           else
             if ( dir == :INOUT ) then
               if ( string.instance_of? Expression ) then
                 len = string.to_str( name_list, outer, outer2 )
-                size_str = "#{len}"              # string(len) ã®å ´åˆ len を確保する
+                size_str = "#{len}"              # string(len) の場合 len を確保する
               else
                 raise "unsuscripted string used for inout parameter #{name}"
               end
             else
-              size_str = "length__#{nest}"     # string ã®å ´åˆã€strnlen ä»¥ä¸Šã®é ˜åŸŸã‚’ç¢ºä¿ã—ãªã„
+              size_str = "length__#{nest}"     # string の場合、strnlen 以上の領域を確保しない
             end
           end
@@ -224 +207 @@
 EOT
           if ( dir == :SEND || dir == :RECEIVE ) && type.get_type.has_pointer? then
-            # send, receive ã®å ´åˆã¯ã€ã‚¨ãƒ©ãƒ¼ãƒªã‚»ãƒƒãƒˆã«å‚™ãˆ NULL にする
+            # send, receive の場合は、エラーリセットに備え NULL にする
             file.print <<EOT
 #{indent}       memset( (void *)#{outer}#{name}#{outer2}#{alloc_cp_extra}, 0, sizeof(#{type.get_type.get_type_str}#{type.get_type.get_type_str_post})*(#{size_str}) );   /* GenParamCopy Alloc2 */
@@ -251 +234 @@
 EOT
           if ( dir == :SEND || dir == :RECEIVE ) && type.get_type.has_pointer? then
-            # send, receive ã®å ´åˆã¯ã€ã‚¨ãƒ©ãƒ¼ãƒªã‚»ãƒƒãƒˆã«å‚™ãˆ NULL にする
+            # send, receive の場合は、エラーリセットに備え NULL にする
             file.print <<EOT
 #{indent}memset( (void *)#{outer}#{name}#{outer2}#{alloc_cp_extra}, 0, sizeof(#{type.get_type.get_type_str}#{type.get_type.get_type_str_post}) );   /* GenParamCopy Alloc3 */
@@ -286 +269 @@
         size_str = subsc.to_str( name_list, outer, outer2 )
 
-        loop_counter_type = IntType.new(32)   # mikan 型を size_is, count_is の引数の型とする
+        loop_counter_type = IntType.new(32)   # mikan 型を size_is, count_is の引数の型とする
         file.print "#{indent}{\t/* GenParamCopy 11 */\n"
         file.print "#{indent}   #{loop_counter_type.get_type_str}  i__#{nest}, length__#{nest} = #{size_str};\n"
@@ -302 +285 @@
     if type.is_nullable? then
       indent = "        " * nest
-      if dir == :OUT then  # OUT ã®å ´åˆ print_out_nullable で NULL かどうかのæƒ
-å ±ã‚’æ¸¡ã™
+      if dir == :OUT then  # OUT の場合 print_out_nullable で NULL かどうかの情報を渡す
         # 'null or not' is sent in the function 'print_out_nullable'
         if b_get then
@@ -321 +303 @@
 #{indent}       if( ! b_null_ ){
 EOT
-          else # dir = :INOUT, b_marshal = true, b_get = true ã®å ´åˆã€NULL かどうかのæƒ
-å ±ã‚’æ¸¡ã•ãªã„
+          else # dir = :INOUT, b_marshal = true, b_get = true の場合、NULL かどうかの情報を渡さない
             file.print <<EOT
 #{indent}       int8_t  b_null_ = (#{outer}#{name}#{outer2} == NULL);\t/* GenParamCopy Null 21 */
@@ -335 +316 @@
 
           if ! ( dir == :INOUT && b_marshal == false ) then
-            # dir = :INOUT, b_marshal = false, b_get = false ã®å ´åˆ
+            # dir = :INOUT, b_marshal = false, b_get = false の場合
             file.print <<EOT
 #{indent}       if((ercd_=cTDR_putInt8( b_null_ )) != E_OK )\t/* GenParamCopy Null 32 */
@@ -355 +336 @@
   def print_nullable_post( name, type, file, nest, dir, outer, outer2, b_marshal, b_get )
     if type.is_nullable? then
-      if dir == :OUT then  # OUT ã®å ´åˆ print_out_nullable で NULL かどうかのæƒ
-å ±ã‚’æ¸¡ã™
+      if dir == :OUT then  # OUT の場合 print_out_nullable で NULL かどうかの情報を渡す
         nest -= 1
         indent = "      " * nest
@@ -371 +351 @@
 #{indent}       }  /* ! b_null_ */
 EOT
-          else # dir = :INOUT, b_marshal = true   # inout の out 方向
+          else # dir = :INOUT, b_marshal = true   # inout の out 方向
             file.print "#{indent}       }  /* ! b_null_  GenParamCopy Null 52 */\n"
           end