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