source: asp3_tinet_ecnl_arm/trunk/asp3_dcre/tecsgen/tecslib/plugin/MrubyBridgeCelltypePlugin.rb@ 374

# -*- coding: utf-8 -*-
#
#  TECS Generator
#      Generator for TOPPERS Embedded Component System
#  
#   Copyright (C) 2008-2017 by TOPPERS Project
#--
#   上記著作権者
は，以下の(1)～(4)ã®æ¡ä»¶ã‚’æº€ãŸã™å ´åˆã«é™ã‚Šï¼Œæœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§
#   ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
#   変・再é…
å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する．
#   (1) æœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§ã‚¢ã‚’ã‚½ãƒ¼ã‚¹ã‚³ãƒ¼ãƒ‰ã®å½¢ã§åˆ©ç”¨ã™ã‚‹å ´åˆã«ã¯ï¼Œä¸Šè¨˜ã®è‘—ä½œ
#       権表示，この利用条件および下記の無保証規定が，そのままの形でソー
#       スコード中に含まれていること．
#   (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
#       用できる形で再é…
å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
#       者
マニュアルなど）に，上記の著作権表示，この利用条件および下記
#       の無保証規定を掲載すること．
#   (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
#       用できない形で再é…
å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
#       と．
#     (a) 再é…
å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
マニュアルなど）に，上記の著
#         作権表示，この利用条件および下記の無保証規定を掲載すること．
#     (b) 再é…
å¸ƒã®å½¢æ…
‹ã‚’，別に定める方法によって，TOPPERSプロジェクトに
#         å ±å‘Šã™ã‚‹ã“ã¨ï¼Ž
#   (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
#       害からも，上記著作権者
およびTOPPERSプロジェクトをå…
è²¬ã™ã‚‹ã“と．
#       また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
#       由に基づく請求からも，上記著作権者
およびTOPPERSプロジェクトを
#       å…
è²¬ã™ã‚‹ã“と．
#  
#   本ソフトウェアは，無保証で提供されているものである．上記著作権者
お
#   よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
#   に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
#   アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
#   ã®è²¬ä»»ã‚’è² ã‚ãªã„ï¼Ž
#  
#   $Id$
#++

require_tecsgen_lib 'tecslib/plugin/lib/MrubyBridgeCelltypePluginModule.rb'

#== MrubyBridgeCompositePlugin
class MrubyBridgeCelltypePlugin < CompositePlugin
  dbgPrint "MrubyBridgeCelltypePlugin loaded\n"
  include MrubyBridgeCelltypePluginModule

  def self.gen_post_code( file )
    MrubyBridgeCelltypePluginModule.gen_post_code file
  end
end


#
##== celltype プラグインのå…
±é€šã®è¦ªã‚¯ãƒ©ã‚¹
#class MrubyBridgeCelltypePlugin < CelltypePlugin
#
#  # プラグイン引数名 => Proc
#  MrubyBridgePluginArgProc = { 
#      "ignoreUnsigned" => Proc.new { |obj,rhs| obj.set_ignoreUnsigned rhs },
#      "include_inner_cell" => Proc.new { |obj,rhs| obj.set_include_inner_cell rhs },
#      "exclude_cell" => Proc.new { |obj,rhs| obj.set_exclude_cell rhs },
#      "exclude_port" => Proc.new { |obj,rhs| obj.set_exclude_port rhs },
#      "exclude_port_func" => Proc.new { |obj,rhs| obj.set_exclude_port_func rhs },
#      "auto_exclude" => Proc.new { |obj,rhs| obj.set_auto_exclude rhs },
#  }
#
#  require_tecsgen_lib( "MrubyBridgeCellPlugin.rb" )
#  @@plugin_list = []
#  @@count = 1
#
#  #celltype::     Celltype        セルタイプ（インスタンス）
#  def initialize( celltype, option )
#    dbgPrint "#{self.class.name}: initialzie: #{celltype.get_name}\n"
#
#    super
#    @celltype = celltype
#    @cell_list = []
#    @include_inner_cell = false
#    @exclude_cells = []
#    @exclude_port = []
#    @exclude_port_func = {}
#    @b_ignoreUnsigned = false
#    @b_auto_exclude = true     # auto_exclude = true by default 
#    @@plugin_list << self
#
#    @plugin_arg_check_proc_tab = MrubyBridgePluginArgProc
#    @plugin_arg_str = CDLString.remove_dquote option
#    parse_plugin_arg
#
#    MrubyBridgeCellPlugin.set_gen_post_code_by_dependent
#  end
#
#  #=== 新しいセル
#  #cell::        Cell            セル
#  #
#  # celltype プラグインを指定されたセルタイプのセルが生成された
#  # ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ãƒ—ãƒ©ã‚°ã‚¤ãƒ³ã«å¯¾ã™ã‚‹æ–°ã—ã„ã‚»ãƒ«ã®å ±å‘Š
#  # generate æ–‡ã«ã‚ˆã‚Šå‘¼ã³å‡ºã•ã‚ŒãŸå ´åˆã€ãã‚Œã¾ã§ã«å®šç¾©ã•ã‚ŒãŸ cell については、initialize のタイミングで呼び出される
#  def new_cell( cell )
#    dbgPrint "MrubyBridgeCelltypePlugin: new_cell: #{cell.get_name}\n"
#
#    return if @cell_list.include? cell   # この行は、本来不要のはず
#    if TECSGEN.post_coded?               # post_code 以降のセルは対象から外す
#      cdl_info( "I9999 MrubyBridgeCelltypePlugin: $1 is excluded because cell generated after post_coded", cell.get_name )
#      return
#    end
#
#    # include_inner_cell option
#    if cell.is_cloned? && @include_inner_cell == false then
#    #   p "#{cell.get_name} excluded"
#      cdl_info( "I9999 MrubyBridgeCelltypePlugin: inner cell $1 is excluded", cell.get_name )
#      return
#    # else
#    #   p "#{cell.get_name} included"
#    end
#
#    # exclude_cell option
#    if @exclude_cells.include?( cell.get_name ) then
#      return
#    end
#
#    opt_str = "ignoreUnsigned=#{@b_ignoreUnsigned}, auto_exclude=#{@b_auto_exclude}"
#    @exclude_port.each{ |port|
#      opt_str += ",exclude_port=#{port}"
#    }
#    @exclude_port_func.each{ |port, funcs|
#      funcs.each{ |func|
#        opt_str += ",exclude_port_func=#{port}.#{func}"
#      }
#    }
#
#    # p "MrubyBridgeCelltypePlugin: opt_str=#{opt_str}"
#
#    # mikan option, region
#    fn2 = "#{$gen}/tmp_MrubyBridgeCelltypePlugin_#{@celltype.get_name}_#{@@count}.cdl"
#    f2 = File.open( fn2, "w" )
#    f2.print <<EOT
#/* MrubyBridgeCelltypePlugin: celltype=#{@celltype.get_name} */
#generate( MrubyBridgeCellPlugin, #{cell.get_namespace_path}, "#{opt_str}" );
#EOT
#    f2.close
#    Import.new "#{fn2}"
#    @@count += 1
#  end
#
#### 意味解析段階で呼び出されるメソッド ###
#  #===  CDL ファイルの生成
#  #      typedef, signature, celltype, cell のコードを生成
#  #      重複して生成してはならない
#  #      ã™ã§ã«ç”Ÿæˆã•ã‚Œã¦ã„ã‚‹å ´åˆã¯å‡ºåŠ›ã—ãªã„ã“ã¨ã€‚
#  #      もしくは同名の import により、重複を避けること。
#  #file::        FILE       生成するファイル
#  def gen_cdl_file file
##   この段階で呼びだすと generate 文が呼び出される前のセルのみの出力となる
#    
##    dbgPrint "MrubyBridgeCelltypePlugin: gen_cdl_file: #{@celltype.get_name}\n"
##    file.print <<EOT
##/* MrubyBridgeCelltypePlugin: celltype=#{@celltype.get_name}
## *
## *    cell's generate before celltype's generate
## */
##
##EOT
##    @celltype.get_cell_list.each { |cell|
##      @cell_list << cell
##      # mikan option, region
##      dbgPrint "MrubyBridgeCelltypePlugin: cell=#{cell.get_name}\n"
##      file.print <<EOT
##generate( MrubyBridgeCellPlugin, #{cell.get_namespace_path}, "" );
##EOT
##    }
#
#  end
#
#  #=== tCelltype_factory.h に挿å…
¥ã™ã‚‹ã‚³ãƒ¼ãƒ‰ã‚’生成する
#  # file 以外の他のファイルにファクトリコードを生成してもよい
#  # セルタイププラグインが指定されたセルタイプのみ呼び出される
#  def gen_factory file
#  end
#
#  def get_celltype
#    @celltype
#  end
#
#  #=== 後ろの CDL コードを生成
#  #プラグインの後ろの CDL コードを生成
#  #file:: File: 
#  def self.gen_post_code( file )
#    dbgPrint "#{self.name}: gen_post_code_body\n"
#    print "#{self.name}: gen_post_code_body\n"
##    この段階で生成すると、同じポストコードで出力される mruby ã®åˆæœŸåŒ–ã‚³ãƒ¼ãƒ‰ã«åæ˜ ã•ã‚Œãªã„
#    
##    # MrubyBridgeCelltypePlugin の生成する generate 文は、
##    fn2 = "#{$gen}/tmp_MrubyBridgeCelltypePlugin_post.cdl"
##    f2 = File.open( fn2, "w" )
##    # 複数のプラグインの post_code が一つのファイルに含まれるため、以下のような見出しをつけること
##    dbgPrint "MrubyBridgeCelltypePlugin: gen_post_code\n"
##    f2.print "/* '#{self.name}' post code */\n"
##    @@plugin_list.each{ |plugin|
##      plugin.get_celltype.get_cell_list.each{ |cell|
##        # mikan option, region
##        f2.print <<EOT
##generate( MrubyBridgeCellPlugin, #{cell.get_namespace_path}, "" );
##EOT
##      }
##    }
##    f2.close
##    p Import
##    Import.new "#{fn2}"
#
#    MrubyBridgeCellPlugin.gen_post_code_body file
#  end
#
#  #=== プラグイン引数 
#
#  #=== プラグイン引数 ignoreUnsigned
#  def set_ignoreUnsigned rhs
#    if rhs == "true" || rhs == nil then
#      @b_ignoreUnsigned = true
#    end
#  end
#
#  def set_include_inner_cell rhs
#    if rhs == "true" || rhs == nil then
#      @include_inner_cell = true
#    end
#  end
#
#  def set_exclude_cell rhs
#    cells = rhs.split ','
#    cells.each{ |rhs_cell|
#      rhs_cell.gsub!( /\s/, "" )
#      @exclude_cells << rhs_cell.to_sym
#    }
#  end
#  def set_exclude_port rhs
#    ports = rhs.split ','
#    ct = @cell.get_celltype
#    return if ct == nil    # error case
#    ports.each{ |rhs_port|
#      obj = ct.find( rhs_port.to_sym )
#      if( ( ! obj.instance_of? Port ) || obj.get_port_type != :ENTRY ) then
#        cdl_error( "MRB9999 exclude_port '$1' not found or not entry in celltype '$2'", rhs_port, ct.get_name )
#      else
#        # print "MRBBridgeCellPlugin: exclude #{rhs_port}\n"
#        @exclude_port << rhs_port
#      end
#    }
#  end
#
#  #=== プラグイン引数 exclude_port_func
#  def set_exclude_port_func rhs
#    port_funcs = rhs.split ','
#    ct = @celltype
#    return if ct == nil    # error case
#    port_funcs.each{ |rhs_port_func|
#      port_func = rhs_port_func.split( '.' )
#      if port_func.length != 2 then
#        cdl_error( "MRB9999 exclude_port_func: '$1' not in 'port.func' form", rhs_port_func )
#      end
#      obj = ct.find( port_func[0].to_sym )
#      if( ( ! obj.instance_of? Port ) || obj.get_port_type != :ENTRY ) then
#        cdl_error( "MRB9999 exclude_port_func: port '$1' not found in celltype '$2'", rhs_port_func, ct.get_name )
#      else
#        signature = obj.get_signature
#        next if signature == nil     # error case
#        if signature.get_function_head port_func[1].to_sym
#          # print "MRBBridgeCellPlugin: #{port_func[0]}.#{port_func[1]} exclude\n"
#          if @exclude_port_func[ port_func[0] ] then
#            @exclude_port_func[ port_func[0] ] <<  port_func[1]
#          else
#            @exclude_port_func[ port_func[0] ] = [ port_func[1] ]
#          end
#        else
#          cdl_error( "MRB9999 include_port_func: func '$1' not found in port '$2' celltype $3",
#                     port_func[1], port_func[0], ct.get_name )
#        end
#      end
#    }
#  end
#
#  #=== プラグイン引数 auto_exclude
#  def set_auto_exclude rhs
#    # print "MrubyBridgeCellPlugin: auto_exclude=#{rhs}\n"
#    if rhs == "false" then
#      @b_auto_exclude = false
#    elsif rhs == "true" then
#      @b_auto_exclude = true     # auto_exclude = true by default 
#    else
#      cdl_warning( "MRB9999 auto_exclude: unknown rhs value ignored. specify true or false" )
#    end
#  end
#end
#