microbit-mruby/make-mruby-source.rb at mruby · mruby-Forum/microbit-mruby · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
require 'fileutils'

CORE_GEMS = %w(
  mruby-string-ext
)

SRC_ROOT = File.join('.', 'mruby')
DST_ROOT = File.join('source', 'mruby')
SRC_BUILD = File.join(SRC_ROOT, 'build', 'microbit')

# source/mruby
FileUtils.mkdir_p DST_ROOT

# copy src/
FileUtils.cp_r File.join(SRC_ROOT, 'src'), DST_ROOT

# copy include/
FileUtils.cp_r File.join(SRC_ROOT, 'include'), DST_ROOT
# presym/id.h, presym/table.h
FileUtils.cp_r File.join(SRC_BUILD, 'include'), DST_ROOT

# copy mrblib/mrblib.c
mrblib_dir = File.join(DST_ROOT, 'mrblib')
FileUtils.mkdir_p mrblib_dir
FileUtils.cp File.join(SRC_BUILD, 'mrblib', 'mrblib.c'), mrblib_dir

# copy external mrbgems

# mruby/build/microbit/mrbgems/*.c
mrbgems = Dir.glob(File.join(SRC_BUILD, 'mrbgems', '*.c')).map {|mgem|
  ['', mgem]
}

# mruby/build/microbit/mrbgems/mruby-xxxx/*.c
Dir.glob(File.join(SRC_BUILD, 'mrbgems', '*', '*.c')).each {|mgem|
  mrbgems << [mgem.split('/')[-2], mgem]
}

# mruby/build/repos/microbit/mruby-xxxx/src/*.c
Dir.glob(File.join(SRC_ROOT, 'build', 'repos', 'microbit', '*', 'src', '*.c')).each {|mgem|
  mrbgems << [mgem.split('/')[-3], mgem]
}

# mruby/mrbgems/mruby-xxxx/src/*.c
CORE_GEMS.each {|coremgem|
  Dir.glob(File.join(SRC_ROOT, 'mrbgems', coremgem, 'src', '*.c')).each {|mgems|
    mrbgems << [coremgem, mgems]
  }
}

# copy mrbgems sources
mgem_src_dir = File.join(DST_ROOT, 'src', 'mrbgems')
FileUtils.mkdir_p mgem_src_dir
mrbgems.each {|mgem|
  dst_dir = File.join(mgem_src_dir, mgem[0])
  FileUtils.mkdir_p(dst_dir) if mgem[0].length > 0
  FileUtils.cp mgem[1], dst_dir
}

# rename string.h to _string.h
FileUtils.mv File.join(DST_ROOT, 'include', 'mruby', 'string.h'), File.join(DST_ROOT, 'include', 'mruby', '_string.h')

bak = case RUBY_PLATFORM.downcase
when /darwin/ # macOS
  "''"
else  # Linux and other
  ''
end

# modify #inlucde string.h
`find source/mruby -type f | grep '\.[ch]$'`.each_line {|f|
  if f =~ /\.[ch]$/
    `sed -i #{bak} 's!mruby/string.h!mruby/_string.h!g' #{f}`
  end
}

# patch mrbconf.h
MRBCONF_DEFS = [
  "/* Defines for Micro:bit */\n",
  "#define MRB_32BIT\n",
  "#define MRB_USE_FLOAT\n",
  "#define MRB_WORD_BOXING\n",
  "#define POOL_PAGE_SIZE 1024\n",
  "#define MRB_CONSTRAINED_BASELINE_PROFILE\n",
  "\n"
]
MRBCONF_TARGET_LINE = 12  # target line for insert definitions

mrbconf = File.join(DST_ROOT, 'include', 'mrbconf.h')
mrbconf_bak = mrbconf + '.bak'
FileUtils.mv mrbconf, mrbconf_bak
File.open(mrbconf_bak, 'r') {|fb|
  conf = fb.readlines
  conf.insert(MRBCONF_TARGET_LINE, MRBCONF_DEFS)
  File.open(mrbconf, 'w') {|fn|
    fn.write conf.flatten.join('')
  }
}

# patch boxing_word.h
boxing_word = File.join(DST_ROOT, 'include', 'mruby', 'boxing_word.h')
boxing_word_bak = boxing_word + '.bak'
FileUtils.cp boxing_word, boxing_word_bak
`sed -i #{bak} 's/^\s\s\(\!mrb_immediate_p\(o\)\s*\&\&\s/\s\s(/g' #{boxing_word}`