rbs 3.2.2 → 3.3.0.pre.1

data/lib/rbs/prototype/runtime.rb

@@ -1,26 +1,82 @@
 # frozen_string_literal: true
 
+require_relative 'runtime/helpers'
+require_relative 'runtime/value_object_generator'
+
 module RBS
   module Prototype
     class Runtime
-      include Helpers
+      class Todo
+        def initialize(builder:)
+          @builder = builder
+        end
+
+        def skip_mixin?(type_name:, module_name:, mixin_class:)
+          return false unless @builder.env.module_class_entry(type_name.absolute!)
+          return false unless @builder.env.module_class_entry(module_name.absolute!)
+
+          mixin_decls(type_name).any? do |decl|
+            decl.instance_of?(mixin_class) && decl.name == module_name.absolute!
+          end
+        end
+
+        def skip_singleton_method?(module_name:, method:, accessibility:)
+          return false unless @builder.env.module_class_entry(module_name.absolute!)
+
+          method_definition = @builder.build_singleton(module_name.absolute!).methods[method.name]
+          return false unless method_definition
+
+          method_definition.accessibility == accessibility
+        end
+
+        def skip_instance_method?(module_name:, method:, accessibility:)
+          return false unless @builder.env.module_class_entry(module_name.absolute!)
+
+          method_definition = @builder.build_instance(module_name.absolute!).methods[method.name]
+          return false unless method_definition
+
+          method_definition.accessibility == accessibility
+        end
+
+        def skip_constant?(module_name:, name:)
+          namespace = Namespace.new(path: module_name.split('::').map(&:to_sym), absolute: true)
+          @builder.env.constant_decl?(TypeName.new(namespace: namespace, name: name))
+        end
+
+        private
+
+        def mixin_decls(type_name)
+          type_name_absolute = type_name.absolute!
+          (@mixin_decls_cache ||= {}).fetch(type_name_absolute) do
+            @mixin_decls_cache[type_name_absolute] = @builder.env.class_decls[type_name_absolute].decls.flat_map do |d|
+              d.decl.members.select { |m| m.kind_of?(AST::Members::Mixin) }
+            end
+          end
+        end
+      end
+      private_constant :Todo
+
+      include Prototype::Helpers
+      include Runtime::Helpers
 
       attr_reader :patterns
       attr_reader :env
       attr_reader :merge
+      attr_reader :todo
       attr_reader :owners_included
       attr_accessor :outline
 
-      def initialize(patterns:, env:, merge:, owners_included: [])
+      def initialize(patterns:, env:, merge:, todo: false, owners_included: [])
         @patterns = patterns
         @decls = nil
-        @modules = []
+        @modules = {}
         @env = env
         @merge = merge
         @owners_included = owners_included.map do |name|
           Object.const_get(name)
         end
         @outline = false
+        @todo = todo
       end
 
       def target?(const)
@@ -36,6 +92,10 @@ module RBS
         end
       end
 
+      def todo_object
+        @todo_object ||= Todo.new(builder: builder) if todo
+      end
+
       def builder
         @builder ||= DefinitionBuilder.new(env: env)
       end
@@ -47,8 +107,11 @@ module RBS
       def decls
         unless @decls
           @decls = []
-          @modules = ObjectSpace.each_object(Module).to_a
-          @modules.select {|mod| target?(mod) }.sort_by{|mod| const_name(mod) }.each do |mod|
+          @modules = ObjectSpace.each_object(Module)
+            .map { |mod| [const_name(mod), mod] }
+            .select { |name, _| name }
+            .to_h
+          @modules.select { |name, mod| target?(mod) }.sort_by { |name, _| name }.each do |_, mod|
             case mod
             when Class
               generate_class mod
@@ -58,48 +121,46 @@ module RBS
           end
         end
 
-        @decls
+        @decls or raise
       end
 
-      def to_type_name(name, full_name: false)
-        *prefix, last = name.split(/::/)
-
-        if full_name
-          if prefix.empty?
-            TypeName.new(name: last.to_sym, namespace: Namespace.empty)
-          else
-            TypeName.new(name: last.to_sym, namespace: Namespace.parse(prefix.join("::")))
-          end
-        else
-          TypeName.new(name: last.to_sym, namespace: Namespace.empty)
+      private def each_mixined_module(type_name, mod)
+        each_mixined_module_one(type_name, mod) do |module_name, module_full_name, is_prepend|
+          yield module_name, module_full_name, is_prepend ? AST::Members::Prepend : AST::Members::Include
+        end
+        each_mixined_module_one(type_name, mod.singleton_class) do |module_name, module_full_name, _|
+          yield module_name, module_full_name, AST::Members::Extend
         end
       end
 
-      def each_included_module(type_name, mod)
-        supers = Set[]
+      private def each_mixined_module_one(type_name, mod)
+        supers = Set[] #: Set[Module]
+        prepends = mod.ancestors.take_while { |m| !mod.equal?(m) }.to_set
 
         mod.included_modules.each do |mix|
           supers.merge(mix.included_modules)
         end
 
-        if mod.is_a?(Class) && mod.superclass
-          mod.superclass.included_modules.each do |mix|
-            supers << mix
-            supers.merge(mix.included_modules)
+        if mod.is_a?(Class)
+          if superclass = mod.superclass
+            superclass.included_modules.each do |mix|
+              supers << mix
+              supers.merge(mix.included_modules)
+            end
           end
         end
 
-        mod.included_modules.each do |mix|
-          unless supers.include?(mix)
+        mod.included_modules.uniq.each do |mix|
+          if !supers.include?(mix) || prepends.include?(mix)
             unless const_name(mix)
               RBS.logger.warn("Skipping anonymous module #{mix} included in #{mod}")
             else
-              module_name = module_full_name = to_type_name(const_name(mix), full_name: true)
+              module_name = module_full_name = to_type_name(const_name!(mix), full_name: true)
               if module_full_name.namespace == type_name.namespace
                 module_name = TypeName.new(name: module_full_name.name, namespace: Namespace.empty)
               end
 
-              yield module_name, module_full_name, mix
+              yield module_name, module_full_name, prepends.include?(mix)
             end
           end
         end
@@ -108,19 +169,19 @@ module RBS
       def method_type(method)
         untyped = Types::Bases::Any.new(location: nil)
 
-        required_positionals = []
-        optional_positionals = []
-        rest = nil
-        trailing_positionals = []
-        required_keywords = {}
-        optional_keywords = {}
-        rest_keywords = nil
+        required_positionals = [] #: Array[Types::Function::Param]
+        optional_positionals = [] #: Array[Types::Function::Param]
+        rest = nil #: Types::Function::Param?
+        trailing_positionals = [] #: Array[Types::Function::Param]
+        required_keywords = {} #: Hash[Symbol, Types::Function::Param]
+        optional_keywords = {} #: Hash[Symbol, Types::Function::Param]
+        rest_keywords = nil #: Types::Function::Param?
 
         requireds = required_positionals
 
-        block = nil
+        block = nil #: Types::Block?
 
-        method.parameters.each do |kind, name|
+        method.parameters.each do |(kind, name)|
           case kind
           when :req
             requireds << Types::Function::Param.new(name: name, type: untyped)
@@ -132,8 +193,10 @@ module RBS
             name = nil if name == :* # For `def f(...) end` syntax
             rest = Types::Function::Param.new(name: name, type: untyped)
           when :keyreq
+            name or raise
             required_keywords[name] = Types::Function::Param.new(name: nil, type: untyped)
           when :key
+            name or raise
             optional_keywords[name] = Types::Function::Param.new(name: nil, type: untyped)
           when :keyrest
             rest_keywords = Types::Function::Param.new(name: nil, type: untyped)
@@ -175,6 +238,7 @@ module RBS
       def merge_rbs(module_name, members, instance: nil, singleton: nil)
         if merge
           if env.class_decls[module_name.absolute!]
+            # @type var kind: AST::Members::MethodDefinition::kind
             case
             when instance
               method = builder.build_instance(module_name.absolute!).methods[instance]
@@ -194,6 +258,7 @@ module RBS
                     annotations: [],
                     method_type: type.update.tap do |ty|
                       def ty.to_s
+                        location or raise
                         location.source
                       end
                     end
@@ -224,14 +289,27 @@ module RBS
         when singleton
           method = mod.singleton_class.instance_method(singleton)
           method.owner == mod.singleton_class || owners_included.any? {|m| method.owner == m.singleton_class }
+        else
+          raise
         end
       end
 
       def generate_methods(mod, module_name, members)
+        module_name_absolute = to_type_name(const_name!(mod), full_name: true).absolute!
         mod.singleton_methods.select {|name| target_method?(mod, singleton: name) }.sort.each do |name|
           method = mod.singleton_class.instance_method(name)
+          next if todo_object&.skip_singleton_method?(module_name: module_name_absolute, method: method, accessibility: :public)
 
-          if method.name == method.original_name
+          if can_alias?(mod.singleton_class, method)
+            members << AST::Members::Alias.new(
+              new_name: method.name,
+              old_name: method.original_name,
+              kind: :singleton,
+              location: nil,
+              comment: nil,
+              annotations: [],
+            )
+          else
             merge_rbs(module_name, members, singleton: name) do
               RBS.logger.info "missing #{module_name}.#{name} #{method.source_location}"
 
@@ -248,15 +326,6 @@ module RBS
                 visibility: nil
               )
             end
-          else
-            members << AST::Members::Alias.new(
-              new_name: method.name,
-              old_name: method.original_name,
-              kind: :singleton,
-              location: nil,
-              comment: nil,
-              annotations: [],
-              )
           end
         end
 
@@ -266,8 +335,18 @@ module RBS
 
           public_instance_methods.sort.each do |name|
             method = mod.instance_method(name)
+            next if todo_object&.skip_instance_method?(module_name: module_name_absolute, method: method, accessibility: :public)
 
-            if method.name == method.original_name
+            if can_alias?(mod, method)
+              members << AST::Members::Alias.new(
+                new_name: method.name,
+                old_name: method.original_name,
+                kind: :instance,
+                location: nil,
+                comment: nil,
+                annotations: [],
+              )
+            else
               merge_rbs(module_name, members, instance: name) do
                 RBS.logger.info "missing #{module_name}##{name} #{method.source_location}"
 
@@ -284,27 +363,30 @@ module RBS
                   visibility: nil
                 )
               end
-            else
-              members << AST::Members::Alias.new(
-                new_name: method.name,
-                old_name: method.original_name,
-                kind: :instance,
-                location: nil,
-                comment: nil,
-                annotations: [],
-                )
             end
           end
         end
 
         private_instance_methods = mod.private_instance_methods.select {|name| target_method?(mod, instance: name) }
         unless private_instance_methods.empty?
+          added = false
           members << AST::Members::Private.new(location: nil)
 
           private_instance_methods.sort.each do |name|
             method = mod.instance_method(name)
+            next if todo_object&.skip_instance_method?(module_name: module_name_absolute, method: method, accessibility: :private)
 
-            if method.name == method.original_name
+            added = true
+            if can_alias?(mod, method)
+              members << AST::Members::Alias.new(
+                new_name: method.name,
+                old_name: method.original_name,
+                kind: :instance,
+                location: nil,
+                comment: nil,
+                annotations: [],
+              )
+            else
               merge_rbs(module_name, members, instance: name) do
                 RBS.logger.info "missing #{module_name}##{name} #{method.source_location}"
 
@@ -321,22 +403,28 @@ module RBS
                   visibility: nil
                 )
               end
-            else
-              members << AST::Members::Alias.new(
-                new_name: method.name,
-                old_name: method.original_name,
-                kind: :instance,
-                location: nil,
-                comment: nil,
-                annotations: [],
-                )
             end
           end
+
+          members.pop unless added
+        end
+      end
+
+      private def can_alias?(mod, method)
+        return false if method.name == method.original_name
+
+        begin
+          mod.instance_method(method.original_name) && true
+        rescue NameError
+          false
         end
       end
 
       def generate_constants(mod, decls)
+        module_name = const_name!(mod)
         mod.constants(false).sort.each do |name|
+          next if todo_object&.skip_constant?(module_name: module_name, name: name)
+
           begin
             value = mod.const_get(name)
           rescue StandardError, LoadError => e
@@ -344,8 +432,10 @@ module RBS
             next
           end
 
-          next if value.is_a?(Class) || value.is_a?(Module)
-          unless value.class.name
+          next if object_class(value).equal?(Class)
+          next if object_class(value).equal?(Module)
+
+          unless object_class(value).name
             RBS.logger.warn("Skipping constant #{name} #{value} of #{mod} as an instance of anonymous class")
             next
           end
@@ -358,8 +448,12 @@ module RBS
                      type: Types::Bases::Any.new(location: nil),
                      location: nil
                    )
+                 when ARGF
+                   Types::ClassInstance.new(name: TypeName("::RBS::Unnamed::ARGFClass"), args: [], location: nil)
+                 when ENV
+                   Types::ClassInstance.new(name: TypeName("::RBS::Unnamed::ENVClass"), args: [], location: nil)
                  else
-                   value_type_name = to_type_name(const_name(value.class))
+                   value_type_name = to_type_name(const_name!(object_class(value)), full_name: true).absolute!
                    args = type_args(value_type_name)
                    Types::ClassInstance.new(name: value_type_name, args: args, location: nil)
                  end
@@ -374,62 +468,56 @@ module RBS
       end
 
       def generate_super_class(mod)
-        if mod.superclass.nil? || mod.superclass == ::Object
+        superclass = mod.superclass
+
+        if superclass.nil? || superclass == ::Object
           nil
-        elsif const_name(mod.superclass).nil?
-          RBS.logger.warn("Skipping anonymous superclass #{mod.superclass} of #{mod}")
+        elsif const_name(superclass).nil?
+          RBS.logger.warn("Skipping anonymous superclass #{superclass} of #{mod}")
           nil
         else
-          super_name = to_type_name(const_name(mod.superclass), full_name: true).absolute!
+          super_name = to_type_name(const_name!(superclass), full_name: true).absolute!
           super_args = type_args(super_name)
           AST::Declarations::Class::Super.new(name: super_name, args: super_args, location: nil)
         end
       end
 
       def generate_class(mod)
-        type_name = to_type_name(const_name(mod))
+        type_name_absolute = to_type_name(const_name!(mod), full_name: true).absolute!
+        type_name = to_type_name(const_name!(mod))
         outer_decls = ensure_outer_module_declarations(mod)
 
         # Check if a declaration exists for the actual module
-        decl = outer_decls.detect { |decl| decl.is_a?(AST::Declarations::Class) && decl.name.name == only_name(mod).to_sym }
+        decl = outer_decls.detect do |decl|
+          decl.is_a?(AST::Declarations::Class) && decl.name.name == only_name(mod).to_sym
+        end #: AST::Declarations::Class?
+
         unless decl
-          decl = AST::Declarations::Class.new(
-            name: to_type_name(only_name(mod)),
-            type_params: type_params(mod),
-            super_class: generate_super_class(mod),
-            members: [],
-            annotations: [],
-            location: nil,
-            comment: nil
-          )
+          if mod < Struct
+            decl = StructGenerator.new(mod).build_decl
+          elsif RUBY_VERSION >= '3.2' && mod < Data
+            decl = DataGenerator.new(mod).build_decl
+          else
+            decl = AST::Declarations::Class.new(
+              name: to_type_name(only_name(mod)),
+              type_params: type_params(mod),
+              super_class: generate_super_class(mod),
+              members: [],
+              annotations: [],
+              location: nil,
+              comment: nil
+            )
+          end
 
           outer_decls << decl
         end
 
-        each_included_module(type_name, mod) do |module_name, module_full_name, _|
-          args = type_args(module_full_name)
-          decl.members << AST::Members::Include.new(
-            name: module_name,
-            args: args,
-            location: nil,
-            comment: nil,
-            annotations: []
-          )
-        end
+        generate_mixin(mod, decl, type_name, type_name_absolute)
 
-        each_included_module(type_name, mod.singleton_class) do |module_name, module_full_name ,_|
-          args = type_args(module_full_name)
-          decl.members << AST::Members::Extend.new(
-            name: module_name,
-            args: args,
-            location: nil,
-            comment: nil,
-            annotations: []
-          )
+        unless mod < Struct || (RUBY_VERSION >= '3.2' && mod < Data)
+          generate_methods(mod, type_name, decl.members) unless outline
         end
 
-        generate_methods(mod, type_name, decl.members) unless outline
-
         generate_constants mod, decl.members
       end
 
@@ -441,11 +529,15 @@ module RBS
           return
         end
 
+        type_name_absolute = to_type_name(name, full_name: true).absolute!
         type_name = to_type_name(name)
         outer_decls = ensure_outer_module_declarations(mod)
 
         # Check if a declaration exists for the actual class
-        decl = outer_decls.detect { |decl| decl.is_a?(AST::Declarations::Module) && decl.name.name == only_name(mod).to_sym }
+        decl = outer_decls.detect do |decl|
+          decl.is_a?(AST::Declarations::Module) && decl.name.name == only_name(mod).to_sym
+        end #: AST::Declarations::Module?
+
         unless decl
           decl = AST::Declarations::Module.new(
             name: to_type_name(only_name(mod)),
@@ -460,20 +552,19 @@ module RBS
           outer_decls << decl
         end
 
-        each_included_module(type_name, mod) do |module_name, module_full_name, _|
-          args = type_args(module_full_name)
-          decl.members << AST::Members::Include.new(
-            name: module_name,
-            args: args,
-            location: nil,
-            comment: nil,
-            annotations: []
-          )
-        end
+        generate_mixin(mod, decl, type_name, type_name_absolute)
+
+        generate_methods(mod, type_name, decl.members) unless outline
+
+        generate_constants mod, decl.members
+      end
+
+      def generate_mixin(mod, decl, type_name, type_name_absolute)
+        each_mixined_module(type_name, mod) do |module_name, module_full_name, mixin_class|
+          next if todo_object&.skip_mixin?(type_name: type_name_absolute, module_name: module_full_name, mixin_class: mixin_class)
 
-        each_included_module(type_name, mod.singleton_class) do |module_name, module_full_name, _|
           args = type_args(module_full_name)
-          decl.members << AST::Members::Extend.new(
+          decl.members << mixin_class.new(
             name: module_name,
             args: args,
             location: nil,
@@ -481,26 +572,33 @@ module RBS
             annotations: []
           )
         end
-
-        generate_methods(mod, type_name, decl.members) unless outline
-
-        generate_constants mod, decl.members
       end
 
       # Generate/find outer module declarations
       # This is broken down into another method to comply with `DRY`
       # This generates/finds declarations in nested form & returns the last array of declarations
       def ensure_outer_module_declarations(mod)
-        *outer_module_names, _ = const_name(mod).split(/::/) #=> parent = [A, B], mod = C
-        destination = @decls # Copy the entries in ivar @decls, not .dup
+        # @type var outer_module_names: Array[String]
+        *outer_module_names, _ = const_name!(mod).split(/::/) #=> parent = [A, B], mod = C
+        # Copy the entries in ivar @decls, not .dup
+        destination = @decls || [] #: Array[AST::Declarations::Class::member]
 
         outer_module_names&.each_with_index do |outer_module_name, i|
-          current_name = outer_module_names[0, i + 1].join('::')
-          outer_module = @modules.detect { |x| const_name(x) == current_name }
-          outer_decl = destination.detect { |decl| decl.is_a?(outer_module.is_a?(Class) ? AST::Declarations::Class : AST::Declarations::Module) && decl.name.name == outer_module_name.to_sym }
+          current_name = outer_module_names.take(i+1).join('::')
+          outer_module = @modules[current_name]
+          outer_decl = destination.detect do |decl|
+            case outer_module
+            when Class
+              decl.is_a?(AST::Declarations::Class) && decl.name.name == outer_module_name.to_sym
+            when Module
+              decl.is_a?(AST::Declarations::Module) && decl.name.name == outer_module_name.to_sym
+            end
+          end #: AST::Declarations::Class | AST::Declarations::Module | nil
 
           # Insert AST::Declarations if declarations are not added previously
           unless outer_decl
+            outer_module or raise
+
             if outer_module.is_a?(Class)
               outer_decl = AST::Declarations::Class.new(
                 name: to_type_name(outer_module_name),
@@ -533,37 +631,21 @@ module RBS
         destination
       end
 
-      # Returns the exact name & not compactly declared name
-      def only_name(mod)
-        # No nil check because this method is invoked after checking if the module exists
-        const_name(mod).split(/::/).last # (A::B::C) => C
-      end
-
-      def const_name(const)
-        @module_name_method ||= Module.instance_method(:name)
-        name = @module_name_method.bind(const).call
-        return nil unless name
-
-        begin
-          Object.const_get(name)
-        rescue NameError
-          # Should generate const name if anonymous or internal module (e.g. NameError::message)
-          nil
-        else
-          name
-        end
+      def object_class(value)
+        @object_class ||= Object.instance_method(:class)
+        @object_class.bind_call(value)
       end
 
       def type_args(type_name)
-        if class_decl = env.class_decls[type_name.absolute!]
-          class_decl.type_params.size.times.map { :untyped }
+        if class_decl = env.class_decls.fetch(type_name.absolute!, nil)
+          class_decl.type_params.size.times.map { Types::Bases::Any.new(location: nil) }
         else
           []
         end
       end
 
       def type_params(mod)
-        type_name = to_type_name(const_name(mod), full_name: true)
+        type_name = to_type_name(const_name!(mod), full_name: true)
         if class_decl = env.class_decls[type_name.absolute!]
           class_decl.type_params
         else
@@ -580,7 +662,9 @@ module RBS
           return # When the method is defined in eval
         end
 
-        block_from_body(ast) if ast&.type == :SCOPE
+        if ast && ast.type == :SCOPE
+          block_from_body(ast)
+        end
       end
     end
   end