* src/mod_irc/mod_irc_connection.erl: Added handling for

jabber:iq:version and jabber:iq:time requests, participant address
now added to presence status

SVN Revision: 130

diff --git a/ChangeLog b/ChangeLog
index 47b5f62db38611742516e242d4574e94215daeb0..55487135b8f9e4d0f77d3d3aac58b3b995951664 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2003-08-12  Alexey Shchepin  <alexey@sevcom.net>
+
+       * src/mod_irc/mod_irc_connection.erl: Added handling for
+       jabber:iq:version and jabber:iq:time requests, participant address
+       now added to presence status
+
 2003-08-03  Alexey Shchepin  <alexey@sevcom.net>
 
        * src/mod_privacy.erl: Privacy rules support

diff --git a/src/mod_irc/mod_irc_connection.erl b/src/mod_irc/mod_irc_connection.erl
index 683447fc57f838f41f63abb5967f22f92eb27185..03c2a82014a3d1c69b5e3d8af77cd6ae372c1178 100644 (file)
--- a/src/mod_irc/mod_irc_connection.erl
+++ b/src/mod_irc/mod_irc_connection.erl
@@ -298,6 +298,20 @@ handle_info({route_chan, Channel, Resource,
                     From,
                     To,
                     ID, XMLNS, Type, SubEl);
+       {iq, ID, get, ?NS_VERSION = XMLNS, SubEl} ->
+           Res = io_lib:format("PRIVMSG ~s :\001VERSION\001\r\n",
+                               [Resource]),
+           ?SEND(Res),
+           Err = jlib:make_error_reply(
+                   El, ?ERR_FEATURE_NOT_IMPLEMENTED),
+           ejabberd_router:route(To, From, Err);
+       {iq, ID, get, ?NS_TIME = XMLNS, SubEl} ->
+           Res = io_lib:format("PRIVMSG ~s :\001TIME\001\r\n",
+                               [Resource]),
+           ?SEND(Res),
+           Err = jlib:make_error_reply(
+                   El, ?ERR_FEATURE_NOT_IMPLEMENTED),
+           ejabberd_router:route(To, From, Err);
        _ ->
            Err = jlib:make_error_reply(
                    El, ?ERR_FEATURE_NOT_IMPLEMENTED),
@@ -826,7 +840,9 @@ process_join(StateData, Channel, From, String) ->
                             [{xmlelement, "item",
                               [{"affiliation", "member"},
                                {"role", "participant"}],
-                              []}]}]}),
+                              []}]},
+                           {xmlelement, "status", [],
+                            [{xmlcdata, FromIdent}]}]}),
     {ok, Msg, _} = regexp:sub(String, ".*JOIN[^:]*:", ""),    
     ejabberd_router:route({lists:concat([Chan, "%", StateData#state.server]),
                           StateData#state.myname, FromUser},