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

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

  schema "users" do
    field :bio, :string
    field :email, :string
    field :name, :string
    field :nickname, :string
    field :password_hash, :string
lain's avatar
lain committed
16
17
    field :password, :string, virtual: true
    field :password_confirmation, :string, virtual: true
18
    field :following, {:array, :string}, default: []
lain's avatar
lain committed
19
    field :ap_id, :string
lain's avatar
lain committed
20
    field :avatar, :map
21
    field :local, :boolean, default: true
lain's avatar
lain committed
22
    field :info, :map, default: %{}
23
    field :follower_address, :string
24
    has_many :notifications, Notification
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
37
38
39
40
41
42
  def banner_url(user) do
    case user.info["banner"] do
      %{"url" => [%{"href" => href} | _]} -> href
      _ -> nil
    end
  end

lain's avatar
lain committed
43
  def ap_id(%User{nickname: nickname}) do
44
    "#{Web.base_url}/users/#{nickname}"
lain's avatar
lain committed
45
46
47
48
49
  end

  def ap_followers(%User{} = user) do
    "#{ap_id(user)}/followers"
  end
lain's avatar
lain committed
50
51
52
53
54
55
56

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

57
58
59
60
61
62
  def info_changeset(struct, params \\ %{}) do
    struct
    |> cast(params, [:info])
    |> validate_required([:info])
  end

lain's avatar
lain committed
63
  def user_info(%User{} = user) do
64
    oneself = if user.local, do: 1, else: 0
lain's avatar
lain committed
65
    %{
66
      following_count: length(user.following) - oneself,
67
68
      note_count: user.info["note_count"] || 0,
      follower_count: user.info["follower_count"] || 0
lain's avatar
lain committed
69
70
71
    }
  end

lain's avatar
lain committed
72
73
  @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
74
    changes = %User{}
lain's avatar
lain committed
75
76
    |> cast(params, [:bio, :name, :ap_id, :nickname, :info, :avatar])
    |> validate_required([:name, :ap_id, :nickname])
lain's avatar
lain committed
77
78
    |> unique_constraint(:nickname)
    |> validate_format(:nickname, @email_regex)
79
    |> validate_length(:bio, max: 5000)
lain's avatar
lain committed
80
    |> validate_length(:name, max: 100)
lain's avatar
lain committed
81
    |> put_change(:local, false)
82
83
84
85
86
87
88
    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
89
90
  end

lain's avatar
lain committed
91
  def update_changeset(struct, params \\ %{}) do
Thog's avatar
Thog committed
92
    struct
lain's avatar
lain committed
93
94
95
96
97
98
99
    |> 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

Roger Braun's avatar
Roger Braun committed
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
  def password_update_changeset(struct, params) do
    changeset = struct
    |> cast(params, [:password, :password_confirmation])
    |> validate_required([:password, :password_confirmation])
    |> validate_confirmation(:password)

    if changeset.valid? do
      hashed = Pbkdf2.hashpwsalt(changeset.changes[:password])
      changeset
      |> put_change(:password_hash, hashed)
    else
      changeset
    end
  end

  def reset_password(user, data) do
    Repo.update(password_update_changeset(user, data))
  end

lain's avatar
lain committed
119
120
121
122
123
124
125
  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
126
    |> validate_format(:nickname, ~r/^[a-zA-Z\d]+$/)
lain's avatar
lain committed
127
    |> validate_format(:email, @email_regex)
lain's avatar
lain committed
128
129
    |> validate_length(:bio, min: 1, max: 1000)
    |> validate_length(:name, min: 1, max: 100)
lain's avatar
lain committed
130
131

    if changeset.valid? do
132
      hashed = Pbkdf2.hashpwsalt(changeset.changes[:password])
lain's avatar
lain committed
133
134
135
136
137
138
      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])
139
      |> put_change(:follower_address, followers)
lain's avatar
lain committed
140
141
142
143
144
    else
      changeset
    end
  end

lain's avatar
lain committed
145
  def follow(%User{} = follower, %User{info: info} = followed) do
146
    ap_followers = followed.follower_address
lain's avatar
lain committed
147
    if following?(follower, followed) or info["deactivated"] do
148
149
      {:error,
       "Could not follow user: #{followed.nickname} is already on your list."}
150
    else
lain's avatar
lain committed
151
      if !followed.local && follower.local do
lain's avatar
lain committed
152
153
154
        Websub.subscribe(follower, followed)
      end

155
156
      following = [ap_followers | follower.following]
      |> Enum.uniq
lain's avatar
lain committed
157

158
      follower = follower
159
160
      |> follow_changeset(%{following: following})
      |> Repo.update
161

Thog's avatar
Thog committed
162
      {:ok, _} = update_follower_count(followed)
163
164

      follower
165
    end
lain's avatar
lain committed
166
  end
lain's avatar
lain committed
167
168

  def unfollow(%User{} = follower, %User{} = followed) do
169
    ap_followers = followed.follower_address
170
    if following?(follower, followed) and follower.ap_id != followed.ap_id do
171
172
      following = follower.following
      |> List.delete(ap_followers)
lain's avatar
lain committed
173

dtluna's avatar
dtluna committed
174
      { :ok, follower } = follower
175
176
      |> follow_changeset(%{following: following})
      |> Repo.update
177
178
179
180

      {:ok, followed} = update_follower_count(followed)

      {:ok, follower, Utils.fetch_latest_follow(follower, followed)}
181
    else
182
      {:error, "Not subscribed!"}
183
    end
lain's avatar
lain committed
184
  end
185
186

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

lain's avatar
lain committed
190
191
192
193
  def get_by_ap_id(ap_id) do
    Repo.get_by(User, ap_id: ap_id)
  end

lain's avatar
lain committed
194
  def get_cached_by_ap_id(ap_id) do
195
    key = "ap_id:#{ap_id}"
lain's avatar
lain committed
196
    Cachex.get!(:user_cache, key, fallback: fn(_) -> get_by_ap_id(ap_id) end)
lain's avatar
lain committed
197
198
199
  end

  def get_cached_by_nickname(nickname) do
200
    key = "nickname:#{nickname}"
lain's avatar
lain committed
201
    Cachex.get!(:user_cache, key, fallback: fn(_) -> get_or_fetch_by_nickname(nickname) end)
lain's avatar
lain committed
202
  end
lain's avatar
lain committed
203

lain's avatar
lain committed
204
  def get_by_nickname(nickname) do
205
206
207
    Repo.get_by(User, nickname: nickname)
  end

lain's avatar
lain committed
208
209
210
211
  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
212
213
214
215
216

  def get_or_fetch_by_nickname(nickname) do
    with %User{} = user <- get_by_nickname(nickname)  do
      user
    else _e ->
Thog's avatar
Thog committed
217
      with [_nick, _domain] <- String.split(nickname, "@"),
lain's avatar
lain committed
218
           {:ok, user} <- OStatus.make_user(nickname) do
lain's avatar
lain committed
219
220
221
222
        user
      else _e -> nil
      end
    end
lain's avatar
lain committed
223
  end
lain's avatar
lain committed
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240

  # 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
241

242
243
244
245
246
247
248
249
250
  def increase_note_count(%User{} = user) do
    note_count = (user.info["note_count"] || 0) + 1
    new_info = Map.put(user.info, "note_count", note_count)

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

    Repo.update(cs)
  end

251
252
  def update_note_count(%User{} = user) do
    note_count_query = from a in Object,
253
      where: fragment("?->>'actor' = ? and ?->>'type' = 'Note'", a.data, ^user.ap_id, a.data),
254
255
256
257
258
259
260
261
262
263
264
265
266
267
      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),
268
      where: u.id != ^user.id,
269
270
271
272
273
274
275
276
277
278
      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
279

Thog's avatar
Thog committed
280
  def get_notified_from_activity(%Activity{data: %{"to" => to}}) do
281
282
283
284
285
286
    query = from u in User,
      where: u.ap_id in ^to,
      where: u.local == true

    Repo.all(query)
  end
lain's avatar
lain committed
287

Thog's avatar
Thog committed
288
  def get_recipients_from_activity(%Activity{data: %{"to" => to}}) do
289
290
291
292
    query = from u in User,
      where: u.ap_id in ^to,
      or_where: fragment("? \\\?| ?", u.following, ^to)

293
294
295
    query = from u in query,
      where: u.local == true

296
297
298
    Repo.all(query)
  end

lain's avatar
lain committed
299
300
301
302
303
304
305
306
307
  def search(query, resolve) do
    if resolve do
      User.get_or_fetch_by_nickname(query)
    end
    q = from u in User,
      where: fragment("(to_tsvector('english', ?) || to_tsvector('english', ?)) @@ plainto_tsquery('english', ?)", u.nickname, u.name, ^query),
      limit: 20
    Repo.all(q)
  end
lain's avatar
lain committed
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331

  def block(user, %{ap_id: ap_id}) do
    blocks = user.info["blocks"] || []
    new_blocks = Enum.uniq([ap_id | blocks])
    new_info = Map.put(user.info, "blocks", new_blocks)

    cs = User.info_changeset(user, %{info: new_info})
    Repo.update(cs)
  end

  def unblock(user, %{ap_id: ap_id}) do
    blocks = user.info["blocks"] || []
    new_blocks = List.delete(blocks, ap_id)
    new_info = Map.put(user.info, "blocks", new_blocks)

    cs = User.info_changeset(user, %{info: new_info})
    Repo.update(cs)
  end

  def blocks?(user, %{ap_id: ap_id}) do
    blocks = user.info["blocks"] || []
    Enum.member?(blocks, ap_id)
  end

lain's avatar
lain committed
332
333
334
335
336
  def local_user_query() do
    from u in User,
      where: u.local == true
  end

lain's avatar
lain committed
337
338
339
340
341
  def deactivate (%User{} = user) do
    new_info = Map.put(user.info, "deactivated", true)
    cs = User.info_changeset(user, %{info: new_info})
    Repo.update(cs)
  end
lain's avatar
lain committed
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356

  def delete (%User{} = user) do
    {:ok, user} = User.deactivate(user)

    # Remove all relationships
    {:ok, followers } = User.get_followers(user)
    followers
    |> Enum.each(fn (follower) -> User.unfollow(follower, user) end)

    {:ok, friends} = User.get_friends(user)
    friends
    |> Enum.each(fn (followed) -> User.unfollow(user, followed) end)

    :ok
  end
lain's avatar
lain committed
357
end