NAME

XML::Generator::XMPP - easily create XMPP packets

SYNOPSIS

   my $builder = XML::SAX::IncrementalBuilder::LibXML->new(detach => 1);
   my $xpc = XML::LibXML::XPathContext->new;
   my $gen = XML::Generator::XMPP(
      Handler => $builder,
      XPC => $xpc,
      Server => 'jabber.org',
   );

   my $client = 'cl';
   $xpc->registerNs($client, 'jabber:client');

   $x->start;

   $x->nodes([
      "$client:presence" => [],
   ]);

   $x->end;

   while (my $node = $builder->get_node()) {
      print SOCKET $node->toString;
   }

DESCRIPTION

XML::Generator::XMPP uses XML::SAX::IncrementalBuilder::LibXML and XML::LibXML::XPathContext to create XML nodes for the XMPP packets you want to send.

As you can see in the synopsis, you use start(), end() and nodes() to describe what nodes to create, and then ask the XML::SAX::IncrementalBuilder::LibXML object for the generated nodes. the 'incremental' means you can do this at any time, so you don't need to wait till after end() (which would have made this unworkable).

IncrementalBuilder generates nodes that are suitable for printing into your socket verbatim. That means the while loop from the SYNOPSIS would write a valid XMPP stream into the socket.

CONSTRUCTOR

new

Creates a new instance. This has three named parameters, which are all required:

Handler

The SAX builder object. Theoretically, this could be any XML::SAX class that generates DOM fragments with XML::LibXML::Node objects, but the only real option in XML::SAX::IncrementalBuilder::LibXML.

XPC

An XML::LibXML::XPathContext object. This is used to get the namespaces right. You should register any namespace you plan to use with this object.

Server

The name of the XMPP server you are connecting to. This is used in the start() method to generate a correct <stream:stream> element.

METHODS

start

Generates the initial <stream:stream> element that starts the XML stream

nodes

Creates XML nodes from the list you pass it. The basic syntax is as follows

  $generator->nodes( [
    "nsprefix:nodename" => [ ..list of options.. ]
  ] );

The namespace prefix is required and must be registered with the XPathContext you have passed into the constructor.

The list of options for a node is essentially a hash, but written as a list so you can have more than one of the same 'key'. The following keys are allowed:

Attributes => {'nsprefix:attr_name' => 'value'}

If present, this must be the first in the list. Again, the namespace prefix is mandatory, and must be registered with the XPathContext.

Text => 'text'

Creates a Text node.

Child => [ 'nsprefix:nodename' => [ ... ], ... ]

Create one or more child nodes. The same syntax as for the main nodes list applies.

Subtree => XML::LibXML::Element->new('foo')

Add an XML::LibXML::Element child node. This can be useful if you are using some module that generates some XML for you, and you need to put it inside an XMPP packet. Note that you are responsible for making sure that the namespaces are correct.

As you can see in the "SYNOPSIS", leaving the list empty is valid behaviour. This creates an empty node.

end

Generates the closing </stream:stream> element that closes the XML stream.

CONVENIENCE METHODS

The following are methods you can use to ease the construction of the structure you pass to the nodes() method. They return a listref you can pass into nodes() as the top listref it expects.

  $self->nodes( $self->iq(...) );

iq TYPE, TO, CHILDREN

  $iq = $self->iq(get => 'someone@example.com', [
                "disco:query" => [],
        ],
  ) 

Creates the structure for an 'iq' element. The TYPE and TO parameters should contain the content of the attributes with the corresponding name, and CHILDREN is a listref containing zero or more child descriptions in the same format as you use in nodes()

AUTHOR

Martijn van Beers <martijn@cpan.org>

LICENCE

XML::Generator::XMPP is released under the GPL version 2.0 or higher. See the file LICENCE for details.

cpanm XML::Generator::XMPP

perl -MCPAN -e shell
install XML::Generator::XMPP