user.ex 6.6 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
  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
90
    |> validate_format(:nickname, ~r/^[a-zA-Z\d]+$/)
lain's avatar
lain committed
91 92 93
    |> validate_format(:email, @email_regex)
    |> validate_length(:bio, max: 1000)
    |> validate_length(:name, max: 100)
lain's avatar
lain committed
94 95

    if changeset.valid? do
96
      hashed = Pbkdf2.hashpwsalt(changeset.changes[:password])
lain's avatar
lain committed
97 98 99 100 101 102
      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])
103
      |> put_change(:follower_address, followers)
lain's avatar
lain committed
104 105 106 107 108
    else
      changeset
    end
  end

lain's avatar
lain committed
109
  def follow(%User{} = follower, %User{} = followed) do
110
    ap_followers = followed.follower_address
111
    if following?(follower, followed) do
112 113
      {:error,
       "Could not follow user: #{followed.nickname} is already on your list."}
114
    else
lain's avatar
lain committed
115
      if !followed.local && follower.local do
lain's avatar
lain committed
116 117 118
        Websub.subscribe(follower, followed)
      end

119 120
      following = [ap_followers | follower.following]
      |> Enum.uniq
lain's avatar
lain committed
121

122
      follower = follower
123 124
      |> follow_changeset(%{following: following})
      |> Repo.update
125 126 127 128

      {:ok, followed} = update_follower_count(followed)

      follower
129
    end
lain's avatar
lain committed
130
  end
lain's avatar
lain committed
131 132

  def unfollow(%User{} = follower, %User{} = followed) do
133
    ap_followers = followed.follower_address
134 135 136
    if following?(follower, followed) do
      following = follower.following
      |> List.delete(ap_followers)
lain's avatar
lain committed
137

dtluna's avatar
dtluna committed
138
      { :ok, follower } = follower
139 140
      |> follow_changeset(%{following: following})
      |> Repo.update
141 142 143 144

      {:ok, followed} = update_follower_count(followed)

      {:ok, follower, Utils.fetch_latest_follow(follower, followed)}
145
    else
146
      {:error, "Not subscribed!"}
147
    end
lain's avatar
lain committed
148
  end
149 150

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

lain's avatar
lain committed
154 155 156 157
  def get_by_ap_id(ap_id) do
    Repo.get_by(User, ap_id: ap_id)
  end

lain's avatar
lain committed
158
  def get_cached_by_ap_id(ap_id) do
159
    key = "ap_id:#{ap_id}"
lain's avatar
lain committed
160
    Cachex.get!(:user_cache, key, fallback: fn(_) -> get_by_ap_id(ap_id) end)
lain's avatar
lain committed
161 162 163
  end

  def get_cached_by_nickname(nickname) do
164
    key = "nickname:#{nickname}"
lain's avatar
lain committed
165
    Cachex.get!(:user_cache, key, fallback: fn(_) -> get_or_fetch_by_nickname(nickname) end)
lain's avatar
lain committed
166
  end
lain's avatar
lain committed
167

lain's avatar
lain committed
168
  def get_by_nickname(nickname) do
169 170 171
    Repo.get_by(User, nickname: nickname)
  end

lain's avatar
lain committed
172 173 174 175
  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
176 177 178 179 180

  def get_or_fetch_by_nickname(nickname) do
    with %User{} = user <- get_by_nickname(nickname)  do
      user
    else _e ->
lain's avatar
lain committed
181 182
      with [nick, domain] <- String.split(nickname, "@"),
           {:ok, user} <- OStatus.make_user(nickname) do
lain's avatar
lain committed
183 184 185 186
        user
      else _e -> nil
      end
    end
lain's avatar
lain committed
187
  end
lain's avatar
lain committed
188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204

  # 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
205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232

  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
233
end