path: root/Zotlabs/Module/Lostpass.php

<?php
namespace Zotlabs\Module;

use Zotlabs\Lib\Config;

class Lostpass extends \Zotlabs\Web\Controller {

	function post() {

		$loginame = notags(trim($_POST['login-name']));
		if(! $loginame)
			goaway(z_root());

		$r = q("SELECT * FROM account WHERE account_email = '%s' LIMIT 1",
			dbesc($loginame)
		);

		if(! $r) {
			notice( t('No valid account found.') . EOL);
			goaway(z_root());
		}

		$aid = $r[0]['account_id'];
		$email = $r[0]['account_email'];

		$hash = random_string();

		$r = q("UPDATE account SET account_reset = '%s' WHERE account_id = %d",
			dbesc($hash),
			intval($aid)
		);
		if($r)
			info( t('Password reset request issued. Check your email.') . EOL);

		$email_tpl = get_intltext_template("lostpass_eml.tpl");
		$message = replace_macros($email_tpl, array(
				'$sitename' => Config::Get('system','sitename'),
				'$siteurl' =>  z_root(),
				'$username' => sprintf( t('Site Member (%s)'), $email),
				'$email' => $email,
				'$reset_link' => z_root() . '/lostpass?verify=' . $hash
		));

		$subject = email_header_encode(sprintf( t('Password reset requested at %s'),Config::Get('system','sitename')), 'UTF-8');

		$res = z_mail(
			[
			'toEmail' => $email,
			'messageSubject' => sprintf( t('Password reset requested at %s'), Config::Get('system','sitename')),
			'textVersion' => $message,
			]
		);

		goaway(z_root());
	}


	function get() {


		if(x($_GET,'verify')) {
			$verify = $_GET['verify'];

			$r = q("SELECT * FROM account WHERE account_reset = '%s' LIMIT 1",
				dbesc($verify)
			);
			if(! $r) {
				notice( t("Request could not be verified. (You may have previously submitted it.) Password reset failed.") . EOL);
				goaway(z_root());
				return;
			}

			$aid = $r[0]['account_id'];
			$email = $r[0]['account_email'];

			$new_password = autoname(6) . mt_rand(100,9999);

			$salt = random_string(32);
			$password_encoded = hash('whirlpool', $salt . $new_password);

			$r = q("UPDATE account SET account_salt = '%s', account_password = '%s', account_reset = '', account_flags = (account_flags & ~%d) where account_id = %d",
				dbesc($salt),
				dbesc($password_encoded),
				intval(ACCOUNT_UNVERIFIED),
				intval($aid)
			);

			if($r) {
				$tpl = get_markup_template('pwdreset.tpl');
				$o = replace_macros($tpl,array(
					'$lbl1' => t('Password Reset'),
					'$lbl2' => t('Your password has been reset as requested.'),
					'$lbl3' => t('Your new password is'),
					'$lbl4' => t('Save or copy your new password - and then'),
					'$lbl5' => '<a href="' . z_root() . '/login">' . t('click here to login') . '</a>.',
					'$lbl6' => t('Your password may be changed from the <em>Settings</em> page after successful login.'),
					'$newpass' => $new_password,
					'$baseurl' => z_root()

				));

				info("Your password has been reset." . EOL);

				$email_tpl = get_intltext_template("passchanged_eml.tpl");
				$message = replace_macros($email_tpl, array(
					'$sitename' => \App::$config['sitename'],
					'$siteurl' =>  z_root(),
					'$username' => sprintf( t('Site Member (%s)'), $email),
					'$email' => $email,
					'$new_password' => $new_password
					)
				);

				$res = z_mail(
					[
					'toEmail'        => $email,
					'messageSubject' => sprintf( t('Your password has changed at %s'), Config::Get('system','sitename')),
					'textVersion'    => $message,
					]
				);

				return $o;
			}

		}
		else {
			$tpl = get_markup_template('lostpass.tpl');

			$o = replace_macros($tpl,array(
				'$title' => t('Forgot your Password?'),
				'$desc' => t('Enter your email address and submit to have your password reset. Then check your email for further instructions.'),
				'$name' => t('Email Address'),
				'$submit' => t('Reset')
			));

			return $o;
		}

	}

}