Find file
Fetching contributors…
Cannot retrieve contributors at this time
106 lines (93 sloc) 2.86 KB
<?php
/**
* Original Code Copyright (C) 2005, 2006, 2007, 2008 Brice Burgess <bhb@iceburg.net>
* released originally under GPLV2
*
* This file is part of poMMo.
*
* poMMo is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* poMMo is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with Pommo. If not, see <http://www.gnu.org/licenses/>.
*
* This fork is from https://github.com/soonick/poMMo
* Please see docs/contribs for Contributors
*
*/
/**********************************
INITIALIZATION METHODS
*********************************/
require 'bootstrap.php';
require_once Pommo::$_baseDir.'classes/Pommo_Subscribers.php';
require_once Pommo::$_baseDir . 'classes/Pommo_Helper_Messages.php';
Pommo::init(array('authLevel' => 0,'noSession' => true));
$logger = Pommo::$_logger;
$dbo = Pommo::$_dbo;
/**********************************
SETUP TEMPLATE, PAGE
*********************************/
require_once Pommo::$_baseDir.'classes/Pommo_Template.php';
$view = new Pommo_Template();
// make sure email/login is valid
$subscriber = current(Pommo_Subscribers::get(array (
'email' => (empty($_REQUEST['email'])) ? '0' : $_REQUEST['email'], 'status' => 1
)));
if (empty($subscriber))
{
Pommo::redirect('login.php');
}
// see if an activation email was sent to this subscriber in the last 2 minutes;
$query =
'SELECT
*
FROM
'.$dbo->table['scratch']."
WHERE
`type`=1
AND `int`=%i
AND `time` > (NOW() - INTERVAL 2 MINUTE)
LIMIT 1";
$query = $dbo->prepare($query,array($subscriber['id']));
$test = $dbo->query($query,0);
// attempt to send activation code if once has not recently been sent
if (empty($test))
{
$code = Pommo_Subscribers::getActCode($subscriber);
if (Pommo_Helper_Messages::sendMessage(array (
'to' => $subscriber['email'],
'code' => $code,
'type' => 'activate')))
{
$view->assign('sent', true);
// timestamp this activation email
$query = "
INSERT INTO ".$dbo->table['scratch']."
SET
`type`=1,
`int`=%i";
$query = $dbo->prepare($query,array($subscriber['id']));
$dbo->query($query);
// remove ALL activation email timestamps older than 2 minutes
$query = "
DELETE FROM
".$dbo->table['scratch']."
WHERE
`type`=1
AND `time` < (NOW() - INTERVAL 2 MINUTE)";
$query = $dbo->prepare($query,array());
$dbo->query($query);
}
}
else {
$view->assign('sent', false);
}
$view->assign('email', $subscriber['email']);
$view->display('user/activate');