如何实现DSL以通过方法链动态创建新方法？

Question

我有一个类别和该类的实例：

class Thing
   def initialize
      @name = name
   end
end

a = Thing.new("a")

我想通过像这样的调用DSL来动态创建方法并设置其返回值：

如果我写a.is_a.person

• 。 创建方法
• ？应为a A.person

？应该返回true如果我写a.is_not_a.man

• 创建方法
• 应该为a a.man？

a man ？ 写a.is_the.parent_of.joe

• a parent_of应该为a
• a.parent_of应该返回<<应该返回<<代码> joe

我尝试执行此操作

class Thing
  attr_reader :name

  def initialize(name)
    @name = name
  end

  def is_a
    Class.new do
      def initialize base
        @base = base
      end
      
      def method_missing name
        @base.define_singleton_method "#{name}?" do
            true
        end
      end
    end.new self
  end

  def is_not_a
    Class.new do
      def initialize base
        @base = base
      end
      
      def method_missing name
        @base.define_singleton_method "#{name}?" do
          false
        end
      end
    end.new self
  end
end

，它适用于is_a和is_not_a，如上所述：

jane = Thing.new('Jane')

jane.is_a.person
jane.person? #=> true

jane.is_a.woman
jane.woman? #=> true

jane.is_not_a.man
jane.man? #=> false

但是对于jane.is_is_the..parent_of.joe.joe.joe < /code>，就像更深层的链接一样，我无法弄清楚如何实现它。

我该如何处理？

Answer 1

使用class.new您每次创建一个新的匿名类is_a或is_not_a被调用。尽管这有效，但有一个
更轻巧的方法。您可以创建一个辅助器，每次收到消息时都会调用一个给定的块：

class MethodCallback
  def initialize(&block)
    @block = block
  end

  def method_missing(name, *args)
    @block.call(name, *args)
  end
end

示例用法：

m = MethodCallback.new { |name| puts "#{name} was called"}

m.foo
# foo was called

m.bar
# bar was called

使用此助手，可以像这样简化您的课程：

class Thing
  def initialize(name)
    @name = name
  end

  def is_a
    MethodCallback.new do |name|
      define_singleton_method(:"#{name}?") { true }
    end
  end

  def is_not_a
    MethodCallback.new do |name|
      define_singleton_method(:"#{name}?") { false }
    end
  end
end

jane = Thing.new('Jane')

jane.is_a.person
jane.person? #=> true

jane.is_a.woman
jane.woman? #=> true

jane.is_not_a.man
jane.man? #=> false

现在，对于链接一个jane.is_is_is_the.parent_of.joe.joe << /code>，而不是定义新方法右范围，我们必须
调用/返回另一个MethodCallback实例以获取额外的方法链接：

class Thing
  # ...
  
  def is_the
    MethodCallback.new do |name|
      MethodCallback.new do |value|
        define_singleton_method(name) { value.to_s }
      end
    end
  end
end

在上面的代码中，is_the将分配给>名称。，第二个将分配给value。
我们创建的方法将被称为name，它将返回value：

jane.is_the.parent_of.joe
#           ^^^^^^^^^ ^^^
#           name      value
jane.parent_of #=> 'joe'

另一个：

jane.is_the.major_of.london
jane.major_of #=> 'london'

Answer 2

如果您不使用方法链条来定义对象，则有很多替代方案。这是一种使用“构建器”方法的方法。

class Thing

   attr_reader :name
   def self.define(name, &block)
      thing = Thing.new(name)
      thing.instance_eval(&block)
      thing
   end

   def initialize(name)
      @name = name
   end

   def is(str)

      case str
      when /^\s*a\s+(\w+)\s*$/
         define_a($1)
      when /^\s*not\s+a\s+(\w+)\s*$/
         define_not_a($1)
      when /^\s*the\s*(\w+)\s+of\s+(\w+)\s*$/
         define_relationship($1, $2)
      end

   end

   def define_a(str)
      define_singleton_method("#{str}?".to_sym) {true} 
   end

   def define_not_a(str)
      define_singleton_method("#{str}?".to_sym) {false} 
   end

   def define_relationship(relation, to)
      define_singleton_method("#{relation}_of".to_sym) {to} 
   end
end

a = Thing.define("a") do 
   is "a person"
   is "not a man"
   is "the parent of joe"
end

puts a.name       # => a
puts a.person?    # => true
puts a.man?       # => false
puts a.parent_of  # => joe