diff options
author | Louise Crow <louise@mysociety.org> | 2010-05-27 10:06:28 +0100 |
---|---|---|
committer | Louise Crow <louise@mysociety.org> | 2010-05-27 10:06:28 +0100 |
commit | 1c42f9fe11b7285ee4ea356d757aa549c7a44522 (patch) | |
tree | beca30740336ebcf1c061807f12c5008e9873ee7 /web-admin/index.cgi | |
parent | 7b11e3d67f39f1c4049acaff9ef800a355d7f984 (diff) | |
parent | 77beaf0c40637c56edee91a4e2e8966783ee8a10 (diff) |
Merge branch 'master' of ssh://louise@git.mysociety.org/data/git/public/fixmystreet into cities_release_1
Diffstat (limited to 'web-admin/index.cgi')
-rwxr-xr-x | web-admin/index.cgi | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/web-admin/index.cgi b/web-admin/index.cgi index 936054fe5..8ac3eb132 100755 --- a/web-admin/index.cgi +++ b/web-admin/index.cgi @@ -865,6 +865,23 @@ sub not_found { sub main { my $q = shift; + + my $logout = $q->param('logout'); + my $timeout = $q->param('timeout'); + if ($logout) { + if (!$timeout) { + print $q->redirect(-location => '?logout=1;timeout=' . (time() + 7)); + return; + } + if (time() < $timeout) { + print $q->header( + -status => '401 Unauthorized', + -www_authenticate => 'Basic realm="www.fixmystreet.com admin pages"' + ); + return; + } + } + my $page = $q->param('page'); $page = "summary" if !$page; |