event_machine: prevent double close of client socket
[rainbows.git] / lib / rainbows / event_machine.rb
blob7fe9864d29027246e6a6d6cd0f536a8ac969214e
1 # -*- encoding: binary -*-
2 require 'eventmachine'
3 EM::VERSION >= '0.12.10' or abort 'eventmachine 0.12.10 is required'
4 require 'rainbows/ev_core'
6 module Rainbows
8   # Implements a basic single-threaded event model with
9   # {EventMachine}[http://rubyeventmachine.com/].  It is capable of
10   # handling thousands of simultaneous client connections, but with only
11   # a single-threaded app dispatch.  It is suited for slow clients,
12   # and can work with slow applications via asynchronous libraries such as
13   # {async_sinatra}[http://github.com/raggi/async_sinatra],
14   # {Cramp}[http://m.onkey.org/2010/1/7/introducing-cramp],
15   # and {rack-fiber_pool}[http://github.com/mperham/rack-fiber_pool].
16   #
17   # It does not require your Rack application to be thread-safe,
18   # reentrancy is only required for the DevFdResponse body
19   # generator.
20   #
21   # Compatibility: Whatever \EventMachine ~> 0.12.10 and Unicorn both
22   # support, currently Ruby 1.8/1.9.
23   #
24   # This model is compatible with users of "async.callback" in the Rack
25   # environment such as
26   # {async_sinatra}[http://github.com/raggi/async_sinatra].
27   #
28   # For a complete asynchronous framework,
29   # {Cramp}[http://m.onkey.org/2010/1/7/introducing-cramp] is fully
30   # supported when using this concurrency model.
31   #
32   # This model is fully-compatible with
33   # {rack-fiber_pool}[http://github.com/mperham/rack-fiber_pool]
34   # which allows each request to run inside its own \Fiber after
35   # all request processing is complete.
36   #
37   # Merb (and other frameworks/apps) supporting +deferred?+ execution as
38   # documented at http://brainspl.at/articles/2008/04/18/deferred-requests-with-merb-ebb-and-thin
39   # will also get the ability to conditionally defer request processing
40   # to a separate thread.
41   #
42   # This model does not implement as streaming "rack.input" which allows
43   # the Rack application to process data as it arrives.  This means
44   # "rack.input" will be fully buffered in memory or to a temporary file
45   # before the application is entered.
47   module EventMachine
49     include Base
50     autoload :ResponsePipe, 'rainbows/event_machine/response_pipe'
51     autoload :ResponseChunkPipe, 'rainbows/event_machine/response_chunk_pipe'
52     autoload :TryDefer, 'rainbows/event_machine/try_defer'
54     class Client < EM::Connection # :nodoc: all
55       attr_writer :body
56       include Rainbows::EvCore
57       G = Rainbows::G
59       def initialize(io)
60         @_io = io
61         @body = nil
62       end
64       alias write send_data
65       alias receive_data on_read
67       def quit
68         super
69         close_connection_after_writing
70       end
72       def app_call
73         # To avoid clobbering the current streaming response
74         # (often a static file), we do not attempt to process another
75         # request on the same connection until the first is complete
76         return EM.next_tick { app_call } if @body
78         set_comm_inactivity_timeout 0
79         @env[RACK_INPUT] = @input
80         @env[REMOTE_ADDR] = @remote_addr
81         @env[ASYNC_CALLBACK] = method(:em_write_response)
82         @env[ASYNC_CLOSE] = EM::DefaultDeferrable.new
84         response = catch(:async) { APP.call(@env.update(RACK_DEFAULTS)) }
86         # too tricky to support pipelining with :async since the
87         # second (pipelined) request could be a stuck behind a
88         # long-running async response
89         (response.nil? || -1 == response[0]) and return @state = :close
91         em_write_response(response, alive = @hp.keepalive? && G.alive)
92         if alive
93           @env.clear
94           @hp.reset
95           @state = :headers
96           if @body.nil? && @hp.headers(@env, @buf)
97             EM.next_tick { on_read('') }
98           else
99             set_comm_inactivity_timeout(G.kato)
100           end
101         end
102       end
104       def em_write_response(response, alive = false)
105         status, headers, body = response
106         if @hp.headers?
107           headers = HH.new(headers)
108           headers[CONNECTION] = alive ? KEEP_ALIVE : CLOSE
109         else
110           headers = nil
111         end
113         if body.respond_to?(:errback) && body.respond_to?(:callback)
114           @body = body
115           body.callback { quit }
116           body.errback { quit }
117           # async response, this could be a trickle as is in comet-style apps
118           headers[CONNECTION] = CLOSE if headers
119           alive = true
120         elsif body.respond_to?(:to_path)
121           st = File.stat(path = body.to_path)
123           if st.file?
124             write(response_header(status, headers)) if headers
125             @body = stream_file_data(path)
126             @body.errback do
127               body.close if body.respond_to?(:close)
128               quit
129             end
130             @body.callback do
131               body.close if body.respond_to?(:close)
132               @body = nil
133               alive ? on_read('') : quit
134             end
135             return
136           elsif st.socket? || st.pipe?
137             @body = io = body_to_io(body)
138             chunk = stream_response_headers(status, headers) if headers
139             m = chunk ? ResponseChunkPipe : ResponsePipe
140             return EM.watch(io, m, self, alive, body).notify_readable = true
141           end
142           # char or block device... WTF? fall through to body.each
143         end
145         write(response_header(status, headers)) if headers
146         write_body_each(self, body)
147         quit unless alive
148       end
150       def unbind
151         async_close = @env[ASYNC_CLOSE] and async_close.succeed
152         @body.respond_to?(:fail) and @body.fail
153         @_io.close unless @_io.closed?
154       end
155     end
157     module Server # :nodoc: all
159       def close
160         detach
161         @io.close
162       end
164       def notify_readable
165         return if CUR.size >= MAX
166         io = Rainbows.accept(@io) or return
167         sig = EM.attach_fd(io.fileno, false)
168         CUR[sig] = CL.new(sig, io)
169       end
170     end
172     def init_worker_process(worker) # :nodoc:
173       Rainbows::Response.setup(Rainbows::EventMachine::Client)
174       super
175     end
177     # runs inside each forked worker, this sits around and waits
178     # for connections and doesn't die until the parent dies (or is
179     # given a INT, QUIT, or TERM signal)
180     def worker_loop(worker) # :nodoc:
181       init_worker_process(worker)
182       G.server.app.respond_to?(:deferred?) and
183         G.server.app = TryDefer[G.server.app]
185       # enable them both, should be non-fatal if not supported
186       EM.epoll
187       EM.kqueue
188       logger.info "#@use: epoll=#{EM.epoll?} kqueue=#{EM.kqueue?}"
189       client_class = Rainbows.const_get(@use).const_get(:Client)
190       Server.const_set(:MAX, worker_connections + LISTENERS.size)
191       Server.const_set(:CL, client_class)
192       client_class.const_set(:APP, G.server.app)
193       EM.run {
194         conns = EM.instance_variable_get(:@conns) or
195           raise RuntimeError, "EM @conns instance variable not accessible!"
196         Server.const_set(:CUR, conns)
197         EM.add_periodic_timer(1) do
198           unless G.tick
199             conns.each_value { |c| client_class === c and c.quit }
200             EM.stop if conns.empty? && EM.reactor_running?
201           end
202         end
203         LISTENERS.map! do |s|
204           EM.watch(s, Server) { |c| c.notify_readable = true }
205         end
206       }
207     end
209   end