861a7ce3eb5c7d893cd6b55b850a8e08beb7ef52
[akkoma] / lib / pleroma / web / mastodon_api / websocket_handler.ex
1 # Pleroma: A lightweight social networking server
2 # Copyright © 2017-2021 Pleroma Authors <https://pleroma.social/>
3 # SPDX-License-Identifier: AGPL-3.0-only
4
5 defmodule Pleroma.Web.MastodonAPI.WebsocketHandler do
6 require Logger
7
8 alias Pleroma.Repo
9 alias Pleroma.User
10 alias Pleroma.Web.OAuth.Token
11 alias Pleroma.Web.Streamer
12
13 @behaviour :cowboy_websocket
14
15 # Client ping period.
16 @tick :timer.seconds(30)
17 # Cowboy timeout period.
18 @timeout :timer.seconds(60)
19 # Hibernate every X messages
20 @hibernate_every 100
21
22 def init(%{qs: qs} = req, state) do
23 with params <- Enum.into(:cow_qs.parse_qs(qs), %{}),
24 sec_websocket <- :cowboy_req.header("sec-websocket-protocol", req, nil),
25 access_token <- Map.get(params, "access_token"),
26 {:ok, user, oauth_token} <- authenticate_request(access_token, sec_websocket),
27 {:ok, topic} <- Streamer.get_topic(params["stream"], user, oauth_token, params) do
28 req =
29 if sec_websocket do
30 :cowboy_req.set_resp_header("sec-websocket-protocol", sec_websocket, req)
31 else
32 req
33 end
34
35 {:cowboy_websocket, req, %{user: user, topic: topic, count: 0, timer: nil},
36 %{idle_timeout: @timeout}}
37 else
38 {:error, :bad_topic} ->
39 Logger.debug("#{__MODULE__} bad topic #{inspect(req)}")
40 req = :cowboy_req.reply(404, req)
41 {:ok, req, state}
42
43 {:error, :unauthorized} ->
44 Logger.debug("#{__MODULE__} authentication error: #{inspect(req)}")
45 req = :cowboy_req.reply(401, req)
46 {:ok, req, state}
47 end
48 end
49
50 def websocket_init(state) do
51 Logger.debug(
52 "#{__MODULE__} accepted websocket connection for user #{(state.user || %{id: "anonymous"}).id}, topic #{state.topic}"
53 )
54
55 Streamer.add_socket(state.topic, state.user)
56 {:ok, %{state | timer: timer()}}
57 end
58
59 # Client's Pong frame.
60 def websocket_handle(:pong, state) do
61 if state.timer, do: Process.cancel_timer(state.timer)
62 {:ok, %{state | timer: timer()}}
63 end
64
65 # We only receive pings for now
66 def websocket_handle(:ping, state), do: {:ok, state}
67
68 def websocket_handle({:text, "ping"}, state) do
69 if state.timer, do: Process.cancel_timer(state.timer)
70 {:reply, {:text, "pong"}, %{state | timer: timer()}}
71 end
72
73 def websocket_handle(frame, state) do
74 Logger.error("#{__MODULE__} received frame: #{inspect(frame)}")
75 {:ok, state}
76 end
77
78 def websocket_info({:render_with_user, view, template, item}, state) do
79 user = %User{} = User.get_cached_by_ap_id(state.user.ap_id)
80
81 unless Streamer.filtered_by_user?(user, item) do
82 websocket_info({:text, view.render(template, item, user)}, %{state | user: user})
83 else
84 {:ok, state}
85 end
86 end
87
88 def websocket_info({:text, message}, state) do
89 # If the websocket processed X messages, force an hibernate/GC.
90 # We don't hibernate at every message to balance CPU usage/latency with RAM usage.
91 if state.count > @hibernate_every do
92 {:reply, {:text, message}, %{state | count: 0}, :hibernate}
93 else
94 {:reply, {:text, message}, %{state | count: state.count + 1}}
95 end
96 end
97
98 # Ping tick. We don't re-queue a timer there, it is instead queued when :pong is received.
99 # As we hibernate there, reset the count to 0.
100 # If the client misses :pong, Cowboy will automatically timeout the connection after
101 # `@idle_timeout`.
102 def websocket_info(:tick, state) do
103 {:reply, :ping, %{state | timer: nil, count: 0}, :hibernate}
104 end
105
106 # State can be `[]` only in case we terminate before switching to websocket,
107 # we already log errors for these cases in `init/1`, so just do nothing here
108 def terminate(_reason, _req, []), do: :ok
109
110 def terminate(reason, _req, state) do
111 Logger.debug(
112 "#{__MODULE__} terminating websocket connection for user #{(state.user || %{id: "anonymous"}).id}, topic #{state.topic || "?"}: #{inspect(reason)}"
113 )
114
115 Streamer.remove_socket(state.topic)
116 :ok
117 end
118
119 # Public streams without authentication.
120 defp authenticate_request(nil, nil) do
121 {:ok, nil, nil}
122 end
123
124 # Authenticated streams.
125 defp authenticate_request(access_token, sec_websocket) do
126 token = access_token || sec_websocket
127
128 with true <- is_bitstring(token),
129 oauth_token = %Token{user_id: user_id} <- Repo.get_by(Token, token: token),
130 user = %User{} <- User.get_cached_by_id(user_id) do
131 {:ok, user, oauth_token}
132 else
133 _ -> {:error, :unauthorized}
134 end
135 end
136
137 defp timer do
138 Process.send_after(self(), :tick, @tick)
139 end
140 end