Packages

gust

0.1.34
0.1.37 0.1.36 0.1.35 0.1.34 0.1.33 0.1.32 0.1.31 0.1.30 0.1.29 0.1.28 0.1.27 0.1.26 0.1.25 0.1.24 0.1.23 0.1.22 0.1.21 0.1.20 0.1.19 0.1.18 0.1.17 0.1.16 0.1.15 0.1.14 0.1.13 0.1.12 0.1.11 0.1.10 0.1.9 0.1.8 0.1.7 0.1.6 0.1.5 0.1.4 0.1.2 0.1.1 0.1.0

A DAG-Based Workflow Orchestration Engine for Elixir

HexDocs

Current section

Files

Jump to
Readme
37 Versions
8 Dependencies
Dependants
Files
Activity
gust lib gust flows secret.ex
Raw

lib/gust/flows/secret.ex 

defmodule Gust.Flows.Secret do

  @moduledoc false

  use Ecto.Schema

  import Ecto.Changeset



  @primary_key {:id, :binary_id, autogenerate: true}

  @derive {Jason.Encoder, only: [:id, :name, :value_type, :inserted_at, :updated_at]}

  schema "gust_secrets" do

    field :name, :string

    field :value, Gust.Encrypted.Binary, redact: true

    field :value_type, Ecto.Enum, values: [:string, :json]



    timestamps()

  end



  @doc false

  def changeset(secret, attrs) do

    secret

    |> cast(attrs, [:name, :value, :value_type])

    |> validate_required([:name, :value, :value_type])

    |> validate_format(:name, ~r/^[A-Z0-9_]+$/, message: "must be uppercase with underscores")

    |> unique_constraint(:name)

    |> validate_json_if_needed()

  end



  defp validate_json_if_needed(changeset) do

    case get_field(changeset, :value_type) do

      :json ->

        value = get_field(changeset, :value)

        validate_json(value, changeset)



      _ ->

        changeset

    end

  end



  defp validate_json(nil, changeset) do

    add_error(changeset, :value, "it cannot be empty")

  end



  defp validate_json(value, changeset) when is_bitstring(value) do

    case Jason.decode(value) do

      {:ok, _decoded} -> changeset

      {:error, _} -> add_error(changeset, :value, "must be valid JSON")

    end

  end

end