lv upgrade done; home.html form needs changed; test migrations

lib/something_erlang/accounts.ex

@@ -0,0 +1,114 @@
+defmodule SomethingErlang.Accounts do
+  @moduledoc """
+  The Accounts context.
+  """
+
+  import Ecto.Query, warn: false
+  alias SomethingErlang.Repo
+
+  alias SomethingErlang.AwfulApi.Client
+  alias SomethingErlang.Accounts.{User, UserToken}
+
+  ## Database getters
+
+  def get_user_by_bbuserid(bbuserid) when is_binary(bbuserid) do
+    Repo.get_by(User, :bbuserid, bbuserid)
+  end
+
+  def get_or_create_user_by_bbuserid(bbuserid)
+      when is_binary(bbuserid) do
+    if user = Repo.get_by(User, bbuserid: bbuserid) do
+      user
+    else
+      %User{bbuserid: bbuserid} |> Repo.insert!()
+    end
+  end
+
+  def login_sa_user_and_get_cookies(username, password)
+      when is_binary(username) and is_binary(password) do
+    case Client.login(username, password) do
+      %{bbuserid: userid, bbpassword: _hash} = bbuser ->
+        user = get_or_create_user_by_bbuserid(userid)
+        Map.merge(user, bbuser)
+
+      _ ->
+        nil
+    end
+  end
+
+  @doc """
+  Gets a single user.
+
+  Raises `Ecto.NoResultsError` if the User does not exist.
+
+  ## Examples
+
+      iex> get_user!(123)
+      %User{}
+
+      iex> get_user!(456)
+      ** (Ecto.NoResultsError)
+
+  """
+  def get_user!(id), do: Repo.get!(User, id)
+
+  ## User registration
+
+  @doc """
+  Registers a user.
+
+  ## Examples
+
+      iex> register_user(%{field: value})
+      {:ok, %User{}}
+
+      iex> register_user(%{field: bad_value})
+      {:error, %Ecto.Changeset{}}
+
+  """
+  def register_user(attrs) do
+    %User{}
+    |> User.registration_changeset(attrs)
+    |> Repo.insert()
+  end
+
+  @doc """
+  Returns an `%Ecto.Changeset{}` for tracking user changes.
+
+  ## Examples
+
+      iex> change_user_registration(user)
+      %Ecto.Changeset{data: %User{}}
+
+  """
+  def change_user_registration(%User{} = user, attrs \\ %{}) do
+    User.registration_changeset(user, attrs)
+  end
+
+  ## Session
+
+  @doc """
+  Generates a session token.
+  """
+  def generate_user_session_token(user) do
+    {token, user_token} = UserToken.build_session_token(user)
+    Repo.insert!(user_token)
+    token
+  end
+
+  @doc """
+  Gets the user with the given signed token.
+  """
+  def get_user_by_session_token(token) do
+    {:ok, query} = UserToken.verify_session_token_query(token)
+    Repo.one(query)
+  end
+
+  @doc """
+  Deletes the signed token with the given context.
+  """
+  def delete_user_session_token(token) do
+    Repo.delete_all(UserToken.token_and_context_query(token, "session"))
+    :ok
+  end
+end