Новости | FAQ | Авторы | Документация | В действии | Библиотека |
Инструменты | Полезные ссылки | Хостинги | Скачать | Примеры | Форум |
АЕМ 02.10.2007 19:12
Нет, не Миша, АЕМ.@CLASS LOGIN @auto[] $login[^hash::create[]] $login.error(0) $login.mode(0) $login.sessions[^hashfile::open[/sessions]] #/auto # удаляем данные сессии @clearSession[][sessions] $sessions[$login.sessions] ^if(def $cookie:hashkey){ ^sessions.delete[$cookie:hashkey] } $cookie:sid[ $.value[] $.expires(-100) ] $cookie:hashkey[ $.value[] $.expires(-100) ] @makeSession[hashkey;sid] $cookie:sid[ $.value[$sid] $.expires(0.014) ] $cookie:hashkey[ $.value[$hashkey] $.expires(0.014) ] $sessions[$login.sessions] $sessions.$hashkey[ $.value[$sid] $.expires(0.014) ] @checkSession[hashkey;sid][sessions] ^if(def $hashkey && def $sid){ $sessions[$login.sessions] ^if($sid eq $sessions.$hashkey){ $result(1) $login.error(0) } }