Deprecated: Assigning the return value of new by reference is deprecated in /home/bluestat/public_html/source/index.php on line 477
load('printer', 'admin', true);
$admin->css_link('../framework/printer.css.php');
$admin->set('realm', $lang->string('Administration'));
$admin->page_code('');
function admin_login()
{
global $kalens;
$kalens->admin->page_start($kalens->lang->string('Login'), '', 15, '', 'document.cplogin.' . ($kalens->userinfo['username'] ? 'password' : 'username') . '.focus();');
$kalens->admin->form_start('../login.php', 'cplogin', false, 'cplogin');
$kalens->admin->table_start(true, '425');
$kalens->admin->table_head($kalens->lang->string('ProCal') . ' ' . $kalens->lang->string('Login'));
$kalens->admin->row_input($kalens->lang->string('Username'), 'username', $kalens->userinfo['username'], 2, 35, false, false, 'middle');
$kalens->admin->row_input($kalens->lang->string('Password'), 'password', '', 2, 35, false, true, 'middle');
$kalens->admin->row_submit('', $kalens->lang->string('Login'));
$kalens->admin->table_end();
$kalens->admin->form_end();
$kalens->admin->page_end();
}
// ########################### ADMIN LOGIN ###########################
if ($_COOKIE[COOKIE_PREFIX . 'adminsession'])
{
if ($kalens->userinfo['canadmin'])
{
if (md5(md5($kalens->userinfo['password']) . md5($kalens->userinfo['email']) . md5($kalens->userinfo['userid'])) != $_COOKIE[COOKIE_PREFIX . 'adminsession'])
{
$funct->cookie(COOKIE_PREFIX . 'adminsession', null);
$admin->error($lang->string('The admin session on your computer does not authenticate properly in our system. It has been removed from your system. This is considered an attempt to gain unauthorized entry into the system.'));
}
else
{
$funct->cookie(COOKIE_PREFIX . 'adminsession', $kalens->in[COOKIE_PREFIX . 'adminsession']);
}
}
else
{
$funct->cookie(COOKIE_PREFIX . 'adminsession', null);
admin_login();
}
}
if (!$_COOKIE[COOKIE_PREFIX . 'adminsession'])
{
admin_login();
}
// Write out CSS information
require_once('./includes/admin/templates.php');
file_write_css(-1, './');
/*=====================================================================*\
|| ###################################################################
|| # $HeadURL$
|| # $Id$
|| ###################################################################
\*=====================================================================*/
?>