HashID.ex

defmodule HashID do
  @coder Hashids.new(
    salt: "HmPbtapoe1FGfTFbEEeZcWKuakIQp3L0",
    min_en: 6
  )

  def encode(id, type) do
    type =
      type
      |> to_string
      |> :erlang.binary_to_list()
      |> Kernel.++([id])
      |> Enum.reverse()

    Hashids.encode(@coder, type)
  end

  def decode(data) do
    Hashids.decode(@coder, data)
    |> case do
      {:ok, [head | tail]} ->
        type =
          tail
          |> Enum.reverse()
          |> :erlang.list_to_binary()
          |> String.to_atom()

        {head, type}

      _ ->
        :error
    end
  end
end