Context Navigation

source: protocols/nogaim.c @ 79b6213

Last change on this file since 79b6213 was da3b536, checked in by Wilmer van der Gaast <wilmer@…>, at 2006-05-23T08:09:16Z
Added bim_ functions for block/allow list management to keep gc->permit/deny up-to-date at run-time.
Property mode set to `100644`
File size: 25.6 KB

Line
1	/********************************************************************\
2	* BitlBee -- An IRC to other IM-networks gateway *
3	* *
4	* Copyright 2002-2004 Wilmer van der Gaast and others *
5	\********************************************************************/
6
7	/*
8	* nogaim
9	*
10	* Gaim without gaim - for BitlBee
11	*
12	* This file contains functions called by the Gaim IM-modules. It's written
13	* from scratch for BitlBee and doesn't contain any code from Gaim anymore
14	* (except for the function names).
15	*
16	* Copyright 2002-2006 Wilmer van der Gaast <wilmer@gaast.net> and others
17	*/
18
19	/*
20	This program is free software; you can redistribute it and/or modify
21	it under the terms of the GNU General Public License as published by
22	the Free Software Foundation; either version 2 of the License, or
23	(at your option) any later version.
24
25	This program is distributed in the hope that it will be useful,
26	but WITHOUT ANY WARRANTY; without even the implied warranty of
27	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
28	GNU General Public License for more details.
29
30	You should have received a copy of the GNU General Public License with
31	the Debian GNU/Linux distribution in /usr/share/common-licenses/GPL;
32	if not, write to the Free Software Foundation, Inc., 59 Temple Place,
33	Suite 330, Boston, MA 02111-1307 USA
34	*/
35
36	#define BITLBEE_CORE
37	#include "nogaim.h"
38	#include <ctype.h>
39
40	static int remove_chat_buddy_silent( struct conversation b, char handle );
41
42	GSList *connections;
43
44	#ifdef WITH_PLUGINS
45	gboolean load_plugin(char *path)
46	{
47	void (*init_function) (void);
48
49	GModule *mod = g_module_open(path, G_MODULE_BIND_LAZY);
50
51	if(!mod) {
52	log_message(LOGLVL_ERROR, "Can't find `%s', not loading", path);
53	return FALSE;
54	}
55
56	if(!g_module_symbol(mod,"init_plugin",(gpointer *) &init_function)) {
57	log_message(LOGLVL_WARNING, "Can't find function `init_plugin' in `%s'\n", path);
58	return FALSE;
59	}
60
61	init_function();
62
63	return TRUE;
64	}
65
66	void load_plugins(void)
67	{
68	GDir *dir;
69	GError *error = NULL;
70
71	dir = g_dir_open(global.conf->plugindir, 0, &error);
72
73	if (dir) {
74	const gchar *entry;
75	char *path;
76
77	while ((entry = g_dir_read_name(dir))) {
78	path = g_build_filename(global.conf->plugindir, entry, NULL);
79	if(!path) {
80	log_message(LOGLVL_WARNING, "Can't build path for %s\n", entry);
81	continue;
82	}
83
84	load_plugin(path);
85
86	g_free(path);
87	}
88
89	g_dir_close(dir);
90	}
91	}
92	#endif
93
94	/* nogaim.c */
95
96	GList *protocols = NULL;
97
98	void register_protocol (struct prpl *p)
99	{
100	protocols = g_list_append(protocols, p);
101	}
102
103
104	struct prpl find_protocol(const char name)
105	{
106	GList *gl;
107	for (gl = protocols; gl; gl = gl->next)
108	{
109	struct prpl *proto = gl->data;
110	if(!g_strcasecmp(proto->name, name))
111	return proto;
112	}
113	return NULL;
114	}
115
116	/* nogaim.c */
117	void nogaim_init()
118	{
119	extern void msn_init();
120	extern void oscar_init();
121	extern void byahoo_init();
122	extern void jabber_init();
123
124	#ifdef WITH_MSN
125	msn_init();
126	#endif
127
128	#ifdef WITH_OSCAR
129	oscar_init();
130	#endif
131
132	#ifdef WITH_YAHOO
133	byahoo_init();
134	#endif
135
136	#ifdef WITH_JABBER
137	jabber_init();
138	#endif
139
140	#ifdef WITH_PLUGINS
141	load_plugins();
142	#endif
143	}
144
145	GSList *get_connections() { return connections; }
146
147	/* multi.c */
148
149	struct gaim_connection new_gaim_conn( struct aim_user user )
150	{
151	struct gaim_connection *gc;
152	account_t *a;
153
154	gc = g_new0( struct gaim_connection, 1 );
155
156	gc->prpl = user->prpl;
157	g_snprintf( gc->username, sizeof( gc->username ), "%s", user->username );
158	g_snprintf( gc->password, sizeof( gc->password ), "%s", user->password );
159	/* [MD] BUGFIX: don't set gc->irc to the global IRC, but use the one from the struct aim_user.
160	* This fixes daemon mode breakage where IRC doesn't point to the currently active connection.
161	*/
162	gc->irc=user->irc;
163
164	connections = g_slist_append( connections, gc );
165
166	user->gc = gc;
167	gc->user = user;
168
169	// Find the account_t so we can set its gc pointer
170	for( a = gc->irc->accounts; a; a = a->next )
171	if( ( struct aim_user * ) a->gc == user )
172	{
173	a->gc = gc;
174	break;
175	}
176
177	return( gc );
178	}
179
180	void destroy_gaim_conn( struct gaim_connection *gc )
181	{
182	account_t *a;
183
184	/* Destroy the pointer to this connection from the account list */
185	for( a = gc->irc->accounts; a; a = a->next )
186	if( a->gc == gc )
187	{
188	a->gc = NULL;
189	break;
190	}
191
192	connections = g_slist_remove( connections, gc );
193	g_free( gc->user );
194	g_free( gc );
195	}
196
197	void set_login_progress( struct gaim_connection gc, int step, char msg )
198	{
199	serv_got_crap( gc, "Logging in: %s", msg );
200	}
201
202	/* Errors while logging in */
203	void hide_login_progress( struct gaim_connection gc, char msg )
204	{
205	serv_got_crap( gc, "Login error: %s", msg );
206	}
207
208	/* Errors after logging in */
209	void hide_login_progress_error( struct gaim_connection gc, char msg )
210	{
211	serv_got_crap( gc, "Logged out: %s", msg );
212	}
213
214	void serv_got_crap( struct gaim_connection gc, char format, ... )
215	{
216	va_list params;
217	char *text;
218	account_t *a;
219
220	va_start( params, format );
221	text = g_strdup_vprintf( format, params );
222	va_end( params );
223
224	if( ( g_strcasecmp( set_getstr( gc->irc, "strip_html" ), "always" ) == 0 ) \|\|
225	( ( gc->flags & OPT_CONN_HTML ) && set_getint( gc->irc, "strip_html" ) ) )
226	strip_html( text );
227
228	/* Try to find a different connection on the same protocol. */
229	for( a = gc->irc->accounts; a; a = a->next )
230	if( a->prpl == gc->prpl && a->gc != gc )
231	break;
232
233	/* If we found one, include the screenname in the message. */
234	if( a )
235	irc_usermsg( gc->irc, "%s(%s) - %s", gc->prpl->name, gc->username, text );
236	else
237	irc_usermsg( gc->irc, "%s - %s", gc->prpl->name, text );
238
239	g_free( text );
240	}
241
242	static gboolean send_keepalive( gpointer d )
243	{
244	struct gaim_connection *gc = d;
245
246	if( gc->prpl && gc->prpl->keepalive )
247	gc->prpl->keepalive( gc );
248
249	return TRUE;
250	}
251
252	void account_online( struct gaim_connection *gc )
253	{
254	user_t *u;
255
256	/* MSN servers sometimes redirect you to a different server and do
257	the whole login sequence again, so these "late" calls to this
258	function should be handled correctly. (IOW, ignored) */
259	if( gc->flags & OPT_LOGGED_IN )
260	return;
261
262	u = user_find( gc->irc, gc->irc->nick );
263
264	serv_got_crap( gc, "Logged in" );
265
266	gc->keepalive = g_timeout_add( 60000, send_keepalive, gc );
267	gc->flags \|= OPT_LOGGED_IN;
268
269	/* Also necessary when we're not away, at least for some of the
270	protocols. */
271	bim_set_away( gc, u->away );
272	}
273
274	gboolean auto_reconnect( gpointer data )
275	{
276	account_t *a = data;
277
278	a->reconnect = 0;
279	account_on( a->irc, a );
280
281	return( FALSE ); /* Only have to run the timeout once */
282	}
283
284	void cancel_auto_reconnect( account_t *a )
285	{
286	while( g_source_remove_by_user_data( (gpointer) a ) );
287	a->reconnect = 0;
288	}
289
290	void signoff( struct gaim_connection *gc )
291	{
292	irc_t *irc = gc->irc;
293	user_t t, u = irc->users;
294	account_t *a;
295
296	serv_got_crap( gc, "Signing off.." );
297
298	gaim_input_remove( gc->keepalive );
299	gc->keepalive = 0;
300	gc->prpl->close( gc );
301	gaim_input_remove( gc->inpa );
302
303	while( u )
304	{
305	if( u->gc == gc )
306	{
307	t = u->next;
308	user_del( irc, u->nick );
309	u = t;
310	}
311	else
312	u = u->next;
313	}
314
315	query_del_by_gc( gc->irc, gc );
316
317	for( a = irc->accounts; a; a = a->next )
318	if( a->gc == gc )
319	break;
320
321	if( !a )
322	{
323	/* Uhm... This is very sick. */
324	}
325	else if( !gc->wants_to_die && set_getint( irc, "auto_reconnect" ) )
326	{
327	int delay = set_getint( irc, "auto_reconnect_delay" );
328	serv_got_crap( gc, "Reconnecting in %d seconds..", delay );
329
330	a->reconnect = 1;
331	g_timeout_add( delay * 1000, auto_reconnect, a );
332	}
333
334	destroy_gaim_conn( gc );
335	}
336
337
338	/* dialogs.c */
339
340	void do_error_dialog( struct gaim_connection gc, char msg, char *title )
341	{
342	if( msg && title )
343	serv_got_crap( gc, "Error: %s: %s", title, msg );
344	else if( msg )
345	serv_got_crap( gc, "Error: %s", msg );
346	else if( title )
347	serv_got_crap( gc, "Error: %s", title );
348	else
349	serv_got_crap( gc, "Error" );
350	}
351
352	void do_ask_dialog( struct gaim_connection gc, char msg, void data, void doit, void *dont )
353	{
354	query_add( gc->irc, gc, msg, doit, dont, data );
355	}
356
357
358	/* list.c */
359
360	void add_buddy( struct gaim_connection gc, char group, char handle, char realname )
361	{
362	user_t *u;
363	char nick[MAX_NICK_LENGTH+1];
364	char *s;
365	irc_t *irc = gc->irc;
366
367	if( set_getint( irc, "debug" ) && 0 ) /* This message is too useless */
368	serv_got_crap( gc, "Receiving user add from handle: %s", handle );
369
370	if( user_findhandle( gc, handle ) )
371	{
372	if( set_getint( irc, "debug" ) )
373	serv_got_crap( gc, "User already exists, ignoring add request: %s", handle );
374
375	return;
376
377	/* Buddy seems to exist already. Let's ignore this request then... */
378	}
379
380	memset( nick, 0, MAX_NICK_LENGTH + 1 );
381	strcpy( nick, nick_get( gc->irc, handle, gc->prpl, realname ) );
382
383	u = user_add( gc->irc, nick );
384
385	if( !realname \|\| !*realname ) realname = nick;
386	u->realname = g_strdup( realname );
387
388	if( ( s = strchr( handle, '@' ) ) )
389	{
390	u->host = g_strdup( s + 1 );
391	u->user = g_strndup( handle, s - handle );
392	}
393	else if( gc->user->proto_opt[0] && *gc->user->proto_opt[0] )
394	{
395	char *colon;
396
397	if( ( colon = strchr( gc->user->proto_opt[0], ':' ) ) )
398	u->host = g_strndup( gc->user->proto_opt[0],
399	colon - gc->user->proto_opt[0] );
400	else
401	u->host = g_strdup( gc->user->proto_opt[0] );
402
403	u->user = g_strdup( handle );
404
405	/* s/ /_/ ... important for AOL screennames */
406	for( s = u->user; *s; s ++ )
407	if( *s == ' ' )
408	*s = '_';
409	}
410	else
411	{
412	u->host = g_strdup( gc->user->prpl->name );
413	u->user = g_strdup( handle );
414	}
415
416	u->gc = gc;
417	u->handle = g_strdup( handle );
418	if( group ) u->group = g_strdup( group );
419	u->send_handler = buddy_send_handler;
420	u->last_typing_notice = 0;
421	}
422
423	struct buddy find_buddy( struct gaim_connection gc, char *handle )
424	{
425	static struct buddy b[1];
426	user_t *u;
427
428	u = user_findhandle( gc, handle );
429
430	if( !u )
431	return( NULL );
432
433	memset( b, 0, sizeof( b ) );
434	strncpy( b->name, handle, 80 );
435	strncpy( b->show, u->realname, BUDDY_ALIAS_MAXLEN );
436	b->present = u->online;
437	b->gc = u->gc;
438
439	return( b );
440	}
441
442	void signoff_blocked( struct gaim_connection *gc )
443	{
444	return; /* Make all blocked users look invisible (TODO?) */
445	}
446
447
448	void serv_buddy_rename( struct gaim_connection gc, char handle, char *realname )
449	{
450	user_t *u = user_findhandle( gc, handle );
451
452	if( !u ) return;
453
454	if( g_strcasecmp( u->realname, realname ) != 0 )
455	{
456	if( u->realname != u->nick ) g_free( u->realname );
457
458	u->realname = g_strdup( realname );
459
460	if( ( gc->flags & OPT_LOGGED_IN ) && set_getint( gc->irc, "display_namechanges" ) )
461	serv_got_crap( gc, "User `%s' changed name to `%s'", u->nick, u->realname );
462	}
463	}
464
465
466	/* prpl.c */
467
468	struct show_got_added_data
469	{
470	struct gaim_connection *gc;
471	char *handle;
472	};
473
474	void show_got_added_no( gpointer w, struct show_got_added_data *data )
475	{
476	g_free( data->handle );
477	g_free( data );
478	}
479
480	void show_got_added_yes( gpointer w, struct show_got_added_data *data )
481	{
482	data->gc->prpl->add_buddy( data->gc, data->handle );
483	add_buddy( data->gc, NULL, data->handle, data->handle );
484
485	return show_got_added_no( w, data );
486	}
487
488	void show_got_added( struct gaim_connection gc, char handle, const char *realname )
489	{
490	struct show_got_added_data *data = g_new0( struct show_got_added_data, 1 );
491	char *s;
492
493	/* TODO: Make a setting for this! */
494	if( user_findhandle( gc, handle ) != NULL )
495	return;
496
497	s = g_strdup_printf( "The user %s is not in your buddy list yet. Do you want to add him/her now?", handle );
498
499	data->gc = gc;
500	data->handle = g_strdup( handle );
501	query_add( gc->irc, gc, s, show_got_added_yes, show_got_added_no, data );
502	}
503
504
505	/* server.c */
506
507	void serv_got_update( struct gaim_connection gc, char handle, int loggedin, int evil, time_t signon, time_t idle, int type, guint caps )
508	{
509	user_t *u;
510	int oa, oo;
511
512	u = user_findhandle( gc, handle );
513
514	if( !u )
515	{
516	if( g_strcasecmp( set_getstr( gc->irc, "handle_unknown" ), "add" ) == 0 )
517	{
518	add_buddy( gc, NULL, handle, NULL );
519	u = user_findhandle( gc, handle );
520	}
521	else
522	{
523	if( set_getint( gc->irc, "debug" ) \|\| g_strcasecmp( set_getstr( gc->irc, "handle_unknown" ), "ignore" ) != 0 )
524	{
525	serv_got_crap( gc, "serv_got_update() for handle %s:", handle );
526	serv_got_crap( gc, "loggedin = %d, type = %d", loggedin, type );
527	}
528
529	return;
530	}
531	/* Why did we have this here....
532	return; */
533	}
534
535	oa = u->away != NULL;
536	oo = u->online;
537
538	if( u->away )
539	{
540	g_free( u->away );
541	u->away = NULL;
542	}
543
544	if( loggedin && !u->online )
545	{
546	irc_spawn( gc->irc, u );
547	u->online = 1;
548	}
549	else if( !loggedin && u->online )
550	{
551	struct conversation *c;
552
553	irc_kill( gc->irc, u );
554	u->online = 0;
555
556	/* Remove him/her from the conversations to prevent PART messages after he/she QUIT already */
557	for( c = gc->conversations; c; c = c->next )
558	remove_chat_buddy_silent( c, handle );
559	}
560
561	if( ( type & UC_UNAVAILABLE ) && ( !strcmp(gc->prpl->name, "oscar") \|\| !strcmp(gc->prpl->name, "icq")) )
562	{
563	u->away = g_strdup( "Away" );
564	}
565	else if( ( type & UC_UNAVAILABLE ) && ( !strcmp(gc->prpl->name, "jabber") ) )
566	{
567	if( type & UC_DND )
568	u->away = g_strdup( "Do Not Disturb" );
569	else if( type & UC_XA )
570	u->away = g_strdup( "Extended Away" );
571	else // if( type & UC_AWAY )
572	u->away = g_strdup( "Away" );
573	}
574	else if( ( type & UC_UNAVAILABLE ) && gc->prpl->get_status_string )
575	{
576	u->away = g_strdup( gc->prpl->get_status_string( gc, type ) );
577	}
578	else
579	u->away = NULL;
580
581	/* LISPy... */
582	if( ( set_getint( gc->irc, "away_devoice" ) ) && /* Don't do a thing when user doesn't want it */
583	( u->online ) && /* Don't touch offline people */
584	( ( ( u->online != oo ) && !u->away ) \|\| /* Voice joining people */
585	( ( u->online == oo ) && ( oa == !u->away ) ) ) ) /* (De)voice people changing state */
586	{
587	irc_write( gc->irc, ":%s!%s@%s MODE %s %cv %s", gc->irc->mynick, gc->irc->mynick, gc->irc->myhost,
588	gc->irc->channel, u->away?'-':'+', u->nick );
589	}
590	}
591
592	void serv_got_im( struct gaim_connection gc, char handle, char *msg, guint32 flags, time_t mtime, gint len )
593	{
594	irc_t *irc = gc->irc;
595	user_t *u;
596
597	u = user_findhandle( gc, handle );
598
599	if( !u )
600	{
601	char *h = set_getstr( irc, "handle_unknown" );
602
603	if( g_strcasecmp( h, "ignore" ) == 0 )
604	{
605	if( set_getint( irc, "debug" ) )
606	serv_got_crap( gc, "Ignoring message from unknown handle %s", handle );
607
608	return;
609	}
610	else if( g_strncasecmp( h, "add", 3 ) == 0 )
611	{
612	int private = set_getint( irc, "private" );
613
614	if( h[3] )
615	{
616	if( g_strcasecmp( h + 3, "_private" ) == 0 )
617	private = 1;
618	else if( g_strcasecmp( h + 3, "_channel" ) == 0 )
619	private = 0;
620	}
621
622	add_buddy( gc, NULL, handle, NULL );
623	u = user_findhandle( gc, handle );
624	u->is_private = private;
625	}
626	else
627	{
628	serv_got_crap( gc, "Message from unknown handle %s:", handle );
629	u = user_find( irc, irc->mynick );
630	}
631	}
632
633	if( ( g_strcasecmp( set_getstr( gc->irc, "strip_html" ), "always" ) == 0 ) \|\|
634	( ( gc->flags & OPT_CONN_HTML ) && set_getint( gc->irc, "strip_html" ) ) )
635	strip_html( msg );
636
637	while( strlen( msg ) > 425 )
638	{
639	char tmp, *nl;
640
641	tmp = msg[425];
642	msg[425] = 0;
643
644	/* If there's a newline/space in this string, split up there,
645	looks a bit prettier. */
646	if( ( nl = strrchr( msg, '\n' ) ) \|\| ( nl = strrchr( msg, ' ' ) ) )
647	{
648	msg[425] = tmp;
649	tmp = *nl;
650	*nl = 0;
651	}
652
653	irc_msgfrom( irc, u->nick, msg );
654
655	/* Move on. */
656	if( nl )
657	{
658	*nl = tmp;
659	msg = nl + 1;
660	}
661	else
662	{
663	msg[425] = tmp;
664	msg += 425;
665	}
666	}
667	irc_msgfrom( irc, u->nick, msg );
668	}
669
670	void serv_got_typing( struct gaim_connection gc, char handle, int timeout, int type )
671	{
672	user_t *u;
673
674	if( !set_getint( gc->irc, "typing_notice" ) )
675	return;
676
677	if( ( u = user_findhandle( gc, handle ) ) ) {
678	/* If type is:
679	* 0: user has stopped typing
680	* 1: user is actively typing
681	* 2: user has entered text, but is not actively typing
682	*/
683	if (type == 0 \|\| type == 1 \|\| type == 2) {
684	char buf[256];
685	g_snprintf(buf, 256, "\1TYPING %d\1", type);
686	irc_privmsg( gc->irc, u, "PRIVMSG", gc->irc->nick, NULL, buf );
687	}
688	}
689	}
690
691	void serv_got_chat_left( struct gaim_connection *gc, int id )
692	{
693	struct conversation c, l = NULL;
694	GList *ir;
695
696	if( set_getint( gc->irc, "debug" ) )
697	serv_got_crap( gc, "You were removed from conversation %d", (int) id );
698
699	for( c = gc->conversations; c && c->id != id; c = (l=c)->next );
700
701	if( c )
702	{
703	if( c->joined )
704	{
705	user_t u, r;
706
707	r = user_find( gc->irc, gc->irc->mynick );
708	irc_privmsg( gc->irc, r, "PRIVMSG", c->channel, "", "Cleaning up channel, bye!" );
709
710	u = user_find( gc->irc, gc->irc->nick );
711	irc_kick( gc->irc, u, c->channel, r );
712	/* irc_part( gc->irc, u, c->channel ); */
713	}
714
715	if( l )
716	l->next = c->next;
717	else
718	gc->conversations = c->next;
719
720	for( ir = c->in_room; ir; ir = ir->next )
721	g_free( ir->data );
722	g_list_free( c->in_room );
723	g_free( c->channel );
724	g_free( c->title );
725	g_free( c );
726	}
727	}
728
729	void serv_got_chat_in( struct gaim_connection gc, int id, char who, int whisper, char *msg, time_t mtime )
730	{
731	struct conversation *c;
732	user_t *u;
733
734	/* Gaim sends own messages through this too. IRC doesn't want this, so kill them */
735	if( g_strcasecmp( who, gc->user->username ) == 0 )
736	return;
737
738	u = user_findhandle( gc, who );
739	for( c = gc->conversations; c && c->id != id; c = c->next );
740
741	if( ( g_strcasecmp( set_getstr( gc->irc, "strip_html" ), "always" ) == 0 ) \|\|
742	( ( gc->flags & OPT_CONN_HTML ) && set_getint( gc->irc, "strip_html" ) ) )
743	strip_html( msg );
744
745	if( c && u )
746	irc_privmsg( gc->irc, u, "PRIVMSG", c->channel, "", msg );
747	else
748	serv_got_crap( gc, "Message from/to conversation %s@%d (unknown conv/user): %s", who, id, msg );
749	}
750
751	struct conversation serv_got_joined_chat( struct gaim_connection gc, int id, char *handle )
752	{
753	struct conversation *c;
754	char *s;
755
756	/* This one just creates the conversation structure, user won't see anything yet */
757
758	if( gc->conversations )
759	{
760	for( c = gc->conversations; c->next; c = c->next );
761	c = c->next = g_new0( struct conversation, 1 );
762	}
763	else
764	gc->conversations = c = g_new0( struct conversation, 1);
765
766	c->id = id;
767	c->gc = gc;
768	c->title = g_strdup( handle );
769
770	s = g_new( char, 16 );
771	sprintf( s, "&chat_%03d", gc->irc->c_id++ );
772	c->channel = g_strdup( s );
773	g_free( s );
774
775	if( set_getint( gc->irc, "debug" ) )
776	serv_got_crap( gc, "Creating new conversation: (id=%d,handle=%s)", id, handle );
777
778	return( c );
779	}
780
781
782	/* buddy_chat.c */
783
784	void add_chat_buddy( struct conversation b, char handle )
785	{
786	user_t *u = user_findhandle( b->gc, handle );
787	int me = 0;
788
789	if( set_getint( b->gc->irc, "debug" ) )
790	serv_got_crap( b->gc, "User %s added to conversation %d", handle, b->id );
791
792	/* It might be yourself! */
793	if( b->gc->prpl->cmp_buddynames( handle, b->gc->user->username ) == 0 )
794	{
795	u = user_find( b->gc->irc, b->gc->irc->nick );
796	if( !b->joined )
797	irc_join( b->gc->irc, u, b->channel );
798	b->joined = me = 1;
799	}
800
801	/* Most protocols allow people to join, even when they're not in
802	your contact list. Try to handle that here */
803	if( !u )
804	{
805	add_buddy( b->gc, NULL, handle, NULL );
806	u = user_findhandle( b->gc, handle );
807	}
808
809	/* Add the handle to the room userlist, if it's not 'me' */
810	if( !me )
811	{
812	if( b->joined )
813	irc_join( b->gc->irc, u, b->channel );
814	b->in_room = g_list_append( b->in_room, g_strdup( handle ) );
815	}
816	}
817
818	void remove_chat_buddy( struct conversation b, char handle, char *reason )
819	{
820	user_t *u;
821	int me = 0;
822
823	if( set_getint( b->gc->irc, "debug" ) )
824	serv_got_crap( b->gc, "User %s removed from conversation %d (%s)", handle, b->id, reason ? reason : "" );
825
826	/* It might be yourself! */
827	if( g_strcasecmp( handle, b->gc->user->username ) == 0 )
828	{
829	u = user_find( b->gc->irc, b->gc->irc->nick );
830	b->joined = 0;
831	me = 1;
832	}
833	else
834	{
835	u = user_findhandle( b->gc, handle );
836	}
837
838	if( remove_chat_buddy_silent( b, handle ) )
839	if( ( b->joined \|\| me ) && u )
840	irc_part( b->gc->irc, u, b->channel );
841	}
842
843	static int remove_chat_buddy_silent( struct conversation b, char handle )
844	{
845	GList *i;
846
847	/* Find the handle in the room userlist and shoot it */
848	i = b->in_room;
849	while( i )
850	{
851	if( g_strcasecmp( handle, i->data ) == 0 )
852	{
853	g_free( i->data );
854	b->in_room = g_list_remove( b->in_room, i->data );
855	return( 1 );
856	}
857
858	i = i->next;
859	}
860
861	return( 0 );
862	}
863
864
865	/* Misc. BitlBee stuff which shouldn't really be here */
866
867	struct conversation conv_findchannel( char channel )
868	{
869	struct gaim_connection *gc;
870	struct conversation *c;
871	GSList *l;
872
873	/* This finds the connection which has a conversation which belongs to this channel */
874	for( l = connections; l; l = l->next )
875	{
876	gc = l->data;
877	for( c = gc->conversations; c && g_strcasecmp( c->channel, channel ) != 0; c = c->next );
878	if( c )
879	return( c );
880	}
881
882	return( NULL );
883	}
884
885	char set_eval_away_devoice( irc_t irc, set_t set, char value )
886	{
887	int st;
888
889	if( ( g_strcasecmp( value, "true" ) == 0 ) \|\| ( g_strcasecmp( value, "yes" ) == 0 ) \|\| ( g_strcasecmp( value, "on" ) == 0 ) )
890	st = 1;
891	else if( ( g_strcasecmp( value, "false" ) == 0 ) \|\| ( g_strcasecmp( value, "no" ) == 0 ) \|\| ( g_strcasecmp( value, "off" ) == 0 ) )
892	st = 0;
893	else if( sscanf( value, "%d", &st ) != 1 )
894	return( NULL );
895
896	st = st != 0;
897
898	/* Horror.... */
899
900	if( st != set_getint( irc, "away_devoice" ) )
901	{
902	char list[80] = "";
903	user_t *u = irc->users;
904	int i = 0, count = 0;
905	char pm;
906	char v[80];
907
908	if( st )
909	pm = '+';
910	else
911	pm = '-';
912
913	while( u )
914	{
915	if( u->gc && u->online && !u->away )
916	{
917	if( ( strlen( list ) + strlen( u->nick ) ) >= 79 )
918	{
919	for( i = 0; i < count; v[i++] = 'v' ); v[i] = 0;
920	irc_write( irc, ":%s!%s@%s MODE %s %c%s%s",
921	irc->mynick, irc->mynick, irc->myhost,
922	irc->channel, pm, v, list );
923
924	*list = 0;
925	count = 0;
926	}
927
928	sprintf( list + strlen( list ), " %s", u->nick );
929	count ++;
930	}
931	u = u->next;
932	}
933
934	/* $v = 'v' x $i */
935	for( i = 0; i < count; v[i++] = 'v' ); v[i] = 0;
936	irc_write( irc, ":%s!%s@%s MODE %s %c%s%s", irc->mynick, irc->mynick, irc->myhost,
937	irc->channel, pm, v, list );
938	}
939
940	return( set_eval_bool( irc, set, value ) );
941	}
942
943
944
945
946	/* The plan is to not allow straight calls to prpl functions anymore, but do
947	them all from some wrappers. We'll start to define some down here: */
948
949	int bim_buddy_msg( struct gaim_connection gc, char handle, char *msg, int flags )
950	{
951	char *buf = NULL;
952	int st;
953
954	if( ( gc->flags & OPT_CONN_HTML ) && ( g_strncasecmp( msg, "<html>", 6 ) != 0 ) )
955	{
956	buf = escape_html( msg );
957	msg = buf;
958	}
959
960	st = gc->prpl->send_im( gc, handle, msg, strlen( msg ), flags );
961	g_free( buf );
962
963	return st;
964	}
965
966	int bim_chat_msg( struct gaim_connection gc, int id, char msg )
967	{
968	char *buf = NULL;
969	int st;
970
971	if( ( gc->flags & OPT_CONN_HTML ) && ( g_strncasecmp( msg, "<html>", 6 ) != 0 ) )
972	{
973	buf = escape_html( msg );
974	msg = buf;
975	}
976
977	st = gc->prpl->chat_send( gc, id, msg );
978	g_free( buf );
979
980	return st;
981	}
982
983	static char bim_away_alias_find( GList gcm, char *away );
984
985	int bim_set_away( struct gaim_connection gc, char away )
986	{
987	GList m, ms;
988	char *s;
989
990	if( !away ) away = "";
991	ms = m = gc->prpl->away_states( gc );
992
993	while( m )
994	{
995	if( *away )
996	{
997	if( g_strncasecmp( m->data, away, strlen( m->data ) ) == 0 )
998	break;
999	}
1000	else
1001	{
1002	if( g_strcasecmp( m->data, "Available" ) == 0 )
1003	break;
1004	if( g_strcasecmp( m->data, "Online" ) == 0 )
1005	break;
1006	}
1007	m = m->next;
1008	}
1009
1010	if( m )
1011	{
1012	gc->prpl->set_away( gc, m->data, *away ? away : NULL );
1013	}
1014	else
1015	{
1016	s = bim_away_alias_find( ms, away );
1017	if( s )
1018	{
1019	gc->prpl->set_away( gc, s, away );
1020	if( set_getint( gc->irc, "debug" ) )
1021	serv_got_crap( gc, "Setting away state to %s", s );
1022	}
1023	else
1024	gc->prpl->set_away( gc, GAIM_AWAY_CUSTOM, away );
1025	}
1026
1027	g_list_free( ms );
1028
1029	return( 1 );
1030	}
1031
1032	static char *bim_away_alias_list[8][5] =
1033	{
1034	{ "Away from computer", "Away", "Extended away", NULL },
1035	{ "NA", "N/A", "Not available", NULL },
1036	{ "Busy", "Do not disturb", "DND", "Occupied", NULL },
1037	{ "Be right back", "BRB", NULL },
1038	{ "On the phone", "Phone", "On phone", NULL },
1039	{ "Out to lunch", "Lunch", "Food", NULL },
1040	{ "Invisible", "Hidden" },
1041	{ NULL }
1042	};
1043
1044	static char bim_away_alias_find( GList gcm, char *away )
1045	{
1046	GList *m;
1047	int i, j;
1048
1049	for( i = 0; *bim_away_alias_list[i]; i ++ )
1050	{
1051	for( j = 0; bim_away_alias_list[i][j]; j ++ )
1052	if( g_strncasecmp( away, bim_away_alias_list[i][j], strlen( bim_away_alias_list[i][j] ) ) == 0 )
1053	break;
1054
1055	if( !bim_away_alias_list[i][j] ) /* If we reach the end, this row */
1056	continue; /* is not what we want. Next! */
1057
1058	/* Now find an entry in this row which exists in gcm */
1059	for( j = 0; bim_away_alias_list[i][j]; j ++ )
1060	{
1061	m = gcm;
1062	while( m )
1063	{
1064	if( g_strcasecmp( bim_away_alias_list[i][j], m->data ) == 0 )
1065	return( bim_away_alias_list[i][j] );
1066	m = m->next;
1067	}
1068	}
1069	}
1070
1071	return( NULL );
1072	}
1073
1074	void bim_add_allow( struct gaim_connection gc, char handle )
1075	{
1076	if( g_slist_find_custom( gc->permit, handle, (GCompareFunc) gc->prpl->cmp_buddynames ) == NULL )
1077	{
1078	gc->permit = g_slist_prepend( gc->permit, g_strdup( handle ) );
1079	}
1080
1081	gc->prpl->add_permit( gc, handle );
1082	}
1083
1084	void bim_rem_allow( struct gaim_connection gc, char handle )
1085	{
1086	GSList *l;
1087
1088	if( ( l = g_slist_find_custom( gc->permit, handle, (GCompareFunc) gc->prpl->cmp_buddynames ) ) )
1089	{
1090	g_free( l->data );
1091	gc->permit = g_slist_delete_link( gc->permit, l );
1092	}
1093
1094	gc->prpl->rem_permit( gc, handle );
1095	}
1096
1097	void bim_add_block( struct gaim_connection gc, char handle )
1098	{
1099	if( g_slist_find_custom( gc->deny, handle, (GCompareFunc) gc->prpl->cmp_buddynames ) == NULL )
1100	{
1101	gc->deny = g_slist_prepend( gc->deny, g_strdup( handle ) );
1102	}
1103
1104	gc->prpl->add_deny( gc, handle );
1105	}
1106
1107	void bim_rem_block( struct gaim_connection gc, char handle )
1108	{
1109	GSList *l;
1110
1111	if( ( l = g_slist_find_custom( gc->deny, handle, (GCompareFunc) gc->prpl->cmp_buddynames ) ) )
1112	{
1113	g_free( l->data );
1114	gc->deny = g_slist_delete_link( gc->deny, l );
1115	}
1116
1117	gc->prpl->rem_deny( gc, handle );
1118	}

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

Download in other formats: