Class: Rmk::VDir

Inherits:
Object
  • Object
show all
Defined in:
lib/rmk/vdir.rb

Instance Attribute Summary collapse

Class Method Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(rmk, parent, path = '') ⇒ VDir

create virtual dir

Parameters:

  • rmk (Rmk) —

    Rmk obj

  • parent (Rmk::VDir, nil) —

    parent virtual dir, or nil for root

  • path (String) (defaults to: '') —

    path relative to parent, or empty for root



37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
 
# File 'lib/rmk/vdir.rb', line 37

def initialize(rmk, parent, path = '')
	@rmk = rmk
	@parent = parent
	@name = path
	@defaultfile = @parent&.defaultfile
	@rules = {}
	@subdirs = {}
	@srcfiles = {}
	@builds = []
	@collections = {}
	@virtual_path = @parent&.join_virtual_path("#{@name}/")
	Dir.mkdir @virtual_path if @virtual_path && !Dir.exist?(@virtual_path)
	@abs_src_path = ::File.join @rmk.srcroot, @virtual_path.to_s, ''
	@abs_out_path = ::File.join @rmk.outroot, @virtual_path.to_s, ''
	@outfiles = Rmk::VOutDir.new path:@abs_out_path, vpath:@virtual_path || ''
	@voutfiles = {''=>@outfiles}
	@vars = Rmk::Vars.new @rmk.vars.clone(freeze:false), nil
	@vars.rmk['vpath'] = @virtual_path&.[](0 .. -2) || '.'
	@vars.rmk['srcpath'] = @abs_src_path[0 .. -2]
	@vars.rmk['outpath'] = @abs_out_path[0 .. -2]
end

Instance Attribute Details

#abs_out_path ⇒ Object (readonly)

Returns the value of attribute abs_out_path.



28
29
30
 
# File 'lib/rmk/vdir.rb', line 28

def abs_out_path
  @abs_out_path
end

#abs_src_path ⇒ Object (readonly)

Returns the value of attribute abs_src_path.



28
29
30
 
# File 'lib/rmk/vdir.rb', line 28

def abs_src_path
  @abs_src_path
end

#builds ⇒ Object (readonly)

Returns the value of attribute builds.



29
30
31
 
# File 'lib/rmk/vdir.rb', line 29

def builds
  @builds
end

#defaultfile ⇒ Object (readonly)

Returns the value of attribute defaultfile.



31
32
33
 
# File 'lib/rmk/vdir.rb', line 31

def defaultfile
  @defaultfile
end

#outfiles ⇒ Object (readonly)

Returns the value of attribute outfiles.



29
30
31
 
# File 'lib/rmk/vdir.rb', line 29

def outfiles
  @outfiles
end

#rmk ⇒ Object (readonly)

Returns the value of attribute rmk.



28
29
30
 
# File 'lib/rmk/vdir.rb', line 28

def rmk
  @rmk
end

#rules ⇒ Object (readonly)

Returns the value of attribute rules.



30
31
32
 
# File 'lib/rmk/vdir.rb', line 30

def rules
  @rules
end

#srcfiles ⇒ Object (readonly)

Returns the value of attribute srcfiles.



29
30
31
 
# File 'lib/rmk/vdir.rb', line 29

def srcfiles
  @srcfiles
end

#subdirs ⇒ Object (readonly)

Returns the value of attribute subdirs.



30
31
32
 
# File 'lib/rmk/vdir.rb', line 30

def subdirs
  @subdirs
end

#vars ⇒ Object (readonly)

Returns the value of attribute vars.



30
31
32
 
# File 'lib/rmk/vdir.rb', line 30

def vars
  @vars
end

#voutfiles ⇒ Object (readonly)

Returns the value of attribute voutfiles.



29
30
31
 
# File 'lib/rmk/vdir.rb', line 29

def voutfiles
  @voutfiles
end

Class Method Details

.parse_file(file, &parse_line) ⇒ Object 



293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
 
# File 'lib/rmk/vdir.rb', line 293

def self.parse_file(file, &parse_line)
	lines = IO.readlines file
	markid = lid = 0
	while lid < lines.size
		line, markid = '', lid
		while lid < lines.size
			break if lines[lid].sub!(/(?<!\$)(?:\$\$)*\K#.*$/, '')
			break unless lines[lid].sub!(/(?<!\$)(?:\$\$)*\K\$\n/m, '')
			line += lines[lid]
			lid += 1
			lines[lid]&.lstrip!
		end
		parse_line.call lid < lines.size ? line + lines[lid] : line
		lid += 1
	end
rescue
	markid = "#{file}:#{markid + 1}:"
	if $!.respond_to? :rmk_mark
		$!.set_backtrace $!.backtrace.push markid
	else
		$!.define_singleton_method(:rmk_mark){}
		$!.set_backtrace [markid]
	end
	raise
end

Instance Method Details

#add_out_file(name) ⇒ VFile

add a output file

Parameters:

  • name —

    file name, relative to this dir when not absolute path

Returns:

  • (VFile) —

    virtual file object



204
205
206
207
208
209
210
211
212
213
214
 
# File 'lib/rmk/vdir.rb', line 204

def add_out_file(name)
	if /^[A-Z]:/.match? name
		@rmk.add_out_file path:name, vpath: name.start_with?(@rmk.outroot) && name[@rmk.outroot.size .. - 1]
	elsif /^:(.*)\/([^\/]+)$/.match name
		vout, name = $1, $2
		raise "vout dir '#{vout}' not found" unless @voutfiles.include? vout
		@voutfiles[vout][name] = @rmk.add_out_file **@voutfiles[vout].new_filepath(name)
	else
		@voutfiles[''][name] = @rmk.add_out_file path:join_abs_out_path(name), vpath:join_virtual_path(name)
	end
end

#collections(name = nil) ⇒ Object 



61
 
# File 'lib/rmk/vdir.rb', line 61

def collections(name = nil) name ? @collections[name] ||= [] : @collections end

#define_var(indent, name, append, value) ⇒ Object 



246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
 
# File 'lib/rmk/vdir.rb', line 246

def define_var(indent, name, append, value)
	last = @state[-1]
	case last[:type]
	when :AcceptVar		# rule or build context which can add var
		raise 'invalid indent' if indent < last[:indent]
		if indent > last[:indent]
			@state << {indent:indent, type: :SubVar, condition:last[:condition], vars:last[:vars]}
			last = @state[-1]
		else
			@state.pop
			last = @state[-1]
			raise 'invalid indent' unless indent == last[:indent]
		end
	when :Condition	# just after condition context
		raise 'invalid indent' unless indent > last[:indent]
		@state << {indent:indent, type:nil, condition:last[:condition], vars:last[:vars]}
		last = @state[-1]
	else			# general context
		raise 'invalid indent' unless indent == last[:indent]
	end
	last[:vars][name, append] = value
end

#find_inputfiles(pattern, ffile: false) ⇒ Array<VFile, FFile>

find files which can be build’s imput file ;or absolute path to find a src file which not in src tree

Parameters:

  • pattern (String) —

    virtual path to find src and out files which can include ‘*’ to match any char at last no dir part

  • ffile (Boolean) (defaults to: false) —

    return FFile struct or not

Returns:

  • (Array<VFile, FFile>) —

    return array of FFile when ffile, otherwise array of VFile



94
95
96
97
98
99
100
101
102
 
# File 'lib/rmk/vdir.rb', line 94

def find_inputfiles(pattern, ffile:false)
	return @rmk.find_inputfiles pattern, ffile:ffile if pattern.match? /^[A-Z]:/
	pattern = Rmk.normalize_path pattern
	dir, regex, postpath = split_vpath_pattern pattern
	return find_voutfiles_imp dir, regex, postpath, ffile:ffile if pattern.start_with? ':'
	files = find_srcfiles_imp pattern, dir, regex, postpath, ffile:ffile
	files.concat find_outfiles_imp  dir, regex, postpath, ffile:ffile
	files
end

#find_outfiles(pattern) ⇒ Array<Hash>

find files which must be build’s output

Parameters:

  • pattern (String) —

    virtual path to find out files which can include ‘*’ to match any char at last no dir part

Returns:

  • (Array<Hash>) —

    return Array of file, and Regex when has ‘*’ pattern



195
196
197
198
199
 
# File 'lib/rmk/vdir.rb', line 195

def find_outfiles(pattern)
	return @rmk.find_outfiles pattern if pattern.match? /^[A-Z]:/i
	return find_voutfiles_imp *split_vpath_pattern(pattern) if pattern.start_with? ':'
	find_outfiles_imp *split_vpath_pattern(pattern)
end

#include_subdir(path) ⇒ Object 



63
64
65
 
# File 'lib/rmk/vdir.rb', line 63

def include_subdir(path)
	@subdirs[path] ||= Rmk::VDir.new @rmk, self, path
end

#join_abs_out_path(file) ⇒ Object 



69
 
# File 'lib/rmk/vdir.rb', line 69

def join_abs_out_path(file) ::File.join @abs_out_path, file end

#join_abs_src_path(file) ⇒ Object 



67
 
# File 'lib/rmk/vdir.rb', line 67

def join_abs_src_path(file) ::File.join @abs_src_path, file end

#join_rto_src_path(file) ⇒ Object

join src file path relative to out root, or absolute src path when not relative src



74
 
# File 'lib/rmk/vdir.rb', line 74

def join_rto_src_path(file) @rmk.join_rto_src_path join_virtual_path(file) end

#join_virtual_path(file) ⇒ Object 



71
 
# File 'lib/rmk/vdir.rb', line 71

def join_virtual_path(file) @virtual_path ? ::File.join(@virtual_path, file) : file end

#parse ⇒ Object 



269
270
271
272
273
274
275
276
277
278
279
280
281
282
 
# File 'lib/rmk/vdir.rb', line 269

def parse
	raise "dir '#{@abs_src_path}' has been parsed" if @state
	@state = []
	file = join_abs_src_path 'template.rmk'
	@defaultfile = file if ::File.exist? file
	file = join_abs_src_path 'rmk.rmk'
	if ::File.exist? file
		parse_file file
	elsif @defaultfile
		parse_file @defaultfile
	else
		raise "dir parse error: '#{file}' doesn't exist and can't finded any 'default.rmk'"
	end
end

#parse_file(file) ⇒ Object 



284
285
286
287
288
289
290
291
 
# File 'lib/rmk/vdir.rb', line 284

def parse_file(file)
	last_state, @state = @state, [{indent:0, type:nil, condition:nil, vars:@vars}]
	Rmk::VDir.parse_file file, &method(:parse_line)
	@state = last_state
rescue
	$!.backtrace[-1] << (@virtual_path ? " in vpath '#{@virtual_path}'" : "in vpath '<root>'")
	raise
end

#parse_line(line) ⇒ Object 



319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
 
# File 'lib/rmk/vdir.rb', line 319

def parse_line(line)
	match = /^(?<indent> *|\t*)(?:(?<firstword>\w+)\s*(?<content>.+)?)?$/.match line
	raise 'syntax error' unless match
	indent, firstword, line = match[:indent].size, match[:firstword], match[:content]
	return end_last_define unless firstword
	state = @state[-1]
	if !state[:condition].nil? && !state[:condition]		# false state fast process
		@state.pop if indent == state[:indent] && firstword == 'endif'
		return
	end
	case firstword
	when /^if(n)?(?:(eq)|def)$/
		logicnot, logicmod = Regexp.last_match(1), Regexp.last_match(2)
		state = begin_define_nonvar indent
		parms = state[:vars].split_str line
		if logicmod
			raise 'must have two str' unless parms.size == 2
			value = logicnot ? parms[0] != parms[1] : parms[0] == parms[1]
		else
			raise 'must have var name' if parms.empty?
			value = logicnot ? !parms.any?{|vn| @vars.include? vn} : parms.all?{|vn| @vars.include? vn}
		end
		@state << {indent:indent, type: :Condition, condition:value, vars:state[:vars]}
	when 'else', 'endif'
		raise 'syntax error' if line
		endmod = firstword != 'else'
		while state
			raise 'not if condition' if state[:condition].nil?
			if state[:type]&.== :Condition
				raise 'invalid indent' unless indent == state[:indent]
				return endmod ? @state.pop : state[:condition] = false
			end
			@state.pop
			state = @state[-1]
		end
		raise 'not found match if'
	when 'rule'
		match = /^(?<name>\w+)\s*(?:=\s*(?<command>.*))?$/.match line
		raise 'rule name or command invalid' unless match
		state = begin_define_nonvar indent
		raise "rule '#{match[:name]}' has been defined" if @rules.include? match[:name]
		rule = @rules[match[:name]] = Rmk::Rule.new match[:command]
		@state << {indent:indent, type: :AcceptVar, condition:state[:condition], vars:rule.vars}
	when /^exec$/
		state = begin_define_nonvar indent
		match = /^(?<rule>\w+)(?<each>\s+each)?:\s*(?<parms>.*)$/.match line
		raise 'syntax error' unless match
		raise "rule '#{match[:rule]}' undefined" unless @rules.include? match[:rule]
		eachmode = match[:each]
		parms = match[:parms].split /(?<!\$)(?:\$\$)*\K>>/, -1
		raise "syntax error, use '>>' to separat input and output and collect" unless (1 .. 3) === parms.size
		ioregex = /(?<!\$)(?:\$\$)*\K&/
		iparms = parms[0].split ioregex
		raise 'input field count error' unless (1..3) === iparms.size
		if parms[1] && !parms[1].empty?
			oparms = parms[1].lstrip.split ioregex
			raise 'output field count error' unless (1..2) === oparms.size
		else
			raise 'syntax error: must give output field after >>' if parms[1] && !parms[2]
			oparms = []
		end
		if parms[2]
			parms[2] = state[:vars].split_str(parms[2].lstrip).map!{|name| collections name}
			raise 'must give collection name' if parms[2].empty?
		else
			parms[2] = @rules[match[:rule]]['collection']&.lstrip
			parms[2] = state[:vars].split_str(parms[2]).map!{|name| collections name} if parms[2]
		end
		iparms[0] = state[:vars].split_str iparms[0]
		raise 'must have input file' if iparms[0].size == 0
		if eachmode
			vars = Rmk::MultiVarWriter.new
			iparms[0].each do |fn|
				files = find_inputfiles fn, ffile:true
				files.each do |file|
					build = Rmk::Build.new(self, @rules[match[:rule]], state[:vars], [file], iparms[1],
						iparms[2], oparms[0], oparms[1], parms[2])
					@builds << build
					vars << build.vars
				end
			end
		else
			files = []
			iparms[0].each {|fn| files.concat find_inputfiles fn}
			build = Rmk::Build.new(self, @rules[match[:rule]], state[:vars], files, iparms[1], iparms[2],
				oparms[0], oparms[1], parms[2])
			@builds << build
			vars = build.vars
		end
		@state << {indent:indent, type: :AcceptVar, condition:state[:condition], vars:vars}
	when 'collect'
		state = begin_define_nonvar indent
		parms = line.split /(?<!\$)(?:\$\$)*\K>>/
		raise "must have only one '>>' separator for separat input and output" unless parms.size == 2
		collection = state[:vars].split_str(parms[1].lstrip).map!{|name| collections name}
		raise 'must give collection name' if collection.empty?
		state[:vars].split_str(parms[0]).each do |fn|
			files = find_inputfiles fn
			collection.each{|col| col.concat files}
		end
	when 'default'
		state = begin_define_nonvar indent
		parms = state[:vars].split_str line
		raise "must have file name" if parms.empty?
		parms.each do |parm|
			files = find_outfiles parm
			raise "pattern '#{parm}' not match any out file" if files.empty?
			@rmk.add_default *files
		end
	when /^include(_dir)?(_force)?$/
		dirmode, force = Regexp.last_match(1), Regexp.last_match(2)
		state = begin_define_nonvar indent
		parms = state[:vars].split_str line
		raise dirmode ? "must have file name" : "must have dir name or matcher" if parms.empty?
		if dirmode
			threads = []
			parms.each do |parm|
				dirs = Dir[File.join @abs_src_path, parm, '']
				if dirs.empty?
					raise "subdir '#{parm}' doesn't exist" if force
				else
					dirs.each do |dir|
						dir = include_subdir dir[@abs_src_path.size .. -2]
						threads << Rmk::Schedule.new_thread!( &dir.method(:parse) )
					end
				end
			end
			threads.each{|thr| thr.join}
		else
			parms.each do |parm|
				if parm.match? /^[a-zA-Z]:/
					if File.exist? parm
						parse_file parm
					else
						raise "file '#{parm}' not exist" if force
					end
				else
					files = find_outfiles parm
					if files.empty?
						file = join_abs_out_path parm
						next parse_file file if File.exist? file
						file = join_abs_src_path parm
						next parse_file file if File.exist? file
						raise "file '#{parm}' not exist" if force
					else
						files.each{|file| file.output_ref_build.parser_force_run!}
						files.each{|file| parse_file file.vpath}
					end
				end
			end
		end
	when 'vout'
		state = begin_define_nonvar indent
		match = line.match /^(\S+)\s*(?:=\s*(\S*)\s*)?$/
		raise 'syntax error' unless match
		if match[2]
			path = state[:vars].interpolate_str match[2]
			path << '/' unless path.end_with? '/'
			if path.match? /^[a-z]:\//i
				@voutfiles[match[1]] = Rmk::VOutDir.new path:path,
					vpath:path.start_with?(@rmk.outroot) && path[@rmk.outroot.size..-1]
			else
				path = join_virtual_path path
				@voutfiles[match[1]] = Rmk::VOutDir.new path:join_abs_out_path(path), vpath:path
			end
			Dir.mkdir path unless Dir.exist? path
			@vars.rmk[match[1] + '_path'] = @voutfiles[match[1]].path[0 .. -2]
		elsif @parent&.voutfiles&.include? match[1]
			path = (@voutfiles[match[1]] = @parent.voutfiles[match[1]].derive_new @name).path
			Dir.mkdir path unless Dir.exist? path
			@vars.rmk[match[1] + '_path'] = @voutfiles[match[1]].path[0 .. -2]
		else
			raise 'no inheritable vout dir'
		end
	when 'inherit'
		begin_define_nonvar indent
		raise 'syntax error' if line
		if @parent
			@vars.merge! @parent.vars
			@rules.merge! @parent.rules
		end
	when 'report'
		state = begin_define_nonvar indent
		parms = line.match /^((error)|warn|(info))\s+(.*)$/
		raise 'syntax error' unless parms
		line = state[:vars].interpolate_str(parms[4])
		parms[3] ? @rmk.std_puts(parms[1] + ': ', line) : @rmk.err_puts(parms[1] + ': ', line)
		exit 2 if parms[2]
	else
		match = /^(?:(?<append>\+=)|=)(?(<append>)|\s*)(?<value>.*)$/.match line
		raise 'syntax error' unless match
		define_var indent, firstword, match[:append], match[:value]
	end
end

#split_vpath_pattern(pattern) ⇒ Array(String, <Regex, nil>, <String, nil>, <String, nil>)

split virtual path pattern to dir part and file match regex part when pattern include ‘*’, return [dir part, file(or dir) match regex, post dir part, post file part] ;otherwise return [origin pattern, nil, nil, nil]

Parameters:

  • pattern (String) —

    virtual path, can include ‘*’ to match any char at last no dir part

Returns:

  • (Array(String, <Regex, nil>, <String, nil>, <String, nil>)) 


81
82
83
84
85
86
87
 
# File 'lib/rmk/vdir.rb', line 81

def split_vpath_pattern(pattern)
	match = /^((?:[^\/*]+\/)*+)([^\/*]*+)(?:\*([^\/*]*+))?(?(3)(\/(?:[^\/*]+\/)*+[^\/*]++)?)$/.match pattern
	raise "file syntax '#{pattern}' error" unless match
	dir, prefix, postfix, postpath = *match[1..4]
	regex = postfix && /#{Regexp.escape prefix}(.*)#{Regexp.escape postfix}$/
	[regex ? dir : pattern, regex, postpath]
end

#vpath ⇒ Object 



59
 
# File 'lib/rmk/vdir.rb', line 59

def vpath; @virtual_path end