feat(server): Server.Auth.verify_password/1

server/lib/server/auth.ex

@@ -0,0 +1,16 @@
+defmodule Server.Auth do
+  @moduledoc "Single-user dashboard authentication."
+
+  @spec verify_password(term()) :: :ok | :error
+  def verify_password(password) when is_binary(password) do
+    hash = Application.fetch_env!(:server, :dashboard_password_hash)
+
+    if Argon2.verify_pass(password, hash) do
+      :ok
+    else
+      :error
+    end
+  end
+
+  def verify_password(_), do: :error
+end