NAME

AnyEvent::XMPP::Ext::MUC::Room - Room class

SYNOPSIS

DESCRIPTION

This module represents a room handle for a MUC.

METHODS

new (%args)

get_user ($nick)

This method returns the user with the $nick in the room.

get_me

This method returns the AnyEvent::XMPP::Ext::MUC::User object of yourself in the room. If will return undef if we are not in the room anymore.

get_user_jid ($jid)

This method looks whether a user with the JID $jid exists in the room. That means whether the node and domain part of the JID match the rooms node and domain part, and the resource part of the JID matches a joined nick.

get_users

This method returns the list of occupants as AnyEvent::XMPP::Ext::MUC::User objects.

make_instant ($cb)

If you just created a room you can create an instant room with this method instead of going through room configuration for a reserved room.

If you want to create a reserved room instead don't forget to unset the create_instant argument of the join_room method of AnyEvent::XMPP::Ext::MUC!

See also the request_configuration method below for the reserved room config.

$cb is the callback that will be called when the instant room creation is finished. If successful the first argument will be this room object ($self), if unsuccessful the first argument will be undef and the second will be a AnyEvent::XMPP::Error::IQ object.

request_configuration ($cb)

This method requests the room configuration. When the configuration form or an error arrives $cb will be called. The first argument to the callback will be a AnyEvent::XMPP::Ext::DataForm with the room configuration form or undef in case of an error. The second argument will be a AnyEvent::XMPP::Error::MUC error object if an error occurred or undef if no error occurred.

If you made an answer form you can send it via the send_configuration method below.

Here is an example:

$room->request_configuration (sub {
   my ($form, $err) = @_;
   $form or return;

   my $af = AnyEvent::XMPP::Ext::DataForm->new;
   $af->make_answer_form ($form);
   $af->set_field_value ('muc#roomconfig_maxusers', 20);
   $af->clear_empty_fields;

   $roomhdl->send_configuration ($af, sub {
      # ...
   });
});

send_configuration ($answer_form, $cb)

This method sends the answer form to a configuration request to the room. $answer_form should be a AnyEvent::XMPP::Ext::DataForm object containig the answer form with the changed configuration.

The first argument of $cb will be a true value if the configuration change was successful. The second argument of $cb will be a AnyEvent::XMPP::Error::IQ object if the configuration change was not successful.

make_message (%args)

This method constructs a AnyEvent::XMPP::Ext::MUC::Message with a connection to this room.

%args are further arguments for the constructor of AnyEvent::XMPP::Ext::MUC::Message. The default to argument for the message is the room and the type will be 'groupchat'.

send_part ($msg, $cb, $timeout)

This lets you part the room, $msg is an optional part message and can be undef if no custom message should be generated.

$cb is called when we successfully left the room or after $timeout seconds. The default for $timeout is 60.

The first argument to the call of $cb will be undef if we successfully parted, or a true value when the timeout hit. Even if we timeout we consider ourself parted (and a 'leave' event is generated).

users

Returns a list of AnyEvent::XMPP::Ext::MUC::User objects which are in this room.

jid

Returns the bare JID of this room.

nick_jid

Returns the full JID of yourself in the room.

is_connected

Returns true if this room is still connected (but maybe not joined (yet)).

connection

If the room is still joined this method will return the connection on which the room is connected.

is_joined

Returns true if this room is still joined (and connected).

change_nick ($newnick)

This method lets you change your nickname in this room.

change_subject ($newsubject)

This methods changes the subject of the room.

AUTHOR

Robin Redeker, <elmex at ta-sa.org>, JID: <elmex at jabber.org>

COPYRIGHT & LICENSE

Copyright 2007, 2008 Robin Redeker, all rights reserved.

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