defmodule Ash.Page do
  @moduledoc "Types for Ash pages"
  @type page :: Ash.Page.Keyset.t() | Ash.Page.Offset.t()

  @type type :: :offset | :keyset

  @doc false
  # This is a custom validator for an options schema
  def page_opts(page_opts) do
    if page_opts in [false, nil] do
      {:ok, page_opts}
    else
      if page_opts[:after] || page_opts[:before] do
        validate_or_error(page_opts, Ash.Page.Keyset.Opts)
      else
        if page_opts[:offset] do
          validate_or_error(page_opts, Ash.Page.Offset.Opts)
        else
          validate_or_error(page_opts, Ash.Page.Keyset.Opts)
        end
      end
    end
  end

  defp validate_or_error(opts, mod) do
    case mod.validate(opts) do
      {:ok, value} -> {:ok, mod.to_options(value)}
      {:error, error} -> {:error, Exception.message(error)}
    end
  end
end