first commit
This commit is contained in:
+29
@@ -0,0 +1,29 @@
|
||||
autoload :Pathname, 'pathname'
|
||||
|
||||
class Object
|
||||
class << self
|
||||
def attr_block(*syms)
|
||||
syms.flatten.each do |sym|
|
||||
class_eval "def #{sym}(&block);block.call(@#{sym}) if block_given?;@#{sym};end"
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
class String
|
||||
def relative_path_from(dir)
|
||||
Pathname.new(File.expand_path(self)).relative_path_from(Pathname.new(File.expand_path(dir))).to_s
|
||||
end
|
||||
|
||||
def relative_path
|
||||
relative_path_from(Dir.pwd)
|
||||
end
|
||||
end
|
||||
|
||||
def _pp(cmd, src, tgt=nil, options={})
|
||||
return if Rake.verbose
|
||||
|
||||
width = 5
|
||||
template = options[:indent] ? "%#{width*options[:indent]}s %s %s" : "%-#{width}s %s %s"
|
||||
puts template % [cmd, src, tgt ? "-> #{tgt}" : nil]
|
||||
end
|
||||
+392
@@ -0,0 +1,392 @@
|
||||
require "mruby-core-ext"
|
||||
require "mruby/build/load_gems"
|
||||
require "mruby/build/command"
|
||||
|
||||
module MRuby
|
||||
autoload :Gem, "mruby/gem"
|
||||
autoload :Lockfile, "mruby/lockfile"
|
||||
|
||||
class << self
|
||||
def targets
|
||||
@targets ||= {}
|
||||
end
|
||||
|
||||
def each_target(&block)
|
||||
return to_enum(:each_target) if block.nil?
|
||||
@targets.each do |key, target|
|
||||
target.instance_eval(&block)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
class Toolchain
|
||||
class << self
|
||||
attr_accessor :toolchains
|
||||
end
|
||||
|
||||
def initialize(name, &block)
|
||||
@name, @initializer = name.to_s, block
|
||||
MRuby::Toolchain.toolchains[@name] = self
|
||||
end
|
||||
|
||||
def setup(conf,params={})
|
||||
conf.instance_exec(conf, params, &@initializer)
|
||||
end
|
||||
|
||||
self.toolchains = {}
|
||||
end
|
||||
|
||||
class Build
|
||||
class << self
|
||||
attr_accessor :current
|
||||
end
|
||||
include Rake::DSL
|
||||
include LoadGems
|
||||
attr_accessor :name, :bins, :exts, :file_separator, :build_dir, :gem_clone_dir
|
||||
attr_reader :libmruby_objs, :gems, :toolchains, :gem_dir_to_repo_url
|
||||
attr_writer :enable_bintest, :enable_test
|
||||
|
||||
alias libmruby libmruby_objs
|
||||
|
||||
COMPILERS = %w(cc cxx objc asm)
|
||||
COMMANDS = COMPILERS + %w(linker archiver yacc gperf git exts mrbc)
|
||||
attr_block MRuby::Build::COMMANDS
|
||||
|
||||
Exts = Struct.new(:object, :executable, :library)
|
||||
|
||||
def initialize(name='host', build_dir=nil, &block)
|
||||
@name = name.to_s
|
||||
|
||||
unless MRuby.targets[@name]
|
||||
if ENV['OS'] == 'Windows_NT'
|
||||
@exts = Exts.new('.o', '.exe', '.a')
|
||||
else
|
||||
@exts = Exts.new('.o', '', '.a')
|
||||
end
|
||||
|
||||
build_dir = build_dir || ENV['MRUBY_BUILD_DIR'] || "#{MRUBY_ROOT}/build"
|
||||
|
||||
@file_separator = '/'
|
||||
@build_dir = "#{build_dir}/#{@name}"
|
||||
@gem_clone_dir = "#{build_dir}/repos/#{@name}"
|
||||
@cc = Command::Compiler.new(self, %w(.c))
|
||||
@cxx = Command::Compiler.new(self, %w(.cc .cxx .cpp))
|
||||
@objc = Command::Compiler.new(self, %w(.m))
|
||||
@asm = Command::Compiler.new(self, %w(.S .asm))
|
||||
@linker = Command::Linker.new(self)
|
||||
@archiver = Command::Archiver.new(self)
|
||||
@yacc = Command::Yacc.new(self)
|
||||
@gperf = Command::Gperf.new(self)
|
||||
@git = Command::Git.new(self)
|
||||
@mrbc = Command::Mrbc.new(self)
|
||||
|
||||
@bins = []
|
||||
@gems, @libmruby_objs = MRuby::Gem::List.new, []
|
||||
@build_mrbtest_lib_only = false
|
||||
@cxx_exception_enabled = false
|
||||
@cxx_exception_disabled = false
|
||||
@cxx_abi_enabled = false
|
||||
@enable_bintest = false
|
||||
@enable_test = false
|
||||
@enable_lock = true
|
||||
@toolchains = []
|
||||
@gem_dir_to_repo_url = {}
|
||||
|
||||
MRuby.targets[@name] = self
|
||||
end
|
||||
|
||||
MRuby::Build.current = MRuby.targets[@name]
|
||||
MRuby.targets[@name].instance_eval(&block)
|
||||
|
||||
build_mrbc_exec if name == 'host'
|
||||
build_mrbtest if test_enabled?
|
||||
end
|
||||
|
||||
def debug_enabled?
|
||||
@enable_debug
|
||||
end
|
||||
|
||||
def enable_debug
|
||||
compilers.each do |c|
|
||||
c.defines += %w(MRB_DEBUG)
|
||||
if toolchains.any? { |toolchain| toolchain == "gcc" }
|
||||
c.flags += %w(-g3 -O0)
|
||||
end
|
||||
end
|
||||
@mrbc.compile_options += ' -g'
|
||||
|
||||
@enable_debug = true
|
||||
end
|
||||
|
||||
def disable_lock
|
||||
@enable_lock = false
|
||||
end
|
||||
|
||||
def lock_enabled?
|
||||
Lockfile.enabled? && @enable_lock
|
||||
end
|
||||
|
||||
def disable_cxx_exception
|
||||
if @cxx_exception_enabled or @cxx_abi_enabled
|
||||
raise "cxx_exception already enabled"
|
||||
end
|
||||
@cxx_exception_disabled = true
|
||||
end
|
||||
|
||||
def enable_cxx_exception
|
||||
return if @cxx_exception_enabled
|
||||
return if @cxx_abi_enabled
|
||||
if @cxx_exception_disabled
|
||||
raise "cxx_exception disabled"
|
||||
end
|
||||
@cxx_exception_enabled = true
|
||||
compilers.each { |c|
|
||||
c.defines += %w(MRB_ENABLE_CXX_EXCEPTION)
|
||||
c.flags << c.cxx_exception_flag
|
||||
}
|
||||
linker.command = cxx.command if toolchains.find { |v| v == 'gcc' }
|
||||
end
|
||||
|
||||
def cxx_exception_enabled?
|
||||
@cxx_exception_enabled
|
||||
end
|
||||
|
||||
def cxx_abi_enabled?
|
||||
@cxx_abi_enabled
|
||||
end
|
||||
|
||||
def enable_cxx_abi
|
||||
return if @cxx_abi_enabled
|
||||
if @cxx_exception_enabled
|
||||
raise "cxx_exception already enabled"
|
||||
end
|
||||
compilers.each { |c|
|
||||
c.defines += %w(MRB_ENABLE_CXX_EXCEPTION MRB_ENABLE_CXX_ABI)
|
||||
c.flags << c.cxx_compile_flag
|
||||
c.flags = c.flags.flatten - c.cxx_invalid_flags.flatten
|
||||
}
|
||||
linker.command = cxx.command if toolchains.find { |v| v == 'gcc' }
|
||||
@cxx_abi_enabled = true
|
||||
end
|
||||
|
||||
def compile_as_cxx src, cxx_src, obj = nil, includes = []
|
||||
obj = objfile(cxx_src) if obj.nil?
|
||||
|
||||
file cxx_src => [src, __FILE__] do |t|
|
||||
mkdir_p File.dirname t.name
|
||||
IO.write t.name, <<EOS
|
||||
#define __STDC_CONSTANT_MACROS
|
||||
#define __STDC_LIMIT_MACROS
|
||||
|
||||
#ifndef MRB_ENABLE_CXX_ABI
|
||||
extern "C" {
|
||||
#endif
|
||||
#include "#{File.absolute_path src}"
|
||||
#ifndef MRB_ENABLE_CXX_ABI
|
||||
}
|
||||
#endif
|
||||
EOS
|
||||
end
|
||||
|
||||
file obj => cxx_src do |t|
|
||||
cxx.run t.name, t.prerequisites.first, [], ["#{MRUBY_ROOT}/src"] + includes
|
||||
end
|
||||
|
||||
obj
|
||||
end
|
||||
|
||||
def enable_bintest
|
||||
@enable_bintest = true
|
||||
end
|
||||
|
||||
def bintest_enabled?
|
||||
@enable_bintest
|
||||
end
|
||||
|
||||
def toolchain(name, params={})
|
||||
name = name.to_s
|
||||
tc = Toolchain.toolchains[name] || begin
|
||||
path = "#{MRUBY_ROOT}/tasks/toolchains/#{name}.rake"
|
||||
fail "Unknown #{name} toolchain" unless File.exist?(path)
|
||||
load path
|
||||
Toolchain.toolchains[name]
|
||||
end
|
||||
tc.setup(self, params)
|
||||
@toolchains.unshift name
|
||||
end
|
||||
|
||||
def primary_toolchain
|
||||
@toolchains.first
|
||||
end
|
||||
|
||||
def root
|
||||
MRUBY_ROOT
|
||||
end
|
||||
|
||||
def enable_test
|
||||
@enable_test = true
|
||||
end
|
||||
|
||||
def test_enabled?
|
||||
@enable_test
|
||||
end
|
||||
|
||||
def build_mrbtest
|
||||
gem :core => 'mruby-test'
|
||||
end
|
||||
|
||||
def build_mrbc_exec
|
||||
gem :core => 'mruby-bin-mrbc'
|
||||
end
|
||||
|
||||
def locks
|
||||
Lockfile.build(@name)
|
||||
end
|
||||
|
||||
def mrbcfile
|
||||
return @mrbcfile if @mrbcfile
|
||||
|
||||
mrbc_build = MRuby.targets['host']
|
||||
gems.each { |v| mrbc_build = self if v.name == 'mruby-bin-mrbc' }
|
||||
@mrbcfile = mrbc_build.exefile("#{mrbc_build.build_dir}/bin/mrbc")
|
||||
end
|
||||
|
||||
def compilers
|
||||
COMPILERS.map do |c|
|
||||
instance_variable_get("@#{c}")
|
||||
end
|
||||
end
|
||||
|
||||
def define_rules
|
||||
compilers.each do |compiler|
|
||||
if respond_to?(:enable_gems?) && enable_gems?
|
||||
compiler.defines -= %w(DISABLE_GEMS)
|
||||
else
|
||||
compiler.defines += %w(DISABLE_GEMS)
|
||||
end
|
||||
compiler.define_rules build_dir, File.expand_path(File.join(File.dirname(__FILE__), '..', '..'))
|
||||
end
|
||||
end
|
||||
|
||||
def filename(name)
|
||||
if name.is_a?(Array)
|
||||
name.flatten.map { |n| filename(n) }
|
||||
else
|
||||
name.gsub('/', file_separator)
|
||||
end
|
||||
end
|
||||
|
||||
def exefile(name)
|
||||
if name.is_a?(Array)
|
||||
name.flatten.map { |n| exefile(n) }
|
||||
elsif File.extname(name).empty?
|
||||
"#{name}#{exts.executable}"
|
||||
else
|
||||
# `name` sometimes have (non-standard) extension (e.g. `.bat`).
|
||||
name
|
||||
end
|
||||
end
|
||||
|
||||
def objfile(name)
|
||||
if name.is_a?(Array)
|
||||
name.flatten.map { |n| objfile(n) }
|
||||
else
|
||||
"#{name}#{exts.object}"
|
||||
end
|
||||
end
|
||||
|
||||
def libfile(name)
|
||||
if name.is_a?(Array)
|
||||
name.flatten.map { |n| libfile(n) }
|
||||
else
|
||||
"#{name}#{exts.library}"
|
||||
end
|
||||
end
|
||||
|
||||
def build_mrbtest_lib_only
|
||||
@build_mrbtest_lib_only = true
|
||||
end
|
||||
|
||||
def build_mrbtest_lib_only?
|
||||
@build_mrbtest_lib_only
|
||||
end
|
||||
|
||||
def verbose_flag
|
||||
Rake.verbose ? ' -v' : ''
|
||||
end
|
||||
|
||||
def run_test
|
||||
puts ">>> Test #{name} <<<"
|
||||
mrbtest = exefile("#{build_dir}/bin/mrbtest")
|
||||
sh "#{filename mrbtest.relative_path}#{verbose_flag}"
|
||||
puts
|
||||
end
|
||||
|
||||
def run_bintest
|
||||
puts ">>> Bintest #{name} <<<"
|
||||
targets = @gems.select { |v| File.directory? "#{v.dir}/bintest" }.map { |v| filename v.dir }
|
||||
targets << filename(".") if File.directory? "./bintest"
|
||||
sh "ruby test/bintest.rb#{verbose_flag} #{targets.join ' '}"
|
||||
end
|
||||
|
||||
def print_build_summary
|
||||
puts "================================================"
|
||||
puts " Config Name: #{@name}"
|
||||
puts " Output Directory: #{self.build_dir.relative_path}"
|
||||
puts " Binaries: #{@bins.join(', ')}" unless @bins.empty?
|
||||
unless @gems.empty?
|
||||
puts " Included Gems:"
|
||||
gems = @gems.sort_by { |gem| gem.name }
|
||||
gems.each do |gem|
|
||||
gem_version = " - #{gem.version}" if gem.version != '0.0.0'
|
||||
gem_summary = " - #{gem.summary}" if gem.summary
|
||||
puts " #{gem.name}#{gem_version}#{gem_summary}"
|
||||
puts " - Binaries: #{gem.bins.join(', ')}" unless gem.bins.empty?
|
||||
end
|
||||
end
|
||||
puts "================================================"
|
||||
puts
|
||||
end
|
||||
|
||||
def libmruby_static
|
||||
libfile("#{build_dir}/lib/libmruby")
|
||||
end
|
||||
|
||||
def libmruby_core_static
|
||||
libfile("#{build_dir}/lib/libmruby_core")
|
||||
end
|
||||
|
||||
def libraries
|
||||
[libmruby_static]
|
||||
end
|
||||
end # Build
|
||||
|
||||
class CrossBuild < Build
|
||||
attr_block %w(test_runner)
|
||||
# cross compiling targets for building native extensions.
|
||||
# host - arch of where the built binary will run
|
||||
# build - arch of the machine building the binary
|
||||
attr_accessor :host_target, :build_target
|
||||
|
||||
def initialize(name, build_dir=nil, &block)
|
||||
@endian = nil
|
||||
@test_runner = Command::CrossTestRunner.new(self)
|
||||
super
|
||||
end
|
||||
|
||||
def mrbcfile
|
||||
MRuby.targets['host'].exefile("#{MRuby.targets['host'].build_dir}/bin/mrbc")
|
||||
end
|
||||
|
||||
def run_test
|
||||
@test_runner.runner_options << verbose_flag
|
||||
mrbtest = exefile("#{build_dir}/bin/mrbtest")
|
||||
if (@test_runner.command == nil)
|
||||
puts "You should run #{mrbtest} on target device."
|
||||
puts
|
||||
else
|
||||
@test_runner.run(mrbtest)
|
||||
end
|
||||
end
|
||||
end # CrossBuild
|
||||
end # MRuby
|
||||
+471
@@ -0,0 +1,471 @@
|
||||
require 'forwardable'
|
||||
autoload :TSort, 'tsort'
|
||||
autoload :Shellwords, 'shellwords'
|
||||
|
||||
module MRuby
|
||||
module Gem
|
||||
class << self
|
||||
attr_accessor :current
|
||||
end
|
||||
LinkerConfig = Struct.new(:libraries, :library_paths, :flags, :flags_before_libraries, :flags_after_libraries)
|
||||
|
||||
class Specification
|
||||
include Rake::DSL
|
||||
extend Forwardable
|
||||
def_delegators :@build, :filename, :objfile, :libfile, :exefile
|
||||
|
||||
attr_accessor :name, :dir, :build
|
||||
alias mruby build
|
||||
attr_accessor :build_config_initializer
|
||||
attr_accessor :mrblib_dir, :objs_dir
|
||||
|
||||
attr_accessor :version
|
||||
attr_accessor :description, :summary
|
||||
attr_accessor :homepage
|
||||
attr_accessor :licenses, :authors
|
||||
alias :license= :licenses=
|
||||
alias :author= :authors=
|
||||
|
||||
attr_accessor :rbfiles, :objs
|
||||
attr_accessor :test_objs, :test_rbfiles, :test_args
|
||||
attr_accessor :test_preload
|
||||
|
||||
attr_accessor :bins
|
||||
|
||||
attr_accessor :requirements
|
||||
attr_reader :dependencies, :conflicts
|
||||
|
||||
attr_accessor :export_include_paths
|
||||
|
||||
attr_reader :generate_functions
|
||||
|
||||
attr_block MRuby::Build::COMMANDS
|
||||
|
||||
def initialize(name, &block)
|
||||
@name = name
|
||||
@initializer = block
|
||||
@version = "0.0.0"
|
||||
@mrblib_dir = "mrblib"
|
||||
@objs_dir = "src"
|
||||
MRuby::Gem.current = self
|
||||
end
|
||||
|
||||
def setup
|
||||
return if defined?(@linker) # return if already set up
|
||||
|
||||
MRuby::Gem.current = self
|
||||
MRuby::Build::COMMANDS.each do |command|
|
||||
instance_variable_set("@#{command}", @build.send(command).clone)
|
||||
end
|
||||
@linker = LinkerConfig.new([], [], [], [], [])
|
||||
|
||||
@rbfiles = Dir.glob("#{@dir}/#{@mrblib_dir}/**/*.rb").sort
|
||||
@objs = Dir.glob("#{@dir}/#{@objs_dir}/*.{c,cpp,cxx,cc,m,asm,s,S}").map do |f|
|
||||
objfile(f.relative_path_from(@dir).to_s.pathmap("#{build_dir}/%X"))
|
||||
end
|
||||
|
||||
@test_rbfiles = Dir.glob("#{dir}/test/**/*.rb").sort
|
||||
@test_objs = Dir.glob("#{dir}/test/*.{c,cpp,cxx,cc,m,asm,s,S}").map do |f|
|
||||
objfile(f.relative_path_from(dir).to_s.pathmap("#{build_dir}/%X"))
|
||||
end
|
||||
@custom_test_init = !@test_objs.empty?
|
||||
@test_preload = nil # 'test/assert.rb'
|
||||
@test_args = {}
|
||||
|
||||
@bins = []
|
||||
|
||||
@requirements = []
|
||||
@dependencies, @conflicts = [], []
|
||||
@export_include_paths = []
|
||||
@export_include_paths << "#{dir}/include" if File.directory? "#{dir}/include"
|
||||
|
||||
instance_eval(&@initializer)
|
||||
|
||||
@generate_functions = !(@rbfiles.empty? && @objs.empty?)
|
||||
@objs << objfile("#{build_dir}/gem_init") if @generate_functions
|
||||
|
||||
if !name || !licenses || !authors
|
||||
fail "#{name || dir} required to set name, license(s) and author(s)"
|
||||
end
|
||||
|
||||
build.libmruby_objs << @objs
|
||||
|
||||
instance_eval(&@build_config_initializer) if @build_config_initializer
|
||||
|
||||
repo_url = build.gem_dir_to_repo_url[dir]
|
||||
build.locks[repo_url]['version'] = version if repo_url
|
||||
end
|
||||
|
||||
def setup_compilers
|
||||
compilers.each do |compiler|
|
||||
compiler.define_rules build_dir, "#{dir}"
|
||||
compiler.defines << %Q[MRBGEM_#{funcname.upcase}_VERSION=#{version}]
|
||||
compiler.include_paths << "#{dir}/include" if File.directory? "#{dir}/include"
|
||||
end
|
||||
|
||||
define_gem_init_builder if @generate_functions
|
||||
end
|
||||
|
||||
def for_windows?
|
||||
if build.kind_of?(MRuby::CrossBuild)
|
||||
return %w(x86_64-w64-mingw32 i686-w64-mingw32).include?(build.host_target)
|
||||
elsif build.kind_of?(MRuby::Build)
|
||||
return ('A'..'Z').to_a.any? { |vol| Dir.exist?("#{vol}:") }
|
||||
end
|
||||
return false
|
||||
end
|
||||
|
||||
def add_dependency(name, *requirements)
|
||||
default_gem = requirements.last.kind_of?(Hash) ? requirements.pop : nil
|
||||
requirements = ['>= 0.0.0'] if requirements.empty?
|
||||
requirements.flatten!
|
||||
@dependencies << {:gem => name, :requirements => requirements, :default => default_gem}
|
||||
end
|
||||
|
||||
def add_test_dependency(*args)
|
||||
add_dependency(*args) if build.test_enabled? || build.bintest_enabled?
|
||||
end
|
||||
|
||||
def add_conflict(name, *req)
|
||||
@conflicts << {:gem => name, :requirements => req.empty? ? nil : req}
|
||||
end
|
||||
|
||||
def build_dir
|
||||
"#{build.build_dir}/mrbgems/#{name}"
|
||||
end
|
||||
|
||||
def test_rbireps
|
||||
"#{build_dir}/gem_test.c"
|
||||
end
|
||||
|
||||
def search_package(name, version_query=nil)
|
||||
package_query = name
|
||||
package_query += " #{version_query}" if version_query
|
||||
_pp "PKG-CONFIG", package_query
|
||||
escaped_package_query = Shellwords.escape(package_query)
|
||||
if system("pkg-config --exists #{escaped_package_query}")
|
||||
cc.flags += [`pkg-config --cflags #{escaped_package_query}`.strip]
|
||||
cxx.flags += [`pkg-config --cflags #{escaped_package_query}`.strip]
|
||||
linker.flags_before_libraries += [`pkg-config --libs #{escaped_package_query}`.strip]
|
||||
true
|
||||
else
|
||||
false
|
||||
end
|
||||
end
|
||||
|
||||
def funcname
|
||||
@funcname ||= @name.gsub('-', '_')
|
||||
end
|
||||
|
||||
def compilers
|
||||
MRuby::Build::COMPILERS.map do |c|
|
||||
instance_variable_get("@#{c}")
|
||||
end
|
||||
end
|
||||
|
||||
def define_gem_init_builder
|
||||
file objfile("#{build_dir}/gem_init") => [ "#{build_dir}/gem_init.c", File.join(dir, "mrbgem.rake") ]
|
||||
file "#{build_dir}/gem_init.c" => [build.mrbcfile, __FILE__] + [rbfiles].flatten do |t|
|
||||
mkdir_p build_dir
|
||||
generate_gem_init("#{build_dir}/gem_init.c")
|
||||
end
|
||||
end
|
||||
|
||||
def generate_gem_init(fname)
|
||||
open(fname, 'w') do |f|
|
||||
print_gem_init_header f
|
||||
build.mrbc.run f, rbfiles, "gem_mrblib_irep_#{funcname}" unless rbfiles.empty?
|
||||
f.puts %Q[void mrb_#{funcname}_gem_init(mrb_state *mrb);]
|
||||
f.puts %Q[void mrb_#{funcname}_gem_final(mrb_state *mrb);]
|
||||
f.puts %Q[]
|
||||
f.puts %Q[void GENERATED_TMP_mrb_#{funcname}_gem_init(mrb_state *mrb) {]
|
||||
f.puts %Q[ int ai = mrb_gc_arena_save(mrb);]
|
||||
f.puts %Q[ mrb_#{funcname}_gem_init(mrb);] if objs != [objfile("#{build_dir}/gem_init")]
|
||||
unless rbfiles.empty?
|
||||
f.puts %Q[ mrb_load_irep(mrb, gem_mrblib_irep_#{funcname});]
|
||||
f.puts %Q[ if (mrb->exc) {]
|
||||
f.puts %Q[ mrb_print_error(mrb);]
|
||||
f.puts %Q[ mrb_close(mrb);]
|
||||
f.puts %Q[ exit(EXIT_FAILURE);]
|
||||
f.puts %Q[ }]
|
||||
end
|
||||
f.puts %Q[ mrb_gc_arena_restore(mrb, ai);]
|
||||
f.puts %Q[}]
|
||||
f.puts %Q[]
|
||||
f.puts %Q[void GENERATED_TMP_mrb_#{funcname}_gem_final(mrb_state *mrb) {]
|
||||
f.puts %Q[ mrb_#{funcname}_gem_final(mrb);] if objs != [objfile("#{build_dir}/gem_init")]
|
||||
f.puts %Q[}]
|
||||
end
|
||||
end # generate_gem_init
|
||||
|
||||
def print_gem_comment(f)
|
||||
f.puts %Q[/*]
|
||||
f.puts %Q[ * This file is loading the irep]
|
||||
f.puts %Q[ * Ruby GEM code.]
|
||||
f.puts %Q[ *]
|
||||
f.puts %Q[ * IMPORTANT:]
|
||||
f.puts %Q[ * This file was generated!]
|
||||
f.puts %Q[ * All manual changes will get lost.]
|
||||
f.puts %Q[ */]
|
||||
end
|
||||
|
||||
def print_gem_init_header(f)
|
||||
print_gem_comment(f)
|
||||
f.puts %Q[#include <stdlib.h>] unless rbfiles.empty?
|
||||
f.puts %Q[#include <mruby.h>]
|
||||
f.puts %Q[#include <mruby/irep.h>] unless rbfiles.empty?
|
||||
end
|
||||
|
||||
def print_gem_test_header(f)
|
||||
print_gem_comment(f)
|
||||
f.puts %Q[#include <stdio.h>]
|
||||
f.puts %Q[#include <stdlib.h>]
|
||||
f.puts %Q[#include <mruby.h>]
|
||||
f.puts %Q[#include <mruby/irep.h>]
|
||||
f.puts %Q[#include <mruby/variable.h>]
|
||||
f.puts %Q[#include <mruby/hash.h>] unless test_args.empty?
|
||||
end
|
||||
|
||||
def test_dependencies
|
||||
[@name]
|
||||
end
|
||||
|
||||
def custom_test_init?
|
||||
@custom_test_init
|
||||
end
|
||||
|
||||
def version_ok?(req_versions)
|
||||
req_versions.map do |req|
|
||||
cmp, ver = req.split
|
||||
cmp_result = Version.new(version) <=> Version.new(ver)
|
||||
case cmp
|
||||
when '=' then cmp_result == 0
|
||||
when '!=' then cmp_result != 0
|
||||
when '>' then cmp_result == 1
|
||||
when '<' then cmp_result == -1
|
||||
when '>=' then cmp_result >= 0
|
||||
when '<=' then cmp_result <= 0
|
||||
when '~>'
|
||||
Version.new(version).twiddle_wakka_ok?(Version.new(ver))
|
||||
else
|
||||
fail "Comparison not possible with '#{cmp}'"
|
||||
end
|
||||
end.all?
|
||||
end
|
||||
end # Specification
|
||||
|
||||
class Version
|
||||
include Comparable
|
||||
include Enumerable
|
||||
|
||||
def <=>(other)
|
||||
ret = 0
|
||||
own = to_enum
|
||||
|
||||
other.each do |oth|
|
||||
begin
|
||||
ret = own.next <=> oth
|
||||
rescue StopIteration
|
||||
ret = 0 <=> oth
|
||||
end
|
||||
|
||||
break unless ret == 0
|
||||
end
|
||||
|
||||
ret
|
||||
end
|
||||
|
||||
# ~> compare algorithm
|
||||
#
|
||||
# Example:
|
||||
# ~> 2 means >= 2.0.0 and < 3.0.0
|
||||
# ~> 2.2 means >= 2.2.0 and < 3.0.0
|
||||
# ~> 2.2.2 means >= 2.2.2 and < 2.3.0
|
||||
def twiddle_wakka_ok?(other)
|
||||
gr_or_eql = (self <=> other) >= 0
|
||||
still_major_or_minor = (self <=> other.skip_major_or_minor) < 0
|
||||
gr_or_eql and still_major_or_minor
|
||||
end
|
||||
|
||||
def skip_major_or_minor
|
||||
a = @ary.dup
|
||||
a << 0 if a.size == 1 # ~> 2 can also be represented as ~> 2.0
|
||||
a.slice!(-1)
|
||||
a[-1] = a[-1].succ
|
||||
a
|
||||
end
|
||||
|
||||
def initialize(str)
|
||||
@str = str
|
||||
@ary = @str.split('.').map(&:to_i)
|
||||
end
|
||||
|
||||
def each(&block); @ary.each(&block); end
|
||||
def [](index); @ary[index]; end
|
||||
def []=(index, value)
|
||||
@ary[index] = value
|
||||
@str = @ary.join('.')
|
||||
end
|
||||
def slice!(index)
|
||||
@ary.slice!(index)
|
||||
@str = @ary.join('.')
|
||||
end
|
||||
end # Version
|
||||
|
||||
class List
|
||||
include Enumerable
|
||||
|
||||
def initialize
|
||||
@ary = []
|
||||
end
|
||||
|
||||
def each(&b)
|
||||
@ary.each(&b)
|
||||
end
|
||||
|
||||
def <<(gem)
|
||||
unless @ary.detect {|g| g.dir == gem.dir }
|
||||
@ary << gem
|
||||
else
|
||||
# GEM was already added to this list
|
||||
end
|
||||
end
|
||||
|
||||
def empty?
|
||||
@ary.empty?
|
||||
end
|
||||
|
||||
def default_gem_params dep
|
||||
if dep[:default]; dep
|
||||
elsif File.exist? "#{MRUBY_ROOT}/mrbgems/#{dep[:gem]}" # check core
|
||||
{ :gem => dep[:gem], :default => { :core => dep[:gem] } }
|
||||
else # fallback to mgem-list
|
||||
{ :gem => dep[:gem], :default => { :mgem => dep[:gem] } }
|
||||
end
|
||||
end
|
||||
|
||||
def generate_gem_table build
|
||||
gem_table = each_with_object({}) { |spec, h| h[spec.name] = spec }
|
||||
|
||||
default_gems = {}
|
||||
each do |g|
|
||||
g.dependencies.each do |dep|
|
||||
default_gems[dep[:gem]] ||= default_gem_params(dep)
|
||||
end
|
||||
end
|
||||
|
||||
until default_gems.empty?
|
||||
def_name, def_gem = default_gems.shift
|
||||
next if gem_table[def_name]
|
||||
|
||||
spec = gem_table[def_name] = build.gem(def_gem[:default])
|
||||
fail "Invalid gem name: #{spec.name} (Expected: #{def_name})" if spec.name != def_name
|
||||
spec.setup
|
||||
|
||||
spec.dependencies.each do |dep|
|
||||
default_gems[dep[:gem]] ||= default_gem_params(dep)
|
||||
end
|
||||
end
|
||||
|
||||
each do |g|
|
||||
g.dependencies.each do |dep|
|
||||
name = dep[:gem]
|
||||
req_versions = dep[:requirements]
|
||||
dep_g = gem_table[name]
|
||||
|
||||
# check each GEM dependency against all available GEMs
|
||||
if dep_g.nil?
|
||||
fail "The GEM '#{g.name}' depends on the GEM '#{name}' but it could not be found"
|
||||
end
|
||||
unless dep_g.version_ok? req_versions
|
||||
fail "#{name} version should be #{req_versions.join(' and ')} but was '#{dep_g.version}'"
|
||||
end
|
||||
end
|
||||
|
||||
cfls = g.conflicts.select { |c|
|
||||
cfl_g = gem_table[c[:gem]]
|
||||
cfl_g and cfl_g.version_ok?(c[:requirements] || ['>= 0.0.0'])
|
||||
}.map { |c| "#{c[:gem]}(#{gem_table[c[:gem]].version})" }
|
||||
fail "Conflicts of gem `#{g.name}` found: #{cfls.join ', '}" unless cfls.empty?
|
||||
end
|
||||
|
||||
gem_table
|
||||
end
|
||||
|
||||
def tsort_dependencies ary, table, all_dependency_listed = false
|
||||
unless all_dependency_listed
|
||||
left = ary.dup
|
||||
until left.empty?
|
||||
v = left.pop
|
||||
table[v].dependencies.each do |dep|
|
||||
left.push dep[:gem]
|
||||
ary.push dep[:gem]
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
ary.uniq!
|
||||
table.instance_variable_set :@root_gems, ary
|
||||
class << table
|
||||
include TSort
|
||||
def tsort_each_node &b
|
||||
@root_gems.each &b
|
||||
end
|
||||
|
||||
def tsort_each_child(n, &b)
|
||||
fetch(n).dependencies.each do |v|
|
||||
b.call v[:gem]
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
begin
|
||||
table.tsort.map { |v| table[v] }
|
||||
rescue TSort::Cyclic => e
|
||||
fail "Circular mrbgem dependency found: #{e.message}"
|
||||
end
|
||||
end
|
||||
|
||||
def check(build)
|
||||
gem_table = generate_gem_table build
|
||||
|
||||
@ary = tsort_dependencies gem_table.keys, gem_table, true
|
||||
|
||||
each(&:setup_compilers)
|
||||
|
||||
each do |g|
|
||||
import_include_paths(g)
|
||||
end
|
||||
end
|
||||
|
||||
def import_include_paths(g)
|
||||
gem_table = each_with_object({}) { |spec, h| h[spec.name] = spec }
|
||||
|
||||
g.dependencies.each do |dep|
|
||||
dep_g = gem_table[dep[:gem]]
|
||||
# We can do recursive call safely
|
||||
# as circular dependency has already detected in the caller.
|
||||
import_include_paths(dep_g)
|
||||
|
||||
dep_g.export_include_paths.uniq!
|
||||
g.compilers.each do |compiler|
|
||||
compiler.include_paths += dep_g.export_include_paths
|
||||
g.export_include_paths += dep_g.export_include_paths
|
||||
compiler.include_paths.uniq!
|
||||
g.export_include_paths.uniq!
|
||||
end
|
||||
end
|
||||
end
|
||||
end # List
|
||||
end # Gem
|
||||
|
||||
GemBox = Object.new
|
||||
class << GemBox
|
||||
attr_accessor :path
|
||||
|
||||
def new(&block); block.call(self); end
|
||||
def config=(obj); @config = obj; end
|
||||
def gem(gemdir, &block); @config.gem(gemdir, &block); end
|
||||
def gembox(gemfile); @config.gembox(gemfile); end
|
||||
end # GemBox
|
||||
end # MRuby
|
||||
+81
@@ -0,0 +1,81 @@
|
||||
autoload :YAML, 'yaml'
|
||||
|
||||
module MRuby
|
||||
autoload :Source, 'mruby/source'
|
||||
|
||||
class Lockfile
|
||||
class << self
|
||||
def enable
|
||||
@enabled = true
|
||||
end
|
||||
|
||||
def disable
|
||||
@enabled = false
|
||||
end
|
||||
|
||||
def enabled?
|
||||
@enabled
|
||||
end
|
||||
|
||||
def build(target_name)
|
||||
instance.build(target_name)
|
||||
end
|
||||
|
||||
def write
|
||||
instance.write if enabled?
|
||||
end
|
||||
|
||||
def instance
|
||||
@instance ||= new("#{MRUBY_CONFIG}.lock")
|
||||
end
|
||||
end
|
||||
|
||||
def initialize(filename)
|
||||
@filename = filename
|
||||
end
|
||||
|
||||
def build(target_name)
|
||||
read[target_name] ||= {}
|
||||
end
|
||||
|
||||
def write
|
||||
locks = {"mruby_version" => mruby}
|
||||
locks["builds"] = @builds if @builds
|
||||
File.write(@filename, YAML.dump(locks))
|
||||
end
|
||||
|
||||
private
|
||||
|
||||
def read
|
||||
@builds ||= if File.exist?(@filename)
|
||||
YAML.load_file(@filename)["builds"] || {}
|
||||
else
|
||||
{}
|
||||
end
|
||||
end
|
||||
|
||||
def shellquote(s)
|
||||
if ENV['OS'] == 'Windows_NT'
|
||||
"\"#{s}\""
|
||||
else
|
||||
"'#{s}'"
|
||||
end
|
||||
end
|
||||
|
||||
def mruby
|
||||
mruby = {
|
||||
'version' => MRuby::Source::MRUBY_VERSION,
|
||||
'release_no' => MRuby::Source::MRUBY_RELEASE_NO,
|
||||
}
|
||||
|
||||
git_dir = "#{MRUBY_ROOT}/.git"
|
||||
if File.directory?(git_dir)
|
||||
mruby['git_commit'] = `git --git-dir #{shellquote(git_dir)} --work-tree #{shellquote(MRUBY_ROOT)} rev-parse --verify HEAD`.strip
|
||||
end
|
||||
|
||||
mruby
|
||||
end
|
||||
|
||||
enable
|
||||
end
|
||||
end
|
||||
+32
@@ -0,0 +1,32 @@
|
||||
require "pathname"
|
||||
|
||||
module MRuby
|
||||
module Source
|
||||
# MRuby's source root directory
|
||||
ROOT = Pathname.new(File.expand_path('../../../',__FILE__))
|
||||
|
||||
# Reads a constant defined at version.h
|
||||
MRUBY_READ_VERSION_CONSTANT = Proc.new do |name|
|
||||
ROOT.join('include','mruby','version.h').read.match(/^#define #{name} +"?([\w\. ]+)"?\r?$/)[1]
|
||||
end
|
||||
|
||||
MRUBY_RUBY_VERSION = MRUBY_READ_VERSION_CONSTANT['MRUBY_RUBY_VERSION']
|
||||
MRUBY_RUBY_ENGINE = MRUBY_READ_VERSION_CONSTANT['MRUBY_RUBY_ENGINE']
|
||||
|
||||
MRUBY_RELEASE_MAJOR = Integer(MRUBY_READ_VERSION_CONSTANT['MRUBY_RELEASE_MAJOR'])
|
||||
MRUBY_RELEASE_MINOR = Integer(MRUBY_READ_VERSION_CONSTANT['MRUBY_RELEASE_MINOR'])
|
||||
MRUBY_RELEASE_TEENY = Integer(MRUBY_READ_VERSION_CONSTANT['MRUBY_RELEASE_TEENY'])
|
||||
|
||||
MRUBY_VERSION = [MRUBY_RELEASE_MAJOR,MRUBY_RELEASE_MINOR,MRUBY_RELEASE_TEENY].join('.')
|
||||
MRUBY_RELEASE_NO = (MRUBY_RELEASE_MAJOR * 100 * 100 + MRUBY_RELEASE_MINOR * 100 + MRUBY_RELEASE_TEENY)
|
||||
|
||||
MRUBY_RELEASE_YEAR = Integer(MRUBY_READ_VERSION_CONSTANT['MRUBY_RELEASE_YEAR'])
|
||||
MRUBY_RELEASE_MONTH = Integer(MRUBY_READ_VERSION_CONSTANT['MRUBY_RELEASE_MONTH'])
|
||||
MRUBY_RELEASE_DAY = Integer(MRUBY_READ_VERSION_CONSTANT['MRUBY_RELEASE_DAY'])
|
||||
MRUBY_RELEASE_DATE = [MRUBY_RELEASE_YEAR,MRUBY_RELEASE_MONTH,MRUBY_RELEASE_DAY].join('.')
|
||||
|
||||
MRUBY_BIRTH_YEAR = Integer(MRUBY_READ_VERSION_CONSTANT['MRUBY_BIRTH_YEAR'])
|
||||
|
||||
MRUBY_AUTHOR = MRUBY_READ_VERSION_CONSTANT['MRUBY_AUTHOR']
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user