# frozen_string_literal: true

module SyntaxTree
  # A slightly enhanced PP that knows how to format recursively including
  # comments.
  class Formatter < PrettierPrint
    # Unfortunately, Gem::Version.new is not ractor-safe because it performs
    # global caching using a class variable. This works around that by just
    # setting the instance variables directly.
    class SemanticVersion < ::Gem::Version
      def initialize(version)
        @version = version
        @segments = nil
      end
    end

    # We want to minimize as much as possible the number of options that are
    # available in syntax tree. For the most part, if users want non-default
    # formatting, they should override the format methods on the specific nodes
    # themselves. However, because of some history with prettier and the fact
    # that folks have become entrenched in their ways, we decided to provide a
    # small amount of configurability.
    class Options
      attr_reader :quote,
                  :trailing_comma,
                  :disable_auto_ternary,
                  :target_ruby_version

      def initialize(
        quote: :default,
        trailing_comma: :default,
        disable_auto_ternary: :default,
        target_ruby_version: :default
      )
        @quote =
          if quote == :default
            # We ship with a single quotes plugin that will define this
            # constant. That constant is responsible for determining the default
            # quote style. If it's defined, we default to single quotes,
            # otherwise we default to double quotes.
            defined?(SINGLE_QUOTES) ? "'" : "\""
          else
            quote
          end

        @trailing_comma =
          if trailing_comma == :default
            # We ship with a trailing comma plugin that will define this
            # constant. That constant is responsible for determining the default
            # trailing comma value. If it's defined, then we default to true.
            # Otherwise we default to false.
            defined?(TRAILING_COMMA)
          else
            trailing_comma
          end

        @disable_auto_ternary =
          if disable_auto_ternary == :default
            # We ship with a disable ternary plugin that will define this
            # constant. That constant is responsible for determining the default
            # disable ternary value. If it's defined, then we default to true.
            # Otherwise we default to false.
            defined?(DISABLE_TERNARY)
          else
            disable_auto_ternary
          end

        @target_ruby_version =
          if target_ruby_version == :default
            # The default target Ruby version is the current version of Ruby.
            # This is really only used for very niche cases, and it shouldn't be
            # used by most users.
            SemanticVersion.new(RUBY_VERSION)
          else
            target_ruby_version
          end
      end
    end

    COMMENT_PRIORITY = 1
    HEREDOC_PRIORITY = 2

    attr_reader :source, :stack

    # These options are overridden in plugins to we need to make sure they are
    # available here.
    attr_reader :quote,
                :trailing_comma,
                :disable_auto_ternary,
                :target_ruby_version

    alias trailing_comma? trailing_comma
    alias disable_auto_ternary? disable_auto_ternary

    def initialize(source, *args, options: Options.new)
      super(*args)

      @source = source
      @stack = []

      # Memoizing these values to make access faster.
      @quote = options.quote
      @trailing_comma = options.trailing_comma
      @disable_auto_ternary = options.disable_auto_ternary
      @target_ruby_version = options.target_ruby_version
    end

    def self.format(source, node, base_indentation = 0)
      q = new(source, [])
      q.format(node)
      q.flush(base_indentation)
      q.output.join
    end

    def format(node, stackable: true)
      stack << node if stackable
      doc = nil

      # If there are comments, then we're going to format them around the node
      # so that they get printed properly.
      if node.comments.any?
        trailing = []
        last_leading = nil

        # First, we're going to print all of the comments that were found before
        # the node. We'll also gather up any trailing comments that we find.
        node.comments.each do |comment|
          if comment.leading?
            comment.format(self)
            breakable(force: true)
            last_leading = comment
          else
            trailing << comment
          end
        end

        # If the node has a stree-ignore comment right before it, then we're
        # going to just print out the node as it was seen in the source.
        doc =
          if last_leading&.ignore?
            range = source[node.start_char...node.end_char]
            first = true

            range.each_line(chomp: true) do |line|
              if first
                first = false
              else
                breakable_return
              end

              text(line)
            end

            breakable_return if range.end_with?("\n")
          else
            node.format(self)
          end

        # Print all comments that were found after the node.
        trailing.each do |comment|
          line_suffix(priority: COMMENT_PRIORITY) do
            comment.inline? ? text(" ") : breakable
            comment.format(self)
            break_parent
          end
        end
      else
        doc = node.format(self)
      end

      stack.pop if stackable
      doc
    end

    def format_each(nodes)
      nodes.each { |node| format(node) }
    end

    def grandparent
      stack[-3]
    end

    def parent
      stack[-2]
    end

    def parents
      stack[0...-1].reverse_each
    end

    # This is a simplified version of prettyprint's group. It doesn't provide
    # any of the more advanced options because we don't need them and they take
    # up expensive computation time.
    def group
      contents = []
      doc = Group.new(0, contents: contents)

      groups << doc
      target << doc

      with_target(contents) { yield }
      groups.pop
      doc
    end

    # A similar version to the super, except that it calls back into the
    # separator proc with the instance of `self`.
    def seplist(list, sep = nil, iter_method = :each)
      first = true
      list.__send__(iter_method) do |*v|
        if first
          first = false
        elsif sep
          sep.call(self)
        else
          comma_breakable
        end
        yield(*v)
      end
    end

    # This is a much simplified version of prettyprint's text. It avoids
    # calculating width by pushing the string directly onto the target.
    def text(string)
      target << string
    end
  end
end