NAME

Net::EPP::Protocol - Low-level functions useful for both EPP clients and servers.

SYNOPSIS

        #!/usr/bin/perl
        use Net::EPP::Protocol;
        use strict;

        # send a frame down a socket:

        Net::EPP::Protocol->send_frame($socket, $xml);

        # get a frame from a socket:

        my $xml = Net::EPP::Protocol->get_frame($socket);

DESCRIPTION

This module implements functions that are common to both EPP clients and servers that implement the TCP/TLS transport of the Extensible Provisioning Protocol (EPP) as defined in RFC 5734. The only user of this module is Net::EPP::Client, but it may be useful if you want to write an EPP server.

VARIABLES

$Net::EPP::Protocol::THRESHOLD

At least one EPP server implementation sends an unframed plain text error message when a client connects from an unauthorised address. As a result, when the first four bytes of the message are unpacked, the client tries to read and allocate a very large amount of memory.

If the apparent frame length received from a server exceeds the value of $Net::EPP::Protocol::THRESHOLD, the get_frame() method will croak.

The default value is 1GB.

METHODS

        my $xml = Net::EPP::Protocol->get_frame($socket);

This method reads a frame from the socket and returns a scalar containing the XML. $socket must be an IO::Handle or one of its subclasses (ie IO::Socket::*).

If the transmission fails for whatever reason, this method will croak(), so be sure to enclose it in an eval().

        Net::EPP::Protocol->send_frame($socket, $xml);

This method prepares an RFC 5734 compliant EPP frame and transmits it to the remote peer. $socket must be an IO::Handle or one of its subclasses (ie IO::Socket::*).

If the transmission fails for whatever reason, this method will croak(), so be sure to enclose it in an eval(). Otherwise, it will return a true value.

        my $frame = Net::EPP::Protocol->prep_frame($xml);

This method returns the XML frame in "wire format" with the protocol header prepended to it. The return value can be printed directly to an open socket, for example:

        print STDOUT Net::EPP::Protocol->prep_frame($frame->toString);

COPYRIGHT

This module is (c) 2008 - 2023 CentralNic Ltd and 2024 Gavin Brown. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.