#
# Copyright (c) 2014 Constant Contact
#
# 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.
#

module JenkinsPipelineBuilder
  class Compiler
    def self.resolve_value(value, settings, job_collection)
      settings = settings.with_indifferent_access
      value_s = value.to_s.clone
      # First we try to do job name correction
      vars = value_s.scan(/{{job@(.*)}}/).flatten
      if vars.count > 0
        vars.select! do |var|
          var_val = job_collection[var.to_s]
          value_s.gsub!("{{job@#{var}}}", var_val[:value][:name]) unless var_val.nil?
          var_val.nil?
        end
      end
      # Then we look for normal values to replace
      vars = value_s.scan(/{{([^{}@]+)}}/).flatten
      vars.select! do |var|
        var_val = settings[var]
        value_s.gsub!("{{#{var}}}", var_val.to_s) unless var_val.nil?
        var_val.nil?
      end
      return nil if vars.count != 0
      value_s
    end

    def self.get_settings_bag(item_bag, settings_bag = {})
      item = item_bag[:value]
      bag = {}
      return unless item.is_a?(Hash)
      item.keys.each do |k|
        val = item[k]
        next unless val.is_a? String
        new_value = resolve_value(val, settings_bag, {})
        return nil if new_value.nil?
        bag[k] = new_value
      end
      my_settings_bag = settings_bag.clone
      my_settings_bag.merge(bag)
    end

    def self.compile(item, settings = {}, job_collection = {})
      case item
      when String
        return compile_string item, settings, job_collection
      when Hash
        return compile_hash item, settings, job_collection
      when Array
        return compile_array item, settings, job_collection
      end
      [true, item]
    end

    def self.compile_string(item, settings, job_collection)
      errors = {}
      new_value = resolve_value(item, settings, job_collection)
      errors[item] =  "Failed to resolve #{item}" if new_value.nil?
      return false, errors unless errors.empty?
      [true, new_value]
    end

    def self.compile_array(item, settings, job_collection)
      errors = {}
      result = []
      item.each do |value|
        if value.nil?
          errors[item] = "found a nil value when processing following array:\n #{item.inspect}"
          break
        end
        success, payload = compile(value, settings, job_collection)
        unless success
          errors.merge!(payload)
          next
        end
        if payload.nil?
          errors[value] = "Failed to resolve:\n===>item #{value}\n\n===>of list: #{item}"
          next
        end
        result << payload
      end
      return false, errors unless errors.empty?
      [true, result]
    end

    def self.handle_enable(item, settings, job_collection)
      if item.key?(:enabled) && item.key?(:parameters) && item.length == 2
        enabled_switch = resolve_value(item[:enabled], settings, job_collection)
        return [true, {}] if enabled_switch == 'false'
        return [false, { 'value error' => "Invalid value for #{item[:enabled]}: #{enabled_switch}" }] \
          if enabled_switch != 'true'
        item = item.merge item[:parameters]
        item.delete :parameters
        item.delete :enabled
      end
      [true, item]
    end

    def self.compile_hash(item, settings, job_collection)
      errors = {}
      result = {}

      success, item = handle_enable(item, settings, job_collection)
      return false, item unless success

      item.each do |key, value|
        if value.nil?
          errors[key] = "key: #{key} has a nil value, this is often a yaml syntax error. Skipping children and siblings"
          break
        end
        success, payload = compile(value, settings, job_collection)
        unless success
          errors.merge!(payload)
          next
        end
        if payload.nil?
          errors[key] = "Failed to resolve:\n===>key: #{key}\n\n===>value: #{value}\n\n===>of: #{item}"
          next
        end
        result[key] = payload unless payload == {}
      end
      return false, errors unless errors.empty?
      [true, result]
    end
  end
end