NAME

Net::RRP::Protocol - rrp protocol

SYNOPSIS

            

              
              
use Net::RRP::Protocol;
my $protocol = new Net::RRP::Protocol ( %parameters_for_IO_Socket_SSL_new );
my $protocol1 = new Net::RRP::Protocol ( socket => $io_socket_ssl_object );
            
          

DESCRIPTION

This class implements rrp command ( request/response ) communications over socket ( IO::Socket::SSL )

new

This is a comstructor. You must setup complete paraters for initiliaze of IO::Socket::SSL instance or pass already initilized socket at 'socket' key.

            

              
              
use Net::RRP::Protocol;
my $protocol = new Net::RRP::Protocol ( %parameters_for_IO_Socket_SSL_new );
my $protocol1 = new Net::RRP::Protocol ( socket => $io_socket_ssl_object );
            
          

See IO::Socket::SSL(3) for more details about IO::Socket::SSL parameters.

getRequest

Get Net::RRP::Request class instance from socket. See Net::RRP::Codec(3) for more details about parsing of stream && get Net::RRP::Request instance.

            

              
              
my $request = $protocol->getRequest ();
            
          

getResponse

Get Net::RRP::Response class instance from socket. See Net::RRP::Codec(3) for more details about parsing of stream && get Net::RRP::Response instance.

            

              
              
my $response = $protocol->getResponse ();
            
          

sendRequest

Send rrp request to socket. Example:

            

              
              
$protocol->sendRequest ( $request );
            
          

throw throw Net::RRP::Exception::IOError if io errors.

sendResponse

Send rrp response to socket. Example:

            

              
              
$protocol->sendResponse ( $response );
            
          

throw throw Net::RRP::Exception::IOError if io errors.

sendHello()

Send a "hello" message to a socket at the server part. You can pass registryName, version and buildDate parameters to this call.

            

              
              
$protocol->hello ( registryName => "RU",
            version      => '1.1.0',
            buildDate    => 'Mon Jun 19 14:04:00 MSK 2000' ).
            
          

Return true if ok and false at errors.

getHello

Get "hello" from scream

            

              
              
$protocol->getHello();
            
          

AUTHOR AND COPYRIGHT

            

              
              
Net::RRP::Protocol (C) Michael Kulakov, Zenon N.S.P. 2000
                       125124, 19, 1-st Jamskogo polja st,
                       Moscow, Russian Federation
                       mkul@cpan.org
All rights reserved.
You may distribute this package under the terms of either the GNU
General Public License or the Artistic License, as specified in the
Perl README file.
            
          

SEE ALSO

Net::RRP::Request(3), Net::RRP::Response(3), Net::RRP::Codec(3), RFC 2832

cpanm Net::RRP

perl -MCPAN -e shell
install Net::RRP