defmodule NLdoc.Spec.Document do
  @moduledoc """
  This module defines the Ecto schema for the NLdoc spec Document object.
  """

  use NLdoc.Spec.Schema, type: "https://spec.nldoc.nl/Resource/Document"

  typed_embedded_schema null: false do
    field :id, Ecto.UUID
    field :type, :string, default: @resource_type
    field :cite, :string, null: true

    embeds_many :footnotes, NLdoc.Spec.Footnote
    embeds_many :assets, NLdoc.Spec.Asset

    field(:children, {:array, PolymorphicEmbed},
      types: map(NLdoc.Spec.document_children()),
      type_field_name: :type,
      on_replace: :delete,
      default: [],
      array?: true
    ) :: [NLdoc.Spec.document_child()]

    field(:descriptors, {:array, PolymorphicEmbed},
      types: map(NLdoc.Spec.descriptors()),
      type_field_name: :type,
      on_replace: :delete,
      default: [],
      array?: true
    ) :: [NLdoc.Spec.descriptor()]
  end

  def changeset(document, attrs) do
    document
    |> cast(attrs, [:id, :type, :cite], @cast_opts)
    |> cast_embed(:footnotes, @cast_opts)
    |> cast_embed(:assets, @cast_opts)
    |> cast_polymorphic_embed(:children, @cast_opts)
    |> cast_polymorphic_embed(:descriptors, @cast_opts)
    |> validate_required([:id, :type])
    |> validate_inclusion(:type, [@resource_type])
  end
end