Context Navigation

source: protocols/oscar/oscar.c @ df61c35a

Last change on this file since df61c35a was df61c35a, checked in by Wilmer van der Gaast <wilmer@…>, at 2010-08-30T19:24:28Z
Warn the user when his/her AIM/ICQ password seems to be too long. For some people with long passwords the removal of old ICQ-only authentication introduced login issues since the extra chars in the password upset the server.
Property mode set to `100644`
File size: 74.6 KB

Line
1	/*
2	* gaim
3	*
4	* Some code copyright (C) 2002-2006, Jelmer Vernooij <jelmer@samba.org>
5	* and the BitlBee team.
6	* Some code copyright (C) 1998-1999, Mark Spencer <markster@marko.net>
7	* libfaim code copyright 1998, 1999 Adam Fritzler <afritz@auk.cx>
8	*
9	* This program is free software; you can redistribute it and/or modify
10	* it under the terms of the GNU General Public License as published by
11	* the Free Software Foundation; either version 2 of the License, or
12	* (at your option) any later version.
13	*
14	* This program is distributed in the hope that it will be useful,
15	* but WITHOUT ANY WARRANTY; without even the implied warranty of
16	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17	* GNU General Public License for more details.
18	*
19	* You should have received a copy of the GNU General Public License
20	* along with this program; if not, write to the Free Software
21	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22	*
23	*/
24
25	#include <errno.h>
26	#include <ctype.h>
27	#include <string.h>
28	#include <stdlib.h>
29	#include <stdio.h>
30	#include <time.h>
31	#include <sys/stat.h>
32	#include <glib.h>
33	#include "nogaim.h"
34	#include "bitlbee.h"
35	#include "proxy.h"
36	#include "sock.h"
37
38	#include "aim.h"
39	#include "icq.h"
40	#include "bos.h"
41	#include "ssi.h"
42	#include "im.h"
43	#include "info.h"
44	#include "buddylist.h"
45	#include "chat.h"
46	#include "chatnav.h"
47
48	/* constants to identify proto_opts */
49	#define USEROPT_AUTH 0
50	#define USEROPT_AUTHPORT 1
51
52	#define UC_AOL 0x02
53	#define UC_ADMIN 0x04
54	#define UC_UNCONFIRMED 0x08
55	#define UC_NORMAL 0x10
56	#define UC_AB 0x20
57	#define UC_WIRELESS 0x40
58
59	#define AIMHASHDATA "http://gaim.sourceforge.net/aim_data.php3"
60
61	#define OSCAR_GROUP "Friends"
62
63	#define BUF_LEN 2048
64	#define BUF_LONG ( BUF_LEN * 2 )
65
66	/* Don't know if support for UTF8 is really working. For now it's UTF16 here.
67	static int gaim_caps = AIM_CAPS_UTF8; */
68
69	static int gaim_caps = AIM_CAPS_INTEROP \| AIM_CAPS_ICHAT \| AIM_CAPS_ICQSERVERRELAY \| AIM_CAPS_CHAT;
70	static guint8 gaim_features[] = {0x01, 0x01, 0x01, 0x02};
71
72	struct oscar_data {
73	aim_session_t *sess;
74	aim_conn_t *conn;
75
76	guint cnpa;
77	guint paspa;
78
79	GSList *create_rooms;
80
81	gboolean conf;
82	gboolean reqemail;
83	gboolean setemail;
84	char *email;
85	gboolean setnick;
86	char *newsn;
87	gboolean chpass;
88	char *oldp;
89	char *newp;
90
91	GSList *oscar_chats;
92
93	gboolean killme, no_reconnect;
94	gboolean icq;
95	GSList *evilhack;
96
97	GHashTable *ips;
98
99	struct {
100	guint maxbuddies; /* max users you can watch */
101	guint maxwatchers; /* max users who can watch you */
102	guint maxpermits; /* max users on permit list */
103	guint maxdenies; /* max users on deny list */
104	guint maxsiglen; /* max size (bytes) of profile */
105	guint maxawaymsglen; /* max size (bytes) of posted away message */
106	} rights;
107	};
108
109	struct create_room {
110	char *name;
111	int exchange;
112	};
113
114	struct chat_connection {
115	char *name;
116	char show; / AOL did something funny to us */
117	guint16 exchange;
118	guint16 instance;
119	int fd; /* this is redundant since we have the conn below */
120	aim_conn_t *conn;
121	int inpa;
122	int id;
123	struct im_connection ic; / i hate this. */
124	struct groupchat cnv; / bah. */
125	int maxlen;
126	int maxvis;
127	};
128
129	struct ask_direct {
130	struct im_connection *ic;
131	char *sn;
132	char ip[64];
133	guint8 cookie[8];
134	};
135
136	struct icq_auth {
137	struct im_connection *ic;
138	guint32 uin;
139	};
140
141	static char extract_name(const char name) {
142	char *tmp;
143	int i, j;
144	char *x = strchr(name, '-');
145	if (!x) return g_strdup(name);
146	x = strchr(++x, '-');
147	if (!x) return g_strdup(name);
148	tmp = g_strdup(++x);
149
150	for (i = 0, j = 0; x[i]; i++) {
151	char hex[3];
152	if (x[i] != '%') {
153	tmp[j++] = x[i];
154	continue;
155	}
156	strncpy(hex, x + ++i, 2); hex[2] = 0;
157	i++;
158	tmp[j++] = (char)strtol(hex, NULL, 16);
159	}
160
161	tmp[j] = 0;
162	return tmp;
163	}
164
165	static struct chat_connection find_oscar_chat_by_conn(struct im_connection ic,
166	aim_conn_t *conn) {
167	GSList g = ((struct oscar_data )ic->proto_data)->oscar_chats;
168	struct chat_connection *c = NULL;
169
170	while (g) {
171	c = (struct chat_connection *)g->data;
172	if (c->conn == conn)
173	break;
174	g = g->next;
175	c = NULL;
176	}
177
178	return c;
179	}
180
181	static int gaim_parse_auth_resp (aim_session_t , aim_frame_t , ...);
182	static int gaim_parse_login (aim_session_t , aim_frame_t , ...);
183	static int gaim_parse_logout (aim_session_t , aim_frame_t , ...);
184	static int gaim_handle_redirect (aim_session_t , aim_frame_t , ...);
185	static int gaim_parse_oncoming (aim_session_t , aim_frame_t , ...);
186	static int gaim_parse_offgoing (aim_session_t , aim_frame_t , ...);
187	static int gaim_parse_incoming_im(aim_session_t , aim_frame_t , ...);
188	static int gaim_parse_misses (aim_session_t , aim_frame_t , ...);
189	static int gaim_parse_motd (aim_session_t , aim_frame_t , ...);
190	static int gaim_chatnav_info (aim_session_t , aim_frame_t , ...);
191	static int gaim_chat_join (aim_session_t , aim_frame_t , ...);
192	static int gaim_chat_leave (aim_session_t , aim_frame_t , ...);
193	static int gaim_chat_info_update (aim_session_t , aim_frame_t , ...);
194	static int gaim_chat_incoming_msg(aim_session_t , aim_frame_t , ...);
195	static int gaim_parse_ratechange (aim_session_t , aim_frame_t , ...);
196	static int gaim_bosrights (aim_session_t , aim_frame_t , ...);
197	static int conninitdone_bos (aim_session_t , aim_frame_t , ...);
198	static int conninitdone_admin (aim_session_t , aim_frame_t , ...);
199	static int conninitdone_chat (aim_session_t , aim_frame_t , ...);
200	static int conninitdone_chatnav (aim_session_t , aim_frame_t , ...);
201	static int gaim_parse_msgerr (aim_session_t , aim_frame_t , ...);
202	static int gaim_parse_locaterights(aim_session_t , aim_frame_t , ...);
203	static int gaim_parse_buddyrights(aim_session_t , aim_frame_t , ...);
204	static int gaim_parse_locerr (aim_session_t , aim_frame_t , ...);
205	static int gaim_icbm_param_info (aim_session_t , aim_frame_t , ...);
206	static int gaim_parse_genericerr (aim_session_t , aim_frame_t , ...);
207	static int gaim_selfinfo (aim_session_t , aim_frame_t , ...);
208	static int gaim_offlinemsg (aim_session_t , aim_frame_t , ...);
209	static int gaim_offlinemsgdone (aim_session_t , aim_frame_t , ...);
210	static int gaim_ssi_parserights (aim_session_t , aim_frame_t , ...);
211	static int gaim_ssi_parselist (aim_session_t , aim_frame_t , ...);
212	static int gaim_ssi_parseack (aim_session_t , aim_frame_t , ...);
213	static int gaim_parsemtn (aim_session_t , aim_frame_t , ...);
214	static int gaim_icqinfo (aim_session_t , aim_frame_t , ...);
215	static int gaim_parseaiminfo (aim_session_t , aim_frame_t , ...);
216
217	static char *msgerrreason[] = {
218	"Invalid error",
219	"Invalid SNAC",
220	"Rate to host",
221	"Rate to client",
222	"Not logged in",
223	"Service unavailable",
224	"Service not defined",
225	"Obsolete SNAC",
226	"Not supported by host",
227	"Not supported by client",
228	"Refused by client",
229	"Reply too big",
230	"Responses lost",
231	"Request denied",
232	"Busted SNAC payload",
233	"Insufficient rights",
234	"In local permit/deny",
235	"Too evil (sender)",
236	"Too evil (receiver)",
237	"User temporarily unavailable",
238	"No match",
239	"List overflow",
240	"Request ambiguous",
241	"Queue full",
242	"Not while on AOL"
243	};
244	static int msgerrreasonlen = 25;
245
246	/* Hurray, this function is NOT thread-safe \o/ */
247	static char normalize(const char s)
248	{
249	static char buf[BUF_LEN];
250	char t, u;
251	int x = 0;
252
253	g_return_val_if_fail((s != NULL), NULL);
254
255	u = t = g_strdup(s);
256	g_strdown(t);
257
258	while (*t && (x < BUF_LEN - 1)) {
259	if (t != ' ' && t != '!') {
260	buf[x] = *t;
261	x++;
262	}
263	t++;
264	}
265	buf[x] = '\0';
266	g_free(u);
267	return buf;
268	}
269
270	static gboolean oscar_callback(gpointer data, gint source,
271	b_input_condition condition) {
272	aim_conn_t conn = (aim_conn_t )data;
273	aim_session_t *sess = aim_conn_getsess(conn);
274	struct im_connection *ic = sess ? sess->aux_data : NULL;
275	struct oscar_data *odata;
276
277	if (!ic) {
278	/* ic is null. we return, else we seg SIGSEG on next line. */
279	return FALSE;
280	}
281
282	if (!g_slist_find(get_connections(), ic)) {
283	/* oh boy. this is probably bad. i guess the only thing we
284	* can really do is return? */
285	return FALSE;
286	}
287
288	odata = (struct oscar_data *)ic->proto_data;
289
290	if (condition & B_EV_IO_READ) {
291	if (aim_get_command(odata->sess, conn) >= 0) {
292	aim_rxdispatch(odata->sess);
293	if (odata->killme)
294	imc_logout(ic, !odata->no_reconnect);
295	} else {
296	if ((conn->type == AIM_CONN_TYPE_BOS) \|\|
297	!(aim_getconn_type(odata->sess, AIM_CONN_TYPE_BOS))) {
298	imcb_error(ic, _("Disconnected."));
299	imc_logout(ic, TRUE);
300	} else if (conn->type == AIM_CONN_TYPE_CHAT) {
301	struct chat_connection *c = find_oscar_chat_by_conn(ic, conn);
302	c->conn = NULL;
303	if (c->inpa > 0)
304	b_event_remove(c->inpa);
305	c->inpa = 0;
306	c->fd = -1;
307	aim_conn_kill(odata->sess, &conn);
308	imcb_error(sess->aux_data, _("You have been disconnected from chat room %s."), c->name);
309	} else if (conn->type == AIM_CONN_TYPE_CHATNAV) {
310	if (odata->cnpa > 0)
311	b_event_remove(odata->cnpa);
312	odata->cnpa = 0;
313	while (odata->create_rooms) {
314	struct create_room *cr = odata->create_rooms->data;
315	g_free(cr->name);
316	odata->create_rooms =
317	g_slist_remove(odata->create_rooms, cr);
318	g_free(cr);
319	imcb_error(sess->aux_data, _("Chat is currently unavailable"));
320	}
321	aim_conn_kill(odata->sess, &conn);
322	} else if (conn->type == AIM_CONN_TYPE_AUTH) {
323	if (odata->paspa > 0)
324	b_event_remove(odata->paspa);
325	odata->paspa = 0;
326	aim_conn_kill(odata->sess, &conn);
327	} else {
328	aim_conn_kill(odata->sess, &conn);
329	}
330	}
331	} else {
332	/* WTF??? */
333	return FALSE;
334	}
335
336	return TRUE;
337	}
338
339	static gboolean oscar_login_connect(gpointer data, gint source, b_input_condition cond)
340	{
341	struct im_connection *ic = data;
342	struct oscar_data *odata;
343	aim_session_t *sess;
344	aim_conn_t *conn;
345
346	if (!g_slist_find(get_connections(), ic)) {
347	closesocket(source);
348	return FALSE;
349	}
350
351	odata = ic->proto_data;
352	sess = odata->sess;
353	conn = aim_getconn_type_all(sess, AIM_CONN_TYPE_AUTH);
354
355	if (source < 0) {
356	imcb_error(ic, _("Couldn't connect to host"));
357	imc_logout(ic, TRUE);
358	return FALSE;
359	}
360
361	aim_conn_completeconnect(sess, conn);
362	ic->inpa = b_input_add(conn->fd, B_EV_IO_READ,
363	oscar_callback, conn);
364
365	return FALSE;
366	}
367
368	static void oscar_init(account_t *acc)
369	{
370	set_t *s;
371
372	if (isdigit(acc->user[0])) {
373	set_add(&acc->set, "ignore_auth_requests", "false", set_eval_bool, acc);
374	set_add(&acc->set, "old_icq_auth", "false", set_eval_bool, acc);
375	}
376
377	s = set_add(&acc->set, "server", AIM_DEFAULT_LOGIN_SERVER, set_eval_account, acc);
378	s->flags \|= ACC_SET_NOSAVE \| ACC_SET_OFFLINE_ONLY;
379
380	if(isdigit(acc->user[0])) {
381	s = set_add(&acc->set, "web_aware", "false", set_eval_bool, acc);
382	s->flags \|= ACC_SET_OFFLINE_ONLY;
383	}
384
385	acc->flags \|= ACC_FLAG_AWAY_MESSAGE;
386	}
387
388	static void oscar_login(account_t *acc) {
389	aim_session_t *sess;
390	aim_conn_t *conn;
391	struct im_connection *ic = imcb_new(acc);
392	struct oscar_data *odata = ic->proto_data = g_new0(struct oscar_data, 1);
393
394	if (isdigit(acc->user[0]))
395	odata->icq = TRUE;
396	else
397	ic->flags \|= OPT_DOES_HTML;
398
399	sess = g_new0(aim_session_t, 1);
400
401	aim_session_init(sess, AIM_SESS_FLAGS_NONBLOCKCONNECT, 0);
402
403	/* we need an immediate queue because we don't use a while-loop to
404	* see if things need to be sent. */
405	aim_tx_setenqueue(sess, AIM_TX_IMMEDIATE, NULL);
406	odata->sess = sess;
407	sess->aux_data = ic;
408
409	conn = aim_newconn(sess, AIM_CONN_TYPE_AUTH, NULL);
410	if (conn == NULL) {
411	imcb_error(ic, _("Unable to login to AIM"));
412	imc_logout(ic, TRUE);
413	return;
414	}
415
416	imcb_log(ic, _("Signon: %s"), ic->acc->user);
417
418	aim_conn_addhandler(sess, conn, 0x0017, 0x0007, gaim_parse_login, 0);
419	aim_conn_addhandler(sess, conn, 0x0017, 0x0003, gaim_parse_auth_resp, 0);
420
421	conn->status \|= AIM_CONN_STATUS_INPROGRESS;
422	conn->fd = proxy_connect(set_getstr(&acc->set, "server"),
423	AIM_LOGIN_PORT, oscar_login_connect, ic);
424	if (conn->fd < 0) {
425	imcb_error(ic, _("Couldn't connect to host"));
426	imc_logout(ic, TRUE);
427	return;
428	}
429	aim_request_login(sess, conn, ic->acc->user);
430	}
431
432	static void oscar_logout(struct im_connection *ic) {
433	struct oscar_data odata = (struct oscar_data )ic->proto_data;
434
435	while (odata->oscar_chats) {
436	struct chat_connection *n = odata->oscar_chats->data;
437	if (n->inpa > 0)
438	b_event_remove(n->inpa);
439	g_free(n->name);
440	g_free(n->show);
441	odata->oscar_chats = g_slist_remove(odata->oscar_chats, n);
442	g_free(n);
443	}
444	while (odata->create_rooms) {
445	struct create_room *cr = odata->create_rooms->data;
446	g_free(cr->name);
447	odata->create_rooms = g_slist_remove(odata->create_rooms, cr);
448	g_free(cr);
449	}
450	if (odata->ips)
451	g_hash_table_destroy(odata->ips);
452	if (odata->email)
453	g_free(odata->email);
454	if (odata->newp)
455	g_free(odata->newp);
456	if (odata->oldp)
457	g_free(odata->oldp);
458	if (ic->inpa > 0)
459	b_event_remove(ic->inpa);
460	if (odata->cnpa > 0)
461	b_event_remove(odata->cnpa);
462	if (odata->paspa > 0)
463	b_event_remove(odata->paspa);
464	aim_session_kill(odata->sess);
465	g_free(odata->sess);
466	odata->sess = NULL;
467	g_free(ic->proto_data);
468	ic->proto_data = NULL;
469	}
470
471	static gboolean oscar_bos_connect(gpointer data, gint source, b_input_condition cond) {
472	struct im_connection *ic = data;
473	struct oscar_data *odata;
474	aim_session_t *sess;
475	aim_conn_t *bosconn;
476
477	if (!g_slist_find(get_connections(), ic)) {
478	closesocket(source);
479	return FALSE;
480	}
481
482	odata = ic->proto_data;
483	sess = odata->sess;
484	bosconn = odata->conn;
485
486	if (source < 0) {
487	imcb_error(ic, _("Could Not Connect"));
488	imc_logout(ic, TRUE);
489	return FALSE;
490	}
491
492	aim_conn_completeconnect(sess, bosconn);
493	ic->inpa = b_input_add(bosconn->fd, B_EV_IO_READ,
494	oscar_callback, bosconn);
495	imcb_log(ic, _("Connection established, cookie sent"));
496
497	return FALSE;
498	}
499
500	static int gaim_parse_auth_resp(aim_session_t sess, aim_frame_t fr, ...) {
501	va_list ap;
502	struct aim_authresp_info *info;
503	int i; char *host; int port;
504	aim_conn_t *bosconn;
505
506	struct im_connection *ic = sess->aux_data;
507	struct oscar_data *od = ic->proto_data;
508	port = AIM_LOGIN_PORT;
509
510	va_start(ap, fr);
511	info = va_arg(ap, struct aim_authresp_info *);
512	va_end(ap);
513
514	if (info->errorcode \|\| !info->bosip \|\| !info->cookie) {
515	switch (info->errorcode) {
516	case 0x05:
517	/* Incorrect nick/password */
518	imcb_error(ic, _("Incorrect nickname or password."));
519	{
520	int max = od->icq ? 8 : 16;
521	if (strlen(ic->acc->pass) > max)
522	imcb_log(ic, "Note that the maximum password "
523	"length supported by this protocol is "
524	"%d characters, try logging in using "
525	"a shorter password.", max);
526	}
527	// plugin_event(event_error, (void *)980, 0, 0, 0);
528	break;
529	case 0x11:
530	/* Suspended account */
531	imcb_error(ic, _("Your account is currently suspended."));
532	break;
533	case 0x18:
534	/* connecting too frequently */
535	od->no_reconnect = TRUE;
536	imcb_error(ic, _("You have been connecting and disconnecting too frequently. Wait ten minutes and try again. If you continue to try, you will need to wait even longer."));
537	break;
538	case 0x1c:
539	/* client too old */
540	imcb_error(ic, _("The client version you are using is too old. Please upgrade at " WEBSITE));
541	break;
542	default:
543	imcb_error(ic, _("Authentication Failed"));
544	break;
545	}
546	od->killme = TRUE;
547	return 1;
548	}
549
550
551	aim_conn_kill(sess, &fr->conn);
552
553	bosconn = aim_newconn(sess, AIM_CONN_TYPE_BOS, NULL);
554	if (bosconn == NULL) {
555	imcb_error(ic, _("Internal Error"));
556	od->killme = TRUE;
557	return 0;
558	}
559
560	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNINITDONE, conninitdone_bos, 0);
561	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BOS, AIM_CB_BOS_RIGHTS, gaim_bosrights, 0);
562	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_ACK, AIM_CB_ACK_ACK, NULL, 0);
563	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_REDIRECT, gaim_handle_redirect, 0);
564	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_RIGHTSINFO, gaim_parse_locaterights, 0);
565	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_RIGHTSINFO, gaim_parse_buddyrights, 0);
566	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_ONCOMING, gaim_parse_oncoming, 0);
567	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_OFFGOING, gaim_parse_offgoing, 0);
568	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_INCOMING, gaim_parse_incoming_im, 0);
569	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_ERROR, gaim_parse_locerr, 0);
570	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_MISSEDCALL, gaim_parse_misses, 0);
571	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_RATECHANGE, gaim_parse_ratechange, 0);
572	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_ERROR, gaim_parse_msgerr, 0);
573	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_MOTD, gaim_parse_motd, 0);
574	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_PARAMINFO, gaim_icbm_param_info, 0);
575	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_ERROR, gaim_parse_genericerr, 0);
576	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BUD, AIM_CB_BUD_ERROR, gaim_parse_genericerr, 0);
577	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_BOS, AIM_CB_BOS_ERROR, gaim_parse_genericerr, 0);
578	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_GEN, AIM_CB_GEN_SELFINFO, gaim_selfinfo, 0);
579	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_ICQ, AIM_CB_ICQ_OFFLINEMSG, gaim_offlinemsg, 0);
580	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_ICQ, AIM_CB_ICQ_OFFLINEMSGCOMPLETE, gaim_offlinemsgdone, 0);
581	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_ICQ, AIM_CB_ICQ_INFO, gaim_icqinfo, 0);
582	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SSI, AIM_CB_SSI_RIGHTSINFO, gaim_ssi_parserights, 0);
583	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SSI, AIM_CB_SSI_LIST, gaim_ssi_parselist, 0);
584	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SSI, AIM_CB_SSI_SRVACK, gaim_ssi_parseack, 0);
585	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_LOC, AIM_CB_LOC_USERINFO, gaim_parseaiminfo, 0);
586	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_MSG, AIM_CB_MSG_MTN, gaim_parsemtn, 0);
587	aim_conn_addhandler(sess, bosconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNERR, gaim_parse_logout, 0);
588
589	((struct oscar_data *)ic->proto_data)->conn = bosconn;
590	for (i = 0; i < (int)strlen(info->bosip); i++) {
591	if (info->bosip[i] == ':') {
592	port = atoi(&(info->bosip[i+1]));
593	break;
594	}
595	}
596	host = g_strndup(info->bosip, i);
597	bosconn->status \|= AIM_CONN_STATUS_INPROGRESS;
598	bosconn->fd = proxy_connect(host, port, oscar_bos_connect, ic);
599	g_free(host);
600	if (bosconn->fd < 0) {
601	imcb_error(ic, _("Could Not Connect"));
602	od->killme = TRUE;
603	return 0;
604	}
605	aim_sendcookie(sess, bosconn, info->cookie);
606	b_event_remove(ic->inpa);
607
608	return 1;
609	}
610
611	/* size of icbmui.ocm, the largest module in AIM 3.5 */
612	#define AIM_MAX_FILE_SIZE 98304
613
614	static int gaim_parse_login(aim_session_t sess, aim_frame_t fr, ...) {
615	#if 0
616	struct client_info_s info = {"gaim", 4, 1, 2010, "us", "en", 0x0004, 0x0000, 0x04b};
617	#else
618	struct client_info_s info = AIM_CLIENTINFO_KNOWNGOOD;
619	#endif
620	char *key;
621	va_list ap;
622	struct im_connection *ic = sess->aux_data;
623
624	va_start(ap, fr);
625	key = va_arg(ap, char *);
626	va_end(ap);
627
628	aim_send_login(sess, fr->conn, ic->acc->user, ic->acc->pass, &info, key);
629
630	return 1;
631	}
632
633	static int gaim_parse_logout(aim_session_t sess, aim_frame_t fr, ...) {
634	struct im_connection *ic = sess->aux_data;
635	struct oscar_data *odata = ic->proto_data;
636	int code;
637	va_list ap;
638
639	va_start(ap, fr);
640	code = va_arg(ap, int);
641	va_end(ap);
642
643	imcb_error( ic, "Connection aborted by server: %s", code == 1 ?
644	"someone else logged in with your account" :
645	"unknown reason" );
646
647	/* Tell BitlBee to disable auto_reconnect if code == 1, since that
648	means a concurrent login somewhere else. */
649	odata->no_reconnect = code == 1;
650
651	/* DO NOT log out here! Just tell the callback to do it. */
652	odata->killme = TRUE;
653
654	return 1;
655	}
656
657	static int conninitdone_chat(aim_session_t sess, aim_frame_t fr, ...) {
658	struct im_connection *ic = sess->aux_data;
659	struct chat_connection *chatcon;
660	struct groupchat *c = NULL;
661	static int id = 1;
662
663	aim_conn_addhandler(sess, fr->conn, 0x000e, 0x0001, gaim_parse_genericerr, 0);
664	aim_conn_addhandler(sess, fr->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_USERJOIN, gaim_chat_join, 0);
665	aim_conn_addhandler(sess, fr->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_USERLEAVE, gaim_chat_leave, 0);
666	aim_conn_addhandler(sess, fr->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_ROOMINFOUPDATE, gaim_chat_info_update, 0);
667	aim_conn_addhandler(sess, fr->conn, AIM_CB_FAM_CHT, AIM_CB_CHT_INCOMINGMSG, gaim_chat_incoming_msg, 0);
668
669	aim_clientready(sess, fr->conn);
670
671	chatcon = find_oscar_chat_by_conn(ic, fr->conn);
672	chatcon->id = id;
673
674	c = bee_chat_by_title(ic->bee, ic, chatcon->show);
675	if (c && !c->data)
676	chatcon->cnv = c;
677	else
678	chatcon->cnv = imcb_chat_new(ic, chatcon->show);
679	chatcon->cnv->data = chatcon;
680
681	return 1;
682	}
683
684	static int conninitdone_chatnav(aim_session_t sess, aim_frame_t fr, ...) {
685
686	aim_conn_addhandler(sess, fr->conn, AIM_CB_FAM_CTN, AIM_CB_CTN_ERROR, gaim_parse_genericerr, 0);
687	aim_conn_addhandler(sess, fr->conn, AIM_CB_FAM_CTN, AIM_CB_CTN_INFO, gaim_chatnav_info, 0);
688
689	aim_clientready(sess, fr->conn);
690
691	aim_chatnav_reqrights(sess, fr->conn);
692
693	return 1;
694	}
695
696	static gboolean oscar_chatnav_connect(gpointer data, gint source, b_input_condition cond) {
697	struct im_connection *ic = data;
698	struct oscar_data *odata;
699	aim_session_t *sess;
700	aim_conn_t *tstconn;
701
702	if (!g_slist_find(get_connections(), ic)) {
703	closesocket(source);
704	return FALSE;
705	}
706
707	odata = ic->proto_data;
708	sess = odata->sess;
709	tstconn = aim_getconn_type_all(sess, AIM_CONN_TYPE_CHATNAV);
710
711	if (source < 0) {
712	aim_conn_kill(sess, &tstconn);
713	return FALSE;
714	}
715
716	aim_conn_completeconnect(sess, tstconn);
717	odata->cnpa = b_input_add(tstconn->fd, B_EV_IO_READ,
718	oscar_callback, tstconn);
719
720	return FALSE;
721	}
722
723	static gboolean oscar_auth_connect(gpointer data, gint source, b_input_condition cond)
724	{
725	struct im_connection *ic = data;
726	struct oscar_data *odata;
727	aim_session_t *sess;
728	aim_conn_t *tstconn;
729
730	if (!g_slist_find(get_connections(), ic)) {
731	closesocket(source);
732	return FALSE;
733	}
734
735	odata = ic->proto_data;
736	sess = odata->sess;
737	tstconn = aim_getconn_type_all(sess, AIM_CONN_TYPE_AUTH);
738
739	if (source < 0) {
740	aim_conn_kill(sess, &tstconn);
741	return FALSE;
742	}
743
744	aim_conn_completeconnect(sess, tstconn);
745	odata->paspa = b_input_add(tstconn->fd, B_EV_IO_READ,
746	oscar_callback, tstconn);
747
748	return FALSE;
749	}
750
751	static gboolean oscar_chat_connect(gpointer data, gint source, b_input_condition cond)
752	{
753	struct chat_connection *ccon = data;
754	struct im_connection *ic = ccon->ic;
755	struct oscar_data *odata;
756	aim_session_t *sess;
757	aim_conn_t *tstconn;
758
759	if (!g_slist_find(get_connections(), ic)) {
760	closesocket(source);
761	g_free(ccon->show);
762	g_free(ccon->name);
763	g_free(ccon);
764	return FALSE;
765	}
766
767	odata = ic->proto_data;
768	sess = odata->sess;
769	tstconn = ccon->conn;
770
771	if (source < 0) {
772	aim_conn_kill(sess, &tstconn);
773	g_free(ccon->show);
774	g_free(ccon->name);
775	g_free(ccon);
776	return FALSE;
777	}
778
779	aim_conn_completeconnect(sess, ccon->conn);
780	ccon->inpa = b_input_add(tstconn->fd,
781	B_EV_IO_READ,
782	oscar_callback, tstconn);
783	odata->oscar_chats = g_slist_append(odata->oscar_chats, ccon);
784
785	return FALSE;
786	}
787
788	/* Hrmph. I don't know how to make this look better. --mid */
789	static int gaim_handle_redirect(aim_session_t sess, aim_frame_t fr, ...) {
790	va_list ap;
791	struct aim_redirect_data *redir;
792	struct im_connection *ic = sess->aux_data;
793	aim_conn_t *tstconn;
794	int i;
795	char *host;
796	int port;
797
798	va_start(ap, fr);
799	redir = va_arg(ap, struct aim_redirect_data *);
800	va_end(ap);
801
802	port = AIM_LOGIN_PORT;
803	for (i = 0; i < (int)strlen(redir->ip); i++) {
804	if (redir->ip[i] == ':') {
805	port = atoi(&(redir->ip[i+1]));
806	break;
807	}
808	}
809	host = g_strndup(redir->ip, i);
810
811	switch(redir->group) {
812	case 0x7: /* Authorizer */
813	tstconn = aim_newconn(sess, AIM_CONN_TYPE_AUTH, NULL);
814	if (tstconn == NULL) {
815	g_free(host);
816	return 1;
817	}
818	aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNINITDONE, conninitdone_admin, 0);
819	// aim_conn_addhandler(sess, tstconn, 0x0007, 0x0003, gaim_info_change, 0);
820	// aim_conn_addhandler(sess, tstconn, 0x0007, 0x0005, gaim_info_change, 0);
821	// aim_conn_addhandler(sess, tstconn, 0x0007, 0x0007, gaim_account_confirm, 0);
822
823	tstconn->status \|= AIM_CONN_STATUS_INPROGRESS;
824	tstconn->fd = proxy_connect(host, port, oscar_auth_connect, ic);
825	if (tstconn->fd < 0) {
826	aim_conn_kill(sess, &tstconn);
827	g_free(host);
828	return 1;
829	}
830	aim_sendcookie(sess, tstconn, redir->cookie);
831	break;
832	case 0xd: /* ChatNav */
833	tstconn = aim_newconn(sess, AIM_CONN_TYPE_CHATNAV, NULL);
834	if (tstconn == NULL) {
835	g_free(host);
836	return 1;
837	}
838	aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNINITDONE, conninitdone_chatnav, 0);
839
840	tstconn->status \|= AIM_CONN_STATUS_INPROGRESS;
841	tstconn->fd = proxy_connect(host, port, oscar_chatnav_connect, ic);
842	if (tstconn->fd < 0) {
843	aim_conn_kill(sess, &tstconn);
844	g_free(host);
845	return 1;
846	}
847	aim_sendcookie(sess, tstconn, redir->cookie);
848	break;
849	case 0xe: /* Chat */
850	{
851	struct chat_connection *ccon;
852
853	tstconn = aim_newconn(sess, AIM_CONN_TYPE_CHAT, NULL);
854	if (tstconn == NULL) {
855	g_free(host);
856	return 1;
857	}
858
859	aim_conn_addhandler(sess, tstconn, AIM_CB_FAM_SPECIAL, AIM_CB_SPECIAL_CONNINITDONE, conninitdone_chat, 0);
860
861	ccon = g_new0(struct chat_connection, 1);
862	ccon->conn = tstconn;
863	ccon->ic = ic;
864	ccon->fd = -1;
865	ccon->name = g_strdup(redir->chat.room);
866	ccon->exchange = redir->chat.exchange;
867	ccon->instance = redir->chat.instance;
868	ccon->show = extract_name(redir->chat.room);
869
870	ccon->conn->status \|= AIM_CONN_STATUS_INPROGRESS;
871	ccon->conn->fd = proxy_connect(host, port, oscar_chat_connect, ccon);
872	if (ccon->conn->fd < 0) {
873	aim_conn_kill(sess, &tstconn);
874	g_free(host);
875	g_free(ccon->show);
876	g_free(ccon->name);
877	g_free(ccon);
878	return 1;
879	}
880	aim_sendcookie(sess, tstconn, redir->cookie);
881	}
882	break;
883	default: /* huh? */
884	break;
885	}
886
887	g_free(host);
888	return 1;
889	}
890
891	static int gaim_parse_oncoming(aim_session_t sess, aim_frame_t fr, ...) {
892	struct im_connection *ic = sess->aux_data;
893	struct oscar_data *od = ic->proto_data;
894	aim_userinfo_t *info;
895	time_t time_idle = 0, signon = 0;
896	int flags = OPT_LOGGED_IN;
897	char tmp, state_string = NULL;
898
899	va_list ap;
900	va_start(ap, fr);
901	info = va_arg(ap, aim_userinfo_t *);
902	va_end(ap);
903
904	if ((!od->icq) && (info->present & AIM_USERINFO_PRESENT_FLAGS)) {
905	if (info->flags & AIM_FLAG_AWAY)
906	flags \|= OPT_AWAY;
907	}
908
909	/* Maybe this should be done just for AIM contacts, not sure. */
910	if (info->flags & AIM_FLAG_WIRELESS)
911	flags \|= OPT_MOBILE;
912
913	if (info->present & AIM_USERINFO_PRESENT_ICQEXTSTATUS) {
914	if (!(info->icqinfo.status & AIM_ICQ_STATE_CHAT) &&
915	(info->icqinfo.status != AIM_ICQ_STATE_NORMAL)) {
916	flags \|= OPT_AWAY;
917	}
918
919	if( info->icqinfo.status & AIM_ICQ_STATE_DND )
920	state_string = "Do Not Disturb";
921	else if( info->icqinfo.status & AIM_ICQ_STATE_OUT )
922	state_string = "Not Available";
923	else if( info->icqinfo.status & AIM_ICQ_STATE_BUSY )
924	state_string = "Occupied";
925	else if( info->icqinfo.status & AIM_ICQ_STATE_INVISIBLE )
926	state_string = "Invisible";
927	}
928
929	if (info->present & AIM_USERINFO_PRESENT_IDLE) {
930	time(&time_idle);
931	time_idle -= info->idletime*60;
932	}
933
934	if (info->present & AIM_USERINFO_PRESENT_SESSIONLEN)
935	signon = time(NULL) - info->sessionlen;
936
937	if (info->present & AIM_USERINFO_PRESENT_ICQIPADDR) {
938	uint32_t *uin = g_new0(uint32_t, 1);
939
940	if (od->ips == NULL)
941	od->ips = g_hash_table_new_full(g_int_hash, g_int_equal, g_free, NULL);
942
943	if (sscanf(info->sn, "%d", uin) == 1)
944	g_hash_table_insert(od->ips, uin, (gpointer) (long) info->icqinfo.ipaddr);
945	}
946
947	if (!aim_sncmp(ic->acc->user, info->sn))
948	g_snprintf(ic->displayname, sizeof(ic->displayname), "%s", info->sn);
949
950	tmp = normalize(info->sn);
951	imcb_buddy_status(ic, tmp, flags, state_string, NULL);
952	imcb_buddy_times(ic, tmp, signon, time_idle);
953
954
955	return 1;
956	}
957
958	static int gaim_parse_offgoing(aim_session_t sess, aim_frame_t fr, ...) {
959	aim_userinfo_t *info;
960	va_list ap;
961	struct im_connection *ic = sess->aux_data;
962
963	va_start(ap, fr);
964	info = va_arg(ap, aim_userinfo_t *);
965	va_end(ap);
966
967	imcb_buddy_status(ic, normalize(info->sn), 0, NULL, NULL );
968
969	return 1;
970	}
971
972	static int incomingim_chan1(aim_session_t sess, aim_conn_t conn, aim_userinfo_t userinfo, struct aim_incomingim_ch1_args args) {
973	char *tmp = g_malloc(BUF_LONG + 1);
974	struct im_connection *ic = sess->aux_data;
975	int flags = 0;
976
977	if (args->icbmflags & AIM_IMFLAGS_AWAY)
978	flags \|= OPT_AWAY;
979
980	if ((args->icbmflags & AIM_IMFLAGS_UNICODE) \|\| (args->icbmflags & AIM_IMFLAGS_ISO_8859_1)) {
981	char *src;
982
983	if (args->icbmflags & AIM_IMFLAGS_UNICODE)
984	src = "UNICODEBIG";
985	else
986	src = "ISO8859-1";
987
988	/* Try to use iconv first to convert the message to UTF8 - which is what BitlBee expects */
989	if (do_iconv(src, "UTF-8", args->msg, tmp, args->msglen, BUF_LONG) >= 0) {
990	// Successfully converted!
991	} else if (args->icbmflags & AIM_IMFLAGS_UNICODE) {
992	int i;
993
994	for (i = 0, tmp[0] = '\0'; i < args->msglen; i += 2) {
995	unsigned short uni;
996
997	uni = ((args->msg[i] & 0xff) << 8) \| (args->msg[i+1] & 0xff);
998
999	if ((uni < 128) \|\| ((uni >= 160) && (uni <= 255))) { /* ISO 8859-1 */
1000	g_snprintf(tmp+strlen(tmp), BUF_LONG-strlen(tmp), "%c", uni);
1001	} else { /* something else, do UNICODE entity */
1002	g_snprintf(tmp+strlen(tmp), BUF_LONG-strlen(tmp), "&#%04x;", uni);
1003	}
1004	}
1005	} else {
1006	g_snprintf(tmp, BUF_LONG, "%s", args->msg);
1007	}
1008	} else if (args->mpmsg.numparts == 0) {
1009	g_snprintf(tmp, BUF_LONG, "%s", args->msg);
1010	} else {
1011	aim_mpmsg_section_t *part;
1012
1013	*tmp = 0;
1014	for (part = args->mpmsg.parts; part; part = part->next) {
1015	if (part->data) {
1016	g_strlcat(tmp, (char*) part->data, BUF_LONG);
1017	g_strlcat(tmp, "\n", BUF_LONG);
1018	}
1019	}
1020	}
1021
1022	strip_linefeed(tmp);
1023	imcb_buddy_msg(ic, normalize(userinfo->sn), tmp, flags, 0);
1024	g_free(tmp);
1025
1026	return 1;
1027	}
1028
1029	void oscar_accept_chat(void *data);
1030	void oscar_reject_chat(void *data);
1031
1032	static int incomingim_chan2(aim_session_t sess, aim_conn_t conn, aim_userinfo_t userinfo, struct aim_incomingim_ch2_args args) {
1033	struct im_connection *ic = sess->aux_data;
1034
1035	if (args->status != AIM_RENDEZVOUS_PROPOSE)
1036	return 1;
1037
1038	if (args->reqclass & AIM_CAPS_CHAT) {
1039	char *name = extract_name(args->info.chat.roominfo.name);
1040	int *exch = g_new0(int, 1);
1041	GList *m = NULL;
1042	char txt[1024];
1043	struct aim_chat_invitation * inv = g_new0(struct aim_chat_invitation, 1);
1044
1045	m = g_list_append(m, g_strdup(name ? name : args->info.chat.roominfo.name));
1046	*exch = args->info.chat.roominfo.exchange;
1047	m = g_list_append(m, exch);
1048
1049	g_snprintf(txt, 1024, "Got an invitation to chatroom %s from %s: %s", name, userinfo->sn, args->msg);
1050
1051	inv->ic = ic;
1052	inv->exchange = *exch;
1053	inv->name = g_strdup(name);
1054
1055	imcb_ask(ic, txt, inv, oscar_accept_chat, oscar_reject_chat);
1056
1057	if (name)
1058	g_free(name);
1059	} else if (args->reqclass & AIM_CAPS_ICQRTF) {
1060	// TODO: constify
1061	char text[strlen(args->info.rtfmsg.rtfmsg)+1];
1062	strncpy(text, args->info.rtfmsg.rtfmsg, sizeof(text));
1063	imcb_buddy_msg(ic, normalize(userinfo->sn), text, 0, 0);
1064	}
1065
1066	return 1;
1067	}
1068
1069	static void gaim_icq_authgrant(void *data_) {
1070	struct icq_auth *data = data_;
1071	char *uin, message;
1072	struct oscar_data od = (struct oscar_data )data->ic->proto_data;
1073
1074	uin = g_strdup_printf("%u", data->uin);
1075	message = 0;
1076	aim_ssi_auth_reply(od->sess, od->conn, uin, 1, "");
1077	// aim_send_im_ch4(od->sess, uin, AIM_ICQMSG_AUTHGRANTED, &message);
1078	imcb_ask_add(data->ic, uin, NULL);
1079
1080	g_free(uin);
1081	g_free(data);
1082	}
1083
1084	static void gaim_icq_authdeny(void *data_) {
1085	struct icq_auth *data = data_;
1086	char uin, message;
1087	struct oscar_data od = (struct oscar_data )data->ic->proto_data;
1088
1089	uin = g_strdup_printf("%u", data->uin);
1090	message = g_strdup_printf("No reason given.");
1091	aim_ssi_auth_reply(od->sess, od->conn, uin, 0, "");
1092	// aim_send_im_ch4(od->sess, uin, AIM_ICQMSG_AUTHDENIED, message);
1093	g_free(message);
1094
1095	g_free(uin);
1096	g_free(data);
1097	}
1098
1099	/*
1100	* For when other people ask you for authorization
1101	*/
1102	static void gaim_icq_authask(struct im_connection ic, guint32 uin, char msg) {
1103	struct icq_auth *data;
1104	char *reason = NULL;
1105	char *dialog_msg;
1106
1107	if (set_getbool(&ic->acc->set, "ignore_auth_requests"))
1108	return;
1109
1110	data = g_new(struct icq_auth, 1);
1111
1112	if (strlen(msg) > 6)
1113	reason = msg + 6;
1114
1115	dialog_msg = g_strdup_printf("The user %u wants to add you to their buddy list for the following reason: %s", uin, reason ? reason : "No reason given.");
1116	data->ic = ic;
1117	data->uin = uin;
1118	imcb_ask(ic, dialog_msg, data, gaim_icq_authgrant, gaim_icq_authdeny);
1119	g_free(dialog_msg);
1120	}
1121
1122	static int incomingim_chan4(aim_session_t sess, aim_conn_t conn, aim_userinfo_t userinfo, struct aim_incomingim_ch4_args args) {
1123	struct im_connection *ic = sess->aux_data;
1124
1125	switch (args->type) {
1126	case 0x0001: { /* An almost-normal instant message. Mac ICQ sends this. It's peculiar. */
1127	char uin, message;
1128	uin = g_strdup_printf("%u", args->uin);
1129	message = g_strdup(args->msg);
1130	strip_linefeed(message);
1131	imcb_buddy_msg(ic, normalize(uin), message, 0, 0);
1132	g_free(uin);
1133	g_free(message);
1134	} break;
1135
1136	case 0x0004: { /* Someone sent you a URL */
1137	char uin, message;
1138	char **m;
1139
1140	uin = g_strdup_printf("%u", args->uin);
1141	m = g_strsplit(args->msg, "\376", 2);
1142
1143	if ((strlen(m[0]) != 0)) {
1144	message = g_strjoinv(" -- ", m);
1145	} else {
1146	message = m[1];
1147	}
1148
1149	strip_linefeed(message);
1150	imcb_buddy_msg(ic, normalize(uin), message, 0, 0);
1151	g_free(uin);
1152	g_free(m);
1153	g_free(message);
1154	} break;
1155
1156	case 0x0006: { /* Someone requested authorization */
1157	gaim_icq_authask(ic, args->uin, args->msg);
1158	} break;
1159
1160	case 0x0007: { /* Someone has denied you authorization */
1161	imcb_log(sess->aux_data, "The user %u has denied your request to add them to your contact list for the following reason:\n%s", args->uin, args->msg ? args->msg : _("No reason given.") );
1162	} break;
1163
1164	case 0x0008: { /* Someone has granted you authorization */
1165	imcb_log(sess->aux_data, "The user %u has granted your request to add them to your contact list for the following reason:\n%s", args->uin, args->msg ? args->msg : _("No reason given.") );
1166	} break;
1167
1168	case 0x0012: {
1169	/* Ack for authorizing/denying someone. Or possibly an ack for sending any system notice */
1170	} break;
1171
1172	default: {;
1173	} break;
1174	}
1175
1176	return 1;
1177	}
1178
1179	static int gaim_parse_incoming_im(aim_session_t sess, aim_frame_t fr, ...) {
1180	int channel, ret = 0;
1181	aim_userinfo_t *userinfo;
1182	va_list ap;
1183
1184	va_start(ap, fr);
1185	channel = va_arg(ap, int);
1186	userinfo = va_arg(ap, aim_userinfo_t *);
1187
1188	switch (channel) {
1189	case 1: { /* standard message */
1190	struct aim_incomingim_ch1_args *args;
1191	args = va_arg(ap, struct aim_incomingim_ch1_args *);
1192	ret = incomingim_chan1(sess, fr->conn, userinfo, args);
1193	} break;
1194
1195	case 2: { /* rendevous */
1196	struct aim_incomingim_ch2_args *args;
1197	args = va_arg(ap, struct aim_incomingim_ch2_args *);
1198	ret = incomingim_chan2(sess, fr->conn, userinfo, args);
1199	} break;
1200
1201	case 4: { /* ICQ */
1202	struct aim_incomingim_ch4_args *args;
1203	args = va_arg(ap, struct aim_incomingim_ch4_args *);
1204	ret = incomingim_chan4(sess, fr->conn, userinfo, args);
1205	} break;
1206
1207	default: {;
1208	} break;
1209	}
1210
1211	va_end(ap);
1212
1213	return ret;
1214	}
1215
1216	static int gaim_parse_misses(aim_session_t sess, aim_frame_t fr, ...) {
1217	va_list ap;
1218	guint16 chan, nummissed, reason;
1219	aim_userinfo_t *userinfo;
1220
1221	va_start(ap, fr);
1222	chan = (guint16)va_arg(ap, unsigned int);
1223	userinfo = va_arg(ap, aim_userinfo_t *);
1224	nummissed = (guint16)va_arg(ap, unsigned int);
1225	reason = (guint16)va_arg(ap, unsigned int);
1226	va_end(ap);
1227
1228	switch(reason) {
1229	case 0:
1230	/* Invalid (0) */
1231	imcb_error(sess->aux_data,
1232	nummissed == 1 ?
1233	_("You missed %d message from %s because it was invalid.") :
1234	_("You missed %d messages from %s because they were invalid."),
1235	nummissed,
1236	userinfo->sn);
1237	break;
1238	case 1:
1239	/* Message too large */
1240	imcb_error(sess->aux_data,
1241	nummissed == 1 ?
1242	_("You missed %d message from %s because it was too large.") :
1243	_("You missed %d messages from %s because they were too large."),
1244	nummissed,
1245	userinfo->sn);
1246	break;
1247	case 2:
1248	/* Rate exceeded */
1249	imcb_error(sess->aux_data,
1250	nummissed == 1 ?
1251	_("You missed %d message from %s because the rate limit has been exceeded.") :
1252	_("You missed %d messages from %s because the rate limit has been exceeded."),
1253	nummissed,
1254	userinfo->sn);
1255	break;
1256	case 3:
1257	/* Evil Sender */
1258	imcb_error(sess->aux_data,
1259	nummissed == 1 ?
1260	_("You missed %d message from %s because it was too evil.") :
1261	_("You missed %d messages from %s because they are too evil."),
1262	nummissed,
1263	userinfo->sn);
1264	break;
1265	case 4:
1266	/* Evil Receiver */
1267	imcb_error(sess->aux_data,
1268	nummissed == 1 ?
1269	_("You missed %d message from %s because you are too evil.") :
1270	_("You missed %d messages from %s because you are too evil."),
1271	nummissed,
1272	userinfo->sn);
1273	break;
1274	default:
1275	imcb_error(sess->aux_data,
1276	nummissed == 1 ?
1277	_("You missed %d message from %s for unknown reasons.") :
1278	_("You missed %d messages from %s for unknown reasons."),
1279	nummissed,
1280	userinfo->sn);
1281	break;
1282	}
1283
1284	return 1;
1285	}
1286
1287	static int gaim_parse_genericerr(aim_session_t sess, aim_frame_t fr, ...) {
1288	va_list ap;
1289	guint16 reason;
1290
1291	va_start(ap, fr);
1292	reason = (guint16)va_arg(ap, unsigned int);
1293	va_end(ap);
1294
1295	imcb_error(sess->aux_data, _("SNAC threw error: %s"),
1296	reason < msgerrreasonlen ? msgerrreason[reason] : "Unknown error");
1297
1298	return 1;
1299	}
1300
1301	static int gaim_parse_msgerr(aim_session_t sess, aim_frame_t fr, ...) {
1302	va_list ap;
1303	char *destn;
1304	guint16 reason;
1305
1306	va_start(ap, fr);
1307	reason = (guint16)va_arg(ap, unsigned int);
1308	destn = va_arg(ap, char *);
1309	va_end(ap);
1310
1311	imcb_error(sess->aux_data, _("Your message to %s did not get sent: %s"), destn,
1312	(reason < msgerrreasonlen) ? msgerrreason[reason] : _("Reason unknown"));
1313
1314	return 1;
1315	}
1316
1317	static int gaim_parse_locerr(aim_session_t sess, aim_frame_t fr, ...) {
1318	va_list ap;
1319	char *destn;
1320	guint16 reason;
1321
1322	va_start(ap, fr);
1323	reason = (guint16)va_arg(ap, unsigned int);
1324	destn = va_arg(ap, char *);
1325	va_end(ap);
1326
1327	imcb_error(sess->aux_data, _("User information for %s unavailable: %s"), destn,
1328	(reason < msgerrreasonlen) ? msgerrreason[reason] : _("Reason unknown"));
1329
1330	return 1;
1331	}
1332
1333	static int gaim_parse_motd(aim_session_t sess, aim_frame_t fr, ...) {
1334	char *msg;
1335	guint16 id;
1336	va_list ap;
1337
1338	va_start(ap, fr);
1339	id = (guint16)va_arg(ap, unsigned int);
1340	msg = va_arg(ap, char *);
1341	va_end(ap);
1342
1343	if (id < 4)
1344	imcb_error(sess->aux_data, _("Your connection may be lost."));
1345
1346	return 1;
1347	}
1348
1349	static int gaim_chatnav_info(aim_session_t sess, aim_frame_t fr, ...) {
1350	va_list ap;
1351	guint16 type;
1352	struct im_connection *ic = sess->aux_data;
1353	struct oscar_data odata = (struct oscar_data )ic->proto_data;
1354
1355	va_start(ap, fr);
1356	type = (guint16)va_arg(ap, unsigned int);
1357
1358	switch(type) {
1359	case 0x0002: {
1360	guint8 maxrooms;
1361	struct aim_chat_exchangeinfo *exchanges;
1362	int exchangecount; // i;
1363
1364	maxrooms = (guint8)va_arg(ap, unsigned int);
1365	exchangecount = va_arg(ap, int);
1366	exchanges = va_arg(ap, struct aim_chat_exchangeinfo *);
1367	va_end(ap);
1368
1369	while (odata->create_rooms) {
1370	struct create_room *cr = odata->create_rooms->data;
1371	aim_chatnav_createroom(sess, fr->conn, cr->name, cr->exchange);
1372	g_free(cr->name);
1373	odata->create_rooms = g_slist_remove(odata->create_rooms, cr);
1374	g_free(cr);
1375	}
1376	}
1377	break;
1378	case 0x0008: {
1379	char fqcn, name, *ck;
1380	guint16 instance, flags, maxmsglen, maxoccupancy, unknown, exchange;
1381	guint8 createperms;
1382	guint32 createtime;
1383
1384	fqcn = va_arg(ap, char *);
1385	instance = (guint16)va_arg(ap, unsigned int);
1386	exchange = (guint16)va_arg(ap, unsigned int);
1387	flags = (guint16)va_arg(ap, unsigned int);
1388	createtime = va_arg(ap, guint32);
1389	maxmsglen = (guint16)va_arg(ap, unsigned int);
1390	maxoccupancy = (guint16)va_arg(ap, unsigned int);
1391	createperms = (guint8)va_arg(ap, int);
1392	unknown = (guint16)va_arg(ap, unsigned int);
1393	name = va_arg(ap, char *);
1394	ck = va_arg(ap, char *);
1395	va_end(ap);
1396
1397	aim_chat_join(odata->sess, odata->conn, exchange, ck, instance);
1398	}
1399	break;
1400	default:
1401	va_end(ap);
1402	break;
1403	}
1404	return 1;
1405	}
1406
1407	static int gaim_chat_join(aim_session_t sess, aim_frame_t fr, ...) {
1408	va_list ap;
1409	int count, i;
1410	aim_userinfo_t *info;
1411	struct im_connection *g = sess->aux_data;
1412
1413	struct chat_connection *c = NULL;
1414
1415	va_start(ap, fr);
1416	count = va_arg(ap, int);
1417	info = va_arg(ap, aim_userinfo_t *);
1418	va_end(ap);
1419
1420	c = find_oscar_chat_by_conn(g, fr->conn);
1421	if (!c)
1422	return 1;
1423
1424	for (i = 0; i < count; i++)
1425	imcb_chat_add_buddy(c->cnv, normalize(info[i].sn));
1426
1427	return 1;
1428	}
1429
1430	static int gaim_chat_leave(aim_session_t sess, aim_frame_t fr, ...) {
1431	va_list ap;
1432	int count, i;
1433	aim_userinfo_t *info;
1434	struct im_connection *g = sess->aux_data;
1435
1436	struct chat_connection *c = NULL;
1437
1438	va_start(ap, fr);
1439	count = va_arg(ap, int);
1440	info = va_arg(ap, aim_userinfo_t *);
1441	va_end(ap);
1442
1443	c = find_oscar_chat_by_conn(g, fr->conn);
1444	if (!c)
1445	return 1;
1446
1447	for (i = 0; i < count; i++)
1448	imcb_chat_remove_buddy(c->cnv, normalize(info[i].sn), NULL);
1449
1450	return 1;
1451	}
1452
1453	static int gaim_chat_info_update(aim_session_t sess, aim_frame_t fr, ...) {
1454	va_list ap;
1455	aim_userinfo_t *userinfo;
1456	struct aim_chat_roominfo *roominfo;
1457	char *roomname;
1458	int usercount;
1459	char *roomdesc;
1460	guint16 unknown_c9, unknown_d2, unknown_d5, maxmsglen, maxvisiblemsglen;
1461	guint32 creationtime;
1462	struct im_connection *ic = sess->aux_data;
1463	struct chat_connection *ccon = find_oscar_chat_by_conn(ic, fr->conn);
1464
1465	va_start(ap, fr);
1466	roominfo = va_arg(ap, struct aim_chat_roominfo *);
1467	roomname = va_arg(ap, char *);
1468	usercount= va_arg(ap, int);
1469	userinfo = va_arg(ap, aim_userinfo_t *);
1470	roomdesc = va_arg(ap, char *);
1471	unknown_c9 = (guint16)va_arg(ap, int);
1472	creationtime = (guint32)va_arg(ap, unsigned long);
1473	maxmsglen = (guint16)va_arg(ap, int);
1474	unknown_d2 = (guint16)va_arg(ap, int);
1475	unknown_d5 = (guint16)va_arg(ap, int);
1476	maxvisiblemsglen = (guint16)va_arg(ap, int);
1477	va_end(ap);
1478
1479	ccon->maxlen = maxmsglen;
1480	ccon->maxvis = maxvisiblemsglen;
1481
1482	return 1;
1483	}
1484
1485	static int gaim_chat_incoming_msg(aim_session_t sess, aim_frame_t fr, ...) {
1486	va_list ap;
1487	aim_userinfo_t *info;
1488	char *msg;
1489	struct im_connection *ic = sess->aux_data;
1490	struct chat_connection *ccon = find_oscar_chat_by_conn(ic, fr->conn);
1491	char *tmp;
1492
1493	va_start(ap, fr);
1494	info = va_arg(ap, aim_userinfo_t *);
1495	msg = va_arg(ap, char *);
1496
1497	tmp = g_malloc(BUF_LONG);
1498	g_snprintf(tmp, BUF_LONG, "%s", msg);
1499	imcb_chat_msg(ccon->cnv, normalize(info->sn), tmp, 0, 0);
1500	g_free(tmp);
1501
1502	return 1;
1503	}
1504
1505	static int gaim_parse_ratechange(aim_session_t sess, aim_frame_t fr, ...) {
1506	#if 0
1507	static const char *codes[5] = {
1508	"invalid",
1509	"change",
1510	"warning",
1511	"limit",
1512	"limit cleared",
1513	};
1514	#endif
1515	va_list ap;
1516	guint16 code, rateclass;
1517	guint32 windowsize, clear, alert, limit, disconnect, currentavg, maxavg;
1518
1519	va_start(ap, fr);
1520	code = (guint16)va_arg(ap, unsigned int);
1521	rateclass= (guint16)va_arg(ap, unsigned int);
1522	windowsize = (guint32)va_arg(ap, unsigned long);
1523	clear = (guint32)va_arg(ap, unsigned long);
1524	alert = (guint32)va_arg(ap, unsigned long);
1525	limit = (guint32)va_arg(ap, unsigned long);
1526	disconnect = (guint32)va_arg(ap, unsigned long);
1527	currentavg = (guint32)va_arg(ap, unsigned long);
1528	maxavg = (guint32)va_arg(ap, unsigned long);
1529	va_end(ap);
1530
1531	/* XXX fix these values */
1532	if (code == AIM_RATE_CODE_CHANGE) {
1533	if (currentavg >= clear)
1534	aim_conn_setlatency(fr->conn, 0);
1535	} else if (code == AIM_RATE_CODE_WARNING) {
1536	aim_conn_setlatency(fr->conn, windowsize/4);
1537	} else if (code == AIM_RATE_CODE_LIMIT) {
1538	imcb_error(sess->aux_data, _("The last message was not sent because you are over the rate limit. "
1539	"Please wait 10 seconds and try again."));
1540	aim_conn_setlatency(fr->conn, windowsize/2);
1541	} else if (code == AIM_RATE_CODE_CLEARLIMIT) {
1542	aim_conn_setlatency(fr->conn, 0);
1543	}
1544
1545	return 1;
1546	}
1547
1548	static int gaim_selfinfo(aim_session_t sess, aim_frame_t fr, ...) {
1549	va_list ap;
1550	aim_userinfo_t *info;
1551	struct im_connection *ic = sess->aux_data;
1552
1553	va_start(ap, fr);
1554	info = va_arg(ap, aim_userinfo_t *);
1555	va_end(ap);
1556
1557	ic->evil = info->warnlevel/10;
1558	/* ic->correction_time = (info->onlinesince - ic->login_time); */
1559
1560	return 1;
1561	}
1562
1563	static int conninitdone_bos(aim_session_t sess, aim_frame_t fr, ...) {
1564
1565	aim_reqpersonalinfo(sess, fr->conn);
1566	aim_bos_reqlocaterights(sess, fr->conn);
1567	aim_bos_reqbuddyrights(sess, fr->conn);
1568
1569	aim_reqicbmparams(sess);
1570
1571	aim_bos_reqrights(sess, fr->conn);
1572	aim_bos_setgroupperm(sess, fr->conn, AIM_FLAG_ALLUSERS);
1573	aim_bos_setprivacyflags(sess, fr->conn, AIM_PRIVFLAGS_ALLOWIDLE \|
1574	AIM_PRIVFLAGS_ALLOWMEMBERSINCE);
1575
1576	return 1;
1577	}
1578
1579	static int conninitdone_admin(aim_session_t sess, aim_frame_t fr, ...) {
1580	struct im_connection *ic = sess->aux_data;
1581	struct oscar_data *od = ic->proto_data;
1582
1583	aim_clientready(sess, fr->conn);
1584
1585	if (od->chpass) {
1586	aim_admin_changepasswd(sess, fr->conn, od->newp, od->oldp);
1587	g_free(od->oldp);
1588	od->oldp = NULL;
1589	g_free(od->newp);
1590	od->newp = NULL;
1591	od->chpass = FALSE;
1592	}
1593	if (od->setnick) {
1594	aim_admin_setnick(sess, fr->conn, od->newsn);
1595	g_free(od->newsn);
1596	od->newsn = NULL;
1597	od->setnick = FALSE;
1598	}
1599	if (od->conf) {
1600	aim_admin_reqconfirm(sess, fr->conn);
1601	od->conf = FALSE;
1602	}
1603	if (od->reqemail) {
1604	aim_admin_getinfo(sess, fr->conn, 0x0011);
1605	od->reqemail = FALSE;
1606	}
1607	if (od->setemail) {
1608	aim_admin_setemail(sess, fr->conn, od->email);
1609	g_free(od->email);
1610	od->setemail = FALSE;
1611	}
1612
1613	return 1;
1614	}
1615
1616	static int gaim_icbm_param_info(aim_session_t sess, aim_frame_t fr, ...) {
1617	struct aim_icbmparameters *params;
1618	va_list ap;
1619
1620	va_start(ap, fr);
1621	params = va_arg(ap, struct aim_icbmparameters *);
1622	va_end(ap);
1623
1624	/* Maybe senderwarn and recverwarn should be user preferences... */
1625	params->flags = 0x0000000b;
1626	params->maxmsglen = 8000;
1627	params->minmsginterval = 0;
1628
1629	aim_seticbmparam(sess, params);
1630
1631	return 1;
1632	}
1633
1634	static int gaim_parse_locaterights(aim_session_t sess, aim_frame_t fr, ...)
1635	{
1636	va_list ap;
1637	guint16 maxsiglen;
1638	struct im_connection *ic = sess->aux_data;
1639	struct oscar_data odata = (struct oscar_data )ic->proto_data;
1640
1641	va_start(ap, fr);
1642	maxsiglen = va_arg(ap, int);
1643	va_end(ap);
1644
1645	odata->rights.maxsiglen = odata->rights.maxawaymsglen = (guint)maxsiglen;
1646
1647	/* FIXME: It seems we're not really using this, and it broke now that
1648	struct aim_user is dead.
1649	aim_bos_setprofile(sess, fr->conn, ic->user->user_info, NULL, gaim_caps);
1650	*/
1651
1652	return 1;
1653	}
1654
1655	static int gaim_parse_buddyrights(aim_session_t sess, aim_frame_t fr, ...) {
1656	va_list ap;
1657	guint16 maxbuddies, maxwatchers;
1658	struct im_connection *ic = sess->aux_data;
1659	struct oscar_data odata = (struct oscar_data )ic->proto_data;
1660
1661	va_start(ap, fr);
1662	maxbuddies = (guint16)va_arg(ap, unsigned int);
1663	maxwatchers = (guint16)va_arg(ap, unsigned int);
1664	va_end(ap);
1665
1666	odata->rights.maxbuddies = (guint)maxbuddies;
1667	odata->rights.maxwatchers = (guint)maxwatchers;
1668
1669	return 1;
1670	}
1671
1672	static int gaim_bosrights(aim_session_t sess, aim_frame_t fr, ...) {
1673	guint16 maxpermits, maxdenies;
1674	va_list ap;
1675	struct im_connection *ic = sess->aux_data;
1676	struct oscar_data odata = (struct oscar_data )ic->proto_data;
1677
1678	va_start(ap, fr);
1679	maxpermits = (guint16)va_arg(ap, unsigned int);
1680	maxdenies = (guint16)va_arg(ap, unsigned int);
1681	va_end(ap);
1682
1683	odata->rights.maxpermits = (guint)maxpermits;
1684	odata->rights.maxdenies = (guint)maxdenies;
1685
1686	aim_clientready(sess, fr->conn);
1687
1688	aim_reqservice(sess, fr->conn, AIM_CONN_TYPE_CHATNAV);
1689
1690	aim_ssi_reqrights(sess, fr->conn);
1691	aim_ssi_reqalldata(sess, fr->conn);
1692
1693	return 1;
1694	}
1695
1696	static int gaim_offlinemsg(aim_session_t sess, aim_frame_t fr, ...) {
1697	va_list ap;
1698	struct aim_icq_offlinemsg *msg;
1699	struct im_connection *ic = sess->aux_data;
1700
1701	va_start(ap, fr);
1702	msg = va_arg(ap, struct aim_icq_offlinemsg *);
1703	va_end(ap);
1704
1705	switch (msg->type) {
1706	case 0x0001: { /* Basic offline message */
1707	char sender[32];
1708	char *dialog_msg = g_strdup(msg->msg);
1709	time_t t = get_time(msg->year, msg->month, msg->day, msg->hour, msg->minute, 0);
1710	g_snprintf(sender, sizeof(sender), "%u", msg->sender);
1711	strip_linefeed(dialog_msg);
1712	imcb_buddy_msg(ic, normalize(sender), dialog_msg, 0, t);
1713	g_free(dialog_msg);
1714	} break;
1715
1716	case 0x0004: { /* Someone sent you a URL */
1717	char sender[32];
1718	char *dialog_msg;
1719	char **m;
1720
1721	time_t t = get_time(msg->year, msg->month, msg->day, msg->hour, msg->minute, 0);
1722	g_snprintf(sender, sizeof(sender), "%u", msg->sender);
1723
1724	m = g_strsplit(msg->msg, "\376", 2);
1725
1726	if ((strlen(m[0]) != 0)) {
1727	dialog_msg = g_strjoinv(" -- ", m);
1728	} else {
1729	dialog_msg = m[1];
1730	}
1731
1732	strip_linefeed(dialog_msg);
1733	imcb_buddy_msg(ic, normalize(sender), dialog_msg, 0, t);
1734	g_free(dialog_msg);
1735	g_free(m);
1736	} break;
1737
1738	case 0x0006: { /* Authorization request */
1739	gaim_icq_authask(ic, msg->sender, msg->msg);
1740	} break;
1741
1742	case 0x0007: { /* Someone has denied you authorization */
1743	imcb_log(sess->aux_data, "The user %u has denied your request to add them to your contact list for the following reason:\n%s", msg->sender, msg->msg ? msg->msg : _("No reason given.") );
1744	} break;
1745
1746	case 0x0008: { /* Someone has granted you authorization */
1747	imcb_log(sess->aux_data, "The user %u has granted your request to add them to your contact list for the following reason:\n%s", msg->sender, msg->msg ? msg->msg : _("No reason given.") );
1748	} break;
1749
1750	case 0x0012: {
1751	/* Ack for authorizing/denying someone. Or possibly an ack for sending any system notice */
1752	} break;
1753
1754	default: {;
1755	}
1756	}
1757
1758	return 1;
1759	}
1760
1761	static int gaim_offlinemsgdone(aim_session_t sess, aim_frame_t fr, ...)
1762	{
1763	aim_icq_ackofflinemsgs(sess);
1764	return 1;
1765	}
1766
1767	static void oscar_keepalive(struct im_connection *ic) {
1768	struct oscar_data odata = (struct oscar_data )ic->proto_data;
1769	aim_flap_nop(odata->sess, odata->conn);
1770	}
1771
1772	static int oscar_buddy_msg(struct im_connection ic, char name, char *message, int imflags) {
1773	struct oscar_data odata = (struct oscar_data )ic->proto_data;
1774	int ret = 0, len = strlen(message);
1775	if (imflags & OPT_AWAY) {
1776	ret = aim_send_im(odata->sess, name, AIM_IMFLAGS_AWAY, message);
1777	} else {
1778	struct aim_sendimext_args args;
1779	char *s;
1780
1781	args.flags = AIM_IMFLAGS_ACK;
1782	if (odata->icq)
1783	args.flags \|= AIM_IMFLAGS_OFFLINE;
1784	for (s = message; *s; s++)
1785	if (*s & 128)
1786	break;
1787
1788	/* Message contains high ASCII chars, time for some translation! */
1789	if (*s) {
1790	s = g_malloc(BUF_LONG);
1791	/* Try if we can put it in an ISO8859-1 string first.
1792	If we can't, fall back to UTF16. */
1793	if ((ret = do_iconv("UTF-8", "ISO8859-1", message, s, len, BUF_LONG)) >= 0) {
1794	args.flags \|= AIM_IMFLAGS_ISO_8859_1;
1795	len = ret;
1796	} else if ((ret = do_iconv("UTF-8", "UNICODEBIG", message, s, len, BUF_LONG)) >= 0) {
1797	args.flags \|= AIM_IMFLAGS_UNICODE;
1798	len = ret;
1799	} else {
1800	/* OOF, translation failed... Oh well.. */
1801	g_free( s );
1802	s = message;
1803	}
1804	} else {
1805	s = message;
1806	}
1807
1808	args.features = gaim_features;
1809	args.featureslen = sizeof(gaim_features);
1810
1811	args.destsn = name;
1812	args.msg = s;
1813	args.msglen = len;
1814
1815	ret = aim_send_im_ext(odata->sess, &args);
1816
1817	if (s != message) {
1818	g_free(s);
1819	}
1820	}
1821	if (ret >= 0)
1822	return 1;
1823	return ret;
1824	}
1825
1826	static void oscar_get_info(struct im_connection g, char name) {
1827	struct oscar_data odata = (struct oscar_data )g->proto_data;
1828	if (odata->icq)
1829	aim_icq_getallinfo(odata->sess, name);
1830	else {
1831	aim_getinfo(odata->sess, odata->conn, name, AIM_GETINFO_AWAYMESSAGE);
1832	aim_getinfo(odata->sess, odata->conn, name, AIM_GETINFO_GENERALINFO);
1833	}
1834	}
1835
1836	static void oscar_get_away(struct im_connection g, char who) {
1837	struct oscar_data odata = (struct oscar_data )g->proto_data;
1838	if (odata->icq) {
1839	/** FIXME(wilmer): Hmm, lost the ability to get away msgs here, do we care to get that back?
1840	struct buddy *budlight = imcb_find_buddy(g, who);
1841	if (budlight)
1842	if ((budlight->uc & 0xff80) >> 7)
1843	if (budlight->caps & AIM_CAPS_ICQSERVERRELAY)
1844	aim_send_im_ch2_geticqmessage(odata->sess, who, (budlight->uc & 0xff80) >> 7);
1845	*/
1846	} else
1847	aim_getinfo(odata->sess, odata->conn, who, AIM_GETINFO_AWAYMESSAGE);
1848	}
1849
1850	static void oscar_set_away_aim(struct im_connection ic, struct oscar_data od, const char state, const char message)
1851	{
1852	if (state == NULL)
1853	state = "";
1854
1855	if (!g_strcasecmp(state, _("Visible"))) {
1856	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_NORMAL);
1857	return;
1858	} else if (!g_strcasecmp(state, _("Invisible"))) {
1859	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_INVISIBLE);
1860	return;
1861	} else if (message == NULL) {
1862	message = state;
1863	}
1864
1865	if (od->rights.maxawaymsglen == 0)
1866	imcb_error(ic, "oscar_set_away_aim called before locate rights received");
1867
1868	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_NORMAL);
1869
1870	g_free(ic->away);
1871	ic->away = NULL;
1872
1873	if (!message) {
1874	aim_bos_setprofile(od->sess, od->conn, NULL, "", gaim_caps);
1875	return;
1876	}
1877
1878	if (strlen(message) > od->rights.maxawaymsglen) {
1879	imcb_error(ic, "Maximum away message length of %d bytes exceeded, truncating", od->rights.maxawaymsglen);
1880	}
1881
1882	ic->away = g_strndup(message, od->rights.maxawaymsglen);
1883	aim_bos_setprofile(od->sess, od->conn, NULL, ic->away, gaim_caps);
1884
1885	return;
1886	}
1887
1888	static void oscar_set_away_icq(struct im_connection ic, struct oscar_data od, const char state, const char message)
1889	{
1890	const char *msg = NULL;
1891	gboolean no_message = FALSE;
1892
1893	/* clean old states */
1894	g_free(ic->away);
1895	ic->away = NULL;
1896	od->sess->aim_icq_state = 0;
1897
1898	/* if no message, then use an empty message */
1899	if (message) {
1900	msg = message;
1901	} else {
1902	msg = "";
1903	no_message = TRUE;
1904	}
1905
1906	if (state == NULL) {
1907	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_NORMAL);
1908	} else if (!g_strcasecmp(state, "Away")) {
1909	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_AWAY);
1910	ic->away = g_strdup(msg);
1911	od->sess->aim_icq_state = AIM_MTYPE_AUTOAWAY;
1912	} else if (!g_strcasecmp(state, "Do Not Disturb")) {
1913	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_AWAY \| AIM_ICQ_STATE_DND \| AIM_ICQ_STATE_BUSY);
1914	ic->away = g_strdup(msg);
1915	od->sess->aim_icq_state = AIM_MTYPE_AUTODND;
1916	} else if (!g_strcasecmp(state, "Not Available")) {
1917	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_OUT \| AIM_ICQ_STATE_AWAY);
1918	ic->away = g_strdup(msg);
1919	od->sess->aim_icq_state = AIM_MTYPE_AUTONA;
1920	} else if (!g_strcasecmp(state, "Occupied")) {
1921	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_AWAY \| AIM_ICQ_STATE_BUSY);
1922	ic->away = g_strdup(msg);
1923	od->sess->aim_icq_state = AIM_MTYPE_AUTOBUSY;
1924	} else if (!g_strcasecmp(state, "Free For Chat")) {
1925	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_CHAT);
1926	ic->away = g_strdup(msg);
1927	od->sess->aim_icq_state = AIM_MTYPE_AUTOFFC;
1928	} else if (!g_strcasecmp(state, "Invisible")) {
1929	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_INVISIBLE);
1930	ic->away = g_strdup(msg);
1931	} else {
1932	if (no_message) {
1933	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_NORMAL);
1934	} else {
1935	aim_setextstatus(od->sess, od->conn, AIM_ICQ_STATE_AWAY);
1936	ic->away = g_strdup(msg);
1937	od->sess->aim_icq_state = AIM_MTYPE_AUTOAWAY;
1938	}
1939	}
1940
1941	return;
1942	}
1943
1944	static void oscar_set_away(struct im_connection ic, char state, char *message)
1945	{
1946	struct oscar_data od = (struct oscar_data )ic->proto_data;
1947
1948	oscar_set_away_aim(ic, od, state, message);
1949	if (od->icq)
1950	oscar_set_away_icq(ic, od, state, message);
1951
1952	return;
1953	}
1954
1955	static void oscar_add_buddy(struct im_connection g, char name, char *group) {
1956	struct oscar_data odata = (struct oscar_data )g->proto_data;
1957	bee_user_t *bu;
1958
1959	if (group && (bu = bee_user_by_handle(g->bee, g, name)) && bu->group)
1960	aim_ssi_movebuddy(odata->sess, odata->conn, bu->group->name, group, name);
1961	else
1962	aim_ssi_addbuddies(odata->sess, odata->conn, group ? : OSCAR_GROUP, &name, 1, 0);
1963	}
1964
1965	static void oscar_remove_buddy(struct im_connection g, char name, char *group) {
1966	struct oscar_data odata = (struct oscar_data )g->proto_data;
1967	struct aim_ssi_item *ssigroup;
1968	while ((ssigroup = aim_ssi_itemlist_findparent(odata->sess->ssi.items, name)) && !aim_ssi_delbuddies(odata->sess, odata->conn, ssigroup->name, &name, 1));
1969	}
1970
1971	static int gaim_ssi_parserights(aim_session_t sess, aim_frame_t fr, ...) {
1972	return 1;
1973	}
1974
1975	static int gaim_ssi_parselist(aim_session_t sess, aim_frame_t fr, ...) {
1976	struct im_connection *ic = sess->aux_data;
1977	struct aim_ssi_item curitem, curgroup = NULL;
1978	int tmp;
1979	char *nrm;
1980
1981	/* Add from server list to local list */
1982	tmp = 0;
1983	for (curitem=sess->ssi.items; curitem; curitem=curitem->next) {
1984	nrm = curitem->name ? normalize(curitem->name) : NULL;
1985
1986	switch (curitem->type) {
1987	case 0x0000: /* Buddy */
1988	if ((curitem->name) && (!imcb_buddy_by_handle(ic, nrm))) {
1989	char *realname = NULL;
1990
1991	if (curitem->data && aim_gettlv(curitem->data, 0x0131, 1))
1992	realname = aim_gettlv_str(curitem->data, 0x0131, 1);
1993
1994	imcb_add_buddy(ic, nrm, curgroup ? (curgroup->gid == curitem->gid ? curgroup->name : NULL) : NULL);
1995
1996	if (realname) {
1997	imcb_buddy_nick_hint(ic, nrm, realname);
1998	imcb_rename_buddy(ic, nrm, realname);
1999	g_free(realname);
2000	}
2001	}
2002	break;
2003
2004	case 0x0001: /* Group */
2005	curgroup = curitem;
2006	break;
2007
2008	case 0x0002: /* Permit buddy */
2009	if (curitem->name) {
2010	GSList *list;
2011	for (list=ic->permit; (list && aim_sncmp(curitem->name, list->data)); list=list->next);
2012	if (!list) {
2013	char *name;
2014	name = g_strdup(nrm);
2015	ic->permit = g_slist_append(ic->permit, name);
2016	tmp++;
2017	}
2018	}
2019	break;
2020
2021	case 0x0003: /* Deny buddy */
2022	if (curitem->name) {
2023	GSList *list;
2024	for (list=ic->deny; (list && aim_sncmp(curitem->name, list->data)); list=list->next);
2025	if (!list) {
2026	char *name;
2027	name = g_strdup(nrm);
2028	ic->deny = g_slist_append(ic->deny, name);
2029	tmp++;
2030	}
2031	}
2032	break;
2033
2034	case 0x0004: /* Permit/deny setting */
2035	if (curitem->data) {
2036	guint8 permdeny;
2037	if ((permdeny = aim_ssi_getpermdeny(sess->ssi.items)) && (permdeny != ic->permdeny)) {
2038	ic->permdeny = permdeny;
2039	tmp++;
2040	}
2041	}
2042	break;
2043
2044	case 0x0005: /* Presence setting */
2045	/* We don't want to change Gaim's setting because it applies to all accounts */
2046	break;
2047	} /* End of switch on curitem->type */
2048	} /* End of for loop */
2049
2050	aim_ssi_enable(sess, fr->conn);
2051
2052	/* Request offline messages, now that the buddy list is complete. */
2053	aim_icq_reqofflinemsgs(sess);
2054
2055	/* Now that we have a buddy list, we can tell BitlBee that we're online. */
2056	imcb_connected(ic);
2057
2058	return 1;
2059	}
2060
2061	static int gaim_ssi_parseack( aim_session_t sess, aim_frame_t fr, ... )
2062	{
2063	aim_snac_t *origsnac;
2064	va_list ap;
2065
2066	va_start( ap, fr );
2067	origsnac = va_arg( ap, aim_snac_t * );
2068	va_end( ap );
2069
2070	if( origsnac && origsnac->family == AIM_CB_FAM_SSI && origsnac->type == AIM_CB_SSI_ADD && origsnac->data )
2071	{
2072	int i, st, count = aim_bstream_empty( &fr->data );
2073	char *list;
2074
2075	if( count & 1 )
2076	{
2077	/* Hmm, the length should be even... */
2078	imcb_error( sess->aux_data, "Received SSI ACK package with non-even length");
2079	return( 0 );
2080	}
2081	count >>= 1;
2082
2083	list = (char *) origsnac->data;
2084	for( i = 0; i < count; i ++ )
2085	{
2086	struct aim_ssi_item *ssigroup = aim_ssi_itemlist_findparent( sess->ssi.items, list );
2087	char *group = ssigroup ? ssigroup->name : NULL;
2088
2089	st = aimbs_get16( &fr->data );
2090	if( st == 0x00 )
2091	{
2092	imcb_add_buddy( sess->aux_data, normalize(list), group );
2093	}
2094	else if( st == 0x0E )
2095	{
2096	imcb_log( sess->aux_data, "Buddy %s can't be added without authorization, requesting authorization", list );
2097
2098	aim_ssi_auth_request( sess, fr->conn, list, "" );
2099	aim_ssi_addbuddies( sess, fr->conn, OSCAR_GROUP, &list, 1, 1 );
2100	}
2101	else
2102	{
2103	imcb_error( sess->aux_data, "Error while adding buddy: 0x%04x", st );
2104	}
2105	list += strlen( list ) + 1;
2106	}
2107	}
2108
2109	return( 1 );
2110	}
2111
2112	static void oscar_set_permit_deny(struct im_connection *ic) {
2113	struct oscar_data od = (struct oscar_data )ic->proto_data;
2114	if (od->icq) {
2115	GSList *list;
2116	char buf[MAXMSGLEN];
2117	int at;
2118
2119	switch(ic->permdeny) {
2120	case 1:
2121	aim_bos_changevisibility(od->sess, od->conn, AIM_VISIBILITYCHANGE_DENYADD, ic->acc->user);
2122	break;
2123	case 2:
2124	aim_bos_changevisibility(od->sess, od->conn, AIM_VISIBILITYCHANGE_PERMITADD, ic->acc->user);
2125	break;
2126	case 3:
2127	list = ic->permit;
2128	at = 0;
2129	while (list) {
2130	at += g_snprintf(buf + at, sizeof(buf) - at, "%s&", (char *)list->data);
2131	list = list->next;
2132	}
2133	aim_bos_changevisibility(od->sess, od->conn, AIM_VISIBILITYCHANGE_PERMITADD, buf);
2134	break;
2135	case 4:
2136	list = ic->deny;
2137	at = 0;
2138	while (list) {
2139	at += g_snprintf(buf + at, sizeof(buf) - at, "%s&", (char *)list->data);
2140	list = list->next;
2141	}
2142	aim_bos_changevisibility(od->sess, od->conn, AIM_VISIBILITYCHANGE_DENYADD, buf);
2143	break;
2144	default:
2145	break;
2146	}
2147	} else {
2148	if (od->sess->ssi.received_data)
2149	aim_ssi_setpermdeny(od->sess, od->conn, ic->permdeny, 0xffffffff);
2150	}
2151	}
2152
2153	static void oscar_add_permit(struct im_connection ic, char who) {
2154	struct oscar_data od = (struct oscar_data )ic->proto_data;
2155	if (od->icq) {
2156	aim_ssi_auth_reply(od->sess, od->conn, who, 1, "");
2157	} else {
2158	if (od->sess->ssi.received_data)
2159	aim_ssi_addpord(od->sess, od->conn, &who, 1, AIM_SSI_TYPE_PERMIT);
2160	}
2161	}
2162
2163	static void oscar_add_deny(struct im_connection ic, char who) {
2164	struct oscar_data od = (struct oscar_data )ic->proto_data;
2165	if (od->icq) {
2166	aim_ssi_auth_reply(od->sess, od->conn, who, 0, "");
2167	} else {
2168	if (od->sess->ssi.received_data)
2169	aim_ssi_addpord(od->sess, od->conn, &who, 1, AIM_SSI_TYPE_DENY);
2170	}
2171	}
2172
2173	static void oscar_rem_permit(struct im_connection ic, char who) {
2174	struct oscar_data od = (struct oscar_data )ic->proto_data;
2175	if (!od->icq) {
2176	if (od->sess->ssi.received_data)
2177	aim_ssi_delpord(od->sess, od->conn, &who, 1, AIM_SSI_TYPE_PERMIT);
2178	}
2179	}
2180
2181	static void oscar_rem_deny(struct im_connection ic, char who) {
2182	struct oscar_data od = (struct oscar_data )ic->proto_data;
2183	if (!od->icq) {
2184	if (od->sess->ssi.received_data)
2185	aim_ssi_delpord(od->sess, od->conn, &who, 1, AIM_SSI_TYPE_DENY);
2186	}
2187	}
2188
2189	static GList oscar_away_states(struct im_connection ic)
2190	{
2191	struct oscar_data *od = ic->proto_data;
2192
2193	if (od->icq) {
2194	static GList *m = NULL;
2195	m = g_list_append(m, "Away");
2196	m = g_list_append(m, "Do Not Disturb");
2197	m = g_list_append(m, "Not Available");
2198	m = g_list_append(m, "Occupied");
2199	m = g_list_append(m, "Free For Chat");
2200	m = g_list_append(m, "Invisible");
2201	return m;
2202	} else {
2203	static GList *m = NULL;
2204	m = g_list_append(m, "Away");
2205	return m;
2206	}
2207	}
2208
2209	static int gaim_icqinfo(aim_session_t sess, aim_frame_t fr, ...)
2210	{
2211	struct im_connection *ic = sess->aux_data;
2212	struct oscar_data *od = ic->proto_data;
2213	gchar who[16];
2214	GString *str;
2215	va_list ap;
2216	struct aim_icq_info *info;
2217	uint32_t ip;
2218
2219	va_start(ap, fr);
2220	info = va_arg(ap, struct aim_icq_info *);
2221	va_end(ap);
2222
2223	if (!info->uin)
2224	return 0;
2225
2226	str = g_string_sized_new(512);
2227	g_snprintf(who, sizeof(who), "%u", info->uin);
2228
2229	g_string_printf(str, "%s: %s - %s: %s", _("UIN"), who, _("Nick"),
2230	info->nick ? info->nick : "-");
2231	g_string_append_printf(str, "\n%s: %s", _("First Name"), info->first);
2232	g_string_append_printf(str, "\n%s: %s", _("Last Name"), info->last);
2233	g_string_append_printf(str, "\n%s: %s", _("Email Address"), info->email);
2234	if (info->numaddresses && info->email2) {
2235	int i;
2236	for (i = 0; i < info->numaddresses; i++) {
2237	g_string_append_printf(str, "\n%s: %s", _("Email Address"), info->email2[i]);
2238	}
2239	}
2240	if (od->ips && (ip = (long) g_hash_table_lookup(od->ips, &info->uin)) != 0) {
2241	g_string_append_printf(str, "\n%s: %d.%d.%d.%d", _("Last used IP address"),
2242	(ip >> 24), (ip >> 16) & 0xff, (ip >> 8) & 0xff, ip & 0xff);
2243	}
2244	g_string_append_printf(str, "\n%s: %s", _("Mobile Phone"), info->mobile);
2245	if (info->gender != 0)
2246	g_string_append_printf(str, "\n%s: %s", _("Gender"), info->gender==1 ? _("Female") : _("Male"));
2247	if (info->birthyear \|\| info->birthmonth \|\| info->birthday) {
2248	char date[30];
2249	struct tm tm;
2250	memset(&tm, 0, sizeof(struct tm));
2251	tm.tm_mday = (int)info->birthday;
2252	tm.tm_mon = (int)info->birthmonth-1;
2253	tm.tm_year = (int)info->birthyear%100;
2254	strftime(date, sizeof(date), "%Y-%m-%d", &tm);
2255	g_string_append_printf(str, "\n%s: %s", _("Birthday"), date);
2256	}
2257	if (info->age) {
2258	char age[5];
2259	g_snprintf(age, sizeof(age), "%hhd", info->age);
2260	g_string_append_printf(str, "\n%s: %s", _("Age"), age);
2261	}
2262	g_string_append_printf(str, "\n%s: %s", _("Personal Web Page"), info->personalwebpage);
2263	if (info->info && info->info[0]) {
2264	g_string_sprintfa(str, "\n%s:\n%s\n%s", _("Additional Information"),
2265	info->info, _("End of Additional Information"));
2266	}
2267	g_string_append_c(str, '\n');
2268	if ((info->homeaddr && (info->homeaddr[0])) \|\| (info->homecity && info->homecity[0]) \|\| (info->homestate && info->homestate[0]) \|\| (info->homezip && info->homezip[0])) {
2269	g_string_append_printf(str, "%s:", _("Home Address"));
2270	g_string_append_printf(str, "\n%s: %s", _("Address"), info->homeaddr);
2271	g_string_append_printf(str, "\n%s: %s", _("City"), info->homecity);
2272	g_string_append_printf(str, "\n%s: %s", _("State"), info->homestate);
2273	g_string_append_printf(str, "\n%s: %s", _("Zip Code"), info->homezip);
2274	g_string_append_c(str, '\n');
2275	}
2276	if ((info->workaddr && info->workaddr[0]) \|\| (info->workcity && info->workcity[0]) \|\| (info->workstate && info->workstate[0]) \|\| (info->workzip && info->workzip[0])) {
2277	g_string_append_printf(str, "%s:", _("Work Address"));
2278	g_string_append_printf(str, "\n%s: %s", _("Address"), info->workaddr);
2279	g_string_append_printf(str, "\n%s: %s", _("City"), info->workcity);
2280	g_string_append_printf(str, "\n%s: %s", _("State"), info->workstate);
2281	g_string_append_printf(str, "\n%s: %s", _("Zip Code"), info->workzip);
2282	g_string_append_c(str, '\n');
2283	}
2284	if ((info->workcompany && info->workcompany[0]) \|\| (info->workdivision && info->workdivision[0]) \|\| (info->workposition && info->workposition[0]) \|\| (info->workwebpage && info->workwebpage[0])) {
2285	g_string_append_printf(str, "%s:", _("Work Information"));
2286	g_string_append_printf(str, "\n%s: %s", _("Company"), info->workcompany);
2287	g_string_append_printf(str, "\n%s: %s", _("Division"), info->workdivision);
2288	g_string_append_printf(str, "\n%s: %s", _("Position"), info->workposition);
2289	if (info->workwebpage && info->workwebpage[0]) {
2290	g_string_append_printf(str, "\n%s: %s", _("Web Page"), info->workwebpage);
2291	}
2292	g_string_append_c(str, '\n');
2293	}
2294
2295	imcb_log(ic, "%s\n%s", _("User Info"), str->str);
2296	g_string_free(str, TRUE);
2297
2298	return 1;
2299
2300	}
2301
2302	static char oscar_encoding_extract(const char encoding)
2303	{
2304	char *ret = NULL;
2305	char begin, end;
2306
2307	g_return_val_if_fail(encoding != NULL, NULL);
2308
2309	/* Make sure encoding begins with charset= */
2310	if (strncmp(encoding, "text/plain; charset=", 20) &&
2311	strncmp(encoding, "text/aolrtf; charset=", 21) &&
2312	strncmp(encoding, "text/x-aolrtf; charset=", 23))
2313	{
2314	return NULL;
2315	}
2316
2317	begin = strchr(encoding, '"');
2318	end = strrchr(encoding, '"');
2319
2320	if ((begin == NULL) \|\| (end == NULL) \|\| (begin >= end))
2321	return NULL;
2322
2323	ret = g_strndup(begin+1, (end-1) - begin);
2324
2325	return ret;
2326	}
2327
2328	static char oscar_encoding_to_utf8(char encoding, char *text, int textlen)
2329	{
2330	char *utf8 = g_new0(char, 8192);
2331
2332	if ((encoding == NULL) \|\| encoding[0] == '\0') {
2333	/* gaim_debug_info("oscar", "Empty encoding, assuming UTF-8\n");*/
2334	} else if (!g_strcasecmp(encoding, "iso-8859-1")) {
2335	do_iconv("iso-8859-1", "UTF-8", text, utf8, textlen, 8192);
2336	} else if (!g_strcasecmp(encoding, "ISO-8859-1-Windows-3.1-Latin-1")) {
2337	do_iconv("Windows-1252", "UTF-8", text, utf8, textlen, 8192);
2338	} else if (!g_strcasecmp(encoding, "unicode-2-0")) {
2339	do_iconv("UCS-2BE", "UTF-8", text, utf8, textlen, 8192);
2340	} else if (g_strcasecmp(encoding, "us-ascii") && strcmp(encoding, "utf-8")) {
2341	/* gaim_debug_warning("oscar", "Unrecognized character encoding \"%s\", "
2342	"attempting to convert to UTF-8 anyway\n", encoding);*/
2343	do_iconv(encoding, "UTF-8", text, utf8, textlen, 8192);
2344	}
2345
2346	/*
2347	* If utf8 is still NULL then either the encoding is us-ascii/utf-8 or
2348	* we have been unable to convert the text to utf-8 from the encoding
2349	* that was specified. So we assume it's UTF-8 and hope for the best.
2350	*/
2351	if (*utf8 == 0) {
2352	strncpy(utf8, text, textlen);
2353	}
2354
2355	return utf8;
2356	}
2357
2358	static int gaim_parseaiminfo(aim_session_t sess, aim_frame_t fr, ...)
2359	{
2360	struct im_connection *ic = sess->aux_data;
2361	va_list ap;
2362	aim_userinfo_t *userinfo;
2363	guint16 infotype;
2364	char text_encoding = NULL, text = NULL, *extracted_encoding = NULL;
2365	guint16 text_length;
2366	char *utf8 = NULL;
2367
2368	va_start(ap, fr);
2369	userinfo = va_arg(ap, aim_userinfo_t *);
2370	infotype = va_arg(ap, int);
2371	text_encoding = va_arg(ap, char*);
2372	text = va_arg(ap, char*);
2373	text_length = va_arg(ap, int);
2374	va_end(ap);
2375
2376	if(text_encoding)
2377	extracted_encoding = oscar_encoding_extract(text_encoding);
2378	if(infotype == AIM_GETINFO_GENERALINFO) {
2379	/Display idle time/
2380	char buff[256];
2381	struct tm idletime;
2382	if(userinfo->idletime) {
2383	memset(&idletime, 0, sizeof(struct tm));
2384	idletime.tm_mday = (userinfo->idletime / 60) / 24;
2385	idletime.tm_hour = (userinfo->idletime / 60) % 24;
2386	idletime.tm_min = userinfo->idletime % 60;
2387	idletime.tm_sec = 0;
2388	strftime(buff, 256, _("%d days %H hours %M minutes"), &idletime);
2389	imcb_log(ic, "%s: %s", _("Idle Time"), buff);
2390	}
2391
2392	if(text) {
2393	utf8 = oscar_encoding_to_utf8(extracted_encoding, text, text_length);
2394	imcb_log(ic, "%s\n%s", _("User Info"), utf8);
2395	} else {
2396	imcb_log(ic, _("No user info available."));
2397	}
2398	} else if(infotype == AIM_GETINFO_AWAYMESSAGE && userinfo->flags & AIM_FLAG_AWAY) {
2399	utf8 = oscar_encoding_to_utf8(extracted_encoding, text, text_length);
2400	imcb_log(ic, "%s\n%s", _("Away Message"), utf8);
2401	}
2402
2403	g_free(utf8);
2404
2405	return 1;
2406	}
2407
2408	int gaim_parsemtn(aim_session_t sess, aim_frame_t fr, ...)
2409	{
2410	struct im_connection * ic = sess->aux_data;
2411	va_list ap;
2412	guint16 type1, type2;
2413	char * sn;
2414
2415	va_start(ap, fr);
2416	type1 = va_arg(ap, int);
2417	sn = va_arg(ap, char*);
2418	type2 = va_arg(ap, int);
2419	va_end(ap);
2420
2421	if(type2 == 0x0002) {
2422	/* User is typing */
2423	imcb_buddy_typing(ic, normalize(sn), OPT_TYPING);
2424	}
2425	else if (type2 == 0x0001) {
2426	/* User has typed something, but is not actively typing (stale) */
2427	imcb_buddy_typing(ic, normalize(sn), OPT_THINKING);
2428	}
2429	else {
2430	/* User has stopped typing */
2431	imcb_buddy_typing(ic, normalize(sn), 0);
2432	}
2433
2434	return 1;
2435	}
2436
2437	int oscar_send_typing(struct im_connection ic, char who, int typing)
2438	{
2439	struct oscar_data *od = ic->proto_data;
2440	return( aim_im_sendmtn(od->sess, 1, who, (typing & OPT_TYPING) ? 0x0002 : 0x0000) );
2441	}
2442
2443	void oscar_chat_msg(struct groupchat c, char message, int msgflags)
2444	{
2445	struct im_connection *ic = c->ic;
2446	struct oscar_data * od = (struct oscar_data*)ic->proto_data;
2447	struct chat_connection * ccon;
2448	int ret;
2449	guint8 len = strlen(message);
2450	guint16 flags;
2451	char *s;
2452
2453	if (!(ccon = c->data))
2454	return;
2455
2456	for (s = message; *s; s++)
2457	if (*s & 128)
2458	break;
2459
2460	flags = AIM_CHATFLAGS_NOREFLECT;
2461
2462	/* Message contains high ASCII chars, time for some translation! */
2463	if (*s) {
2464	s = g_malloc(BUF_LONG);
2465	/* Try if we can put it in an ISO8859-1 string first.
2466	If we can't, fall back to UTF16. */
2467	if ((ret = do_iconv("UTF-8", "ISO8859-1", message, s, len, BUF_LONG)) >= 0) {
2468	flags \|= AIM_CHATFLAGS_ISO_8859_1;
2469	len = ret;
2470	} else if ((ret = do_iconv("UTF-8", "UNICODEBIG", message, s, len, BUF_LONG)) >= 0) {
2471	flags \|= AIM_CHATFLAGS_UNICODE;
2472	len = ret;
2473	} else {
2474	/* OOF, translation failed... Oh well.. */
2475	g_free( s );
2476	s = message;
2477	}
2478	} else {
2479	s = message;
2480	}
2481
2482	ret = aim_chat_send_im(od->sess, ccon->conn, flags, s, len);
2483
2484	if (s != message) {
2485	g_free(s);
2486	}
2487
2488	/* return (ret >= 0); */
2489	}
2490
2491	void oscar_chat_invite(struct groupchat c, char who, char *message)
2492	{
2493	struct im_connection *ic = c->ic;
2494	struct oscar_data * od = (struct oscar_data *)ic->proto_data;
2495	struct chat_connection *ccon;
2496
2497	if (!(ccon = c->data))
2498	return;
2499
2500	aim_chat_invite(od->sess, od->conn, who, message ? message : "",
2501	ccon->exchange, ccon->name, 0x0);
2502	}
2503
2504	void oscar_chat_kill(struct im_connection ic, struct chat_connection cc)
2505	{
2506	struct oscar_data od = (struct oscar_data )ic->proto_data;
2507
2508	/* Notify the conversation window that we've left the chat */
2509	imcb_chat_free(cc->cnv);
2510
2511	/* Destroy the chat_connection */
2512	od->oscar_chats = g_slist_remove(od->oscar_chats, cc);
2513	if (cc->inpa > 0)
2514	b_event_remove(cc->inpa);
2515	aim_conn_kill(od->sess, &cc->conn);
2516	g_free(cc->name);
2517	g_free(cc->show);
2518	g_free(cc);
2519	}
2520
2521	void oscar_chat_leave(struct groupchat *c)
2522	{
2523	if (!c->data)
2524	return;
2525	oscar_chat_kill(c->ic, c->data);
2526	}
2527
2528	struct groupchat oscar_chat_join_internal(struct im_connection ic, const char *room,
2529	const char nick, const char password, int exchange_number)
2530	{
2531	struct oscar_data * od = (struct oscar_data *)ic->proto_data;
2532	struct groupchat *ret = imcb_chat_new(ic, room);
2533	aim_conn_t * cur;
2534
2535	if((cur = aim_getconn_type(od->sess, AIM_CONN_TYPE_CHATNAV))) {
2536	int st;
2537
2538	st = aim_chatnav_createroom(od->sess, cur, room, exchange_number);
2539
2540	return ret;
2541	} else {
2542	struct create_room * cr = g_new0(struct create_room, 1);
2543
2544	cr->exchange = exchange_number;
2545	cr->name = g_strdup(room);
2546	od->create_rooms = g_slist_append(od->create_rooms, cr);
2547	aim_reqservice(od->sess, od->conn, AIM_CONN_TYPE_CHATNAV);
2548
2549	return ret;
2550	}
2551	}
2552
2553	struct groupchat oscar_chat_join(struct im_connection ic, const char *room,
2554	const char nick, const char password, set_t **sets)
2555	{
2556	return oscar_chat_join_internal(ic, room, nick, password, set_getint(sets, "exchange_number"));
2557	}
2558
2559	struct groupchat oscar_chat_with(struct im_connection ic, char *who)
2560	{
2561	struct oscar_data * od = (struct oscar_data *)ic->proto_data;
2562	struct groupchat *ret;
2563	static int chat_id = 0;
2564	char * chatname, *s;
2565	struct groupchat *c;
2566
2567	chatname = g_strdup_printf("%s%s%d", isdigit(*ic->acc->user) ? "icq" : "",
2568	ic->acc->user, chat_id++);
2569
2570	for (s = chatname; *s; s ++)
2571	if (!isalnum(*s))
2572	*s = '0';
2573
2574	c = imcb_chat_new(ic, chatname);
2575	ret = oscar_chat_join_internal(ic, chatname, NULL, NULL, 4);
2576	aim_chat_invite(od->sess, od->conn, who, "", 4, chatname, 0x0);
2577
2578	g_free(chatname);
2579
2580	return NULL;
2581	}
2582
2583	void oscar_accept_chat(void *data)
2584	{
2585	struct aim_chat_invitation * inv = data;
2586
2587	oscar_chat_join_internal(inv->ic, inv->name, NULL, NULL, 4);
2588	g_free(inv->name);
2589	g_free(inv);
2590	}
2591
2592	void oscar_reject_chat(void *data)
2593	{
2594	struct aim_chat_invitation * inv = data;
2595
2596	g_free(inv->name);
2597	g_free(inv);
2598	}
2599
2600	void oscar_chat_add_settings(account_t acc, set_t *head)
2601	{
2602	set_add(head, "exchange_number", "4", set_eval_int, NULL);
2603	}
2604
2605	void oscar_chat_free_settings(account_t acc, set_t *head)
2606	{
2607	set_del(head, "exchange_number");
2608	}
2609
2610	void oscar_initmodule()
2611	{
2612	struct prpl *ret = g_new0(struct prpl, 1);
2613	ret->name = "oscar";
2614	ret->away_states = oscar_away_states;
2615	ret->init = oscar_init;
2616	ret->login = oscar_login;
2617	ret->keepalive = oscar_keepalive;
2618	ret->logout = oscar_logout;
2619	ret->buddy_msg = oscar_buddy_msg;
2620	ret->get_info = oscar_get_info;
2621	ret->set_away = oscar_set_away;
2622	ret->get_away = oscar_get_away;
2623	ret->add_buddy = oscar_add_buddy;
2624	ret->remove_buddy = oscar_remove_buddy;
2625	ret->chat_msg = oscar_chat_msg;
2626	ret->chat_invite = oscar_chat_invite;
2627	ret->chat_leave = oscar_chat_leave;
2628	ret->chat_with = oscar_chat_with;
2629	ret->chat_join = oscar_chat_join;
2630	ret->chat_add_settings = oscar_chat_add_settings;
2631	ret->chat_free_settings = oscar_chat_free_settings;
2632	ret->add_permit = oscar_add_permit;
2633	ret->add_deny = oscar_add_deny;
2634	ret->rem_permit = oscar_rem_permit;
2635	ret->rem_deny = oscar_rem_deny;
2636	ret->set_permit_deny = oscar_set_permit_deny;
2637	ret->send_typing = oscar_send_typing;
2638
2639	ret->handle_cmp = aim_sncmp;
2640
2641	register_protocol(ret);
2642	}

Note: See TracBrowser for help on using the repository browser.

Download in other formats: