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