require "./base_visitor"

module Ameba::AST
  # An AST Visitor that traverses the source and allows all nodes
  # to be inspected by rules.
  #
  # ```
  # visitor = Ameba::AST::NodeVisitor.new(rule, source)
  # ```
  class NodeVisitor < BaseVisitor
    # List of nodes to be visited by Ameba's rules.
    NODES = {
      Alias,
      IsA,
      Assign,
      Call,
      Block,
      Case,
      ClassDef,
      ClassVar,
      Def,
      EnumDef,
      ExceptionHandler,
      Expressions,
      HashLiteral,
      If,
      InstanceVar,
      LibDef,
      ModuleDef,
      NilLiteral,
      StringInterpolation,
      Unless,
      Var,
      When,
      While,
      Until,
    }

    @skip : Array(Crystal::ASTNode.class)?

    def initialize(@rule, @source, skip = nil)
      @skip = skip.try &.map(&.as(Crystal::ASTNode.class))
      super @rule, @source
    end

    {% for name in NODES %}
      # A visit callback for `Crystal::{{ name }}` node.
      #
      # Returns `true` if the child nodes should be traversed as well,
      # `false` otherwise.
      def visit(node : Crystal::{{ name }})
        return false if skip?(node)

        @rule.test @source, node
        true
      end
    {% end %}

    def visit(node)
      !skip?(node)
    end

    private def skip?(node)
      !!@skip.try(&.includes?(node.class))
    end
  end
end