tornex

defmodule Torngen.Client.Schema.RequestLinks do
  @moduledoc false

  use Torngen.Client.SchemaObjectAccess, deprecated: []

  @behaviour Torngen.Client.Schema

  @keys [:prev, :next]

  defstruct [
    :prev,
    :next
  ]

  @type t :: %__MODULE__{
          prev: nil | String.t(),
          next: nil | String.t()
        }

  @impl true
  def parse(%{} = data) do
    %__MODULE__{
      prev: data |> Map.get("prev") |> Torngen.Client.Schema.parse({:one_of, [static: :null, static: :string]}),
      next: data |> Map.get("next") |> Torngen.Client.Schema.parse({:one_of, [static: :null, static: :string]})
    }
  end

  @impl true
  def parse(_data), do: nil

  @impl true
  def validate?(%{} = data) do
    @keys
    |> Enum.map(fn key -> {key, Map.get(data, Atom.to_string(key))} end)
    |> Enum.map(fn {key, value} -> validate_key?(key, value) end)
    |> Enum.all?()
  end

  defp validate_key?(:prev, value) do
    Torngen.Client.Schema.validate?(value, {:one_of, [static: :null, static: :string]})
  end

  defp validate_key?(:next, value) do
    Torngen.Client.Schema.validate?(value, {:one_of, [static: :null, static: :string]})
  end

  @spec keys() :: list(atom())
  def keys(), do: @keys
end