tecscde 0.6.0

data/lib/tecsgen/core/tecs_lang.rb

@@ -0,0 +1,306 @@
+#
+#  TECS Generator
+#      Generator for TOPPERS Embedded Component System
+#
+#   Copyright (C) 2008-2014 by TOPPERS Project
+#--
+#   上記著作権者は，以下の(1)〜(4)の条件を満たす場合に限り，本ソフトウェ
+#   ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
+#   変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
+#   (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
+#       権表示，この利用条件および下記の無保証規定が，そのままの形でソー
+#       スコード中に含まれていること．
+#   (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
+#       用できる形で再配布する場合には，再配布に伴うドキュメント（利用
+#       者マニュアルなど）に，上記の著作権表示，この利用条件および下記
+#       の無保証規定を掲載すること．
+#   (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
+#       用できない形で再配布する場合には，次のいずれかの条件を満たすこ
+#       と．
+#     (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
+#         作権表示，この利用条件および下記の無保証規定を掲載すること．
+#     (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
+#         報告すること．
+#   (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
+#       害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
+#       また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
+#       由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
+#       免責すること．
+#
+#   本ソフトウェアは，無保証で提供されているものである．上記著作権者お
+#   よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
+#   に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
+#   アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
+#   の責任を負わない．
+#
+#   $Id: tecs_lang.rb 2061 2014-05-31 22:15:33Z okuma-top $
+#++
+
+#== 言語に関する変数を設定
+# メッセージファイルの読み込みも行う (読み込みに失敗した場合、デフォルトの文字コードに変更する)
+class TECS_LANG
+  # ハッシュのタグは case insensitive のため、大文字の文字列とする
+  CHARSET_ALIAS = {
+    "UJIS" => :eucJP,
+    "UTF-8" => :utf8,
+    "EUCJP" => :eucJP,   # 以下 case insensitive にするため
+    "SJIS" => :sjis,
+    "UTF8" => :utf8,
+    "ISO8859-1" => :"iso8859-1"
+  }
+  LANG_ALIAS = {
+    "C" => :en_US,
+    "EN_US" => :en_US,   # 以下 case insensitive にするため
+    "JA_JP" => :ja_JP
+  }
+  SUITABLE_CHARSET = {
+    :ja_JP => [:eucJP, :sjis, :utf8],
+    :en_US => [:"iso8859-1", :utf8, nil]
+  }
+
+  #=== LANG のパース
+  # lang::String  "ja_JP.eucJP@cjknarrow", "C" など
+  # RETURN:: [ :ja_JP, :eucJP, :cjknarrow ]
+  def self.parse_lang(lang)
+    lang =~ /([^\.@]*)(\.([^@]*))?(@(.*))?/
+
+    lang_terri = $1.to_sym if !$1.nil? && $1 != ""
+    # set_kcode_binary により、C.UTF-8 のみを特別扱いする必要がなくなった
+    # if lang_terri == :C then    # LANG=C.* は、すべて 1 byte 文字コードとして扱う
+    #  codeset = nil
+    #  modifier = nil
+    # else
+      codeset = $3.to_sym if !$3.nil? && $3 != ""
+      modifier = $5.to_sym if !$5.nil? && $5 != ""
+    # end
+    [lang_terri, codeset, modifier]
+  end
+
+  #=== lang, charset の別明解決および妥当性のチェック
+  # lang::Symbol    : :en_US, :ja_JP など
+  # charset::Symbol : :eucJP, :utf8 など
+  # RETURN:
+  #  [ lang, charset, result ]::　　result = false の場合 lang, charset は不適切
+  def self.resolve_alias_and_check(lang, charset)
+    if LANG_ALIAS[lang.to_s.upcase]
+      ln = LANG_ALIAS[lang.to_s.upcase]
+    else
+      ln = lang
+    end
+
+    if CHARSET_ALIAS[charset.to_s.upcase]
+      cs = CHARSET_ALIAS[charset.to_s.upcase]
+    else
+      cs = charset
+    end
+
+    if SUITABLE_CHARSET[ln].nil? || SUITABLE_CHARSET[ln].index(cs).nil?
+      res = false
+    else
+      res = true
+    end
+
+    # p ln, cs, res
+    [ln, cs, res]
+  end
+
+  #=== codepage を取り出す
+  # codepage は3〜5桁の整数として仮定
+  def self.get_win_codepage
+    cmd_pipe = IO.popen("cmd /c chcp", "r")
+    cmd_pipe.read =~ /([0-9]{3,5})/
+    cp = $1
+    cmd_pipe.close
+    return cp
+  end
+
+  #=== codepage から LANG の設定文字列に変換
+  def self.codepage_to_lang(cp)
+    if cp == "932"
+      "ja_JP.sjis"
+    else
+      "en_US"
+    end
+  end
+
+  #=== 言語、文字コードに関する変数を設定
+  # 以下の順にチェックされ、一番最後に設定された値が採用される
+  #   ・デフォルト
+  #   ・codepage  (exerb 版で TERM 未設定または TERM=cygwin の場合のみ)
+  #   ・LANG 環境変数
+  #   ・TECSGEN_LANG 環境変数
+  #   ・TECSGEN_FILE_LANG 環境変数 (ファイルの文字コードのみ)
+  #   ・-k オプション (ファイルの文字コードのみ)
+  def self.set_lang_var
+    if ENV["LANG"]
+      # 非 exerb 版では LANG 環境変数を見る
+      # cygwin console では codepage に従って出力した方が平和なため
+
+      $LANG_FILE, $CHARSET_FILE, *dum = self.parse_lang(ENV["LANG"])
+      $LANG_CONSOLE = $LANG_FILE
+      $CHARSET_CONSOLE = $CHARSET_FILE
+    end
+
+    if ENV["TECSGEN_LANG"]
+      $LANG_FILE, $CHARSET_FILE, *dum = self.parse_lang(ENV["TECSGEN_LANG"])
+      $LANG_CONSOLE = $LANG_FILE
+      $CHARSET_CONSOLE = $CHARSET_FILE
+    end
+
+    if ENV["TECSGEN_FILE_LANG"]
+      $LANG_FILE, $CHARSET_FILE, *dum = self.parse_lang(ENV["TECSGEN_FILE_LANG"])
+    end
+
+    self.set_lang_by_option
+  end
+
+  #=== -k オプションからファイル用の言語、文字コード変数を設定
+  def self.set_lang_by_option
+    if $kcode.nil?
+      return
+    end
+
+    code = $kcode
+    found = false
+    res = $CODE_TYPE_ARRAY.index(code)
+    if res.nil?
+      print "-k: illegal kcode type #{code}. (#{$CODE_TYPE_ARRAY.join(", ")})\n"
+      exit 1
+    end
+
+    case $kcode
+    when "euc"
+      $CHARSET_FILE = :eucJP
+      $LANG_FILE = :ja_JP
+    when "sjis"
+      $CHARSET_FILE = :sjis
+      $LANG_FILE = :ja_JP
+    when "utf8"
+      $CHARSET_FILE = :utf8
+      $LANG_FILE = :ja_JP
+    when "none"
+      $CHARSET_FILE = nil
+      $LANG_FILE = "en_US"
+    end
+  end
+
+  # 言語情報から Encoding に関する変数を設定
+  def self.set_encoding_var
+    # 文字コードの設定
+    case $CHARSET_FILE           # string: "EUC" | "SJIS" | "NONE" | "UTF8"
+    when :eucJP
+      $ENCODING_CDL = Encoding::EUC_JP
+      $Ruby19_File_Encode = "ASCII-8BIT"
+    when :sjis
+      $ENCODING_CDL = Encoding::Shift_JIS
+      $Ruby19_File_Encode = "Shift_JIS"
+    when :utf8
+      $ENCODING_CDL = Encoding::UTF_8
+      $Ruby19_File_Encode = "ASCII-8BIT"
+    else
+      $ENCODING_CDL = Encoding::BINARY
+      $Ruby19_File_Encode = "ASCII-8BIT"
+    end
+
+    case $CHARSET_CONSOLE
+    when :eucJP
+      $ENCODING_CONSOLE = Encoding::EUC_JP
+    when :sjis
+      $ENCODING_CONSOLE = Encoding::Shift_JIS
+    when :utf8
+      $ENCODING_CONSOLE = Encoding::UTF_8
+    else
+      $ENCODING_CONSOLE = Encoding::BINARY
+    end
+
+    $ENCODING_TECSGEN = Encoding::UTF_8 # const:
+  end
+
+  #####
+  # $LANG_FILE        言語 (C は en_US に変換される)
+  # $LANG_CONSOLE     言語 (C は en_US に変換される)
+  # $CHARSET_FILE     ファイルの文字コード
+  # $CHARSET_CONSOLE  コンソール文字コード
+
+  # デフォルトの設定（正規化済みのこと）
+  $LANG_FILE_DEFAULT = :en_US
+  $CHARSET_FILE_DEFAULT = nil
+  $LANG_CONSOLE_DEFAULT = :en_US
+  $CHARSET_CONSOLE_DEFAULT = nil
+
+  $LANG_FILE = $LANG_FILE_DEFAULT
+  $CHARSET_FILE = $CHARSET_FILE_DEFAULT
+  $LANG_CONSOLE = $LANG_CONSOLE_DEFAULT
+  $CHARSET_CONSOLE = $CHARSET_CONSOLE_DEFAULT
+
+  # -k で指定可能なコード
+  $CODE_TYPE_ARRAY = ["euc", "sjis", "none", "utf8"]
+
+  # 言語を決定する
+  self.set_lang_var
+
+  # 言語、コードのチェックと正規化
+  lang_file, charset_file, res =
+    self.resolve_alias_and_check($LANG_FILE, $CHARSET_FILE)
+  if res == false
+    # lang_file, charset_file = lang_file_default, charset_file_default
+    lang_file, charset_file = $LANG_FILE_DEFAULT, $CHARSET_FILE_DEFAULT
+  end
+  lang_console, charset_console, res =
+    self.resolve_alias_and_check($LANG_CONSOLE, $CHARSET_CONSOLE)
+  if res == false
+    # lang_console, charset_console = lang_console_default, charset_console_default
+    lang_console, charset_console = $LANG_CONSOLE_DEFAULT, $CHARSET_CONSOLE_DEFAULT
+  end
+
+  # メッセージモジュールをロード
+  if require("tecsgen/messages/messages_console_#{lang_console}")
+    $LANG_CONSOLE, $CHARSET_CONSOLE = lang_console, charset_console
+  else
+    require("tecsgen/messages/messages_console_#{$LANG_CONSOLE_DEFAULT}")
+    $LANG_CONSOLE, $CHARSET_CONSOLE = $LANG_CONSOLE_DEFAULT, $CHARSET_CONSOLE_DEFAULT
+  end
+  if require("tecsgen/messages/messages_file_#{lang_file}")
+    $LANG_FILE, $CHARSET_FILE = lang_file, charset_file
+  else
+    require("tecslib/messages/messages_file_#{$LANG_FILE_DEFAULT}")
+    $LANG_FILE, $CHARSET_FILE = $LANG_FILE_DEFAULT, $CHARSET_FILE_DEFAULT
+  end
+
+  self.set_encoding_var
+
+  dbgPrint "LANG_FILE=#{$LANG_FILE}.#{$CHARSET_FILE}, LANG_CONSOLE=#{$LANG_CONSOLE}.#{$CHARSET_CONSOLE}\n"
+  dbgPrint "ENCODING_CDL=#{$ENCODING_CDL} ENCODING_CONSOLE=#{$ENCODING_CONSOLE}\n"
+  dbgPrint "Ruby19_File_Encode=#{$Ruby19_File_Encode}\n"
+
+  #=== 単体テスト実行
+  if $unit_test
+    print "unit test: set_lang_var\n"
+    self.set_lang_var
+    print "#{$LANG_FILE} #{$LANG_CONSOLE}\n"
+    print "#{$CHARSET_FILE} #{$CHARSET_CONSOLE}\n"
+
+    $LANG_FILE, $CHARSET_FILE, res = self.resolve_alias_and_check($LANG_FILE, $CHARSET_FILE)
+    print "#{$LANG_FILE} #{$CHARSET_FILE}, #{res}\n"
+  end
+end
+
+#= Console クラス
+# 文字コードを変換する
+class Console
+  def self.print(str)
+    if $ENCODING_CONSOLE == Encoding::BINARY
+      STDOUT.print(str)
+    else
+      STDOUT.print(str.encode($ENCODING_CONSOLE))
+    end
+  end
+
+  def self.puts(str)
+    if $ENCODING_CONSOLE == Encoding::BINARY
+      STDOUT.puts(str)
+    else
+      STDOUT.puts(str.encode($ENCODING_CONSOLE))
+    end
+  end
+end

data/lib/tecsgen/core/tecsgen.rb

@@ -0,0 +1,453 @@
+#
+#  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: tecsgen.rb 2665 2017-07-24 08:59:28Z okuma-top $
+#++
+
+
+class TECSGEN
+  @@b_post_coded = false # ポストコード生成開始後 true
+
+  #=== import パス (-I) を末尾に追加
+  # 既に登録済みであれば、追加しない
+  def self.add_import_path(path)
+    if $import_path.index(path).nil?
+      dbgPrint "add_import_path: '#{path}'\n"
+      $import_path << path
+    end
+  end
+
+  #=== $(TECSPATH) への置換
+  # path::String   : ENV[ 'TECSPATH' ] に一致する部分があれば、 "$(TECSPATH)" に置換
+  # b_global::Bool : true なら gsub で置換。false なら sub で置換
+  def self.subst_tecspath(path, b_global = false)
+    tp = $tecspath.dup
+    tp.gsub!(/\\/, "\\\\\\\\")
+    pattern = /#{tp}/
+      substr = "$(TECSPATH)"
+    if b_global
+      str =  path.gsub(pattern, substr)
+    else
+      str = path.sub(pattern, substr)
+    end
+    dbgPrint "subst_tecspath #{path}, #{str}\n"
+    return str
+  end
+
+  #=== path は絶対パスか?
+  # path:: String   :
+  # '/' または '$' で始まる場合、絶対パスと判定する
+  def self.is_absolute_path?(path)
+    pa = path[0..0]
+    pa2 = path[0..1]
+    if pa == "/" || pa == "$" || pa2 =~ /[A-Za-z]:/
+      res = true
+    else
+      res = false
+    end
+    dbgPrint "is_absolute( #{path} ) = #{res}  #{path[0]}\n"
+    return res
+  end
+
+  #=== tecsgen のデフォルトを設定
+  def self.set_default_config
+    Makefile.set_default_config
+  end
+
+  ###
+  #== Makefile.templ の出力内容を追加、変更するための操作
+  module Makefile
+    # 固定されている変数(add_var で変更できない)
+    @@fixed_vars = { :INCLUDES => nil, :DEFINES => nil, :TARGET_BASE => nil, :BASE_DIR => nil }
+    @@config_mode = false
+
+    @@vars = { }
+    @@vars_default = { }
+    @@var_comments = { }
+
+    @@objs = []
+    @@ldflags = ""
+    @@search_path = []
+    @@pre_tecsgen_target = []
+    @@post_tecsgen_target = []
+    @@lines = []
+
+    #=== OTHER_OBJS に追加する
+    def self.add_obj(obj)
+      @@objs << obj
+    end
+
+    #=== 追加する変数
+    # プラグインからは、デフォルト値を変更できる
+    # config により
+    def self.add_var(var, val, comment = nil)
+      if @@fixed_vars[var]
+        raise "fixed var '#{var}' cannot be changed"
+      end
+      if @@config_mode
+        @@vars_default[var.to_sym] = val
+        @@var_comments_default[var.to_sym] = comment
+      else
+        @@vars[var.to_sym] = val
+        @@var_comments[var.to_sym] = comment
+      end
+    end
+
+    #=== LDFLAGS に追加する
+    def self.add_ldflag(ldflag)
+      @@ldflags += " " + ldflag
+    end
+
+    #=== サーチパスを追加する
+    # CFLAGS, vpath に追加する
+    def self.add_search_path(path)
+      @@search_path << path
+    end
+
+    #=== PRE_TECSGEN_TARGET に追加する
+    # PRE_TECSGEN_TARGET に target を追加する
+    def self.add_pre_tecsgen_target(target)
+      @@pre_tecsgen_target << pre_tecsgen_target
+    end
+
+    #=== POST_TECSGEN_TARGET に追加する
+    # POST_TECSGEN_TARGET に target を追加する
+    def self.add_post_tecsgen_target(target)
+      @@post_tecsgen_target << pre_tecsgen_target
+    end
+
+    #=== 追加する変数
+    def self.add_line(line)
+      @@lines << line.to_s + "\n"
+    end
+
+    def self.get_objs  # Array を返す
+      return @@objs.uniq
+    end
+
+    def self.get_vars  # Array を返す
+      if RUBY_VERSION >= "1.9"
+        return (@@vars.keys + @@vars_default.keys).sort.uniq
+      else
+        # V1.8 では、Symbol の sort ができないので、一旦 String に置換する
+        return (@@vars.keys + @@vars_default.keys).map{|s| s.to_s }.sort.uniq.map!{|s| s.to_sym }
+      end
+    end
+
+    def self.get_var_val(var)
+      return @@vars[var] ? @@vars[var] : @@vars_default[var]
+    end
+
+    def self.get_var_comment(var)
+      return @@var_comments[var]
+    end
+
+    def self.get_ldflags # String を返す
+      return @@ldflags
+    end
+
+    def self.get_search_path # Array を返す
+      return @@search_path.uniq
+    end
+
+    def self.get_pre_tecsgen_target # Array を返す
+      return @@pre_tecsgen_target.uniq
+    end
+
+    def self.get_post_tecsgen_target # Array を返す
+      return @@post_tecsgen_target.uniq
+    end
+
+    def self.get_lines # 付加する行を得る
+      return @@lines.uniq
+    end
+
+    #=== TECSGEN のデフォルト設定を行う
+    # Makefile
+    # @@fixed_vars で定義されている変数は、変更できず、定数定義されている
+    def self.set_default_config
+      add_var("TARGET", "$(TARGET_BASE).exe", "default target name")
+      add_var("TECSGEN", "tecsgen", "default TECS generator")
+      add_var("TIMESTAMP", "$(GEN_DIR)/tecsgen.timestamp", "Time Stamp")
+      add_var("CC", "gcc", "default C Compiler")
+      add_var("CFLAGS", '$(INCLUDES) $(DEFINES) -D  "Inline=static inline"', "default C Compiler options")
+      add_var("LD", "gcc", "default Liknker")
+      add_var("LDFLAGS", @@ldflags, "default Liknker Options")
+      add_var("SRC_DIR", "$(BASE_DIR)/src", "default source directory")
+      add_var("_TECS_OBJ_DIR", "$(GEN_DIR)/", "default relocatable object (.o) directory")
+    end
+  end
+
+  def self.get_argv
+    ARGV
+  end
+
+  #------ TECSGEN CDL analyze and generate ------#
+
+  def syntax_analisys(argv)
+    # ルート namespace (region) を生成
+    @root_namespace = Region.new("::")
+
+    ####  構文解析 (post コードを除く) ####
+    # すべての cdl を import する
+    argv.each{|f|
+      dbgPrint("## Import: #{f}\n")
+      TECSGEN.add_import_path(File.expand_path(File.dirname(f)))
+      Import.new(f, false, false)
+    }
+
+    # すべての構文解釈が完了したことの報告
+    #   実際には、後からプラグインの生成する CDL のパースが行われる
+    #   エラー行数の決定方法の変更のために行う
+    Generator.end_all_parse
+    dbgPrint("## End all parse (except Post Code)\n")
+  end # syntax_analisys
+
+  #=== TECSGEN#semantics_analisys_1
+  # semantics check. only cells here
+  # other objects (signature, celltype, typedef, etc ) are checked while syntax analisys
+  def semantics_analisys_1
+    ####  意味解析１ (post コードを除く) ####
+    dbgPrint("## Creating reverse join \n")
+    Cell.create_reverse_join
+
+    DescriptorType.check_signature
+    Signature.set_descriptor_list
+    Celltype.check_dynamic_join
+
+    # 0 set_definition_join は2回呼び出される（1回目）
+    dbgPrint("## Checking all join\n")
+    @root_namespace.set_definition_join
+    # @root_namespace.set_require_join                   ### いったん見合わせ。重複エラーを見逃す
+    # through プラグインで生成されたセルにも require も生成できる (set_definition_join の後ろで実施)
+
+    ####  post コードの生成と構文解析 ####
+    @@b_post_coded = true # ポストコード生成開始後 true
+    # 引数がなければ、プラグインのポストコードを出力しない
+    if ARGV.length > 0
+      dbgPrint("## Generating Post Code\n")
+      # プラグインのポストコードの出力と import
+      tmp_file_name = "#{$gen}/tmp_plugin_post_code.cdl"
+      file = nil
+      begin
+        file = CFile.open(tmp_file_name, "w")
+      rescue
+        Generator.error("G9999 fail to create #{tmp_file_name}")
+      end
+
+      if file
+        # through プラグインのポストコード生成
+        PluginModule.gen_plugin_post_code file
+
+        begin
+          file.close
+        rescue
+          Generator.error("G9999 fail to close #{tmp_file_name}")
+        end
+        dbgPrint("## Import Post Code\n")
+        Import.new(tmp_file_name.to_s)
+      end
+    end
+
+    ####  意味解析１ (post コード) ####
+    dbgPrint("## Creating reverse join (for post code) \n")
+    Cell.create_reverse_join
+
+    # Join の定義の設定とチェック
+    # 0 # 前方参照対応
+    # 0 set_definition_join は2回呼び出される（2回目）  post_code で生成された
+    dbgPrint("## Checking all join (for cells generated by Post Code\n")
+    @root_namespace.set_definition_join
+    @root_namespace.set_max_entry_port_inner_cell
+
+    dbgPrint("## Set require join\n")
+    @root_namespace.set_require_join # mikan post の前にも
+    # ポストコードで生成されたセルの require のjoin を生成
+    # mikan require で through が適用されて、ポストコードが必要となっても出力されない
+  end # semantics_analisys_1
+
+  def semantics_analisys_2
+    ####  意味解析２ ####
+    Cell.make_cell_list2
+    dbgPrint("## Set fixed join\n")
+    Cell.create_reverse_require_join
+    # create_reverse_require_join は set_detinition_join に埋め込むことができない
+        # namespace に依存しない出現順で行う
+        # mikan through プラグインが適用されポストコードに影響を与える場合が考慮できていない
+        # mikan post code に影響のあるものであれば、早くに reverse_require_join の結合が必要
+    dbgPrint("## Setting port reference count\n")
+    @root_namespace.set_port_reference_count
+
+    dbgPrint("## Checking all join\n")
+    @root_namespace.check_join
+
+    # mikan プラグインで生成されたコンポーネントの set_def_and_check_join
+
+    dbgPrint("## Checking referenced but undefined cell\n")
+    @root_namespace.check_ref_but_undef
+  end #  semantics_analisys_2
+
+  def optimize_and_generate
+    #### Region link root ごとにオプティマイズおよび生成 ####
+    Region.get_link_roots.each {|region|
+
+      n_cells = region.get_n_cells
+
+      dbgPrint "#{region.get_name} has #{n_cells} cells\n"
+      if $verbose
+        print "=====================================\n"
+        print "=== Region.path_str: #{region.get_namespace_path.get_path_str}\n"
+        print "=====================================\n"
+      else
+        dbgPrint "Region.path_str: #{region.get_namespace_path.get_path_str}\n"
+      end
+
+      if $region_list.length > 0
+        if $region_list[region.get_namespace_path.get_path_str]
+          $region_list[region.get_namespace_path.get_path_str] = false
+        else
+          next
+        end
+      end
+
+      # セルが一つもなければ生成しない
+      # セルの生成がない場合
+      if region.get_n_cells == 0
+        if $region_list.length > 0
+          Generator.warning("W9999 $1: specified to generate but has no cell", region.get_name)
+        end
+        if region != @root_namespace
+          next
+        end
+      end
+
+      $generating_region = region
+      if Region.get_link_roots.length > 1
+        if region.get_name == "::"
+          $gen = $gen_base
+        else
+          $gen = $gen_base + "/" + region.get_global_name.to_s
+          begin
+            if !File.directory?($gen)
+              Dir.mkdir($gen)
+            end
+          rescue
+            print("Cannot mkdir #{$gen}\n")
+            exit 1
+          end
+        end
+      else
+        $gen = $gen_base
+      end
+
+      dbgPrint("## Unset optimize variables\n")
+      @root_namespace.reset_optimize # 最適化をリセットする
+
+      if Generator.get_n_error == 0
+        # エラーが発生していたら、設定しない
+        dbgPrint("## Set cell id\n")
+        @root_namespace.set_cell_id_and_domain # セルの ID とドメイン情報を設定（linkunit 毎に0からつける）
+
+        # エラーが発生していたら、最適化は実施しない
+        if !$unopt
+          dbgPrint("## Optimizing: Link Region=#{@root_namespace.get_name}\n")
+          @root_namespace.optimize
+        end
+      end
+
+      if $show_tree
+        # エラーが発生していても表示（エラー発生時は最適化されていないので注意）
+        print "##### show_tree LinkRegion=#{region.get_name} #####\n"
+        @root_namespace.show_tree(0)
+        print "##### END       LinkRegion=#{region.get_name} #####\n\n"
+      end
+
+      # 構文解釈、意味解析でエラー発生していたら、コード生成をしない
+      if Generator.get_n_error != 0
+        print_report
+        exit 1
+      end
+
+      #### コード生成 ####
+      begin
+        dbgPrint("## Generating: Link Region=#{@root_namespace.get_name}\n")
+        @root_namespace.generate
+        dbgPrint("## Generating Post: Link Region=#{@root_namespace.get_name}\n")
+        @root_namespace.generate_post
+      rescue
+        # 通常ここへは来ない (generate, generate_post で処置される)
+        Generator.error("G9999 fail to generate")
+      end
+    }
+  end # optimize_and_generate
+
+  def finalize
+    dbgPrint("## Generating XML\n")
+    # Region.gen_xml @root_namespace
+    ##
+    # Namespace.gen_XML  @root_namespace
+
+    $region_list.each{|region_path_str, val|
+      if val == true
+        Generator.warning("W9999 $1: not link root, -G ignored", region_path_str)
+      end
+    }
+
+    # update する
+    # APPFile で生成されたファイルは、もし変化があれば、ここで更新する
+    # コード生成段階でエラーが発生すれば、更新しない
+    # CFile で生成されたものは、更新されている
+    if Generator.get_n_error == 0
+      begin
+        AppFile.update
+      rescue => evar
+        Generator.error("G9999 Fail to update. (error occurred while renaming generated files)")
+        print_exception(evar)
+      end
+    end
+
+    print_report
+    if Generator.get_n_error != 0
+      STDERR.print "error occurred while generating. some file can be corrupt in #{$gen_base}\n"
+      exit 1
+    end
+
+    open("#{$gen_base}/tecsgen.timestamp", "w"){|io| }
+  end # finalize
+
+  def self.post_coded?
+    @@b_post_coded
+  end
+end # class TECSGEN