Packages
phoenix
0.8.0
1.8.9
1.8.8
1.8.7
1.8.6
1.8.5
1.8.4
1.8.3
1.8.2
1.8.1
1.8.0
1.8.0-rc.4
1.8.0-rc.3
1.8.0-rc.2
1.8.0-rc.1
1.8.0-rc.0
1.7.24
1.7.23
1.7.22
1.7.21
1.7.20
1.7.19
1.7.18
1.7.17
1.7.16
1.7.15
1.7.14
1.7.13
1.7.12
1.7.11
1.7.10
1.7.9
1.7.8
1.7.7
1.7.6
1.7.5
1.7.4
1.7.3
1.7.2
1.7.1
1.7.0
1.7.0-rc.3
1.7.0-rc.2
1.7.0-rc.1
1.7.0-rc.0
1.6.17
1.6.16
1.6.15
1.6.14
1.6.13
1.6.12
1.6.11
1.6.10
1.6.9
1.6.8
1.6.7
1.6.6
1.6.5
1.6.4
1.6.3
1.6.2
1.6.1
1.6.0
1.6.0-rc.1
1.6.0-rc.0
1.5.15
1.5.14
1.5.13
1.5.12
1.5.11
1.5.10
1.5.9
1.5.8
1.5.7
1.5.6
1.5.5
1.5.4
1.5.3
1.5.2
1.5.1
1.5.0
1.5.0-rc.0
1.4.18
1.4.17
1.4.16
1.4.15
1.4.14
1.4.13
1.4.12
1.4.11
1.4.10
1.4.9
1.4.8
1.4.7
1.4.6
1.4.5
1.4.4
1.4.3
1.4.2
1.4.1
1.4.0
1.4.0-rc.3
1.4.0-rc.2
1.4.0-rc.1
1.4.0-rc.0
1.3.5
1.3.4
1.3.3
1.3.2
1.3.1
1.3.0
1.3.0-rc.3
1.3.0-rc.2
1.3.0-rc.1
1.3.0-rc.0
1.2.5
1.2.4
1.2.3
1.2.2
1.2.1
1.2.0
1.2.0-rc.1
1.2.0-rc.0
1.1.9
1.1.8
1.1.7
1.1.6
1.1.5
1.1.4
1.1.3
1.1.2
1.1.1
1.1.0
1.0.6
1.0.5
1.0.4
1.0.3
1.0.2
1.0.1
1.0.0
0.17.1
0.17.0
0.16.1
0.16.0
0.15.0
0.14.0
0.13.1
0.13.0
0.12.0
0.11.0
0.10.0
0.9.0
0.8.0
0.7.2
0.7.1
0.7.0
0.6.2
0.6.1
0.6.0
0.5.0
0.4.1
0.4.0
0.3.1
0.3.0
0.2.11
0.2.10
0.2.9
0.2.8
0.2.7
0.2.6
0.2.5
0.2.4
0.2.3
0.2.2
0.2.1
0.2.0
0.1.0
Productive. Reliable. Fast. A productive web framework that does not compromise speed or maintainability.
Security advisory:
This version has known vulnerabilities.
View advisories
Current section
Files
Jump to
Current section
Files
lib/phoenix/transports/long_poller/server.ex
defmodule Phoenix.Transports.LongPoller.Supervisor do
@moduledoc false
use Supervisor
def start_link do
Supervisor.start_link(__MODULE__, [], name: __MODULE__)
end
def init([]) do
children = [
worker(Phoenix.Transports.LongPoller.Server, [], restart: :transient)
]
supervise(children, strategy: :simple_one_for_one)
end
end
defmodule Phoenix.Transports.LongPoller.Server do
use GenServer
@moduledoc false
alias Phoenix.Socket.Message
alias Phoenix.Channel.Transport
alias Phoenix.Transports.LongPoller
@doc """
Starts the Server
* `router` - The router module, ie. `MyApp.Router`
* `window_ms` - The longpoll session timeout, in milliseconds
If the server receives no message within `window_ms`, it terminates and
clients are responsible for opening a new session.
"""
def start_link(router, window_ms) do
GenServer.start_link(__MODULE__, [router, window_ms])
end
@doc false
def init([router, window_ms]) do
state = %{listener: nil, buffer: [], router: router, sockets: HashDict.new, window_ms: window_ms * 2}
{:ok, state, state.window_ms}
end
@doc """
Sets active listener pid as the receiver of broadcasted messages
"""
def handle_call({:set_active_listener, pid}, _from, state) do
if Enum.any?(state.buffer) do
send pid, {:messages, Enum.reverse(state.buffer)}
end
{:reply, :ok, %{state | listener: pid}, state.window_ms}
end
# TODO: %Messages{}'s need unique ids so we can properly ack them
@doc """
Handles acknowledged messages from client and removes from buffer.
`:ack` calls to the server also represent the client listener
closing for repoll.
"""
def handle_call({:ack, messages}, _from, state) do
buffer = state.buffer -- messages
{:reply, :ok, %{state | buffer: buffer, listener: nil}, state.window_ms}
end
@doc """
Dispatches client `%Phoenix.Socket.Messages{}` back through Transport layer
"""
def handle_call({:dispatch, message}, _from, state) do
message
|> Transport.dispatch(state.sockets, self, state.router, LongPoller)
|> case do
{:ok, sockets} ->
{:reply, {:ok, sockets}, %{state | sockets: sockets}, state.window_ms}
{:error, sockets, reason} ->
{:reply, {:error, sockets, reason}, %{state | sockets: sockets}, state.window_ms}
end
end
@doc """
Forwards replied/broadcasted `%Phoenix.Socket.Message{}`s from Channels back to client
"""
def handle_info({:socket_reply, message = %Message{}}, state) do
buffer = [message | state.buffer]
if state.listener && Process.alive?(state.listener) do
send state.listener, {:messages, buffer}
end
{:noreply, %{state | buffer: buffer}, state.window_ms}
end
def handle_info({:socket_broadcast, message = %Message{}}, %{sockets: sockets} = state) do
sockets = case Transport.dispatch_broadcast(sockets, message) do
{:ok, socks} -> socks
{:error, socks, _reason} -> socks
end
{:noreply, %{state | sockets: sockets}, state.window_ms}
end
def handle_info(:timeout, state) do
{:stop, :shutdown, state}
end
@doc """
Handles forwarding arbitrary Elixir messages back to listening client
"""
def terminate(reason, state) do
:ok = Transport.dispatch_leave(state.sockets, reason)
:ok
end
end