ruby-list

咳といいます。

一年以上前の話題なのです

From: gotoken@math.sci.hokudai.ac.jp (GOTO Kentaro)
Subject: [ruby-list:13690] Flyweight (Re: Integer[num])
Date: Tue, 13 Apr 1999 20:40:03 +0900

> # いま辞書索いたらFlyweightってフライ級のボクサーのコトだそうで
> 
> -- gotoken
> 
> # 蛇足：FlyweightFactory を実現する mix-in (よーするにハッシュ :-)


ごとけんさんのコードを参考に
  ・GCされる 		… Hashが増え続けない
  ・Marshalできる	… 生成時の引数のみを使って dump/load する
ようなものを書いてみました。

おかしな部分があれば指摘してくださいませ。
# finalizer の中って Thread スイッチするのですか ??
# そうすると危険かも…



# flyaway.rb

require 'thread'
require 'weakref'

module FlyweightFactoryWeak
  def FlyweightFactoryWeak.append_features(mod)
    super
    mod.private_class_method :new
    mod.const_set("FW_HASHTABLE", {})
    mod.const_set("FW_REV_TABLE", {})
    mod.const_set("FW_MUTEX", Mutex.new)

    ObjectSpace.add_finalizer(lambda{|id|
				key = mod::FW_REV_TABLE[id]
				if key
				  mod::FW_HASHTABLE[key] = nil
				  mod::FW_REV_TABLE[id] = nil
				end
			      })
    
    def mod.[](*arg)
      self::FW_MUTEX.synchronize do
	begin
	  key = (arg.size == 1) ? arg[0] : arg
	  ref = self::FW_HASHTABLE[key]
	  begin
	    return ref[] if ref
	  rescue WeakRef::RefError
	  end
	  obj = new(*arg)
	  ref = WeakRef.new(obj)
	  self::FW_HASHTABLE[key] = ref
	  self::FW_REV_TABLE[obj.id] = key
	  return obj
	ensure
	  p self::FW_REV_TABLE if $DEBUG
	end
      end
    end

    def mod._load(s)
      self[*Marshal.load(s)]
    end
  end

  private
  def initialize(*arg)
    @fw_arg = arg
  end

  def _dump(port)
    Marshal.dump(@fw_arg, port)
  end
end


if __FILE__ == $0
  class Foo
    include FlyweightFactoryWeak
    def initialize(name, message='hello')
      @name = name
      @message = message

      super	# ! for dump/load trick
    end

    def to_s
      @name + ': ' + @message
    end
  end

  foo = Foo['mas']
  bar = Foo['bar', 'world']
  baz = Foo['bar', 'world']

  p ['foo', foo.id]
  p ['bar', bar.id]
  p ['baz', baz.id]

  baz = nil

  ObjectSpace.garbage_collect

  foo = Foo['mas']
  bar = Foo['bar', 'world']
  baz = Foo['bar', 'world']

  p ['foo', foo.id]
  p ['bar', bar.id]
  p ['baz', baz.id]

  bar = baz = nil

  ObjectSpace.garbage_collect

  foo = Foo['mas']
  bar = Foo['bar', 'world']
  baz = Foo['bar', 'world']

  p ['foo', foo.id]
  p ['bar', bar.id]
  p ['baz', baz.id]

  foo = Marshal.load(Marshal.dump(bar))

  p ['foo', foo.id]
  p ['bar', bar.id]
end

Thread

Prev Next

In This Thread

Prev Next

[#23640] net/http authentication — OZAWA Sakuro <crouton@...>

[#23642] rescue-ensure behavior diff between 1.4 and 1.5 — "Kikutani, Makoto" <kikutani@...>

[#23659] KCODE and regexp — "Kikutani, Makoto" <kikutani@...>

[#23661] return とスタックの関係？ — 佐藤 大輔 <densuke@...2.so-net.ne.jp>

[#23670] crontab.rb で「？」 — Atsuko Yoshida <Atsuko_Yoshida@...21.fxis.fujixerox.co.jp>

[#23673] rescue coerce(Re: return とスタックの関係？) — Toyofuku <toyofuku@...>

[#23687] file から読み込んだ文字列の #{} — HIGAKI Masaru (ひがき まさる) <mash@...>

[#23693] 与えられた文字列を変数名にする方法 — Yamada Kenji <kyamada@...>

[#23699] BTS — "Kikutani, Makoto" <kikutani@...>

[#23707] Time#usec — ARIMA Yasuhiro <fit0298@...>

[#23713] sybct expired? — KUSUNOKI Masanori <masanori@...>

[#23730] RAA の Ruby が… — Nakamura Akifumi <BXQ04723@...>

[#23731] environment variables — nobu.nakada@...

[#23741] 正規表現の中の / — Kazuhiro NISHIYAMA <zn@...>

[#23743] TCPServer & Thread — とみたまさひろ <tommy@...>

[#23749] RubyTalk — とみたまさひろ <tommy@...>

[#23773] Ruby 1.4.5 for cygwin 1.1.2 — WATANABE Hirofumi <eban@...>

[#23782] media watch 2000.07.07 — Noritsugu Nakamura <nnakamur@...>

[#23791] Ruby 1.4.5 for DJGPP — WATANABE Hirofumi <eban@...>

[#23792] Makefile.RB in eruby package (0.0.8) — Kengo Nakajima <ringo@...>

[#23796] dRuby — Kazuhiro NISHIYAMA <zn@...>

[#23801] scan regexp w/ w/o parenthesis — "Kikutani, Makoto" <kikutani@...>

[#23805] net/smtp — 佐藤 大輔 <densuke@...2.so-net.ne.jp>

[#23821] access to multi-dimensional array — Toshio Nakai <toshi@...4u.or.jp>

[#23836] IO#reopen, IO#read — Ueno Katsuhiro <unnie@...>

[#23840] Re: 紅玉すうぉっち Again — Kazuhiro NISHIYAMA <zn@...>

[#23863] 翻訳の王様 — n_zakiel@...

[#23864] ruby-1.4.5 がビルドできません、 cygwin1.1 で — Keishi Ooshio <o-keishi@...>

[#23867] net/smtp での ready 中の進捗状況把握 — Yukihiko Eda <eda@...>

[#23870] media watch 2000.07.(18-1) — Noritsugu Nakamura <nnakamur@...>

[#23875] Re: media watch 2000.07.(18-1) — Kengo Nakajima <ringo@...>

[#23884] アスタリスクの正規表現 — "Matsuhisa, Takashi" <matsuhisa@...>

[#23889] media watch 2000.07.18 — Noritsugu Nakamura <nnakamur@...>

[#23890] Ruby Entry Package and cygwin1.dll — Noritsugu Nakamura <nnakamur@...>

[#23901] backslash notation in regexp ?? — Yuji Shigehiro <sigehiro@...>

[#23902] はじめまして WinNT サーバーについて — ikjun <ikjun@...>

[#23907] Ruby の開発環境 — ikjun <ikjun@...>

[#23922] flush deflate buffer with Ruby/zlib — Tanaka Akira <akr@...17n.org>

[#23923] Re: [ruby-dev:10353] Re: should prohibit `module_function' for class Class — Masatoshi SEKI <m_seki@...>

[#23924] erb, drb mutexm updated — Masatoshi SEKI <m_seki@...>

[#23929] Re: IPA project — matz@... (Yukihiro Matsumoto)

[#23932] Ruby book p29 — Ryo HAYASAKA <ryoh@...>

[#23934] loop 中での File の使いかた — Kengo Nakajima <ringo@...>

[#23940] String#unpack と scanf の関係 — kiwamu <kiwamu@...>

[#23947] はじめましてと配列に関する質問 — t-hori <t-hori@...>

[#23951] 過去の記事をダウンロード — ikjun <ikjun@...>

[#23967] rskkserv-2.2 — Shugo Maeda <shugo@...>

[#23972] 過去ログの TITLE タグ — "Noboru Tomotani" <ntomo@...>

[#23979] end.each で parse error — Kazuhiro NISHIYAMA <zn@...>

[#23986] Ruby/GTK の FileSelection について (ディレクトリのみ表示したい) — MUTOH Masao <mutoh@...>

[#23993] C MAGAZINE — gotoken@... (GOTO Kentaro)

[#23997] RUBYLIB on mswin — Kazuhiro Yoshida <moriq.kazuhiro@...>

[#24008] Ruby デスクトップリファレンス — matz@... (Yukihiro Matsumoto)

[#24009] SMTP server (mail filter proxy) — Hideto ISHIBASHI <hideto-i@...4u.or.jp>

[#24025] Ruby version of unifdef — kjana@... (YANAGAWA Kazuhisa)

[#24026] OpenStep — matz@... (Yukihiro Matsumoto)

[#24035] media watch 2000.07.24 — Noritsugu Nakamura <nnakamur@...>

[#24037] サブルーチン（？）の配置について — Kengo Nakajima <ringo@...>

[#24038] win32ole — Koji Arai <JCA02266@...>

[#24049] mod_ruby/eruby/header — OZAWA -Crouton- Sakuro <crouton@...>

[#24050] [:alnum:] ? — Kazuhiro NISHIYAMA <zn@...>

[#24051] 条件式での .. と ... — Kazuhiro NISHIYAMA <zn@...>

[#24054] コマンドラインオプション -s — Kazuhiro NISHIYAMA <zn@...>

[ruby-list:23715] Re: Flyweight (Re: Integer[num])

Thread

In This Thread

[#23661] return とスタックの関係？ — 佐藤大輔 <densuke@...2.so-net.ne.jp>

[#23687] file から読み込んだ文字列の #{} — HIGAKI Masaru (ひがきまさる) <mash@...>

[#23805] net/smtp — 佐藤大輔 <densuke@...2.so-net.ne.jp>

[#23902] はじめまして　 WinNT サーバーについて — ikjun <ikjun@...>