Context Navigation

source: irc_im.c @ 8b39b1a

Last change on this file since 8b39b1a was 3864c08, checked in by Wilmer van der Gaast <wilmer@…>, at 2011-10-21T03:00:54Z
Big merge from pesco, closing some OTR issues: #759, #824, #839, #830.
Property mode set to `100644`
File size: 26.8 KB

Line
1	/********************************************************************\
2	* BitlBee -- An IRC to other IM-networks gateway *
3	* *
4	* Copyright 2002-2010 Wilmer van der Gaast and others *
5	\********************************************************************/
6
7	/* Some glue to put the IRC and the IM stuff together. */
8
9	/*
10	This program is free software; you can redistribute it and/or modify
11	it under the terms of the GNU General Public License as published by
12	the Free Software Foundation; either version 2 of the License, or
13	(at your option) any later version.
14
15	This program is distributed in the hope that it will be useful,
16	but WITHOUT ANY WARRANTY; without even the implied warranty of
17	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18	GNU General Public License for more details.
19
20	You should have received a copy of the GNU General Public License with
21	the Debian GNU/Linux distribution in /usr/share/common-licenses/GPL;
22	if not, write to the Free Software Foundation, Inc., 59 Temple Place,
23	Suite 330, Boston, MA 02111-1307 USA
24	*/
25
26	#include "bitlbee.h"
27	#include "dcc.h"
28
29	/* IM->IRC callbacks: Simple IM/buddy-related stuff. */
30
31	static const struct irc_user_funcs irc_user_im_funcs;
32
33	static void bee_irc_imc_connected( struct im_connection *ic )
34	{
35	irc_t irc = (irc_t) ic->bee->ui_data;
36
37	irc_channel_auto_joins( irc, ic->acc );
38	}
39
40	static void bee_irc_imc_disconnected( struct im_connection *ic )
41	{
42	/* Maybe try to send /QUITs here instead of later on. */
43	}
44
45	static gboolean bee_irc_user_new( bee_t bee, bee_user_t bu )
46	{
47	irc_user_t *iu;
48	irc_t irc = (irc_t) bee->ui_data;
49	char nick[MAX_NICK_LENGTH+1], *s;
50
51	memset( nick, 0, MAX_NICK_LENGTH + 1 );
52	strcpy( nick, nick_get( bu ) );
53
54	bu->ui_data = iu = irc_user_new( irc, nick );
55	iu->bu = bu;
56
57	if( set_getbool( &irc->b->set, "private" ) )
58	iu->last_channel = NULL;
59	else
60	iu->last_channel = irc_channel_with_user( irc, iu );
61
62	if( ( s = strchr( bu->handle, '@' ) ) )
63	{
64	iu->host = g_strdup( s + 1 );
65	iu->user = g_strndup( bu->handle, s - bu->handle );
66	}
67	else
68	{
69	iu->user = g_strdup( bu->handle );
70	if( bu->ic->acc->server )
71	iu->host = g_strdup( bu->ic->acc->server );
72	else
73	iu->host = g_strdup( bu->ic->acc->prpl->name );
74	}
75
76	while( ( s = strchr( iu->user, ' ' ) ) )
77	*s = '_';
78
79	if( bu->flags & BEE_USER_LOCAL )
80	{
81	char *s = set_getstr( &bee->set, "handle_unknown" );
82
83	if( strcmp( s, "add_private" ) == 0 )
84	iu->last_channel = NULL;
85	else if( strcmp( s, "add_channel" ) == 0 )
86	iu->last_channel = irc->default_channel;
87	}
88
89	iu->f = &irc_user_im_funcs;
90
91	return TRUE;
92	}
93
94	static gboolean bee_irc_user_free( bee_t bee, bee_user_t bu )
95	{
96	return irc_user_free( bee->ui_data, (irc_user_t *) bu->ui_data );
97	}
98
99	static gboolean bee_irc_user_status( bee_t bee, bee_user_t bu, bee_user_t *old )
100	{
101	irc_t *irc = bee->ui_data;
102	irc_user_t *iu = bu->ui_data;
103
104	/* Do this outside the if below since away state can change without
105	the online state changing. */
106	iu->flags &= ~IRC_USER_AWAY;
107	if( bu->flags & BEE_USER_AWAY \|\| !( bu->flags & BEE_USER_ONLINE ) )
108	iu->flags \|= IRC_USER_AWAY;
109
110	if( ( bu->flags & BEE_USER_ONLINE ) != ( old->flags & BEE_USER_ONLINE ) )
111	{
112	if( bu->flags & BEE_USER_ONLINE )
113	{
114	if( g_hash_table_lookup( irc->watches, iu->key ) )
115	irc_send_num( irc, 600, "%s %s %s %d :%s", iu->nick, iu->user,
116	iu->host, (int) time( NULL ), "logged online" );
117	}
118	else
119	{
120	if( g_hash_table_lookup( irc->watches, iu->key ) )
121	irc_send_num( irc, 601, "%s %s %s %d :%s", iu->nick, iu->user,
122	iu->host, (int) time( NULL ), "logged offline" );
123
124	/* Send a QUIT since those will also show up in any
125	query windows the user may have, plus it's only
126	one QUIT instead of possibly many (in case of
127	multiple control chans). If there's a channel that
128	shows offline people, a JOIN will follow. */
129	if( set_getbool( &bee->set, "offline_user_quits" ) )
130	irc_user_quit( iu, "Leaving..." );
131	}
132	}
133
134	/* Reset this one since the info may have changed. */
135	iu->away_reply_timeout = 0;
136
137	bee_irc_channel_update( irc, NULL, iu );
138
139	return TRUE;
140	}
141
142	void bee_irc_channel_update( irc_t irc, irc_channel_t ic, irc_user_t *iu )
143	{
144	GSList *l;
145
146	if( ic == NULL )
147	{
148	for( l = irc->channels; l; l = l->next )
149	{
150	ic = l->data;
151	/* TODO: Just add a type flag or so.. */
152	if( ic->f == irc->default_channel->f &&
153	( ic->flags & IRC_CHANNEL_JOINED ) )
154	bee_irc_channel_update( irc, ic, iu );
155	}
156	return;
157	}
158	if( iu == NULL )
159	{
160	for( l = irc->users; l; l = l->next )
161	{
162	iu = l->data;
163	if( iu->bu )
164	bee_irc_channel_update( irc, ic, l->data );
165	}
166	return;
167	}
168
169	if( !irc_channel_wants_user( ic, iu ) )
170	{
171	irc_channel_del_user( ic, iu, IRC_CDU_PART, NULL );
172	}
173	else
174	{
175	struct irc_control_channel *icc = ic->data;
176	int mode = 0;
177
178	if( !( iu->bu->flags & BEE_USER_ONLINE ) )
179	mode = icc->modes[0];
180	else if( iu->bu->flags & BEE_USER_AWAY )
181	mode = icc->modes[1];
182	else
183	mode = icc->modes[2];
184
185	if( !mode )
186	irc_channel_del_user( ic, iu, IRC_CDU_PART, NULL );
187	else
188	{
189	irc_channel_add_user( ic, iu );
190	irc_channel_user_set_mode( ic, iu, mode );
191	}
192	}
193	}
194
195	static gboolean bee_irc_user_msg( bee_t bee, bee_user_t bu, const char *msg_, time_t sent_at )
196	{
197	irc_t *irc = bee->ui_data;
198	irc_user_t iu = (irc_user_t ) bu->ui_data;
199	const char *dst;
200	char *prefix = NULL;
201	char wrapped, ts = NULL;
202	char *msg = g_strdup( msg_ );
203	GSList *l;
204
205	if( sent_at > 0 && set_getbool( &irc->b->set, "display_timestamps" ) )
206	ts = irc_format_timestamp( irc, sent_at );
207
208	dst = irc_user_msgdest( iu );
209	if( dst != irc->user->nick )
210	{
211	/* if not messaging directly, call user by name */
212	prefix = g_strdup_printf( "%s%s%s", irc->user->nick, set_getstr( &bee->set, "to_char" ), ts ? : "" );
213	}
214	else
215	{
216	prefix = ts;
217	ts = NULL; /* don't double-free */
218	}
219
220	for( l = irc_plugins; l; l = l->next )
221	{
222	irc_plugin_t *p = l->data;
223	if( p->filter_msg_in )
224	{
225	char *s = p->filter_msg_in( iu, msg, 0 );
226	if( s )
227	{
228	if( s != msg )
229	g_free( msg );
230	msg = s;
231	}
232	else
233	{
234	/* Modules can swallow messages. */
235	return TRUE;
236	}
237	}
238	}
239
240	if( ( g_strcasecmp( set_getstr( &bee->set, "strip_html" ), "always" ) == 0 ) \|\|
241	( ( bu->ic->flags & OPT_DOES_HTML ) && set_getbool( &bee->set, "strip_html" ) ) )
242	{
243	char *s = g_strdup( msg );
244	strip_html( s );
245	g_free( msg );
246	msg = s;
247	}
248
249	wrapped = word_wrap( msg, 425 );
250	irc_send_msg( iu, "PRIVMSG", dst, wrapped, prefix );
251
252	g_free( wrapped );
253	g_free( prefix );
254	g_free( msg );
255	g_free( ts );
256
257	return TRUE;
258	}
259
260	static gboolean bee_irc_user_typing( bee_t bee, bee_user_t bu, uint32_t flags )
261	{
262	irc_t irc = (irc_t ) bee->ui_data;
263
264	if( set_getbool( &bee->set, "typing_notice" ) )
265	irc_send_msg_f( (irc_user_t *) bu->ui_data, "PRIVMSG", irc->user->nick,
266	"\001TYPING %d\001", ( flags >> 8 ) & 3 );
267	else
268	return FALSE;
269
270	return TRUE;
271	}
272
273	static gboolean bee_irc_user_action_response( bee_t bee, bee_user_t bu, const char action, char const args[], void *data )
274	{
275	irc_t irc = (irc_t ) bee->ui_data;
276	GString *msg = g_string_new( "\001" );
277
278	g_string_append( msg, action );
279	while( *args )
280	{
281	if( strchr( *args, ' ' ) )
282	g_string_append_printf( msg, " \"%s\"", *args );
283	else
284	g_string_append_printf( msg, " %s", *args );
285	args ++;
286	}
287	g_string_append_c( msg, '\001' );
288
289	irc_send_msg( (irc_user_t *) bu->ui_data, "NOTICE", irc->user->nick, msg->str, NULL );
290
291	return TRUE;
292	}
293
294	static gboolean bee_irc_user_nick_update( irc_user_t *iu );
295
296	static gboolean bee_irc_user_fullname( bee_t bee, bee_user_t bu )
297	{
298	irc_user_t iu = (irc_user_t ) bu->ui_data;
299	char *s;
300
301	if( iu->fullname != iu->nick )
302	g_free( iu->fullname );
303	iu->fullname = g_strdup( bu->fullname );
304
305	/* Strip newlines (unlikely, but IRC-unfriendly so they must go)
306	TODO(wilmer): Do the same with away msgs again! */
307	for( s = iu->fullname; *s; s ++ )
308	if( isspace( s ) ) s = ' ';
309
310	if( ( bu->ic->flags & OPT_LOGGED_IN ) && set_getbool( &bee->set, "display_namechanges" ) )
311	{
312	/* People don't like this /NOTICE. Meh, let's go back to the old one.
313	char *msg = g_strdup_printf( "<< \002BitlBee\002 - Changed name to `%s' >>", iu->fullname );
314	irc_send_msg( iu, "NOTICE", irc->user->nick, msg, NULL );
315	*/
316	imcb_log( bu->ic, "User `%s' changed name to `%s'", iu->nick, iu->fullname );
317	}
318
319	bee_irc_user_nick_update( iu );
320
321	return TRUE;
322	}
323
324	static gboolean bee_irc_user_nick_hint( bee_t bee, bee_user_t bu, const char *hint )
325	{
326	bee_irc_user_nick_update( (irc_user_t*) bu->ui_data );
327
328	return TRUE;
329	}
330
331	static gboolean bee_irc_user_group( bee_t bee, bee_user_t bu )
332	{
333	irc_user_t iu = (irc_user_t ) bu->ui_data;
334	irc_t irc = (irc_t ) bee->ui_data;
335	bee_user_flags_t online;
336
337	/* Take the user offline temporarily so we can change the nick (if necessary). */
338	if( ( online = bu->flags & BEE_USER_ONLINE ) )
339	bu->flags &= ~BEE_USER_ONLINE;
340
341	bee_irc_channel_update( irc, NULL, iu );
342	bee_irc_user_nick_update( iu );
343
344	if( online )
345	{
346	bu->flags \|= online;
347	bee_irc_channel_update( irc, NULL, iu );
348	}
349
350	return TRUE;
351	}
352
353	static gboolean bee_irc_user_nick_update( irc_user_t *iu )
354	{
355	bee_user_t *bu = iu->bu;
356	char *newnick;
357
358	if( bu->flags & BEE_USER_ONLINE )
359	/* Ignore if the user is visible already. */
360	return TRUE;
361
362	if( nick_saved( bu ) )
363	/* The user already assigned a nickname to this person. */
364	return TRUE;
365
366	newnick = nick_get( bu );
367
368	if( strcmp( iu->nick, newnick ) != 0 )
369	{
370	nick_dedupe( bu, newnick );
371	irc_user_set_nick( iu, newnick );
372	}
373
374	return TRUE;
375	}
376
377	void bee_irc_user_nick_reset( irc_user_t *iu )
378	{
379	bee_user_t *bu = iu->bu;
380	bee_user_flags_t online;
381
382	if( bu == FALSE )
383	return;
384
385	/* In this case, pretend the user is offline. */
386	if( ( online = bu->flags & BEE_USER_ONLINE ) )
387	bu->flags &= ~BEE_USER_ONLINE;
388
389	nick_del( bu );
390	bee_irc_user_nick_update( iu );
391
392	bu->flags \|= online;
393	}
394
395	/* IRC->IM calls */
396
397	static gboolean bee_irc_user_privmsg_cb( gpointer data, gint fd, b_input_condition cond );
398
399	static gboolean bee_irc_user_privmsg( irc_user_t iu, const char msg )
400	{
401	const char *away;
402
403	if( iu->bu == NULL )
404	return FALSE;
405
406	if( ( away = irc_user_get_away( iu ) ) &&
407	time( NULL ) >= iu->away_reply_timeout )
408	{
409	irc_send_num( iu->irc, 301, "%s :%s", iu->nick, away );
410	iu->away_reply_timeout = time( NULL ) +
411	set_getint( &iu->irc->b->set, "away_reply_timeout" );
412	}
413
414	if( iu->pastebuf == NULL )
415	iu->pastebuf = g_string_new( msg );
416	else
417	{
418	b_event_remove( iu->pastebuf_timer );
419	g_string_append_printf( iu->pastebuf, "\n%s", msg );
420	}
421
422	if( set_getbool( &iu->irc->b->set, "paste_buffer" ) )
423	{
424	int delay;
425
426	if( ( delay = set_getint( &iu->irc->b->set, "paste_buffer_delay" ) ) <= 5 )
427	delay *= 1000;
428
429	iu->pastebuf_timer = b_timeout_add( delay, bee_irc_user_privmsg_cb, iu );
430
431	return TRUE;
432	}
433	else
434	{
435	bee_irc_user_privmsg_cb( iu, 0, 0 );
436
437	return TRUE;
438	}
439	}
440
441	static gboolean bee_irc_user_privmsg_cb( gpointer data, gint fd, b_input_condition cond )
442	{
443	irc_user_t *iu = data;
444	char *msg = g_string_free( iu->pastebuf, FALSE );
445	GSList *l;
446
447	for( l = irc_plugins; l; l = l->next )
448	{
449	irc_plugin_t *p = l->data;
450	if( p->filter_msg_out )
451	{
452	char *s = p->filter_msg_out( iu, msg, 0 );
453	if( s )
454	{
455	if( s != msg )
456	g_free( msg );
457	msg = s;
458	}
459	else
460	{
461	/* Modules can swallow messages. */
462	iu->pastebuf = NULL;
463	g_free( msg );
464	return FALSE;
465	}
466	}
467	}
468
469	bee_user_msg( iu->irc->b, iu->bu, msg, 0 );
470
471	g_free( msg );
472	iu->pastebuf = NULL;
473	iu->pastebuf_timer = 0;
474
475	return FALSE;
476	}
477
478	static gboolean bee_irc_user_ctcp( irc_user_t iu, char const *ctcp )
479	{
480	if( ctcp[1] && g_strcasecmp( ctcp[0], "DCC" ) == 0
481	&& g_strcasecmp( ctcp[1], "SEND" ) == 0 )
482	{
483	if( iu->bu && iu->bu->ic && iu->bu->ic->acc->prpl->transfer_request )
484	{
485	file_transfer_t *ft = dcc_request( iu->bu->ic, ctcp );
486	if ( ft )
487	iu->bu->ic->acc->prpl->transfer_request( iu->bu->ic, ft, iu->bu->handle );
488
489	return TRUE;
490	}
491	}
492	else if( g_strcasecmp( ctcp[0], "TYPING" ) == 0 )
493	{
494	if( iu->bu && iu->bu->ic && iu->bu->ic->acc->prpl->send_typing && ctcp[1] )
495	{
496	int st = ctcp[1][0];
497	if( st >= '0' && st <= '2' )
498	{
499	st <<= 8;
500	iu->bu->ic->acc->prpl->send_typing( iu->bu->ic, iu->bu->handle, st );
501	}
502
503	return TRUE;
504	}
505	}
506	else if( g_strcasecmp( ctcp[0], "HELP" ) == 0 && iu->bu )
507	{
508	GString *supp = g_string_new( "Supported CTCPs:" );
509	GList *l;
510
511	if( iu->bu->ic && iu->bu->ic->acc->prpl->transfer_request )
512	g_string_append( supp, " DCC SEND," );
513	if( iu->bu->ic && iu->bu->ic->acc->prpl->send_typing )
514	g_string_append( supp, " TYPING," );
515	if( iu->bu->ic->acc->prpl->buddy_action_list )
516	for( l = iu->bu->ic->acc->prpl->buddy_action_list( iu->bu ); l; l = l->next )
517	{
518	struct buddy_action *ba = l->data;
519	g_string_append_printf( supp, " %s (%s),",
520	ba->name, ba->description );
521	}
522	g_string_truncate( supp, supp->len - 1 );
523	irc_send_msg_f( iu, "NOTICE", iu->irc->user->nick, "\001HELP %s\001", supp->str );
524	g_string_free( supp, TRUE );
525	}
526	else if( iu->bu && iu->bu->ic && iu->bu->ic->acc->prpl->buddy_action )
527	{
528	iu->bu->ic->acc->prpl->buddy_action( iu->bu, ctcp[0], ctcp + 1, NULL );
529	}
530
531	return FALSE;
532	}
533
534	static const struct irc_user_funcs irc_user_im_funcs = {
535	bee_irc_user_privmsg,
536	bee_irc_user_ctcp,
537	};
538
539
540	/* IM->IRC: Groupchats */
541	const struct irc_channel_funcs irc_channel_im_chat_funcs;
542
543	static gboolean bee_irc_chat_new( bee_t bee, struct groupchat c )
544	{
545	irc_t *irc = bee->ui_data;
546	irc_channel_t *ic;
547	char *topic;
548	GSList *l;
549	int i;
550
551	/* Try to find a channel that expects to receive a groupchat.
552	This flag is set earlier in our current call trace. */
553	for( l = irc->channels; l; l = l->next )
554	{
555	ic = l->data;
556	if( ic->flags & IRC_CHANNEL_CHAT_PICKME )
557	break;
558	}
559
560	/* If we found none, just generate some stupid name. */
561	if( l == NULL ) for( i = 0; i <= 999; i ++ )
562	{
563	char name[16];
564	sprintf( name, "#chat_%03d", i );
565	if( ( ic = irc_channel_new( irc, name ) ) )
566	break;
567	}
568
569	if( ic == NULL )
570	return FALSE;
571
572	c->ui_data = ic;
573	ic->data = c;
574
575	topic = g_strdup_printf( "BitlBee groupchat: \"%s\". Please keep in mind that root-commands won't work here. Have fun!", c->title );
576	irc_channel_set_topic( ic, topic, irc->root );
577	g_free( topic );
578
579	return TRUE;
580	}
581
582	static gboolean bee_irc_chat_free( bee_t bee, struct groupchat c )
583	{
584	irc_channel_t *ic = c->ui_data;
585
586	if( ic == NULL )
587	return FALSE;
588
589	if( ic->flags & IRC_CHANNEL_JOINED )
590	irc_channel_printf( ic, "Cleaning up channel, bye!" );
591
592	ic->data = NULL;
593	c->ui_data = NULL;
594	irc_channel_del_user( ic, ic->irc->user, IRC_CDU_KICK, "Chatroom closed by server" );
595
596	return TRUE;
597	}
598
599	static gboolean bee_irc_chat_log( bee_t bee, struct groupchat c, const char *text )
600	{
601	irc_channel_t *ic = c->ui_data;
602
603	if( ic == NULL )
604	return FALSE;
605
606	irc_channel_printf( ic, "%s", text );
607
608	return TRUE;
609	}
610
611	static gboolean bee_irc_chat_msg( bee_t bee, struct groupchat c, bee_user_t bu, const char msg, time_t sent_at )
612	{
613	irc_t *irc = bee->ui_data;
614	irc_user_t *iu = bu->ui_data;
615	irc_channel_t *ic = c->ui_data;
616	char *ts = NULL;
617
618	if( ic == NULL )
619	return FALSE;
620
621	if( sent_at > 0 && set_getbool( &bee->set, "display_timestamps" ) )
622	ts = irc_format_timestamp( irc, sent_at );
623
624	irc_send_msg( iu, "PRIVMSG", ic->name, msg, ts );
625	g_free( ts );
626
627	return TRUE;
628	}
629
630	static gboolean bee_irc_chat_add_user( bee_t bee, struct groupchat c, bee_user_t *bu )
631	{
632	irc_t *irc = bee->ui_data;
633	irc_channel_t *ic = c->ui_data;
634
635	if( ic == NULL )
636	return FALSE;
637
638	irc_channel_add_user( ic, bu == bee->user ? irc->user : bu->ui_data );
639
640	return TRUE;
641	}
642
643	static gboolean bee_irc_chat_remove_user( bee_t bee, struct groupchat c, bee_user_t *bu )
644	{
645	irc_t *irc = bee->ui_data;
646	irc_channel_t *ic = c->ui_data;
647
648	if( ic == NULL \|\| bu == NULL )
649	return FALSE;
650
651	/* TODO: Possible bug here: If a module removes $user here instead of just
652	using imcb_chat_free() and the channel was IRC_CHANNEL_TEMP, we get into
653	a broken state around here. */
654	irc_channel_del_user( ic, bu == bee->user ? irc->user : bu->ui_data, IRC_CDU_PART, NULL );
655
656	return TRUE;
657	}
658
659	static gboolean bee_irc_chat_topic( bee_t bee, struct groupchat c, const char new, bee_user_t bu )
660	{
661	irc_channel_t *ic = c->ui_data;
662	irc_t *irc = bee->ui_data;
663	irc_user_t *iu;
664
665	if( ic == NULL )
666	return FALSE;
667
668	if( bu == NULL )
669	iu = irc->root;
670	else if( bu == bee->user )
671	iu = irc->user;
672	else
673	iu = bu->ui_data;
674
675	irc_channel_set_topic( ic, new, iu );
676
677	return TRUE;
678	}
679
680	static gboolean bee_irc_chat_name_hint( bee_t bee, struct groupchat c, const char *name )
681	{
682	irc_t *irc = bee->ui_data;
683	irc_channel_t ic = c->ui_data, oic;
684	char stripped[MAX_NICK_LENGTH+1], *full_name;
685
686	if( ic == NULL )
687	return FALSE;
688
689	/* Don't rename a channel if the user's in it already. */
690	if( ic->flags & IRC_CHANNEL_JOINED )
691	return FALSE;
692
693	strncpy( stripped, name, MAX_NICK_LENGTH );
694	stripped[MAX_NICK_LENGTH] = '\0';
695	irc_channel_name_strip( stripped );
696	if( set_getbool( &bee->set, "lcnicks" ) )
697	nick_lc( stripped );
698
699	if( stripped[0] == '\0' )
700	return FALSE;
701
702	full_name = g_strdup_printf( "#%s", stripped );
703	if( ( oic = irc_channel_by_name( irc, full_name ) ) )
704	{
705	char type, chat_type;
706
707	type = set_getstr( &oic->set, "type" );
708	chat_type = set_getstr( &oic->set, "chat_type" );
709
710	if( type && chat_type && oic->data == FALSE &&
711	strcmp( type, "chat" ) == 0 &&
712	strcmp( chat_type, "groupchat" ) == 0 )
713	{
714	/* There's a channel with this name already, but it looks
715	like it's not in use yet. Most likely the IRC client
716	rejoined the channel after a reconnect. Remove it so
717	we can reuse its name. */
718	irc_channel_free( oic );
719	}
720	else
721	{
722	g_free( full_name );
723	return FALSE;
724	}
725	}
726
727	g_free( ic->name );
728	ic->name = full_name;
729
730	return TRUE;
731	}
732
733	static gboolean bee_irc_chat_invite( bee_t bee, bee_user_t bu, const char name, const char msg )
734	{
735	char channel, s;
736	irc_t *irc = bee->ui_data;
737	irc_user_t *iu = bu->ui_data;
738	irc_channel_t *chan;
739
740	if( strchr( CTYPES, name[0] ) )
741	channel = g_strdup( name );
742	else
743	channel = g_strdup_printf( "#%s", name );
744
745	if( ( s = strchr( channel, '@' ) ) )
746	*s = '\0';
747
748	if( strlen( channel ) > MAX_NICK_LENGTH )
749	{
750	/* If the channel name is very long (like those insane GTalk
751	UUID names), try if we can use the inviter's nick. */
752	s = g_strdup_printf( "#%s", iu->nick );
753	if( irc_channel_by_name( irc, s ) == NULL )
754	{
755	g_free( channel );
756	channel = s;
757	}
758	}
759
760	if( ( chan = irc_channel_new( irc, channel ) ) &&
761	set_setstr( &chan->set, "type", "chat" ) &&
762	set_setstr( &chan->set, "chat_type", "room" ) &&
763	set_setstr( &chan->set, "account", bu->ic->acc->tag ) &&
764	set_setstr( &chan->set, "room", (char*) name ) )
765	{
766	/* I'm assuming that if the user didn't "chat add" the room
767	himself but got invited, it's temporary, so make this a
768	temporary mapping that is removed as soon as we /PART. */
769	chan->flags \|= IRC_CHANNEL_TEMP;
770	}
771	else
772	{
773	irc_channel_free( chan );
774	chan = NULL;
775	}
776	g_free( channel );
777
778	irc_send_msg_f( iu, "PRIVMSG", irc->user->nick, "<< \002BitlBee\002 - Invitation to chatroom %s >>", name );
779	if( msg )
780	irc_send_msg( iu, "PRIVMSG", irc->user->nick, msg, NULL );
781	if( chan )
782	{
783	irc_send_msg_f( iu, "PRIVMSG", irc->user->nick, "To join the room, just /join %s", chan->name );
784	irc_send_invite( iu, chan );
785	}
786
787	return TRUE;
788	}
789
790	/* IRC->IM */
791	static gboolean bee_irc_channel_chat_privmsg_cb( gpointer data, gint fd, b_input_condition cond );
792
793	static gboolean bee_irc_channel_chat_privmsg( irc_channel_t ic, const char msg )
794	{
795	struct groupchat *c = ic->data;
796	char trans = NULL, s;
797
798	if( c == NULL )
799	return FALSE;
800
801	if( set_getbool( &ic->set, "translate_to_nicks" ) )
802	{
803	char nick[MAX_NICK_LENGTH+1];
804	irc_user_t *iu;
805
806	strncpy( nick, msg, MAX_NICK_LENGTH );
807	nick[MAX_NICK_LENGTH] = '\0';
808	if( ( s = strchr( nick, ':' ) ) \|\| ( s = strchr( nick, ',' ) ) )
809	{
810	*s = '\0';
811	if( ( iu = irc_user_by_name( ic->irc, nick ) ) && iu->bu &&
812	iu->bu->nick && irc_channel_has_user( ic, iu ) )
813	{
814	trans = g_strconcat( iu->bu->nick, msg + ( s - nick ), NULL );
815	msg = trans;
816	}
817	}
818	}
819
820	if( set_getbool( &ic->irc->b->set, "paste_buffer" ) )
821	{
822	int delay;
823
824	if( ic->pastebuf == NULL )
825	ic->pastebuf = g_string_new( msg );
826	else
827	{
828	b_event_remove( ic->pastebuf_timer );
829	g_string_append_printf( ic->pastebuf, "\n%s", msg );
830	}
831
832	if( ( delay = set_getint( &ic->irc->b->set, "paste_buffer_delay" ) ) <= 5 )
833	delay *= 1000;
834
835	ic->pastebuf_timer = b_timeout_add( delay, bee_irc_channel_chat_privmsg_cb, ic );
836
837	g_free( trans );
838	return TRUE;
839	}
840	else
841	bee_chat_msg( ic->irc->b, c, msg, 0 );
842
843	g_free( trans );
844	return TRUE;
845	}
846
847	static gboolean bee_irc_channel_chat_privmsg_cb( gpointer data, gint fd, b_input_condition cond )
848	{
849	irc_channel_t *ic = data;
850
851	if( ic->data )
852	bee_chat_msg( ic->irc->b, ic->data, ic->pastebuf->str, 0 );
853
854	g_string_free( ic->pastebuf, TRUE );
855	ic->pastebuf = 0;
856	ic->pastebuf_timer = 0;
857
858	return FALSE;
859	}
860
861	static gboolean bee_irc_channel_chat_join( irc_channel_t *ic )
862	{
863	char acc_s, room;
864	account_t *acc;
865
866	if( strcmp( set_getstr( &ic->set, "chat_type" ), "room" ) != 0 )
867	return TRUE;
868
869	if( ( acc_s = set_getstr( &ic->set, "account" ) ) &&
870	( room = set_getstr( &ic->set, "room" ) ) &&
871	( acc = account_get( ic->irc->b, acc_s ) ) &&
872	acc->ic && acc->prpl->chat_join )
873	{
874	char *nick;
875
876	if( !( nick = set_getstr( &ic->set, "nick" ) ) )
877	nick = ic->irc->user->nick;
878
879	ic->flags \|= IRC_CHANNEL_CHAT_PICKME;
880	acc->prpl->chat_join( acc->ic, room, nick, NULL, &ic->set );
881	ic->flags &= ~IRC_CHANNEL_CHAT_PICKME;
882
883	return FALSE;
884	}
885	else
886	{
887	irc_send_num( ic->irc, 403, "%s :Can't join channel, account offline?", ic->name );
888	return FALSE;
889	}
890	}
891
892	static gboolean bee_irc_channel_chat_part( irc_channel_t ic, const char msg )
893	{
894	struct groupchat *c = ic->data;
895
896	if( c && c->ic->acc->prpl->chat_leave )
897	c->ic->acc->prpl->chat_leave( c );
898
899	/* Remove references in both directions now. We don't need each other anymore. */
900	ic->data = NULL;
901	if( c )
902	c->ui_data = NULL;
903
904	return TRUE;
905	}
906
907	static gboolean bee_irc_channel_chat_topic( irc_channel_t ic, const char new )
908	{
909	struct groupchat *c = ic->data;
910
911	if( c == NULL )
912	return FALSE;
913
914	if( c->ic->acc->prpl->chat_topic == NULL )
915	irc_send_num( ic->irc, 482, "%s :IM network does not support channel topics", ic->name );
916	else
917	{
918	/* TODO: Need more const goodness here, sigh */
919	char *topic = g_strdup( new );
920	c->ic->acc->prpl->chat_topic( c, topic );
921	g_free( topic );
922	}
923
924	/* Whatever happened, the IM module should ack the topic change. */
925	return FALSE;
926	}
927
928	static gboolean bee_irc_channel_chat_invite( irc_channel_t ic, irc_user_t iu )
929	{
930	struct groupchat *c = ic->data;
931	bee_user_t *bu = iu->bu;
932
933	if( bu == NULL )
934	return FALSE;
935
936	if( c )
937	{
938	if( iu->bu->ic != c->ic )
939	irc_send_num( ic->irc, 482, "%s :Can't mix different IM networks in one groupchat", ic->name );
940	else if( c->ic->acc->prpl->chat_invite )
941	c->ic->acc->prpl->chat_invite( c, iu->bu->handle, NULL );
942	else
943	irc_send_num( ic->irc, 482, "%s :IM protocol does not support room invitations", ic->name );
944	}
945	else if( bu->ic->acc->prpl->chat_with &&
946	strcmp( set_getstr( &ic->set, "chat_type" ), "groupchat" ) == 0 )
947	{
948	ic->flags \|= IRC_CHANNEL_CHAT_PICKME;
949	iu->bu->ic->acc->prpl->chat_with( bu->ic, bu->handle );
950	ic->flags &= ~IRC_CHANNEL_CHAT_PICKME;
951	}
952	else
953	{
954	irc_send_num( ic->irc, 482, "%s :IM protocol does not support room invitations", ic->name );
955	}
956
957	return TRUE;
958	}
959
960	static char set_eval_room_account( set_t set, char *value );
961	static char set_eval_chat_type( set_t set, char *value );
962
963	static gboolean bee_irc_channel_init( irc_channel_t *ic )
964	{
965	set_add( &ic->set, "account", NULL, set_eval_room_account, ic );
966	set_add( &ic->set, "chat_type", "groupchat", set_eval_chat_type, ic );
967	set_add( &ic->set, "nick", NULL, NULL, ic );
968	set_add( &ic->set, "room", NULL, NULL, ic );
969	set_add( &ic->set, "translate_to_nicks", "true", set_eval_bool, ic );
970
971	/* chat_type == groupchat */
972	ic->flags \|= IRC_CHANNEL_TEMP;
973
974	return TRUE;
975	}
976
977	static char set_eval_room_account( set_t set, char *value )
978	{
979	struct irc_channel *ic = set->data;
980	account_t acc, oa;
981
982	if( !( acc = account_get( ic->irc->b, value ) ) )
983	return SET_INVALID;
984	else if( !acc->prpl->chat_join )
985	{
986	irc_rootmsg( ic->irc, "Named chatrooms not supported on that account." );
987	return SET_INVALID;
988	}
989
990	if( set->value && ( oa = account_get( ic->irc->b, set->value ) ) &&
991	oa->prpl->chat_free_settings )
992	oa->prpl->chat_free_settings( oa, &ic->set );
993
994	if( acc->prpl->chat_add_settings )
995	acc->prpl->chat_add_settings( acc, &ic->set );
996
997	return g_strdup( acc->tag );
998	}
999
1000	static char set_eval_chat_type( set_t set, char *value )
1001	{
1002	struct irc_channel *ic = set->data;
1003
1004	if( strcmp( value, "groupchat" ) == 0 )
1005	ic->flags \|= IRC_CHANNEL_TEMP;
1006	else if( strcmp( value, "room" ) == 0 )
1007	ic->flags &= ~IRC_CHANNEL_TEMP;
1008	else
1009	return NULL;
1010
1011	return value;
1012	}
1013
1014	static gboolean bee_irc_channel_free( irc_channel_t *ic )
1015	{
1016	struct groupchat *c = ic->data;
1017
1018	set_del( &ic->set, "account" );
1019	set_del( &ic->set, "chat_type" );
1020	set_del( &ic->set, "nick" );
1021	set_del( &ic->set, "room" );
1022	set_del( &ic->set, "translate_to_nicks" );
1023
1024	ic->flags &= ~IRC_CHANNEL_TEMP;
1025
1026	/* That one still points at this channel. Don't. */
1027	if( c )
1028	c->ui_data = NULL;
1029
1030	return TRUE;
1031	}
1032
1033	const struct irc_channel_funcs irc_channel_im_chat_funcs = {
1034	bee_irc_channel_chat_privmsg,
1035	bee_irc_channel_chat_join,
1036	bee_irc_channel_chat_part,
1037	bee_irc_channel_chat_topic,
1038	bee_irc_channel_chat_invite,
1039
1040	bee_irc_channel_init,
1041	bee_irc_channel_free,
1042	};
1043
1044
1045	/* IM->IRC: File transfers */
1046	static file_transfer_t bee_irc_ft_in_start( bee_t bee, bee_user_t bu, const char file_name, size_t file_size )
1047	{
1048	return dccs_send_start( bu->ic, (irc_user_t *) bu->ui_data, file_name, file_size );
1049	}
1050
1051	static gboolean bee_irc_ft_out_start( struct im_connection ic, file_transfer_t ft )
1052	{
1053	return dccs_recv_start( ft );
1054	}
1055
1056	static void bee_irc_ft_close( struct im_connection ic, file_transfer_t ft )
1057	{
1058	return dcc_close( ft );
1059	}
1060
1061	static void bee_irc_ft_finished( struct im_connection ic, file_transfer_t file )
1062	{
1063	dcc_file_transfer_t *df = file->priv;
1064
1065	if( file->bytes_transferred >= file->file_size )
1066	dcc_finish( file );
1067	else
1068	df->proto_finished = TRUE;
1069	}
1070
1071	const struct bee_ui_funcs irc_ui_funcs = {
1072	bee_irc_imc_connected,
1073	bee_irc_imc_disconnected,
1074
1075	bee_irc_user_new,
1076	bee_irc_user_free,
1077	bee_irc_user_fullname,
1078	bee_irc_user_nick_hint,
1079	bee_irc_user_group,
1080	bee_irc_user_status,
1081	bee_irc_user_msg,
1082	bee_irc_user_typing,
1083	bee_irc_user_action_response,
1084
1085	bee_irc_chat_new,
1086	bee_irc_chat_free,
1087	bee_irc_chat_log,
1088	bee_irc_chat_msg,
1089	bee_irc_chat_add_user,
1090	bee_irc_chat_remove_user,
1091	bee_irc_chat_topic,
1092	bee_irc_chat_name_hint,
1093	bee_irc_chat_invite,
1094
1095	bee_irc_ft_in_start,
1096	bee_irc_ft_out_start,
1097	bee_irc_ft_close,
1098	bee_irc_ft_finished,
1099	};

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

Download in other formats: