NAME
Apache::Wyrd::Services::TicketPad - Key storage for LoginServer Service
SYNOPSIS
use Apache::Wyrd::Services::TicketPad;
my $pad = Apache::Wyrd::Services::TicketPad->new($ticketfile, 5);
my $key = 'Swordfish';
my $ticket = join ('', qw(
5261306521af6ea42a9c19060e1dc1258791d4c1f6ac
9be773c5e454b1679171f2ddf35967a5b4bad255e9c8
e8c98444d3790c3793a826b6460087cbaaf32036a19b
526236eb07931ea055808f047d81f6afae38ffabb720
));
$pad->add_ticket($ticket, $key);
$key = $pad->find($ticket);
DESCRIPTION
NONE
PERL METHODS
(format: (returns) name (arguments after self))
- (Apache::Wyrd::Services::TicketFile)
new
(scalar, scalar) -
Accepts a filename for the file which will hold the ticket pad and the number of tickets the pad should keep (default 100). Returns the TicketPad object.
- (void)
add_ticket
(scalar, scalar) -
Accepts a key and a value for an entry (ticket) in the ticket pad. Discards the oldest ticket if this would raise the size of the pad beyond capacity.
- (scalar)
add_ticket
(scalar) -
Accepts a key and returns the value of the ticket under that key. Returns the empty string if the ticket cannot be found.
BUGS/CAVEATS/RESERVED METHODS
Will fail if the Apache process cannot create a file unreadable by group or other.
AUTHOR
Barry King <wyrd@nospam.wyrdwright.com>
SEE ALSO
- Apache::Wyrd::Services::Auth
-
Authorization handler
- Apache::Wyrd::Services::LoginServer
-
Perl Handler for login services.
LICENSE
Copyright 2002-2007 Wyrdwright, Inc. and licensed under the GNU GPL.
See LICENSE under the documentation for Apache::Wyrd
.