+# Pleroma: A lightweight social networking server
+# Copyright © 2017-2019 Pleroma Authors <https://pleroma.social/>
+# SPDX-License-Identifier: AGPL-3.0-only
+
defmodule Pleroma.Plugs.AuthenticationPlug do
alias Comeonin.Pbkdf2
import Plug.Conn
alias Pleroma.User
+ require Logger
- def init(options) do
- options
- end
-
- def call(%{assigns: %{user: %User{}}} = conn, _), do: conn
-
- def call(conn, opts) do
- with {:ok, username, password} <- decode_header(conn),
- {:ok, user} <- opts[:fetcher].(username),
- false <- !!user.info["deactivated"],
- saved_user_id <- get_session(conn, :user_id),
- legacy_password <- String.starts_with?(user.password_hash, "$6$"),
- update_legacy_password <-
- !(Map.has_key?(opts, :update_legacy_password) && opts[:update_legacy_password] == false),
- {:ok, verified_user} <- verify(user, password, saved_user_id) do
- if legacy_password and update_legacy_password do
- User.reset_password(verified_user, %{
- :password => password,
- :password_confirmation => password
- })
- end
+ def init(options), do: options
- conn
- |> assign(:user, verified_user)
- |> put_session(:user_id, verified_user.id)
- else
- _ -> conn |> halt_or_continue(opts)
- end
+ def checkpw(password, "$6" <> _ = password_hash) do
+ :crypt.crypt(password, password_hash) == password_hash
end
- # Short-circuit if we have a cookie with the id for the given user.
- defp verify(%{id: id} = user, _password, id) do
- {:ok, user}
+ def checkpw(password, "$pbkdf2" <> _ = password_hash) do
+ Pbkdf2.checkpw(password, password_hash)
end
- defp verify(nil, _password, _user_id) do
- Pbkdf2.dummy_checkpw()
- :error
+ def checkpw(_password, _password_hash) do
+ Logger.error("Password hash not recognized")
+ false
end
- defp verify(user, password, _user_id) do
- valid =
- if String.starts_with?(user.password_hash, "$6$") do
- :crypt.crypt(password, user.password_hash) == user.password_hash
- else
- Pbkdf2.checkpw(password, user.password_hash)
- end
+ def call(%{assigns: %{user: %User{}}} = conn, _), do: conn
- if valid do
- {:ok, user}
+ def call(
+ %{
+ assigns: %{
+ auth_user: %{password_hash: password_hash} = auth_user,
+ auth_credentials: %{password: password}
+ }
+ } = conn,
+ _
+ ) do
+ if Pbkdf2.checkpw(password, password_hash) do
+ conn
+ |> assign(:user, auth_user)
else
- :error
- end
- end
-
- defp decode_header(conn) do
- with ["Basic " <> header] <- get_req_header(conn, "authorization"),
- {:ok, userinfo} <- Base.decode64(header),
- [username, password] <- String.split(userinfo, ":", parts: 2) do
- {:ok, username, password}
+ conn
end
end
- defp halt_or_continue(conn, %{optional: true}) do
- conn |> assign(:user, nil)
- end
-
- defp halt_or_continue(conn, _) do
+ def call(%{assigns: %{auth_credentials: %{password: _}}} = conn, _) do
+ Pbkdf2.dummy_checkpw()
conn
- |> put_resp_content_type("application/json")
- |> send_resp(403, Jason.encode!(%{error: "Invalid credentials."}))
- |> halt
end
+
+ def call(conn, _), do: conn
end