Net::Jabber::X - Jabber X Module
Net::Jabber::X is a companion to the Net::Jabber module. Itprovides the user a simple interface to set and retrieve allparts of a Jabber X.
Net::Jabber::X differs from the other modules in that its behaviorand available functions are based off of the XML namespace that isset in it. The current list of supported namespaces is:
jabber:x:autoupdatejabber:x:conferencejabber:x:delayjabber:x:encryptedjabber:x:eventjabber:x:expirejabber:x:formjabber:x:oobjabber:x:rosterjabber:x:signedjabber:x:sxpm
For more information on what these namespaces are for, visithttp://www.jabber.org and browse the Jabber Programmers Guide.
Each of these namespaces provide Net::Jabber::X with the functionsto access the data. By using the AUTOLOAD function the functions foreach namespace is used when that namespace is active.
To access a X object you must create an object and use theaccess functions there to get to the X. To initialize the object witha Jabber packet you must pass it the XML::Stream hash from theNet::Jabber::Client module.
my $mess = new Net::Jabber::Message(%hash);
There has been a change from the old way of handling the callbacks.You no longer have to do the above yourself, a Net::Jabberobject is passed to the callback function for the message. Also,the first argument to the callback functions is the session ID fromXML::Streams. There are some cases where you might want thisinformation, like if you created a Client that connects to two serversat once, or for writing a mini server.
use Net::Jabber qw(Client);
sub messageCB {my ($Mess) = @_;my $x = $Mess->GetX("jabber:x:delay");...}
You now have access to all of the retrieval functions available.
To create a new x to send to the server:
use Net::Jabber qw(Client);
my $message = new Net::Jabber::Message();my $x = $message->NewX("jabber:x:oob");
Now you can call the creation functions for the X as defined in theproper namespace. See below for the general <x/> functions broken downby namespace.
For more information about the array format being passed to the CallBackplease read the Net::Jabber::Client documentation.
Generic Retrieval functions
GetXMLNS() - returns a string with the namespace of the packet thatthe <x/> contains.
$xmlns = $X->GetXMLNS();
GetX(string) - since the behavior of this module depends on thenamespace, an X object may contain X objects. Thishelps to leverage code reuse by making childrenbehave in the same manner. More than likely thisfunction will never be called.
@x = GetX();@x = GetX("jabber:x:delay");
Generic Creation functions
SetXMLNS(string) - sets the xmlns of the <x/> to the string.
$X->SetXMLNS("jabber:x:delay");
In an effort to make maintaining this document easier, I am not going to go into full detail on each of these functions. Rather I will present the functions in a list with a type in the first column to show what they return, or take as arugments. Here is the list of types I will use:
string - just a stringarray - array of stringsflag - this means that the specified child exists in theXML <child/> and acts like a flag. get will return0 or 1.JID - either a string or Net::Jabber::JID object.objects - creates new objects, or returns an array ofobjects.special - this is a special case kind of function. Usuallyjust by calling Set() with no arguments it willdefault the value to a special value, like OS or time.Sometimes it will modify the value you set, likein jabber:iq:version SetVersion() the functionadds on the Net::Jabber version to the stringjust for advertisement purposes. =)master - this desribes a function that behaves like theSetMessage() function in Net::Jabber::Message.It takes a hash and sets all of the values defined,and the Set returns a hash with the values thatare defined in the object.
Type Get Set Defined======= ================ ================ ==================JID GetJID() SetJID() DefinedJID()master GetAutoupdate() SetAutoupdate()
Type Get Set Defined======= ================ ================ ==================JID GetJID() SetJID() DefinedJID()master GetConference() SetConference()
Type Get Set Defined======= ================ ================ ==================JID GetFrom() SetFrom() DefinedFrom()string GetMessage() SetMessage() DefinedMessage()string GetStamp() SetStamp() DefinedStamp()master GetDelay() SetDelay()
Type Get Set Defined======= ================ ================ ==================string GetMessage() SetMessage() DefinedMessage()master GetEncrypted() SetEncrypted()
Type Get Set Defined======= ================ ================ ==================flag GetComposing() SetComposing() DefinedComposing()flag GetDelivered() SetDelivered() DefinedDelivered()flag GetDisplayed() SetDisplayed() DefinedDisplayed()string GetID() SetID() DefinedID()flag GetOffline() SetOffline() DefinedOffline()master GetEvent() SetEvent()
Type Get Set Defined======= ================ ================ ==================string GetSeconds() SetSeconds() DefinedSeconds()master GetExpire() SetExpire()
Type Get Set Defined======= ================ ================ ==================string GetInstructions() SetInstructions() DefinedInstructions()master GetForm() SetForm()objects AddField()objects GetFields()
Type Get Set Defined======= ================ ================ ==================string GetLabel() SetLabel() DefinedLabel()string GetOrder() SetOrder() DefinedOrder()string GetType() SetType() DefinedType()string GetValue() SetValue() DefinedValue()string GetVar() SetVar() DefinedVar()master GetField() SetField()objects AddOption()objects GetOptions()
Type Get Set Defined======= ================ ================ ==================string GetLabel() SetLabel() DefinedLabel()string GetValue() SetValue() DefinedValue()master GetOption() SetOption()
Type Get Set Defined======= ================ ================ ==================string GetDesc() SetDesc() DefinedDesc()string GetURL() SetURL() DefinedURL()master GetOob() SetOob()
Type Get Set Defined======= ================ ================ ==================objects AddItem()objects GetItems()
Type Get Set Defined======= ================ ================ ==================array GetGroup() SetGroup() DefinedGroup()JID GetJID() SetJID() DefinedJID()string GetName() SetName() DefinedName()master GetItem() SetItem()
Type Get Set Defined======= ================ ================ ==================string GetSignature() SetSignature() DefinedSignature()master GetSigned() SetSigned()
Type Get Set Defined======= ================ ================ ==================string GetData() SetData() DefinedData()string GetDataWidth() SetDataWidth() DefinedDataWidth()string GetDataX() SetDataX() DefinedDataX()string GetDataY() SetDataY() DefinedDataY()string GetBoard() SetBoard() DefinedBoard()string GetBoardHeight() SetBoardHeight() DefinedBoardHeight()string GetBoardWidth() SetBoardWidth() DefinedBoardWidth()master GetSXPM() SetSXPM()objects AddMap()objects GetMaps()
Type Get Set Defined======= ================ ================ ==================string GetChar() SetChar() DefinedChar()string GetColor() SetColor() DefinedColor()master GetMap() SetMap()
Part of the flexability of this module is that you can define your ownnamespace. For more information on this topic, please read theNet::Jabber::Namespaces man page.
By Ryan Eatmon in May of 2001 for http://jabber.org.. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.