annotate mcabber/mcabber/xmpp_iqrequest.c @ 2223:965e0282c128

Backed out changeset fa516ef22145 Turns out that in this hash the value pointer is the same as the key pointer, so there's no need to free both the key and the value.
author Mikael Berthe <mikael@lilotux.net>
date Fri, 06 Nov 2015 22:31:40 +0100
parents fc7a758ebbde
children f5402d705f67
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1599
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
1 /*
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
2 * xmpp_iqrequest.c -- Jabber IQ request handling
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
3 *
1729
e6e89b1d7831 Minor style and header updates
Mikael Berthe <mikael@lilotux.net>
parents: 1719
diff changeset
4 * Copyright (C) 2008-2010 Frank Zschockelt <mcabber@freakysoft.de>
2134
fc7a758ebbde Remove deprecated options comments, update headers
Mikael Berthe <mikael@lilotux.net>
parents: 2111
diff changeset
5 * Copyright (C) 2005-2014 Mikael Berthe <mikael@lilotux.net>
1599
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
6 *
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
7 * This program is free software; you can redistribute it and/or modify
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
8 * it under the terms of the GNU General Public License as published by
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
9 * the Free Software Foundation; either version 2 of the License, or (at
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
10 * your option) any later version.
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
11 *
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
12 * This program is distributed in the hope that it will be useful, but
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
13 * WITHOUT ANY WARRANTY; without even the implied warranty of
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
15 * General Public License for more details.
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
16 *
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
17 * You should have received a copy of the GNU General Public License
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
18 * along with this program; if not, write to the Free Software
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
20 * USA
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
21 */
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
22
1604
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
23 #include <string.h>
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
24 #include <stdlib.h>
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
25 #include <sys/time.h>
1604
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
26
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
27 #include "xmpp_helper.h"
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
28 #include "xmpp_iq.h"
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
29 #include "screen.h"
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
30 #include "utils.h"
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
31 #include "settings.h"
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
32 #include "hooks.h"
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
33 #include "hbuf.h"
2104
c7e9950fa741 Added option to enable carbons (set carbons = 1 in mcabberrc)
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2103
diff changeset
34 #include "carbons.h"
1604
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
35
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
36 extern LmMessageNode *bookmarks;
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
37 extern LmMessageNode *rosternotes;
351427ef0b4b Remove #include's of C files
Mikael Berthe <mikael@lilotux.net>
parents: 1599
diff changeset
38
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
39 static LmHandlerResult cb_roster(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
40 LmMessage *m, gpointer user_data);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
41 static LmHandlerResult cb_version(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
42 LmMessage *m, gpointer user_data);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
43 static LmHandlerResult cb_time(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
44 LmMessage *m, gpointer user_data);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
45 static LmHandlerResult cb_last(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
46 LmMessage *m, gpointer user_data);
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
47 static LmHandlerResult cb_ping(LmMessageHandler *h, LmConnection *c,
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
48 LmMessage *m, gpointer user_data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
49 static LmHandlerResult cb_vcard(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
50 LmMessage *m, gpointer user_data);
2103
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
51 static LmHandlerResult cb_disco_info(LmMessageHandler *h, LmConnection *c,
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
52 LmMessage *m, gpointer user_data);
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
53
29
86837ff0554c [/trunk] Changeset 45 by mikael
mikael
parents:
diff changeset
54
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
55 static struct IqRequestHandlers
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
56 {
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
57 const gchar *xmlns;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
58 const gchar *querytag;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
59 LmHandleMessageFunction handler;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
60 } iq_request_handlers[] = {
2017
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
61 {NS_ROSTER, "query", &cb_roster},
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
62 {NS_VERSION, "query", &cb_version},
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
63 {NS_XMPP_TIME,"time", &cb_time},
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
64 {NS_LAST, "query", &cb_last},
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
65 {NS_PING, "ping", &cb_ping},
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
66 {NS_VCARD, "vCard", &cb_vcard},
2103
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
67 {NS_DISCO_INFO, "query", &cb_disco_info},
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
68 {NULL, NULL, NULL}
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
69 };
1254
401639413340 More jabber:iq:last support... (misc)
Mikael Berthe <mikael@lilotux.net>
parents: 1224
diff changeset
70
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
71 // Enum for vCard attributes
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
72 enum vcard_attr {
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
73 vcard_home = 1<<0,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
74 vcard_work = 1<<1,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
75 vcard_postal = 1<<2,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
76 vcard_voice = 1<<3,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
77 vcard_fax = 1<<4,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
78 vcard_cell = 1<<5,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
79 vcard_inet = 1<<6,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
80 vcard_pref = 1<<7,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
81 };
683
c5e0d8c3f00c Introduce new IQ system
Mikael Berthe <mikael@lilotux.net>
parents: 619
diff changeset
82
2103
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
83 static LmHandlerResult cb_disco_info(LmMessageHandler *h, LmConnection *c,
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
84 LmMessage *m, gpointer user_data)
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
85 {
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
86 LmMessageNode *ansqry;
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
87 LmMessageNode *feature;
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
88
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
89 ansqry = lm_message_node_get_child(m->node, "query");
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
90
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
91 feature = lm_message_node_get_child(ansqry, "feature");
2111
9023a6f2bf6c Misc. style updates
Mikael Berthe <mikael@lilotux.net>
parents: 2104
diff changeset
92 for (; feature; feature = feature->next) {
2103
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
93 const char *v = lm_message_node_get_attribute(feature, "var");
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
94
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
95 if (!g_strcmp0(v, NS_CARBONS_2)) {
2104
c7e9950fa741 Added option to enable carbons (set carbons = 1 in mcabberrc)
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2103
diff changeset
96 carbons_available();
2103
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
97 }
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
98 }
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
99
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
100 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
101 }
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
102
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
103 static LmHandlerResult cb_ping(LmMessageHandler *h, LmConnection *c,
1706
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
104 LmMessage *m, gpointer user_data)
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
105 {
1706
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
106 struct timeval *timestamp = (struct timeval *)user_data;
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
107 struct timeval now;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
108 time_t dsec;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
109 suseconds_t dusec;
1706
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
110 const gchar *fjid;
1707
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
111 gchar *bjid, *mesg = NULL;
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
112
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
113 gettimeofday(&now, NULL);
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
114 dsec = now.tv_sec - timestamp->tv_sec;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
115 if (now.tv_usec < timestamp->tv_usec) {
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
116 dusec = now.tv_usec + 1000000 - timestamp->tv_usec;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
117 --dsec;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
118 } else
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
119 dusec = now.tv_usec - timestamp->tv_usec;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
120
1706
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
121 // Check IQ result sender
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
122 fjid = lm_message_get_from(m);
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
123 if (!fjid)
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
124 fjid = lm_connection_get_jid(lconnection); // No from means our JID...
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
125 if (!fjid) {
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
126 scr_LogPrint(LPRINT_LOGNORM, "Invalid IQ:version result (no sender name).");
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
127 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
128 }
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
129
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
130 bjid = jidtodisp(fjid);
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
131
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
132 switch (lm_message_get_sub_type(m)) {
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
133 case LM_MESSAGE_SUB_TYPE_RESULT:
1707
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
134 mesg = g_strdup_printf("Pong from <%s>: %d second%s %d ms.", fjid,
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
135 (int)dsec, dsec > 1 ? "s" : "",
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
136 (int)(dusec/1000L));
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
137 break;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
138
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
139 case LM_MESSAGE_SUB_TYPE_ERROR:
1800
d2747442918a When displaying a server error, show the sender JID
Mikael Berthe <mikael@lilotux.net>
parents: 1729
diff changeset
140 display_server_error(lm_message_node_get_child(m->node, "error"),
d2747442918a When displaying a server error, show the sender JID
Mikael Berthe <mikael@lilotux.net>
parents: 1729
diff changeset
141 fjid);
1707
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
142 mesg = g_strdup_printf("Ping to <%s> failed. "
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
143 "Response time: %d second%s %d ms.",
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
144 fjid, (int)dsec, dsec > 1 ? "s" : "",
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
145 (int)(dusec/1000L));
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
146 break;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
147
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
148 default:
1706
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
149 g_free(bjid);
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
150 return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
151 break;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
152 }
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
153
1707
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
154 if (mesg)
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
155 scr_WriteIncomingMessage(bjid, mesg, 0, HBB_PREFIX_INFO, 0);
184de76b5b18 Refactor some code
Mikael Berthe <mikael@lilotux.net>
parents: 1706
diff changeset
156 g_free(mesg);
1706
a5263e93c5d7 Fix pinging oneself
Mikael Berthe <mikael@lilotux.net>
parents: 1705
diff changeset
157 g_free(bjid);
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
158 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
159 }
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
160
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
161 // Warning!! xmlns has to be a namespace from iq_request_handlers[].xmlns
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
162 void xmpp_iq_request(const char *fulljid, const char *xmlns)
1215
80c095886fb5 Entity Capabilities support (XEP-0115)
Mikael Berthe <mikael@lilotux.net>
parents: 1213
diff changeset
163 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
164 LmMessage *iq;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
165 LmMessageNode *query;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
166 LmMessageHandler *handler;
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
167 gpointer data = NULL;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
168 GDestroyNotify notifier = NULL;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
169 GError *error = NULL;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
170 int i;
683
c5e0d8c3f00c Introduce new IQ system
Mikael Berthe <mikael@lilotux.net>
parents: 619
diff changeset
171
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
172 iq = lm_message_new_with_sub_type(fulljid, LM_MESSAGE_TYPE_IQ,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
173 LM_MESSAGE_SUB_TYPE_GET);
2017
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
174 for (i = 0; iq_request_handlers[i].xmlns &&
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
175 strcmp(iq_request_handlers[i].xmlns, xmlns) != 0 ; ++i)
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
176 ;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
177 query = lm_message_node_add_child(iq->node,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
178 iq_request_handlers[i].querytag,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
179 NULL);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
180 lm_message_node_set_attribute(query, "xmlns", xmlns);
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
181
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
182 if (!g_strcmp0(xmlns, NS_PING)) { // Create handler for ping queries
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
183 struct timeval *now = g_new(struct timeval, 1);
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
184 gettimeofday(now, NULL);
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
185 data = (gpointer)now;
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
186 notifier = g_free;
2103
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
187 } else if (!g_strcmp0(xmlns, NS_DISCO_INFO)) {
2111
9023a6f2bf6c Misc. style updates
Mikael Berthe <mikael@lilotux.net>
parents: 2104
diff changeset
188 gchar *servername = get_servername(settings_opt_get("jid"),
9023a6f2bf6c Misc. style updates
Mikael Berthe <mikael@lilotux.net>
parents: 2104
diff changeset
189 settings_opt_get("server"));
2103
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
190 lm_message_node_set_attribute(iq->node, "to", servername);
1210a22726d3 We can determine if the server supports carbons. By means of XEP-0030: Service
Roeland Jago Douma <roeland@famdouma.nl>
parents: 2017
diff changeset
191 g_free(servername);
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
192 }
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
193
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
194 handler = lm_message_handler_new(iq_request_handlers[i].handler,
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
195 data, notifier);
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
196
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
197 lm_connection_send_with_reply(lconnection, iq, handler, &error);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
198 lm_message_handler_unref(handler);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
199 lm_message_unref(iq);
1705
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
200
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
201 if (error) {
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
202 scr_LogPrint(LPRINT_LOGNORM, "Error sending IQ request: %s.", error->message);
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
203 g_error_free(error);
ac881b5f9248 Add /request ping (XEP-0199), by merging isbear's module
Mikael Berthe <mikael@lilotux.net>
parents: 1703
diff changeset
204 }
577
5c6d364130ee Move IQ Jabber stuff to a separate file
Mikael Berthe <mikael@lilotux.net>
parents: 576
diff changeset
205 }
29
86837ff0554c [/trunk] Changeset 45 by mikael
mikael
parents:
diff changeset
206
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
207 // This callback is reached when mcabber receives the first roster update
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
208 // after the connection.
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
209 static LmHandlerResult cb_roster(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
210 LmMessage *m, gpointer user_data)
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
211 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
212 LmMessageNode *x;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
213 const char *ns;
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
214
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
215 // Only execute the hook if the roster has been successfully retrieved
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
216 if (lm_message_get_sub_type(m) != LM_MESSAGE_SUB_TYPE_RESULT)
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
217 return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
218
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
219 x = lm_message_node_find_child(m->node, "query");
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
220 if (!x)
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
221 return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
1365
c7e709719c43 Small code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 1361
diff changeset
222
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
223 ns = lm_message_node_get_attribute(x, "xmlns");
1365
c7e709719c43 Small code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 1361
diff changeset
224 if (ns && !strcmp(ns, NS_ROSTER))
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
225 handle_iq_roster(NULL, c, m, user_data);
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
226
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
227 // Post-login stuff
1683
b09f82f61745 Split HOOK_INTERNAL
Myhailo Danylenko <isbear@ukrpost.net>
parents: 1668
diff changeset
228 hk_postconnect();
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
229
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
230 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
231 }
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
232
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
233 static LmHandlerResult cb_version(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
234 LmMessage *m, gpointer user_data)
1353
7caedca15e50 Add post-connect internal hook
Mikael Berthe <mikael@lilotux.net>
parents: 1348
diff changeset
235 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
236 LmMessageNode *ansqry;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
237 const char *p, *bjid;
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
238 char *buf, *tmp;
690
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
239
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
240 // Check IQ result sender
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
241 bjid = lm_message_get_from(m);
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
242 if (!bjid)
1699
527c965b45c5 Add small comment in previous change
Mikael Berthe <mikael@lilotux.net>
parents: 1698
diff changeset
243 bjid = lm_connection_get_jid(lconnection); // No from means our JID...
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
244 if (!bjid) {
690
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
245 scr_LogPrint(LPRINT_LOGNORM, "Invalid IQ:version result (no sender name).");
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
246 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
690
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
247 }
704
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
248
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
249 // Check for error message
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
250 if (lm_message_get_sub_type(m) == LM_MESSAGE_SUB_TYPE_ERROR) {
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
251 scr_LogPrint(LPRINT_LOGNORM, "Received error IQ message (%s)", bjid);
1800
d2747442918a When displaying a server error, show the sender JID
Mikael Berthe <mikael@lilotux.net>
parents: 1729
diff changeset
252 display_server_error(lm_message_node_get_child(m->node, "error"), NULL);
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
253 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
254 }
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
255
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
256 // Check message contents
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
257 ansqry = lm_message_node_get_child(m->node, "query");
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
258 if (!ansqry) {
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
259 scr_LogPrint(LPRINT_LOGNORM, "Invalid IQ:version result from <%s>!", bjid);
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
260 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
261 }
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
262
782
19121d9f4aa2 Nicer message when receiving IQ result packet
Mikael Berthe <mikael@lilotux.net>
parents: 776
diff changeset
263 buf = g_strdup_printf("Received IQ:version result from <%s>", bjid);
704
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
264 scr_LogPrint(LPRINT_LOGNORM, "%s", buf);
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
265
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
266 // bjid should now really be the "bare JID", let's strip the resource
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
267 tmp = strchr(bjid, JID_RESOURCE_SEPARATOR);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
268 if (tmp) *tmp = '\0';
704
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
269
1290
e42f48103609 Drawing the MUC nicks by a different color
Michal 'vorner' Vaner <vorner@ucw.cz>
parents: 1283
diff changeset
270 scr_WriteIncomingMessage(bjid, buf, 0, HBB_PREFIX_INFO, 0);
704
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
271 g_free(buf);
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
272
690
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
273 // Get result data...
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
274 p = lm_message_node_get_child_value(ansqry, "name");
1899
decf94827efe More lm_message_node_get_child_value() return value checks
Mikael Berthe <mikael@lilotux.net>
parents: 1811
diff changeset
275 if (p && *p) {
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
276 buf = g_strdup_printf("Name: %s", p);
1333
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
277 scr_WriteIncomingMessage(bjid, buf,
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
278 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
279 g_free(buf);
690
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
280 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
281 p = lm_message_node_get_child_value(ansqry, "version");
1899
decf94827efe More lm_message_node_get_child_value() return value checks
Mikael Berthe <mikael@lilotux.net>
parents: 1811
diff changeset
282 if (p && *p) {
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
283 buf = g_strdup_printf("Version: %s", p);
1333
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
284 scr_WriteIncomingMessage(bjid, buf,
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
285 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
286 g_free(buf);
690
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
287 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
288 p = lm_message_node_get_child_value(ansqry, "os");
1899
decf94827efe More lm_message_node_get_child_value() return value checks
Mikael Berthe <mikael@lilotux.net>
parents: 1811
diff changeset
289 if (p && *p) {
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
290 buf = g_strdup_printf("OS: %s", p);
1333
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
291 scr_WriteIncomingMessage(bjid, buf,
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
292 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
293 g_free(buf);
690
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
294 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
295 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
690
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
296 }
3e965a1186c7 Implement IQ:version requests
Mikael Berthe <mikael@lilotux.net>
parents: 689
diff changeset
297
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
298 static LmHandlerResult cb_time(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
299 LmMessage *m, gpointer user_data)
691
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
300 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
301 LmMessageNode *ansqry;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
302 const char *p, *bjid;
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
303 char *buf, *tmp;
691
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
304
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
305 // Check IQ result sender
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
306 bjid = lm_message_get_from(m);
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
307 if (!bjid)
1699
527c965b45c5 Add small comment in previous change
Mikael Berthe <mikael@lilotux.net>
parents: 1698
diff changeset
308 bjid = lm_connection_get_jid(lconnection); // No from means our JID...
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
309 if (!bjid) {
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
310 scr_LogPrint(LPRINT_LOGNORM, "Invalid IQ:time result (no sender name).");
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
311 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
312 }
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
313
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
314 // Check for error message
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
315 if (lm_message_get_sub_type(m) == LM_MESSAGE_SUB_TYPE_ERROR) {
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
316 scr_LogPrint(LPRINT_LOGNORM, "Received error IQ message (%s)", bjid);
1800
d2747442918a When displaying a server error, show the sender JID
Mikael Berthe <mikael@lilotux.net>
parents: 1729
diff changeset
317 display_server_error(lm_message_node_get_child(m->node, "error"), NULL);
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
318 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
319 }
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
320
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
321 // Check message contents
2017
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
322 ansqry = lm_message_node_get_child(m->node, "time");
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
323 if (!ansqry) {
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
324 scr_LogPrint(LPRINT_LOGNORM, "Invalid IQ:time result from <%s>!", bjid);
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
325 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
691
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
326 }
704
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
327
782
19121d9f4aa2 Nicer message when receiving IQ result packet
Mikael Berthe <mikael@lilotux.net>
parents: 776
diff changeset
328 buf = g_strdup_printf("Received IQ:time result from <%s>", bjid);
704
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
329 scr_LogPrint(LPRINT_LOGNORM, "%s", buf);
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
330
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
331 // bjid should now really be the "bare JID", let's strip the resource
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
332 tmp = strchr(bjid, JID_RESOURCE_SEPARATOR);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
333 if (tmp) *tmp = '\0';
704
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
334
1290
e42f48103609 Drawing the MUC nicks by a different color
Michal 'vorner' Vaner <vorner@ucw.cz>
parents: 1283
diff changeset
335 scr_WriteIncomingMessage(bjid, buf, 0, HBB_PREFIX_INFO, 0);
704
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
336 g_free(buf);
4118a66f2c02 Display IQ results (time, version) in the chat window
Mikael Berthe <mikael@lilotux.net>
parents: 703
diff changeset
337
691
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
338 // Get result data...
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
339 p = lm_message_node_get_child_value(ansqry, "utc");
1899
decf94827efe More lm_message_node_get_child_value() return value checks
Mikael Berthe <mikael@lilotux.net>
parents: 1811
diff changeset
340 if (p && *p) {
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
341 buf = g_strdup_printf("UTC: %s", p);
1333
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
342 scr_WriteIncomingMessage(bjid, buf,
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
343 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
344 g_free(buf);
691
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
345 }
2017
87049d55e34f Fix /request time
Mikael Berthe <mikael@lilotux.net>
parents: 2004
diff changeset
346 p = lm_message_node_get_child_value(ansqry, "tzo");
1899
decf94827efe More lm_message_node_get_child_value() return value checks
Mikael Berthe <mikael@lilotux.net>
parents: 1811
diff changeset
347 if (p && *p) {
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
348 buf = g_strdup_printf("TZ: %s", p);
1333
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
349 scr_WriteIncomingMessage(bjid, buf,
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
350 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
351 g_free(buf);
691
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
352 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
353 p = lm_message_node_get_child_value(ansqry, "display");
1899
decf94827efe More lm_message_node_get_child_value() return value checks
Mikael Berthe <mikael@lilotux.net>
parents: 1811
diff changeset
354 if (p && *p) {
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
355 buf = g_strdup_printf("Time: %s", p);
1333
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
356 scr_WriteIncomingMessage(bjid, buf,
e30a9d907105 Minor coding style adjustments
Mikael Berthe <mikael@lilotux.net>
parents: 1310
diff changeset
357 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1030
923cf5a92b44 [BP-dd9e7eb5f8a8] Remove old UTF-8 conversions
Mikael Berthe <mikael@lilotux.net>
parents: 965
diff changeset
358 g_free(buf);
691
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
359 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
360 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
691
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
361 }
3c0a0a993de8 Implement IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 690
diff changeset
362
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
363 static LmHandlerResult cb_last(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
364 LmMessage *m, gpointer user_data)
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
365 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
366 LmMessageNode *ansqry;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
367 const char *p, *bjid;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
368 char *buf, *tmp;
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
369
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
370 // Check IQ result sender
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
371 bjid = lm_message_get_from(m);
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
372 if (!bjid)
1699
527c965b45c5 Add small comment in previous change
Mikael Berthe <mikael@lilotux.net>
parents: 1698
diff changeset
373 bjid = lm_connection_get_jid(lconnection); // No from means our JID...
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
374 if (!bjid) {
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
375 scr_LogPrint(LPRINT_LOGNORM, "Invalid IQ:last result (no sender name).");
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
376 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
377 }
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
378
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
379 // Check for error message
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
380 if (lm_message_get_sub_type(m) == LM_MESSAGE_SUB_TYPE_ERROR) {
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
381 scr_LogPrint(LPRINT_LOGNORM, "Received error IQ message (%s)", bjid);
1800
d2747442918a When displaying a server error, show the sender JID
Mikael Berthe <mikael@lilotux.net>
parents: 1729
diff changeset
382 display_server_error(lm_message_node_get_child(m->node, "error"), NULL);
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
383 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
384 }
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
385
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
386 // Check message contents
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
387 ansqry = lm_message_node_get_child(m->node, "query");
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
388 if (!ansqry) {
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
389 scr_LogPrint(LPRINT_LOGNORM, "Invalid IQ:version result from <%s>!", bjid);
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
390 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
391 }
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
392
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
393 buf = g_strdup_printf("Received IQ:last result from <%s>", bjid);
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
394 scr_LogPrint(LPRINT_LOGNORM, "%s", buf);
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
395
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
396 // bjid should now really be the "bare JID", let's strip the resource
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
397 tmp = strchr(bjid, JID_RESOURCE_SEPARATOR);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
398 if (tmp) *tmp = '\0';
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
399
1290
e42f48103609 Drawing the MUC nicks by a different color
Michal 'vorner' Vaner <vorner@ucw.cz>
parents: 1283
diff changeset
400 scr_WriteIncomingMessage(bjid, buf, 0, HBB_PREFIX_INFO, 0);
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
401 g_free(buf);
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
402
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
403 // Get result data...
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
404 p = lm_message_node_get_attribute(ansqry, "seconds");
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
405 if (p) {
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
406 long int s;
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
407 GString *sbuf;
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
408 sbuf = g_string_new("Idle time: ");
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
409 s = atol(p);
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
410 // Days
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
411 if (s > 86400L) {
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
412 g_string_append_printf(sbuf, "%ldd ", s/86400L);
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
413 s %= 86400L;
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
414 }
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
415 // hh:mm:ss
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
416 g_string_append_printf(sbuf, "%02ld:", s/3600L);
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
417 s %= 3600L;
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
418 g_string_append_printf(sbuf, "%02ld:%02ld", s/60L, s%60L);
1268
dbc907b2d92f Add configurable colors for info and incoming messages (Michal 'vorner' Vaner)
Mikael Berthe <mikael@lilotux.net>
parents: 1261
diff changeset
419 scr_WriteIncomingMessage(bjid, sbuf->str,
1290
e42f48103609 Drawing the MUC nicks by a different color
Michal 'vorner' Vaner <vorner@ucw.cz>
parents: 1283
diff changeset
420 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
421 g_string_free(sbuf, TRUE);
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
422 } else {
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
423 scr_WriteIncomingMessage(bjid, "No idle time reported.",
1290
e42f48103609 Drawing the MUC nicks by a different color
Michal 'vorner' Vaner <vorner@ucw.cz>
parents: 1283
diff changeset
424 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
425 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
426 p = lm_message_node_get_value(ansqry);
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
427 if (p) {
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
428 buf = g_strdup_printf("Status message: %s", p);
1290
e42f48103609 Drawing the MUC nicks by a different color
Michal 'vorner' Vaner <vorner@ucw.cz>
parents: 1283
diff changeset
429 scr_WriteIncomingMessage(bjid, buf, 0, HBB_PREFIX_INFO, 0);
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
430 g_free(buf);
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
431 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
432 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1015
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
433 }
579299b1c9b2 Add /request last
Mikael Berthe <mikael@lilotux.net>
parents: 1014
diff changeset
434
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
435 static void display_vcard_item(const char *bjid, const char *label,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
436 enum vcard_attr vcard_attrib, const char *text)
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
437 {
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
438 char *buf;
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
439
1899
decf94827efe More lm_message_node_get_child_value() return value checks
Mikael Berthe <mikael@lilotux.net>
parents: 1811
diff changeset
440 if (!text || !*text || !bjid || !label)
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
441 return;
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
442
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
443 buf = g_strdup_printf("%s: %s%s%s%s%s%s%s%s%s%s", label,
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
444 (vcard_attrib & vcard_home ? "[home]" : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
445 (vcard_attrib & vcard_work ? "[work]" : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
446 (vcard_attrib & vcard_postal ? "[postal]" : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
447 (vcard_attrib & vcard_voice ? "[voice]" : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
448 (vcard_attrib & vcard_fax ? "[fax]" : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
449 (vcard_attrib & vcard_cell ? "[cell]" : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
450 (vcard_attrib & vcard_inet ? "[inet]" : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
451 (vcard_attrib & vcard_pref ? "[pref]" : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
452 (vcard_attrib ? " " : ""),
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
453 text);
1290
e42f48103609 Drawing the MUC nicks by a different color
Michal 'vorner' Vaner <vorner@ucw.cz>
parents: 1283
diff changeset
454 scr_WriteIncomingMessage(bjid, buf, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0);
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
455 g_free(buf);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
456 }
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
457
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
458 static void handle_vcard_node(const char *barejid, LmMessageNode *vcardnode)
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
459 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
460 LmMessageNode *x;
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
461 const char *p;
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
462
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
463 for (x = vcardnode->children ; x; x = x->next) {
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
464 const char *data;
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
465 enum vcard_attr vcard_attrib = 0;
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
466
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
467 p = x->name;
1719
f3c5e1175b22 Remove buggy check in handle_vcard_node() (Reported by Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1707
diff changeset
468 if (!p)
f3c5e1175b22 Remove buggy check in handle_vcard_node() (Reported by Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1707
diff changeset
469 continue;
f3c5e1175b22 Remove buggy check in handle_vcard_node() (Reported by Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1707
diff changeset
470
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
471 data = lm_message_node_get_value(x);
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
472
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
473 if (!strcmp(p, "FN"))
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
474 display_vcard_item(barejid, "Name", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
475 else if (!strcmp(p, "NICKNAME"))
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
476 display_vcard_item(barejid, "Nickname", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
477 else if (!strcmp(p, "URL"))
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
478 display_vcard_item(barejid, "URL", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
479 else if (!strcmp(p, "BDAY"))
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
480 display_vcard_item(barejid, "Birthday", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
481 else if (!strcmp(p, "TZ"))
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
482 display_vcard_item(barejid, "Timezone", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
483 else if (!strcmp(p, "TITLE"))
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
484 display_vcard_item(barejid, "Title", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
485 else if (!strcmp(p, "ROLE"))
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
486 display_vcard_item(barejid, "Role", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
487 else if (!strcmp(p, "DESC"))
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
488 display_vcard_item(barejid, "Comment", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
489 else if (!strcmp(p, "N")) {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
490 data = lm_message_node_get_child_value(x, "FAMILY");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
491 display_vcard_item(barejid, "Family Name", vcard_attrib, data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
492 data = lm_message_node_get_child_value(x, "GIVEN");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
493 display_vcard_item(barejid, "Given Name", vcard_attrib, data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
494 data = lm_message_node_get_child_value(x, "MIDDLE");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
495 display_vcard_item(barejid, "Middle Name", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
496 } else if (!strcmp(p, "ORG")) {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
497 data = lm_message_node_get_child_value(x, "ORGNAME");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
498 display_vcard_item(barejid, "Organisation name", vcard_attrib, data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
499 data = lm_message_node_get_child_value(x, "ORGUNIT");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
500 display_vcard_item(barejid, "Organisation unit", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
501 } else {
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
502 // The HOME, WORK and PREF attributes are common to the remaining fields
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
503 // (ADR, TEL & EMAIL)
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
504 if (lm_message_node_get_child(x, "HOME"))
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
505 vcard_attrib |= vcard_home;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
506 if (lm_message_node_get_child(x, "WORK"))
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
507 vcard_attrib |= vcard_work;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
508 if (lm_message_node_get_child(x, "PREF"))
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
509 vcard_attrib |= vcard_pref;
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
510 if (!strcmp(p, "ADR")) { // Address
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
511 if (lm_message_node_get_child(x, "POSTAL"))
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
512 vcard_attrib |= vcard_postal;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
513 data = lm_message_node_get_child_value(x, "EXTADD");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
514 display_vcard_item(barejid, "Addr (ext)", vcard_attrib, data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
515 data = lm_message_node_get_child_value(x, "STREET");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
516 display_vcard_item(barejid, "Street", vcard_attrib, data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
517 data = lm_message_node_get_child_value(x, "LOCALITY");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
518 display_vcard_item(barejid, "Locality", vcard_attrib, data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
519 data = lm_message_node_get_child_value(x, "REGION");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
520 display_vcard_item(barejid, "Region", vcard_attrib, data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
521 data = lm_message_node_get_child_value(x, "PCODE");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
522 display_vcard_item(barejid, "Postal code", vcard_attrib, data);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
523 data = lm_message_node_get_child_value(x, "CTRY");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
524 display_vcard_item(barejid, "Country", vcard_attrib, data);
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
525 } else if (!strcmp(p, "TEL")) { // Telephone
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
526 data = lm_message_node_get_child_value(x, "NUMBER");
1005
e5c10cc29660 Improve vcard support
Mikael Berthe <mikael@lilotux.net>
parents: 1004
diff changeset
527 if (data) {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
528 if (lm_message_node_get_child(x, "VOICE"))
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
529 vcard_attrib |= vcard_voice;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
530 if (lm_message_node_get_child(x, "FAX"))
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
531 vcard_attrib |= vcard_fax;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
532 if (lm_message_node_get_child(x, "CELL"))
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
533 vcard_attrib |= vcard_cell;
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
534 display_vcard_item(barejid, "Phone", vcard_attrib, data);
1005
e5c10cc29660 Improve vcard support
Mikael Berthe <mikael@lilotux.net>
parents: 1004
diff changeset
535 }
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
536 } else if (!strcmp(p, "EMAIL")) { // Email
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
537 if (lm_message_node_get_child(x, "INTERNET"))
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
538 vcard_attrib |= vcard_inet;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
539 data = lm_message_node_get_child_value(x, "USERID");
1006
f61131cd86a0 Clean up vcard code
Mikael Berthe <mikael@lilotux.net>
parents: 1005
diff changeset
540 display_vcard_item(barejid, "Email", vcard_attrib, data);
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
541 }
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
542 }
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
543 }
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
544 }
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
545
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
546 static LmHandlerResult cb_vcard(LmMessageHandler *h, LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
547 LmMessage *m, gpointer user_data)
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
548 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
549 LmMessageNode *ansqry;
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
550 const char *bjid;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
551 char *buf, *tmp;
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
552
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
553 // Check IQ result sender
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
554 bjid = lm_message_get_from(m);
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
555 if (!bjid)
1699
527c965b45c5 Add small comment in previous change
Mikael Berthe <mikael@lilotux.net>
parents: 1698
diff changeset
556 bjid = lm_connection_get_jid(lconnection); // No from means our JID...
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
557 if (!bjid) {
1703
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
558 scr_LogPrint(LPRINT_LOGNORM, "Invalid IQ:vCard result (no sender name).");
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
559 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
560 }
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
561
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
562 // Check for error message
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
563 if (lm_message_get_sub_type(m) == LM_MESSAGE_SUB_TYPE_ERROR) {
65ba89949252 Improve error checks in received IQ responses
Mikael Berthe <mikael@lilotux.net>
parents: 1699
diff changeset
564 scr_LogPrint(LPRINT_LOGNORM, "Received error IQ message (%s)", bjid);
1800
d2747442918a When displaying a server error, show the sender JID
Mikael Berthe <mikael@lilotux.net>
parents: 1729
diff changeset
565 display_server_error(lm_message_node_get_child(m->node, "error"), NULL);
1698
e67bdd863638 Handle IQ responses with no "from"
Mikael Berthe <mikael@lilotux.net>
parents: 1683
diff changeset
566 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
567 }
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
568
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
569 buf = g_strdup_printf("Received IQ:vCard result from <%s>", bjid);
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
570 scr_LogPrint(LPRINT_LOGNORM, "%s", buf);
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
571
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
572 // Get the vCard node
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
573 ansqry = lm_message_node_get_child(m->node, "vCard");
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
574 if (!ansqry) {
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
575 scr_LogPrint(LPRINT_LOGNORM, "Empty IQ:vCard result!");
1340
2031f4b2cced Fix a small memory leak
Mikael Berthe <mikael@lilotux.net>
parents: 1334
diff changeset
576 g_free(buf);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
577 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
578 }
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
579
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
580 // bjid should really be the "bare JID", let's strip the resource
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
581 tmp = strchr(bjid, JID_RESOURCE_SEPARATOR);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
582 if (tmp) *tmp = '\0';
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
583
1290
e42f48103609 Drawing the MUC nicks by a different color
Michal 'vorner' Vaner <vorner@ucw.cz>
parents: 1283
diff changeset
584 scr_WriteIncomingMessage(bjid, buf, 0, HBB_PREFIX_INFO, 0);
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
585 g_free(buf);
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
586
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
587 // Get result data...
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
588 handle_vcard_node(bjid, ansqry);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
589 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1003
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
590 }
c8b1a52b2fd6 Initial VCard retrieval support
Mikael Berthe <mikael@lilotux.net>
parents: 1002
diff changeset
591
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
592 static void storage_bookmarks_parse_conference(LmMessageNode *node)
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
593 {
1058
c0d44a9a99bc Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 1037
diff changeset
594 const char *fjid, *name, *autojoin;
1979
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
595 const char *pstatus, *awhois, *fjoins, *group;
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
596 char *bjid;
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
597 GSList *room_elt;
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
598
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
599 fjid = lm_message_node_get_attribute(node, "jid");
1058
c0d44a9a99bc Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 1037
diff changeset
600 if (!fjid)
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
601 return;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
602 name = lm_message_node_get_attribute(node, "name");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
603 autojoin = lm_message_node_get_attribute(node, "autojoin");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
604 awhois = lm_message_node_get_attribute(node, "autowhois");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
605 pstatus = lm_message_node_get_child_value(node, "print_status");
1979
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
606 fjoins = lm_message_node_get_child_value(node, "flag_joins");
1976
e6beab22099b Do not add items to roster with commands /move and /rename (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1899
diff changeset
607 group = lm_message_node_get_child_value(node, "group");
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
608
1058
c0d44a9a99bc Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 1037
diff changeset
609 bjid = jidtodisp(fjid); // Bare jid
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
610
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
611 // Make sure this is a room (it can be a conversion user->room)
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
612 room_elt = roster_find(bjid, jidsearch, 0);
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
613 if (!room_elt) {
1976
e6beab22099b Do not add items to roster with commands /move and /rename (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1899
diff changeset
614 room_elt = roster_add_user(bjid, name, group, ROSTER_TYPE_ROOM,
1355
9716cf8a0726 Add on_server flag
Mikael Berthe <mikael@lilotux.net>
parents: 1353
diff changeset
615 sub_none, -1);
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
616 } else {
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
617 buddy_settype(room_elt->data, ROSTER_TYPE_ROOM);
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
618 /*
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
619 // If the name is available, should we use it?
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
620 // I don't think so, it would be confusing because this item is already
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
621 // in the roster.
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
622 if (name)
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
623 buddy_setname(room_elt->data, name);
1976
e6beab22099b Do not add items to roster with commands /move and /rename (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1899
diff changeset
624
e6beab22099b Do not add items to roster with commands /move and /rename (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1899
diff changeset
625 // The same question for roster group.
e6beab22099b Do not add items to roster with commands /move and /rename (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1899
diff changeset
626 if (group)
e6beab22099b Do not add items to roster with commands /move and /rename (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1899
diff changeset
627 buddy_setgroup(room_elt->data, group);
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
628 */
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
629 }
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
630
1379
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
631 // Set the print_status and auto_whois values
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
632 if (pstatus) {
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
633 enum room_printstatus i;
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
634 for (i = status_none; i <= status_all; i++)
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
635 if (!strcasecmp(pstatus, strprintstatus[i]))
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
636 break;
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
637 if (i <= status_all)
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
638 buddy_setprintstatus(room_elt->data, i);
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
639 }
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
640 if (awhois) {
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
641 enum room_autowhois i = autowhois_default;
1976
e6beab22099b Do not add items to roster with commands /move and /rename (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1899
diff changeset
642 if (!strcmp(awhois, "1") || !(strcmp(awhois, "true")))
1379
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
643 i = autowhois_on;
1976
e6beab22099b Do not add items to roster with commands /move and /rename (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1899
diff changeset
644 else if (!strcmp(awhois, "0") || !(strcmp(awhois, "false")))
1379
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
645 i = autowhois_off;
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
646 if (i != autowhois_default)
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
647 buddy_setautowhois(room_elt->data, i);
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
648 }
1979
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
649 if (fjoins) {
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
650 enum room_flagjoins i;
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
651 for (i = flagjoins_none; i <= flagjoins_all; i++)
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
652 if (!strcasecmp(fjoins, strflagjoins[i]))
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
653 break;
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
654 if (i <= flagjoins_all)
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
655 buddy_setflagjoins(room_elt->data, i);
6febc7d1f760 Add /room setopt flag_joins (Hermitifier)
Mikael Berthe <mikael@lilotux.net>
parents: 1976
diff changeset
656 }
1379
74b7621537d7 MUC: Store room settings (print_status, auto_whois) in private storage
Mikael Berthe <mikael@lilotux.net>
parents: 1365
diff changeset
657
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
658 // Is autojoin set?
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
659 // If it is, we'll look up for more information (nick? password?) and
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
660 // try to join the room.
2004
aa7e03c35488 Accept "true" as well as "1" for autojoin in bookmarked rooms
Hermitifier
parents: 2003
diff changeset
661 if (autojoin && (!strcmp(autojoin, "1") || !strcmp(autojoin, "true"))) {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
662 const char *nick, *passwd;
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
663 char *tmpnick = NULL;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
664 nick = lm_message_node_get_child_value(node, "nick");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
665 passwd = lm_message_node_get_child_value(node, "password");
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
666 if (!nick || !*nick)
1395
d431cd75eb53 Use bookmarked nickname when manually joining a room
Mikael Berthe <mikael@lilotux.net>
parents: 1393
diff changeset
667 nick = tmpnick = default_muc_nickname(NULL);
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
668 // Let's join now
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
669 scr_LogPrint(LPRINT_LOGNORM, "Auto-join bookmark <%s>", bjid);
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
670 xmpp_room_join(bjid, nick, passwd);
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
671 g_free(tmpnick);
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
672 }
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
673 g_free(bjid);
1983
45e0b13a39e2 Refresh the roster when MUC bookmarks are received
Jan Zachorowski <quantifier666@gmail.com>
parents: 1979
diff changeset
674
45e0b13a39e2 Refresh the roster when MUC bookmarks are received
Jan Zachorowski <quantifier666@gmail.com>
parents: 1979
diff changeset
675 buddylist_build();
45e0b13a39e2 Refresh the roster when MUC bookmarks are received
Jan Zachorowski <quantifier666@gmail.com>
parents: 1979
diff changeset
676 update_roster = TRUE;
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
677 }
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
678
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
679 static LmHandlerResult cb_storage_bookmarks(LmMessageHandler *h,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
680 LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
681 LmMessage *m, gpointer user_data)
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
682 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
683 LmMessageNode *x, *ansqry;
2003
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
684 char *p = NULL;
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
685
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
686 if (lm_message_get_sub_type(m) == LM_MESSAGE_SUB_TYPE_ERROR) {
2003
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
687 LmMessageNode *error = lm_message_node_get_child(m->node, "error");
1213
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
688 // No server support, or no bookmarks?
2003
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
689 if (error && error->children)
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
690 p = error->children->name;
1213
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
691 if (p && !strcmp(p, "item-not-found")) {
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
692 // item-no-found means the server has Private Storage, but it's
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
693 // currently empty.
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
694 if (bookmarks)
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
695 lm_message_node_unref(bookmarks);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
696 bookmarks = lm_message_node_new("storage", "storage:bookmarks");
1213
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
697 // We return 0 so that the IQ error message be
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
698 // not displayed, as it isn't a real error.
2003
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
699 } else
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
700 scr_LogPrint(LPRINT_LOGNORM, "Server does not support bookmarks storage.");
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
701 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1213
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
702 }
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
703
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
704 ansqry = lm_message_node_get_child(m->node, "query");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
705 ansqry = lm_message_node_get_child(ansqry, "storage");
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
706 if (!ansqry) {
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
707 scr_LogPrint(LPRINT_LOG, "Invalid IQ:private result! (storage:bookmarks)");
1213
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
708 return 0;
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
709 }
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
710
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
711 // Walk through the storage tags
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
712 for (x = ansqry->children ; x; x = x->next) {
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
713 // If the current node is a conference item, parse it and update the roster
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
714 if (x->name && !strcmp(x->name, "conference"))
1004
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
715 storage_bookmarks_parse_conference(x);
b57a01ffeed6 Use existing conference bookmarks
Mikael Berthe <mikael@lilotux.net>
parents: 1003
diff changeset
716 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
717 // "Copy" the bookmarks node
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
718 if (bookmarks)
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
719 lm_message_node_unref(bookmarks);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
720 lm_message_node_deep_ref(ansqry);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
721 bookmarks = ansqry;
1213
4a7db2870685 Improve Private Storage detection.
Mikael Berthe <mikael@lilotux.net>
parents: 1205
diff changeset
722 return 0;
686
98de2d166a11 Use the new IQ system for authentication
Mikael Berthe <mikael@lilotux.net>
parents: 685
diff changeset
723 }
98de2d166a11 Use the new IQ system for authentication
Mikael Berthe <mikael@lilotux.net>
parents: 685
diff changeset
724
577
5c6d364130ee Move IQ Jabber stuff to a separate file
Mikael Berthe <mikael@lilotux.net>
parents: 576
diff changeset
725
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
726 static LmHandlerResult cb_storage_rosternotes(LmMessageHandler *h,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
727 LmConnection *c,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
728 LmMessage *m, gpointer user_data)
1261
704adf4df2d0 Send service-unavailable when Last Activity is disabled
Mikael Berthe <mikael@lilotux.net>
parents: 1255
diff changeset
729 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
730 LmMessageNode *ansqry;
1158
c30c315dc447 XEP-0146 support (Remote Controlling Clients)
misc@mandriva.org
parents: 1134
diff changeset
731
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
732 if (lm_message_get_sub_type(m) == LM_MESSAGE_SUB_TYPE_ERROR) {
2003
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
733 const char *p = NULL;
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
734 LmMessageNode *error = lm_message_node_get_child(m->node, "error");
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
735 // No server support, or no roster notes?
2003
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
736 if (error && error->children)
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
737 p = error->children->name;
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
738 if (p && !strcmp(p, "item-not-found")) {
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
739 // item-no-found means the server has Private Storage, but it's
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
740 // currently empty.
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
741 if (rosternotes)
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
742 lm_message_node_unref(rosternotes);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
743 rosternotes = lm_message_node_new("storage", "storage:rosternotes");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
744 // We return 0 so that the IQ error message be
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
745 // not displayed, as it isn't a real error.
2003
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
746 } else
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
747 scr_LogPrint(LPRINT_LOGNORM, "Server does not support roster notes storage.");
10cec229b41a Handle errors of private storage
Hermitifier
parents: 1983
diff changeset
748 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1158
c30c315dc447 XEP-0146 support (Remote Controlling Clients)
misc@mandriva.org
parents: 1134
diff changeset
749 }
c30c315dc447 XEP-0146 support (Remote Controlling Clients)
misc@mandriva.org
parents: 1134
diff changeset
750
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
751 ansqry = lm_message_node_get_child(m->node, "query");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
752 ansqry = lm_message_node_get_child(ansqry, "storage");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
753 if (!ansqry) {
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
754 scr_LogPrint(LPRINT_LOG, "Invalid IQ:private result! "
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
755 "(storage:rosternotes)");
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
756 return LM_HANDLER_RESULT_REMOVE_MESSAGE;
1158
c30c315dc447 XEP-0146 support (Remote Controlling Clients)
misc@mandriva.org
parents: 1134
diff changeset
757 }
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
758 // Copy the rosternotes node
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
759 if (rosternotes)
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
760 lm_message_node_unref(rosternotes);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
761 lm_message_node_deep_ref(ansqry);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
762 rosternotes = ansqry;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
763 return 0;
1158
c30c315dc447 XEP-0146 support (Remote Controlling Clients)
misc@mandriva.org
parents: 1134
diff changeset
764 }
c30c315dc447 XEP-0146 support (Remote Controlling Clients)
misc@mandriva.org
parents: 1134
diff changeset
765
995
c89e7993c4d9 Answer IQ disco#info queries
Mikael Berthe <mikael@lilotux.net>
parents: 977
diff changeset
766
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
767 static struct IqRequestStorageHandlers
1254
401639413340 More jabber:iq:last support... (misc)
Mikael Berthe <mikael@lilotux.net>
parents: 1224
diff changeset
768 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
769 const gchar *storagens;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
770 LmHandleMessageFunction handler;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
771 } iq_request_storage_handlers[] = {
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
772 {"storage:rosternotes", &cb_storage_rosternotes},
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
773 {"storage:bookmarks", &cb_storage_bookmarks},
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
774 {NULL, NULL}
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
775 };
619
44ddf9bec3a5 Answer IQ:version & IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 613
diff changeset
776
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
777 void xmpp_request_storage(const gchar *storage)
619
44ddf9bec3a5 Answer IQ:version & IQ:time requests
Mikael Berthe <mikael@lilotux.net>
parents: 613
diff changeset
778 {
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
779 LmMessage *iq;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
780 LmMessageNode *query;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
781 LmMessageHandler *handler;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
782 int i;
703
8cbcbff8de7d Fix UTC time in IQ:version queries
Mikael Berthe <mikael@lilotux.net>
parents: 699
diff changeset
783
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
784 iq = lm_message_new_with_sub_type(NULL, LM_MESSAGE_TYPE_IQ,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
785 LM_MESSAGE_SUB_TYPE_GET);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
786 query = lm_message_node_add_child(iq->node, "query", NULL);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
787 lm_message_node_set_attribute(query, "xmlns", NS_PRIVATE);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
788 lm_message_node_set_attribute(lm_message_node_add_child
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
789 (query, "storage", NULL),
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
790 "xmlns", storage);
1283
2faf179166f3 Implement XEP-0202 (Entity Time)
Mikael Berthe <mikael@lilotux.net>
parents: 1268
diff changeset
791
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
792 for (i = 0;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
793 strcmp(iq_request_storage_handlers[i].storagens, storage) != 0;
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
794 ++i) ;
595
0c1d37300862 IQ: send feature-not-implemented error stanzas
Mikael Berthe <mikael@lilotux.net>
parents: 582
diff changeset
795
1598
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
796 handler = lm_message_handler_new(iq_request_storage_handlers[i].handler,
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
797 NULL, FALSE);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
798 lm_connection_send_with_reply(lconnection, iq, handler, NULL);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
799 lm_message_handler_unref(handler);
a087125d8fc8 Replace libjabber with loudmouth
franky
parents: 1575
diff changeset
800 lm_message_unref(iq);
547
1df26ff0ed8c Break packethandler() out
Mikael Berthe <mikael@lilotux.net>
parents: 539
diff changeset
801 }
1599
dcd5d4c75199 Update/Add headers
Mikael Berthe <mikael@lilotux.net>
parents: 1598
diff changeset
802
1811
e6d355e50d7a Update Vim modelines
Mikael Berthe <mikael@lilotux.net>
parents: 1800
diff changeset
803 /* vim: set et cindent cinoptions=>2\:2(0 ts=2 sw=2: For Vim users... */