Mercurial > pidgin.yaz
annotate src/protocols/jabber/jabber.c @ 3229:20612da83d8c
[gaim-migrate @ 3246]
Approval dialog when somebody wants to subscribe to user's presence. Also
gives user the opportunity to add that buddy if not already on the user's
buddy list.
committer: Tailor Script <tailor@pidgin.im>
author | Jim Seymour <jseymour> |
---|---|
date | Tue, 07 May 2002 00:51:15 +0000 |
parents | e3cba5bb2d69 |
children | 6a96436a542a |
rev | line source |
---|---|
2086 | 1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */ |
2 /* | |
3 * gaim | |
4 * | |
5 * Some code copyright (C) 1998-1999, Mark Spencer <markster@marko.net> | |
6 * libfaim code copyright 1998, 1999 Adam Fritzler <afritz@auk.cx> | |
7 * | |
8 * This program is free software; you can redistribute it and/or modify | |
9 * it under the terms of the GNU General Public License as published by | |
10 * the Free Software Foundation; either version 2 of the License, or | |
11 * (at your option) any later version. | |
12 * | |
13 * This program is distributed in the hope that it will be useful, | |
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 * GNU General Public License for more details. | |
17 * | |
18 * You should have received a copy of the GNU General Public License | |
19 * along with this program; if not, write to the Free Software | |
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
21 * | |
22 */ | |
23 | |
24 #ifdef HAVE_CONFIG_H | |
25 #include "config.h" | |
26 #endif | |
27 | |
28 | |
29 #include <netdb.h> | |
30 #include <unistd.h> | |
31 #include <errno.h> | |
32 #include <netinet/in.h> | |
33 #include <arpa/inet.h> | |
34 #include <string.h> | |
35 #include <stdlib.h> | |
36 #include <stdio.h> | |
37 #include <time.h> | |
38 #include <sys/socket.h> | |
39 #include <sys/utsname.h> | |
40 #include <sys/stat.h> | |
41 #include "multi.h" | |
42 #include "prpl.h" | |
43 #include "gaim.h" | |
2232
14e8978f86bb
[gaim-migrate @ 2242]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2231
diff
changeset
|
44 #ifdef MAX |
14e8978f86bb
[gaim-migrate @ 2242]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2231
diff
changeset
|
45 #undef MAX |
14e8978f86bb
[gaim-migrate @ 2242]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2231
diff
changeset
|
46 #endif |
14e8978f86bb
[gaim-migrate @ 2242]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2231
diff
changeset
|
47 #ifdef MIN |
14e8978f86bb
[gaim-migrate @ 2242]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2231
diff
changeset
|
48 #undef MIN |
14e8978f86bb
[gaim-migrate @ 2242]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2231
diff
changeset
|
49 #endif |
2086 | 50 #include "jabber.h" |
51 #include "proxy.h" | |
52 | |
53 #include "pixmaps/available.xpm" | |
54 #include "pixmaps/available-away.xpm" | |
55 #include "pixmaps/available-chat.xpm" | |
56 #include "pixmaps/available-xa.xpm" | |
57 #include "pixmaps/available-dnd.xpm" | |
58 | |
59 /* The priv member of gjconn's is a gaim_connection for now. */ | |
60 #define GJ_GC(x) ((struct gaim_connection *)(x)->priv) | |
61 | |
62 #define IQID_AUTH "__AUTH__" | |
63 | |
64 #define IQ_NONE -1 | |
65 #define IQ_AUTH 0 | |
66 #define IQ_ROSTER 1 | |
67 | |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
68 #define UC_AWAY (0x02 | UC_UNAVAILABLE) |
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
69 #define UC_CHAT 0x04 |
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
70 #define UC_XA (0x08 | UC_UNAVAILABLE) |
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
71 #define UC_DND (0x10 | UC_UNAVAILABLE) |
2086 | 72 |
73 #define DEFAULT_SERVER "jabber.org" | |
74 #define DEFAULT_GROUPCHAT "conference.jabber.org" | |
75 #define DEFAULT_PORT 5222 | |
76 | |
77 #define USEROPT_PORT 0 | |
78 | |
3074 | 79 /* |
80 * Note: "was_connected" may seem redundant, but it was needed and I | |
81 * didn't want to touch the Jabber state stuff not specific to Gaim. | |
82 */ | |
2086 | 83 typedef struct gjconn_struct { |
84 /* Core structure */ | |
85 pool p; /* Memory allocation pool */ | |
86 int state; /* Connection state flag */ | |
3074 | 87 int was_connected; /* We were once connected */ |
2086 | 88 int fd; /* Connection file descriptor */ |
89 jid user; /* User info */ | |
90 char *pass; /* User passwd */ | |
91 | |
92 /* Stream stuff */ | |
93 int id; /* id counter for jab_getid() function */ | |
94 char idbuf[9]; /* temporary storage for jab_getid() */ | |
95 char *sid; /* stream id from server, for digest auth */ | |
96 XML_Parser parser; /* Parser instance */ | |
97 xmlnode current; /* Current node in parsing instance.. */ | |
98 | |
99 /* Event callback ptrs */ | |
2956 | 100 void (*on_state)(struct gjconn_struct *gjc, int state); |
101 void (*on_packet)(struct gjconn_struct *gjc, jpacket p); | |
102 | |
103 GHashTable *queries; /* query tracker */ | |
2086 | 104 |
105 void *priv; | |
106 | |
107 } *gjconn, gjconn_struct; | |
108 | |
2956 | 109 typedef void (*gjconn_state_h)(gjconn gjc, int state); |
110 typedef void (*gjconn_packet_h)(gjconn gjc, jpacket p); | |
2086 | 111 |
112 static gjconn gjab_new(char *user, char *pass, void *priv); | |
2956 | 113 static void gjab_delete(gjconn gjc); |
114 static void gjab_state_handler(gjconn gjc, gjconn_state_h h); | |
115 static void gjab_packet_handler(gjconn gjc, gjconn_packet_h h); | |
116 static void gjab_start(gjconn gjc); | |
117 static void gjab_stop(gjconn gjc); | |
2086 | 118 /* |
2956 | 119 static int gjab_getfd(gjconn gjc); |
120 static jid gjab_getjid(gjconn gjc); | |
121 static char *gjab_getsid(gjconn gjc); | |
2086 | 122 */ |
2956 | 123 static char *gjab_getid(gjconn gjc); |
124 static void gjab_send(gjconn gjc, xmlnode x); | |
125 static void gjab_send_raw(gjconn gjc, const char *str); | |
126 static void gjab_recv(gjconn gjc); | |
127 static void gjab_auth(gjconn gjc); | |
128 | |
129 /* | |
130 * It is *this* to which we point the gaim_connection proto_data | |
131 */ | |
2086 | 132 struct jabber_data { |
2956 | 133 gjconn gjc; |
2086 | 134 gboolean did_import; |
2956 | 135 GSList *chats; |
2086 | 136 GHashTable *hash; |
137 time_t idle; | |
2800
0ad63a625eec
[gaim-migrate @ 2813]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
138 gboolean die; |
2086 | 139 }; |
140 | |
2956 | 141 /* |
142 * Jabber "chat group" info. Pointers to these go in jabber_data | |
143 * pending and existing chats lists. | |
144 */ | |
2086 | 145 struct jabber_chat { |
146 jid Jid; | |
147 struct gaim_connection *gc; | |
148 struct conversation *b; | |
149 int id; | |
2956 | 150 int state; |
2086 | 151 }; |
152 | |
2956 | 153 /* |
154 * Jabber chat states... | |
155 * | |
156 * Note: due to a bug in one version of the Jabber server, subscriptions | |
157 * to chat groups aren't (always?) properly removed at the server. The | |
158 * result is clients receive Jabber "presence" notifications for JIDs | |
159 * they no longer care about. The problem with such vestigial notifies is | |
160 * that we really have no way of telling if it's vestigial or if it's a | |
161 * valid "buddy" presence notification. So we keep jabber_chat structs | |
162 * around after leaving a chat group and simply mark them "closed." That | |
163 * way we can test for such errant presence notifications. I.e.: if we | |
164 * get a presence notfication from a JID that matches a chat group JID, | |
165 * we disregard it. | |
166 */ | |
167 #define JCS_PENDING 1 /* pending */ | |
168 #define JCS_ACTIVE 2 /* active */ | |
169 #define JCS_CLOSED 3 /* closed */ | |
170 | |
171 | |
2086 | 172 static char *jabber_name() |
173 { | |
174 return "Jabber"; | |
175 } | |
176 | |
2956 | 177 #define STATE_EVT(arg) if(gjc->on_state) { (gjc->on_state)(gjc, (arg) ); } |
178 | |
179 static void jabber_handlevcard(gjconn, xmlnode, char *); | |
2086 | 180 |
181 static char *create_valid_jid(const char *given, char *server, char *resource) | |
182 { | |
183 char *valid; | |
184 | |
185 if (!strchr(given, '@')) | |
186 valid = g_strdup_printf("%s@%s/%s", given, server, resource); | |
187 else if (!strchr(strchr(given, '@'), '/')) | |
188 valid = g_strdup_printf("%s/%s", given, resource); | |
189 else | |
190 valid = g_strdup(given); | |
191 | |
192 return valid; | |
193 } | |
194 | |
195 static gjconn gjab_new(char *user, char *pass, void *priv) | |
196 { | |
197 pool p; | |
2956 | 198 gjconn gjc; |
2086 | 199 |
200 if (!user) | |
201 return (NULL); | |
202 | |
203 p = pool_new(); | |
204 if (!p) | |
205 return (NULL); | |
2956 | 206 gjc = pmalloc_x(p, sizeof(gjconn_struct), 0); |
207 if (!gjc) { | |
208 pool_free(p); /* no need for this anymore! */ | |
2086 | 209 return (NULL); |
2956 | 210 } |
211 gjc->p = p; | |
212 | |
213 gjc->user = jid_new(p, user); | |
214 gjc->pass = pstrdup(p, pass); | |
215 | |
216 gjc->state = JCONN_STATE_OFF; | |
3074 | 217 gjc->was_connected = 0; |
2956 | 218 gjc->id = 1; |
219 gjc->fd = -1; | |
220 | |
221 gjc->priv = priv; | |
222 | |
223 return gjc; | |
2086 | 224 } |
225 | |
2956 | 226 static void gjab_delete(gjconn gjc) |
2086 | 227 { |
2956 | 228 if (!gjc) |
2086 | 229 return; |
230 | |
2956 | 231 gjab_stop(gjc); |
232 pool_free(gjc->p); | |
2086 | 233 } |
234 | |
2956 | 235 static void gjab_state_handler(gjconn gjc, gjconn_state_h h) |
2086 | 236 { |
2956 | 237 if (!gjc) |
2086 | 238 return; |
239 | |
2956 | 240 gjc->on_state = h; |
2086 | 241 } |
242 | |
2956 | 243 static void gjab_packet_handler(gjconn gjc, gjconn_packet_h h) |
2086 | 244 { |
2956 | 245 if (!gjc) |
2086 | 246 return; |
247 | |
2956 | 248 gjc->on_packet = h; |
2086 | 249 } |
250 | |
2956 | 251 static void gjab_stop(gjconn gjc) |
2086 | 252 { |
2956 | 253 if (!gjc || gjc->state == JCONN_STATE_OFF) |
2086 | 254 return; |
255 | |
2956 | 256 gjab_send_raw(gjc, "</stream:stream>"); |
257 gjc->state = JCONN_STATE_OFF; | |
3074 | 258 gjc->was_connected = 0; |
2956 | 259 close(gjc->fd); |
260 gjc->fd = -1; | |
261 XML_ParserFree(gjc->parser); | |
262 gjc->parser = NULL; | |
2086 | 263 } |
264 | |
265 /* | |
2956 | 266 static int gjab_getfd(gjconn gjc) |
2086 | 267 { |
2956 | 268 if (gjc) |
269 return gjc->fd; | |
2086 | 270 else |
271 return -1; | |
272 } | |
273 | |
2956 | 274 static jid gjab_getjid(gjconn gjc) |
2086 | 275 { |
2956 | 276 if (gjc) |
277 return (gjc->user); | |
2086 | 278 else |
279 return NULL; | |
280 } | |
281 | |
2956 | 282 static char *gjab_getsid(gjconn gjc) |
2086 | 283 { |
2956 | 284 if (gjc) |
285 return (gjc->sid); | |
2086 | 286 else |
287 return NULL; | |
288 } | |
289 */ | |
290 | |
2956 | 291 static char *gjab_getid(gjconn gjc) |
2086 | 292 { |
2956 | 293 snprintf(gjc->idbuf, 8, "%d", gjc->id++); |
294 return &gjc->idbuf[0]; | |
2086 | 295 } |
296 | |
2956 | 297 static void gjab_send(gjconn gjc, xmlnode x) |
2086 | 298 { |
2956 | 299 if (gjc && gjc->state != JCONN_STATE_OFF) { |
2086 | 300 char *buf = xmlnode2str(x); |
301 if (buf) | |
2956 | 302 write(gjc->fd, buf, strlen(buf)); |
2086 | 303 debug_printf("gjab_send: %s\n", buf); |
304 } | |
305 } | |
306 | |
2956 | 307 static void gjab_send_raw(gjconn gjc, const char *str) |
2086 | 308 { |
2956 | 309 if (gjc && gjc->state != JCONN_STATE_OFF) { |
310 /* | |
311 * JFIXME: No error detection?!?! | |
312 */ | |
313 if(write(gjc->fd, str, strlen(str)) < 0) { | |
314 fprintf(stderr, "DBG: Problem sending. Error: %d\n", errno); | |
315 fflush(stderr); | |
316 } | |
2086 | 317 debug_printf("gjab_send_raw: %s\n", str); |
318 } | |
319 } | |
320 | |
2956 | 321 static void gjab_reqroster(gjconn gjc) |
2086 | 322 { |
323 xmlnode x; | |
324 | |
325 x = jutil_iqnew(JPACKET__GET, NS_ROSTER); | |
2956 | 326 xmlnode_put_attrib(x, "id", gjab_getid(gjc)); |
327 | |
328 gjab_send(gjc, x); | |
2086 | 329 xmlnode_free(x); |
330 } | |
331 | |
2956 | 332 static void gjab_reqauth(gjconn gjc) |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
333 { |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
334 xmlnode x, y, z; |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
335 char *user; |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
336 |
2956 | 337 if (!gjc) |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
338 return; |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
339 |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
340 x = jutil_iqnew(JPACKET__GET, NS_AUTH); |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
341 xmlnode_put_attrib(x, "id", IQID_AUTH); |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
342 y = xmlnode_get_tag(x, "query"); |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
343 |
2956 | 344 user = gjc->user->user; |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
345 |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
346 if (user) { |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
347 z = xmlnode_insert_tag(y, "username"); |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
348 xmlnode_insert_cdata(z, user, -1); |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
349 } |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
350 |
2956 | 351 gjab_send(gjc, x); |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
352 xmlnode_free(x); |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
353 } |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
354 |
2956 | 355 static void gjab_auth(gjconn gjc) |
2086 | 356 { |
357 xmlnode x, y, z; | |
358 char *hash, *user; | |
359 | |
2956 | 360 if (!gjc) |
2086 | 361 return; |
362 | |
363 x = jutil_iqnew(JPACKET__SET, NS_AUTH); | |
364 xmlnode_put_attrib(x, "id", IQID_AUTH); | |
365 y = xmlnode_get_tag(x, "query"); | |
366 | |
2956 | 367 user = gjc->user->user; |
2086 | 368 |
369 if (user) { | |
370 z = xmlnode_insert_tag(y, "username"); | |
371 xmlnode_insert_cdata(z, user, -1); | |
372 } | |
373 | |
374 z = xmlnode_insert_tag(y, "resource"); | |
2956 | 375 xmlnode_insert_cdata(z, gjc->user->resource, -1); |
376 | |
377 if (gjc->sid) { | |
378 debug_printf("digest authentication (sid %s)\n", gjc->sid); | |
2086 | 379 z = xmlnode_insert_tag(y, "digest"); |
2956 | 380 hash = pmalloc(x->p, strlen(gjc->sid) + strlen(gjc->pass) + 1); |
381 strcpy(hash, gjc->sid); | |
382 strcat(hash, gjc->pass); | |
2086 | 383 hash = shahash(hash); |
384 xmlnode_insert_cdata(z, hash, 40); | |
385 } else { | |
386 z = xmlnode_insert_tag(y, "password"); | |
2956 | 387 xmlnode_insert_cdata(z, gjc->pass, -1); |
2086 | 388 } |
389 | |
2956 | 390 gjab_send(gjc, x); |
2086 | 391 xmlnode_free(x); |
392 | |
393 return; | |
394 } | |
395 | |
2956 | 396 static void gjab_recv(gjconn gjc) |
2086 | 397 { |
398 static char buf[4096]; | |
399 int len; | |
400 | |
2956 | 401 if (!gjc || gjc->state == JCONN_STATE_OFF) |
2086 | 402 return; |
403 | |
3105 | 404 if ((len = read(gjc->fd, buf, sizeof(buf))) > 0) { |
2956 | 405 struct jabber_data *jd = GJ_GC(gjc)->proto_data; |
2086 | 406 buf[len] = '\0'; |
407 debug_printf("input (len %d): %s\n", len, buf); | |
2956 | 408 XML_Parse(gjc->parser, buf, len, 0); |
2800
0ad63a625eec
[gaim-migrate @ 2813]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
409 if (jd->die) |
2956 | 410 signoff(GJ_GC(gjc)); |
3105 | 411 } else if (len < 0 || errno != EAGAIN) { |
2086 | 412 STATE_EVT(JCONN_STATE_OFF) |
413 } | |
414 } | |
415 | |
416 static void startElement(void *userdata, const char *name, const char **attribs) | |
417 { | |
418 xmlnode x; | |
2956 | 419 gjconn gjc = (gjconn) userdata; |
420 | |
421 if (gjc->current) { | |
2086 | 422 /* Append the node to the current one */ |
2956 | 423 x = xmlnode_insert_tag(gjc->current, name); |
2086 | 424 xmlnode_put_expat_attribs(x, attribs); |
425 | |
2956 | 426 gjc->current = x; |
2086 | 427 } else { |
428 x = xmlnode_new_tag(name); | |
429 xmlnode_put_expat_attribs(x, attribs); | |
430 if (strcmp(name, "stream:stream") == 0) { | |
431 /* special case: name == stream:stream */ | |
432 /* id attrib of stream is stored for digest auth */ | |
2956 | 433 gjc->sid = g_strdup(xmlnode_get_attrib(x, "id")); |
2086 | 434 /* STATE_EVT(JCONN_STATE_AUTH) */ |
2635
8c75e59e4bdf
[gaim-migrate @ 2648]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2607
diff
changeset
|
435 xmlnode_free(x); |
2086 | 436 } else { |
2956 | 437 gjc->current = x; |
2086 | 438 } |
439 } | |
440 } | |
441 | |
442 static void endElement(void *userdata, const char *name) | |
443 { | |
2956 | 444 gjconn gjc = (gjconn) userdata; |
2086 | 445 xmlnode x; |
446 jpacket p; | |
447 | |
2956 | 448 if (gjc->current == NULL) { |
2086 | 449 /* we got </stream:stream> */ |
450 STATE_EVT(JCONN_STATE_OFF) | |
451 return; | |
452 } | |
453 | |
2956 | 454 x = xmlnode_get_parent(gjc->current); |
2086 | 455 |
456 if (!x) { | |
457 /* it is time to fire the event */ | |
2956 | 458 p = jpacket_new(gjc->current); |
459 | |
460 if (gjc->on_packet) | |
461 (gjc->on_packet) (gjc, p); | |
2086 | 462 else |
2956 | 463 xmlnode_free(gjc->current); |
2086 | 464 } |
465 | |
2956 | 466 gjc->current = x; |
2086 | 467 } |
468 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
469 static void jabber_callback(gpointer data, gint source, GaimInputCondition condition) |
2086 | 470 { |
471 struct gaim_connection *gc = (struct gaim_connection *)data; | |
472 struct jabber_data *jd = (struct jabber_data *)gc->proto_data; | |
473 | |
2956 | 474 gjab_recv(jd->gjc); |
2086 | 475 } |
476 | |
477 static void charData(void *userdata, const char *s, int slen) | |
478 { | |
2956 | 479 gjconn gjc = (gjconn) userdata; |
480 | |
481 if (gjc->current) | |
482 xmlnode_insert_cdata(gjc->current, s, slen); | |
2086 | 483 } |
484 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
485 static void gjab_connected(gpointer data, gint source, GaimInputCondition cond) |
2086 | 486 { |
487 xmlnode x; | |
488 char *t, *t2; | |
489 struct gaim_connection *gc = data; | |
490 struct jabber_data *jd; | |
2956 | 491 gjconn gjc; |
2086 | 492 |
493 if (!g_slist_find(connections, gc)) { | |
494 close(source); | |
495 return; | |
496 } | |
497 | |
498 jd = gc->proto_data; | |
2956 | 499 gjc = jd->gjc; |
500 | |
501 if (gjc->fd != source) | |
502 gjc->fd = source; | |
2300
d2686f757d6e
[gaim-migrate @ 2310]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2289
diff
changeset
|
503 |
2086 | 504 if (source == -1) { |
505 STATE_EVT(JCONN_STATE_OFF) | |
506 return; | |
507 } | |
508 | |
2956 | 509 gjc->state = JCONN_STATE_CONNECTED; |
2086 | 510 STATE_EVT(JCONN_STATE_CONNECTED) |
511 | |
512 /* start stream */ | |
2956 | 513 x = jutil_header(NS_CLIENT, gjc->user->server); |
2086 | 514 t = xmlnode2str(x); |
515 /* this is ugly, we can create the string here instead of jutil_header */ | |
516 /* what do you think about it? -madcat */ | |
517 t2 = strstr(t, "/>"); | |
518 *t2++ = '>'; | |
519 *t2 = '\0'; | |
2956 | 520 gjab_send_raw(gjc, "<?xml version='1.0'?>"); |
521 gjab_send_raw(gjc, t); | |
2086 | 522 xmlnode_free(x); |
523 | |
2956 | 524 gjc->state = JCONN_STATE_ON; |
2086 | 525 STATE_EVT(JCONN_STATE_ON); |
526 | |
2956 | 527 gc = GJ_GC(gjc); |
528 gc->inpa = gaim_input_add(gjc->fd, GAIM_INPUT_READ, jabber_callback, gc); | |
2086 | 529 } |
530 | |
2956 | 531 static void gjab_start(gjconn gjc) |
2086 | 532 { |
533 struct aim_user *user; | |
534 int port; | |
535 | |
2956 | 536 if (!gjc || gjc->state != JCONN_STATE_OFF) |
2086 | 537 return; |
538 | |
2956 | 539 user = GJ_GC(gjc)->user; |
2086 | 540 port = user->proto_opt[USEROPT_PORT][0] ? atoi(user->proto_opt[USEROPT_PORT]) : DEFAULT_PORT; |
541 | |
2956 | 542 gjc->parser = XML_ParserCreate(NULL); |
543 XML_SetUserData(gjc->parser, (void *)gjc); | |
544 XML_SetElementHandler(gjc->parser, startElement, endElement); | |
545 XML_SetCharacterDataHandler(gjc->parser, charData); | |
546 | |
547 gjc->fd = proxy_connect(gjc->user->server, port, gjab_connected, GJ_GC(gjc)); | |
548 if (!user->gc || (gjc->fd < 0)) { | |
2086 | 549 STATE_EVT(JCONN_STATE_OFF) |
550 return; | |
551 } | |
552 } | |
553 | |
2956 | 554 /* |
555 * Find chat by chat group name | |
556 */ | |
2086 | 557 static struct conversation *find_chat(struct gaim_connection *gc, char *name) |
558 { | |
559 GSList *bcs = gc->buddy_chats; | |
560 struct conversation *b = NULL; | |
561 char *chat = g_strdup(normalize(name)); | |
562 | |
563 while (bcs) { | |
564 b = bcs->data; | |
565 if (!strcasecmp(normalize(b->name), chat)) | |
566 break; | |
567 b = NULL; | |
568 bcs = bcs->next; | |
569 } | |
570 | |
571 g_free(chat); | |
572 return b; | |
573 } | |
574 | |
2956 | 575 /* |
576 * Find chat by "chat id" | |
577 * | |
578 * Returns: 0 on success and jabber_chat pointer set | |
579 * or -EINVAL on error and jabber_chat pointer is | |
580 * undefined. | |
581 * | |
582 * TBD: Slogging through the buddy_chats list seems | |
583 * redundant since the chat i.d. is mirrored in the | |
584 * jabber_chat struct list. But that's the way it | |
585 * was, so that's the way I'm leaving it--for now. | |
586 */ | |
587 static int jabber_find_chat_by_convo_id(struct gaim_connection *gc, int id, struct jabber_chat **jc) | |
2086 | 588 { |
2956 | 589 GSList *bcs = gc->buddy_chats; |
590 struct conversation *b = NULL; | |
591 struct jabber_data *jd = gc->proto_data; | |
592 | |
593 *jc = NULL; | |
594 | |
595 while(bcs != NULL) { | |
596 b = bcs->data; | |
597 if (id == b->id) | |
598 break; | |
599 bcs = bcs->next; | |
600 } | |
601 | |
602 if (bcs != NULL) { | |
603 bcs = jd->chats; | |
604 while (bcs != NULL) { | |
605 *jc = bcs->data; | |
606 if ((*jc)->state == JCS_ACTIVE && (*jc)->b == b) | |
607 break; | |
608 bcs = bcs->next; | |
609 } | |
610 } | |
611 | |
612 return(bcs == NULL? -EINVAL : 0); | |
613 } | |
614 | |
615 /* | |
616 * Find any chat | |
617 */ | |
618 static struct jabber_chat *find_any_chat(struct gaim_connection *gc, jid chat) | |
619 { | |
620 GSList *jcs = ((struct jabber_data *)gc->proto_data)->chats; | |
2086 | 621 struct jabber_chat *jc = NULL; |
622 | |
2956 | 623 while (jcs) { |
624 jc = jcs->data; | |
2086 | 625 if (!jid_cmpx(chat, jc->Jid, JID_USER | JID_SERVER)) |
626 break; | |
627 jc = NULL; | |
2956 | 628 jcs = jcs->next; |
2086 | 629 } |
630 | |
631 return jc; | |
632 } | |
633 | |
2956 | 634 |
635 /* | |
636 * Find existing/active Jabber chat | |
637 */ | |
638 static struct jabber_chat *find_existing_chat(struct gaim_connection *gc, jid chat) | |
639 { | |
640 GSList *jcs = ((struct jabber_data *)gc->proto_data)->chats; | |
641 struct jabber_chat *jc = NULL; | |
642 | |
643 while (jcs) { | |
644 jc = jcs->data; | |
645 if (jc->state == JCS_ACTIVE && !jid_cmpx(chat, jc->Jid, JID_USER | JID_SERVER)) | |
646 break; | |
647 jc = NULL; | |
648 jcs = jcs->next; | |
649 } | |
650 | |
651 return jc; | |
652 } | |
653 | |
654 /* | |
655 * Find pending chat | |
656 */ | |
2086 | 657 static struct jabber_chat *find_pending_chat(struct gaim_connection *gc, jid chat) |
658 { | |
2956 | 659 GSList *jcs = ((struct jabber_data *)gc->proto_data)->chats; |
2086 | 660 struct jabber_chat *jc = NULL; |
661 | |
2956 | 662 while (jcs) { |
663 jc = jcs->data; | |
664 if (jc->state == JCS_PENDING && !jid_cmpx(chat, jc->Jid, JID_USER | JID_SERVER)) | |
2086 | 665 break; |
666 jc = NULL; | |
2956 | 667 jcs = jcs->next; |
2086 | 668 } |
669 | |
670 return jc; | |
671 } | |
672 | |
673 static gboolean find_chat_buddy(struct conversation *b, char *name) | |
674 { | |
675 GList *m = b->in_room; | |
676 | |
677 while (m) { | |
678 if (!strcmp(m->data, name)) | |
679 return TRUE; | |
680 m = m->next; | |
681 } | |
682 | |
683 return FALSE; | |
684 } | |
685 | |
2956 | 686 /* |
687 * keep track of away msg same as yahoo plugin | |
688 */ | |
3105 | 689 static void jabber_track_away(gjconn gjc, jpacket p, char *name, char *type) |
2956 | 690 { |
691 struct jabber_data *jd = GJ_GC(gjc)->proto_data; | |
692 gpointer val = g_hash_table_lookup(jd->hash, name); | |
693 char *show; | |
694 char *vshow = NULL; | |
695 char *status = NULL; | |
696 char *msg = NULL; | |
697 | |
3105 | 698 if (type && (strcasecmp(type, "unavailable") == 0)) { |
699 vshow = _("Unavailable"); | |
700 } else { | |
701 if((show = xmlnode_get_tag_data(p->x, "show")) != NULL) { | |
702 if (!strcasecmp(show, "away")) { | |
703 vshow = _("Away"); | |
704 } else if (!strcasecmp(show, "chat")) { | |
705 vshow = _("Online"); | |
706 } else if (!strcasecmp(show, "xa")) { | |
707 vshow = _("Extended Away"); | |
708 } else if (!strcasecmp(show, "dnd")) { | |
709 vshow = _("Do Not Disturb"); | |
710 } | |
2956 | 711 } |
712 } | |
713 | |
714 status = xmlnode_get_tag_data(p->x, "status"); | |
715 | |
716 if(vshow != NULL || status != NULL ) { | |
717 /* kinda hokey, but it works :-) */ | |
718 msg = g_strdup_printf("%s%s%s", | |
719 (vshow == NULL? "" : vshow), | |
720 (vshow == NULL || status == NULL? "" : ": "), | |
721 (status == NULL? "" : status)); | |
3105 | 722 } else { |
723 msg = g_strdup(_("Online")); | |
2956 | 724 } |
725 | |
726 if (val) { | |
727 g_free(val); | |
728 g_hash_table_insert(jd->hash, name, msg); | |
729 } else { | |
730 g_hash_table_insert(jd->hash, g_strdup(name), msg); | |
731 } | |
732 } | |
733 | |
3159 | 734 static time_t iso8601_to_time(char *timestamp) |
735 { | |
3229 | 736 struct tm t; |
737 time_t retval = 0; | |
738 | |
739 if(sscanf(timestamp,"%04d%02d%02dT%02d:%02d:%02d", | |
740 &t.tm_year, &t.tm_mon, &t.tm_mday, &t.tm_hour, &t.tm_min, &t.tm_sec)) | |
741 { | |
742 t.tm_year -= 1900; | |
743 t.tm_mon -= 1; | |
744 t.tm_isdst = 0; | |
745 retval = mktime(&t); | |
746 # ifdef HAVE_TM_GMTOFF | |
747 retval += t.tm_gmtoff; | |
748 # else | |
749 # ifdef HAVE_TIMEZONE | |
750 tzset(); /* making sure */ | |
751 retval -= timezone; | |
752 # endif | |
753 # endif | |
754 } | |
755 | |
756 return retval; | |
3159 | 757 } |
758 | |
2956 | 759 static void jabber_handlemessage(gjconn gjc, jpacket p) |
2086 | 760 { |
3159 | 761 xmlnode y, xmlns, subj, z; |
762 time_t time_sent = time(NULL); | |
2086 | 763 |
764 char *from = NULL, *msg = NULL, *type = NULL, *topic = NULL; | |
765 char m[BUF_LONG * 2]; | |
766 | |
767 type = xmlnode_get_attrib(p->x, "type"); | |
768 | |
3159 | 769 z = xmlnode_get_firstchild(p->x); |
770 | |
771 while(z) | |
772 { | |
773 if(NSCHECK(z,NS_DELAY)) | |
774 { | |
775 char *timestamp = xmlnode_get_attrib(z,"stamp"); | |
776 time_sent = iso8601_to_time(timestamp); | |
777 } | |
778 z = xmlnode_get_nextsibling(z); | |
779 } | |
780 | |
2086 | 781 if (!type || !strcasecmp(type, "normal") || !strcasecmp(type, "chat")) { |
782 | |
783 /* XXX namespaces could be handled better. (mid) */ | |
784 if ((xmlns = xmlnode_get_tag(p->x, "x"))) | |
785 type = xmlnode_get_attrib(xmlns, "xmlns"); | |
786 | |
787 from = jid_full(p->from); | |
788 /* | |
789 if ((y = xmlnode_get_tag(p->x, "html"))) { | |
790 msg = xmlnode_get_data(y); | |
791 } else | |
792 */ | |
793 if ((y = xmlnode_get_tag(p->x, "body"))) { | |
794 msg = xmlnode_get_data(y); | |
795 } | |
796 | |
797 msg = utf8_to_str(msg); | |
798 | |
799 if (!from) | |
800 return; | |
801 | |
802 if (type && !strcasecmp(type, "jabber:x:conference")) { | |
803 char *room; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
804 GList *m = NULL; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
805 char **data; |
2086 | 806 |
807 room = xmlnode_get_attrib(xmlns, "jid"); | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
808 data = g_strsplit(room, "@", 2); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
809 m = g_list_append(m, g_strdup(data[0])); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
810 m = g_list_append(m, g_strdup(data[1])); |
2956 | 811 m = g_list_append(m, g_strdup(gjc->user->user)); |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
812 g_strfreev(data); |
2086 | 813 |
2956 | 814 serv_got_chat_invite(GJ_GC(gjc), room, from, msg, m); |
2086 | 815 } else if (msg) { /* whisper */ |
816 struct jabber_chat *jc; | |
817 g_snprintf(m, sizeof(m), "%s", msg); | |
2956 | 818 if (((jc = find_existing_chat(GJ_GC(gjc), p->from)) != NULL) && jc->b) |
3159 | 819 serv_got_chat_in(GJ_GC(gjc), jc->b->id, p->from->resource, 1, m, time_sent); |
2086 | 820 else { |
2278
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
821 int flags = 0; |
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
822 if (xmlnode_get_tag(p->x, "gaim")) |
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
823 flags = IM_FLAG_GAIMUSER; |
2086 | 824 if (find_conversation(jid_full(p->from))) |
3159 | 825 serv_got_im(GJ_GC(gjc), jid_full(p->from), m, flags, time_sent, -1); |
2086 | 826 else { |
2956 | 827 if(p->from->user) { |
828 from = g_strdup_printf("%s@%s", p->from->user, p->from->server); | |
829 } else { | |
830 /* server message? */ | |
831 from = g_strdup(p->from->server); | |
832 } | |
3159 | 833 serv_got_im(GJ_GC(gjc), from, m, flags, time_sent, -1); |
2086 | 834 g_free(from); |
835 } | |
836 } | |
837 } | |
838 | |
839 if (msg) | |
840 g_free(msg); | |
841 | |
842 } else if (!strcasecmp(type, "error")) { | |
843 if ((y = xmlnode_get_tag(p->x, "error"))) { | |
844 type = xmlnode_get_attrib(y, "code"); | |
845 msg = xmlnode_get_data(y); | |
846 } | |
847 | |
848 if (msg) { | |
849 from = g_strdup_printf("Error %s", type ? type : ""); | |
850 do_error_dialog(msg, from); | |
851 g_free(from); | |
852 } | |
853 } else if (!strcasecmp(type, "groupchat")) { | |
854 struct jabber_chat *jc; | |
855 static int i = 0; | |
856 | |
857 /* | |
858 if ((y = xmlnode_get_tag(p->x, "html"))) { | |
859 msg = xmlnode_get_data(y); | |
860 } else | |
861 */ | |
862 if ((y = xmlnode_get_tag(p->x, "body"))) { | |
863 msg = xmlnode_get_data(y); | |
864 } | |
865 | |
866 msg = utf8_to_str(msg); | |
867 | |
868 if ((subj = xmlnode_get_tag(p->x, "subject"))) { | |
869 topic = xmlnode_get_data(subj); | |
870 } | |
871 topic = utf8_to_str(topic); | |
872 | |
2956 | 873 jc = find_existing_chat(GJ_GC(gjc), p->from); |
2086 | 874 if (!jc) { |
875 /* we're not in this chat. are we supposed to be? */ | |
2956 | 876 if ((jc = find_pending_chat(GJ_GC(gjc), p->from)) != NULL) { |
2086 | 877 /* yes, we're supposed to be. so now we are. */ |
2956 | 878 jc->b = serv_got_joined_chat(GJ_GC(gjc), i++, p->from->user); |
2086 | 879 jc->id = jc->b->id; |
2956 | 880 jc->state = JCS_ACTIVE; |
2086 | 881 } else { |
882 /* no, we're not supposed to be. */ | |
883 g_free(msg); | |
884 return; | |
885 } | |
886 } | |
887 if (p->from->resource) { | |
888 if (!y) { | |
2956 | 889 if (!find_chat_buddy(jc->b, p->from->resource)) { |
2086 | 890 add_chat_buddy(jc->b, p->from->resource); |
2956 | 891 } else if ((y = xmlnode_get_tag(p->x, "status"))) { |
3105 | 892 char *buf; |
893 | |
894 buf = g_strdup_printf("%s@%s/%s", | |
2956 | 895 p->from->user, p->from->server, p->from->resource); |
3105 | 896 jabber_track_away(gjc, p, buf, NULL); |
897 g_free(buf); | |
2956 | 898 |
2086 | 899 } |
900 } else if (jc->b && msg) { | |
901 char buf[8192]; | |
902 | |
903 if (topic) { | |
904 char tbuf[8192]; | |
905 g_snprintf(tbuf, sizeof(tbuf), "%s", topic); | |
906 chat_set_topic(jc->b, p->from->resource, tbuf); | |
907 } | |
908 | |
909 | |
910 g_snprintf(buf, sizeof(buf), "%s", msg); | |
3159 | 911 serv_got_chat_in(GJ_GC(gjc), jc->b->id, p->from->resource, 0, buf, time_sent); |
2086 | 912 } |
913 } else { /* message from the server */ | |
914 if(jc->b && topic) { | |
915 char tbuf[8192]; | |
916 g_snprintf(tbuf, sizeof(tbuf), "%s", topic); | |
917 chat_set_topic(jc->b, "", tbuf); | |
918 } | |
919 } | |
920 | |
921 g_free(msg); | |
922 g_free(topic); | |
923 | |
924 } else { | |
925 debug_printf("unhandled message %s\n", type); | |
926 } | |
927 } | |
3159 | 928 |
2956 | 929 static void jabber_handlepresence(gjconn gjc, jpacket p) |
2086 | 930 { |
931 char *to, *from, *type; | |
932 struct buddy *b = NULL; | |
933 jid who; | |
934 char *buddy; | |
3194 | 935 xmlnode y; |
2086 | 936 char *show; |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
937 int state = 0; |
2086 | 938 GSList *resources; |
939 char *res; | |
940 struct conversation *cnv = NULL; | |
941 struct jabber_chat *jc = NULL; | |
942 | |
943 to = xmlnode_get_attrib(p->x, "to"); | |
944 from = xmlnode_get_attrib(p->x, "from"); | |
945 type = xmlnode_get_attrib(p->x, "type"); | |
3150 | 946 |
2086 | 947 if ((y = xmlnode_get_tag(p->x, "show"))) { |
948 show = xmlnode_get_data(y); | |
949 if (!show) { | |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
950 state = 0; |
2086 | 951 } else if (!strcasecmp(show, "away")) { |
952 state = UC_AWAY; | |
953 } else if (!strcasecmp(show, "chat")) { | |
954 state = UC_CHAT; | |
955 } else if (!strcasecmp(show, "xa")) { | |
956 state = UC_XA; | |
957 } else if (!strcasecmp(show, "dnd")) { | |
958 state = UC_DND; | |
959 } | |
960 } else { | |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
961 state = 0; |
2086 | 962 } |
963 | |
2956 | 964 who = jid_new(gjc->p, from); |
2086 | 965 if (who->user == NULL) { |
966 /* FIXME: transport */ | |
967 return; | |
968 } | |
969 | |
970 buddy = g_strdup_printf("%s@%s", who->user, who->server); | |
971 | |
972 /* um. we're going to check if it's a chat. if it isn't, and there are pending | |
2956 | 973 * chats, create the chat. if there aren't pending chats and we don't have the |
974 * buddy on our list, simply bail out. */ | |
975 if ((cnv = find_chat(GJ_GC(gjc), who->user)) == NULL) { | |
2086 | 976 static int i = 0x70; |
2956 | 977 if ((jc = find_pending_chat(GJ_GC(gjc), who)) != NULL) { |
978 jc->b = cnv = serv_got_joined_chat(GJ_GC(gjc), i++, who->user); | |
2086 | 979 jc->id = jc->b->id; |
2956 | 980 jc->state = JCS_ACTIVE; |
981 } else if ((b = find_buddy(GJ_GC(gjc), buddy)) == NULL) { | |
982 g_free(buddy); | |
983 return; | |
2086 | 984 } |
985 } | |
986 | |
987 if (!cnv) { | |
988 resources = b->proto_data; | |
989 res = who->resource; | |
990 if (res) | |
991 while (resources) { | |
992 if (!strcmp(res, resources->data)) | |
993 break; | |
994 resources = resources->next; | |
995 } | |
996 | |
3105 | 997 /* keep track of away msg same as yahoo plugin */ |
998 jabber_track_away(gjc, p, normalize(b->name), type); | |
999 | |
2086 | 1000 if (type && (strcasecmp(type, "unavailable") == 0)) { |
1001 if (resources) { | |
1002 g_free(resources->data); | |
1003 b->proto_data = g_slist_remove(b->proto_data, resources->data); | |
1004 } | |
1005 if (!b->proto_data) { | |
2956 | 1006 serv_got_update(GJ_GC(gjc), buddy, 0, 0, 0, 0, 0, 0); |
2086 | 1007 } |
1008 } else { | |
1009 if (!resources) { | |
1010 b->proto_data = g_slist_append(b->proto_data, g_strdup(res)); | |
1011 } | |
1012 | |
3194 | 1013 serv_got_update(GJ_GC(gjc), buddy, 1, 0, b->signon, b->idle, state, 0); |
2086 | 1014 |
1015 } | |
1016 } else { | |
1017 if (who->resource) { | |
3105 | 1018 char *buf; |
1019 | |
1020 buf = g_strdup_printf("%s@%s/%s", who->user, who->server, who->resource); | |
1021 jabber_track_away(gjc, p, buf, type); | |
1022 g_free(buf); | |
1023 | |
2086 | 1024 if (type && !strcasecmp(type, "unavailable")) { |
1025 struct jabber_data *jd; | |
2956 | 1026 if (!jc && !(jc = find_existing_chat(GJ_GC(gjc), who))) { |
2086 | 1027 g_free(buddy); |
1028 return; | |
1029 } | |
1030 jd = jc->gc->proto_data; | |
2956 | 1031 /* if it's not ourselves...*/ |
2086 | 1032 if (strcmp(who->resource, jc->Jid->resource) && jc->b) { |
2820
b917845dad3c
[gaim-migrate @ 2833]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2814
diff
changeset
|
1033 remove_chat_buddy(jc->b, who->resource, NULL); |
2086 | 1034 g_free(buddy); |
1035 return; | |
1036 } | |
2956 | 1037 |
1038 jc->state = JCS_CLOSED; | |
1039 serv_got_chat_left(GJ_GC(gjc), jc->id); | |
1040 /* | |
1041 * TBD: put back some day? | |
1042 jd->chats = g_slist_remove(jd->chats, jc); | |
1043 g_free(jc); | |
1044 */ | |
1045 } else { | |
1046 if ((!jc && !(jc = find_existing_chat(GJ_GC(gjc), who))) || !jc->b) { | |
1047 g_free(buddy); | |
1048 return; | |
1049 } | |
1050 if (!find_chat_buddy(jc->b, who->resource)) { | |
2086 | 1051 add_chat_buddy(jc->b, who->resource); |
1052 } | |
1053 } | |
1054 } | |
1055 } | |
1056 | |
1057 g_free(buddy); | |
1058 | |
1059 return; | |
1060 } | |
1061 | |
3229 | 1062 /* |
1063 * Used only by Jabber accept/deny add stuff just below | |
1064 */ | |
1065 struct jabber_add_permit { | |
1066 gjconn gjc; | |
1067 gchar *user; | |
1068 }; | |
1069 | |
1070 /* | |
1071 * Common part for Jabber accept/deny adds | |
1072 * | |
1073 * "type" says whether we'll permit/deny the subscribe request | |
1074 */ | |
1075 static void jabber_accept_deny_add(struct jabber_add_permit *jap, const char *type) | |
1076 { | |
1077 xmlnode g = xmlnode_new_tag("presence"); | |
1078 | |
1079 xmlnode_put_attrib(g, "to", jap->user); | |
1080 xmlnode_put_attrib(g, "type", type); | |
1081 gjab_send(jap->gjc, g); | |
1082 | |
1083 xmlnode_free(g); | |
1084 } | |
1085 | |
1086 /* | |
1087 * Callback from "accept" in do_ask_dialog() invoked by jabber_handles10n() | |
1088 */ | |
1089 static void jabber_accept_add(gpointer w, struct jabber_add_permit *jap) | |
1090 { | |
1091 jabber_accept_deny_add(jap, "subscribed"); | |
1092 /* | |
1093 * If we don't already have the buddy on *our* buddylist, | |
1094 * ask if we want him or her added. | |
1095 */ | |
1096 if(find_buddy(GJ_GC(jap->gjc), jap->user) == NULL) { | |
1097 show_got_added(GJ_GC(jap->gjc), NULL, jap->user, NULL, NULL); | |
1098 } | |
1099 g_free(jap->user); | |
1100 g_free(jap); | |
1101 } | |
1102 | |
1103 /* | |
1104 * Callback from "deny/cancel" in do_ask_dialog() invoked by jabber_handles10n() | |
1105 */ | |
1106 static void jabber_deny_add(gpointer w, struct jabber_add_permit *jap) | |
1107 { | |
1108 jabber_accept_deny_add(jap, "unsubscribed"); | |
1109 g_free(jap->user); | |
1110 g_free(jap); | |
1111 } | |
1112 | |
1113 /* | |
1114 * Handle subscription requests | |
1115 */ | |
2956 | 1116 static void jabber_handles10n(gjconn gjc, jpacket p) |
2086 | 1117 { |
1118 xmlnode g; | |
1119 char *Jid = xmlnode_get_attrib(p->x, "from"); | |
3136 | 1120 char *type = xmlnode_get_attrib(p->x, "type"); |
2086 | 1121 |
1122 g = xmlnode_new_tag("presence"); | |
1123 xmlnode_put_attrib(g, "to", Jid); | |
3229 | 1124 |
1125 if (!strcmp(type, "subscribe")) { | |
1126 /* | |
1127 * A "subscribe to us" request was received - put up the approval dialog | |
1128 */ | |
1129 struct jabber_add_permit *jap = g_new0(struct jabber_add_permit, 1); | |
1130 gchar *msg = g_strdup_printf(_("The user %s wants to add you to their buddy list."), | |
1131 Jid); | |
1132 | |
1133 jap->gjc = gjc; | |
1134 jap->user = g_strdup(Jid); | |
1135 do_ask_dialog(msg, jap, jabber_accept_add, jabber_deny_add); | |
1136 | |
1137 g_free(msg); | |
1138 xmlnode_free(g); /* Never needed it here anyway */ | |
1139 return; | |
1140 | |
1141 } else if (!strcmp(type, "unsubscribe")) { | |
1142 /* | |
1143 * An "unsubscribe to us" was received - simply "approve" it | |
1144 */ | |
2086 | 1145 xmlnode_put_attrib(g, "type", "unsubscribed"); |
3229 | 1146 } else { |
1147 /* | |
1148 * Did we attempt to subscribe to somebody and they do not exist? | |
1149 */ | |
3136 | 1150 if (!strcmp(type, "unsubscribed")) { |
1151 xmlnode y; | |
1152 char *status; | |
1153 if((y = xmlnode_get_tag(p->x, "status")) && (status = xmlnode_get_data(y)) && | |
1154 !strcmp(status, "Not Found")) { | |
1155 char *msg = g_strdup_printf("%s: \"%s\"", _("No such user"), | |
1156 xmlnode_get_attrib(p->x, "from")); | |
1157 do_error_dialog(msg, _("Jabber Error")); | |
1158 g_free(msg); | |
1159 } | |
1160 } | |
1161 | |
2956 | 1162 xmlnode_free(g); |
2086 | 1163 return; |
2956 | 1164 } |
1165 | |
1166 gjab_send(gjc, g); | |
1167 xmlnode_free(g); | |
2086 | 1168 } |
1169 | |
2956 | 1170 /* |
1171 * Pending subscription to a buddy? | |
1172 */ | |
1173 #define BUD_SUB_TO_PEND(sub, ask) ((!strcasecmp((sub), "none") || !strcasecmp((sub), "from")) && \ | |
1174 (ask) != NULL && !strcasecmp((ask), "subscribe")) | |
1175 | |
1176 /* | |
1177 * Subscribed to a buddy? | |
1178 */ | |
1179 #define BUD_SUBD_TO(sub, ask) ((!strcasecmp((sub), "to") || !strcasecmp((sub), "both")) && \ | |
1180 ((ask) == NULL || !strcasecmp((ask), "subscribe"))) | |
1181 | |
1182 /* | |
1183 * Pending unsubscription to a buddy? | |
1184 */ | |
1185 #define BUD_USUB_TO_PEND(sub, ask) ((!strcasecmp((sub), "to") || !strcasecmp((sub), "both")) && \ | |
1186 (ask) != NULL && !strcasecmp((ask), "unsubscribe")) | |
1187 | |
1188 /* | |
1189 * Unsubscribed to a buddy? | |
1190 */ | |
1191 #define BUD_USUBD_TO(sub, ask) ((!strcasecmp((sub), "none") || !strcasecmp((sub), "from")) && \ | |
1192 ((ask) == NULL || !strcasecmp((ask), "unsubscribe"))) | |
1193 | |
1194 /* | |
1195 * If a buddy is added or removed from the roster on another resource | |
1196 * jabber_handlebuddy is called | |
1197 * | |
1198 * Called with roster item node. | |
1199 */ | |
1200 static void jabber_handlebuddy(gjconn gjc, xmlnode x) | |
1201 { | |
1202 xmlnode g; | |
1203 char *Jid, *name, *sub, *ask; | |
1204 jid who; | |
1205 struct buddy *b = NULL; | |
3136 | 1206 char *buddyname, *groupname = NULL; |
2956 | 1207 |
1208 Jid = xmlnode_get_attrib(x, "jid"); | |
1209 name = xmlnode_get_attrib(x, "name"); | |
1210 sub = xmlnode_get_attrib(x, "subscription"); | |
1211 ask = xmlnode_get_attrib(x, "ask"); | |
1212 who = jid_new(gjc->p, Jid); | |
1213 | |
1214 /* JFIXME: jabber_handleroster() had a "FIXME: transport" at this | |
1215 * equivilent point. So... | |
1216 * | |
1217 * We haven't allocated any memory or done anything interesting to | |
1218 * this point, so we'll violate Good Coding Structure here by | |
1219 * simply bailing out. | |
1220 */ | |
1221 if (!who || !who->user) { | |
1222 return; | |
1223 } | |
1224 | |
1225 buddyname = g_strdup_printf("%s@%s", who->user, who->server); | |
1226 | |
3136 | 1227 if((g = xmlnode_get_tag(x, "group")) != NULL && xmlnode_get_datasz(g) > 0) { |
1228 groupname = xmlnode_get_data(g); | |
2956 | 1229 } |
1230 | |
3059 | 1231 /* |
3136 | 1232 * Add or remove a buddy? Change buddy's alias or group? |
3059 | 1233 */ |
2956 | 1234 if (BUD_SUB_TO_PEND(sub, ask) || BUD_SUBD_TO(sub, ask)) { |
1235 if ((b = find_buddy(GJ_GC(gjc), buddyname)) == NULL) { | |
1236 debug_printf("adding buddy [4]: %s\n", buddyname); | |
3136 | 1237 b = add_buddy(GJ_GC(gjc), groupname ? groupname : _("Buddies"), buddyname, |
2956 | 1238 name ? name : buddyname); |
1239 do_export(GJ_GC(gjc)); | |
3136 | 1240 } else { |
1241 struct group *c_grp = find_group_by_buddy(GJ_GC(gjc), buddyname); | |
1242 | |
1243 /* | |
1244 * If the buddy's in a new group or his/her alias is changed... | |
1245 */ | |
1246 if(groupname && c_grp && strcmp(c_grp->name, groupname)) { | |
1247 int present = b->present; /* save presence state */ | |
1248 int uc = b->uc; /* and away state (?) */ | |
3150 | 1249 int idle = b->idle; |
1250 int signon = b->signon; | |
3136 | 1251 |
1252 /* | |
1253 * seems rude, but it seems to be the only way... | |
1254 */ | |
1255 remove_buddy(GJ_GC(gjc), c_grp, b); | |
1256 b = add_buddy(GJ_GC(gjc), groupname, buddyname, | |
1257 name ? name : buddyname); | |
1258 do_export(GJ_GC(gjc)); | |
1259 if(present) { | |
3150 | 1260 serv_got_update(GJ_GC(gjc), buddyname, 1, 0, signon, idle, uc, 0); |
3136 | 1261 } |
1262 } else if(name != NULL && strcmp(b->show, name)) { | |
1263 strncpy(b->show, name, BUDDY_ALIAS_MAXLEN); | |
1264 b->show[BUDDY_ALIAS_MAXLEN - 1] = '\0'; /* cheap safety feature */ | |
1265 handle_buddy_rename(b, buddyname); | |
1266 } | |
2956 | 1267 } |
1268 } else if (BUD_USUB_TO_PEND(sub, ask) || BUD_USUBD_TO(sub, ask) || !strcasecmp(sub, "remove")) { | |
1269 if ((b = find_buddy(GJ_GC(gjc), buddyname)) != NULL) { | |
1270 struct group *group; | |
1271 | |
1272 group = find_group_by_buddy(GJ_GC(gjc), buddyname); | |
1273 debug_printf("removing buddy [1]: %s, from group: %s\n", | |
1274 buddyname, group->name); | |
1275 remove_buddy(GJ_GC(gjc), group, b); | |
1276 do_export(GJ_GC(gjc)); | |
1277 } | |
1278 } | |
1279 g_free(buddyname); | |
1280 | |
1281 } | |
1282 | |
1283 static void jabber_handleroster(gjconn gjc, xmlnode querynode) | |
2086 | 1284 { |
1285 xmlnode x; | |
1286 | |
1287 x = xmlnode_get_firstchild(querynode); | |
1288 while (x) { | |
2956 | 1289 jabber_handlebuddy(gjc, x); |
2086 | 1290 x = xmlnode_get_nextsibling(x); |
1291 } | |
1292 | |
1293 x = jutil_presnew(0, NULL, "Online"); | |
2956 | 1294 gjab_send(gjc, x); |
2086 | 1295 xmlnode_free(x); |
1296 } | |
1297 | |
2956 | 1298 static void jabber_handleauthresp(gjconn gjc, jpacket p) |
2086 | 1299 { |
1300 if (jpacket_subtype(p) == JPACKET__RESULT) { | |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1301 if (xmlnode_has_children(p->x)) { |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1302 xmlnode query = xmlnode_get_tag(p->x, "query"); |
2975 | 1303 set_login_progress(GJ_GC(gjc), 4, _("Authenticating")); |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1304 if (!xmlnode_get_tag(query, "digest")) { |
2956 | 1305 g_free(gjc->sid); |
1306 gjc->sid = NULL; | |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1307 } |
2956 | 1308 gjab_auth(gjc); |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1309 } else { |
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1310 debug_printf("auth success\n"); |
2086 | 1311 |
2956 | 1312 account_online(GJ_GC(gjc)); |
1313 serv_finish_login(GJ_GC(gjc)); | |
1314 | |
1315 if (bud_list_cache_exists(GJ_GC(gjc))) | |
1316 do_import(GJ_GC(gjc), NULL); | |
1317 | |
1318 ((struct jabber_data *)GJ_GC(gjc)->proto_data)->did_import = TRUE; | |
1319 | |
1320 gjab_reqroster(gjc); | |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1321 } |
2086 | 1322 } else { |
1323 xmlnode xerr; | |
1324 char *errmsg = NULL; | |
1325 int errcode = 0; | |
2956 | 1326 struct jabber_data *jd = GJ_GC(gjc)->proto_data; |
2086 | 1327 |
1328 debug_printf("auth failed\n"); | |
1329 xerr = xmlnode_get_tag(p->x, "error"); | |
1330 if (xerr) { | |
1331 char msg[BUF_LONG]; | |
1332 errmsg = xmlnode_get_data(xerr); | |
1333 if (xmlnode_get_attrib(xerr, "code")) { | |
1334 errcode = atoi(xmlnode_get_attrib(xerr, "code")); | |
1335 g_snprintf(msg, sizeof(msg), "Error %d: %s", errcode, errmsg); | |
1336 } else | |
1337 g_snprintf(msg, sizeof(msg), "%s", errmsg); | |
2956 | 1338 hide_login_progress(GJ_GC(gjc), msg); |
2086 | 1339 } else { |
2975 | 1340 hide_login_progress(GJ_GC(gjc), _("Unknown login error")); |
2086 | 1341 } |
1342 | |
2800
0ad63a625eec
[gaim-migrate @ 2813]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2791
diff
changeset
|
1343 jd->die = TRUE; |
2086 | 1344 } |
1345 } | |
1346 | |
2956 | 1347 static void jabber_handleversion(gjconn gjc, xmlnode iqnode) { |
2086 | 1348 xmlnode querynode, x; |
1349 char *id, *from; | |
1350 char os[1024]; | |
1351 struct utsname osinfo; | |
1352 | |
1353 uname(&osinfo); | |
1354 g_snprintf(os, sizeof os, "%s %s %s", osinfo.sysname, osinfo.release, osinfo.machine); | |
1355 | |
1356 id = xmlnode_get_attrib(iqnode, "id"); | |
1357 from = xmlnode_get_attrib(iqnode, "from"); | |
1358 | |
1359 x = jutil_iqnew(JPACKET__RESULT, NS_VERSION); | |
1360 | |
1361 xmlnode_put_attrib(x, "to", from); | |
1362 xmlnode_put_attrib(x, "id", id); | |
1363 querynode = xmlnode_get_tag(x, "query"); | |
1364 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "name"), PACKAGE, -1); | |
1365 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "version"), VERSION, -1); | |
1366 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "os"), os, -1); | |
1367 | |
2956 | 1368 gjab_send(gjc, x); |
2086 | 1369 |
1370 xmlnode_free(x); | |
1371 } | |
1372 | |
2956 | 1373 static void jabber_handletime(gjconn gjc, xmlnode iqnode) { |
2086 | 1374 xmlnode querynode, x; |
1375 char *id, *from; | |
1376 time_t now_t; | |
1377 struct tm *now; | |
1378 char buf[1024]; | |
1379 | |
1380 time(&now_t); | |
1381 now = localtime(&now_t); | |
1382 | |
1383 id = xmlnode_get_attrib(iqnode, "id"); | |
1384 from = xmlnode_get_attrib(iqnode, "from"); | |
1385 | |
1386 x = jutil_iqnew(JPACKET__RESULT, NS_TIME); | |
1387 | |
1388 xmlnode_put_attrib(x, "to", from); | |
1389 xmlnode_put_attrib(x, "id", id); | |
1390 querynode = xmlnode_get_tag(x, "query"); | |
1391 | |
1392 strftime(buf, 1024, "%Y%m%dT%T", now); | |
1393 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "utc"), buf, -1); | |
1394 strftime(buf, 1024, "%Z", now); | |
1395 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "tz"), buf, -1); | |
1396 strftime(buf, 1024, "%d %b %Y %T", now); | |
1397 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "display"), buf, -1); | |
1398 | |
2956 | 1399 gjab_send(gjc, x); |
2086 | 1400 |
1401 xmlnode_free(x); | |
1402 } | |
1403 | |
2956 | 1404 static void jabber_handlelast(gjconn gjc, xmlnode iqnode) { |
2086 | 1405 xmlnode x, querytag; |
1406 char *id, *from; | |
2956 | 1407 struct jabber_data *jd = GJ_GC(gjc)->proto_data; |
2086 | 1408 char idle_time[32]; |
1409 | |
1410 id = xmlnode_get_attrib(iqnode, "id"); | |
1411 from = xmlnode_get_attrib(iqnode, "from"); | |
1412 | |
1413 x = jutil_iqnew(JPACKET__RESULT, "jabber:iq:last"); | |
1414 | |
1415 xmlnode_put_attrib(x, "to", from); | |
1416 xmlnode_put_attrib(x, "id", id); | |
1417 querytag = xmlnode_get_tag(x, "query"); | |
1418 g_snprintf(idle_time, sizeof idle_time, "%ld", jd->idle ? time(NULL) - jd->idle : 0); | |
1419 xmlnode_put_attrib(querytag, "seconds", idle_time); | |
1420 | |
2956 | 1421 gjab_send(gjc, x); |
2086 | 1422 xmlnode_free(x); |
1423 } | |
1424 | |
2956 | 1425 /* |
1426 * delete == TRUE: delete found entry | |
1427 * | |
1428 * returns pointer to (local) copy of value if found, NULL otherwise | |
1429 * | |
1430 * Note: non-reentrant! Local static storage re-used on subsequent calls. | |
1431 * If you're going to need to keep the returned value, make a copy! | |
1432 */ | |
1433 static gchar *jabber_track_queries(GHashTable *queries, gchar *key, gboolean delete) | |
1434 { | |
1435 gpointer my_key, my_val; | |
1436 static gchar *ret_val = NULL; | |
1437 | |
1438 if(ret_val != NULL) { | |
1439 g_free(ret_val); | |
1440 ret_val = NULL; | |
1441 } | |
1442 | |
1443 /* self-protection */ | |
1444 if(queries != NULL && key != NULL) { | |
1445 if(g_hash_table_lookup_extended(queries, key, &my_key, &my_val)) { | |
1446 ret_val = g_strdup((gchar *) my_val); | |
1447 if(delete) { | |
1448 g_hash_table_remove(queries, key); | |
1449 g_free(my_key); | |
1450 g_free(my_val); | |
1451 } | |
1452 } | |
1453 } | |
1454 | |
1455 return(ret_val); | |
1456 } | |
1457 | |
1458 static void jabber_handlepacket(gjconn gjc, jpacket p) | |
2086 | 1459 { |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1460 char *id; |
2086 | 1461 switch (p->type) { |
1462 case JPACKET_MESSAGE: | |
2956 | 1463 jabber_handlemessage(gjc, p); |
2086 | 1464 break; |
1465 case JPACKET_PRESENCE: | |
2956 | 1466 jabber_handlepresence(gjc, p); |
2086 | 1467 break; |
1468 case JPACKET_IQ: | |
1469 debug_printf("jpacket_subtype: %d\n", jpacket_subtype(p)); | |
1470 | |
2956 | 1471 id = xmlnode_get_attrib(p->x, "id"); |
1472 if (id != NULL && !strcmp(id, IQID_AUTH)) { | |
1473 jabber_handleauthresp(gjc, p); | |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1474 break; |
2086 | 1475 } |
1476 | |
1477 if (jpacket_subtype(p) == JPACKET__SET) { | |
2956 | 1478 xmlnode querynode; |
1479 querynode = xmlnode_get_tag(p->x, "query"); | |
1480 if (NSCHECK(querynode, "jabber:iq:roster")) { | |
1481 jabber_handlebuddy(gjc, xmlnode_get_firstchild(querynode)); | |
1482 } | |
2086 | 1483 } else if (jpacket_subtype(p) == JPACKET__GET) { |
1484 xmlnode querynode; | |
1485 querynode = xmlnode_get_tag(p->x, "query"); | |
2814
f4f9e5a01890
[gaim-migrate @ 2827]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2800
diff
changeset
|
1486 if (NSCHECK(querynode, NS_VERSION)) { |
2956 | 1487 jabber_handleversion(gjc, p->x); |
2086 | 1488 } else if (NSCHECK(querynode, NS_TIME)) { |
2956 | 1489 jabber_handletime(gjc, p->x); |
2086 | 1490 } else if (NSCHECK(querynode, "jabber:iq:last")) { |
2956 | 1491 jabber_handlelast(gjc, p->x); |
2086 | 1492 } |
1493 } else if (jpacket_subtype(p) == JPACKET__RESULT) { | |
1494 xmlnode querynode, vcard; | |
1495 char *xmlns, *from; | |
1496 | |
2956 | 1497 /* |
1498 * TBD: ISTM maybe this part could use a serious re-work? | |
1499 */ | |
2086 | 1500 from = xmlnode_get_attrib(p->x, "from"); |
1501 querynode = xmlnode_get_tag(p->x, "query"); | |
1502 vcard = xmlnode_get_tag(p->x, "vCard"); | |
2316
ebb5ecb2cd5b
[gaim-migrate @ 2326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2309
diff
changeset
|
1503 if (!vcard) |
ebb5ecb2cd5b
[gaim-migrate @ 2326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2309
diff
changeset
|
1504 vcard = xmlnode_get_tag(p->x, "VCARD"); |
2086 | 1505 |
1506 if (NSCHECK(querynode, NS_ROSTER)) { | |
2956 | 1507 jabber_handleroster(gjc, querynode); |
2086 | 1508 } else if (NSCHECK(querynode, NS_VCARD)) { |
2956 | 1509 jabber_track_queries(gjc->queries, id, TRUE); /* delete query track */ |
1510 jabber_handlevcard(gjc, querynode, from); | |
2316
ebb5ecb2cd5b
[gaim-migrate @ 2326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2309
diff
changeset
|
1511 } else if (vcard) { |
2956 | 1512 jabber_track_queries(gjc->queries, id, TRUE); /* delete query track */ |
1513 jabber_handlevcard(gjc, vcard, from); | |
1514 } else if((xmlns = xmlnode_get_attrib(querynode, "xmlns")) != NULL) { | |
1515 debug_printf("jabber:iq:query: %s\n", xmlns); | |
2086 | 1516 } else { |
2956 | 1517 char *val; |
1518 | |
1519 debug_printf("jabber:iq: %s\n", xmlnode2str(p->x)); | |
1520 | |
1521 /* handle "null" query results */ | |
1522 if((val = jabber_track_queries(gjc->queries, id, TRUE)) != NULL) { | |
1523 if(strcmp((char *) val, "vCard") == 0) { | |
1524 /* | |
1525 * No actual vCard, but there's other stuff. This | |
1526 * way the user always gets some kind of response. | |
1527 */ | |
1528 jabber_handlevcard(gjc, NULL, from); | |
1529 } | |
1530 } | |
2086 | 1531 } |
1532 | |
1533 } else if (jpacket_subtype(p) == JPACKET__ERROR) { | |
1534 xmlnode xerr; | |
1535 char *from, *errmsg = NULL; | |
1536 int errcode = 0; | |
1537 | |
1538 from = xmlnode_get_attrib(p->x, "from"); | |
1539 xerr = xmlnode_get_tag(p->x, "error"); | |
1540 if (xerr) { | |
1541 errmsg = xmlnode_get_data(xerr); | |
1542 if (xmlnode_get_attrib(xerr, "code")) | |
1543 errcode = atoi(xmlnode_get_attrib(xerr, "code")); | |
1544 } | |
1545 | |
1546 from = g_strdup_printf("Error %d (%s)", errcode, from); | |
1547 do_error_dialog(errmsg, from); | |
1548 g_free(from); | |
1549 | |
1550 } | |
1551 | |
1552 break; | |
1553 case JPACKET_S10N: | |
2956 | 1554 jabber_handles10n(gjc, p); |
2086 | 1555 break; |
1556 default: | |
1557 debug_printf("jabber: packet type %d (%s)\n", p->type, xmlnode2str(p->x)); | |
1558 } | |
1559 | |
1560 xmlnode_free(p->x); | |
1561 | |
1562 return; | |
1563 } | |
1564 | |
2956 | 1565 static void jabber_handlestate(gjconn gjc, int state) |
2086 | 1566 { |
1567 switch (state) { | |
1568 case JCONN_STATE_OFF: | |
3074 | 1569 if(gjc->was_connected) { |
1570 hide_login_progress_error(GJ_GC(gjc), _("Connection lost")); | |
1571 } else { | |
1572 hide_login_progress(GJ_GC(gjc), _("Unable to connect")); | |
1573 } | |
2956 | 1574 signoff(GJ_GC(gjc)); |
2086 | 1575 break; |
1576 case JCONN_STATE_CONNECTED: | |
3074 | 1577 gjc->was_connected = 1; |
2975 | 1578 set_login_progress(GJ_GC(gjc), 2, _("Connected")); |
2086 | 1579 break; |
1580 case JCONN_STATE_ON: | |
2975 | 1581 set_login_progress(GJ_GC(gjc), 3, _("Requesting Authentication Method")); |
2956 | 1582 gjab_reqauth(gjc); |
2086 | 1583 break; |
1584 default: | |
1585 debug_printf("state change: %d\n", state); | |
1586 } | |
1587 return; | |
1588 } | |
1589 | |
1590 static void jabber_login(struct aim_user *user) | |
1591 { | |
1592 struct gaim_connection *gc = new_gaim_conn(user); | |
1593 struct jabber_data *jd = gc->proto_data = g_new0(struct jabber_data, 1); | |
1594 char *loginname = create_valid_jid(user->username, DEFAULT_SERVER, "GAIM"); | |
1595 | |
1596 jd->hash = g_hash_table_new(g_str_hash, g_str_equal); | |
2956 | 1597 jd->chats = NULL; /* we have no chats yet */ |
2086 | 1598 |
2975 | 1599 set_login_progress(gc, 1, _("Connecting")); |
2086 | 1600 |
2956 | 1601 if (!(jd->gjc = gjab_new(loginname, user->password, gc))) { |
2086 | 1602 g_free(loginname); |
1603 debug_printf("jabber: unable to connect (jab_new failed)\n"); | |
2975 | 1604 hide_login_progress(gc, _("Unable to connect")); |
2086 | 1605 signoff(gc); |
1606 return; | |
1607 } | |
1608 | |
1609 g_free(loginname); | |
2956 | 1610 gjab_state_handler(jd->gjc, jabber_handlestate); |
1611 gjab_packet_handler(jd->gjc, jabber_handlepacket); | |
1612 jd->gjc->queries = g_hash_table_new(g_str_hash, g_str_equal); | |
1613 gjab_start(jd->gjc); | |
2086 | 1614 } |
1615 | |
1616 static gboolean jabber_destroy_hash(gpointer key, gpointer val, gpointer data) { | |
1617 g_free(key); | |
1618 g_free(val); | |
1619 return TRUE; | |
1620 } | |
1621 | |
1622 static gboolean jabber_free(gpointer data) | |
1623 { | |
2956 | 1624 struct jabber_data *jd = data; |
1625 | |
1626 gjab_delete(jd->gjc); | |
1627 g_free(jd->gjc->sid); | |
1628 jd->gjc = NULL; | |
1629 g_free(jd); | |
1630 | |
2086 | 1631 return FALSE; |
1632 } | |
1633 | |
1634 static void jabber_close(struct gaim_connection *gc) | |
1635 { | |
1636 struct jabber_data *jd = gc->proto_data; | |
2956 | 1637 |
1638 if(jd) { | |
1639 GSList *jcs = jd->chats; | |
1640 | |
1641 /* Free-up the jabber_chat struct allocs and the list */ | |
1642 while (jcs) { | |
1643 g_free(jcs->data); | |
1644 jcs = jcs->next; | |
1645 } | |
1646 g_slist_free(jd->chats); | |
1647 | |
1648 /* Free-up the away status memories and the list */ | |
1649 if(jd->hash != NULL) { | |
1650 g_hash_table_foreach_remove(jd->hash, jabber_destroy_hash, NULL); | |
1651 g_hash_table_destroy(jd->hash); | |
1652 jd->hash = NULL; | |
1653 } | |
1654 | |
1655 /* Free-up the pending queries memories and the list */ | |
1656 if(jd->gjc->queries != NULL) { | |
1657 g_hash_table_foreach_remove(jd->gjc->queries, jabber_destroy_hash, NULL); | |
1658 g_hash_table_destroy(jd->gjc->queries); | |
1659 jd->gjc->queries = NULL; | |
1660 } | |
1661 } | |
2300
d2686f757d6e
[gaim-migrate @ 2310]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2289
diff
changeset
|
1662 if (gc->inpa) |
d2686f757d6e
[gaim-migrate @ 2310]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2289
diff
changeset
|
1663 gaim_input_remove(gc->inpa); |
2956 | 1664 |
1665 if(jd) { | |
1666 g_timeout_add(50, jabber_free, jd); | |
1667 xmlnode_free(jd->gjc->current); | |
1668 } | |
2086 | 1669 gc->proto_data = NULL; |
1670 } | |
1671 | |
3033 | 1672 static int jabber_send_im(struct gaim_connection *gc, char *who, char *message, int len, int flags) |
2086 | 1673 { |
1674 xmlnode x, y; | |
1675 char *realwho; | |
2956 | 1676 gjconn gjc = ((struct jabber_data *)gc->proto_data)->gjc; |
2086 | 1677 |
1678 if (!who || !message) | |
2123
56c4382f2909
[gaim-migrate @ 2133]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2112
diff
changeset
|
1679 return 0; |
2086 | 1680 |
1681 x = xmlnode_new_tag("message"); | |
2956 | 1682 /* Bare username and "username" not the server itself? */ |
1683 if (!strchr(who, '@') && strcmp(who, gjc->user->server) != 0) | |
1684 realwho = g_strdup_printf("%s@%s", who, gjc->user->server); | |
2086 | 1685 else |
1686 realwho = g_strdup(who); | |
1687 xmlnode_put_attrib(x, "to", realwho); | |
1688 g_free(realwho); | |
1689 | |
2278
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
1690 xmlnode_insert_tag(x, "gaim"); |
2086 | 1691 xmlnode_put_attrib(x, "type", "chat"); |
1692 | |
1693 if (message && strlen(message)) { | |
1694 char *utf8 = str_to_utf8(message); | |
1695 y = xmlnode_insert_tag(x, "body"); | |
1696 xmlnode_insert_cdata(y, utf8, -1); | |
1697 g_free(utf8); | |
1698 } | |
1699 | |
2956 | 1700 gjab_send(((struct jabber_data *)gc->proto_data)->gjc, x); |
2086 | 1701 xmlnode_free(x); |
2303
f5bf315e6104
[gaim-migrate @ 2313]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2300
diff
changeset
|
1702 return 1; |
2086 | 1703 } |
1704 | |
3105 | 1705 /* |
1706 * Add/update buddy's roster entry on server | |
1707 */ | |
1708 static void jabber_roster_update(struct gaim_connection *gc, char *name) | |
1709 { | |
1710 xmlnode x, y; | |
1711 char *realwho; | |
1712 gjconn gjc; | |
1713 struct buddy *buddy = NULL; | |
1714 struct group *buddy_group = NULL; | |
1715 | |
1716 if(gc && gc->proto_data && ((struct jabber_data *)gc->proto_data)->gjc && name) { | |
1717 gjc = ((struct jabber_data *)gc->proto_data)->gjc; | |
1718 | |
1719 if (!strchr(name, '@')) | |
1720 realwho = g_strdup_printf("%s@%s", name, gjc->user->server); | |
1721 else { | |
1722 jid who = jid_new(gjc->p, name); | |
1723 if (who->user == NULL) { | |
1724 /* FIXME: transport */ | |
1725 return; | |
1726 } | |
1727 realwho = g_strdup_printf("%s@%s", who->user, who->server); | |
1728 } | |
1729 | |
1730 | |
1731 x = jutil_iqnew(JPACKET__SET, NS_ROSTER); | |
1732 y = xmlnode_insert_tag(xmlnode_get_tag(x, "query"), "item"); | |
1733 xmlnode_put_attrib(y, "jid", realwho); | |
1734 | |
1735 | |
1736 /* If we can find the buddy, there's an alias for him, it's not 0-length | |
1737 * and it doesn't match his JID, add the "name" attribute. | |
1738 */ | |
1739 if((buddy = find_buddy(gc, realwho)) != NULL && | |
3136 | 1740 buddy->show != NULL && buddy->show[0] != '\0' && strcmp(realwho, buddy->show)) { |
3105 | 1741 |
1742 xmlnode_put_attrib(y, "name", buddy->show); | |
1743 } | |
1744 | |
1745 /* | |
1746 * Find out what group the buddy's in and send that along | |
1747 * with the roster item. | |
1748 */ | |
1749 if((buddy_group = find_group_by_buddy(gc, realwho)) != NULL) { | |
1750 xmlnode z; | |
1751 z = xmlnode_insert_tag(y, "group"); | |
1752 xmlnode_insert_cdata(z, buddy_group->name, -1); | |
1753 } | |
1754 | |
1755 gjab_send(((struct jabber_data *)gc->proto_data)->gjc, x); | |
1756 | |
1757 xmlnode_free(x); | |
1758 g_free(realwho); | |
1759 } | |
1760 } | |
1761 | |
3136 | 1762 /* |
1763 * Change buddy's group on server roster | |
1764 */ | |
1765 static void jabber_group_change(struct gaim_connection *gc, char *name, char *old_group, char *new_group) | |
1766 { | |
1767 if(strcmp(old_group, new_group)) { | |
1768 jabber_roster_update(gc, name); | |
1769 } | |
1770 } | |
1771 | |
2086 | 1772 static void jabber_add_buddy(struct gaim_connection *gc, char *name) |
1773 { | |
3136 | 1774 xmlnode x; |
2086 | 1775 char *realwho; |
2956 | 1776 gjconn gjc = ((struct jabber_data *)gc->proto_data)->gjc; |
2086 | 1777 |
1778 if (!((struct jabber_data *)gc->proto_data)->did_import) | |
1779 return; | |
1780 | |
1781 if (!name) | |
1782 return; | |
1783 | |
1784 if (!strcmp(gc->username, name)) | |
1785 return; | |
1786 | |
1787 if (!strchr(name, '@')) | |
2956 | 1788 realwho = g_strdup_printf("%s@%s", name, gjc->user->server); |
2086 | 1789 else { |
2956 | 1790 jid who = jid_new(gjc->p, name); |
2086 | 1791 if (who->user == NULL) { |
1792 /* FIXME: transport */ | |
1793 return; | |
1794 } | |
1795 realwho = g_strdup_printf("%s@%s", who->user, who->server); | |
1796 } | |
1797 | |
1798 x = xmlnode_new_tag("presence"); | |
1799 xmlnode_put_attrib(x, "to", realwho); | |
1800 xmlnode_put_attrib(x, "type", "subscribe"); | |
2956 | 1801 gjab_send(((struct jabber_data *)gc->proto_data)->gjc, x); |
1802 xmlnode_free(x); | |
2086 | 1803 |
3105 | 1804 jabber_roster_update(gc, realwho); |
1805 | |
2086 | 1806 g_free(realwho); |
1807 } | |
1808 | |
2681
37d80035e77f
[gaim-migrate @ 2694]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2635
diff
changeset
|
1809 static void jabber_remove_buddy(struct gaim_connection *gc, char *name, char *group) |
2086 | 1810 { |
3048 | 1811 xmlnode x; |
2086 | 1812 char *realwho; |
2956 | 1813 gjconn gjc = ((struct jabber_data *)gc->proto_data)->gjc; |
2086 | 1814 |
1815 if (!name) | |
1816 return; | |
1817 | |
1818 if (!strchr(name, '@')) | |
2956 | 1819 realwho = g_strdup_printf("%s@%s", name, gjc->user->server); |
2086 | 1820 else |
1821 realwho = g_strdup(name); | |
1822 | |
2956 | 1823 x = xmlnode_new_tag("presence"); |
1824 xmlnode_put_attrib(x, "to", realwho); | |
1825 xmlnode_put_attrib(x, "type", "unsubscribe"); | |
1826 gjab_send(((struct jabber_data *)gc->proto_data)->gjc, x); | |
2086 | 1827 g_free(realwho); |
1828 xmlnode_free(x); | |
1829 } | |
1830 | |
1831 static char **jabber_list_icon(int uc) | |
1832 { | |
1833 switch (uc) { | |
1834 case UC_AWAY: | |
1835 return available_away_xpm; | |
1836 case UC_CHAT: | |
1837 return available_chat_xpm; | |
1838 case UC_XA: | |
1839 return available_xa_xpm; | |
1840 case UC_DND: | |
1841 return available_dnd_xpm; | |
1842 default: | |
1843 return available_xpm; | |
1844 } | |
1845 } | |
1846 | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1847 static GList *jabber_chat_info(struct gaim_connection *gc) |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1848 { |
2956 | 1849 gjconn gjc = ((struct jabber_data *)gc->proto_data)->gjc; |
1850 | |
1851 static char *confserv = NULL; /* this pointer must be persistent */ | |
1852 gchar *server; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1853 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1854 GList *m = NULL; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1855 struct proto_chat_entry *pce; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1856 |
2956 | 1857 /* This is a scientific wild-ass guess... |
1858 * | |
1859 * If there are more than two "components" to the current server name, | |
1860 * lop-off the left-most component and replace with "conference." | |
1861 */ | |
1862 if(confserv != NULL) { | |
1863 g_free(confserv); /* dispose of the old value */ | |
1864 } | |
1865 | |
1866 if((server = g_strdup(gjc->user->server)) == NULL) { | |
1867 confserv = g_strdup(DEFAULT_GROUPCHAT); | |
1868 } else { | |
1869 gchar **splits, **index; | |
1870 gchar *tmp; | |
1871 int cnt = 0; | |
1872 | |
1873 | |
1874 index = splits = g_strsplit(server, ".", -1); /* split the connected server */ | |
1875 | |
1876 while(*(index++)) /* index to the end--counting the parts */ | |
1877 ++cnt; | |
1878 | |
1879 /* | |
1880 * If we've more than two parts, point to the second part. Else point | |
1881 * to the start. | |
1882 */ | |
1883 if(cnt > 2) { | |
1884 index -= cnt; | |
1885 } else { | |
1886 index = splits; | |
1887 } | |
1888 | |
1889 /* Put it together */ | |
1890 confserv = g_strjoin(".", "conference", (tmp = g_strjoinv(".", index)), NULL); | |
1891 | |
1892 g_free(server); /* we don't need this stuff no more */ | |
1893 g_free(tmp); | |
1894 g_strfreev(splits); | |
1895 } | |
1896 | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1897 pce = g_new0(struct proto_chat_entry, 1); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1898 pce->label = _("Room:"); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1899 m = g_list_append(m, pce); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1900 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1901 pce = g_new0(struct proto_chat_entry, 1); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1902 pce->label = _("Server:"); |
2956 | 1903 pce->def = confserv; |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1904 m = g_list_append(m, pce); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1905 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1906 pce = g_new0(struct proto_chat_entry, 1); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1907 pce->label = _("Handle:"); |
2956 | 1908 pce->def = gjc->user->user; |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1909 m = g_list_append(m, pce); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1910 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1911 return m; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1912 } |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1913 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1914 static void jabber_join_chat(struct gaim_connection *gc, GList *data) |
2086 | 1915 { |
1916 xmlnode x; | |
1917 char *realwho; | |
2956 | 1918 gjconn gjc = ((struct jabber_data *)gc->proto_data)->gjc; |
1919 GSList *jcs = ((struct jabber_data *)gc->proto_data)->chats; | |
2086 | 1920 struct jabber_chat *jc; |
2956 | 1921 jid Jid; |
2086 | 1922 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1923 if (!data || !data->next || !data->next->next) |
2086 | 1924 return; |
1925 | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1926 realwho = create_valid_jid(data->data, data->next->data, |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1927 data->next->next->data); |
2086 | 1928 debug_printf("%s\n", realwho); |
1929 | |
2956 | 1930 Jid = jid_new(gjc->p, realwho); |
1931 | |
1932 if((jc = find_any_chat(gc, Jid)) != NULL) { | |
1933 free(Jid); /* don't need it, after all */ | |
1934 switch(jc->state) { | |
1935 case JCS_PENDING: | |
1936 debug_printf("attempt to re-join already pending Jabber chat! (ignoring)\n"); | |
1937 g_free(realwho); /* yuck! */ | |
1938 return; | |
1939 case JCS_ACTIVE: | |
1940 debug_printf("attempt to re-join already active Jabber chat! (ignoring)\n"); | |
1941 g_free(realwho); /* yuck! */ | |
1942 return; | |
1943 case JCS_CLOSED: | |
1944 debug_printf("rejoining previously closed Jabber chat\n"); | |
1945 break; | |
1946 default: | |
1947 debug_printf("found Jabber chat in unknown state! (ignoring)\n"); | |
1948 g_free(realwho); /* yuck! */ | |
1949 return; | |
1950 } | |
1951 } else { | |
1952 debug_printf("joining completely new Jabber chat\n"); | |
1953 jc = g_new0(struct jabber_chat, 1); | |
1954 jc->Jid = Jid; | |
1955 jc->gc = gc; | |
1956 ((struct jabber_data *)gc->proto_data)->chats = g_slist_append(jcs, jc); | |
1957 } | |
1958 | |
1959 jc->state = JCS_PENDING; | |
1960 | |
2086 | 1961 x = jutil_presnew(0, realwho, NULL); |
2956 | 1962 gjab_send(gjc, x); |
2086 | 1963 xmlnode_free(x); |
1964 g_free(realwho); | |
1965 } | |
1966 | |
1967 static void jabber_chat_invite(struct gaim_connection *gc, int id, char *message, char *name) | |
1968 { | |
1969 xmlnode x, y; | |
1970 struct jabber_data *jd = gc->proto_data; | |
2956 | 1971 gjconn gjc = jd->gjc; |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1972 struct jabber_chat *jc = NULL; |
2086 | 1973 char *realwho, *subject; |
1974 | |
1975 if (!name) | |
1976 return; | |
1977 | |
1978 /* find which chat we're inviting to */ | |
2956 | 1979 if(jabber_find_chat_by_convo_id(gc, id, &jc) != 0) |
2086 | 1980 return; |
1981 | |
1982 x = xmlnode_new_tag("message"); | |
1983 if (!strchr(name, '@')) | |
2956 | 1984 realwho = g_strdup_printf("%s@%s", name, gjc->user->server); |
2086 | 1985 else |
1986 realwho = g_strdup(name); | |
1987 xmlnode_put_attrib(x, "to", realwho); | |
1988 g_free(realwho); | |
1989 | |
1990 y = xmlnode_insert_tag(x, "x"); | |
1991 xmlnode_put_attrib(y, "xmlns", "jabber:x:conference"); | |
1992 subject = g_strdup_printf("%s@%s", jc->Jid->user, jc->Jid->server); | |
1993 xmlnode_put_attrib(y, "jid", subject); | |
1994 g_free(subject); | |
1995 | |
1996 if (message && strlen(message)) { | |
1997 char *utf8 = str_to_utf8(message); | |
1998 y = xmlnode_insert_tag(x, "body"); | |
1999 xmlnode_insert_cdata(y, utf8, -1); | |
2000 g_free(utf8); | |
2001 } | |
2002 | |
2956 | 2003 gjab_send(((struct jabber_data *)gc->proto_data)->gjc, x); |
2086 | 2004 xmlnode_free(x); |
2005 } | |
2006 | |
2007 static void jabber_chat_leave(struct gaim_connection *gc, int id) | |
2008 { | |
2009 struct jabber_data *jd = gc->proto_data; | |
2956 | 2010 gjconn gjc = jd->gjc; |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2011 struct jabber_chat *jc = NULL; |
2086 | 2012 char *realwho; |
2013 xmlnode x; | |
2014 | |
2956 | 2015 /* Find out which chat we're leaving */ |
2016 if(jabber_find_chat_by_convo_id(gc, id, &jc) != 0) | |
2086 | 2017 return; |
2018 | |
2019 realwho = g_strdup_printf("%s@%s", jc->Jid->user, jc->Jid->server); | |
2020 x = jutil_presnew(0, realwho, NULL); | |
2021 g_free(realwho); | |
2022 xmlnode_put_attrib(x, "type", "unavailable"); | |
2956 | 2023 gjab_send(gjc, x); |
2086 | 2024 xmlnode_free(x); |
2025 jc->b = NULL; | |
2026 } | |
2027 | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
2028 static int jabber_chat_send(struct gaim_connection *gc, int id, char *message) |
2086 | 2029 { |
2030 xmlnode x, y; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2031 struct jabber_chat *jc = NULL; |
2086 | 2032 char *chatname; |
2956 | 2033 int retval = 0; |
2034 | |
2035 /* Find out which chat we're sending to */ | |
2036 if((retval = jabber_find_chat_by_convo_id(gc, id, &jc)) != 0) | |
2037 return(retval); | |
2086 | 2038 |
2039 x = xmlnode_new_tag("message"); | |
2040 xmlnode_put_attrib(x, "from", jid_full(jc->Jid)); | |
2041 chatname = g_strdup_printf("%s@%s", jc->Jid->user, jc->Jid->server); | |
2042 xmlnode_put_attrib(x, "to", chatname); | |
2043 g_free(chatname); | |
2044 xmlnode_put_attrib(x, "type", "groupchat"); | |
2045 | |
2289
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2046 if (message && strlen(message) > strlen("/topic ") && |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2047 !g_strncasecmp(message, "/topic ", strlen("/topic "))) { |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2048 char buf[8192]; |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2049 char *utf8 = str_to_utf8(message + strlen("/topic ")); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2050 y = xmlnode_insert_tag(x, "subject"); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2051 xmlnode_insert_cdata(y, utf8, -1); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2052 y = xmlnode_insert_tag(x, "body"); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2053 g_snprintf(buf, sizeof(buf), "/me has changed the subject to: %s", utf8); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2054 xmlnode_insert_cdata(y, buf, -1); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2055 g_free(utf8); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
2056 } else if (message && strlen(message)) { |
2086 | 2057 char *utf8 = str_to_utf8(message); |
2058 y = xmlnode_insert_tag(x, "body"); | |
2059 xmlnode_insert_cdata(y, utf8, -1); | |
2060 g_free(utf8); | |
2061 } | |
2062 | |
2956 | 2063 gjab_send(((struct jabber_data *)gc->proto_data)->gjc, x); |
2086 | 2064 xmlnode_free(x); |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
2065 return 0; |
2086 | 2066 } |
2067 | |
2068 static void jabber_chat_whisper(struct gaim_connection *gc, int id, char *who, char *message) | |
2069 { | |
2070 xmlnode x, y; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
2071 struct jabber_chat *jc = NULL; |
2086 | 2072 char *chatname; |
2073 | |
2956 | 2074 /* Find out which chat we're whispering to */ |
2075 if(jabber_find_chat_by_convo_id(gc, id, &jc) != 0) | |
2086 | 2076 return; |
2077 | |
2078 x = xmlnode_new_tag("message"); | |
2079 xmlnode_put_attrib(x, "from", jid_full(jc->Jid)); | |
2080 chatname = g_strdup_printf("%s@%s/%s", jc->Jid->user, jc->Jid->server, who); | |
2081 xmlnode_put_attrib(x, "to", chatname); | |
2082 g_free(chatname); | |
2083 xmlnode_put_attrib(x, "type", "normal"); | |
2084 | |
2085 if (message && strlen(message)) { | |
2086 char *utf8 = str_to_utf8(message); | |
2087 y = xmlnode_insert_tag(x, "body"); | |
2088 xmlnode_insert_cdata(y, utf8, -1); | |
2089 g_free(utf8); | |
2090 } | |
2091 | |
2956 | 2092 gjab_send(((struct jabber_data *)gc->proto_data)->gjc, x); |
2086 | 2093 xmlnode_free(x); |
2094 } | |
2095 | |
2096 static char *jabber_normalize(const char *s) | |
2097 { | |
2098 static char buf[BUF_LEN]; | |
2099 char *t, *u; | |
2100 int x = 0; | |
2101 | |
2102 g_return_val_if_fail((s != NULL), NULL); | |
2103 | |
2956 | 2104 /* Somebody called us with s == NULL once... */ |
2105 if(s == NULL) { | |
2106 return(NULL); | |
2107 } else { | |
2108 u = t = g_strdup(s); | |
2109 | |
2110 g_strdown(t); | |
2111 | |
2112 while (*t && (x < BUF_LEN - 1)) { | |
2113 if (*t != ' ') | |
2114 buf[x++] = *t; | |
2115 t++; | |
2116 } | |
2117 buf[x] = '\0'; | |
2118 g_free(u); | |
2119 | |
2120 if (!strchr(buf, '@')) { | |
2121 strcat(buf, "@jabber.org"); /* this isn't always right, but eh */ | |
2122 } else if ((u = strchr(strchr(buf, '@'), '/')) != NULL) { | |
2123 *u = '\0'; | |
2124 } | |
2125 | |
2126 return buf; | |
2086 | 2127 } |
2128 } | |
2129 | |
2130 static void jabber_get_info(struct gaim_connection *gc, char *who) { | |
2131 xmlnode x; | |
2132 char *id; | |
2956 | 2133 char *realwho; |
2086 | 2134 struct jabber_data *jd = gc->proto_data; |
2956 | 2135 gjconn gjc = jd->gjc; |
2086 | 2136 |
2137 x = jutil_iqnew(JPACKET__GET, NS_VCARD); | |
2956 | 2138 /* Bare username? */ |
2139 if (!strchr(who, '@')) { | |
2140 realwho = g_strdup_printf("%s@%s", who, gjc->user->server); | |
2141 } else { | |
2142 realwho = g_strdup(who); | |
2143 } | |
2144 xmlnode_put_attrib(x, "to", realwho); | |
2145 g_free(realwho); | |
2146 | |
2147 id = gjab_getid(gjc); | |
2086 | 2148 xmlnode_put_attrib(x, "id", id); |
2149 | |
2956 | 2150 g_hash_table_insert(jd->gjc->queries, g_strdup(id), g_strdup("vCard")); |
2151 | |
2152 gjab_send(gjc, x); | |
2086 | 2153 |
2154 xmlnode_free(x); | |
2155 | |
2156 } | |
2157 | |
2956 | 2158 static void jabber_get_away_msg(struct gaim_connection *gc, char *who) { |
2159 struct jabber_data *jd = gc->proto_data; | |
2160 gjconn gjc = jd->gjc; | |
2161 char *status; | |
2162 | |
2163 /* space for all elements: Jabber I.D. + "status" + NULL (list terminator) */ | |
2164 gchar **str_arr = (gchar **) g_new(gpointer, 3); | |
2165 gchar **ap = str_arr; | |
2166 gchar *realwho, *final; | |
2167 | |
2168 /* Bare username? */ | |
2169 if (!strchr(who, '@')) { | |
2170 realwho = g_strdup_printf("%s@%s", who, gjc->user->server); | |
2171 } else { | |
2172 realwho = g_strdup(who); | |
2173 } | |
2174 *ap++ = g_strdup_printf("<B>Jabber ID:</B> %s<BR>\n", realwho); | |
2175 | |
2176 if((status = g_hash_table_lookup(jd->hash, realwho)) == NULL) { | |
3105 | 2177 status = _("Unknown"); |
2956 | 2178 } |
2179 *ap++ = g_strdup_printf("<B>Status:</B> %s<BR>\n", status); | |
2180 | |
2181 *ap = NULL; | |
2182 | |
2183 final= g_strjoinv(NULL, str_arr); | |
2184 g_strfreev(str_arr); | |
2185 | |
2186 g_show_info_text(gc, realwho, 2, final, NULL); | |
2187 g_free(realwho); | |
2188 g_free(final); | |
2189 | |
2190 } | |
2191 | |
2192 static void jabber_get_cb_info(struct gaim_connection *gc, int cid, char *who) { | |
2193 struct jabber_chat *jc = NULL; | |
2194 char *realwho; | |
2195 | |
2196 /* Find out which chat */ | |
2197 if(jabber_find_chat_by_convo_id(gc, cid, &jc) != 0) | |
2198 return; | |
2199 | |
2200 realwho = g_strdup_printf("%s@%s/%s", jc->Jid->user, jc->Jid->server, who); | |
2201 | |
2202 jabber_get_info(gc, realwho); | |
2203 g_free(realwho); | |
2204 } | |
2205 | |
2206 static void jabber_get_cb_away_msg(struct gaim_connection *gc, int cid, char *who) { | |
2207 struct jabber_chat *jc = NULL; | |
2208 char *realwho; | |
2209 | |
2210 /* Find out which chat */ | |
2211 if(jabber_find_chat_by_convo_id(gc, cid, &jc) != 0) | |
2212 return; | |
2213 | |
2214 realwho = g_strdup_printf("%s@%s/%s", jc->Jid->user, jc->Jid->server, who); | |
2215 | |
2216 jabber_get_away_msg(gc, realwho); | |
2217 | |
2218 g_free(realwho); | |
2219 | |
2220 } | |
2221 | |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2222 static GList *jabber_buddy_menu(struct gaim_connection *gc, char *who) { |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2223 GList *m = NULL; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2224 struct proto_buddy_menu *pbm; |
2086 | 2225 |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2226 pbm = g_new0(struct proto_buddy_menu, 1); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2227 pbm->label = _("Get Info"); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2228 pbm->callback = jabber_get_info; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2229 pbm->gc = gc; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2230 m = g_list_append(m, pbm); |
2956 | 2231 pbm = g_new0(struct proto_buddy_menu, 1); |
2232 pbm->label = _("Get Away Msg"); | |
2233 pbm->callback = jabber_get_away_msg; | |
2234 pbm->gc = gc; | |
2235 m = g_list_append(m, pbm); | |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2236 |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
2237 return m; |
2086 | 2238 } |
2239 | |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
2240 static GList *jabber_away_states(struct gaim_connection *gc) { |
2086 | 2241 GList *m = NULL; |
2242 | |
2243 m = g_list_append(m, "Online"); | |
2244 m = g_list_append(m, "Chatty"); | |
2245 m = g_list_append(m, "Away"); | |
2246 m = g_list_append(m, "Extended Away"); | |
2247 m = g_list_append(m, "Do Not Disturb"); | |
2248 | |
2249 return m; | |
2250 } | |
2251 | |
2252 static void jabber_set_away(struct gaim_connection *gc, char *state, char *message) | |
2253 { | |
2254 xmlnode x, y; | |
2255 struct jabber_data *jd = gc->proto_data; | |
2956 | 2256 gjconn gjc = jd->gjc; |
2086 | 2257 |
2258 gc->away = NULL; /* never send an auto-response */ | |
2259 | |
2260 x = xmlnode_new_tag("presence"); | |
2261 | |
2262 if (!strcmp(state, GAIM_AWAY_CUSTOM)) { | |
2263 /* oh goody. Gaim is telling us what to do. */ | |
2264 if (message) { | |
2265 /* Gaim wants us to be away */ | |
2266 y = xmlnode_insert_tag(x, "show"); | |
2267 xmlnode_insert_cdata(y, "away", -1); | |
2268 y = xmlnode_insert_tag(x, "status"); | |
2269 xmlnode_insert_cdata(y, message, -1); | |
2270 gc->away = ""; | |
2271 } else { | |
2272 /* Gaim wants us to not be away */ | |
2273 /* but for Jabber, we can just send presence with no other information. */ | |
2274 } | |
2275 } else { | |
2276 /* state is one of our own strings. it won't be NULL. */ | |
2277 if (!strcmp(state, "Online")) { | |
2278 /* once again, we don't have to put anything here */ | |
2279 } else if (!strcmp(state, "Chatty")) { | |
2280 y = xmlnode_insert_tag(x, "show"); | |
2281 xmlnode_insert_cdata(y, "chat", -1); | |
2282 } else if (!strcmp(state, "Away")) { | |
2283 y = xmlnode_insert_tag(x, "show"); | |
2284 xmlnode_insert_cdata(y, "away", -1); | |
2285 gc->away = ""; | |
2286 } else if (!strcmp(state, "Extended Away")) { | |
2287 y = xmlnode_insert_tag(x, "show"); | |
2288 xmlnode_insert_cdata(y, "xa", -1); | |
2289 gc->away = ""; | |
2290 } else if (!strcmp(state, "Do Not Disturb")) { | |
2291 y = xmlnode_insert_tag(x, "show"); | |
2292 xmlnode_insert_cdata(y, "dnd", -1); | |
2293 gc->away = ""; | |
2294 } | |
2295 } | |
2296 | |
2956 | 2297 gjab_send(gjc, x); |
2086 | 2298 xmlnode_free(x); |
2299 } | |
2300 | |
2301 static void jabber_set_idle(struct gaim_connection *gc, int idle) { | |
2302 struct jabber_data *jd = (struct jabber_data *)gc->proto_data; | |
2303 debug_printf("jabber_set_idle: setting idle %i\n", idle); | |
2304 jd->idle = idle ? time(NULL) - idle : idle; | |
2305 } | |
2306 | |
2307 static void jabber_keepalive(struct gaim_connection *gc) { | |
2308 struct jabber_data *jd = (struct jabber_data *)gc->proto_data; | |
2956 | 2309 gjab_send_raw(jd->gjc, " \t "); |
2086 | 2310 } |
2311 | |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2312 static GList *jabber_user_opts() |
2086 | 2313 { |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2314 GList *m = NULL; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2315 struct proto_user_opt *puo; |
2086 | 2316 |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2317 puo = g_new0(struct proto_user_opt, 1); |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2318 puo->label = "Port:"; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2319 puo->def = "5222"; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2320 puo->pos = USEROPT_PORT; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2321 m = g_list_append(m, puo); |
2086 | 2322 |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
2323 return m; |
2086 | 2324 } |
2325 | |
2607
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
2326 static void jabber_buddy_free(struct buddy *b) |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
2327 { |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
2328 while (b->proto_data) { |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
2329 g_free(((GSList *)b->proto_data)->data); |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
2330 b->proto_data = g_slist_remove(b->proto_data, ((GSList *)b->proto_data)->data); |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
2331 } |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
2332 } |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
2333 |
2956 | 2334 /*---------------------------------------*/ |
2335 /* Jabber "set info" (vCard) support */ | |
2336 /*---------------------------------------*/ | |
2337 | |
2338 /* | |
2339 * V-Card format: | |
2340 * | |
2341 * <vCard prodid='' version='' xmlns=''> | |
2342 * <FN></FN> | |
2343 * <N> | |
2344 * <FAMILY/> | |
2345 * <GIVEN/> | |
2346 * </N> | |
2347 * <NICKNAME/> | |
2348 * <URL/> | |
2349 * <ADR> | |
2350 * <STREET/> | |
2351 * <EXTADD/> | |
2352 * <LOCALITY/> | |
2353 * <REGION/> | |
2354 * <PCODE/> | |
2355 * <COUNTRY/> | |
2356 * </ADR> | |
2357 * <TEL/> | |
2358 * <EMAIL/> | |
2359 * <ORG> | |
2360 * <ORGNAME/> | |
2361 * <ORGUNIT/> | |
2362 * </ORG> | |
2363 * <TITLE/> | |
2364 * <ROLE/> | |
2365 * <DESC/> | |
2366 * <BDAY/> | |
2367 * </vCard> | |
2368 * | |
2369 * See also: | |
2370 * | |
2371 * http://docs.jabber.org/proto/html/vcard-temp.html | |
2372 * http://www.vcard-xml.org/dtd/vCard-XML-v2-20010520.dtd | |
2373 */ | |
2374 | |
2375 /* | |
2376 * Cross-reference user-friendly V-Card entry labels to vCard XML tags | |
2377 * and attributes. | |
2378 * | |
2379 * Order is (or should be) unimportant. For example: we have no way of | |
2380 * knowing in what order real data will arrive. | |
2381 * | |
2382 * Format: Label, Pre-set text, "visible" flag, "editable" flag, XML tag | |
2383 * name, XML tag's parent tag "path" (relative to vCard node). | |
2384 * | |
2385 * List is terminated by a NULL label pointer. | |
2386 * | |
2387 * Entries with no label text, but with XML tag and parent tag | |
2388 * entries, are used by V-Card XML construction routines to | |
2389 * "automagically" construct the appropriate XML node tree. | |
2390 * | |
2391 * Thoughts on future direction/expansion | |
2392 * | |
2393 * This is a "simple" vCard. | |
2394 * | |
2395 * It is possible for nodes other than the "vCard" node to have | |
2396 * attributes. Should that prove necessary/desirable, add an | |
2397 * "attributes" pointer to the vcard_template struct, create the | |
2398 * necessary tag_attr structs, and add 'em to the vcard_dflt_data | |
2399 * array. | |
2400 * | |
2401 * The above changes will (obviously) require changes to the vCard | |
2402 * construction routines. | |
2403 */ | |
2404 | |
2405 struct vcard_template { | |
2406 char *label; /* label text pointer */ | |
2407 char *text; /* entry text pointer */ | |
2408 int visible; /* should entry field be "visible?" */ | |
2409 int editable; /* should entry field be editable? */ | |
2410 char *tag; /* tag text */ | |
2411 char *ptag; /* parent tag "path" text */ | |
2412 char *url; /* vCard display format if URL */ | |
2413 } vcard_template_data[] = { | |
2975 | 2414 {N_("Full Name"), NULL, TRUE, TRUE, "FN", NULL, NULL}, |
2415 {N_("Family Name"), NULL, TRUE, TRUE, "FAMILY", "N", NULL}, | |
2416 {N_("Given Name"), NULL, TRUE, TRUE, "GIVEN", "N", NULL}, | |
2417 {N_("Nickname"), NULL, TRUE, TRUE, "NICKNAME", NULL, NULL}, | |
2418 {N_("URL"), NULL, TRUE, TRUE, "URL", NULL, "<A HREF=\"%s\">%s</A>"}, | |
2419 {N_("Street Address"), NULL, TRUE, TRUE, "STREET", "ADR", NULL}, | |
2420 {N_("Extended Address"), NULL, TRUE, TRUE, "EXTADD", "ADR", NULL}, | |
2421 {N_("Locality"), NULL, TRUE, TRUE, "LOCALITY", "ADR", NULL}, | |
2422 {N_("Region"), NULL, TRUE, TRUE, "REGION", "ADR", NULL}, | |
2423 {N_("Postal Code"), NULL, TRUE, TRUE, "PCODE", "ADR", NULL}, | |
2424 {N_("Country"), NULL, TRUE, TRUE, "COUNTRY", "ADR", NULL}, | |
2425 {N_("Telephone"), NULL, TRUE, TRUE, "TELEPHONE", NULL, NULL}, | |
2426 {N_("Email"), NULL, TRUE, TRUE, "EMAIL", NULL, "<A HREF=\"mailto:%s\">%s</A>"}, | |
2427 {N_("Organization Name"), NULL, TRUE, TRUE, "ORGNAME", "ORG", NULL}, | |
2428 {N_("Organization Unit"), NULL, TRUE, TRUE, "ORGUNIT", "ORG", NULL}, | |
2429 {N_("Title"), NULL, TRUE, TRUE, "TITLE", NULL, NULL}, | |
2430 {N_("Role"), NULL, TRUE, TRUE, "ROLE", NULL, NULL}, | |
2431 {N_("Birthday"), NULL, TRUE, TRUE, "BDAY", NULL, NULL}, | |
2432 {N_("Description"), NULL, TRUE, TRUE, "DESC", NULL, NULL}, | |
2956 | 2433 {"", NULL, TRUE, TRUE, "N", NULL, NULL}, |
2434 {"", NULL, TRUE, TRUE, "ADR", NULL, NULL}, | |
2435 {"", NULL, TRUE, TRUE, "ORG", NULL, NULL}, | |
2436 {NULL, NULL, 0, 0, NULL, NULL, NULL} | |
2437 }; | |
2438 | |
2439 /* | |
2440 * The "vCard" tag's attibute list... | |
2441 */ | |
2442 struct tag_attr { | |
2443 char *attr; | |
2444 char *value; | |
2445 } vcard_tag_attr_list[] = { | |
2446 {"prodid", "-//HandGen//NONSGML vGen v1.0//EN"}, | |
2447 {"version", "2.0", }, | |
2448 {"xmlns", "vcard-temp", }, | |
2449 {NULL, NULL}, | |
2450 }; | |
2451 | |
2452 | |
2453 /* | |
2454 * V-Card user instructions | |
2455 */ | |
2456 static char *multi_entry_instructions = | |
2975 | 2457 N_("All items below are optional. Enter only the information with which you feel comfortable"); |
2458 static char *entries_title = N_("User Identity"); | |
2956 | 2459 |
2460 /* | |
2461 * Used by routines to parse an XML-encoded string into an xmlnode tree | |
2462 */ | |
2463 typedef struct { | |
2464 XML_Parser parser; | |
2465 xmlnode current; | |
2466 } *xmlstr2xmlnode_parser, xmlstr2xmlnode_parser_struct; | |
2467 | |
2468 | |
2469 /* | |
2470 * Display a Jabber vCard | |
2471 */ | |
2472 static void jabber_handlevcard(gjconn gjc, xmlnode querynode, char *from) | |
2473 { | |
2474 struct gaim_connection *gc = GJ_GC(gjc); | |
2475 struct jabber_data *jd = GJ_GC(gjc)->proto_data; | |
2476 jid who = jid_new(gjc->p, from); | |
2477 char *cdata, *status; | |
2478 | |
2479 struct vcard_template *vc_tp = vcard_template_data; | |
2480 | |
2481 /* space for all vCard elements + Jabber I.D. + "status" + NULL (list terminator) */ | |
2482 gchar **str_arr = (gchar **) g_new(gpointer, | |
2483 (sizeof(vcard_template_data)/sizeof(struct vcard_template)) + 3); | |
2484 gchar **ap = str_arr; | |
2485 gchar *buddy, *final; | |
2486 | |
2487 if(who->resource != NULL && (who->resource)[0] != '\0') { | |
2488 buddy = g_strdup_printf("%s@%s/%s", who->user, who->server, who->resource); | |
2489 } else { | |
2490 buddy = g_strdup_printf("%s@%s", who->user, who->server); | |
2491 } | |
2492 *ap++ = g_strdup_printf("<B>Jabber ID:</B> %s<BR>\n", buddy); | |
2493 | |
2494 for(vc_tp = vcard_template_data; vc_tp->label != NULL; ++vc_tp) { | |
2495 if(strcmp(vc_tp->tag, "DESC") == 0) | |
2496 continue; /* special handling later */ | |
2497 if(vc_tp->ptag == NULL) { | |
2498 cdata = xmlnode_get_tag_data(querynode, vc_tp->tag); | |
2499 } else { | |
2500 gchar *tag = g_strdup_printf("%s/%s", vc_tp->ptag, vc_tp->tag); | |
2501 cdata = xmlnode_get_tag_data(querynode, tag); | |
2502 g_free(tag); | |
2503 } | |
2504 if(cdata != NULL) { | |
2505 if(vc_tp->url == NULL) { | |
2506 *ap++ = g_strdup_printf("<B>%s:</B> %s<BR>\n", vc_tp->label, cdata); | |
2507 } else { | |
2508 gchar *fmt = g_strdup_printf("<B>%%s:</B> %s<BR>\n", vc_tp->url); | |
2509 *ap++ = g_strdup_printf(fmt, vc_tp->label, cdata, cdata); | |
2510 g_free(fmt); | |
2511 } | |
2512 } | |
2513 } | |
2514 | |
2515 if((status = g_hash_table_lookup(jd->hash, buddy)) == NULL) { | |
3105 | 2516 status = _("Unknown"); |
2956 | 2517 } |
2518 *ap++ = g_strdup_printf("<B>Status:</B> %s<BR>\n", status); | |
2519 | |
2520 /* | |
2521 * "Description" handled as a special case: get a copy of the | |
2522 * string and HTML-ize. | |
2523 */ | |
2524 if((cdata = xmlnode_get_tag_data(querynode, "DESC")) != NULL) { | |
2525 gchar *tmp = g_strdup_printf("<HR>%s<BR>", cdata); | |
2526 *ap++ = strdup_withhtml(tmp); | |
2527 g_free(tmp); | |
2528 } | |
2529 | |
2530 *ap = NULL; | |
2531 | |
2532 final= g_strjoinv(NULL, str_arr); | |
2533 g_strfreev(str_arr); | |
2534 | |
2535 g_show_info_text(gc, buddy, 2, final, NULL); | |
2536 g_free(buddy); | |
2537 g_free(final); | |
2538 } | |
2539 | |
2540 /* | |
2541 * Used by XML_Parse on parsing CDATA | |
2542 */ | |
2543 static void xmlstr2xmlnode_charData(void *userdata, const char *s, int slen) | |
2544 { | |
2545 xmlstr2xmlnode_parser xmlp = (xmlstr2xmlnode_parser) userdata; | |
2546 | |
2547 if (xmlp->current) | |
2548 xmlnode_insert_cdata(xmlp->current, s, slen); | |
2549 } | |
2550 | |
2551 /* | |
2552 * Used by XML_Parse to start or append to an xmlnode | |
2553 */ | |
2554 static void xmlstr2xmlnode_startElement(void *userdata, const char *name, const char **attribs) | |
2555 { | |
2556 xmlnode x; | |
2557 xmlstr2xmlnode_parser xmlp = (xmlstr2xmlnode_parser) userdata; | |
2558 | |
2559 if (xmlp->current) { | |
2560 /* Append the node to the current one */ | |
2561 x = xmlnode_insert_tag(xmlp->current, name); | |
2562 xmlnode_put_expat_attribs(x, attribs); | |
2563 | |
2564 xmlp->current = x; | |
2565 } else { | |
2566 x = xmlnode_new_tag(name); | |
2567 xmlnode_put_expat_attribs(x, attribs); | |
2568 xmlp->current = x; | |
2569 } | |
2570 } | |
2571 | |
2572 /* | |
2573 * Used by XML_Parse to end an xmlnode | |
2574 */ | |
2575 static void xmlstr2xmlnode_endElement(void *userdata, const char *name) | |
2576 { | |
2577 xmlstr2xmlnode_parser xmlp = (xmlstr2xmlnode_parser) userdata; | |
2578 xmlnode x; | |
2579 | |
2580 if (xmlp->current != NULL && (x = xmlnode_get_parent(xmlp->current)) != NULL) { | |
2581 xmlp->current = x; | |
2582 } | |
2583 } | |
2584 | |
2585 /* | |
2586 * Parse an XML-encoded string into an xmlnode tree | |
2587 * | |
2588 * Caller is responsible for freeing the returned xmlnode | |
2589 */ | |
2590 static xmlnode xmlstr2xmlnode(char *xmlstring) | |
2591 { | |
2592 xmlstr2xmlnode_parser my_parser = g_new(xmlstr2xmlnode_parser_struct, 1); | |
2593 xmlnode x = NULL; | |
2594 | |
2595 my_parser->parser = XML_ParserCreate(NULL); | |
2596 my_parser->current = NULL; | |
2597 | |
2598 XML_SetUserData(my_parser->parser, (void *)my_parser); | |
2599 XML_SetElementHandler(my_parser->parser, xmlstr2xmlnode_startElement, xmlstr2xmlnode_endElement); | |
2600 XML_SetCharacterDataHandler(my_parser->parser, xmlstr2xmlnode_charData); | |
2601 XML_Parse(my_parser->parser, xmlstring, strlen(xmlstring), 0); | |
2602 | |
2603 x = my_parser->current; | |
2604 | |
2605 XML_ParserFree(my_parser->parser); | |
2606 g_free(my_parser); | |
2607 | |
2608 return(x); | |
2609 } | |
2610 | |
2611 /* | |
2612 * Insert a tag node into an xmlnode tree, recursively inserting parent tag | |
2613 * nodes as necessary | |
2614 * | |
2615 * Returns pointer to inserted node | |
2616 * | |
2617 * Note to hackers: this code is designed to be re-entrant (it's recursive--it | |
2618 * calls itself), so don't put any "static"s in here! | |
2619 */ | |
2620 static xmlnode insert_tag_to_parent_tag(xmlnode start, const char *parent_tag, const char *new_tag) | |
2621 { | |
2622 xmlnode x = NULL; | |
2623 | |
2624 /* | |
2625 * If the parent tag wasn't specified, see if we can get it | |
2626 * from the vCard template struct. | |
2627 */ | |
2628 if(parent_tag == NULL) { | |
2629 struct vcard_template *vc_tp = vcard_template_data; | |
2630 | |
2631 while(vc_tp->label != NULL) { | |
2632 if(strcmp(vc_tp->tag, new_tag) == 0) { | |
2633 parent_tag = vc_tp->ptag; | |
2634 break; | |
2635 } | |
2636 ++vc_tp; | |
2637 } | |
2638 } | |
2639 | |
2640 /* | |
2641 * If we have a parent tag... | |
2642 */ | |
2643 if(parent_tag != NULL ) { | |
2644 /* | |
2645 * Try to get the parent node for a tag | |
2646 */ | |
2647 if((x = xmlnode_get_tag(start, parent_tag)) == NULL) { | |
2648 /* | |
2649 * Descend? | |
2650 */ | |
2651 char *grand_parent = strcpy(g_malloc(strlen(parent_tag) + 1), parent_tag); | |
2652 char *parent; | |
2653 | |
2654 if((parent = strrchr(grand_parent, '/')) != NULL) { | |
2655 *(parent++) = '\0'; | |
2656 x = insert_tag_to_parent_tag(start, grand_parent, parent); | |
2657 } else { | |
2658 x = xmlnode_insert_tag(start, grand_parent); | |
2659 } | |
2660 g_free(grand_parent); | |
2661 } else { | |
2662 /* | |
2663 * We found *something* to be the parent node. | |
2664 * Note: may be the "root" node! | |
2665 */ | |
2666 xmlnode y; | |
2667 if((y = xmlnode_get_tag(x, new_tag)) != NULL) { | |
2668 return(y); | |
2669 } | |
2670 } | |
2671 } | |
2672 | |
2673 /* | |
2674 * insert the new tag into its parent node | |
2675 */ | |
2676 return(xmlnode_insert_tag((x == NULL? start : x), new_tag)); | |
2677 } | |
2678 | |
2679 /* | |
2680 * Find the tag name for a label | |
2681 * | |
2682 * Returns NULL on not found | |
2683 */ | |
2684 static char *tag_for_label(const char *label) | |
2685 { | |
2686 struct vcard_template *vc_tp = vcard_template_data; | |
2687 char *p = NULL; | |
2688 | |
2689 for(vc_tp = vcard_template_data; vc_tp->label != NULL; ++vc_tp) { | |
2690 if(strcmp(label, vc_tp->label) == 0) { | |
2691 p = vc_tp->tag; | |
2692 break; | |
2693 } | |
2694 } | |
2695 | |
2696 return(p); | |
2697 } | |
2698 | |
2699 /* | |
2700 * Send vCard info to Jabber server | |
2701 */ | |
2702 static void jabber_set_info(struct gaim_connection *gc, char *info) | |
2703 { | |
2704 xmlnode x, vc_node; | |
2705 char *id; | |
2706 struct jabber_data *jd = gc->proto_data; | |
2707 gjconn gjc = jd->gjc; | |
2708 | |
2709 x = xmlnode_new_tag("iq"); | |
2710 xmlnode_put_attrib(x,"type","set"); | |
2711 | |
2712 id = gjab_getid(gjc); | |
2713 | |
2714 xmlnode_put_attrib(x, "id", id); | |
2715 | |
2716 /* | |
2717 * Send only if there's actually any *information* to send | |
2718 */ | |
2719 if((vc_node = xmlstr2xmlnode(info)) != NULL && xmlnode_get_name(vc_node) != NULL && | |
2720 g_strncasecmp(xmlnode_get_name(vc_node), "vcard", 5) == 0) { | |
2721 xmlnode_insert_tag_node(x, vc_node); | |
2722 debug_printf("jabber: vCard packet: %s\n", xmlnode2str(x)); | |
2723 gjab_send(gjc, x); | |
2724 } | |
2725 | |
2726 xmlnode_free(x); | |
2727 } | |
2728 | |
2729 /* | |
2730 * This is the callback from the "ok clicked" for "set vCard" | |
2731 * | |
2732 * Formats GSList data into XML-encoded string and returns a pointer | |
2733 * to said string. | |
2734 * | |
2735 * g_free()'ing the returned string space is the responsibility of | |
2736 * the caller. | |
2737 */ | |
2738 static gchar *jabber_format_info(MultiEntryDlg *b) | |
2739 { | |
2740 xmlnode vc_node; | |
2741 GSList *list; | |
2742 MultiEntryData *med; | |
2743 MultiTextData *mtd; | |
2744 char *p; | |
2745 | |
2746 struct tag_attr *tag_attr; | |
2747 | |
2748 vc_node = xmlnode_new_tag("vCard"); | |
2749 | |
2750 for(tag_attr = vcard_tag_attr_list; tag_attr->attr != NULL; ++tag_attr) | |
2751 xmlnode_put_attrib(vc_node, tag_attr->attr, tag_attr->value); | |
2752 | |
2753 for(list = b->multi_entry_items; list != NULL; list = list->next) { | |
2754 med = (MultiEntryData *) list->data; | |
2755 if(med->label != NULL && med->text != NULL && (med->text)[0] != '\0') { | |
2756 if((p = tag_for_label(med->label)) != NULL) { | |
2757 xmlnode xp; | |
2758 if((xp = insert_tag_to_parent_tag(vc_node, NULL, p)) != NULL) { | |
2759 xmlnode_insert_cdata(xp, med->text, -1); | |
2760 } | |
2761 } | |
2762 } | |
2763 } | |
2764 | |
2765 for(list = b->multi_text_items; list != NULL; list = list->next) { | |
2766 mtd = (MultiTextData *) list->data; | |
2767 if(mtd->label != NULL && mtd->text != NULL && (mtd->text)[0] != '\0') { | |
2768 if((p = tag_for_label(mtd->label)) != NULL) { | |
2769 xmlnode xp; | |
2770 if((xp = insert_tag_to_parent_tag(vc_node, NULL, p)) != NULL) { | |
2771 xmlnode_insert_cdata(xp, mtd->text, -1); | |
2772 } | |
2773 } | |
2774 } | |
2775 } | |
2776 | |
2777 | |
2778 p = g_strdup(xmlnode2str(vc_node)); | |
2779 xmlnode_free(vc_node); | |
2780 | |
2781 return(p); | |
2782 } | |
2783 | |
2784 /* | |
2785 * This gets executed by the proto action | |
2786 * | |
2787 * Creates a new MultiEntryDlg struct, gets the XML-formatted user_info | |
2788 * string (if any) into GSLists for the (multi-entry) edit dialog and | |
2789 * calls the set_vcard dialog. | |
2790 */ | |
2791 static void jabber_setup_set_info(struct gaim_connection *gc) | |
2792 { | |
2793 MultiEntryData *data; | |
2794 const struct vcard_template *vc_tp; | |
2795 char *user_info; | |
2796 MultiEntryDlg *b = multi_entry_dialog_new(); | |
2797 char *cdata; | |
2798 xmlnode x_vc_data = NULL; | |
2799 struct aim_user *tmp = gc->user; | |
2800 b->user = tmp; | |
2801 | |
2802 | |
2803 /* | |
2804 * Get existing, XML-formatted, user info | |
2805 */ | |
2806 if((user_info = g_malloc(strlen(tmp->user_info) + 1)) != NULL) { | |
2807 strcpy(user_info, tmp->user_info); | |
2808 x_vc_data = xmlstr2xmlnode(user_info); | |
2809 } | |
2810 | |
2811 /* | |
2812 * Set up GSLists for edit with labels from "template," data from user info | |
2813 */ | |
2814 for(vc_tp = vcard_template_data; vc_tp->label != NULL; ++vc_tp) { | |
2815 if((vc_tp->label)[0] == '\0') | |
2816 continue; | |
2817 if(vc_tp->ptag == NULL) { | |
2818 cdata = xmlnode_get_tag_data(x_vc_data, vc_tp->tag); | |
2819 } else { | |
2820 gchar *tag = g_strdup_printf("%s/%s", vc_tp->ptag, vc_tp->tag); | |
2821 cdata = xmlnode_get_tag_data(x_vc_data, tag); | |
2822 g_free(tag); | |
2823 } | |
2824 if(strcmp(vc_tp->tag, "DESC") == 0) { | |
2825 multi_text_list_update(&(b->multi_text_items), | |
2826 vc_tp->label, cdata, TRUE); | |
2827 } else { | |
2828 data = multi_entry_list_update(&(b->multi_entry_items), | |
2829 vc_tp->label, cdata, TRUE); | |
2830 data->visible = vc_tp->visible; | |
2831 data->editable = vc_tp->editable; | |
2832 } | |
2833 } | |
2834 | |
2835 | |
2836 if(x_vc_data != NULL) { | |
2837 xmlnode_free(x_vc_data); | |
2838 } else { | |
2839 /* | |
2840 * Early Beta versions had a different user_info storage format--let's | |
2841 * see if that works. | |
2842 * | |
2843 * This goes away RSN. | |
2844 */ | |
2845 const char *record_separator = "<BR>"; | |
2846 const char *field_separator = ": "; | |
2847 gchar **str_list, **str_list_ptr, **str_list2; | |
2848 | |
2849 if((str_list = g_strsplit(user_info, record_separator, 0)) != NULL) { | |
2850 for(str_list_ptr = str_list; *str_list_ptr != NULL; ++str_list_ptr) { | |
2851 str_list2 = g_strsplit(*str_list_ptr, field_separator, 2); | |
2852 if(str_list2[0] != NULL && str_list2[1] != NULL) { | |
2853 g_strstrip(str_list2[0]); | |
2854 g_strstrip(str_list2[1]); | |
2855 /* this is ugly--so far */ | |
2856 if(strcmp(str_list2[0], "Description") == 0) { | |
2857 multi_text_list_update(&(b->multi_text_items), | |
2858 str_list2[0], str_list2[1], FALSE); | |
2859 } else { | |
2860 multi_entry_list_update(&(b->multi_entry_items), | |
2861 str_list2[0], str_list2[1], FALSE); | |
2862 } | |
2863 } | |
2864 g_strfreev(str_list2); | |
2865 } | |
2866 g_strfreev(str_list); | |
2867 } | |
2868 } | |
2869 | |
2870 if(user_info != NULL) { | |
2871 g_free(user_info); | |
2872 } | |
2873 | |
2975 | 2874 b->title = _("Gaim - Edit Jabber vCard"); |
2956 | 2875 b->wmclass_name = "set_info"; |
2876 b->wmclass_class = "Gaim"; | |
2877 b->instructions->text = g_strdup(multi_entry_instructions); | |
2975 | 2878 b->entries_title = g_strdup(entries_title); |
2956 | 2879 |
2880 b->custom = (void *) jabber_format_info; | |
2881 | |
2882 show_set_vcard(b); | |
2883 } | |
2884 | |
2885 /*---------------------------------------*/ | |
2886 /* End Jabber "set info" (vCard) support */ | |
2887 /*---------------------------------------*/ | |
2888 | |
2889 /*----------------------------------------*/ | |
2890 /* Jabber "user registration" support */ | |
2891 /*----------------------------------------*/ | |
2892 | |
2893 /* | |
2894 * Three of the following four functions duplicate much of what | |
2895 * exists elsewhere: | |
2896 * | |
2897 * jabber_handleregresp() | |
2898 * gjab_reqreg() | |
2899 * jabber_handle_registration_state() | |
2900 * | |
2901 * It may be that an additional flag could be added to one of | |
2902 * the "local" structs and the duplicated code modified to | |
2903 * account for it--thus eliminating the duplication. Then again: | |
2904 * doing it the way it is may be much cleaner. | |
2905 * | |
2906 * TBD: Code to support requesting additional information server | |
2907 * wants at registration--incl. dialog. | |
2908 */ | |
2909 | |
2910 /* | |
2911 * Like jabber_handlepacket(), only different | |
2912 */ | |
2913 static void jabber_handleregresp(gjconn gjc, jpacket p) | |
2914 { | |
2915 if (jpacket_subtype(p) == JPACKET__RESULT) { | |
2916 xmlnode querynode; | |
2917 | |
2918 if((querynode = xmlnode_get_tag(p->x, "query")) != NULL) { | |
2919 char *xmlns; | |
2920 | |
2921 /* we damn well *better* have this! */ | |
2922 if((xmlns = xmlnode_get_attrib(querynode, "xmlns")) != NULL && | |
2923 strcmp(xmlns, NS_REGISTER) == 0) { | |
2924 | |
2925 char *tag; | |
2926 xmlnode child = xmlnode_get_firstchild(querynode); | |
2927 | |
2928 debug_printf("got registration requirments response!\n"); | |
2929 | |
2930 while(child != NULL) { | |
2931 if((tag = xmlnode_get_name(child)) != NULL) { | |
2932 char *data; | |
2933 | |
2934 fprintf(stderr, "DBG: got node: \"%s\"\n", tag); | |
2935 fflush(stderr); | |
2936 | |
2937 if((data = xmlnode_get_data(child)) != NULL) { | |
2938 fprintf(stderr, "DBG: got data: \"%s\"\n", data); | |
2939 fflush(stderr); | |
2940 } | |
2941 } | |
2942 child = xmlnode_get_nextsibling(child); | |
2943 } | |
2944 } | |
2945 } else { | |
2946 debug_printf("registration successful!\n"); | |
2947 | |
2975 | 2948 hide_login_progress_notice(GJ_GC(gjc), _("Server Registration successful!")); |
2956 | 2949 /* |
2950 * TBD: is this the correct way to do away with a | |
2951 * gaim_connection and all its associated memory | |
2952 * allocs, etc.? | |
2953 */ | |
2954 signoff(GJ_GC(gjc)); | |
2955 } | |
2956 | |
2957 } else { | |
2958 xmlnode xerr; | |
2959 char *errmsg = NULL; | |
2960 int errcode = 0; | |
2961 struct jabber_data *jd = GJ_GC(gjc)->proto_data; | |
2962 | |
2963 debug_printf("registration failed\n"); | |
2964 xerr = xmlnode_get_tag(p->x, "error"); | |
2965 if (xerr) { | |
2966 char msg[BUF_LONG]; | |
2967 errmsg = xmlnode_get_data(xerr); | |
2968 if (xmlnode_get_attrib(xerr, "code")) { | |
2969 errcode = atoi(xmlnode_get_attrib(xerr, "code")); | |
2970 g_snprintf(msg, sizeof(msg), "Error %d: %s", errcode, errmsg); | |
2971 } else | |
2972 g_snprintf(msg, sizeof(msg), "%s", errmsg); | |
2973 hide_login_progress(GJ_GC(gjc), msg); | |
2974 } else { | |
2975 | 2975 hide_login_progress(GJ_GC(gjc), _("Unknown registration error")); |
2956 | 2976 } |
2977 | |
2978 jd->die = TRUE; | |
2979 } | |
2980 } | |
2981 | |
2982 /* | |
2983 * Like gjab_reqauth(), only different | |
2984 */ | |
2985 static void gjab_reqreg(gjconn gjc) | |
2986 { | |
2987 xmlnode x, y, z; | |
2988 char *user; | |
2989 | |
2990 if (!gjc) | |
2991 return; | |
2992 | |
2993 x = jutil_iqnew(JPACKET__SET, NS_REGISTER); | |
2994 y = xmlnode_get_tag(x, "query"); | |
2995 | |
2996 user = gjc->user->user; | |
2997 | |
2998 if (user) { | |
2999 z = xmlnode_insert_tag(y, "username"); | |
3000 xmlnode_insert_cdata(z, user, -1); | |
3001 } | |
3002 z = xmlnode_insert_tag(y, "password"); | |
3003 xmlnode_insert_cdata(z, gjc->pass, -1); | |
3004 | |
3005 debug_printf("jabber: registration packet: %s\n", xmlnode2str(x)); | |
3006 gjab_send(gjc, x); | |
3007 xmlnode_free(x); | |
3008 } | |
3009 | |
3010 /* | |
3011 * Like jabber_handlestate(), only different | |
3012 */ | |
3013 static void jabber_handle_registration_state(gjconn gjc, int state) | |
3014 { | |
3015 switch (state) { | |
3016 case JCONN_STATE_OFF: | |
3074 | 3017 if(gjc->was_connected) { |
3018 hide_login_progress_error(GJ_GC(gjc), _("Connection lost")); | |
3019 } else { | |
3020 hide_login_progress(GJ_GC(gjc), _("Unable to connect")); | |
3021 } | |
2956 | 3022 signoff(GJ_GC(gjc)); |
3023 break; | |
3024 case JCONN_STATE_CONNECTED: | |
3074 | 3025 gjc->was_connected = 1; |
2956 | 3026 /* |
3027 * TBD? | |
2975 | 3028 set_login_progress(GJ_GC(gjc), 2, _("Connected")); |
2956 | 3029 */ |
3030 break; | |
3031 case JCONN_STATE_ON: | |
3032 /* | |
3033 * TBD? | |
2975 | 3034 set_login_progress(GJ_GC(gjc), 3, _("Requesting Authentication Method")); |
2956 | 3035 */ |
3036 gjab_reqreg(gjc); | |
3037 /* | |
3038 * TBD: A work-in-progress | |
3039 gjab_reqregreqs(gjc); | |
3040 */ | |
3041 break; | |
3042 default: | |
3043 debug_printf("state change: %d\n", state); | |
3044 } | |
3045 return; | |
3046 } | |
3047 | |
3048 /* | |
3049 * Like jabber_login(), only different | |
3050 */ | |
3051 void jabber_register_user(struct aim_user *au) | |
3052 { | |
3053 struct gaim_connection *gc = new_gaim_conn(au); | |
3054 struct jabber_data *jd = gc->proto_data = g_new0(struct jabber_data, 1); | |
3055 char *loginname = create_valid_jid(au->username, DEFAULT_SERVER, "GAIM"); | |
3056 | |
3057 /* | |
3058 * These do nothing during registration | |
3059 */ | |
3060 jd->hash = NULL; | |
3061 jd->chats = NULL; | |
3062 | |
3063 if ((jd->gjc = gjab_new(loginname, au->password, gc)) == NULL) { | |
3064 g_free(loginname); | |
3065 debug_printf("jabber: unable to connect (jab_new failed)\n"); | |
2975 | 3066 hide_login_progress(gc, _("Unable to connect")); |
2956 | 3067 signoff(gc); |
3068 } else { | |
3069 gjab_state_handler(jd->gjc, jabber_handle_registration_state); | |
3070 gjab_packet_handler(jd->gjc, jabber_handleregresp); | |
3071 jd->gjc->queries = NULL; | |
3072 gjab_start(jd->gjc); | |
3073 } | |
3074 | |
3075 g_free(loginname); | |
3076 } | |
3077 | |
3078 /*----------------------------------------*/ | |
3079 /* End Jabber "user registration" support */ | |
3080 /*----------------------------------------*/ | |
3081 | |
3082 static void jabber_do_action(struct gaim_connection *gc, char *act) | |
3083 { | |
2975 | 3084 if (!strcmp(act, _("Set User Info"))) { |
2956 | 3085 jabber_setup_set_info(gc); |
3086 /* | |
2975 | 3087 } else if (!strcmp(act, _("Set Dir Info"))) { |
2956 | 3088 show_set_dir(gc); |
2975 | 3089 } else if (!strcmp(act, _("Change Password"))) { |
2956 | 3090 show_change_passwd(gc); |
3091 */ | |
3092 } | |
3093 } | |
3094 | |
3095 static GList *jabber_actions() | |
3096 { | |
3097 GList *m = NULL; | |
3098 | |
2975 | 3099 m = g_list_append(m, _("Set User Info")); |
2956 | 3100 /* |
2975 | 3101 m = g_list_append(m, _("Set Dir Info")); |
3102 m = g_list_append(m, _("Change Password")); | |
2956 | 3103 */ |
3104 | |
3105 return m; | |
3106 } | |
3107 | |
2086 | 3108 static struct prpl *my_protocol = NULL; |
3109 | |
3110 void jabber_init(struct prpl *ret) | |
3111 { | |
3112 /* the NULL's aren't required but they're nice to have */ | |
3113 ret->protocol = PROTO_JABBER; | |
3114 ret->options = OPT_PROTO_UNIQUE_CHATNAME | OPT_PROTO_CHAT_TOPIC; | |
3115 ret->name = jabber_name; | |
3116 ret->list_icon = jabber_list_icon; | |
3117 ret->away_states = jabber_away_states; | |
2956 | 3118 ret->actions = jabber_actions; |
3119 ret->do_action = jabber_do_action; | |
2086 | 3120 ret->buddy_menu = jabber_buddy_menu; |
3121 ret->user_opts = jabber_user_opts; | |
3122 ret->login = jabber_login; | |
3123 ret->close = jabber_close; | |
3124 ret->send_im = jabber_send_im; | |
2956 | 3125 ret->set_info = jabber_set_info; |
2086 | 3126 ret->get_info = jabber_get_info; |
2956 | 3127 ret->get_cb_info = jabber_get_cb_info; |
3128 ret->get_cb_away = jabber_get_cb_away_msg; | |
2086 | 3129 ret->set_away = jabber_set_away; |
3130 ret->set_dir = NULL; | |
3131 ret->get_dir = NULL; | |
3132 ret->dir_search = NULL; | |
3133 ret->set_idle = jabber_set_idle; | |
3134 ret->change_passwd = NULL; | |
3135 ret->add_buddy = jabber_add_buddy; | |
3136 ret->add_buddies = NULL; | |
3137 ret->remove_buddy = jabber_remove_buddy; | |
3138 ret->add_permit = NULL; | |
3139 ret->add_deny = NULL; | |
3140 ret->rem_permit = NULL; | |
3141 ret->rem_deny = NULL; | |
3142 ret->set_permit_deny = NULL; | |
3143 ret->warn = NULL; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
3144 ret->chat_info = jabber_chat_info; |
2086 | 3145 ret->join_chat = jabber_join_chat; |
3146 ret->chat_invite = jabber_chat_invite; | |
3147 ret->chat_leave = jabber_chat_leave; | |
3148 ret->chat_whisper = jabber_chat_whisper; | |
3149 ret->chat_send = jabber_chat_send; | |
3150 ret->keepalive = jabber_keepalive; | |
3151 ret->normalize = jabber_normalize; | |
2607
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
3152 ret->buddy_free = jabber_buddy_free; |
2956 | 3153 ret->register_user = jabber_register_user; |
3136 | 3154 ret->alias_buddy = jabber_roster_update; |
3155 ret->group_buddy = jabber_group_change; | |
2086 | 3156 |
3157 my_protocol = ret; | |
3158 } | |
3159 | |
3160 #ifndef STATIC | |
3161 | |
3162 char *gaim_plugin_init(GModule *handle) | |
3163 { | |
3164 load_protocol(jabber_init, sizeof(struct prpl)); | |
3165 return NULL; | |
3166 } | |
3167 | |
3168 void gaim_plugin_remove() | |
3169 { | |
3170 struct prpl *p = find_prpl(PROTO_JABBER); | |
3171 if (p == my_protocol) | |
3172 unload_protocol(p); | |
3173 } | |
3174 | |
3175 char *name() | |
3176 { | |
3177 return "Jabber"; | |
3178 } | |
3179 | |
3180 char *description() | |
3181 { | |
2162
a464da684307
[gaim-migrate @ 2172]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2154
diff
changeset
|
3182 return PRPL_DESC("Jabber"); |
2086 | 3183 } |
3184 | |
3185 #endif |