Mercurial > pidgin
annotate plugins/jabber/jabber.c @ 1344:8b5ed2f0496c
[gaim-migrate @ 1354]
jabber stuff.
committer: Tailor Script <tailor@pidgin.im>
author | Eric Warmenhoven <eric@warmenhoven.org> |
---|---|
date | Thu, 21 Dec 2000 10:31:42 +0000 |
parents | f48cb8ddca59 |
children | d6e6fcaa1f39 |
rev | line source |
---|---|
1311 | 1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; 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 | |
1312
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
29 #include <gtk/gtk.h> |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
30 #ifdef MAX |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
31 #undef MAX |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
32 #endif |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
33 #ifdef MIN |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
34 #undef MIN |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
35 #endif |
1311 | 36 #include <netdb.h> |
37 #include <unistd.h> | |
38 #include <errno.h> | |
39 #include <netinet/in.h> | |
40 #include <arpa/inet.h> | |
41 #include <string.h> | |
42 #include <stdlib.h> | |
43 #include <stdio.h> | |
44 #include <time.h> | |
45 #include <sys/socket.h> | |
46 #include <sys/stat.h> | |
47 #include "multi.h" | |
48 #include "prpl.h" | |
49 #include "gaim.h" | |
50 #include <jabber/jabber.h> | |
51 | |
1344
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
52 #include "pixmaps/available.xpm" |
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
53 |
1311 | 54 /* The priv member of gjconn's is a gaim_connection for now. */ |
55 #define GJ_GC(x) ((struct gaim_connection *)(x)->priv) | |
56 | |
57 #define IQ_NONE -1 | |
58 #define IQ_AUTH 0 | |
59 #define IQ_ROSTER 1 | |
60 | |
61 typedef struct gjconn_struct | |
62 { | |
63 /* Core structure */ | |
64 pool p; /* Memory allocation pool */ | |
65 int state; /* Connection state flag */ | |
66 int fd; /* Connection file descriptor */ | |
67 jid user; /* User info */ | |
68 char *pass; /* User passwd */ | |
69 | |
70 /* Stream stuff */ | |
71 int id; /* id counter for jab_getid() function */ | |
72 char idbuf[9]; /* temporary storage for jab_getid() */ | |
73 char *sid; /* stream id from server, for digest auth */ | |
74 XML_Parser parser; /* Parser instance */ | |
75 xmlnode current; /* Current node in parsing instance.. */ | |
76 | |
77 /* Event callback ptrs */ | |
78 void (*on_state)(struct gjconn_struct *j, int state); | |
79 void (*on_packet)(struct gjconn_struct *j, jpacket p); | |
80 | |
81 void *priv; | |
82 | |
83 } *gjconn, gjconn_struct; | |
84 | |
85 typedef void (*gjconn_state_h)(gjconn j, int state); | |
86 typedef void (*gjconn_packet_h)(gjconn j, jpacket p); | |
87 | |
88 static gjconn gjab_new(char *user, char *pass, void *priv); | |
89 static void gjab_delete(gjconn j); | |
90 static void gjab_state_handler(gjconn j, gjconn_state_h h); | |
91 static void gjab_packet_handler(gjconn j, gjconn_packet_h h); | |
1331
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
92 static void gjab_start(gjconn j); |
1311 | 93 static void gjab_stop(gjconn j); |
94 static int gjab_getfd(gjconn j); | |
95 static jid gjab_getjid(gjconn j); | |
96 static char *gjab_getsid(gjconn j); | |
97 static char *gjab_getid(gjconn j); | |
98 static void gjab_send(gjconn j, xmlnode x); | |
99 static void gjab_send_raw(gjconn j, const char *str); | |
100 static void gjab_recv(gjconn j); | |
101 static char *gjab_auth(gjconn j); | |
102 | |
103 struct jabber_data { | |
104 gjconn jc; | |
105 }; | |
106 | |
107 static char *jabber_name() { | |
108 return "Jabber"; | |
109 } | |
110 | |
111 char *name() { | |
112 return "Jabber"; | |
113 } | |
114 | |
115 char *description() { | |
116 return "Allows gaim to use the Jabber protocol"; | |
117 } | |
118 | |
119 #define STATE_EVT(arg) if(j->on_state) { (j->on_state)(j, (arg) ); } | |
120 | |
121 static gjconn gjab_new(char *user, char *pass, void *priv) | |
122 { | |
123 pool p; | |
124 gjconn j; | |
125 | |
126 if(!user) | |
127 return(NULL); | |
128 | |
129 p = pool_new(); | |
130 if(!p) | |
131 return(NULL); | |
132 j = pmalloc_x(p, sizeof(gjconn_struct), 0); | |
133 if(!j) | |
134 return(NULL); | |
135 j->p = p; | |
136 | |
137 j->user = jid_new(p, user); | |
138 j->pass = pstrdup(p, pass); | |
139 | |
140 j->state = JCONN_STATE_OFF; | |
141 j->id = 1; | |
142 j->fd = -1; | |
143 | |
144 j->priv = priv; | |
145 | |
146 return j; | |
147 } | |
148 | |
149 static void gjab_delete(gjconn j) | |
150 { | |
151 if(!j) | |
152 return; | |
153 | |
154 gjab_stop(j); | |
155 pool_free(j->p); | |
156 } | |
157 | |
158 static void gjab_state_handler(gjconn j, gjconn_state_h h) | |
159 { | |
160 if(!j) | |
161 return; | |
162 | |
163 j->on_state = h; | |
164 } | |
165 | |
166 static void gjab_packet_handler(gjconn j, gjconn_packet_h h) | |
167 { | |
168 if(!j) | |
169 return; | |
170 | |
171 j->on_packet = h; | |
172 } | |
173 | |
174 static void gjab_stop(gjconn j) | |
175 { | |
176 if(!j || j->state == JCONN_STATE_OFF) | |
177 return; | |
178 | |
179 j->state = JCONN_STATE_OFF; | |
180 close(j->fd); | |
181 j->fd = -1; | |
182 XML_ParserFree(j->parser); | |
183 } | |
184 | |
185 static int gjab_getfd(gjconn j) | |
186 { | |
187 if(j) | |
188 return j->fd; | |
189 else | |
190 return -1; | |
191 } | |
192 | |
193 static jid gjab_getjid(gjconn j) | |
194 { | |
195 if(j) | |
196 return(j->user); | |
197 else | |
198 return NULL; | |
199 } | |
200 | |
201 static char *gjab_getsid(gjconn j) | |
202 { | |
203 if(j) | |
204 return(j->sid); | |
205 else | |
206 return NULL; | |
207 } | |
208 | |
209 static char *gjab_getid(gjconn j) | |
210 { | |
211 snprintf(j->idbuf, 8, "%d", j->id++); | |
212 return &j->idbuf[0]; | |
213 } | |
214 | |
215 static void gjab_send(gjconn j, xmlnode x) | |
216 { | |
217 if (j && j->state != JCONN_STATE_OFF) { | |
218 char *buf = xmlnode2str(x); | |
219 if (buf) | |
220 write(j->fd, buf, strlen(buf)); | |
221 debug_printf("gjab_send: %s\n", buf); | |
222 } | |
223 } | |
224 | |
225 static void gjab_send_raw(gjconn j, const char *str) | |
226 { | |
227 if (j && j->state != JCONN_STATE_OFF) { | |
228 write(j->fd, str, strlen(str)); | |
229 debug_printf("gjab_send_raw: %s\n", str); | |
230 } | |
231 } | |
232 | |
233 static void gjab_reqroster(gjconn j) | |
234 { | |
235 xmlnode x; | |
236 char *id; | |
237 | |
238 x = jutil_iqnew(JPACKET__GET, NS_ROSTER); | |
239 id = gjab_getid(j); | |
240 xmlnode_put_attrib(x, "id", id); | |
241 | |
242 gjab_send(j, x); | |
243 xmlnode_free(x); | |
244 } | |
245 | |
246 static char *gjab_auth(gjconn j) | |
247 { | |
248 xmlnode x,y,z; | |
249 char *hash, *user, *id; | |
250 | |
251 if(!j) | |
252 return NULL; | |
253 | |
254 x = jutil_iqnew(JPACKET__SET, NS_AUTH); | |
255 id = gjab_getid(j); | |
256 xmlnode_put_attrib(x, "id", id); | |
257 y = xmlnode_get_tag(x,"query"); | |
258 | |
259 user = j->user->user; | |
260 | |
261 if (user) { | |
262 z = xmlnode_insert_tag(y, "username"); | |
263 xmlnode_insert_cdata(z, user, -1); | |
264 } | |
265 | |
266 z = xmlnode_insert_tag(y, "resource"); | |
267 xmlnode_insert_cdata(z, j->user->resource, -1); | |
268 | |
269 if (j->sid) { | |
270 z = xmlnode_insert_tag(y, "digest"); | |
271 hash = pmalloc(x->p, strlen(j->sid)+strlen(j->pass)+1); | |
272 strcpy(hash, j->sid); | |
273 strcat(hash, j->pass); | |
274 hash = shahash(hash); | |
275 xmlnode_insert_cdata(z, hash, 40); | |
276 } else { | |
277 z = xmlnode_insert_tag(y, "password"); | |
278 xmlnode_insert_cdata(z, j->pass, -1); | |
279 } | |
280 | |
281 gjab_send(j, x); | |
282 xmlnode_free(x); | |
283 | |
284 return id; | |
285 } | |
286 | |
287 static void gjab_recv(gjconn j) | |
288 { | |
289 static char buf[4096]; | |
290 int len; | |
291 | |
292 if(!j || j->state == JCONN_STATE_OFF) | |
293 return; | |
294 | |
295 if ((len = read(j->fd, buf, sizeof(buf)-1))) { | |
296 buf[len] = '\0'; | |
297 debug_printf("input: %s\n", buf); | |
298 XML_Parse(j->parser, buf, len, 0); | |
299 } else if (len < 0) { | |
300 STATE_EVT(JCONN_STATE_OFF); | |
301 gjab_stop(j); | |
302 } | |
303 } | |
304 | |
305 static void startElement(void *userdata, const char *name, const char **attribs) | |
306 { | |
307 xmlnode x; | |
308 gjconn j = (gjconn)userdata; | |
309 | |
310 if(j->current) { | |
311 /* Append the node to the current one */ | |
312 x = xmlnode_insert_tag(j->current, name); | |
313 xmlnode_put_expat_attribs(x, attribs); | |
314 | |
315 j->current = x; | |
316 } else { | |
317 x = xmlnode_new_tag(name); | |
318 xmlnode_put_expat_attribs(x, attribs); | |
319 if(strcmp(name, "stream:stream") == 0) { | |
320 /* special case: name == stream:stream */ | |
321 /* id attrib of stream is stored for digest auth */ | |
322 j->sid = xmlnode_get_attrib(x, "id"); | |
323 /* STATE_EVT(JCONN_STATE_AUTH) */ | |
324 } else { | |
325 j->current = x; | |
326 } | |
327 } | |
328 } | |
329 | |
330 static void endElement(void *userdata, const char *name) | |
331 { | |
332 gjconn j = (gjconn)userdata; | |
333 xmlnode x; | |
334 jpacket p; | |
335 | |
336 if(j->current == NULL) { | |
337 /* we got </stream:stream> */ | |
338 STATE_EVT(JCONN_STATE_OFF) | |
339 return; | |
340 } | |
341 | |
342 x = xmlnode_get_parent(j->current); | |
343 | |
344 if(!x) { | |
345 /* it is time to fire the event */ | |
346 p = jpacket_new(j->current); | |
347 | |
348 if(j->on_packet) | |
349 (j->on_packet)(j, p); | |
350 else | |
351 xmlnode_free(j->current); | |
352 } | |
353 | |
354 j->current = x; | |
355 } | |
356 | |
357 static void charData(void *userdata, const char *s, int slen) | |
358 { | |
359 gjconn j = (gjconn)userdata; | |
360 | |
361 if (j->current) | |
362 xmlnode_insert_cdata(j->current, s, slen); | |
363 } | |
364 | |
1331
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
365 static void gjab_start(gjconn j) |
1311 | 366 { |
367 xmlnode x; | |
368 char *t,*t2; | |
369 | |
370 if(!j || j->state != JCONN_STATE_OFF) | |
371 return; | |
372 | |
373 j->parser = XML_ParserCreate(NULL); | |
374 XML_SetUserData(j->parser, (void *)j); | |
375 XML_SetElementHandler(j->parser, startElement, endElement); | |
376 XML_SetCharacterDataHandler(j->parser, charData); | |
377 | |
1331
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
378 j->fd = make_netsocket(5222, j->user->server, NETSOCKET_CLIENT); |
1311 | 379 if(j->fd < 0) { |
380 STATE_EVT(JCONN_STATE_OFF) | |
381 return; | |
382 } | |
383 j->state = JCONN_STATE_CONNECTED; | |
384 STATE_EVT(JCONN_STATE_CONNECTED) | |
385 | |
386 /* start stream */ | |
387 x = jutil_header(NS_CLIENT, j->user->server); | |
388 t = xmlnode2str(x); | |
389 /* this is ugly, we can create the string here instead of jutil_header */ | |
390 /* what do you think about it? -madcat */ | |
391 t2 = strstr(t,"/>"); | |
392 *t2++ = '>'; | |
393 *t2 = '\0'; | |
394 gjab_send_raw(j,"<?xml version='1.0'?>"); | |
395 gjab_send_raw(j,t); | |
396 xmlnode_free(x); | |
397 | |
398 j->state = JCONN_STATE_ON; | |
399 STATE_EVT(JCONN_STATE_ON) | |
400 } | |
401 | |
402 static void jabber_callback(gpointer data, gint source, GdkInputCondition condition) { | |
403 struct gaim_connection *gc = (struct gaim_connection *)data; | |
404 struct jabber_data *jd = (struct jabber_data *)gc->proto_data; | |
405 | |
406 debug_printf("jabber_callback!\n"); | |
407 | |
408 gjab_recv(jd->jc); | |
409 } | |
410 | |
411 static void jabber_handlemessage(gjconn j, jpacket p) | |
412 { | |
413 xmlnode y; | |
414 | |
415 char *from = NULL, *msg = NULL; | |
416 | |
417 from = jid_full(p->from); | |
418 if ((y = xmlnode_get_tag(p->x, "body"))) { | |
419 msg = xmlnode_get_data(y); | |
420 } | |
421 | |
422 if (!from || !msg) { | |
423 return; | |
424 } | |
425 | |
426 debug_printf("jabber: msg from %s: %s\n", from, msg); | |
427 | |
428 serv_got_im(GJ_GC(j), from, msg, 0); | |
429 | |
430 return; | |
431 } | |
432 | |
433 static void jabber_handlepresence(gjconn j, jpacket p) | |
434 { | |
435 char *to, *from, *type; | |
436 struct buddy *b; | |
437 | |
438 to = xmlnode_get_attrib(p->x, "to"); | |
439 from = xmlnode_get_attrib(p->x, "from"); | |
440 type = xmlnode_get_attrib(p->x, "type"); | |
441 | |
442 debug_printf("jabber: presence: %s, %s %s\n", to, from, type); | |
443 | |
1344
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
444 if (!(b = find_buddy(GJ_GC(j), from))) { |
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
445 add_buddy(GJ_GC(j), "Buddies", from, from); |
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
446 do_export(NULL, NULL); |
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
447 } |
1311 | 448 |
449 if (type && (strcasecmp(type, "unavailable") == 0)) | |
450 serv_got_update(GJ_GC(j), from, 0, 0, 0, 0, 0, 0); | |
451 else | |
452 serv_got_update(GJ_GC(j), from, 1, 0, 0, 0, 0, 0); | |
453 | |
454 return; | |
455 } | |
456 | |
457 static void jabber_handleroster(gjconn j, xmlnode querynode) | |
458 { | |
459 xmlnode x; | |
460 | |
461 x = xmlnode_get_firstchild(querynode); | |
462 while (x) { | |
463 xmlnode g; | |
464 char *jid, *name, *sub, *ask; | |
465 | |
466 jid = xmlnode_get_attrib(x, "jid"); | |
467 name = xmlnode_get_attrib(x, "name"); | |
468 if (name) | |
1313
9089f72972ee
[gaim-migrate @ 1323]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1312
diff
changeset
|
469 debug_printf("name = %s\n", name); |
1311 | 470 sub = xmlnode_get_attrib(x, "subscription"); |
471 ask = xmlnode_get_attrib(x, "ask"); | |
472 | |
473 if (ask) { | |
474 /* XXX do something */ | |
475 debug_printf("jabber: unhandled subscription request (%s/%s/%s/%s)\n", jid, name, sub, ask); | |
476 } | |
477 | |
478 if ((g = xmlnode_get_firstchild(x))) { | |
479 while (g) { | |
480 if (strncasecmp(xmlnode_get_name(g), "group", 5) == 0) { | |
481 struct buddy *b; | |
482 char *groupname; | |
483 | |
484 groupname = xmlnode_get_data(xmlnode_get_firstchild(g)); | |
485 if (!(b = find_buddy(GJ_GC(j), jid))) { | |
1313
9089f72972ee
[gaim-migrate @ 1323]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1312
diff
changeset
|
486 debug_printf("adding buddy: %s\n", jid); |
1311 | 487 b = add_buddy(GJ_GC(j), groupname, jid, name?name:jid); |
1344
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
488 do_export(0, 0); |
1311 | 489 } else { |
1313
9089f72972ee
[gaim-migrate @ 1323]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1312
diff
changeset
|
490 debug_printf("updating buddy: %s/%s\n", jid, name); |
1311 | 491 g_snprintf(b->name, sizeof(b->name), "%s", jid); |
492 g_snprintf(b->show, sizeof(b->show), "%s", name?name:jid); | |
493 } | |
494 //serv_got_update(GJ_GC(j), b->name, 1, 0, 0, 0, 0, 0); | |
495 } | |
496 g = xmlnode_get_nextsibling(g); | |
497 } | |
498 } else { | |
499 struct buddy *b; | |
500 if (!(b = find_buddy(GJ_GC(j), jid))) { | |
1344
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
501 b = add_buddy(GJ_GC(j), "Buddies", jid, name?name:jid); |
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
502 do_export(0, 0); |
1311 | 503 } |
504 } | |
505 | |
506 x = xmlnode_get_nextsibling(x); | |
507 } | |
1331
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
508 |
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
509 x = jutil_presnew(0, NULL, NULL); |
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
510 gjab_send(j, x); |
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
511 xmlnode_free(x); |
1311 | 512 } |
513 | |
514 static void jabber_handlepacket(gjconn j, jpacket p) | |
515 { | |
516 switch (p->type) { | |
517 case JPACKET_MESSAGE: | |
518 jabber_handlemessage(j, p); | |
519 break; | |
520 case JPACKET_PRESENCE: | |
521 jabber_handlepresence(j, p); | |
522 break; | |
523 case JPACKET_IQ: { | |
524 | |
525 if (jpacket_subtype(p) == JPACKET__RESULT) { | |
526 xmlnode querynode; | |
527 char *xmlns; | |
528 | |
529 querynode = xmlnode_get_tag(p->x, "query"); | |
530 xmlns = xmlnode_get_attrib(querynode, "xmlns"); | |
531 | |
532 if (!xmlns || NSCHECK(querynode, NS_AUTH)) { | |
533 debug_printf("auth success\n"); | |
534 | |
535 account_online(GJ_GC(j)); | |
536 serv_finish_login(GJ_GC(j)); | |
1331
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
537 |
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
538 if (bud_list_cache_exists(GJ_GC(j))) |
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
539 do_import(NULL, GJ_GC(j)); |
1311 | 540 |
541 gjab_reqroster(j); | |
542 | |
543 } else if (NSCHECK(querynode, NS_ROSTER)) { | |
544 jabber_handleroster(j, querynode); | |
545 } else { | |
546 debug_printf("jabber:iq:query: %s\n", xmlns); | |
547 } | |
548 | |
549 } else { | |
550 xmlnode x; | |
551 | |
552 debug_printf("auth failed\n"); | |
553 x = xmlnode_get_tag(p->x, "error"); | |
554 if (x) { | |
555 debug_printf("error %d: %s\n\n", | |
556 atoi(xmlnode_get_attrib(x, "code")), | |
557 xmlnode_get_data(xmlnode_get_firstchild(x))); | |
558 hide_login_progress(GJ_GC(j), xmlnode_get_data(xmlnode_get_firstchild(x))); | |
559 | |
560 } else | |
561 hide_login_progress(GJ_GC(j), "unknown error"); | |
562 | |
563 signoff(GJ_GC(j)); | |
564 } | |
565 break; | |
566 } | |
567 default: | |
568 debug_printf("jabber: packet type %d (%s)\n", p->type, xmlnode2str(p->x)); | |
569 } | |
570 | |
571 xmlnode_free(p->x); | |
572 | |
573 return; | |
574 } | |
575 | |
576 static void jabber_handlestate(gjconn j, int state) | |
577 { | |
578 switch (state) { | |
579 case JCONN_STATE_OFF: | |
580 debug_printf("jabber: connection closed\n"); | |
581 hide_login_progress(GJ_GC(j), "Unable to connect"); | |
582 signoff(GJ_GC(j)); | |
583 break; | |
584 case JCONN_STATE_CONNECTED: | |
585 debug_printf("jabber: connected.\n"); | |
1344
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
586 set_login_progress(GJ_GC(j), 3, "Connected"); |
1311 | 587 break; |
588 case JCONN_STATE_ON: | |
589 debug_printf("jabber: logging in...\n"); | |
1344
8b5ed2f0496c
[gaim-migrate @ 1354]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1331
diff
changeset
|
590 set_login_progress(GJ_GC(j), 5, "Logging in..."); |
1311 | 591 gjab_auth(j); |
592 break; | |
593 default: | |
594 debug_printf("state change: %d\n", state); | |
595 } | |
596 return; | |
597 } | |
598 | |
599 static void jabber_login(struct aim_user *user) { | |
600 struct gaim_connection *gc = new_gaim_conn(user); | |
601 struct jabber_data *jd = gc->proto_data = g_new0(struct jabber_data, 1); | |
602 | |
603 set_login_progress(gc, 1, "Connecting"); | |
604 | |
1331
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
605 if (!(jd->jc = gjab_new(user->username, user->password, gc))) { |
1311 | 606 debug_printf("jabber: unable to connect (jab_new failed)\n"); |
607 hide_login_progress(gc, "Unable to connect"); | |
608 signoff(gc); | |
609 return; | |
610 } | |
611 | |
612 gjab_state_handler(jd->jc, jabber_handlestate); | |
613 gjab_packet_handler(jd->jc, jabber_handlepacket); | |
1331
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
614 gjab_start(jd->jc); |
1311 | 615 |
616 | |
617 gc->inpa = gdk_input_add(jd->jc->fd, | |
618 GDK_INPUT_READ | GDK_INPUT_EXCEPTION, | |
619 jabber_callback, gc); | |
620 | |
621 return; | |
622 } | |
623 | |
624 static void jabber_close(struct gaim_connection *gc) { | |
1312
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
625 struct jabber_data *jd = gc->proto_data; |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
626 gdk_input_remove(gc->inpa); |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
627 gjab_stop(jd->jc); |
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
628 g_free(jd); |
1311 | 629 } |
630 | |
631 static void jabber_send_im(struct gaim_connection *gc, char *who, char *message, int away) { | |
632 xmlnode x, y; | |
1316
d5069ad0b6b1
[gaim-migrate @ 1326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1315
diff
changeset
|
633 char *realwho; |
d5069ad0b6b1
[gaim-migrate @ 1326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1315
diff
changeset
|
634 gjconn j = ((struct jabber_data *)gc->proto_data)->jc; |
1311 | 635 |
636 if (!who || !message) | |
637 return; | |
638 | |
639 x = xmlnode_new_tag("message"); | |
1316
d5069ad0b6b1
[gaim-migrate @ 1326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1315
diff
changeset
|
640 if (!strchr(who, '@')) |
d5069ad0b6b1
[gaim-migrate @ 1326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1315
diff
changeset
|
641 realwho = g_strdup_printf("%s@%s", who, j->user->server); |
d5069ad0b6b1
[gaim-migrate @ 1326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1315
diff
changeset
|
642 else |
d5069ad0b6b1
[gaim-migrate @ 1326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1315
diff
changeset
|
643 realwho = g_strdup(who); |
d5069ad0b6b1
[gaim-migrate @ 1326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1315
diff
changeset
|
644 xmlnode_put_attrib(x, "to", realwho); |
d5069ad0b6b1
[gaim-migrate @ 1326]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1315
diff
changeset
|
645 g_free(realwho); |
1311 | 646 |
647 xmlnode_put_attrib(x, "type", "chat"); | |
648 | |
649 if (message && strlen(message)) { | |
650 y = xmlnode_insert_tag(x, "body"); | |
651 xmlnode_insert_cdata(y, message, -1); | |
652 } | |
653 | |
654 gjab_send(((struct jabber_data *)gc->proto_data)->jc, x); | |
655 } | |
656 | |
657 static struct prpl *my_protocol = NULL; | |
658 | |
659 void Jabber_init(struct prpl *ret) { | |
660 /* the NULL's aren't required but they're nice to have */ | |
661 ret->protocol = PROTO_JABBER; | |
662 ret->name = jabber_name; | |
663 ret->list_icon = NULL; | |
664 ret->action_menu = NULL; | |
1331
f48cb8ddca59
[gaim-migrate @ 1341]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1316
diff
changeset
|
665 ret->user_opts = NULL; |
1311 | 666 ret->login = jabber_login; |
667 ret->close = jabber_close; | |
668 ret->send_im = jabber_send_im; | |
669 ret->set_info = NULL; | |
670 ret->get_info = NULL; | |
671 ret->set_away = NULL; | |
672 ret->get_away_msg = NULL; | |
673 ret->set_dir = NULL; | |
674 ret->get_dir = NULL; | |
675 ret->dir_search = NULL; | |
676 ret->set_idle = NULL; | |
677 ret->change_passwd = NULL; | |
1312
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
678 ret->add_buddy = NULL; |
1311 | 679 ret->add_buddies = NULL; |
680 ret->remove_buddy = NULL; | |
681 ret->add_permit = NULL; | |
682 ret->add_deny = NULL; | |
683 ret->rem_permit = NULL; | |
684 ret->rem_deny = NULL; | |
685 ret->set_permit_deny = NULL; | |
686 ret->warn = NULL; | |
687 ret->accept_chat = NULL; | |
688 ret->join_chat = NULL; | |
689 ret->chat_invite = NULL; | |
690 ret->chat_leave = NULL; | |
691 ret->chat_whisper = NULL; | |
692 ret->chat_send = NULL; | |
1312
f22f57ed13e9
[gaim-migrate @ 1322]
Eric Warmenhoven <eric@warmenhoven.org>
parents:
1311
diff
changeset
|
693 ret->keepalive = NULL; |
1311 | 694 |
695 my_protocol = ret; | |
696 } | |
697 | |
698 char *gaim_plugin_init(GModule *handle) { | |
699 load_protocol(Jabber_init); | |
700 return NULL; | |
701 } | |
702 | |
703 void gaim_plugin_remove() { | |
704 struct prpl *p = find_prpl(PROTO_JABBER); | |
705 if (p == my_protocol) | |
706 unload_protocol(p); | |
707 } |