user.ex 9.17 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 64 65
  def user_info(%User{} = user) do
    %{
      following_count: length(user.following),
66 67
      note_count: user.info["note_count"] || 0,
      follower_count: user.info["follower_count"] || 0
lain's avatar
lain committed
68 69 70
    }
  end

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

lain's avatar
lain committed
90
  def update_changeset(struct, params \\ %{}) do
Thog's avatar
Thog committed
91
    struct
lain's avatar
lain committed
92 93 94 95 96 97 98
    |> 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
99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117
  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
118 119 120 121 122 123 124
  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
125
    |> validate_format(:nickname, ~r/^[a-zA-Z\d]+$/)
lain's avatar
lain committed
126
    |> validate_format(:email, @email_regex)
lain's avatar
lain committed
127 128
    |> validate_length(:bio, min: 1, max: 1000)
    |> validate_length(:name, min: 1, max: 100)
lain's avatar
lain committed
129 130

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

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

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

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

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

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

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

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

      {:ok, followed} = update_follower_count(followed)

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

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

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

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

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

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

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

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

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

241 242 243 244 245 246 247 248 249
  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

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

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

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

Thog's avatar
Thog committed
286
  def get_recipients_from_activity(%Activity{data: %{"to" => to}}) do
287 288 289 290 291 292 293 294 295 296
    query = from u in User,
      where: u.local == true

    query = from u in query,
      where: u.ap_id in ^to,
      or_where: fragment("? \\\?| ?", u.following, ^to)

    Repo.all(query)
  end

lain's avatar
lain committed
297 298 299 300 301 302 303 304 305
  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
306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329

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