src/nitc.nit

   1 # This file is part of NIT ( http://www.nitlanguage.org ).
   2 #
   3 # Copyright 2008 Jean Privat <jean@pryen.org>
   4 #
   5 # Licensed under the Apache License, Version 2.0 (the "License");
   6 # you may not use this file except in compliance with the License.
   7 # You may obtain a copy of the License at
   8 #
   9 #     http://www.apache.org/licenses/LICENSE-2.0
  10 #
  11 # Unless required by applicable law or agreed to in writing, software
  12 # distributed under the License is distributed on an "AS IS" BASIS,
  13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14 # See the License for the specific language governing permissions and
  15 # limitations under the License.
  16
  17 # Nit compiler main module
  18 package nitc
  19
  20 import abstracttool
  21 import analysis
  22 import program
  23 private import compiling
  24 private import syntax
  25
  26 # The main class of the nitcompiler program
  27 class NitCompiler
  28 special AbstractCompiler
  29         readable var _opt_output: OptionString = new OptionString("Output file", "-o", "--output")
  30         readable var _opt_boost: OptionBool = new OptionBool("Optimize compilation", "-O", "--boost")
  31         readable var _opt_no_cc: OptionBool = new OptionBool("Do not invoke C compiler", "--no-cc")
  32         readable var _opt_global: OptionBool = new OptionBool("Use global compilation", "--global")
  33         readable var _opt_global_no_STF_opt: OptionBool = new OptionBool("Do not use SFT optimization", "--no-global-SFT-optimization")
  34         readable var _opt_global_no_DMR_opt: OptionBool = new OptionBool("Do not use dead method removal optimization", "--no-global-DMR-optimization")
  35         readable var _opt_global_no_inline_get_set: OptionBool = new OptionBool("Do not automatically inline getters/setters", "--no-global-get-set-inlining")
  36         readable var _opt_global_no_out_of_init_get_test_opt: OptionBool = new OptionBool("Do not remove get tests outside object initialization", "--no-global-OOIT-optimization")
  37         readable var _opt_global_no_RFIMA: OptionBool = new OptionBool("Do not use a specialized algorithm to find reachable methods from initializers", "--no-global-RFIM-analysis")
  38         readable var _opt_global_callgraph: OptionEnum = new OptionEnum(["none", "cha", "rta"], "The algorithm to use to build the callgraph", 2, "--global-callgraph")
  39         readable var _opt_clibdir: OptionString = new OptionString("NIT C library directory", "--clibdir")
  40         readable var _opt_bindir: OptionString = new OptionString("NIT tools directory", "--bindir")
  41         readable var _opt_compdir: OptionString = new OptionString("Intermediate compilation directory", "--compdir")
  42         readable var _opt_extension_prefix: OptionString = new OptionString("Append prefix to file extension", "-p", "--extension-prefix")
  43         readable var _opt_output_format: OptionEnum = new OptionEnum(["none", "C", "icode"], "The type of code we want to be generated", 1, "--output-format")
  44
  45         init
  46         do
  47                 super("nitc")
  48                 option_context.add_option(opt_output, opt_boost, opt_no_cc, opt_global, opt_clibdir, opt_bindir, opt_compdir, opt_extension_prefix, opt_global_no_STF_opt, opt_global_no_DMR_opt, opt_global_callgraph, opt_global_no_inline_get_set, opt_global_no_RFIMA, opt_global_no_out_of_init_get_test_opt, opt_output_format)
  49         end
  50
  51         redef fun process_options
  52         do
  53                 super
  54                 output_file = opt_output.value
  55                 boost = opt_boost.value
  56                 no_cc = opt_no_cc.value
  57                 var ext = opt_extension_prefix.value
  58                 if ext != null then ext_prefix = ext else ext_prefix = ""
  59                 global = opt_global.value
  60                 use_SFT_optimization = not opt_global_no_STF_opt.value
  61                 no_dead_method_removal = opt_global_no_DMR_opt.value
  62                 no_inline_get_set = opt_global_no_inline_get_set.value
  63                 no_callgraph_from_init = opt_global_no_RFIMA.value
  64                 no_out_of_init_get_test_removal = opt_global_no_out_of_init_get_test_opt.value
  65                 global_callgraph = opt_global_callgraph.value_name
  66                 compdir = opt_compdir.value
  67                 if compdir == null then
  68                         var dir = once ("NIT_COMPDIR".to_symbol).environ
  69                         if not dir.is_empty then
  70                                 compdir = dir
  71                         end
  72                         if compdir == null then
  73                                 compdir = ".nit_compile"
  74                         end
  75                 end
  76                 compdir += ext_prefix
  77
  78                 clibdir = opt_clibdir.value
  79                 if clibdir == null then
  80                         var dir = once ("NIT_DIR".to_symbol).environ
  81                         if dir.is_empty then
  82                                 dir = "{sys.program_name.dirname}/../clib"
  83                                 if dir.file_exists then clibdir = dir
  84                         else
  85                                 dir = "{dir}/clib"
  86                                 if dir.file_exists then clibdir = dir
  87                         end
  88                         if clibdir == null then
  89                                 fatal_error(null, "Error: Cannot locate NIT C library directory. Uses --clibdir or envvar NIT_DIR.")
  90                         end
  91                 end
  92                 bindir = opt_bindir.value
  93
  94                 if bindir == null then
  95                         var dir = once ("NIT_DIR".to_symbol).environ
  96                         if dir.is_empty then
  97                                 dir = "{sys.program_name.dirname}/../bin"
  98                                 if dir.file_exists then bindir = dir
  99                         else
 100                                 dir = "{dir}/bin"
 101                                 if dir.file_exists then bindir = dir
 102                         end
 103                         if bindir == null then
 104                                 fatal_error(null, "Error: Cannot locate NIT tools directory. Uses --bindir or envvar NIT_DIR.")
 105                         end
 106                 end
 107         end
 108
 109         redef fun perform_work(mods)
 110         do
 111                 for mod in mods do
 112                         var p = new Program(mod, self)
 113                         p.output_format = opt_output_format.value_name
 114                         p.compute_main_method
 115                         p.generate_allocation_iroutines
 116                         if global then
 117                                 p.do_global_pre_analysis_optimizations
 118                                 p.do_global_analysis
 119                                 p.do_global_post_analysis_optimizations
 120                                 if opt_log.value then
 121                                         p.dump_global_optimizations_information(log_directory)
 122                                         p.dump_global_analysis_information(log_directory)
 123                                 end
 124                         end
 125                         p.do_table_computation
 126                         p.compile_prog
 127                 end
 128         end
 129 end
 130
 131 var c = new NitCompiler
 132 c.exec_cmd_line