[ruby-dev:21593] Re: extend with marshal_dump/marshal_load

まつもと ゆきひろです

In message "[ruby-dev:21592] Re: extend with marshal_dump/marshal_load"
    on 03/10/10, "NAKAMURA, Hiroshi" <[e-mail]> writes:

|それはさておき、自分でカバーしたいのは確かなんですが、現時点では
|方法がみつからない。。。
|
|差し迫っているわけではなく、local(private?) instance variableが
|入ったら、きっとこんな仕組みが要るんだろうと思って実験してみて
|ました。マーシャルフォーマットをどう変更することになるのかな、と。
|インスタンス変数がどこで定義されているか、調べる方法はありましたっけ。。。

extend対象のクラス(サンプルではQuux)を作らなくちゃいけないん
ですが、以下のようなテクニックが使えます。FooやBarではextend
についてなにも考える必要が無いのがポイントです。

メソッド結合があRubyにると余分なクラスを不要にできるんですが。

----
class Foo
  def initialize
    @data_a = 1
    @r, @w = IO.pipe
  end

  def marshal_dump
    @data_a
  end

  def marshal_load(obj)
    @data_a = obj
    @r, @w = IO.pipe
  end
end

class Bar < Foo
  def initialize
    super
    @data_b = 2
  end

  def marshal_dump
    [super, @data_b]
  end

  def marshal_load(data)
    super(data[0])
    @data_b = data[1]
  end
end

module ExtendMarshal
  def marshal_dump
    base_data = super
    extends = (class << self; self; end).ancestors - self.class.ancestors - [ModuleMarshal]
    data = {:modules => extends, :base => base_data}
    extends.each do |m|
      m.instance_method(:marshal_dump_extend).bind(self).call(data)
    end
    data
  end

  def marshal_load(data)
    extends = data[:modules]
    extends.each do |m|
      self.extend(m)
      m.instance_method(:marshal_load_extend).bind(self).call(data)
    end
    super(data[:base])
  end
end

module Baz
  include ExtendMarshal
  def marshal_dump_extend(data)
    data[:Baz] = 42
  end

  def marshal_load_extend(data)
    @baz_data = data[:Baz]
  end
end

class Quux<Bar
  include ExtendMarshal
end

o1 = Quux.new
o1.extend(Baz)
o2 = Marshal.load(Marshal.dump(o1))
p o1
p o2