[388] | 1 | #!/usr/bin/env ruby
|
---|
| 2 | # -*- coding: utf-8 -*-
|
---|
| 3 | #
|
---|
| 4 | # TOPPERS Software
|
---|
| 5 | # Toyohashi Open Platform for Embedded Real-Time Systems
|
---|
| 6 | #
|
---|
| 7 | # Copyright (C) 2001-2003 by Embedded and Real-Time Systems Laboratory
|
---|
| 8 | # Toyohashi Univ. of Technology, JAPAN
|
---|
| 9 | # Copyright (C) 2006-2016 by Embedded and Real-Time Systems Laboratory
|
---|
| 10 | # Graduate School of Information Science, Nagoya Univ., JAPAN
|
---|
| 11 | #
|
---|
| 12 | # 上記著作権者は,以下の(1)~(4)の条件を満たす場合に限り,本ソフトウェ
|
---|
| 13 | # ア(本ソフトウェアを改変したものを含む.以下同じ)を使用・複製・改
|
---|
| 14 | # 変・再配布(以下,利用と呼ぶ)することを無償で許諾する.
|
---|
| 15 | # (1) 本ソフトウェアをソースコードの形で利用する場合には,上記の著作
|
---|
| 16 | # 権表示,この利用条件および下記の無保証規定が,そのままの形でソー
|
---|
| 17 | # スコード中に含まれていること.
|
---|
| 18 | # (2) 本ソフトウェアを,ライブラリ形式など,他のソフトウェア開発に使
|
---|
| 19 | # 用できる形で再配布する場合には,再配布に伴うドキュメント(利用
|
---|
| 20 | # 者マニュアルなど)に,上記の著作権表示,この利用条件および下記
|
---|
| 21 | # の無保証規定を掲載すること.
|
---|
| 22 | # (3) 本ソフトウェアを,機器に組み込むなど,他のソフトウェア開発に使
|
---|
| 23 | # 用できない形で再配布する場合には,次のいずれかの条件を満たすこ
|
---|
| 24 | # と.
|
---|
| 25 | # (a) 再配布に伴うドキュメント(利用者マニュアルなど)に,上記の著
|
---|
| 26 | # 作権表示,この利用条件および下記の無保証規定を掲載すること.
|
---|
| 27 | # (b) 再配布の形態を,別に定める方法によって,TOPPERSプロジェクトに
|
---|
| 28 | # 報告すること.
|
---|
| 29 | # (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
|
---|
| 30 | # 害からも,上記著作権者およびTOPPERSプロジェクトを免責すること.
|
---|
| 31 | # また,本ソフトウェアのユーザまたはエンドユーザからのいかなる理
|
---|
| 32 | # 由に基づく請求からも,上記著作権者およびTOPPERSプロジェクトを
|
---|
| 33 | # 免責すること.
|
---|
| 34 | #
|
---|
| 35 | # 本ソフトウェアは,無保証で提供されているものである.上記著作権者お
|
---|
| 36 | # よびTOPPERSプロジェクトは,本ソフトウェアに関して,特定の使用目的
|
---|
| 37 | # に対する適合性も含めて,いかなる保証も行わない.また,本ソフトウェ
|
---|
| 38 | # アの利用により直接的または間接的に生じたいかなる損害に関しても,そ
|
---|
| 39 | # の責任を負わない.
|
---|
| 40 | #
|
---|
| 41 | # $Id$
|
---|
| 42 | #
|
---|
| 43 |
|
---|
| 44 | require "optparse"
|
---|
| 45 | require "fileutils"
|
---|
| 46 | require "shell"
|
---|
| 47 |
|
---|
| 48 | # オプションの定義
|
---|
| 49 | #
|
---|
| 50 | # -T <target> ターゲット名(必須)
|
---|
| 51 | # -a <appldirs> アプリケーションのディレクトリ名(複数指定可.デ
|
---|
| 52 | # フォルトはsampleディレクトリ)
|
---|
| 53 | # -A <applname> アプリケーションプログラム名(デフォルトはsample1)
|
---|
| 54 | # -t メインのオブジェクトファイルをリンク対象に含めない
|
---|
| 55 | # -c <cfgfile> システムコンフィギュレーションファイル(.cfgファイ
|
---|
| 56 | # ル名)名
|
---|
| 57 | # -C <cdlflle> コンポーネント記述ファイル(.cdlファイル)名
|
---|
| 58 | # -U <applobjs> 他のアプリケーションプログラムファイル
|
---|
| 59 | # (.oファイル名で指定.複数指定可)
|
---|
| 60 | # -S <syssvcobjs> システムサービスのプログラムファイル
|
---|
| 61 | # (.oファイル名で指定.複数指定可)
|
---|
| 62 | # -L <kernel_lib> カーネルライブラリ(libkernel.a)のディレクトリ名
|
---|
| 63 | # (省略した場合,カーネルライブラリもmakeする)
|
---|
| 64 | # -f カーネルを関数単位でコンパイルするかどうかの指定
|
---|
| 65 | # -D <srcdir> カーネルソースの置かれているディレクトリ
|
---|
| 66 | # -l <srclang> プログラミング言語(現時点ではcとc++のみサポート)
|
---|
| 67 | # -m <tempmakefile> Makefileのテンプレートのファイル名の指定(デフォル
|
---|
| 68 | # トはsampleディレクトリのMakefile)
|
---|
| 69 | # -d <depdir> 依存関係ファイルのディレクトリ名(デフォルトはdeps)
|
---|
| 70 | # -w TECSを使用しない
|
---|
| 71 | # -r トレースログ記録のサンプルコードを使用するかどうか
|
---|
| 72 | # の指定
|
---|
| 73 | # -V <devtooldir> 開発ツール(コンパイラ等)の置かれているディレクトリ
|
---|
| 74 | # -R <ruby> rubyのパス名(明示的に指定する場合)
|
---|
| 75 | # -g <cfg> コンフィギュレータ(cfg)のパス名
|
---|
| 76 | # -G <tecsgen> TECSジェネレータ(tecsgen)のパス名
|
---|
| 77 | # -o <options> コンパイルオプション(COPTSに追加)
|
---|
| 78 | # -O <options> シンボル定義オプション(CDEFSに追加)
|
---|
| 79 | # -k <options> リンカオプション(LDFLAGS等に追加)
|
---|
| 80 | # -e <tinetdir> TINET のソースの置かれているディレクトリ
|
---|
| 81 | # -i <net_if> ネットワークインタフェース(TINETが有効の場合は必須)
|
---|
| 82 | # ether、ppp、loop の何れかを指定する。
|
---|
| 83 | # -v <net_dev> イーサネット・ディバイスドライバ
|
---|
| 84 | # (ネットワークインタフェースに ether を指定した場合は必須)
|
---|
| 85 | # -n <net_proto> ネットワーク層プロトコル(TINETが有効の場合は必須)
|
---|
| 86 | # inet6、inet4、inet6/inet4、inet6m、inet6m/inet4 の何れかを指定する。
|
---|
| 87 | # -s <trans_proto> トランスポート層プロトコル(TINETが有効の場合は必須)
|
---|
| 88 | # tcp、udp、tcp/udp の何れかを指定する。
|
---|
| 89 |
|
---|
| 90 | # 使用例(1)
|
---|
| 91 | #
|
---|
| 92 | # % ../configure.rb -T ct11mpcore_gcc -O "-DTOPPERS_USE_QEMU" \
|
---|
| 93 | # -A perf1 -a ../test -S "test_svc.o histogram.o"
|
---|
| 94 | #
|
---|
| 95 | # 使用例(2)
|
---|
| 96 | #
|
---|
| 97 | # % ../configure.rb -T macosx_gcc -L .
|
---|
| 98 | # アプリケーションプログラムは,sample1になる.
|
---|
| 99 | #
|
---|
| 100 | # 使用例(3)
|
---|
| 101 | #
|
---|
| 102 | # % ../configure.rb -T ct11mpcore_gcc -O "-DTOPPERS_USE_QEMU" -A tSample2 -t
|
---|
| 103 | # アプリケーションプログラムは,TECS版のサンプルプログラムになる.
|
---|
| 104 | #
|
---|
| 105 | # 使用例(4)
|
---|
| 106 | #
|
---|
| 107 | # % ../configure.rb -T ct11mpcore_gcc PRC_NUM=4
|
---|
| 108 | # PRC_NUMを4に定義する.
|
---|
| 109 | #
|
---|
| 110 | # 使用例(5)
|
---|
| 111 | #
|
---|
| 112 | # % ../configure.rb -T gr_sakura_gcc -A sample1n \
|
---|
| 113 | # -e tinet -i ether -v if_rx62n -n inet4 -s tcp -U sample1.o
|
---|
| 114 | # TINETを有効にする.
|
---|
| 115 |
|
---|
| 116 | #
|
---|
| 117 | # 変数の初期化
|
---|
| 118 | #
|
---|
| 119 | $target = nil
|
---|
| 120 | $appldirs = []
|
---|
| 121 | $applobjs = []
|
---|
| 122 | $syssvcobjs = []
|
---|
| 123 | $kernel_lib = ""
|
---|
| 124 | $kernel_funcobjs = ""
|
---|
| 125 | $srclang = "c"
|
---|
| 126 | $depdir = "deps"
|
---|
| 127 | $omit_tecs = ""
|
---|
| 128 | $enable_trace = ""
|
---|
| 129 | $devtooldir = ""
|
---|
| 130 | $ruby = "ruby"
|
---|
| 131 | $copts = []
|
---|
| 132 | $cdefs = []
|
---|
| 133 | $ldflags = []
|
---|
| 134 |
|
---|
| 135 | #
|
---|
| 136 | # オプションの処理
|
---|
| 137 | #
|
---|
| 138 | OptionParser.new(nil, 22) do |opt|
|
---|
| 139 | opt.on("-T target", "taget name (mandatory)") do |val|
|
---|
| 140 | $target = val
|
---|
| 141 | end
|
---|
| 142 | opt.on("-a appldirs", "application directories") do |val|
|
---|
| 143 | $appldirs += val.split("\s+")
|
---|
| 144 | end
|
---|
| 145 | opt.on("-A applname", "application program name") do |val|
|
---|
| 146 | $applname = val
|
---|
| 147 | end
|
---|
| 148 | opt.on("-t", "TECS is used for application development") do |val|
|
---|
| 149 | $option_t = true
|
---|
| 150 | end
|
---|
| 151 | opt.on("-c cfgfile", "system configuration file") do |val|
|
---|
| 152 | $cfgfile = val
|
---|
| 153 | end
|
---|
| 154 | opt.on("-C cdlfile", "component description file") do |val|
|
---|
| 155 | $cdlfile = val
|
---|
| 156 | end
|
---|
| 157 | opt.on("-U applobjs", "additional application object files") do |val|
|
---|
| 158 | $applobjs += val.split("\s+")
|
---|
| 159 | end
|
---|
| 160 | opt.on("-S syssvcobjs", "system service object files") do |val|
|
---|
| 161 | $syssvcobjs += val.split("\s+")
|
---|
| 162 | end
|
---|
| 163 | opt.on("-L kernel_lib", "directory of built kernel library") do |val|
|
---|
| 164 | $kernel_lib = val
|
---|
| 165 | end
|
---|
| 166 | opt.on("-f", "each function is complied separately in kernel") do |val|
|
---|
| 167 | $kernel_funcobjs = true
|
---|
| 168 | end
|
---|
| 169 | opt.on("-D srcdir", "path of source code directory") do |val|
|
---|
| 170 | $srcdir = val
|
---|
| 171 | end
|
---|
| 172 | opt.on("-l srclang", "programming language (C or C++)") do |val|
|
---|
| 173 | $srclang = val
|
---|
| 174 | end
|
---|
| 175 | opt.on("-m tempmakefile", "template file of Makefile") do |val|
|
---|
| 176 | $tempmakefile = val
|
---|
| 177 | end
|
---|
| 178 | opt.on("-d depdir", "dependency relation file directory") do |val|
|
---|
| 179 | $depdir = val
|
---|
| 180 | end
|
---|
| 181 | opt.on("-w", "TECS is not used at all") do |val|
|
---|
| 182 | $omit_tecs = true
|
---|
| 183 | end
|
---|
| 184 | opt.on("-r", "use the sample code for trace log") do |val|
|
---|
| 185 | $enable_trace = true
|
---|
| 186 | end
|
---|
| 187 | opt.on("-V devtooldir", "development tools directory") do |val|
|
---|
| 188 | $devtooldir = val
|
---|
| 189 | end
|
---|
| 190 | opt.on("-R ruby", "path of ruby command") do |val|
|
---|
| 191 | $ruby = val
|
---|
| 192 | end
|
---|
| 193 | opt.on("-g cfg", "path of configurator") do |val|
|
---|
| 194 | $cfg = val
|
---|
| 195 | end
|
---|
| 196 | opt.on("-G tecsgen", "path of TECS generator") do |val|
|
---|
| 197 | $tecsgen = val
|
---|
| 198 | end
|
---|
| 199 | opt.on("-o options", "compiler options") do |val|
|
---|
| 200 | $copts += val.split("\s+")
|
---|
| 201 | end
|
---|
| 202 | opt.on("-O options", "symbol definition options") do |val|
|
---|
| 203 | $cdefs += val.split("\s+")
|
---|
| 204 | end
|
---|
| 205 | opt.on("-k options", "linker options") do |val|
|
---|
| 206 | $ldflags += val.split("\s+")
|
---|
| 207 | end
|
---|
| 208 | opt.on("-e options", "path of TINET directory") do |val|
|
---|
| 209 | $tinetdir = val
|
---|
| 210 | end
|
---|
| 211 | opt.on("-i options", "network interface (ether or ppp or loop)") do |val|
|
---|
| 212 | $net_if = val
|
---|
| 213 | end
|
---|
| 214 | opt.on("-v options", "ethernet device driver") do |val|
|
---|
| 215 | $net_dev = val
|
---|
| 216 | end
|
---|
| 217 | opt.on("-n options", "network layer protocol (inet6 or inet4 or inet6/inet4 or inet6m or inet6m/inet4)") do |val|
|
---|
| 218 | $net_proto = val
|
---|
| 219 | end
|
---|
| 220 | opt.on("-s options", "transeport layer protocol (tcp or udp or tcp/udp)") do |val|
|
---|
| 221 | $trans_proto = val
|
---|
| 222 | end
|
---|
| 223 | opt.parse!(ARGV)
|
---|
| 224 | end
|
---|
| 225 |
|
---|
| 226 | #
|
---|
| 227 | # オブジェクトファイル名の拡張子を返す
|
---|
| 228 | #
|
---|
| 229 | def GetObjectExtension
|
---|
| 230 | if /cygwin/ =~ RUBY_PLATFORM
|
---|
| 231 | return("exe")
|
---|
| 232 | else
|
---|
| 233 | return("")
|
---|
| 234 | end
|
---|
| 235 | end
|
---|
| 236 |
|
---|
| 237 | #
|
---|
| 238 | # 変数のデフォルト値
|
---|
| 239 | #
|
---|
| 240 | if $appldirs.empty?
|
---|
| 241 | $appldirs.push("\$(SRCDIR)/sample")
|
---|
| 242 | end
|
---|
| 243 | $applname ||= "sample1"
|
---|
| 244 | if $option_t.nil?
|
---|
| 245 | $applobjs.unshift($applname + ".o")
|
---|
| 246 | end
|
---|
| 247 | $cfgfile ||= $applname + ".cfg"
|
---|
| 248 | $cdlfile ||= $applname + ".cdl"
|
---|
| 249 | if $srcdir.nil?
|
---|
| 250 | # ソースディレクトリ名を取り出す
|
---|
| 251 | if /(.*)\/configure/ =~ $0
|
---|
| 252 | $srcdir = $1
|
---|
| 253 | else
|
---|
| 254 | $srcdir = Shell.new.cwd
|
---|
| 255 | end
|
---|
| 256 | end
|
---|
| 257 | if /^\// =~ $srcdir
|
---|
| 258 | $srcabsdir = $srcdir
|
---|
| 259 | else
|
---|
| 260 | $srcabsdir = Shell.new.cwd + "/" + $srcdir
|
---|
| 261 | end
|
---|
| 262 | $tempmakefile ||= $srcdir + "/sample/Makefile"
|
---|
| 263 | $cfg ||= $ruby + " \$(SRCDIR)/cfg/cfg.rb"
|
---|
| 264 | $tecsgen ||= $ruby + " \$(SRCDIR)/tecsgen/tecsgen.rb"
|
---|
| 265 |
|
---|
| 266 | #
|
---|
| 267 | # -Tオプションとターゲット依存部ディレクトリの確認
|
---|
| 268 | #
|
---|
| 269 | if $target.nil?
|
---|
| 270 | puts("configure.rb: -T option is mandatory")
|
---|
| 271 | elsif !File.directory?($srcdir + "/target/" + $target)
|
---|
| 272 | puts("configure.rb: #{$srcdir}/target/#{$target} not exist.")
|
---|
| 273 | $target = nil
|
---|
| 274 | end
|
---|
| 275 |
|
---|
| 276 | if $target.nil?
|
---|
| 277 | puts("Installed targets are:")
|
---|
| 278 | Dir.glob($srcdir + "/target/[a-zA-Z0-9]*").each do |target|
|
---|
| 279 | target.sub!($srcdir + "/target/", "")
|
---|
| 280 | puts("\t" + target)
|
---|
| 281 | end
|
---|
| 282 | abort
|
---|
| 283 | end
|
---|
| 284 |
|
---|
| 285 | #
|
---|
| 286 | # 変数テーブルの作成
|
---|
| 287 | #
|
---|
| 288 | $vartable = Hash.new("")
|
---|
| 289 | $vartable["TARGET"] = $target
|
---|
| 290 | $vartable["APPLDIRS"] = $appldirs.join(" ")
|
---|
| 291 | $vartable["APPLNAME"] = $applname
|
---|
| 292 | $vartable["CFGFILE"] = $cfgfile
|
---|
| 293 | $vartable["CDLFILE"] = $cdlfile
|
---|
| 294 | $vartable["APPLOBJS"] = $applobjs.join(" ")
|
---|
| 295 | $vartable["SYSSVCOBJS"] = $syssvcobjs.join(" ")
|
---|
| 296 | $vartable["KERNEL_LIB"] = $kernel_lib
|
---|
| 297 | $vartable["KERNEL_FUNCOBJS"] = $kernel_funcobjs
|
---|
| 298 | $vartable["SRCDIR"] = $srcdir
|
---|
| 299 | $vartable["SRCABSDIR"] = $srcabsdir
|
---|
| 300 | $vartable["SRCLANG"] = $srclang
|
---|
| 301 | $vartable["DEPDIR"] = $depdir
|
---|
| 302 | $vartable["OMIT_TECS"] = $omit_tecs
|
---|
| 303 | $vartable["ENABLE_TRACE"] = $enable_trace
|
---|
| 304 | $vartable["DEVTOOLDIR"] = $devtooldir
|
---|
| 305 | $vartable["RUBY"] = $ruby
|
---|
| 306 | $vartable["CFG"] = $cfg
|
---|
| 307 | $vartable["TECSGEN"] = $tecsgen
|
---|
| 308 | $vartable["COPTS"] = $copts.join(" ")
|
---|
| 309 | $vartable["CDEFS"] = $cdefs.join(" ")
|
---|
| 310 | $vartable["LDFLAGS"] = $ldflags.join(" ")
|
---|
| 311 | $vartable["OBJEXT"] = GetObjectExtension()
|
---|
| 312 | $vartable["TINETDIR"] = $tinetdir
|
---|
| 313 | $vartable["NET_IF"] = $net_if
|
---|
| 314 | $vartable["NET_DEV"] = $net_dev
|
---|
| 315 | $vartable["SUPPORT_INET6"] = ($net_proto == "inet6") || ($net_proto == "inet6/inet4") || ($net_proto == "inet6m") || ($net_proto == "inet6m/inet4")
|
---|
| 316 | $vartable["SUPPORT_INET4"] = ($net_proto == "inet4") || ($net_proto == "inet6/inet4") || ($net_proto == "inet6m/inet4")
|
---|
| 317 | $vartable["SUPPORT_TCP"] = ($trans_proto == "tcp") || ($net_proto == "tcp/udp")
|
---|
| 318 | $vartable["SUPPORT_UDP"] = ($trans_proto == "udp") || ($net_proto == "tcp/udp")
|
---|
| 319 | $vartable["API_CFG_IP4MAPPED_ADDR"] = ($net_proto == "inet6m") || ($net_proto == "inet6m/inet4")
|
---|
| 320 |
|
---|
| 321 | ARGV.each do |arg|
|
---|
| 322 | if /^([A-Za-z0-9_]+)\s*\=\s*(.*)$/ =~ arg
|
---|
| 323 | $vartable[$1] = $2
|
---|
| 324 | else
|
---|
| 325 | $vartable[arg] = true
|
---|
| 326 | end
|
---|
| 327 | end
|
---|
| 328 |
|
---|
| 329 | #
|
---|
| 330 | # ファイルを変換する
|
---|
| 331 | #
|
---|
| 332 | def convert(inFileName, outFileName)
|
---|
| 333 | puts("Generating #{outFileName} from #{inFileName}.\n")
|
---|
| 334 | if (File.file?(outFileName))
|
---|
| 335 | puts("#{outFileName} exists. Save as #{outFileName}.bak.\n")
|
---|
| 336 | FileUtils.move(outFileName, outFileName + ".bak")
|
---|
| 337 | end
|
---|
| 338 |
|
---|
| 339 | begin
|
---|
| 340 | inFile = File.open(inFileName)
|
---|
| 341 | outFile = File.open(outFileName, "w")
|
---|
| 342 | rescue Errno::ENOENT, Errno::EACCES => ex
|
---|
| 343 | abort(ex.message)
|
---|
| 344 | end
|
---|
| 345 |
|
---|
| 346 | inFile.each do |line|
|
---|
| 347 | line.chomp!
|
---|
| 348 | while line.sub!(/\@\(([A-Za-z0-9_]+)\)/) {|var| $vartable[$1]} do end
|
---|
| 349 | outFile.print(line,"\n")
|
---|
| 350 | end
|
---|
| 351 |
|
---|
| 352 | inFile.close
|
---|
| 353 | outFile.close
|
---|
| 354 | end
|
---|
| 355 |
|
---|
| 356 | #
|
---|
| 357 | # Makefileの生成
|
---|
| 358 | #
|
---|
| 359 | convert($tempmakefile, "Makefile")
|
---|
| 360 |
|
---|
| 361 | #
|
---|
| 362 | # 依存関係ファイルのディレクトリの作成
|
---|
| 363 | #
|
---|
| 364 | if !File.directory?($depdir)
|
---|
| 365 | Dir.mkdir($depdir)
|
---|
| 366 | end
|
---|