Browse Source

Remove LDAP mail attribute as a requirement for registering an account

note-update
Mark Felder 3 years ago
parent
commit
f7146583e5
2 changed files with 14 additions and 24 deletions
  1. +13
    -21
      lib/pleroma/web/auth/ldap_authenticator.ex
  2. +1
    -3
      test/web/oauth/ldap_authorization_test.exs

+ 13
- 21
lib/pleroma/web/auth/ldap_authenticator.ex View File

@@ -105,29 +105,21 @@ defmodule Pleroma.Web.Auth.LDAPAuthenticator do
{:base, to_charlist(base)},
{:filter, :eldap.equalityMatch(to_charlist(uid), to_charlist(name))},
{:scope, :eldap.wholeSubtree()},
{:attributes, ['mail', 'email']},
{:timeout, @search_timeout}
]) do
{:ok, {:eldap_search_result, [{:eldap_entry, _, attributes}], _}} ->
with {_, [mail]} <- List.keyfind(attributes, 'mail', 0) do
params = %{
email: :erlang.list_to_binary(mail),
name: name,
nickname: name,
password: password,
password_confirmation: password
}

changeset = User.register_changeset(%User{}, params)

case User.register(changeset) do
{:ok, user} -> user
error -> error
end
else
_ ->
Logger.error("Could not find LDAP attribute mail: #{inspect(attributes)}")
{:error, :ldap_registration_missing_attributes}
{:ok, {:eldap_search_result, [{:eldap_entry, _, _}], _}} ->
params = %{
name: name,
nickname: name,
password: password,
password_confirmation: password
}

changeset = User.register_changeset(%User{}, params)

case User.register(changeset) do
{:ok, user} -> user
error -> error
end

error ->


+ 1
- 3
test/web/oauth/ldap_authorization_test.exs View File

@@ -72,9 +72,7 @@ defmodule Pleroma.Web.OAuth.LDAPAuthorizationTest do
equalityMatch: fn _type, _value -> :ok end,
wholeSubtree: fn -> :ok end,
search: fn _connection, _options ->
{:ok,
{:eldap_search_result, [{:eldap_entry, '', [{'mail', [to_charlist(user.email)]}]}],
[]}}
{:ok, {:eldap_search_result, [{:eldap_entry, '', []}], []}}
end,
close: fn _connection ->
send(self(), :close_connection)


Loading…
Cancel
Save