user.ex 7.16 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}
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
25
    has_many :notifications, Notification
lain's avatar
lain committed
26 27 28

    timestamps()
  end
lain's avatar
lain committed
29

lain's avatar
lain committed
30 31 32 33 34 35 36
  def avatar_url(user) do
    case user.avatar do
      %{"url" => [%{"href" => href} | _]} -> href
      _ -> "https://placehold.it/48x48"
    end
  end

lain's avatar
lain committed
37
  def ap_id(%User{nickname: nickname}) do
38
    "#{Web.base_url}/users/#{nickname}"
lain's avatar
lain committed
39 40 41 42 43
  end

  def ap_followers(%User{} = user) do
    "#{ap_id(user)}/followers"
  end
lain's avatar
lain committed
44 45 46 47 48 49 50

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

51 52 53 54 55 56
  def info_changeset(struct, params \\ %{}) do
    struct
    |> cast(params, [:info])
    |> validate_required([:info])
  end

lain's avatar
lain committed
57 58 59
  def user_info(%User{} = user) do
    %{
      following_count: length(user.following),
60 61
      note_count: user.info["note_count"] || 0,
      follower_count: user.info["follower_count"] || 0
lain's avatar
lain committed
62 63 64
    }
  end

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

lain's avatar
lain committed
84 85 86 87 88 89 90 91 92
  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
93 94 95 96 97 98 99
  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
100
    |> validate_format(:nickname, ~r/^[a-zA-Z\d]+$/)
lain's avatar
lain committed
101
    |> validate_format(:email, @email_regex)
lain's avatar
lain committed
102 103
    |> validate_length(:bio, min: 1, max: 1000)
    |> validate_length(:name, min: 1, max: 100)
lain's avatar
lain committed
104 105

    if changeset.valid? do
106
      hashed = Pbkdf2.hashpwsalt(changeset.changes[:password])
lain's avatar
lain committed
107 108 109 110 111 112
      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])
113
      |> put_change(:follower_address, followers)
lain's avatar
lain committed
114 115 116 117 118
    else
      changeset
    end
  end

lain's avatar
lain committed
119
  def follow(%User{} = follower, %User{} = followed) do
120
    ap_followers = followed.follower_address
121
    if following?(follower, followed) do
122 123
      {:error,
       "Could not follow user: #{followed.nickname} is already on your list."}
124
    else
lain's avatar
lain committed
125
      if !followed.local && follower.local do
lain's avatar
lain committed
126 127 128
        Websub.subscribe(follower, followed)
      end

129 130
      following = [ap_followers | follower.following]
      |> Enum.uniq
lain's avatar
lain committed
131

132
      follower = follower
133 134
      |> follow_changeset(%{following: following})
      |> Repo.update
135 136 137 138

      {:ok, followed} = update_follower_count(followed)

      follower
139
    end
lain's avatar
lain committed
140
  end
lain's avatar
lain committed
141 142

  def unfollow(%User{} = follower, %User{} = followed) do
143
    ap_followers = followed.follower_address
144 145 146
    if following?(follower, followed) do
      following = follower.following
      |> List.delete(ap_followers)
lain's avatar
lain committed
147

dtluna's avatar
dtluna committed
148
      { :ok, follower } = follower
149 150
      |> follow_changeset(%{following: following})
      |> Repo.update
151 152 153 154

      {:ok, followed} = update_follower_count(followed)

      {:ok, follower, Utils.fetch_latest_follow(follower, followed)}
155
    else
156
      {:error, "Not subscribed!"}
157
    end
lain's avatar
lain committed
158
  end
159 160

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

lain's avatar
lain committed
164 165 166 167
  def get_by_ap_id(ap_id) do
    Repo.get_by(User, ap_id: ap_id)
  end

lain's avatar
lain committed
168
  def get_cached_by_ap_id(ap_id) do
169
    key = "ap_id:#{ap_id}"
lain's avatar
lain committed
170
    Cachex.get!(:user_cache, key, fallback: fn(_) -> get_by_ap_id(ap_id) end)
lain's avatar
lain committed
171 172 173
  end

  def get_cached_by_nickname(nickname) do
174
    key = "nickname:#{nickname}"
lain's avatar
lain committed
175
    Cachex.get!(:user_cache, key, fallback: fn(_) -> get_or_fetch_by_nickname(nickname) end)
lain's avatar
lain committed
176
  end
lain's avatar
lain committed
177

lain's avatar
lain committed
178
  def get_by_nickname(nickname) do
179 180 181
    Repo.get_by(User, nickname: nickname)
  end

lain's avatar
lain committed
182 183 184 185
  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
186 187 188 189 190

  def get_or_fetch_by_nickname(nickname) do
    with %User{} = user <- get_by_nickname(nickname)  do
      user
    else _e ->
lain's avatar
lain committed
191 192
      with [nick, domain] <- String.split(nickname, "@"),
           {:ok, user} <- OStatus.make_user(nickname) do
lain's avatar
lain committed
193 194 195 196
        user
      else _e -> nil
      end
    end
lain's avatar
lain committed
197
  end
lain's avatar
lain committed
198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214

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

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

  def get_notified_from_activity(%Activity{data: %{"to" => to}} = activity) do
    query = from u in User,
      where: u.ap_id in ^to,
      where: u.local == true

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