On Wed, Jul 23, 2008 at 09:47:57PM +0200, Daniel McBrearty wrote: > I'm using Cat with a pretty standard configuration of : > > Catalyst::Plugin::Authentication > Catalyst::Plugin::Session > Catalyst::Plugin::Session::State::Cookie > Catalyst::Plugin::Session::Store::FastMmap > > to handle login and session management. My login code looks like this: > > my $u = $params->{username}; > > if ($c->authenticate( { username => $u, > password => $params->{'password'} > } )){ > my $user = $c->user; > $user->last_login(DateTime->now); > $user->update(); > $c->response->redirect( $forward, 301); > > } else { > # login failed > $c->stash->{login_failed} = 1; > } > > > What I'd like to do is check if this user is already logged in at some > other computer, and deny access if so. I guess that means : > > 1. checking whether there is an existing session associated this username
Session::PerUser ? > 2. Being sure that the associated session is cleared when the user hits > 'logout' after logout => { shift->delete_session }; -- Matt S Trout Need help with your Catalyst or DBIx::Class project? Technical Director http://www.shadowcat.co.uk/catalyst/ Shadowcat Systems Ltd. Want a managed development or deployment platform? http://chainsawblues.vox.com/ http://www.shadowcat.co.uk/servers/ _______________________________________________ List: Catalyst@lists.scsys.co.uk Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/catalyst@lists.scsys.co.uk/ Dev site: http://dev.catalyst.perl.org/