function logout_main()
{
global $gbl, $sgbl, $login, $ghtml;
initProgram();
clear_all_cookie();
$cl = $login->getList("ssession");
Utmp::updateUtmp($gbl->c_session->nname, $login, "Logout");
$gbl->c_session->delete();
$gbl->c_session->was();
if ($gbl->c_session->ssl_param) {
$ghtml->print_redirect($gbl->c_session->ssl_param['backurl']);
} else {
if ($gbl->c_session->consuming_parent) {
$ret = $gbl->getSessionV('return_url');
$ghtml->print_redirect($ret);
} else {
$ghtml->print_redirect_self("/login/");
}
}
}
function delete_expired_ssessions()
{
global $gbl, $sgbl, $login, $ghtml;
$s_l = $login->getList("ssessionlist");
if (!empty($s_l)) {
foreach ($s_l as $s) {
if (!is_object($s)) {
continue;
}
$timeout = $s->last_access + $login->getSpecialObject('sp_specialplay')->ssession_timeout;
dprint($s->nname);
if ($timeout < time()) {
$s->delete();
Utmp::updateUtmp($s->nname, $login, "Session Expired");
}
}
}
}
