user.ex 6.91 KB
Newer Older
lain's avatar
lain committed
1 2
defmodule Pleroma.User do
  use Ecto.Schema
3

4 5 6
  import Ecto.{Changeset, Query}
  alias Pleroma.{Repo, User, Object, Web}
  alias Comeonin.Pbkdf2
lain's avatar
lain committed
7
  alias Pleroma.Web.{OStatus, Websub}
dtluna's avatar
dtluna committed
8
  alias Pleroma.Web.ActivityPub.ActivityPub
lain's avatar
lain committed
9
  alias Pleroma.Web.ActivityPub.Utils
lain's avatar
lain committed
10 11 12 13 14 15 16

  schema "users" do
    field :bio, :string
    field :email, :string
    field :name, :string
    field :nickname, :string
    field :password_hash, :string
lain's avatar
lain committed
17 18
    field :password, :string, virtual: true
    field :password_confirmation, :string, virtual: true
19
    field :following, {:array, :string}, default: []
lain's avatar
lain committed
20
    field :ap_id, :string
lain's avatar
lain committed
21
    field :avatar, :map
22
    field :local, :boolean, default: true
lain's avatar
lain committed
23
    field :info, :map, default: %{}
24
    field :follower_address, :string
lain's avatar
lain committed
25 26 27

    timestamps()
  end
lain's avatar
lain committed
28

lain's avatar
lain committed
29 30 31 32 33 34 35
  def avatar_url(user) do
    case user.avatar do
      %{"url" => [%{"href" => href} | _]} -> href
      _ -> "https://placehold.it/48x48"
    end
  end

lain's avatar
lain committed
36
  def ap_id(%User{nickname: nickname}) do
37
    "#{Web.base_url}/users/#{nickname}"
lain's avatar
lain committed
38 39 40 41 42
  end

  def ap_followers(%User{} = user) do
    "#{ap_id(user)}/followers"
  end
lain's avatar
lain committed
43 44 45 46 47 48 49

  def follow_changeset(struct, params \\ %{}) do
    struct
    |> cast(params, [:following])
    |> validate_required([:following])
  end

50 51 52 53 54 55
  def info_changeset(struct, params \\ %{}) do
    struct
    |> cast(params, [:info])
    |> validate_required([:info])
  end

lain's avatar
lain committed
56 57 58
  def user_info(%User{} = user) do
    %{
      following_count: length(user.following),
59 60
      note_count: user.info["note_count"] || 0,
      follower_count: user.info["follower_count"] || 0
lain's avatar
lain committed
61 62 63
    }
  end

lain's avatar
lain committed
64 65
  @email_regex ~r/^[a-zA-Z0-9.!#$%&'*+\/=?^_`{|}~-]+@[a-zA-Z0-9](?:[a-zA-Z0-9-]{0,61}[a-zA-Z0-9])?(?:\.[a-zA-Z0-9](?:[a-zA-Z0-9-]{0,61}[a-zA-Z0-9])?)*$/
  def remote_user_creation(params) do
66
    changes = %User{}
lain's avatar
lain committed
67 68
    |> cast(params, [:bio, :name, :ap_id, :nickname, :info, :avatar])
    |> validate_required([:name, :ap_id, :nickname])
lain's avatar
lain committed
69 70
    |> unique_constraint(:nickname)
    |> validate_format(:nickname, @email_regex)
71
    |> validate_length(:bio, max: 5000)
lain's avatar
lain committed
72
    |> validate_length(:name, max: 100)
lain's avatar
lain committed
73
    |> put_change(:local, false)
74 75 76 77 78 79 80
    if changes.valid? do
      followers = User.ap_followers(%User{nickname: changes.changes[:nickname]})
      changes
      |> put_change(:follower_address, followers)
    else
      changes
    end
lain's avatar
lain committed
81 82
  end

lain's avatar
lain committed
83 84 85 86 87 88 89 90 91
  def update_changeset(struct, params \\ %{}) do
    changeset = struct
    |> cast(params, [:bio, :name])
    |> unique_constraint(:nickname)
    |> validate_format(:nickname, ~r/^[a-zA-Z\d]+$/)
    |> validate_length(:bio, min: 1, max: 1000)
    |> validate_length(:name, min: 1, max: 100)
  end

lain's avatar
lain committed
92 93 94 95 96 97 98
  def register_changeset(struct, params \\ %{}) do
    changeset = struct
    |> cast(params, [:bio, :email, :name, :nickname, :password, :password_confirmation])
    |> validate_required([:bio, :email, :name, :nickname, :password, :password_confirmation])
    |> validate_confirmation(:password)
    |> unique_constraint(:email)
    |> unique_constraint(:nickname)
dtluna's avatar
dtluna committed
99
    |> validate_format(:nickname, ~r/^[a-zA-Z\d]+$/)
lain's avatar
lain committed
100
    |> validate_format(:email, @email_regex)
lain's avatar
lain committed
101 102
    |> validate_length(:bio, min: 1, max: 1000)
    |> validate_length(:name, min: 1, max: 100)
lain's avatar
lain committed
103 104

    if changeset.valid? do
105
      hashed = Pbkdf2.hashpwsalt(changeset.changes[:password])
lain's avatar
lain committed
106 107 108 109 110 111
      ap_id = User.ap_id(%User{nickname: changeset.changes[:nickname]})
      followers = User.ap_followers(%User{nickname: changeset.changes[:nickname]})
      changeset
      |> put_change(:password_hash, hashed)
      |> put_change(:ap_id, ap_id)
      |> put_change(:following, [followers])
112
      |> put_change(:follower_address, followers)
lain's avatar
lain committed
113 114 115 116 117
    else
      changeset
    end
  end

lain's avatar
lain committed
118
  def follow(%User{} = follower, %User{} = followed) do
119
    ap_followers = followed.follower_address
120
    if following?(follower, followed) do
121 122
      {:error,
       "Could not follow user: #{followed.nickname} is already on your list."}
123
    else
lain's avatar
lain committed
124
      if !followed.local && follower.local do
lain's avatar
lain committed
125 126 127
        Websub.subscribe(follower, followed)
      end

128 129
      following = [ap_followers | follower.following]
      |> Enum.uniq
lain's avatar
lain committed
130

131
      follower = follower
132 133
      |> follow_changeset(%{following: following})
      |> Repo.update
134 135 136 137

      {:ok, followed} = update_follower_count(followed)

      follower
138
    end
lain's avatar
lain committed
139
  end
lain's avatar
lain committed
140 141

  def unfollow(%User{} = follower, %User{} = followed) do
142
    ap_followers = followed.follower_address
143 144 145
    if following?(follower, followed) do
      following = follower.following
      |> List.delete(ap_followers)
lain's avatar
lain committed
146

dtluna's avatar
dtluna committed
147
      { :ok, follower } = follower
148 149
      |> follow_changeset(%{following: following})
      |> Repo.update
150 151 152 153

      {:ok, followed} = update_follower_count(followed)

      {:ok, follower, Utils.fetch_latest_follow(follower, followed)}
154
    else
155
      {:error, "Not subscribed!"}
156
    end
lain's avatar
lain committed
157
  end
158 159

  def following?(%User{} = follower, %User{} = followed) do
160
    Enum.member?(follower.following, followed.follower_address)
161
  end
lain's avatar
lain committed
162

lain's avatar
lain committed
163 164 165 166
  def get_by_ap_id(ap_id) do
    Repo.get_by(User, ap_id: ap_id)
  end

lain's avatar
lain committed
167
  def get_cached_by_ap_id(ap_id) do
168
    key = "ap_id:#{ap_id}"
lain's avatar
lain committed
169
    Cachex.get!(:user_cache, key, fallback: fn(_) -> get_by_ap_id(ap_id) end)
lain's avatar
lain committed
170 171 172
  end

  def get_cached_by_nickname(nickname) do
173
    key = "nickname:#{nickname}"
lain's avatar
lain committed
174
    Cachex.get!(:user_cache, key, fallback: fn(_) -> get_or_fetch_by_nickname(nickname) end)
lain's avatar
lain committed
175
  end
lain's avatar
lain committed
176

lain's avatar
lain committed
177
  def get_by_nickname(nickname) do
178 179 180
    Repo.get_by(User, nickname: nickname)
  end

lain's avatar
lain committed
181 182 183 184
  def get_cached_user_info(user) do
    key = "user_info:#{user.id}"
    Cachex.get!(:user_cache, key, fallback: fn(_) -> user_info(user) end)
  end
lain's avatar
lain committed
185 186 187 188 189

  def get_or_fetch_by_nickname(nickname) do
    with %User{} = user <- get_by_nickname(nickname)  do
      user
    else _e ->
lain's avatar
lain committed
190 191
      with [nick, domain] <- String.split(nickname, "@"),
           {:ok, user} <- OStatus.make_user(nickname) do
lain's avatar
lain committed
192 193 194 195
        user
      else _e -> nil
      end
    end
lain's avatar
lain committed
196
  end
lain's avatar
lain committed
197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213

  # TODO: these queries could be more efficient if the type in postgresql wasn't map, but array.
  def get_followers(%User{id: id, follower_address: follower_address}) do
    q = from u in User,
      where: fragment("? @> ?", u.following, ^follower_address ),
      where: u.id != ^id

    {:ok, Repo.all(q)}
  end

  def get_friends(%User{id: id, following: following}) do
    q = from u in User,
      where: u.follower_address in ^following,
      where: u.id != ^id

    {:ok, Repo.all(q)}
  end
214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241

  def update_note_count(%User{} = user) do
    note_count_query = from a in Object,
      where: fragment("? @> ?", a.data, ^%{actor: user.ap_id, type: "Note"}),
      select: count(a.id)

    note_count = Repo.one(note_count_query)

    new_info = Map.put(user.info, "note_count", note_count)

    cs = info_changeset(user, %{info: new_info})

    Repo.update(cs)
  end

  def update_follower_count(%User{} = user) do
    follower_count_query = from u in User,
      where: fragment("? @> ?", u.following, ^user.follower_address),
      select: count(u.id)

    follower_count = Repo.one(follower_count_query)

    new_info = Map.put(user.info, "follower_count", follower_count)

    cs = info_changeset(user, %{info: new_info})

    Repo.update(cs)
  end
lain's avatar
lain committed
242
end