2010-07-18 08:24:51 +00:00
|
|
|
<?php
|
2017-12-01 19:57:13 +00:00
|
|
|
/**
|
|
|
|
* @file mod/lostpass.php
|
|
|
|
*/
|
2018-01-20 03:27:31 +00:00
|
|
|
|
2017-04-30 04:07:00 +00:00
|
|
|
use Friendica\App;
|
2018-07-20 02:15:21 +00:00
|
|
|
use Friendica\Core\Config;
|
2018-01-21 18:33:59 +00:00
|
|
|
use Friendica\Core\L10n;
|
2018-10-31 14:35:50 +00:00
|
|
|
use Friendica\Core\Renderer;
|
2017-08-26 06:04:21 +00:00
|
|
|
use Friendica\Core\System;
|
2018-07-20 12:19:26 +00:00
|
|
|
use Friendica\Database\DBA;
|
2018-01-20 03:49:06 +00:00
|
|
|
use Friendica\Model\User;
|
2018-01-27 02:38:34 +00:00
|
|
|
use Friendica\Util\DateTimeFormat;
|
2018-11-08 15:14:37 +00:00
|
|
|
use Friendica\Util\Strings;
|
2017-04-30 04:07:00 +00:00
|
|
|
|
2018-01-20 23:15:55 +00:00
|
|
|
require_once 'boot.php';
|
2017-12-01 19:57:13 +00:00
|
|
|
require_once 'include/enotify.php';
|
|
|
|
require_once 'include/text.php';
|
2010-07-18 08:24:51 +00:00
|
|
|
|
2018-01-20 03:27:31 +00:00
|
|
|
function lostpass_post(App $a)
|
|
|
|
{
|
2018-11-08 15:14:37 +00:00
|
|
|
$loginame = Strings::removeTags(trim($_POST['login-name']));
|
2018-01-20 03:27:31 +00:00
|
|
|
if (!$loginame) {
|
2018-10-19 18:11:27 +00:00
|
|
|
$a->internalRedirect();
|
2018-01-20 03:27:31 +00:00
|
|
|
}
|
2010-07-18 08:24:51 +00:00
|
|
|
|
2018-01-20 03:27:31 +00:00
|
|
|
$condition = ['(`email` = ? OR `nickname` = ?) AND `verified` = 1 AND `blocked` = 0', $loginame, $loginame];
|
2018-08-18 06:20:50 +00:00
|
|
|
$user = DBA::selectFirst('user', ['uid', 'username', 'email', 'language'], $condition);
|
2018-07-21 12:46:04 +00:00
|
|
|
if (!DBA::isResult($user)) {
|
2018-01-21 18:33:59 +00:00
|
|
|
notice(L10n::t('No valid account found.') . EOL);
|
2018-10-19 18:11:27 +00:00
|
|
|
$a->internalRedirect();
|
2011-06-29 07:59:21 +00:00
|
|
|
}
|
|
|
|
|
2018-11-08 15:22:20 +00:00
|
|
|
$pwdreset_token = Strings::getRandomName(12) . mt_rand(1000, 9999);
|
2010-07-18 08:24:51 +00:00
|
|
|
|
2018-01-20 23:15:55 +00:00
|
|
|
$fields = [
|
|
|
|
'pwdreset' => $pwdreset_token,
|
2018-01-27 02:38:34 +00:00
|
|
|
'pwdreset_time' => DateTimeFormat::utcNow()
|
2018-01-20 23:15:55 +00:00
|
|
|
];
|
2018-07-20 12:19:26 +00:00
|
|
|
$result = DBA::update('user', $fields, ['uid' => $user['uid']]);
|
2018-01-20 03:27:31 +00:00
|
|
|
if ($result) {
|
2018-01-22 14:16:25 +00:00
|
|
|
info(L10n::t('Password reset request issued. Check your email.') . EOL);
|
2018-01-20 03:27:31 +00:00
|
|
|
}
|
2010-07-18 08:24:51 +00:00
|
|
|
|
2018-07-07 21:46:30 +00:00
|
|
|
$sitename = Config::get('config', 'sitename');
|
2018-01-20 23:15:55 +00:00
|
|
|
$resetlink = System::baseUrl() . '/lostpass/' . $pwdreset_token;
|
2014-09-07 08:27:39 +00:00
|
|
|
|
2018-01-22 14:16:25 +00:00
|
|
|
$preamble = deindent(L10n::t('
|
2014-09-07 09:20:06 +00:00
|
|
|
Dear %1$s,
|
|
|
|
A request was recently received at "%2$s" to reset your account
|
|
|
|
password. In order to confirm this request, please select the verification link
|
|
|
|
below or paste it into your web browser address bar.
|
2014-09-07 08:27:39 +00:00
|
|
|
|
2014-09-07 09:20:06 +00:00
|
|
|
If you did NOT request this change, please DO NOT follow the link
|
2018-01-21 00:12:14 +00:00
|
|
|
provided and ignore and/or delete this email, the request will expire shortly.
|
2014-09-07 08:27:39 +00:00
|
|
|
|
2014-09-07 09:20:06 +00:00
|
|
|
Your password will not be changed unless we can verify that you
|
2018-01-20 03:27:31 +00:00
|
|
|
issued this request.', $user['username'], $sitename));
|
2018-01-22 14:16:25 +00:00
|
|
|
$body = deindent(L10n::t('
|
2018-01-21 00:12:14 +00:00
|
|
|
Follow this link soon to verify your identity:
|
2014-09-07 08:27:39 +00:00
|
|
|
|
2014-09-07 09:20:06 +00:00
|
|
|
%1$s
|
2014-09-07 08:27:39 +00:00
|
|
|
|
2014-09-07 09:20:06 +00:00
|
|
|
You will then receive a follow-up message containing the new password.
|
|
|
|
You may change that password from your account settings page after logging in.
|
2014-09-07 08:27:39 +00:00
|
|
|
|
2014-09-07 09:20:06 +00:00
|
|
|
The login details are as follows:
|
2014-09-07 08:27:39 +00:00
|
|
|
|
2014-09-07 09:20:06 +00:00
|
|
|
Site Location: %2$s
|
2018-01-20 03:27:31 +00:00
|
|
|
Login Name: %3$s', $resetlink, System::baseUrl(), $user['email']));
|
2014-09-07 08:27:39 +00:00
|
|
|
|
2018-01-15 13:05:12 +00:00
|
|
|
notification([
|
2018-01-20 03:27:31 +00:00
|
|
|
'type' => SYSTEM_EMAIL,
|
2018-08-18 06:20:50 +00:00
|
|
|
'language' => $user['language'],
|
|
|
|
'to_name' => $user['username'],
|
2018-01-20 03:27:31 +00:00
|
|
|
'to_email' => $user['email'],
|
2018-04-03 10:45:27 +00:00
|
|
|
'uid' => $user['uid'],
|
2018-01-22 14:16:25 +00:00
|
|
|
'subject' => L10n::t('Password reset requested at %s', $sitename),
|
2018-01-20 03:27:31 +00:00
|
|
|
'preamble' => $preamble,
|
|
|
|
'body' => $body
|
|
|
|
]);
|
2011-04-15 00:13:13 +00:00
|
|
|
|
2018-10-19 18:11:27 +00:00
|
|
|
$a->internalRedirect();
|
2016-02-05 20:52:39 +00:00
|
|
|
}
|
2010-07-18 08:24:51 +00:00
|
|
|
|
2018-01-20 03:27:31 +00:00
|
|
|
function lostpass_content(App $a)
|
|
|
|
{
|
|
|
|
$o = '';
|
2018-01-20 23:15:55 +00:00
|
|
|
if ($a->argc > 1) {
|
|
|
|
$pwdreset_token = $a->argv[1];
|
2016-02-07 14:11:34 +00:00
|
|
|
|
2018-08-18 06:20:50 +00:00
|
|
|
$user = DBA::selectFirst('user', ['uid', 'username', 'email', 'pwdreset_time', 'language'], ['pwdreset' => $pwdreset_token]);
|
2018-07-21 12:46:04 +00:00
|
|
|
if (!DBA::isResult($user)) {
|
2018-01-21 18:33:59 +00:00
|
|
|
notice(L10n::t("Request could not be verified. \x28You may have previously submitted it.\x29 Password reset failed."));
|
2018-01-20 23:15:55 +00:00
|
|
|
|
|
|
|
return lostpass_form();
|
2010-07-18 08:24:51 +00:00
|
|
|
}
|
|
|
|
|
2018-01-21 00:15:05 +00:00
|
|
|
// Password reset requests expire in 60 minutes
|
2018-01-27 02:38:34 +00:00
|
|
|
if ($user['pwdreset_time'] < DateTimeFormat::utc('now - 1 hour')) {
|
2018-01-20 23:15:55 +00:00
|
|
|
$fields = [
|
|
|
|
'pwdreset' => null,
|
|
|
|
'pwdreset_time' => null
|
|
|
|
];
|
2018-07-20 12:19:26 +00:00
|
|
|
DBA::update('user', $fields, ['uid' => $user['uid']]);
|
2018-01-20 23:15:55 +00:00
|
|
|
|
2018-01-21 18:33:59 +00:00
|
|
|
notice(L10n::t('Request has expired, please make a new one.'));
|
2018-01-20 23:15:55 +00:00
|
|
|
|
|
|
|
return lostpass_form();
|
2010-07-18 08:24:51 +00:00
|
|
|
}
|
2018-01-20 23:15:55 +00:00
|
|
|
|
|
|
|
return lostpass_generate_password($user);
|
2018-01-20 03:27:31 +00:00
|
|
|
} else {
|
2018-01-20 23:15:55 +00:00
|
|
|
return lostpass_form();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
function lostpass_form()
|
|
|
|
{
|
2018-10-31 14:44:06 +00:00
|
|
|
$tpl = Renderer::getMarkupTemplate('lostpass.tpl');
|
2018-10-31 14:35:50 +00:00
|
|
|
$o = Renderer::replaceMacros($tpl, [
|
2018-01-22 14:16:25 +00:00
|
|
|
'$title' => L10n::t('Forgot your Password?'),
|
|
|
|
'$desc' => L10n::t('Enter your email address and submit to have your password reset. Then check your email for further instructions.'),
|
|
|
|
'$name' => L10n::t('Nickname or Email: '),
|
|
|
|
'$submit' => L10n::t('Reset')
|
2018-01-20 23:15:55 +00:00
|
|
|
]);
|
|
|
|
|
|
|
|
return $o;
|
|
|
|
}
|
|
|
|
|
|
|
|
function lostpass_generate_password($user)
|
|
|
|
{
|
|
|
|
$o = '';
|
2018-02-12 02:25:09 +00:00
|
|
|
$a = get_app();
|
2018-01-20 23:15:55 +00:00
|
|
|
|
|
|
|
$new_password = User::generateNewPassword();
|
|
|
|
$result = User::updatePassword($user['uid'], $new_password);
|
2018-07-21 12:46:04 +00:00
|
|
|
if (DBA::isResult($result)) {
|
2018-10-31 14:44:06 +00:00
|
|
|
$tpl = Renderer::getMarkupTemplate('pwdreset.tpl');
|
2018-10-31 14:35:50 +00:00
|
|
|
$o .= Renderer::replaceMacros($tpl, [
|
2018-01-22 14:16:25 +00:00
|
|
|
'$lbl1' => L10n::t('Password Reset'),
|
|
|
|
'$lbl2' => L10n::t('Your password has been reset as requested.'),
|
|
|
|
'$lbl3' => L10n::t('Your new password is'),
|
|
|
|
'$lbl4' => L10n::t('Save or copy your new password - and then'),
|
|
|
|
'$lbl5' => '<a href="' . System::baseUrl() . '">' . L10n::t('click here to login') . '</a>.',
|
|
|
|
'$lbl6' => L10n::t('Your password may be changed from the <em>Settings</em> page after successful login.'),
|
2018-01-20 23:15:55 +00:00
|
|
|
'$newpass' => $new_password,
|
|
|
|
'$baseurl' => System::baseUrl()
|
2018-01-15 13:05:12 +00:00
|
|
|
]);
|
2010-07-18 08:24:51 +00:00
|
|
|
|
2018-01-20 23:15:55 +00:00
|
|
|
info("Your password has been reset." . EOL);
|
|
|
|
|
2018-07-07 21:46:30 +00:00
|
|
|
$sitename = Config::get('config', 'sitename');
|
2018-01-22 14:16:25 +00:00
|
|
|
$preamble = deindent(L10n::t('
|
2018-01-20 23:15:55 +00:00
|
|
|
Dear %1$s,
|
|
|
|
Your password has been changed as requested. Please retain this
|
2018-01-24 21:51:32 +00:00
|
|
|
information for your records ' . "\x28" . 'or change your password immediately to
|
|
|
|
something that you will remember' . "\x29" . '.
|
2018-01-20 23:15:55 +00:00
|
|
|
', $user['username']));
|
2018-01-22 14:16:25 +00:00
|
|
|
$body = deindent(L10n::t('
|
2018-01-20 23:15:55 +00:00
|
|
|
Your login details are as follows:
|
|
|
|
|
|
|
|
Site Location: %1$s
|
|
|
|
Login Name: %2$s
|
|
|
|
Password: %3$s
|
|
|
|
|
|
|
|
You may change that password from your account settings page after logging in.
|
|
|
|
', System::baseUrl(), $user['email'], $new_password));
|
|
|
|
|
|
|
|
notification([
|
|
|
|
'type' => SYSTEM_EMAIL,
|
2018-08-18 06:20:50 +00:00
|
|
|
'language' => $user['language'],
|
|
|
|
'to_name' => $user['username'],
|
2018-01-20 23:15:55 +00:00
|
|
|
'to_email' => $user['email'],
|
2018-04-03 10:47:38 +00:00
|
|
|
'uid' => $user['uid'],
|
2018-01-22 14:16:25 +00:00
|
|
|
'subject' => L10n::t('Your password has been changed at %s', $sitename),
|
2018-01-20 23:15:55 +00:00
|
|
|
'preamble' => $preamble,
|
|
|
|
'body' => $body
|
|
|
|
]);
|
2010-07-18 08:24:51 +00:00
|
|
|
}
|
2018-01-20 23:15:55 +00:00
|
|
|
|
|
|
|
return $o;
|
2011-05-23 09:39:57 +00:00
|
|
|
}
|