#--
# Copyright (c) 2014 Patricio Zavolinsky
#
# Permission is hereby granted, free of charge, to any person obtaining a copy
# of this software and associated documentation files (the "Software"), to deal
# in the Software without restriction, including without limitation the rights
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
# copies of the Software, and to permit persons to whom the Software is
# furnished to do so, subject to the following conditions:
#
# The above copyright notice and this permission notice shall be included in
# all copies or substantial portions of the Software.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
# SOFTWARE.
#++

class Bauxite::Action
	# Load the specified file into an isolated variable context and execute
	# the actions specified. If the file does not exist, this action skips.
	# See #load for a similar action that fails if the file does not exist.
	#
	# +file+ can be a path relative to the current test file.
	#
	# An optional list of variables can be provided in +vars+. These variables
	# will override the value of the context variables for the execution of the
	# file (See Context#with_vars).
	#
	# The syntax of the variable specification is:
	#     "var1_name=var1_value" "var2_name=var2_value" ...
	#
	# For example:
	#     tryload other_test.bxt
	#     tryload nonexistent_file.bxt
	#     # => this would load and execute other_test.bxt, then silently fail
	#     #    to execute nonexistent_file.bxt without failing the test.
	#
	# :category: Action Methods
	def tryload(file, *vars)
		_load_file_action(file, *vars) do |f|
			@ctx.exec_file(f)
		end
	end
	
private
	def _load_file_action(file, *vars)
		unless file == 'stdin' or  File.exists? file
			current = @ctx.variables['__FILE__']
			current = (File.exists? current) ? File.dirname(current) : Dir.pwd
			file = File.join(current, file)
			return nil unless File.exists? file
		end
		
		var_hash = vars.inject({}) do |h,v|
			data = v.split('=', 2)
			h[data[0]] = data[1]
			h
		end
		
		lambda do
			ret_vars = nil
			@ctx.with_vars var_hash do
				yield file
				rets = @ctx.variables['__RETURN__']
				if rets == ['*']
					ret_vars = @ctx.variables
				elsif rets != nil 
					ret_vars = @ctx.variables.select { |k,v| rets.include? k }
				end
			end
			@ctx.variables.merge!(ret_vars) if ret_vars
		end
	end
end