Module: RBS::Prototype::Helpers

# File 'lib/rbs/prototype/helpers.rb', line 177

def args_from_node(args_node)
  args_node&.children || [0, nil, nil, nil, 0, nil, nil, nil, nil, nil]
end

# File 'lib/rbs/prototype/helpers.rb', line 65

def block_from_body(node)
  _, args_node, body_node = node.children
  _pre_num, _pre_init, _opt, _first_post, _post_num, _post_init, _rest, _kw, _kwrest, block_var = args_from_node(args_node)

  # @type var body_node: node?
  if body_node
    yields = any_node?(body_node) {|n| n.type == :YIELD }
  end

  if yields || block_var
    required = true

    if body_node
      if any_node?(body_node) {|n| n.type == :FCALL && n.children[0] == :block_given? && !n.children[1] }
        required = false
      end
    end

    if _rest == :* && block_var == :&
      # ... is given
      required = false
    end

    if block_var
      if body_node
        usage = NodeUsage.new(body_node)
        if usage.each_conditional_node.any? {|n| n.type == :LVAR && n.children[0] == block_var }
          required = false
        end
      end
    end

    if yields
      function = Types::Function.empty(untyped)

      yields.each do |yield_node|
        array_content = yield_node.children[0]&.children&.compact || []

        # @type var keywords: node?
        positionals, keywords = if keyword_hash?(array_content.last)
                                  [array_content.take(array_content.size - 1), array_content.last]
                                else
                                  [array_content, nil]
                                end

        if (diff = positionals.size - function.required_positionals.size) > 0
          diff.times do
            function.required_positionals << Types::Function::Param.new(
              type: untyped,
              name: nil
            )
          end
        end

        if keywords
          keywords.children[0].children.each_slice(2) do |key_node, value_node|
            if key_node
              key = key_node.children[0]
              function.required_keywords[key] ||=
                Types::Function::Param.new(
                  type: untyped,
                  name: nil
                )
            end
          end
        end
      end
    else
      function = Types::UntypedFunction.new(return_type: untyped)
    end


    Types::Block.new(required: required, type: function, self_type: nil)
  end
end

# File 'lib/rbs/prototype/helpers.rb', line 141

def each_child(node, &block)
  each_node node.children, &block
end

# File 'lib/rbs/prototype/helpers.rb', line 145

def each_node(nodes)
  nodes.each do |child|
    if child.is_a?(RubyVM::AbstractSyntaxTree::Node)
      yield child
    end
  end
end

# File 'lib/rbs/prototype/helpers.rb', line 165

def keyword_hash?(node)
  if node && node.type == :HASH
    node.children[0].children.compact.each_slice(2).all? {|key, _|
      symbol_literal_node?(key)
    }
  else
    false
  end
end

# File 'lib/rbs/prototype/helpers.rb', line 35

def parse_comments(string, include_trailing:)
  Prism.parse_comments(string, version: "current").yield_self do |prism_comments| # steep:ignore UnexpectedKeywordArgument
    prism_comments.each_with_object({}) do |comment, hash| #$ Hash[Integer, AST::Comment]
      # Skip EmbDoc comments
      next unless comment.is_a?(Prism::InlineComment)
      # skip like `module Foo # :nodoc:`
      next if comment.trailing? && !include_trailing

      line = comment.location.start_line
      body = "#{comment.location.slice}\n"
      body = body[2..-1] or raise
      body = "\n" if body.empty?

      comment = AST::Comment.new(string: body, location: nil)
      if prev_comment = hash.delete(line - 1)
        hash[line] = AST::Comment.new(string: prev_comment.string + comment.string,
                                      location: nil)
      else
        hash[line] = comment
      end
    end
  end
end

# File 'lib/rbs/prototype/helpers.rb', line 181

def symbol_literal_node?(node)
  case node.type
  when :LIT
    if node.children[0].is_a?(Symbol)
      node.children[0]
    end
  when :SYM
    node.children[0]
  end
end

# File 'lib/rbs/prototype/helpers.rb', line 192

def untyped
  @untyped ||= Types::Bases::Any.new(location: nil)
end