[270] | 1 | MRuby::Gem::Specification.new('mruby-test') do |spec|
|
---|
| 2 | spec.license = 'MIT'
|
---|
| 3 | spec.author = 'mruby developers'
|
---|
| 4 | spec.summary = 'mruby test'
|
---|
| 5 |
|
---|
| 6 | build.bins << 'mrbtest'
|
---|
| 7 | spec.add_dependency('mruby-compiler', :core => 'mruby-compiler')
|
---|
| 8 |
|
---|
[331] | 9 | spec.test_rbfiles = Dir.glob("#{MRUBY_ROOT}/test/t/*.rb")
|
---|
| 10 |
|
---|
[270] | 11 | clib = "#{build_dir}/mrbtest.c"
|
---|
| 12 | mlib = clib.ext(exts.object)
|
---|
| 13 | exec = exefile("#{build.build_dir}/bin/mrbtest")
|
---|
| 14 |
|
---|
| 15 | mrbtest_lib = libfile("#{build_dir}/mrbtest")
|
---|
| 16 | mrbtest_objs = []
|
---|
| 17 |
|
---|
[439] | 18 | driver_objs = Dir.glob("#{dir}/*.{c,cpp,cxx,cc,m,asm,s,S}").map do |f|
|
---|
| 19 | objfile(f.relative_path_from(dir).to_s.pathmap("#{build_dir}/%X"))
|
---|
| 20 | end
|
---|
[270] | 21 |
|
---|
| 22 | assert_c = "#{build_dir}/assert.c"
|
---|
| 23 | assert_rb = "#{MRUBY_ROOT}/test/assert.rb"
|
---|
| 24 | assert_lib = assert_c.ext(exts.object)
|
---|
| 25 | mrbtest_objs << assert_lib
|
---|
| 26 |
|
---|
| 27 | file assert_lib => assert_c
|
---|
[439] | 28 | file assert_c => [assert_rb, build.mrbcfile] do |t|
|
---|
[270] | 29 | open(t.name, 'w') do |f|
|
---|
| 30 | mrbc.run f, assert_rb, 'mrbtest_assert_irep'
|
---|
| 31 | end
|
---|
| 32 | end
|
---|
| 33 |
|
---|
| 34 | gem_table = build.gems.generate_gem_table build
|
---|
| 35 |
|
---|
| 36 | build.gems.each do |g|
|
---|
| 37 | test_rbobj = g.test_rbireps.ext(exts.object)
|
---|
| 38 | g.test_objs << test_rbobj
|
---|
| 39 | dep_list = build.gems.tsort_dependencies(g.test_dependencies, gem_table).select(&:generate_functions)
|
---|
| 40 |
|
---|
| 41 | file test_rbobj => g.test_rbireps
|
---|
[439] | 42 | file g.test_rbireps => [g.test_rbfiles, build.mrbcfile].flatten do |t|
|
---|
| 43 | mkdir_p File.dirname(t.name)
|
---|
[270] | 44 | open(t.name, 'w') do |f|
|
---|
| 45 | g.print_gem_test_header(f)
|
---|
| 46 | test_preload = g.test_preload and [g.dir, MRUBY_ROOT].map {|dir|
|
---|
| 47 | File.expand_path(g.test_preload, dir)
|
---|
| 48 | }.find {|file| File.exist?(file) }
|
---|
| 49 |
|
---|
| 50 | f.puts %Q[/*]
|
---|
| 51 | f.puts %Q[ * This file contains a test code for #{g.name} gem.]
|
---|
| 52 | f.puts %Q[ *]
|
---|
| 53 | f.puts %Q[ * IMPORTANT:]
|
---|
| 54 | f.puts %Q[ * This file was generated!]
|
---|
| 55 | f.puts %Q[ * All manual changes will get lost.]
|
---|
| 56 | f.puts %Q[ */]
|
---|
| 57 | if test_preload.nil?
|
---|
| 58 | f.puts %Q[extern const uint8_t mrbtest_assert_irep[];]
|
---|
| 59 | else
|
---|
| 60 | g.build.mrbc.run f, test_preload, "gem_test_irep_#{g.funcname}_preload"
|
---|
| 61 | end
|
---|
| 62 | g.test_rbfiles.flatten.each_with_index do |rbfile, i|
|
---|
| 63 | g.build.mrbc.run f, rbfile, "gem_test_irep_#{g.funcname}_#{i}"
|
---|
| 64 | end
|
---|
| 65 | f.puts %Q[void mrb_#{g.funcname}_gem_test(mrb_state *mrb);] unless g.test_objs.empty?
|
---|
| 66 | dep_list.each do |d|
|
---|
| 67 | f.puts %Q[void GENERATED_TMP_mrb_#{d.funcname}_gem_init(mrb_state *mrb);]
|
---|
| 68 | f.puts %Q[void GENERATED_TMP_mrb_#{d.funcname}_gem_final(mrb_state *mrb);]
|
---|
| 69 | end
|
---|
| 70 | f.puts %Q[void mrb_init_test_driver(mrb_state *mrb, mrb_bool verbose);]
|
---|
| 71 | f.puts %Q[void mrb_t_pass_result(mrb_state *dst, mrb_state *src);]
|
---|
| 72 | f.puts %Q[void GENERATED_TMP_mrb_#{g.funcname}_gem_test(mrb_state *mrb) {]
|
---|
| 73 | unless g.test_rbfiles.empty?
|
---|
| 74 | f.puts %Q[ mrb_state *mrb2;]
|
---|
| 75 | unless g.test_args.empty?
|
---|
| 76 | f.puts %Q[ mrb_value test_args_hash;]
|
---|
| 77 | end
|
---|
| 78 | f.puts %Q[ int ai;]
|
---|
| 79 | g.test_rbfiles.count.times do |i|
|
---|
| 80 | f.puts %Q[ ai = mrb_gc_arena_save(mrb);]
|
---|
| 81 | f.puts %Q[ mrb2 = mrb_open_core(mrb_default_allocf, NULL);]
|
---|
| 82 | f.puts %Q[ if (mrb2 == NULL) {]
|
---|
| 83 | f.puts %Q[ fprintf(stderr, "Invalid mrb_state, exiting \%s", __FUNCTION__);]
|
---|
| 84 | f.puts %Q[ exit(EXIT_FAILURE);]
|
---|
| 85 | f.puts %Q[ }]
|
---|
| 86 | dep_list.each do |d|
|
---|
| 87 | f.puts %Q[ GENERATED_TMP_mrb_#{d.funcname}_gem_init(mrb2);]
|
---|
| 88 | f.puts %Q[ mrb_state_atexit(mrb2, GENERATED_TMP_mrb_#{d.funcname}_gem_final);]
|
---|
| 89 | end
|
---|
| 90 | f.puts %Q[ mrb_init_test_driver(mrb2, mrb_test(mrb_gv_get(mrb, mrb_intern_lit(mrb, "$mrbtest_verbose"))));]
|
---|
| 91 | if test_preload.nil?
|
---|
| 92 | f.puts %Q[ mrb_load_irep(mrb2, mrbtest_assert_irep);]
|
---|
| 93 | else
|
---|
| 94 | f.puts %Q[ mrb_load_irep(mrb2, gem_test_irep_#{g.funcname}_preload);]
|
---|
| 95 | end
|
---|
| 96 | f.puts %Q[ if (mrb2->exc) {]
|
---|
| 97 | f.puts %Q[ mrb_print_error(mrb2);]
|
---|
[439] | 98 | f.puts %Q[ mrb_close(mrb2);]
|
---|
[270] | 99 | f.puts %Q[ exit(EXIT_FAILURE);]
|
---|
| 100 | f.puts %Q[ }]
|
---|
| 101 | f.puts %Q[ mrb_const_set(mrb2, mrb_obj_value(mrb2->object_class), mrb_intern_lit(mrb2, "GEMNAME"), mrb_str_new(mrb2, "#{g.name}", #{g.name.length}));]
|
---|
| 102 |
|
---|
| 103 | unless g.test_args.empty?
|
---|
| 104 | f.puts %Q[ test_args_hash = mrb_hash_new_capa(mrb, #{g.test_args.length}); ]
|
---|
| 105 | g.test_args.each do |arg_name, arg_value|
|
---|
| 106 | escaped_arg_name = arg_name.gsub('\\', '\\\\\\\\').gsub('"', '\"')
|
---|
| 107 | escaped_arg_value = arg_value.gsub('\\', '\\\\\\\\').gsub('"', '\"')
|
---|
| 108 | f.puts %Q[ mrb_hash_set(mrb2, test_args_hash, mrb_str_new(mrb2, "#{escaped_arg_name.to_s}", #{escaped_arg_name.to_s.length}), mrb_str_new(mrb2, "#{escaped_arg_value.to_s}", #{escaped_arg_value.to_s.length})); ]
|
---|
| 109 | end
|
---|
| 110 | f.puts %Q[ mrb_const_set(mrb2, mrb_obj_value(mrb2->object_class), mrb_intern_lit(mrb2, "TEST_ARGS"), test_args_hash); ]
|
---|
| 111 | end
|
---|
| 112 |
|
---|
| 113 | f.puts %Q[ mrb_#{g.funcname}_gem_test(mrb2);] if g.custom_test_init?
|
---|
| 114 |
|
---|
| 115 | f.puts %Q[ mrb_load_irep(mrb2, gem_test_irep_#{g.funcname}_#{i});]
|
---|
| 116 | f.puts %Q[ ]
|
---|
| 117 |
|
---|
| 118 | f.puts %Q[ mrb_t_pass_result(mrb, mrb2);]
|
---|
| 119 | f.puts %Q[ mrb_close(mrb2);]
|
---|
| 120 | f.puts %Q[ mrb_gc_arena_restore(mrb, ai);]
|
---|
| 121 | end
|
---|
| 122 | end
|
---|
| 123 | f.puts %Q[}]
|
---|
| 124 | end
|
---|
| 125 | end
|
---|
| 126 | end
|
---|
| 127 |
|
---|
| 128 | build.gems.each do |v|
|
---|
| 129 | mrbtest_objs.concat v.test_objs
|
---|
| 130 | end
|
---|
| 131 |
|
---|
| 132 | file mrbtest_lib => mrbtest_objs do |t|
|
---|
| 133 | build.archiver.run t.name, t.prerequisites
|
---|
| 134 | end
|
---|
| 135 |
|
---|
| 136 | unless build.build_mrbtest_lib_only?
|
---|
[439] | 137 | file exec => [*driver_objs, mlib, mrbtest_lib, build.libmruby_static] do |t|
|
---|
[270] | 138 | gem_flags = build.gems.map { |g| g.linker.flags }
|
---|
| 139 | gem_flags_before_libraries = build.gems.map { |g| g.linker.flags_before_libraries }
|
---|
| 140 | gem_flags_after_libraries = build.gems.map { |g| g.linker.flags_after_libraries }
|
---|
| 141 | gem_libraries = build.gems.map { |g| g.linker.libraries }
|
---|
| 142 | gem_library_paths = build.gems.map { |g| g.linker.library_paths }
|
---|
[439] | 143 | build.linker.run t.name, t.prerequisites, gem_libraries, gem_library_paths, gem_flags,
|
---|
| 144 | gem_flags_before_libraries, gem_flags_after_libraries
|
---|
[270] | 145 | end
|
---|
| 146 | end
|
---|
| 147 |
|
---|
[331] | 148 | # store the last gem selection and make the re-build
|
---|
| 149 | # of the test gem depending on a change to the gem
|
---|
| 150 | # selection
|
---|
[439] | 151 | active_gems_path = "#{build_dir}/active_gems_path.lst"
|
---|
| 152 | active_gem_list = File.read active_gems_path if File.exist? active_gems_path
|
---|
| 153 | current_gem_list = build.gems.map(&:name).join("\n")
|
---|
| 154 | task active_gems_path do |_t|
|
---|
| 155 | mkdir_p File.dirname(active_gems_path)
|
---|
| 156 | File.write active_gems_path, current_gem_list
|
---|
[331] | 157 | end
|
---|
[439] | 158 | file clib => active_gems_path if active_gem_list != current_gem_list
|
---|
[331] | 159 |
|
---|
[270] | 160 | file mlib => clib
|
---|
[439] | 161 | file clib => [build.mrbcfile, __FILE__] do |_t|
|
---|
[270] | 162 | _pp "GEN", "*.rb", "#{clib.relative_path}"
|
---|
[439] | 163 | mkdir_p File.dirname(clib)
|
---|
[270] | 164 | open(clib, 'w') do |f|
|
---|
| 165 | f.puts %Q[/*]
|
---|
| 166 | f.puts %Q[ * This file contains a list of all]
|
---|
| 167 | f.puts %Q[ * test functions.]
|
---|
| 168 | f.puts %Q[ *]
|
---|
| 169 | f.puts %Q[ * IMPORTANT:]
|
---|
| 170 | f.puts %Q[ * This file was generated!]
|
---|
| 171 | f.puts %Q[ * All manual changes will get lost.]
|
---|
| 172 | f.puts %Q[ */]
|
---|
| 173 | f.puts %Q[]
|
---|
[439] | 174 | f.puts %Q[struct mrb_state;]
|
---|
| 175 | f.puts %Q[typedef struct mrb_state mrb_state;]
|
---|
[270] | 176 | build.gems.each do |g|
|
---|
| 177 | f.puts %Q[void GENERATED_TMP_mrb_#{g.funcname}_gem_test(mrb_state *mrb);]
|
---|
| 178 | end
|
---|
| 179 | f.puts %Q[void mrbgemtest_init(mrb_state* mrb) {]
|
---|
| 180 | build.gems.each do |g|
|
---|
| 181 | f.puts %Q[ GENERATED_TMP_mrb_#{g.funcname}_gem_test(mrb);]
|
---|
| 182 | end
|
---|
| 183 | f.puts %Q[}]
|
---|
| 184 | end
|
---|
| 185 | end
|
---|
| 186 | end
|
---|