3 * @file src/Model/User.php
4 * @brief This file includes the User class with user related database functions
6 namespace Friendica\Model;
8 use DivineOmega\PasswordExposed\PasswordStatus;
9 use Friendica\Core\Addon;
10 use Friendica\Core\Config;
11 use Friendica\Core\L10n;
12 use Friendica\Core\PConfig;
13 use Friendica\Core\System;
14 use Friendica\Core\Worker;
15 use Friendica\Database\DBM;
16 use Friendica\Model\Contact;
17 use Friendica\Model\Group;
18 use Friendica\Model\Photo;
19 use Friendica\Object\Image;
20 use Friendica\Util\Crypto;
21 use Friendica\Util\DateTimeFormat;
22 use Friendica\Util\Network;
26 use function password_exposed;
28 require_once 'boot.php';
29 require_once 'include/dba.php';
30 require_once 'include/enotify.php';
31 require_once 'include/text.php';
33 * @brief This class handles User related functions
38 * @brief Get owner data by user id
41 * @return boolean|array
43 public static function getOwnerDataById($uid) {
44 $r = dba::fetch_first("SELECT
46 `user`.`prvkey` AS `uprvkey`,
52 `user`.`account-type`,
56 ON `user`.`uid` = `contact`.`uid`
57 WHERE `contact`.`uid` = ?
62 if (!DBM::is_result($r)) {
69 * @brief Get owner data by nick name
72 * @return boolean|array
74 public static function getOwnerDataByNick($nick)
76 $user = dba::selectFirst('user', ['uid'], ['nickname' => $nick]);
77 if (!DBM::is_result($user)) {
80 return self::getOwnerDataById($user['uid']);
84 * @brief Returns the default group for a given user and network
86 * @param int $uid User id
87 * @param string $network network name
89 * @return int group id
91 public static function getDefaultGroup($uid, $network = '')
95 if ($network == NETWORK_OSTATUS) {
96 $default_group = PConfig::get($uid, "ostatus", "default_group");
99 if ($default_group != 0) {
100 return $default_group;
103 $user = dba::selectFirst('user', ['def_gid'], ['uid' => $uid]);
105 if (DBM::is_result($user)) {
106 $default_group = $user["def_gid"];
109 return $default_group;
114 * Authenticate a user with a clear text password
116 * @brief Authenticate a user with a clear text password
117 * @param mixed $user_info
118 * @param string $password
119 * @return int|boolean
120 * @deprecated since version 3.6
121 * @see User::getIdFromPasswordAuthentication()
123 public static function authenticate($user_info, $password)
126 return self::getIdFromPasswordAuthentication($user_info, $password);
127 } catch (Exception $ex) {
133 * Returns the user id associated with a successful password authentication
135 * @brief Authenticate a user with a clear text password
136 * @param mixed $user_info
137 * @param string $password
138 * @return int User Id if authentication is successful
141 public static function getIdFromPasswordAuthentication($user_info, $password)
143 $user = self::getAuthenticationInfo($user_info);
145 if (strpos($user['password'], '$') === false) {
146 //Legacy hash that has not been replaced by a new hash yet
147 if (self::hashPasswordLegacy($password) === $user['password']) {
148 self::updatePassword($user['uid'], $password);
152 } elseif (!empty($user['legacy_password'])) {
153 //Legacy hash that has been double-hashed and not replaced by a new hash yet
154 //Warning: `legacy_password` is not necessary in sync with the content of `password`
155 if (password_verify(self::hashPasswordLegacy($password), $user['password'])) {
156 self::updatePassword($user['uid'], $password);
160 } elseif (password_verify($password, $user['password'])) {
162 if (password_needs_rehash($user['password'], PASSWORD_DEFAULT)) {
163 self::updatePassword($user['uid'], $password);
169 throw new Exception(L10n::t('Login failed'));
173 * Returns authentication info from various parameters types
175 * User info can be any of the following:
178 * - User email or username or nickname
179 * - User array with at least the uid and the hashed password
181 * @param mixed $user_info
185 private static function getAuthenticationInfo($user_info)
189 if (is_object($user_info) || is_array($user_info)) {
190 if (is_object($user_info)) {
191 $user = (array) $user_info;
196 if (!isset($user['uid'])
197 || !isset($user['password'])
198 || !isset($user['legacy_password'])
200 throw new Exception(L10n::t('Not enough information to authenticate'));
202 } elseif (is_int($user_info) || is_string($user_info)) {
203 if (is_int($user_info)) {
204 $user = dba::selectFirst('user', ['uid', 'password', 'legacy_password'],
208 'account_expired' => 0,
209 'account_removed' => 0,
214 $fields = ['uid', 'password', 'legacy_password'];
215 $condition = ["(`email` = ? OR `username` = ? OR `nickname` = ?)
216 AND NOT `blocked` AND NOT `account_expired` AND NOT `account_removed` AND `verified`",
217 $user_info, $user_info, $user_info];
218 $user = dba::selectFirst('user', $fields, $condition);
221 if (!DBM::is_result($user)) {
222 throw new Exception(L10n::t('User not found'));
230 * Generates a human-readable random password
234 public static function generateNewPassword()
236 return autoname(6) . mt_rand(100, 9999);
240 * Checks if the provided plaintext password has been exposed or not
242 * @param string $password
245 public static function isPasswordExposed($password)
247 return password_exposed($password) === PasswordStatus::EXPOSED;
251 * Legacy hashing function, kept for password migration purposes
253 * @param string $password
256 private static function hashPasswordLegacy($password)
258 return hash('whirlpool', $password);
262 * Global user password hashing function
264 * @param string $password
267 public static function hashPassword($password)
269 if (!trim($password)) {
270 throw new Exception(L10n::t('Password can\'t be empty'));
273 return password_hash($password, PASSWORD_DEFAULT);
277 * Updates a user row with a new plaintext password
280 * @param string $password
283 public static function updatePassword($uid, $password)
285 return self::updatePasswordHashed($uid, self::hashPassword($password));
289 * Updates a user row with a new hashed password.
290 * Empties the password reset token field just in case.
293 * @param string $pasword_hashed
296 private static function updatePasswordHashed($uid, $pasword_hashed)
299 'password' => $pasword_hashed,
301 'pwdreset_time' => null,
302 'legacy_password' => false
304 return dba::update('user', $fields, ['uid' => $uid]);
308 * @brief Checks if a nickname is in the list of the forbidden nicknames
310 * Check if a nickname is forbidden from registration on the node by the
311 * admin. Forbidden nicknames (e.g. role namess) can be configured in the
314 * @param string $nickname The nickname that should be checked
315 * @return boolean True is the nickname is blocked on the node
317 public static function isNicknameBlocked($nickname)
319 $forbidden_nicknames = Config::get('system', 'forbidden_nicknames', '');
320 // if the config variable is empty return false
321 if (!x($forbidden_nicknames)) {
324 // check if the nickname is in the list of blocked nicknames
325 $forbidden = explode(',', $forbidden_nicknames);
326 if (in_array(strtolower($nickname), $forbidden)) {
334 * @brief Catch-all user creation function
336 * Creates a user from the provided data array, either form fields or OpenID.
337 * Required: { username, nickname, email } or { openid_url }
339 * Performs the following:
340 * - Sends to the OpenId auth URL (if relevant)
341 * - Creates new key pairs for crypto
342 * - Create self-contact
343 * - Create profile image
349 public static function create(array $data)
352 $return = ['user' => null, 'password' => ''];
354 $using_invites = Config::get('system', 'invitation_only');
355 $num_invites = Config::get('system', 'number_invites');
357 $invite_id = x($data, 'invite_id') ? notags(trim($data['invite_id'])) : '';
358 $username = x($data, 'username') ? notags(trim($data['username'])) : '';
359 $nickname = x($data, 'nickname') ? notags(trim($data['nickname'])) : '';
360 $email = x($data, 'email') ? notags(trim($data['email'])) : '';
361 $openid_url = x($data, 'openid_url') ? notags(trim($data['openid_url'])) : '';
362 $photo = x($data, 'photo') ? notags(trim($data['photo'])) : '';
363 $password = x($data, 'password') ? trim($data['password']) : '';
364 $password1 = x($data, 'password1') ? trim($data['password1']) : '';
365 $confirm = x($data, 'confirm') ? trim($data['confirm']) : '';
366 $blocked = x($data, 'blocked') ? intval($data['blocked']) : 0;
367 $verified = x($data, 'verified') ? intval($data['verified']) : 0;
368 $language = x($data, 'language') ? notags(trim($data['language'])) : 'en';
370 $publish = x($data, 'profile_publish_reg') && intval($data['profile_publish_reg']) ? 1 : 0;
371 $netpublish = strlen(Config::get('system', 'directory')) ? $publish : 0;
373 if ($password1 != $confirm) {
374 throw new Exception(L10n::t('Passwords do not match. Password unchanged.'));
375 } elseif ($password1 != '') {
376 $password = $password1;
379 if ($using_invites) {
381 throw new Exception(L10n::t('An invitation is required.'));
384 if (!dba::exists('register', ['hash' => $invite_id])) {
385 throw new Exception(L10n::t('Invitation could not be verified.'));
389 if (!x($username) || !x($email) || !x($nickname)) {
391 if (!Network::isUrlValid($openid_url)) {
392 throw new Exception(L10n::t('Invalid OpenID url'));
394 $_SESSION['register'] = 1;
395 $_SESSION['openid'] = $openid_url;
397 $openid = new LightOpenID($a->get_hostname());
398 $openid->identity = $openid_url;
399 $openid->returnUrl = System::baseUrl() . '/openid';
400 $openid->required = ['namePerson/friendly', 'contact/email', 'namePerson'];
401 $openid->optional = ['namePerson/first', 'media/image/aspect11', 'media/image/default'];
403 $authurl = $openid->authUrl();
404 } catch (Exception $e) {
405 throw new Exception(L10n::t('We encountered a problem while logging in with the OpenID you provided. Please check the correct spelling of the ID.') . EOL . EOL . L10n::t('The error message was:') . $e->getMessage(), 0, $e);
411 throw new Exception(L10n::t('Please enter the required information.'));
414 if (!Network::isUrlValid($openid_url)) {
420 // collapse multiple spaces in name
421 $username = preg_replace('/ +/', ' ', $username);
423 if (mb_strlen($username) > 48) {
424 throw new Exception(L10n::t('Please use a shorter name.'));
426 if (mb_strlen($username) < 3) {
427 throw new Exception(L10n::t('Name too short.'));
430 // So now we are just looking for a space in the full name.
431 $loose_reg = Config::get('system', 'no_regfullname');
433 $username = mb_convert_case($username, MB_CASE_TITLE, 'UTF-8');
434 if (!strpos($username, ' ')) {
435 throw new Exception(L10n::t("That doesn't appear to be your full \x28First Last\x29 name."));
439 if (!Network::isEmailDomainAllowed($email)) {
440 throw new Exception(L10n::t('Your email domain is not among those allowed on this site.'));
443 if (!valid_email($email) || !Network::isEmailDomainValid($email)) {
444 throw new Exception(L10n::t('Not a valid email address.'));
446 if (self::isNicknameBlocked($nickname)) {
447 throw new Exception(L10n::t('The nickname was blocked from registration by the nodes admin.'));
450 if (Config::get('system', 'block_extended_register', false) && dba::exists('user', ['email' => $email])) {
451 throw new Exception(L10n::t('Cannot use that email.'));
454 // Disallow somebody creating an account using openid that uses the admin email address,
455 // since openid bypasses email verification. We'll allow it if there is not yet an admin account.
456 if (x($a->config, 'admin_email') && strlen($openid_url)) {
457 $adminlist = explode(',', str_replace(' ', '', strtolower($a->config['admin_email'])));
458 if (in_array(strtolower($email), $adminlist)) {
459 throw new Exception(L10n::t('Cannot use that email.'));
463 $nickname = $data['nickname'] = strtolower($nickname);
465 if (!preg_match('/^[a-z0-9][a-z0-9\_]*$/', $nickname)) {
466 throw new Exception(L10n::t('Your nickname can only contain a-z, 0-9 and _.'));
469 // Check existing and deleted accounts for this nickname.
470 if (dba::exists('user', ['nickname' => $nickname])
471 || dba::exists('userd', ['username' => $nickname])
473 throw new Exception(L10n::t('Nickname is already registered. Please choose another.'));
476 $new_password = strlen($password) ? $password : User::generateNewPassword();
477 $new_password_encoded = self::hashPassword($new_password);
479 $return['password'] = $new_password;
481 $keys = Crypto::newKeypair(4096);
482 if ($keys === false) {
483 throw new Exception(L10n::t('SERIOUS ERROR: Generation of security keys failed.'));
486 $prvkey = $keys['prvkey'];
487 $pubkey = $keys['pubkey'];
489 // Create another keypair for signing/verifying salmon protocol messages.
490 $sres = Crypto::newKeypair(512);
491 $sprvkey = $sres['prvkey'];
492 $spubkey = $sres['pubkey'];
494 $insert_result = dba::insert('user', [
495 'guid' => generate_user_guid(),
496 'username' => $username,
497 'password' => $new_password_encoded,
499 'openid' => $openid_url,
500 'nickname' => $nickname,
503 'spubkey' => $spubkey,
504 'sprvkey' => $sprvkey,
505 'verified' => $verified,
506 'blocked' => $blocked,
507 'language' => $language,
509 'register_date' => DateTimeFormat::utcNow(),
510 'default-location' => ''
513 if ($insert_result) {
514 $uid = dba::lastInsertId();
515 $user = dba::selectFirst('user', [], ['uid' => $uid]);
517 throw new Exception(L10n::t('An error occurred during registration. Please try again.'));
521 throw new Exception(L10n::t('An error occurred during registration. Please try again.'));
524 // if somebody clicked submit twice very quickly, they could end up with two accounts
525 // due to race condition. Remove this one.
526 $user_count = dba::count('user', ['nickname' => $nickname]);
527 if ($user_count > 1) {
528 dba::delete('user', ['uid' => $uid]);
530 throw new Exception(L10n::t('Nickname is already registered. Please choose another.'));
533 $insert_result = dba::insert('profile', [
536 'photo' => System::baseUrl() . "/photo/profile/{$uid}.jpg",
537 'thumb' => System::baseUrl() . "/photo/avatar/{$uid}.jpg",
538 'publish' => $publish,
540 'net-publish' => $netpublish,
541 'profile-name' => L10n::t('default')
543 if (!$insert_result) {
544 dba::delete('user', ['uid' => $uid]);
546 throw new Exception(L10n::t('An error occurred creating your default profile. Please try again.'));
549 // Create the self contact
550 if (!Contact::createSelfFromUserId($uid)) {
551 dba::delete('user', ['uid' => $uid]);
553 throw new Exception(L10n::t('An error occurred creating your self contact. Please try again.'));
556 // Create a group with no members. This allows somebody to use it
557 // right away as a default group for new contacts.
558 $def_gid = Group::create($uid, L10n::t('Friends'));
560 dba::delete('user', ['uid' => $uid]);
562 throw new Exception(L10n::t('An error occurred creating your default contact group. Please try again.'));
565 $fields = ['def_gid' => $def_gid];
566 if (Config::get('system', 'newuser_private') && $def_gid) {
567 $fields['allow_gid'] = '<' . $def_gid . '>';
570 dba::update('user', $fields, ['uid' => $uid]);
572 // if we have no OpenID photo try to look up an avatar
573 if (!strlen($photo)) {
574 $photo = Network::lookupAvatarByEmail($email);
577 // unless there is no avatar-addon loaded
578 if (strlen($photo)) {
579 $photo_failure = false;
581 $filename = basename($photo);
582 $img_str = Network::fetchUrl($photo, true);
583 // guess mimetype from headers or filename
584 $type = Image::guessType($photo, true);
586 $Image = new Image($img_str, $type);
587 if ($Image->isValid()) {
588 $Image->scaleToSquare(175);
590 $hash = Photo::newResource();
592 $r = Photo::store($Image, $uid, 0, $hash, $filename, L10n::t('Profile Photos'), 4);
595 $photo_failure = true;
598 $Image->scaleDown(80);
600 $r = Photo::store($Image, $uid, 0, $hash, $filename, L10n::t('Profile Photos'), 5);
603 $photo_failure = true;
606 $Image->scaleDown(48);
608 $r = Photo::store($Image, $uid, 0, $hash, $filename, L10n::t('Profile Photos'), 6);
611 $photo_failure = true;
614 if (!$photo_failure) {
615 dba::update('photo', ['profile' => 1], ['resource-id' => $hash]);
620 Addon::callHooks('register_account', $uid);
622 $return['user'] = $user;
627 * @brief Sends pending registration confiĆmation email
629 * @param string $email
630 * @param string $sitename
631 * @param string $username
632 * @return NULL|boolean from notification() and email() inherited
634 public static function sendRegisterPendingEmail($email, $sitename, $username)
636 $body = deindent(L10n::t('
638 Thank you for registering at %2$s. Your account is pending for approval by the administrator.
641 $body = sprintf($body, $username, $sitename);
643 return notification([
644 'type' => SYSTEM_EMAIL,
645 'to_email' => $email,
646 'subject'=> L10n::t('Registration at %s', $sitename),
651 * @brief Sends registration confirmation
653 * It's here as a function because the mail is sent from different parts
655 * @param string $email
656 * @param string $sitename
657 * @param string $siteurl
658 * @param string $username
659 * @param string $password
660 * @return NULL|boolean from notification() and email() inherited
662 public static function sendRegisterOpenEmail($email, $sitename, $siteurl, $username, $password)
664 $preamble = deindent(L10n::t('
666 Thank you for registering at %2$s. Your account has been created.
668 $body = deindent(L10n::t('
669 The login details are as follows:
675 You may change your password from your account "Settings" page after logging
678 Please take a few moments to review the other account settings on that page.
680 You may also wish to add some basic information to your default profile
681 ' . "\x28" . 'on the "Profiles" page' . "\x29" . ' so that other people can easily find you.
683 We recommend setting your full name, adding a profile photo,
684 adding some profile "keywords" ' . "\x28" . 'very useful in making new friends' . "\x29" . ' - and
685 perhaps what country you live in; if you do not wish to be more specific
688 We fully respect your right to privacy, and none of these items are necessary.
689 If you are new and do not know anybody here, they may help
690 you to make some new and interesting friends.
692 If you ever want to delete your account, you can do so at %3$s/removeme
694 Thank you and welcome to %2$s.'));
696 $preamble = sprintf($preamble, $username, $sitename);
697 $body = sprintf($body, $email, $sitename, $siteurl, $username, $password);
699 return notification([
700 'type' => SYSTEM_EMAIL,
701 'to_email' => $email,
702 'subject'=> L10n::t('Registration details for %s', $sitename),
703 'preamble'=> $preamble,
708 * @param object $uid user to remove
711 public static function remove($uid)
717 logger('Removing user: ' . $uid);
719 $user = dba::selectFirst('user', [], ['uid' => $uid]);
721 Addon::callHooks('remove_user', $user);
723 // save username (actually the nickname as it is guaranteed
724 // unique), so it cannot be re-registered in the future.
725 dba::insert('userd', ['username' => $user['nickname']]);
727 // The user and related data will be deleted in "cron_expire_and_remove_users" (cronjobs.php)
728 dba::update('user', ['account_removed' => true, 'account_expires_on' => DateTimeFormat::utcNow()], ['uid' => $uid]);
729 Worker::add(PRIORITY_HIGH, "Notifier", "removeme", $uid);
731 // Send an update to the directory
732 Worker::add(PRIORITY_LOW, "Directory", $user['url']);
734 if ($uid == local_user()) {
735 unset($_SESSION['authenticated']);
736 unset($_SESSION['uid']);
737 goaway(System::baseUrl());