1 # Pleroma: A lightweight social networking server
2 # Copyright © 2017-2019 Pleroma Authors <https://pleroma.social/>
3 # SPDX-License-Identifier: AGPL-3.0-only
5 defmodule Pleroma.Pagination do
7 Implements Mastodon-compatible pagination.
16 @page_keys ["max_id", "min_id", "limit", "since_id", "order"]
18 def page_keys, do: @page_keys
20 def fetch_paginated(query, params, type \\ :keyset, table_binding \\ nil)
22 def fetch_paginated(query, %{"total" => true} = params, :keyset, table_binding) do
23 total = Repo.aggregate(query, :count, :id)
27 items: fetch_paginated(query, Map.drop(params, ["total"]), :keyset, table_binding)
31 def fetch_paginated(query, params, :keyset, table_binding) do
32 options = cast_params(params)
35 |> paginate(options, :keyset, table_binding)
37 |> enforce_order(options)
40 def fetch_paginated(query, %{"total" => true} = params, :offset, table_binding) do
41 total = Repo.aggregate(query, :count, :id)
45 items: fetch_paginated(query, Map.drop(params, ["total"]), :offset, table_binding)
49 def fetch_paginated(query, params, :offset, table_binding) do
50 options = cast_params(params)
53 |> paginate(options, :offset, table_binding)
57 def paginate(query, options, method \\ :keyset, table_binding \\ nil)
59 def paginate(query, options, :keyset, table_binding) do
61 |> restrict(:min_id, options, table_binding)
62 |> restrict(:since_id, options, table_binding)
63 |> restrict(:max_id, options, table_binding)
64 |> restrict(:order, options, table_binding)
65 |> restrict(:limit, options, table_binding)
68 def paginate(query, options, :offset, table_binding) do
70 |> restrict(:order, options, table_binding)
71 |> restrict(:offset, options, table_binding)
72 |> restrict(:limit, options, table_binding)
75 defp cast_params(params) do
86 Enum.reduce(params, %{}, fn
87 {key, _value}, acc when is_atom(key) -> Map.drop(acc, [key])
88 {key, value}, acc -> Map.put(acc, key, value)
91 changeset = cast({%{}, param_types}, params, Map.keys(param_types))
95 defp restrict(query, :min_id, %{min_id: min_id}, table_binding) do
96 where(query, [{q, table_position(query, table_binding)}], q.id > ^min_id)
99 defp restrict(query, :since_id, %{since_id: since_id}, table_binding) do
100 where(query, [{q, table_position(query, table_binding)}], q.id > ^since_id)
103 defp restrict(query, :max_id, %{max_id: max_id}, table_binding) do
104 where(query, [{q, table_position(query, table_binding)}], q.id < ^max_id)
107 defp restrict(query, :order, %{skip_order: true}, _), do: query
109 defp restrict(query, :order, %{min_id: _}, table_binding) do
112 [{u, table_position(query, table_binding)}],
113 fragment("? asc nulls last", u.id)
117 defp restrict(query, :order, _options, table_binding) do
120 [{u, table_position(query, table_binding)}],
121 fragment("? desc nulls last", u.id)
125 defp restrict(query, :offset, %{offset: offset}, _table_binding) do
126 offset(query, ^offset)
129 defp restrict(query, :limit, options, _table_binding) do
130 limit = Map.get(options, :limit, @default_limit)
136 defp restrict(query, _, _, _), do: query
138 defp enforce_order(result, %{min_id: _}) do
143 defp enforce_order(result, _), do: result
145 defp table_position(%Ecto.Query{} = query, binding_name) do
146 Map.get(query.aliases, binding_name, 0)
149 defp table_position(_, _), do: 0