X-Git-Url: http://git.squeep.com/?a=blobdiff_plain;f=lib%2Fpleroma%2Fconfig.ex;h=fcc0397101368e26d3eb22c5734160eaa017a205;hb=1b49b8efe57256b3f64b4b7e8a1de805ab030814;hp=fc5338591d684b9da364644d99a33cfc84dc0155;hpb=a68c18f0ad6befe432e961bd348744b305492524;p=akkoma diff --git a/lib/pleroma/config.ex b/lib/pleroma/config.ex index fc5338591..0a6ac0ad0 100644 --- a/lib/pleroma/config.ex +++ b/lib/pleroma/config.ex @@ -1,20 +1,65 @@ +# Pleroma: A lightweight social networking server +# Copyright © 2017-2021 Pleroma Authors +# SPDX-License-Identifier: AGPL-3.0-only + defmodule Pleroma.Config do - def get([key]), do: get(key) + @behaviour Pleroma.Config.Getting + defmodule Error do + defexception [:message] + end + + @impl true + def get(key), do: get(key, nil) + + @impl true + def get([key], default), do: get(key, default) + + @impl true + def get([_ | _] = path, default) do + case fetch(path) do + {:ok, value} -> value + :error -> default + end + end + + @impl true + def get(key, default) do + Application.get_env(:pleroma, key, default) + end + + def get!(key) do + value = get(key, nil) - def get([parent_key | keys]) do - Application.get_env(:pleroma, parent_key) - |> get_in(keys) + if value == nil do + raise(Error, message: "Missing configuration value: #{inspect(key)}") + else + value + end end - def get(key) do - Application.get_env(:pleroma, key) + def fetch(key) when is_atom(key), do: fetch([key]) + + def fetch([root_key | keys]) do + Enum.reduce_while(keys, Application.fetch_env(:pleroma, root_key), fn + key, {:ok, config} when is_map(config) or is_list(config) -> + case Access.fetch(config, key) do + :error -> + {:halt, :error} + + value -> + {:cont, value} + end + + _key, _config -> + {:halt, :error} + end) end def put([key], value), do: put(key, value) def put([parent_key | keys], value) do parent = - Application.get_env(:pleroma, parent_key) + Application.get_env(:pleroma, parent_key, []) |> put_in(keys, value) Application.put_env(:pleroma, parent_key, parent) @@ -23,4 +68,50 @@ defmodule Pleroma.Config do def put(key, value) do Application.put_env(:pleroma, key, value) end + + def delete([key]), do: delete(key) + + def delete([parent_key | keys] = path) do + with {:ok, _} <- fetch(path) do + {_, parent} = + parent_key + |> get() + |> get_and_update_in(keys, fn _ -> :pop end) + + Application.put_env(:pleroma, parent_key, parent) + end + end + + def delete(key) do + Application.delete_env(:pleroma, key) + end + + def restrict_unauthenticated_access?(resource, kind) do + setting = get([:restrict_unauthenticated, resource, kind]) + + if setting in [nil, :if_instance_is_private] do + !get!([:instance, :public]) + else + setting + end + end + + def improved_hashtag_timeline_path, do: [:instance, :improved_hashtag_timeline] + def improved_hashtag_timeline, do: get(improved_hashtag_timeline_path()) + + def oauth_consumer_strategies, do: get([:auth, :oauth_consumer_strategies], []) + + def oauth_consumer_enabled?, do: oauth_consumer_strategies() != [] + + def enforce_oauth_admin_scope_usage?, do: !!get([:auth, :enforce_oauth_admin_scope_usage]) + + def oauth_admin_scopes(scopes) when is_list(scopes) do + Enum.flat_map( + scopes, + fn scope -> + ["admin:#{scope}"] ++ + if enforce_oauth_admin_scope_usage?(), do: [], else: [scope] + end + ) + end end