Mercurial > pidgin.yaz
annotate src/protocols/jabber/jabber.c @ 2773:a0fd8f91e294
[gaim-migrate @ 2786]
SPAM!!!
All recipients of the email generated by this commit each owe me $125 per email sent, plus a $75 handling fee for all messages combined.
Or was that supposed to be the other way around.
committer: Tailor Script <tailor@pidgin.im>
author | Eric Warmenhoven <eric@warmenhoven.org> |
---|---|
date | Tue, 20 Nov 2001 01:01:22 +0000 |
parents | e9e624d8803e |
children | 8f6365332a05 |
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 | |
79 typedef struct gjconn_struct { | |
80 /* Core structure */ | |
81 pool p; /* Memory allocation pool */ | |
82 int state; /* Connection state flag */ | |
83 int fd; /* Connection file descriptor */ | |
84 jid user; /* User info */ | |
85 char *pass; /* User passwd */ | |
86 | |
87 /* Stream stuff */ | |
88 int id; /* id counter for jab_getid() function */ | |
89 char idbuf[9]; /* temporary storage for jab_getid() */ | |
90 char *sid; /* stream id from server, for digest auth */ | |
91 XML_Parser parser; /* Parser instance */ | |
92 xmlnode current; /* Current node in parsing instance.. */ | |
93 | |
94 /* Event callback ptrs */ | |
95 void (*on_state)(struct gjconn_struct *j, int state); | |
96 void (*on_packet)(struct gjconn_struct *j, jpacket p); | |
97 | |
98 void *priv; | |
99 | |
100 } *gjconn, gjconn_struct; | |
101 | |
102 typedef void (*gjconn_state_h)(gjconn j, int state); | |
103 typedef void (*gjconn_packet_h)(gjconn j, jpacket p); | |
104 | |
105 static gjconn gjab_new(char *user, char *pass, void *priv); | |
106 static void gjab_delete(gjconn j); | |
107 static void gjab_state_handler(gjconn j, gjconn_state_h h); | |
108 static void gjab_packet_handler(gjconn j, gjconn_packet_h h); | |
109 static void gjab_start(gjconn j); | |
110 static void gjab_stop(gjconn j); | |
111 /* | |
112 static int gjab_getfd(gjconn j); | |
113 static jid gjab_getjid(gjconn j); | |
114 static char *gjab_getsid(gjconn j); | |
115 */ | |
116 static char *gjab_getid(gjconn j); | |
117 static void gjab_send(gjconn j, xmlnode x); | |
118 static void gjab_send_raw(gjconn j, const char *str); | |
119 static void gjab_recv(gjconn j); | |
120 static void gjab_auth(gjconn j); | |
121 | |
122 struct jabber_data { | |
123 gjconn jc; | |
124 gboolean did_import; | |
125 GSList *pending_chats; | |
126 GSList *existing_chats; | |
127 GHashTable *hash; | |
128 time_t idle; | |
129 }; | |
130 | |
131 struct jabber_chat { | |
132 jid Jid; | |
133 struct gaim_connection *gc; | |
134 struct conversation *b; | |
135 int id; | |
136 }; | |
137 | |
138 static char *jabber_name() | |
139 { | |
140 return "Jabber"; | |
141 } | |
142 | |
143 #define STATE_EVT(arg) if(j->on_state) { (j->on_state)(j, (arg) ); } | |
144 | |
145 static char *create_valid_jid(const char *given, char *server, char *resource) | |
146 { | |
147 char *valid; | |
148 | |
149 if (!strchr(given, '@')) | |
150 valid = g_strdup_printf("%s@%s/%s", given, server, resource); | |
151 else if (!strchr(strchr(given, '@'), '/')) | |
152 valid = g_strdup_printf("%s/%s", given, resource); | |
153 else | |
154 valid = g_strdup(given); | |
155 | |
156 return valid; | |
157 } | |
158 | |
159 static gjconn gjab_new(char *user, char *pass, void *priv) | |
160 { | |
161 pool p; | |
162 gjconn j; | |
163 | |
164 if (!user) | |
165 return (NULL); | |
166 | |
167 p = pool_new(); | |
168 if (!p) | |
169 return (NULL); | |
170 j = pmalloc_x(p, sizeof(gjconn_struct), 0); | |
171 if (!j) | |
172 return (NULL); | |
173 j->p = p; | |
174 | |
175 j->user = jid_new(p, user); | |
176 j->pass = pstrdup(p, pass); | |
177 | |
178 j->state = JCONN_STATE_OFF; | |
179 j->id = 1; | |
180 j->fd = -1; | |
181 | |
182 j->priv = priv; | |
183 | |
184 return j; | |
185 } | |
186 | |
187 static void gjab_delete(gjconn j) | |
188 { | |
189 if (!j) | |
190 return; | |
191 | |
192 gjab_stop(j); | |
193 pool_free(j->p); | |
194 } | |
195 | |
196 static void gjab_state_handler(gjconn j, gjconn_state_h h) | |
197 { | |
198 if (!j) | |
199 return; | |
200 | |
201 j->on_state = h; | |
202 } | |
203 | |
204 static void gjab_packet_handler(gjconn j, gjconn_packet_h h) | |
205 { | |
206 if (!j) | |
207 return; | |
208 | |
209 j->on_packet = h; | |
210 } | |
211 | |
212 static void gjab_stop(gjconn j) | |
213 { | |
214 if (!j || j->state == JCONN_STATE_OFF) | |
215 return; | |
216 | |
217 j->state = JCONN_STATE_OFF; | |
218 gjab_send_raw(j, "</stream:stream>"); | |
219 close(j->fd); | |
220 j->fd = -1; | |
221 XML_ParserFree(j->parser); | |
222 j->parser = NULL; | |
223 } | |
224 | |
225 /* | |
226 static int gjab_getfd(gjconn j) | |
227 { | |
228 if (j) | |
229 return j->fd; | |
230 else | |
231 return -1; | |
232 } | |
233 | |
234 static jid gjab_getjid(gjconn j) | |
235 { | |
236 if (j) | |
237 return (j->user); | |
238 else | |
239 return NULL; | |
240 } | |
241 | |
242 static char *gjab_getsid(gjconn j) | |
243 { | |
244 if (j) | |
245 return (j->sid); | |
246 else | |
247 return NULL; | |
248 } | |
249 */ | |
250 | |
251 static char *gjab_getid(gjconn j) | |
252 { | |
253 snprintf(j->idbuf, 8, "%d", j->id++); | |
254 return &j->idbuf[0]; | |
255 } | |
256 | |
257 static void gjab_send(gjconn j, xmlnode x) | |
258 { | |
259 if (j && j->state != JCONN_STATE_OFF) { | |
260 char *buf = xmlnode2str(x); | |
261 if (buf) | |
262 write(j->fd, buf, strlen(buf)); | |
263 debug_printf("gjab_send: %s\n", buf); | |
264 } | |
265 } | |
266 | |
267 static void gjab_send_raw(gjconn j, const char *str) | |
268 { | |
269 if (j && j->state != JCONN_STATE_OFF) { | |
270 write(j->fd, str, strlen(str)); | |
271 debug_printf("gjab_send_raw: %s\n", str); | |
272 } | |
273 } | |
274 | |
275 static void gjab_reqroster(gjconn j) | |
276 { | |
277 xmlnode x; | |
278 | |
279 x = jutil_iqnew(JPACKET__GET, NS_ROSTER); | |
280 xmlnode_put_attrib(x, "id", gjab_getid(j)); | |
281 | |
282 gjab_send(j, x); | |
283 xmlnode_free(x); | |
284 } | |
285 | |
286 static void gjab_auth(gjconn j) | |
287 { | |
288 xmlnode x, y, z; | |
289 char *hash, *user; | |
290 | |
291 if (!j) | |
292 return; | |
293 | |
294 x = jutil_iqnew(JPACKET__SET, NS_AUTH); | |
295 xmlnode_put_attrib(x, "id", IQID_AUTH); | |
296 y = xmlnode_get_tag(x, "query"); | |
297 | |
298 user = j->user->user; | |
299 | |
300 if (user) { | |
301 z = xmlnode_insert_tag(y, "username"); | |
302 xmlnode_insert_cdata(z, user, -1); | |
303 } | |
304 | |
305 z = xmlnode_insert_tag(y, "resource"); | |
306 xmlnode_insert_cdata(z, j->user->resource, -1); | |
307 | |
308 if (j->sid) { | |
309 z = xmlnode_insert_tag(y, "digest"); | |
310 hash = pmalloc(x->p, strlen(j->sid) + strlen(j->pass) + 1); | |
311 strcpy(hash, j->sid); | |
312 strcat(hash, j->pass); | |
313 hash = shahash(hash); | |
314 xmlnode_insert_cdata(z, hash, 40); | |
315 } else { | |
316 z = xmlnode_insert_tag(y, "password"); | |
317 xmlnode_insert_cdata(z, j->pass, -1); | |
318 } | |
319 | |
320 gjab_send(j, x); | |
321 xmlnode_free(x); | |
322 | |
323 return; | |
324 } | |
325 | |
326 static void gjab_recv(gjconn j) | |
327 { | |
328 static char buf[4096]; | |
329 int len; | |
330 | |
331 if (!j || j->state == JCONN_STATE_OFF) | |
332 return; | |
333 | |
334 if ((len = read(j->fd, buf, sizeof(buf) - 1))) { | |
335 buf[len] = '\0'; | |
336 debug_printf("input (len %d): %s\n", len, buf); | |
337 XML_Parse(j->parser, buf, len, 0); | |
338 } else if (len <= 0) { | |
339 STATE_EVT(JCONN_STATE_OFF) | |
340 } | |
341 } | |
342 | |
343 static void startElement(void *userdata, const char *name, const char **attribs) | |
344 { | |
345 xmlnode x; | |
346 gjconn j = (gjconn) userdata; | |
347 | |
348 if (j->current) { | |
349 /* Append the node to the current one */ | |
350 x = xmlnode_insert_tag(j->current, name); | |
351 xmlnode_put_expat_attribs(x, attribs); | |
352 | |
353 j->current = x; | |
354 } else { | |
355 x = xmlnode_new_tag(name); | |
356 xmlnode_put_expat_attribs(x, attribs); | |
357 if (strcmp(name, "stream:stream") == 0) { | |
358 /* special case: name == stream:stream */ | |
359 /* id attrib of stream is stored for digest auth */ | |
360 j->sid = xmlnode_get_attrib(x, "id"); | |
361 /* STATE_EVT(JCONN_STATE_AUTH) */ | |
2635
8c75e59e4bdf
[gaim-migrate @ 2648]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2607
diff
changeset
|
362 xmlnode_free(x); |
2086 | 363 } else { |
364 j->current = x; | |
365 } | |
366 } | |
367 } | |
368 | |
369 static void endElement(void *userdata, const char *name) | |
370 { | |
371 gjconn j = (gjconn) userdata; | |
372 xmlnode x; | |
373 jpacket p; | |
374 | |
375 if (j->current == NULL) { | |
376 /* we got </stream:stream> */ | |
377 STATE_EVT(JCONN_STATE_OFF) | |
378 return; | |
379 } | |
380 | |
381 x = xmlnode_get_parent(j->current); | |
382 | |
383 if (!x) { | |
384 /* it is time to fire the event */ | |
385 p = jpacket_new(j->current); | |
386 | |
387 if (j->on_packet) | |
388 (j->on_packet) (j, p); | |
389 else | |
390 xmlnode_free(j->current); | |
391 } | |
392 | |
393 j->current = x; | |
394 } | |
395 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
396 static void jabber_callback(gpointer data, gint source, GaimInputCondition condition) |
2086 | 397 { |
398 struct gaim_connection *gc = (struct gaim_connection *)data; | |
399 struct jabber_data *jd = (struct jabber_data *)gc->proto_data; | |
400 | |
401 gjab_recv(jd->jc); | |
402 } | |
403 | |
404 static void charData(void *userdata, const char *s, int slen) | |
405 { | |
406 gjconn j = (gjconn) userdata; | |
407 | |
408 if (j->current) | |
409 xmlnode_insert_cdata(j->current, s, slen); | |
410 } | |
411 | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
412 static void gjab_connected(gpointer data, gint source, GaimInputCondition cond) |
2086 | 413 { |
414 xmlnode x; | |
415 char *t, *t2; | |
416 struct gaim_connection *gc = data; | |
417 struct jabber_data *jd; | |
418 gjconn j; | |
419 | |
420 if (!g_slist_find(connections, gc)) { | |
421 close(source); | |
422 return; | |
423 } | |
424 | |
425 jd = gc->proto_data; | |
426 j = jd->jc; | |
427 | |
2300
d2686f757d6e
[gaim-migrate @ 2310]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2289
diff
changeset
|
428 if (j->fd != source) |
d2686f757d6e
[gaim-migrate @ 2310]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2289
diff
changeset
|
429 j->fd = source; |
d2686f757d6e
[gaim-migrate @ 2310]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2289
diff
changeset
|
430 |
2086 | 431 if (source == -1) { |
432 STATE_EVT(JCONN_STATE_OFF) | |
433 return; | |
434 } | |
435 | |
436 j->state = JCONN_STATE_CONNECTED; | |
437 STATE_EVT(JCONN_STATE_CONNECTED) | |
438 | |
439 /* start stream */ | |
440 x = jutil_header(NS_CLIENT, j->user->server); | |
441 t = xmlnode2str(x); | |
442 /* this is ugly, we can create the string here instead of jutil_header */ | |
443 /* what do you think about it? -madcat */ | |
444 t2 = strstr(t, "/>"); | |
445 *t2++ = '>'; | |
446 *t2 = '\0'; | |
447 gjab_send_raw(j, "<?xml version='1.0'?>"); | |
448 gjab_send_raw(j, t); | |
449 xmlnode_free(x); | |
450 | |
451 j->state = JCONN_STATE_ON; | |
452 STATE_EVT(JCONN_STATE_ON); | |
453 | |
454 gc = GJ_GC(j); | |
2090
b66aca8e8dce
[gaim-migrate @ 2100]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2086
diff
changeset
|
455 gc->inpa = gaim_input_add(j->fd, GAIM_INPUT_READ, jabber_callback, gc); |
2086 | 456 } |
457 | |
458 static void gjab_start(gjconn j) | |
459 { | |
460 struct aim_user *user; | |
461 int port; | |
462 | |
463 if (!j || j->state != JCONN_STATE_OFF) | |
464 return; | |
465 | |
466 user = GJ_GC(j)->user; | |
467 port = user->proto_opt[USEROPT_PORT][0] ? atoi(user->proto_opt[USEROPT_PORT]) : DEFAULT_PORT; | |
468 | |
469 j->parser = XML_ParserCreate(NULL); | |
470 XML_SetUserData(j->parser, (void *)j); | |
471 XML_SetElementHandler(j->parser, startElement, endElement); | |
472 XML_SetCharacterDataHandler(j->parser, charData); | |
473 | |
474 j->fd = proxy_connect(j->user->server, port, gjab_connected, GJ_GC(j)); | |
475 if (!user->gc || (j->fd < 0)) { | |
476 STATE_EVT(JCONN_STATE_OFF) | |
477 return; | |
478 } | |
479 } | |
480 | |
481 static struct conversation *find_chat(struct gaim_connection *gc, char *name) | |
482 { | |
483 GSList *bcs = gc->buddy_chats; | |
484 struct conversation *b = NULL; | |
485 char *chat = g_strdup(normalize(name)); | |
486 | |
487 while (bcs) { | |
488 b = bcs->data; | |
489 if (!strcasecmp(normalize(b->name), chat)) | |
490 break; | |
491 b = NULL; | |
492 bcs = bcs->next; | |
493 } | |
494 | |
495 g_free(chat); | |
496 return b; | |
497 } | |
498 | |
499 static struct jabber_chat *find_existing_chat(struct gaim_connection *gc, jid chat) | |
500 { | |
501 GSList *bcs = ((struct jabber_data *)gc->proto_data)->existing_chats; | |
502 struct jabber_chat *jc = NULL; | |
503 | |
504 while (bcs) { | |
505 jc = bcs->data; | |
506 if (!jid_cmpx(chat, jc->Jid, JID_USER | JID_SERVER)) | |
507 break; | |
508 jc = NULL; | |
509 bcs = bcs->next; | |
510 } | |
511 | |
512 return jc; | |
513 } | |
514 | |
515 static struct jabber_chat *find_pending_chat(struct gaim_connection *gc, jid chat) | |
516 { | |
517 GSList *bcs = ((struct jabber_data *)gc->proto_data)->pending_chats; | |
518 struct jabber_chat *jc = NULL; | |
519 | |
520 while (bcs) { | |
521 jc = bcs->data; | |
522 if (!jid_cmpx(chat, jc->Jid, JID_USER | JID_SERVER)) | |
523 break; | |
524 jc = NULL; | |
525 bcs = bcs->next; | |
526 } | |
527 | |
528 return jc; | |
529 } | |
530 | |
531 static gboolean find_chat_buddy(struct conversation *b, char *name) | |
532 { | |
533 GList *m = b->in_room; | |
534 | |
535 while (m) { | |
536 if (!strcmp(m->data, name)) | |
537 return TRUE; | |
538 m = m->next; | |
539 } | |
540 | |
541 return FALSE; | |
542 } | |
543 | |
544 static void jabber_handlemessage(gjconn j, jpacket p) | |
545 { | |
546 xmlnode y, xmlns, subj; | |
547 | |
548 char *from = NULL, *msg = NULL, *type = NULL, *topic = NULL; | |
549 char m[BUF_LONG * 2]; | |
550 | |
551 type = xmlnode_get_attrib(p->x, "type"); | |
552 | |
553 if (!type || !strcasecmp(type, "normal") || !strcasecmp(type, "chat")) { | |
554 | |
555 /* XXX namespaces could be handled better. (mid) */ | |
556 if ((xmlns = xmlnode_get_tag(p->x, "x"))) | |
557 type = xmlnode_get_attrib(xmlns, "xmlns"); | |
558 | |
559 from = jid_full(p->from); | |
560 /* | |
561 if ((y = xmlnode_get_tag(p->x, "html"))) { | |
562 msg = xmlnode_get_data(y); | |
563 } else | |
564 */ | |
565 if ((y = xmlnode_get_tag(p->x, "body"))) { | |
566 msg = xmlnode_get_data(y); | |
567 } | |
568 | |
569 msg = utf8_to_str(msg); | |
570 | |
571 if (!from) | |
572 return; | |
573 | |
574 if (type && !strcasecmp(type, "jabber:x:conference")) { | |
575 char *room; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
576 GList *m = NULL; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
577 char **data; |
2086 | 578 |
579 room = xmlnode_get_attrib(xmlns, "jid"); | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
580 data = g_strsplit(room, "@", 2); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
581 m = g_list_append(m, g_strdup(data[0])); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
582 m = g_list_append(m, g_strdup(data[1])); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
583 m = g_list_append(m, g_strdup(j->user->user)); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
584 g_strfreev(data); |
2086 | 585 |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
586 serv_got_chat_invite(GJ_GC(j), room, from, msg, m); |
2086 | 587 } else if (msg) { /* whisper */ |
588 struct jabber_chat *jc; | |
589 g_snprintf(m, sizeof(m), "%s", msg); | |
590 if (((jc = find_existing_chat(GJ_GC(j), p->from)) != NULL) && jc->b) | |
591 serv_got_chat_in(GJ_GC(j), jc->b->id, p->from->resource, 1, m, time(NULL)); | |
592 else { | |
2278
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
593 int flags = 0; |
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
594 if (xmlnode_get_tag(p->x, "gaim")) |
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
595 flags = IM_FLAG_GAIMUSER; |
2086 | 596 if (find_conversation(jid_full(p->from))) |
2278
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
597 serv_got_im(GJ_GC(j), jid_full(p->from), m, flags, time(NULL)); |
2086 | 598 else { |
599 from = g_strdup_printf("%s@%s", p->from->user, p->from->server); | |
2278
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
600 serv_got_im(GJ_GC(j), from, m, flags, time(NULL)); |
2086 | 601 g_free(from); |
602 } | |
603 } | |
604 } | |
605 | |
606 if (msg) | |
607 g_free(msg); | |
608 | |
609 } else if (!strcasecmp(type, "error")) { | |
610 if ((y = xmlnode_get_tag(p->x, "error"))) { | |
611 type = xmlnode_get_attrib(y, "code"); | |
612 msg = xmlnode_get_data(y); | |
613 } | |
614 | |
615 if (msg) { | |
616 from = g_strdup_printf("Error %s", type ? type : ""); | |
617 do_error_dialog(msg, from); | |
618 g_free(from); | |
619 } | |
620 } else if (!strcasecmp(type, "groupchat")) { | |
621 struct jabber_chat *jc; | |
622 static int i = 0; | |
623 | |
624 /* | |
625 if ((y = xmlnode_get_tag(p->x, "html"))) { | |
626 msg = xmlnode_get_data(y); | |
627 } else | |
628 */ | |
629 if ((y = xmlnode_get_tag(p->x, "body"))) { | |
630 msg = xmlnode_get_data(y); | |
631 } | |
632 | |
633 msg = utf8_to_str(msg); | |
634 | |
635 if ((subj = xmlnode_get_tag(p->x, "subject"))) { | |
636 topic = xmlnode_get_data(subj); | |
637 } | |
638 topic = utf8_to_str(topic); | |
639 | |
640 jc = find_existing_chat(GJ_GC(j), p->from); | |
641 if (!jc) { | |
642 /* we're not in this chat. are we supposed to be? */ | |
643 struct jabber_data *jd = GJ_GC(j)->proto_data; | |
644 if ((jc = find_pending_chat(GJ_GC(j), p->from)) != NULL) { | |
645 /* yes, we're supposed to be. so now we are. */ | |
646 jc->b = serv_got_joined_chat(GJ_GC(j), i++, p->from->user); | |
647 jc->id = jc->b->id; | |
648 jd->existing_chats = g_slist_append(jd->existing_chats, jc); | |
649 jd->pending_chats = g_slist_remove(jd->pending_chats, jc); | |
650 } else { | |
651 /* no, we're not supposed to be. */ | |
652 g_free(msg); | |
653 return; | |
654 } | |
655 } | |
656 if (p->from->resource) { | |
657 if (!y) { | |
658 if (!find_chat_buddy(jc->b, p->from->resource)) | |
659 add_chat_buddy(jc->b, p->from->resource); | |
660 else if ((y = xmlnode_get_tag(p->x, "status"))) { | |
661 char buf[8192]; | |
662 msg = xmlnode_get_data(y); | |
663 g_snprintf(buf, sizeof(buf), "%s now has status: %s", | |
664 p->from->resource, msg); | |
665 write_to_conv(jc->b, buf, WFLAG_SYSTEM, NULL, time(NULL)); | |
666 } | |
667 } else if (jc->b && msg) { | |
668 char buf[8192]; | |
669 | |
670 if (topic) { | |
671 char tbuf[8192]; | |
672 g_snprintf(tbuf, sizeof(tbuf), "%s", topic); | |
673 chat_set_topic(jc->b, p->from->resource, tbuf); | |
674 } | |
675 | |
676 | |
677 g_snprintf(buf, sizeof(buf), "%s", msg); | |
678 serv_got_chat_in(GJ_GC(j), jc->b->id, p->from->resource, 0, buf, time(NULL)); | |
679 } | |
680 } else { /* message from the server */ | |
681 if(jc->b && topic) { | |
682 char tbuf[8192]; | |
683 g_snprintf(tbuf, sizeof(tbuf), "%s", topic); | |
684 chat_set_topic(jc->b, "", tbuf); | |
685 } | |
686 } | |
687 | |
688 g_free(msg); | |
689 g_free(topic); | |
690 | |
691 } else { | |
692 debug_printf("unhandled message %s\n", type); | |
693 } | |
694 } | |
695 | |
696 static void jabber_handlepresence(gjconn j, jpacket p) | |
697 { | |
698 char *to, *from, *type; | |
699 struct buddy *b = NULL; | |
700 jid who; | |
701 char *buddy; | |
702 xmlnode y; | |
703 char *show; | |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
704 int state = 0; |
2086 | 705 GSList *resources; |
706 char *res; | |
707 struct conversation *cnv = NULL; | |
708 struct jabber_chat *jc = NULL; | |
709 | |
710 to = xmlnode_get_attrib(p->x, "to"); | |
711 from = xmlnode_get_attrib(p->x, "from"); | |
712 type = xmlnode_get_attrib(p->x, "type"); | |
713 | |
714 if ((y = xmlnode_get_tag(p->x, "show"))) { | |
715 show = xmlnode_get_data(y); | |
716 if (!show) { | |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
717 state = 0; |
2086 | 718 } else if (!strcasecmp(show, "away")) { |
719 state = UC_AWAY; | |
720 } else if (!strcasecmp(show, "chat")) { | |
721 state = UC_CHAT; | |
722 } else if (!strcasecmp(show, "xa")) { | |
723 state = UC_XA; | |
724 } else if (!strcasecmp(show, "dnd")) { | |
725 state = UC_DND; | |
726 } | |
727 } else { | |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
728 state = 0; |
2086 | 729 } |
730 | |
731 who = jid_new(j->p, from); | |
732 if (who->user == NULL) { | |
733 /* FIXME: transport */ | |
734 return; | |
735 } | |
736 | |
737 buddy = g_strdup_printf("%s@%s", who->user, who->server); | |
738 | |
739 /* um. we're going to check if it's a chat. if it isn't, and there are pending | |
740 * chats, create the chat. if there aren't pending chats, add the buddy. */ | |
741 if ((cnv = find_chat(GJ_GC(j), who->user)) == NULL) { | |
742 static int i = 0x70; | |
743 struct jabber_data *jd = GJ_GC(j)->proto_data; | |
744 if ((jc = find_pending_chat(GJ_GC(j), who)) != NULL) { | |
745 jc->b = cnv = serv_got_joined_chat(GJ_GC(j), i++, who->user); | |
746 jc->id = jc->b->id; | |
747 jd->existing_chats = g_slist_append(jd->existing_chats, jc); | |
748 jd->pending_chats = g_slist_remove(jd->pending_chats, jc); | |
749 } else if (!(b = find_buddy(GJ_GC(j), buddy))) { | |
750 b = add_buddy(GJ_GC(j), "Buddies", buddy, buddy); | |
751 do_export(GJ_GC(j)); | |
752 } | |
753 } | |
754 | |
755 if (!cnv) { | |
756 resources = b->proto_data; | |
757 res = who->resource; | |
758 if (res) | |
759 while (resources) { | |
760 if (!strcmp(res, resources->data)) | |
761 break; | |
762 resources = resources->next; | |
763 } | |
764 | |
765 if (type && (strcasecmp(type, "unavailable") == 0)) { | |
766 if (resources) { | |
767 g_free(resources->data); | |
768 b->proto_data = g_slist_remove(b->proto_data, resources->data); | |
769 } | |
770 if (!b->proto_data) { | |
771 serv_got_update(GJ_GC(j), buddy, 0, 0, 0, 0, 0, 0); | |
772 } | |
773 } else { | |
774 /* keep track of away msg same as yahoo plugin */ | |
775 struct jabber_data *jd = GJ_GC(j)->proto_data; | |
2731
e9e624d8803e
[gaim-migrate @ 2744]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2681
diff
changeset
|
776 gpointer val = g_hash_table_lookup(jd->hash, normalize(b->name)); |
e9e624d8803e
[gaim-migrate @ 2744]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2681
diff
changeset
|
777 if (val) { |
2086 | 778 g_free(val); |
2731
e9e624d8803e
[gaim-migrate @ 2744]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2681
diff
changeset
|
779 g_hash_table_insert(jd->hash, normalize(b->name), |
e9e624d8803e
[gaim-migrate @ 2744]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2681
diff
changeset
|
780 g_strdup(xmlnode_get_tag_data(p->x, "status"))); |
e9e624d8803e
[gaim-migrate @ 2744]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2681
diff
changeset
|
781 } else |
e9e624d8803e
[gaim-migrate @ 2744]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2681
diff
changeset
|
782 g_hash_table_insert(jd->hash, g_strdup(normalize(b->name)), |
e9e624d8803e
[gaim-migrate @ 2744]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2681
diff
changeset
|
783 g_strdup(xmlnode_get_tag_data(p->x, "status"))); |
2086 | 784 |
785 | |
786 if (!resources) { | |
787 b->proto_data = g_slist_append(b->proto_data, g_strdup(res)); | |
788 } | |
789 | |
790 serv_got_update(GJ_GC(j), buddy, 1, 0, 0, 0, state, 0); | |
791 | |
792 } | |
793 } else { | |
794 if (who->resource) { | |
795 if (type && !strcasecmp(type, "unavailable")) { | |
796 struct jabber_data *jd; | |
797 if (!jc && !(jc = find_existing_chat(GJ_GC(j), who))) { | |
798 g_free(buddy); | |
799 return; | |
800 } | |
801 jd = jc->gc->proto_data; | |
802 if (strcmp(who->resource, jc->Jid->resource) && jc->b) { | |
803 remove_chat_buddy(jc->b, who->resource); | |
804 return; | |
805 } | |
806 | |
807 jd->existing_chats = g_slist_remove(jd->existing_chats, jc); | |
808 serv_got_chat_left(GJ_GC(j), jc->id); | |
809 g_free(jc); | |
810 } else { | |
811 if ((!jc && !(jc = find_existing_chat(GJ_GC(j), who))) || !jc->b) { | |
812 g_free(buddy); | |
813 return; | |
814 } | |
815 if (!find_chat_buddy(jc->b, who->resource)) | |
816 add_chat_buddy(jc->b, who->resource); | |
817 else if ((y = xmlnode_get_tag(p->x, "status"))) { | |
818 char buf[8192]; | |
819 char *msg = xmlnode_get_data(y); | |
820 g_snprintf(buf, sizeof(buf), "%s now has status: %s", | |
821 p->from->resource, msg); | |
822 write_to_conv(jc->b, buf, WFLAG_SYSTEM, NULL, time(NULL)); | |
823 } | |
824 } | |
825 } | |
826 } | |
827 | |
828 g_free(buddy); | |
829 | |
830 return; | |
831 } | |
832 | |
833 static void jabber_handles10n(gjconn j, jpacket p) | |
834 { | |
835 xmlnode g; | |
836 char *Jid = xmlnode_get_attrib(p->x, "from"); | |
837 char *ask = xmlnode_get_attrib(p->x, "type"); | |
838 | |
839 g = xmlnode_new_tag("presence"); | |
840 xmlnode_put_attrib(g, "to", Jid); | |
841 if (!strcmp(ask, "subscribe")) | |
842 xmlnode_put_attrib(g, "type", "subscribed"); | |
843 else if (!strcmp(ask, "unsubscribe")) | |
844 xmlnode_put_attrib(g, "type", "unsubscribed"); | |
845 else | |
846 return; | |
847 | |
848 gjab_send(j, g); | |
849 } | |
850 | |
851 static void jabber_handleroster(gjconn j, xmlnode querynode) | |
852 { | |
853 xmlnode x; | |
854 | |
855 x = xmlnode_get_firstchild(querynode); | |
856 while (x) { | |
857 xmlnode g; | |
858 char *Jid, *name, *sub, *ask; | |
859 jid who; | |
860 | |
861 Jid = xmlnode_get_attrib(x, "jid"); | |
862 name = xmlnode_get_attrib(x, "name"); | |
863 sub = xmlnode_get_attrib(x, "subscription"); | |
864 ask = xmlnode_get_attrib(x, "ask"); | |
865 who = jid_new(j->p, Jid); | |
866 | |
867 if ((g = xmlnode_get_firstchild(x))) { | |
868 while (g) { | |
2112
0ad5f2cf6728
[gaim-migrate @ 2122]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2111
diff
changeset
|
869 if (xmlnode_get_name(g) && |
0ad5f2cf6728
[gaim-migrate @ 2122]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2111
diff
changeset
|
870 g_strncasecmp(xmlnode_get_name(g), "group", 5) == 0) { |
2086 | 871 struct buddy *b = NULL; |
872 char *groupname, *buddyname; | |
873 | |
2111
109669b3887e
[gaim-migrate @ 2121]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2090
diff
changeset
|
874 if (!who || !who->user) { |
2086 | 875 /* FIXME: transport */ |
876 g = xmlnode_get_nextsibling(g); | |
877 continue; | |
878 } | |
879 buddyname = g_strdup_printf("%s@%s", who->user, who->server); | |
880 groupname = xmlnode_get_data(xmlnode_get_firstchild(g)); | |
881 if (groupname == NULL) | |
882 groupname = "Buddies"; | |
883 if (strcasecmp(sub, "from") && strcasecmp(sub, "none") && | |
884 !(b = find_buddy(GJ_GC(j), buddyname))) { | |
885 debug_printf("adding buddy: %s\n", buddyname); | |
886 b = add_buddy(GJ_GC(j), groupname, buddyname, | |
887 name ? name : buddyname); | |
888 do_export(GJ_GC(j)); | |
889 /* | |
890 } else if (b) { | |
891 debug_printf("updating buddy: %s/%s\n", buddyname, name); | |
892 g_snprintf(b->name, sizeof(b->name), "%s", buddyname); | |
893 g_snprintf(b->show, sizeof(b->show), "%s", | |
894 name ? name : buddyname); | |
895 */ | |
896 } | |
897 g_free(buddyname); | |
898 } | |
899 g = xmlnode_get_nextsibling(g); | |
900 } | |
901 } else { | |
902 struct buddy *b; | |
903 char *buddyname; | |
904 | |
2111
109669b3887e
[gaim-migrate @ 2121]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2090
diff
changeset
|
905 if (!who || !who->user) { |
2086 | 906 /* FIXME: transport */ |
907 x = xmlnode_get_nextsibling(x); | |
908 continue; | |
909 } | |
910 buddyname = g_strdup_printf("%s@%s", who->user, who->server); | |
911 if (strcasecmp(sub, "from") && strcasecmp(sub, "none") && | |
912 !(b = find_buddy(GJ_GC(j), buddyname))) { | |
913 debug_printf("adding buddy: %s\n", buddyname); | |
914 b = add_buddy(GJ_GC(j), "Buddies", buddyname, name ? name : Jid); | |
915 do_export(GJ_GC(j)); | |
916 } | |
917 g_free(buddyname); | |
918 } | |
919 | |
920 x = xmlnode_get_nextsibling(x); | |
921 } | |
922 | |
923 x = jutil_presnew(0, NULL, "Online"); | |
924 gjab_send(j, x); | |
925 xmlnode_free(x); | |
926 } | |
927 | |
928 static void jabber_handlevcard(gjconn j, xmlnode querynode, char *from) { | |
2773
a0fd8f91e294
[gaim-migrate @ 2786]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2731
diff
changeset
|
929 struct gaim_connection *gc = GJ_GC(j); |
2086 | 930 char buf[1024]; |
931 char *fn, *url, *email, *nickname, *status, *desc; | |
932 jid who; | |
933 char *buddy; | |
934 struct jabber_data *jd = GJ_GC(j)->proto_data; | |
935 int at = 0; | |
936 | |
937 who = jid_new(j->p, from); | |
938 buddy = g_strdup_printf("%s@%s", who->user, who->server); | |
939 | |
940 fn = xmlnode_get_tag_data(querynode, "FN"); | |
941 url = xmlnode_get_tag_data(querynode, "URL"); | |
942 email = xmlnode_get_tag_data(querynode, "EMAIL"); | |
943 nickname = xmlnode_get_tag_data(querynode, "NICKNAME"); | |
944 desc = xmlnode_get_tag_data(querynode, "DESC"); | |
945 status = g_hash_table_lookup(jd->hash, buddy); | |
946 if (!status) | |
947 status = "Online"; | |
948 | |
949 at = g_snprintf(buf, sizeof buf, "<B>Jabber ID:</B> %s<BR>", buddy); | |
950 if (fn) | |
951 at += g_snprintf(buf + at, sizeof(buf) - at, "<B>Full Name:</B> %s<BR>", fn); | |
952 if (nickname) | |
953 at += g_snprintf(buf + at, sizeof(buf) - at, "<B>Nickname:</B> %s<BR>", nickname); | |
954 if (url) | |
955 at += g_snprintf(buf + at, sizeof(buf) - at, "<B>URL:</B> <A HREF=\"%s\">%s</A><BR>", | |
956 url, url); | |
957 if (email) | |
958 at += g_snprintf(buf + at, sizeof(buf) - at, | |
959 "<B>Email:</B> <A HREF=\"mailto:%s\">%s</A><BR>", email, email); | |
960 at += g_snprintf(buf + at, sizeof(buf) - at, "<B>Status:</B> %s\n", status); | |
961 if (desc) | |
962 at += g_snprintf(buf + at, sizeof(buf) - at, "<HR>%s<br>\n", desc); | |
963 | |
2773
a0fd8f91e294
[gaim-migrate @ 2786]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2731
diff
changeset
|
964 g_show_info_text(gc, buddy, FALSE, buf, NULL); |
2086 | 965 g_free(buddy); |
966 } | |
967 | |
968 static void jabber_handleauthresp(gjconn j, jpacket p) | |
969 { | |
970 if (jpacket_subtype(p) == JPACKET__RESULT) { | |
971 debug_printf("auth success\n"); | |
972 | |
973 account_online(GJ_GC(j)); | |
974 serv_finish_login(GJ_GC(j)); | |
975 | |
976 if (bud_list_cache_exists(GJ_GC(j))) | |
2382
569ae9f2bb89
[gaim-migrate @ 2395]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2316
diff
changeset
|
977 do_import(GJ_GC(j), NULL); |
2086 | 978 |
979 ((struct jabber_data *)GJ_GC(j)->proto_data)->did_import = TRUE; | |
980 | |
981 gjab_reqroster(j); | |
982 } else { | |
983 xmlnode xerr; | |
984 char *errmsg = NULL; | |
985 int errcode = 0; | |
986 | |
987 debug_printf("auth failed\n"); | |
988 xerr = xmlnode_get_tag(p->x, "error"); | |
989 if (xerr) { | |
990 char msg[BUF_LONG]; | |
991 errmsg = xmlnode_get_data(xerr); | |
992 if (xmlnode_get_attrib(xerr, "code")) { | |
993 errcode = atoi(xmlnode_get_attrib(xerr, "code")); | |
994 g_snprintf(msg, sizeof(msg), "Error %d: %s", errcode, errmsg); | |
995 } else | |
996 g_snprintf(msg, sizeof(msg), "%s", errmsg); | |
997 hide_login_progress(GJ_GC(j), msg); | |
998 } else { | |
999 hide_login_progress(GJ_GC(j), "Unknown login error"); | |
1000 } | |
1001 | |
1002 signoff(GJ_GC(j)); | |
1003 } | |
1004 } | |
1005 | |
1006 static void jabber_handleversion(gjconn j, xmlnode iqnode) { | |
1007 xmlnode querynode, x; | |
1008 char *id, *from; | |
1009 char os[1024]; | |
1010 struct utsname osinfo; | |
1011 | |
1012 uname(&osinfo); | |
1013 g_snprintf(os, sizeof os, "%s %s %s", osinfo.sysname, osinfo.release, osinfo.machine); | |
1014 | |
1015 id = xmlnode_get_attrib(iqnode, "id"); | |
1016 from = xmlnode_get_attrib(iqnode, "from"); | |
1017 | |
1018 x = jutil_iqnew(JPACKET__RESULT, NS_VERSION); | |
1019 | |
1020 xmlnode_put_attrib(x, "to", from); | |
1021 xmlnode_put_attrib(x, "id", id); | |
1022 querynode = xmlnode_get_tag(x, "query"); | |
1023 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "name"), PACKAGE, -1); | |
1024 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "version"), VERSION, -1); | |
1025 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "os"), os, -1); | |
1026 | |
1027 gjab_send(j, x); | |
1028 | |
1029 xmlnode_free(x); | |
1030 } | |
1031 | |
1032 static void jabber_handletime(gjconn j, xmlnode iqnode) { | |
1033 xmlnode querynode, x; | |
1034 char *id, *from; | |
1035 time_t now_t; | |
1036 struct tm *now; | |
1037 char buf[1024]; | |
1038 | |
1039 time(&now_t); | |
1040 now = localtime(&now_t); | |
1041 | |
1042 id = xmlnode_get_attrib(iqnode, "id"); | |
1043 from = xmlnode_get_attrib(iqnode, "from"); | |
1044 | |
1045 x = jutil_iqnew(JPACKET__RESULT, NS_TIME); | |
1046 | |
1047 xmlnode_put_attrib(x, "to", from); | |
1048 xmlnode_put_attrib(x, "id", id); | |
1049 querynode = xmlnode_get_tag(x, "query"); | |
1050 | |
1051 strftime(buf, 1024, "%Y%m%dT%T", now); | |
1052 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "utc"), buf, -1); | |
1053 strftime(buf, 1024, "%Z", now); | |
1054 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "tz"), buf, -1); | |
1055 strftime(buf, 1024, "%d %b %Y %T", now); | |
1056 xmlnode_insert_cdata(xmlnode_insert_tag(querynode, "display"), buf, -1); | |
1057 | |
1058 gjab_send(j, x); | |
1059 | |
1060 xmlnode_free(x); | |
1061 } | |
1062 | |
1063 static void jabber_handlelast(gjconn j, xmlnode iqnode) { | |
1064 xmlnode x, querytag; | |
1065 char *id, *from; | |
1066 struct jabber_data *jd = GJ_GC(j)->proto_data; | |
1067 char idle_time[32]; | |
1068 | |
1069 id = xmlnode_get_attrib(iqnode, "id"); | |
1070 from = xmlnode_get_attrib(iqnode, "from"); | |
1071 | |
1072 x = jutil_iqnew(JPACKET__RESULT, "jabber:iq:last"); | |
1073 | |
1074 xmlnode_put_attrib(x, "to", from); | |
1075 xmlnode_put_attrib(x, "id", id); | |
1076 querytag = xmlnode_get_tag(x, "query"); | |
1077 g_snprintf(idle_time, sizeof idle_time, "%ld", jd->idle ? time(NULL) - jd->idle : 0); | |
1078 xmlnode_put_attrib(querytag, "seconds", idle_time); | |
1079 | |
1080 gjab_send(j, x); | |
1081 xmlnode_free(x); | |
1082 } | |
1083 | |
1084 static void jabber_handlepacket(gjconn j, jpacket p) | |
1085 { | |
1086 switch (p->type) { | |
1087 case JPACKET_MESSAGE: | |
1088 jabber_handlemessage(j, p); | |
1089 break; | |
1090 case JPACKET_PRESENCE: | |
1091 jabber_handlepresence(j, p); | |
1092 break; | |
1093 case JPACKET_IQ: | |
1094 debug_printf("jpacket_subtype: %d\n", jpacket_subtype(p)); | |
1095 | |
1096 if (xmlnode_get_attrib(p->x, "id") && (strcmp(xmlnode_get_attrib(p->x, "id"), IQID_AUTH) == 0)) { | |
1097 jabber_handleauthresp(j, p); | |
1098 break; /* I'm not sure if you like this style, Eric. */ | |
1099 } | |
1100 | |
1101 if (jpacket_subtype(p) == JPACKET__SET) { | |
1102 } else if (jpacket_subtype(p) == JPACKET__GET) { | |
1103 xmlnode querynode; | |
1104 querynode = xmlnode_get_tag(p->x, "query"); | |
1105 if(NSCHECK(querynode, NS_VERSION)) { | |
1106 jabber_handleversion(j, p->x); | |
1107 } else if (NSCHECK(querynode, NS_TIME)) { | |
1108 jabber_handletime(j, p->x); | |
1109 } else if (NSCHECK(querynode, "jabber:iq:last")) { | |
1110 jabber_handlelast(j, p->x); | |
1111 } | |
1112 } else if (jpacket_subtype(p) == JPACKET__RESULT) { | |
1113 xmlnode querynode, vcard; | |
1114 char *xmlns, *from; | |
1115 | |
1116 from = xmlnode_get_attrib(p->x, "from"); | |
1117 querynode = xmlnode_get_tag(p->x, "query"); | |
1118 xmlns = xmlnode_get_attrib(querynode, "xmlns"); | |
1119 vcard = xmlnode_get_tag(p->x, "vCard"); | |
2316
ebb5ecb2cd5b
[gaim-migrate @ 2326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2309
diff
changeset
|
1120 if (!vcard) |
ebb5ecb2cd5b
[gaim-migrate @ 2326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2309
diff
changeset
|
1121 vcard = xmlnode_get_tag(p->x, "VCARD"); |
2086 | 1122 |
1123 if (NSCHECK(querynode, NS_ROSTER)) { | |
1124 jabber_handleroster(j, querynode); | |
1125 } else if (NSCHECK(querynode, NS_VCARD)) { | |
1126 jabber_handlevcard(j, querynode, from); | |
2316
ebb5ecb2cd5b
[gaim-migrate @ 2326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2309
diff
changeset
|
1127 } else if (vcard) { |
2086 | 1128 jabber_handlevcard(j, vcard, from); |
1129 } else { | |
1130 /* debug_printf("jabber:iq:query: %s\n", xmlns); */ | |
1131 } | |
1132 | |
1133 } else if (jpacket_subtype(p) == JPACKET__ERROR) { | |
1134 xmlnode xerr; | |
1135 char *from, *errmsg = NULL; | |
1136 int errcode = 0; | |
1137 | |
1138 from = xmlnode_get_attrib(p->x, "from"); | |
1139 xerr = xmlnode_get_tag(p->x, "error"); | |
1140 if (xerr) { | |
1141 errmsg = xmlnode_get_data(xerr); | |
1142 if (xmlnode_get_attrib(xerr, "code")) | |
1143 errcode = atoi(xmlnode_get_attrib(xerr, "code")); | |
1144 } | |
1145 | |
1146 from = g_strdup_printf("Error %d (%s)", errcode, from); | |
1147 do_error_dialog(errmsg, from); | |
1148 g_free(from); | |
1149 | |
1150 } | |
1151 | |
1152 break; | |
1153 | |
1154 case JPACKET_S10N: | |
1155 jabber_handles10n(j, p); | |
1156 break; | |
1157 default: | |
1158 debug_printf("jabber: packet type %d (%s)\n", p->type, xmlnode2str(p->x)); | |
1159 } | |
1160 | |
1161 xmlnode_free(p->x); | |
1162 | |
1163 return; | |
1164 } | |
1165 | |
1166 static void jabber_handlestate(gjconn j, int state) | |
1167 { | |
1168 switch (state) { | |
1169 case JCONN_STATE_OFF: | |
1170 hide_login_progress(GJ_GC(j), "Unable to connect"); | |
1171 signoff(GJ_GC(j)); | |
1172 break; | |
1173 case JCONN_STATE_CONNECTED: | |
1174 set_login_progress(GJ_GC(j), 3, "Connected"); | |
1175 break; | |
1176 case JCONN_STATE_ON: | |
1177 set_login_progress(GJ_GC(j), 5, "Logging in..."); | |
1178 gjab_auth(j); | |
1179 break; | |
1180 default: | |
1181 debug_printf("state change: %d\n", state); | |
1182 } | |
1183 return; | |
1184 } | |
1185 | |
1186 static void jabber_login(struct aim_user *user) | |
1187 { | |
1188 struct gaim_connection *gc = new_gaim_conn(user); | |
1189 struct jabber_data *jd = gc->proto_data = g_new0(struct jabber_data, 1); | |
1190 char *loginname = create_valid_jid(user->username, DEFAULT_SERVER, "GAIM"); | |
1191 | |
1192 jd->hash = g_hash_table_new(g_str_hash, g_str_equal); | |
1193 | |
1194 set_login_progress(gc, 1, "Connecting"); | |
1195 | |
1196 if (!(jd->jc = gjab_new(loginname, user->password, gc))) { | |
1197 g_free(loginname); | |
1198 debug_printf("jabber: unable to connect (jab_new failed)\n"); | |
1199 hide_login_progress(gc, "Unable to connect"); | |
1200 signoff(gc); | |
1201 return; | |
1202 } | |
1203 | |
1204 g_free(loginname); | |
1205 gjab_state_handler(jd->jc, jabber_handlestate); | |
1206 gjab_packet_handler(jd->jc, jabber_handlepacket); | |
1207 gjab_start(jd->jc); | |
1208 } | |
1209 | |
1210 static gboolean jabber_destroy_hash(gpointer key, gpointer val, gpointer data) { | |
1211 g_free(key); | |
1212 g_free(val); | |
1213 return TRUE; | |
1214 } | |
1215 | |
1216 static gboolean jabber_free(gpointer data) | |
1217 { | |
1218 gjab_delete(data); | |
1219 return FALSE; | |
1220 } | |
1221 | |
1222 static void jabber_close(struct gaim_connection *gc) | |
1223 { | |
1224 struct jabber_data *jd = gc->proto_data; | |
1225 g_hash_table_foreach_remove(jd->hash, jabber_destroy_hash, NULL); | |
1226 g_hash_table_destroy(jd->hash); | |
2300
d2686f757d6e
[gaim-migrate @ 2310]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2289
diff
changeset
|
1227 if (gc->inpa) |
d2686f757d6e
[gaim-migrate @ 2310]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2289
diff
changeset
|
1228 gaim_input_remove(gc->inpa); |
2086 | 1229 close(jd->jc->fd); |
2131
acc11216ec5d
[gaim-migrate @ 2141]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2123
diff
changeset
|
1230 g_timeout_add(50, jabber_free, jd->jc); |
2635
8c75e59e4bdf
[gaim-migrate @ 2648]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2607
diff
changeset
|
1231 xmlnode_free(jd->jc->current); |
2086 | 1232 jd->jc = NULL; |
1233 g_free(jd); | |
1234 gc->proto_data = NULL; | |
1235 } | |
1236 | |
2231
8c4ff1a368bd
[gaim-migrate @ 2241]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2205
diff
changeset
|
1237 static int jabber_send_im(struct gaim_connection *gc, char *who, char *message, int flags) |
2086 | 1238 { |
1239 xmlnode x, y; | |
1240 char *realwho; | |
1241 gjconn j = ((struct jabber_data *)gc->proto_data)->jc; | |
1242 | |
1243 if (!who || !message) | |
2123
56c4382f2909
[gaim-migrate @ 2133]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2112
diff
changeset
|
1244 return 0; |
2086 | 1245 |
1246 x = xmlnode_new_tag("message"); | |
1247 if (!strchr(who, '@')) | |
1248 realwho = g_strdup_printf("%s@%s", who, j->user->server); | |
1249 else | |
1250 realwho = g_strdup(who); | |
1251 xmlnode_put_attrib(x, "to", realwho); | |
1252 g_free(realwho); | |
1253 | |
2278
00a8b7bcef6c
[gaim-migrate @ 2288]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2232
diff
changeset
|
1254 xmlnode_insert_tag(x, "gaim"); |
2086 | 1255 xmlnode_put_attrib(x, "type", "chat"); |
1256 | |
1257 if (message && strlen(message)) { | |
1258 char *utf8 = str_to_utf8(message); | |
1259 y = xmlnode_insert_tag(x, "body"); | |
1260 xmlnode_insert_cdata(y, utf8, -1); | |
1261 g_free(utf8); | |
1262 } | |
1263 | |
1264 gjab_send(((struct jabber_data *)gc->proto_data)->jc, x); | |
1265 xmlnode_free(x); | |
2303
f5bf315e6104
[gaim-migrate @ 2313]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2300
diff
changeset
|
1266 return 1; |
2086 | 1267 } |
1268 | |
1269 static void jabber_add_buddy(struct gaim_connection *gc, char *name) | |
1270 { | |
1271 xmlnode x, y; | |
1272 char *realwho; | |
1273 gjconn j = ((struct jabber_data *)gc->proto_data)->jc; | |
1274 | |
1275 if (!((struct jabber_data *)gc->proto_data)->did_import) | |
1276 return; | |
1277 | |
1278 if (!name) | |
1279 return; | |
1280 | |
1281 if (!strcmp(gc->username, name)) | |
1282 return; | |
1283 | |
1284 if (!strchr(name, '@')) | |
1285 realwho = g_strdup_printf("%s@%s", name, j->user->server); | |
1286 else { | |
1287 jid who = jid_new(j->p, name); | |
1288 if (who->user == NULL) { | |
1289 /* FIXME: transport */ | |
1290 return; | |
1291 } | |
1292 realwho = g_strdup_printf("%s@%s", who->user, who->server); | |
1293 } | |
1294 | |
1295 x = jutil_iqnew(JPACKET__SET, NS_ROSTER); | |
1296 y = xmlnode_insert_tag(xmlnode_get_tag(x, "query"), "item"); | |
1297 xmlnode_put_attrib(y, "jid", realwho); | |
1298 gjab_send(((struct jabber_data *)gc->proto_data)->jc, x); | |
1299 xmlnode_free(x); | |
1300 | |
1301 x = xmlnode_new_tag("presence"); | |
1302 xmlnode_put_attrib(x, "to", realwho); | |
1303 xmlnode_put_attrib(x, "type", "subscribe"); | |
1304 gjab_send(((struct jabber_data *)gc->proto_data)->jc, x); | |
1305 | |
1306 g_free(realwho); | |
1307 } | |
1308 | |
2681
37d80035e77f
[gaim-migrate @ 2694]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2635
diff
changeset
|
1309 static void jabber_remove_buddy(struct gaim_connection *gc, char *name, char *group) |
2086 | 1310 { |
1311 xmlnode x, y; | |
1312 char *realwho; | |
1313 gjconn j = ((struct jabber_data *)gc->proto_data)->jc; | |
1314 | |
1315 if (!name) | |
1316 return; | |
1317 | |
1318 if (!strchr(name, '@')) | |
1319 realwho = g_strdup_printf("%s@%s", name, j->user->server); | |
1320 else | |
1321 realwho = g_strdup(name); | |
1322 | |
1323 x = jutil_iqnew(JPACKET__SET, NS_ROSTER); | |
1324 y = xmlnode_insert_tag(xmlnode_get_tag(x, "query"), "item"); | |
1325 xmlnode_put_attrib(y, "jid", realwho); | |
1326 xmlnode_put_attrib(y, "subscription", "remove"); | |
1327 gjab_send(((struct jabber_data *)gc->proto_data)->jc, x); | |
1328 | |
1329 g_free(realwho); | |
1330 xmlnode_free(x); | |
1331 } | |
1332 | |
1333 static char **jabber_list_icon(int uc) | |
1334 { | |
1335 switch (uc) { | |
1336 case UC_AWAY: | |
1337 return available_away_xpm; | |
1338 case UC_CHAT: | |
1339 return available_chat_xpm; | |
1340 case UC_XA: | |
1341 return available_xa_xpm; | |
1342 case UC_DND: | |
1343 return available_dnd_xpm; | |
1344 default: | |
1345 return available_xpm; | |
1346 } | |
1347 } | |
1348 | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1349 static GList *jabber_chat_info(struct gaim_connection *gc) |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1350 { |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1351 gjconn j = ((struct jabber_data *)gc->proto_data)->jc; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1352 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1353 GList *m = NULL; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1354 struct proto_chat_entry *pce; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1355 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1356 pce = g_new0(struct proto_chat_entry, 1); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1357 pce->label = _("Room:"); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1358 m = g_list_append(m, pce); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1359 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1360 pce = g_new0(struct proto_chat_entry, 1); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1361 pce->label = _("Server:"); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1362 pce->def = DEFAULT_GROUPCHAT; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1363 m = g_list_append(m, pce); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1364 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1365 pce = g_new0(struct proto_chat_entry, 1); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1366 pce->label = _("Handle:"); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1367 pce->def = j->user->user; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1368 m = g_list_append(m, pce); |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1369 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1370 return m; |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1371 } |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1372 |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1373 static void jabber_join_chat(struct gaim_connection *gc, GList *data) |
2086 | 1374 { |
1375 xmlnode x; | |
1376 char *realwho; | |
1377 gjconn j = ((struct jabber_data *)gc->proto_data)->jc; | |
1378 GSList *pc = ((struct jabber_data *)gc->proto_data)->pending_chats; | |
1379 struct jabber_chat *jc; | |
1380 | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1381 if (!data || !data->next || !data->next->next) |
2086 | 1382 return; |
1383 | |
1384 jc = g_new0(struct jabber_chat, 1); | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1385 realwho = create_valid_jid(data->data, data->next->data, |
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1386 data->next->next->data); |
2086 | 1387 jc->Jid = jid_new(j->p, realwho); |
1388 jc->gc = gc; | |
1389 debug_printf("%s\n", realwho); | |
1390 | |
1391 x = jutil_presnew(0, realwho, NULL); | |
1392 gjab_send(j, x); | |
1393 xmlnode_free(x); | |
1394 g_free(realwho); | |
1395 | |
1396 ((struct jabber_data *)gc->proto_data)->pending_chats = g_slist_append(pc, jc); | |
1397 } | |
1398 | |
1399 static void jabber_chat_invite(struct gaim_connection *gc, int id, char *message, char *name) | |
1400 { | |
1401 xmlnode x, y; | |
1402 GSList *bcs = gc->buddy_chats; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1403 struct conversation *b = NULL; |
2086 | 1404 struct jabber_data *jd = gc->proto_data; |
1405 gjconn j = jd->jc; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1406 struct jabber_chat *jc = NULL; |
2086 | 1407 char *realwho, *subject; |
1408 | |
1409 if (!name) | |
1410 return; | |
1411 | |
1412 /* find which chat we're inviting to */ | |
1413 while (bcs) { | |
1414 b = bcs->data; | |
1415 if (id == b->id) | |
1416 break; | |
1417 bcs = bcs->next; | |
1418 } | |
1419 if (!bcs) | |
1420 return; | |
1421 | |
1422 bcs = jd->existing_chats; | |
1423 while (bcs) { | |
1424 jc = bcs->data; | |
1425 if (jc->b == b) | |
1426 break; | |
1427 bcs = bcs->next; | |
1428 } | |
1429 if (!bcs) | |
1430 return; | |
1431 | |
1432 x = xmlnode_new_tag("message"); | |
1433 if (!strchr(name, '@')) | |
1434 realwho = g_strdup_printf("%s@%s", name, j->user->server); | |
1435 else | |
1436 realwho = g_strdup(name); | |
1437 xmlnode_put_attrib(x, "to", realwho); | |
1438 g_free(realwho); | |
1439 | |
1440 y = xmlnode_insert_tag(x, "x"); | |
1441 xmlnode_put_attrib(y, "xmlns", "jabber:x:conference"); | |
1442 subject = g_strdup_printf("%s@%s", jc->Jid->user, jc->Jid->server); | |
1443 xmlnode_put_attrib(y, "jid", subject); | |
1444 g_free(subject); | |
1445 | |
1446 if (message && strlen(message)) { | |
1447 char *utf8 = str_to_utf8(message); | |
1448 y = xmlnode_insert_tag(x, "body"); | |
1449 xmlnode_insert_cdata(y, utf8, -1); | |
1450 g_free(utf8); | |
1451 } | |
1452 | |
1453 gjab_send(((struct jabber_data *)gc->proto_data)->jc, x); | |
1454 xmlnode_free(x); | |
1455 } | |
1456 | |
1457 static void jabber_chat_leave(struct gaim_connection *gc, int id) | |
1458 { | |
1459 GSList *bcs = gc->buddy_chats; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1460 struct conversation *b = NULL; |
2086 | 1461 struct jabber_data *jd = gc->proto_data; |
1462 gjconn j = jd->jc; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1463 struct jabber_chat *jc = NULL; |
2086 | 1464 char *realwho; |
1465 xmlnode x; | |
1466 | |
1467 while (bcs) { | |
1468 b = bcs->data; | |
1469 if (id == b->id) | |
1470 break; | |
1471 bcs = bcs->next; | |
1472 } | |
1473 if (!bcs) | |
1474 return; | |
1475 | |
1476 bcs = jd->existing_chats; | |
1477 while (bcs) { | |
1478 jc = bcs->data; | |
1479 if (jc->b == b) | |
1480 break; | |
1481 bcs = bcs->next; | |
1482 } | |
1483 if (!bcs) | |
1484 return; | |
1485 | |
1486 realwho = g_strdup_printf("%s@%s", jc->Jid->user, jc->Jid->server); | |
1487 x = jutil_presnew(0, realwho, NULL); | |
1488 g_free(realwho); | |
1489 xmlnode_put_attrib(x, "type", "unavailable"); | |
1490 gjab_send(j, x); | |
1491 xmlnode_free(x); | |
1492 jc->b = NULL; | |
1493 } | |
1494 | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
1495 static int jabber_chat_send(struct gaim_connection *gc, int id, char *message) |
2086 | 1496 { |
1497 GSList *bcs = gc->buddy_chats; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1498 struct conversation *b = NULL; |
2086 | 1499 struct jabber_data *jd = gc->proto_data; |
1500 xmlnode x, y; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1501 struct jabber_chat *jc = NULL; |
2086 | 1502 char *chatname; |
1503 | |
1504 while (bcs) { | |
1505 b = bcs->data; | |
1506 if (id == b->id) | |
1507 break; | |
1508 bcs = bcs->next; | |
1509 } | |
1510 if (!bcs) | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
1511 return -EINVAL; |
2086 | 1512 |
1513 bcs = jd->existing_chats; | |
1514 while (bcs) { | |
1515 jc = bcs->data; | |
1516 if (jc->b == b) | |
1517 break; | |
1518 bcs = bcs->next; | |
1519 } | |
1520 if (!bcs) | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
1521 return -EINVAL; |
2086 | 1522 |
1523 x = xmlnode_new_tag("message"); | |
1524 xmlnode_put_attrib(x, "from", jid_full(jc->Jid)); | |
1525 chatname = g_strdup_printf("%s@%s", jc->Jid->user, jc->Jid->server); | |
1526 xmlnode_put_attrib(x, "to", chatname); | |
1527 g_free(chatname); | |
1528 xmlnode_put_attrib(x, "type", "groupchat"); | |
1529 | |
2289
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1530 if (message && strlen(message) > strlen("/topic ") && |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1531 !g_strncasecmp(message, "/topic ", strlen("/topic "))) { |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1532 char buf[8192]; |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1533 char *utf8 = str_to_utf8(message + strlen("/topic ")); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1534 y = xmlnode_insert_tag(x, "subject"); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1535 xmlnode_insert_cdata(y, utf8, -1); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1536 y = xmlnode_insert_tag(x, "body"); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1537 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
|
1538 xmlnode_insert_cdata(y, buf, -1); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1539 g_free(utf8); |
38e156136896
[gaim-migrate @ 2299]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2278
diff
changeset
|
1540 } else if (message && strlen(message)) { |
2086 | 1541 char *utf8 = str_to_utf8(message); |
1542 y = xmlnode_insert_tag(x, "body"); | |
1543 xmlnode_insert_cdata(y, utf8, -1); | |
1544 g_free(utf8); | |
1545 } | |
1546 | |
1547 gjab_send(((struct jabber_data *)gc->proto_data)->jc, x); | |
1548 xmlnode_free(x); | |
2167
edf8c5a70e5b
[gaim-migrate @ 2177]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2162
diff
changeset
|
1549 return 0; |
2086 | 1550 } |
1551 | |
1552 static void jabber_chat_whisper(struct gaim_connection *gc, int id, char *who, char *message) | |
1553 { | |
1554 GSList *bcs = gc->buddy_chats; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1555 struct conversation *b = NULL; |
2086 | 1556 struct jabber_data *jd = gc->proto_data; |
1557 xmlnode x, y; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1558 struct jabber_chat *jc = NULL; |
2086 | 1559 char *chatname; |
1560 | |
1561 while (bcs) { | |
1562 b = bcs->data; | |
1563 if (id == b->id) | |
1564 break; | |
1565 bcs = bcs->next; | |
1566 } | |
1567 if (!bcs) | |
1568 return; | |
1569 | |
1570 bcs = jd->existing_chats; | |
1571 while (bcs) { | |
1572 jc = bcs->data; | |
1573 if (jc->b == b) | |
1574 break; | |
1575 bcs = bcs->next; | |
1576 } | |
1577 if (!bcs) | |
1578 return; | |
1579 | |
1580 x = xmlnode_new_tag("message"); | |
1581 xmlnode_put_attrib(x, "from", jid_full(jc->Jid)); | |
1582 chatname = g_strdup_printf("%s@%s/%s", jc->Jid->user, jc->Jid->server, who); | |
1583 xmlnode_put_attrib(x, "to", chatname); | |
1584 g_free(chatname); | |
1585 xmlnode_put_attrib(x, "type", "normal"); | |
1586 | |
1587 if (message && strlen(message)) { | |
1588 char *utf8 = str_to_utf8(message); | |
1589 y = xmlnode_insert_tag(x, "body"); | |
1590 xmlnode_insert_cdata(y, utf8, -1); | |
1591 g_free(utf8); | |
1592 } | |
1593 | |
1594 gjab_send(((struct jabber_data *)gc->proto_data)->jc, x); | |
1595 xmlnode_free(x); | |
1596 } | |
1597 | |
1598 static char *jabber_normalize(const char *s) | |
1599 { | |
1600 static char buf[BUF_LEN]; | |
1601 char *t, *u; | |
1602 int x = 0; | |
1603 | |
1604 g_return_val_if_fail((s != NULL), NULL); | |
1605 | |
1606 u = t = g_strdup(s); | |
1607 | |
1608 g_strdown(t); | |
1609 | |
1610 while (*t && (x < BUF_LEN - 1)) { | |
1611 if (*t != ' ') | |
1612 buf[x++] = *t; | |
1613 t++; | |
1614 } | |
1615 buf[x] = '\0'; | |
1616 g_free(u); | |
1617 | |
1618 if (!strchr(buf, '@')) { | |
1619 strcat(buf, "@jabber.org"); /* this isn't always right, but eh */ | |
1620 } else if ((u = strchr(strchr(buf, '@'), '/')) != NULL) { | |
1621 *u = '\0'; | |
1622 } | |
1623 | |
1624 return buf; | |
1625 } | |
1626 | |
1627 static void jabber_get_info(struct gaim_connection *gc, char *who) { | |
1628 xmlnode x; | |
1629 char *id; | |
1630 struct jabber_data *jd = gc->proto_data; | |
1631 gjconn j = jd->jc; | |
1632 | |
1633 x = jutil_iqnew(JPACKET__GET, NS_VCARD); | |
1634 xmlnode_put_attrib(x, "to", who); | |
1635 id = gjab_getid(j); | |
1636 xmlnode_put_attrib(x, "id", id); | |
1637 | |
1638 gjab_send(j, x); | |
1639 | |
1640 xmlnode_free(x); | |
1641 | |
1642 } | |
1643 | |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1644 static GList *jabber_buddy_menu(struct gaim_connection *gc, char *who) { |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1645 GList *m = NULL; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1646 struct proto_buddy_menu *pbm; |
2086 | 1647 |
2170
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1648 pbm = g_new0(struct proto_buddy_menu, 1); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1649 pbm->label = _("Get Info"); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1650 pbm->callback = jabber_get_info; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1651 pbm->gc = gc; |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1652 m = g_list_append(m, pbm); |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1653 |
c24595d3c364
[gaim-migrate @ 2180]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2167
diff
changeset
|
1654 return m; |
2086 | 1655 } |
1656 | |
2501
227cc42ffa6e
[gaim-migrate @ 2514]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2382
diff
changeset
|
1657 static GList *jabber_away_states(struct gaim_connection *gc) { |
2086 | 1658 GList *m = NULL; |
1659 | |
1660 m = g_list_append(m, "Online"); | |
1661 m = g_list_append(m, "Chatty"); | |
1662 m = g_list_append(m, "Away"); | |
1663 m = g_list_append(m, "Extended Away"); | |
1664 m = g_list_append(m, "Do Not Disturb"); | |
1665 | |
1666 return m; | |
1667 } | |
1668 | |
1669 static void jabber_set_away(struct gaim_connection *gc, char *state, char *message) | |
1670 { | |
1671 xmlnode x, y; | |
1672 struct jabber_data *jd = gc->proto_data; | |
1673 gjconn j = jd->jc; | |
1674 | |
1675 gc->away = NULL; /* never send an auto-response */ | |
1676 | |
1677 x = xmlnode_new_tag("presence"); | |
1678 | |
1679 if (!strcmp(state, GAIM_AWAY_CUSTOM)) { | |
1680 /* oh goody. Gaim is telling us what to do. */ | |
1681 if (message) { | |
1682 /* Gaim wants us to be away */ | |
1683 y = xmlnode_insert_tag(x, "show"); | |
1684 xmlnode_insert_cdata(y, "away", -1); | |
1685 y = xmlnode_insert_tag(x, "status"); | |
1686 xmlnode_insert_cdata(y, message, -1); | |
1687 gc->away = ""; | |
1688 } else { | |
1689 /* Gaim wants us to not be away */ | |
1690 /* but for Jabber, we can just send presence with no other information. */ | |
1691 } | |
1692 } else { | |
1693 /* state is one of our own strings. it won't be NULL. */ | |
1694 if (!strcmp(state, "Online")) { | |
1695 /* once again, we don't have to put anything here */ | |
1696 } else if (!strcmp(state, "Chatty")) { | |
1697 y = xmlnode_insert_tag(x, "show"); | |
1698 xmlnode_insert_cdata(y, "chat", -1); | |
1699 } else if (!strcmp(state, "Away")) { | |
1700 y = xmlnode_insert_tag(x, "show"); | |
1701 xmlnode_insert_cdata(y, "away", -1); | |
1702 gc->away = ""; | |
1703 } else if (!strcmp(state, "Extended Away")) { | |
1704 y = xmlnode_insert_tag(x, "show"); | |
1705 xmlnode_insert_cdata(y, "xa", -1); | |
1706 gc->away = ""; | |
1707 } else if (!strcmp(state, "Do Not Disturb")) { | |
1708 y = xmlnode_insert_tag(x, "show"); | |
1709 xmlnode_insert_cdata(y, "dnd", -1); | |
1710 gc->away = ""; | |
1711 } | |
1712 } | |
1713 | |
1714 gjab_send(j, x); | |
1715 xmlnode_free(x); | |
1716 } | |
1717 | |
1718 static void jabber_set_idle(struct gaim_connection *gc, int idle) { | |
1719 struct jabber_data *jd = (struct jabber_data *)gc->proto_data; | |
1720 debug_printf("jabber_set_idle: setting idle %i\n", idle); | |
1721 jd->idle = idle ? time(NULL) - idle : idle; | |
1722 } | |
1723 | |
1724 static void jabber_keepalive(struct gaim_connection *gc) { | |
1725 struct jabber_data *jd = (struct jabber_data *)gc->proto_data; | |
1726 gjab_send_raw(jd->jc, " \t "); | |
1727 } | |
1728 | |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1729 static GList *jabber_user_opts() |
2086 | 1730 { |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1731 GList *m = NULL; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1732 struct proto_user_opt *puo; |
2086 | 1733 |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1734 puo = g_new0(struct proto_user_opt, 1); |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1735 puo->label = "Port:"; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1736 puo->def = "5222"; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1737 puo->pos = USEROPT_PORT; |
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1738 m = g_list_append(m, puo); |
2086 | 1739 |
2154
cff133e0ec0c
[gaim-migrate @ 2164]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2137
diff
changeset
|
1740 return m; |
2086 | 1741 } |
1742 | |
2607
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
1743 static void jabber_buddy_free(struct buddy *b) |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
1744 { |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
1745 while (b->proto_data) { |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
1746 g_free(((GSList *)b->proto_data)->data); |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
1747 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
|
1748 } |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
1749 } |
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
1750 |
2086 | 1751 static struct prpl *my_protocol = NULL; |
1752 | |
1753 void jabber_init(struct prpl *ret) | |
1754 { | |
1755 /* the NULL's aren't required but they're nice to have */ | |
1756 ret->protocol = PROTO_JABBER; | |
1757 ret->options = OPT_PROTO_UNIQUE_CHATNAME | OPT_PROTO_CHAT_TOPIC; | |
1758 ret->name = jabber_name; | |
1759 ret->list_icon = jabber_list_icon; | |
1760 ret->away_states = jabber_away_states; | |
1761 ret->buddy_menu = jabber_buddy_menu; | |
1762 ret->user_opts = jabber_user_opts; | |
1763 ret->login = jabber_login; | |
1764 ret->close = jabber_close; | |
1765 ret->send_im = jabber_send_im; | |
1766 ret->set_info = NULL; | |
1767 ret->get_info = jabber_get_info; | |
1768 ret->set_away = jabber_set_away; | |
1769 ret->set_dir = NULL; | |
1770 ret->get_dir = NULL; | |
1771 ret->dir_search = NULL; | |
1772 ret->set_idle = jabber_set_idle; | |
1773 ret->change_passwd = NULL; | |
1774 ret->add_buddy = jabber_add_buddy; | |
1775 ret->add_buddies = NULL; | |
1776 ret->remove_buddy = jabber_remove_buddy; | |
1777 ret->add_permit = NULL; | |
1778 ret->add_deny = NULL; | |
1779 ret->rem_permit = NULL; | |
1780 ret->rem_deny = NULL; | |
1781 ret->set_permit_deny = NULL; | |
1782 ret->warn = NULL; | |
2205
cff4fbe01c7b
[gaim-migrate @ 2215]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2170
diff
changeset
|
1783 ret->chat_info = jabber_chat_info; |
2086 | 1784 ret->join_chat = jabber_join_chat; |
1785 ret->chat_invite = jabber_chat_invite; | |
1786 ret->chat_leave = jabber_chat_leave; | |
1787 ret->chat_whisper = jabber_chat_whisper; | |
1788 ret->chat_send = jabber_chat_send; | |
1789 ret->keepalive = jabber_keepalive; | |
1790 ret->normalize = jabber_normalize; | |
2607
e0d4a23aac89
[gaim-migrate @ 2620]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2501
diff
changeset
|
1791 ret->buddy_free = jabber_buddy_free; |
2086 | 1792 |
1793 my_protocol = ret; | |
1794 } | |
1795 | |
1796 #ifndef STATIC | |
1797 | |
1798 char *gaim_plugin_init(GModule *handle) | |
1799 { | |
1800 load_protocol(jabber_init, sizeof(struct prpl)); | |
1801 return NULL; | |
1802 } | |
1803 | |
1804 void gaim_plugin_remove() | |
1805 { | |
1806 struct prpl *p = find_prpl(PROTO_JABBER); | |
1807 if (p == my_protocol) | |
1808 unload_protocol(p); | |
1809 } | |
1810 | |
1811 char *name() | |
1812 { | |
1813 return "Jabber"; | |
1814 } | |
1815 | |
1816 char *description() | |
1817 { | |
2162
a464da684307
[gaim-migrate @ 2172]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
2154
diff
changeset
|
1818 return PRPL_DESC("Jabber"); |
2086 | 1819 } |
1820 | |
1821 #endif |