Add error messages for repeated follows and unfollows

[akkoma] / lib / pleroma / user.ex

diff --git a/lib/pleroma/user.ex b/lib/pleroma/user.ex
index 3fb298d0550ae6ed2e2fa6973e0fe639068338dc..5f5bc1c384bbc9470a033ce536050a0286bc89c6 100644 (file)
--- a/lib/pleroma/user.ex
+++ b/lib/pleroma/user.ex
@@ -1,5 +1,7 @@
 defmodule Pleroma.User do
   use Ecto.Schema
+  import Ecto.Changeset
+  alias Pleroma.{Repo, User}
 
   schema "users" do
     field :bio, :string
@@ -7,7 +9,56 @@ defmodule Pleroma.User do
     field :name, :string
     field :nickname, :string
     field :password_hash, :string
+    field :following, { :array, :string }, default: []
+    field :ap_id, :string
 
     timestamps()
   end
+
+  def ap_id(%User{nickname: nickname}) do
+    "#{Pleroma.Web.base_url}/users/#{nickname}"
+  end
+
+  def ap_followers(%User{} = user) do
+    "#{ap_id(user)}/followers"
+  end
+
+  def follow_changeset(struct, params \\ %{}) do
+    struct
+    |> cast(params, [:following])
+    |> validate_required([:following])
+  end
+
+  def follow(%User{} = follower, %User{} = followed) do
+    ap_followers = User.ap_followers(followed)
+    if following?(follower, followed) do
+      { :error,
+        "Could not follow user: #{followed.nickname} is already on your list." }
+    else
+      following = [ap_followers | follower.following]
+      |> Enum.uniq
+
+      follower
+      |> follow_changeset(%{following: following})
+      |> Repo.update
+    end
+  end
+
+  def unfollow(%User{} = follower, %User{} = followed) do
+    ap_followers = User.ap_followers(followed)
+    if following?(follower, followed) do
+      following = follower.following
+      |> List.delete(ap_followers)
+
+      follower
+      |> follow_changeset(%{following: following})
+      |> Repo.update
+    else
+      { :error, "Not subscribed!" }
+    end
+  end
+
+  def following?(%User{} = follower, %User{} = followed) do
+    Enum.member?(follower.following, User.ap_followers(followed))
+  end
 end