Exclude reblogs from `GET /api/pleroma/admin/statuses` by default
[akkoma] / lib / pleroma / web / mastodon_api / controllers / app_controller.ex
1 # Pleroma: A lightweight social networking server
2 # Copyright © 2017-2019 Pleroma Authors <https://pleroma.social/>
3 # SPDX-License-Identifier: AGPL-3.0-only
4
5 defmodule Pleroma.Web.MastodonAPI.AppController do
6 use Pleroma.Web, :controller
7
8 alias Pleroma.Plugs.OAuthScopesPlug
9 alias Pleroma.Repo
10 alias Pleroma.Web.OAuth.App
11 alias Pleroma.Web.OAuth.Scopes
12 alias Pleroma.Web.OAuth.Token
13
14 action_fallback(Pleroma.Web.MastodonAPI.FallbackController)
15
16 plug(OAuthScopesPlug, %{scopes: ["read"]} when action == :verify_credentials)
17
18 @local_mastodon_name "Mastodon-Local"
19
20 @doc "POST /api/v1/apps"
21 def create(conn, params) do
22 scopes = Scopes.fetch_scopes(params, ["read"])
23
24 app_attrs =
25 params
26 |> Map.drop(["scope", "scopes"])
27 |> Map.put("scopes", scopes)
28
29 with cs <- App.register_changeset(%App{}, app_attrs),
30 false <- cs.changes[:client_name] == @local_mastodon_name,
31 {:ok, app} <- Repo.insert(cs) do
32 render(conn, "show.json", app: app)
33 end
34 end
35
36 @doc "GET /api/v1/apps/verify_credentials"
37 def verify_credentials(%{assigns: %{user: _user, token: token}} = conn, _) do
38 with %Token{app: %App{} = app} <- Repo.preload(token, :app) do
39 render(conn, "short.json", app: app)
40 end
41 end
42 end