The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

AnyEvent::Ident::Transaction - Simple asynchronous ident transaction

VERSION

version 0.08

METHODS

req

 my $req = $tx->req;

Returns the request object for the transaction (an instance of AnyEvent::Ident::Request).

reply_with_user

 $tx->reply_with_user($os, $username);
 $tx->reply_with_user($os);

Reply to the client with the given username and operating system. If $os is not specified then "OTHER" is used for the operating system. The operating system should be one specified in RFC-952 under SYSTEM NAMES, or OTHER. Common system names include UNIX, WIN32 and VMS. OTHER should be used when the identification ($username) does not map directly to a user or email address on the server system. Here are a couple of examples where OTHER should be used:

  • The username is actually an encrypted audit token

  • The username is actually a real name and phone number.

reply_with_error

 $tx->reply_with_error( $error_type );

Reply to the client with the given error. Should be one of

  • INVALID-PORT

    Usually detected and handled by AnyEvent::Ident::Server itself.

  • NO-USER

    No user for the port pair, or the port pair does not refer to a currently open TCP connection.

  • HIDDEN-USER

    The port pair was valid and the ident server was able to determine the user, but the user declined to provide this information (typically via user configuration).

  • UNKNOWN-ERROR

    Used for all other errors.

remote_port

 my $port = $tx->remote_port;

Returns the remote TCP port being used to make the request.

local_port

 my $port = $tx->local_port;

Returns the local TCP port being used to make the request.

remote_address

 my $address = $tx->remote_address;

Returns the IP address from whence the ident request is coming from.

AUTHOR

Graham Ollis <plicease@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Graham Ollis.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.