Bartender Xt Again. ロールプレイングゲーム2 真打(仮) リメイク版ロールプレイングゲーム ルビーサファイア フレンドコード 2723-9375-2977 seki@ruby-lang.org

Pragmatic Bookshelf Author

͔͠͠ઈ൛

Xt 20ੈلͷX11ͷϑϨʔϜϫʔΫ I/Oଟݩ଴ͪ selectଐΛந৅Խ

ੈؒͰ͸ 1εϨουͷI/OଟॏԽ͕ྲྀߦ͍ͬͯΔΒ͍͠ εϨου͏Μͬͯ͜ݴ͑͹΢έΔ 21ੈل͍͢͝ʂ

ॳ࡮Γेप೥ dRuby ʹΑΔ ؔকढ़ஶ ෼ࢄ ɾ Web ϓϩάϥϛϯά

ॳ࡮Γेप೥ͷ൓ল ੈؒʹܴ߹͠ͳͯ͘͸ͳΒͳ͍ ઌߦ͗ͯ͢͠͸μϝ

#dRuby Φʔύʔπ @yugui https://twitter.com/yugui/status/439412852013551616

ܴ߹͠Α͏ XtͷهԱΛཔΓʹselectଐΛந৅Խͯ͠ΈΔ RubyͳͷͰFiber࢖͏͔ͳ

ΞʔςΟετͳͷͰ Node͸ݟͳ͍ Pythonͷ΋εϧʔ

Bartender selectΛগ͠ந৅Խ͢Δ FiberΛ࢖͏ ϞϊεϨουͰ͋Δ ଞͷselectଐ͸୭͔ʹͲ͏ʹ͔ͯ͠΋Β͏

Bartenderͷ༝དྷ όʔςϯμʔ TofuͰ΋࢖໊ͬͨલ Think Class Library͔ΒύΫͬͨ

Bartender::App App#[]=(event, fd, callback) ίʔϧόοΫͷొ࿥ɻ Ϣʔβʔσʔλ͸ͳ͠ɻ⇦ MethodΦϒδΣΫτΛ౉ͤ͹͍͍͡ΌΜ App#delete(event, fd) App#run ϝΠϯϧʔϓ

͜Ε͚ͩ [event, fd]ͱϝιουΛ݁ͼ͚ͭΔ͚ͩ

ReaderͱWriterɺServer ͜ΕͰ͸ෆศͳͷͰϢʔςΟϦςΟʔΛ wellksײ non-block I/OΛblock෩ʹ͢Δ blockͦ͠͏ʹͳͬͨΒ࣮ߦݖΛख์͢ Fiber.yieldͶ αʔόʔιέοτ༻ͷϢʔςΟϦςΟʔ΋!

Bartender::Reader Reader#read(n) nΦΫςοτಡΉ Reader#read_until(sep="\r\n", chunk_size=8192) Reader#readln ηύʔϨλ·Ͱʢߦ຤·ͰʣಡΜͰฦ͢

Bartender::Reader#read(n) def read(n) while @buf.bytesize < n chunk = _read(n) break if chunk.nil? || chunk.empty? @buf += chunk end @buf.slice!(0, n) end

readͷ಺ଆͷ_read͕ϛι Θ͔Γʹ͍͚͘Ͳ͕͜͜Πέϝϯ

Bartender::Reader#_read(n) def _read(n) @fd.read_nonblock(n) rescue IO::WaitReadable select_readable retry end def select_readable @bartender[:read, @fd] = Fiber.current.method(:resume) Fiber.yield ensure @bartender.delete(:read, @fd) end 知らなかった！

Bartender::Reader#_read(n) def _read(n) @fd.read_nonblock(n) rescue IO::WaitReadable select_readable retry end def select_readable @bartender[:read, @fd] = Fiber.current.method(:resume) Fiber.yield ensure @bartender.delete(:read, @fd) end イベントのコールバック を登録

Bartender::Reader#_read(n) def _read(n) @fd.read_nonblock(n) rescue IO::WaitReadable select_readable retry end def select_readable @bartender[:read, @fd] = Fiber.current.method(:resume) Fiber.yield ensure @bartender.delete(:read, @fd) end Fiber.current ベンリ！

Bartender::Reader#_read(n) def _read(n) @fd.read_nonblock(n) rescue IO::WaitReadable select_readable retry end def select_readable @bartender[:read, @fd] = Fiber.current.method(:resume) Fiber.yield ensure @bartender.delete(:read, @fd) end コールバックをはずす

dRubyϓϩτίϧ ࣮ݧ༻ΫϥΠΞϯτॻ͘ͷ͕໘౗ dRubyͷϓϩτίϧΛ࿩ͤΔαʔόΛॻ͜͏ ...

dRubyϓϩτίϧ ಈ͍ͨʂ͕͢͞ࢲʂ

Bartender::Serverશจ class Server def initialize(bartender, port, &blk) @bartender = bartender @server = TCPServer.new(port) @bartender[:read, @server] = self.method(:on_accept) @blk = blk end def on_accept client = @server.accept reader = Reader.new(@bartender, client) writer = Writer.new(@bartender, client) fiber = Fiber.new do @blk.yield(reader, writer) end fiber.resume end end サーバーソケットをまつ Reader, Wrierをblockへ

DRbEchoServerͷྫ def initialize(bartender, port) @rdv = Rdv.new Bartender::Server.new(bartender, port) do |reader, writer| begin while true _, msg, argv = req_drb(reader) case msg when 'push' value = @rdv.push(argv) else value = @rdv.pop end reply_drb(writer, true, value) end rescue p $! end end end

DRbEchoServerͷྫ def load(reader, marshal=true) sz = reader.read(4) sz = sz.unpack('N')[0] data = reader.read(sz) return data unless marshal begin Marshal.load(data) rescue DRb::DRbUnknown.new($!, data) end end def req_drb(reader) ref = load(reader, false) msg = load(reader) argc = load(reader) argv = argc.times.collect { load(reader) } block = load(reader, false) [ref, msg, argv] end ブロックを気にせずreadし まくる

Fiber׳Ε͖ͯͨ Fiberͷ௨৴ϓϦϛςΟϒ࡞ΕΔ͔΋ Threadͷ௨৴ϓϦϛςΟϒͱ͸૬ੑѱ͍ Queueͱ͔࢖ͬͨΒݻ·ͬͪΌ͏Αʂ

Ұ੪௨஌ class Broadcast def initialize @reader = [] end def push(it) while not @reader.empty? @reader.shift.call(it) end end def pop @reader << Fiber.current.method(:resume) return Fiber.yield end end

଴ͪߦྻ def initialize @reader = [] @queue = [] end def push(it) @queue << it return if @reader.empty? @reader.shift.call(it) end def pop if @queue.empty? @reader << Fiber.current.method(:resume) return Fiber.yield end @queue.shift end

ϥϯσϒʔ def initialize @reader = [] @queue = [] end def push(it) if @reader.empty? @queue << [it, Fiber.current.method(:resume)] return Fiber.yield end @reader.shift.call(it) end def pop if @queue.empty? @reader << Fiber.current.method(:resume) return Fiber.yield end value, fiber = @queue.shift fiber.call return value end

هԱͷதͷXtΛ࠶ݱͨ͠ େੲͷωλ͸਎ମ͕֮͑ͯΔ selectͷϑϨʔϜϫʔΫ͸୯७͕ͩΞϓϦ͕ ೉͍͠ͷͰ࣮ݧͯ͠Έͨ dRubyͳΒ࣮ݧΫϥΠΞϯτ࡞ΒͣʹࡁΉ dRubyͷશͯͷຐ๏Λ࣮૷͢Δͷ͸FiberͰ͸ ࠔ೉Ͱ͋Δ Fiber࢖͏ΑΓThreadͷํ͕͍͍Α