require 'shellwords'

module Ridley::Chef
  class Cookbook
    # Encapsulates the process of validating the ruby syntax of files in Chef
    # cookbooks.
    #
    # Borrowed and modified from: {https://github.com/opscode/chef/blob/11.4.0/lib/chef/cookbook/syntax_check.rb}
    #
    # Copyright:: Copyright (c) 2010 Opscode, Inc.
    #
    # Licensed under the Apache License, Version 2.0 (the "License");
    # you may not use this file except in compliance with the License.
    # You may obtain a copy of the License at
    #
    #     http://www.apache.org/licenses/LICENSE-2.0
    #
    # Unless required by applicable law or agreed to in writing, software
    # distributed under the License is distributed on an "AS IS" BASIS,
    # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
    # See the License for the specific language governing permissions and
    # limitations under the License.
    class SyntaxCheck
      # Implements set behavior with disk-based persistence. Objects in the set
      # are expected to be strings containing only characters that are valid in
      # filenames.
      #
      # This class is used to track which files have been syntax checked so
      # that known good files are not rechecked.
      class PersistentSet
        attr_reader :cache_path

        # Create a new PersistentSet. Values in the set are persisted by
        # creating a file in the +cache_path+ directory. If not given, the
        # value of Chef::Config[:syntax_check_cache_path] is used; if that
        # value is not configured, the value of
        # Chef::Config[:cache_options][:path] is used.
        #--
        # history: prior to Chef 11, the cache implementation was based on
        # moneta and configured via cache_options[:path]. Knife configs
        # generated with Chef 11 will have `syntax_check_cache_path`, but older
        # configs will have `cache_options[:path]`. `cache_options` is marked
        # deprecated in chef/config.rb but doesn't currently trigger a warning.
        # See also: CHEF-3715
        def initialize(cache_path = nil)
          @cache_path = cache_path || Dir.mktmpdir
          @cache_path_created = false
        end

        # Adds +value+ to the set's collection.
        def add(value)
          ensure_cache_path_created
          FileUtils.touch(File.join(cache_path, value))
        end

        # Returns true if the set includes +value+
        def include?(value)
          File.exist?(File.join(cache_path, value))
        end

        private

          def ensure_cache_path_created
            return true if @cache_path_created
            FileUtils.mkdir_p(cache_path)
            @cache_path_created = true
          end
      end

      include Ridley::Logging
      include Ridley::Mixin::ShellOut
      include Ridley::Mixin::Checksum

      attr_reader :cookbook_path

      # A PersistentSet object that tracks which files have already been
      # validated.
      attr_reader :validated_files

      # Create a new SyntaxCheck object
      #
      # @param [String] cookbook_path
      #   the (on disk) path to the cookbook
      def initialize(cookbook_path)
        @cookbook_path   = cookbook_path
        @validated_files = PersistentSet.new
      end

      def ruby_files
        Dir[File.join(cookbook_path, '**', '*.rb')]
      end

      def untested_ruby_files
        ruby_files.reject { |file| validated?(file) }
      end

      def template_files
        Dir[File.join(cookbook_path, '**', '*.erb')]
      end

      def untested_template_files
        template_files.reject { |file| validated?(file) }
      end

      def validated?(file)
        validated_files.include?(checksum(file))
      end

      def validated(file)
        validated_files.add(checksum(file))
      end

      def validate_ruby_files
        untested_ruby_files.each do |ruby_file|
          return false unless validate_ruby_file(ruby_file)
          validated(ruby_file)
        end
      end

      def validate_templates
        untested_template_files.each do |template|
          return false unless validate_template(template)
          validated(template)
        end
      end

      def validate_template(erb_file)
        result = shell_out("erubis -x #{erb_file.shellescape} | ruby -c")

        if result.error?
          file_relative_path = erb_file[/^#{Regexp.escape(cookbook_path+File::Separator)}(.*)/, 1]
          log.error { "Erb template #{file_relative_path} has a syntax error:" }
          result.stderr.each_line { |l| Ridley.log.fatal(l.chomp) }
          return false
        end

        true
      end

      def validate_ruby_file(ruby_file)
        result = shell_out("ruby -c #{ruby_file.shellescape}")

        if result.error?
          file_relative_path = ruby_file[/^#{Regexp.escape(cookbook_path+File::Separator)}(.*)/, 1]
          log.error { "Cookbook file #{file_relative_path} has a ruby syntax error:" }
          result.stderr.each_line { |l| Ridley.log.error(l.chomp) }
          return false
        end

        true
      end
    end
  end
end