Context Navigation

source: protocols/msn/ns.c @ bb839e8

Last change on this file since bb839e8 was bb839e8, checked in by Wilmer van der Gaast <wilmer@…>, at 2010-04-10T01:05:39Z
Be more clever with keepalives; detect when a switchboard is opened with someone who's offline already. Still a hack but it eases the pain a little bit.
Property mode set to `100644`
File size: 17.9 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	/* MSN module - Notification server callbacks */
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 <ctype.h>
27	#include "nogaim.h"
28	#include "msn.h"
29	#include "passport.h"
30	#include "md5.h"
31
32	static gboolean msn_ns_callback( gpointer data, gint source, b_input_condition cond );
33	static int msn_ns_command( gpointer data, char **cmd, int num_parts );
34	static int msn_ns_message( gpointer data, char msg, int msglen, char *cmd, int num_parts );
35
36	static void msn_auth_got_passport_token( struct msn_auth_data *mad );
37
38	gboolean msn_ns_connected( gpointer data, gint source, b_input_condition cond )
39	{
40	struct im_connection *ic = data;
41	struct msn_data *md;
42	char s[1024];
43
44	if( !g_slist_find( msn_connections, ic ) )
45	return FALSE;
46
47	if( source == -1 )
48	{
49	imcb_error( ic, "Could not connect to server" );
50	imc_logout( ic, TRUE );
51	return FALSE;
52	}
53
54	md = ic->proto_data;
55
56	if( !md->handler )
57	{
58	md->handler = g_new0( struct msn_handler_data, 1 );
59	md->handler->data = ic;
60	md->handler->exec_command = msn_ns_command;
61	md->handler->exec_message = msn_ns_message;
62	}
63	else
64	{
65	if( md->handler->rxq )
66	g_free( md->handler->rxq );
67
68	md->handler->rxlen = 0;
69	}
70
71	md->handler->fd = md->fd;
72	md->handler->rxq = g_new0( char, 1 );
73
74	g_snprintf( s, sizeof( s ), "VER %d MSNP8 CVR0\r\n", ++md->trId );
75	if( msn_write( ic, s, strlen( s ) ) )
76	{
77	ic->inpa = b_input_add( md->fd, GAIM_INPUT_READ, msn_ns_callback, ic );
78	imcb_log( ic, "Connected to server, waiting for reply" );
79	}
80
81	return FALSE;
82	}
83
84	static gboolean msn_ns_callback( gpointer data, gint source, b_input_condition cond )
85	{
86	struct im_connection *ic = data;
87	struct msn_data *md = ic->proto_data;
88
89	if( msn_handler( md->handler ) == -1 ) /* Don't do this on ret == 0, it's already done then. */
90	{
91	imcb_error( ic, "Error while reading from server" );
92	imc_logout( ic, TRUE );
93
94	return FALSE;
95	}
96	else
97	return TRUE;
98	}
99
100	static int msn_ns_command( gpointer data, char **cmd, int num_parts )
101	{
102	struct im_connection *ic = data;
103	struct msn_data *md = ic->proto_data;
104	char buf[1024];
105
106	if( num_parts == 0 )
107	{
108	/* Hrrm... Empty command...? Ignore? */
109	return( 1 );
110	}
111
112	if( strcmp( cmd[0], "VER" ) == 0 )
113	{
114	if( cmd[2] && strncmp( cmd[2], "MSNP8", 5 ) != 0 )
115	{
116	imcb_error( ic, "Unsupported protocol" );
117	imc_logout( ic, FALSE );
118	return( 0 );
119	}
120
121	g_snprintf( buf, sizeof( buf ), "CVR %d 0x0409 mac 10.2.0 ppc macmsgs 3.5.1 macmsgs %s\r\n",
122	++md->trId, ic->acc->user );
123	return( msn_write( ic, buf, strlen( buf ) ) );
124	}
125	else if( strcmp( cmd[0], "CVR" ) == 0 )
126	{
127	/* We don't give a damn about the information we just received */
128	g_snprintf( buf, sizeof( buf ), "USR %d TWN I %s\r\n", ++md->trId, ic->acc->user );
129	return( msn_write( ic, buf, strlen( buf ) ) );
130	}
131	else if( strcmp( cmd[0], "XFR" ) == 0 )
132	{
133	char *server;
134	int port;
135
136	if( num_parts == 6 && strcmp( cmd[2], "NS" ) == 0 )
137	{
138	b_event_remove( ic->inpa );
139	ic->inpa = 0;
140	closesocket( md->fd );
141
142	server = strchr( cmd[3], ':' );
143	if( !server )
144	{
145	imcb_error( ic, "Syntax error" );
146	imc_logout( ic, TRUE );
147	return( 0 );
148	}
149	*server = 0;
150	port = atoi( server + 1 );
151	server = cmd[3];
152
153	imcb_log( ic, "Transferring to other server" );
154
155	md->fd = proxy_connect( server, port, msn_ns_connected, ic );
156	}
157	else if( num_parts == 6 && strcmp( cmd[2], "SB" ) == 0 )
158	{
159	struct msn_switchboard *sb;
160
161	server = strchr( cmd[3], ':' );
162	if( !server )
163	{
164	imcb_error( ic, "Syntax error" );
165	imc_logout( ic, TRUE );
166	return( 0 );
167	}
168	*server = 0;
169	port = atoi( server + 1 );
170	server = cmd[3];
171
172	if( strcmp( cmd[4], "CKI" ) != 0 )
173	{
174	imcb_error( ic, "Unknown authentication method for switchboard" );
175	imc_logout( ic, TRUE );
176	return( 0 );
177	}
178
179	debug( "Connecting to a new switchboard with key %s", cmd[5] );
180
181	if( ( sb = msn_sb_create( ic, server, port, cmd[5], MSN_SB_NEW ) ) == NULL )
182	{
183	/* Although this isn't strictly fatal for the NS connection, it's
184	definitely something serious (we ran out of file descriptors?). */
185	imcb_error( ic, "Could not create new switchboard" );
186	imc_logout( ic, TRUE );
187	return( 0 );
188	}
189
190	if( md->msgq )
191	{
192	struct msn_message *m = md->msgq->data;
193	GSList *l;
194
195	sb->who = g_strdup( m->who );
196
197	/* Move all the messages to the first user in the message
198	queue to the switchboard message queue. */
199	l = md->msgq;
200	while( l )
201	{
202	m = l->data;
203	l = l->next;
204	if( strcmp( m->who, sb->who ) == 0 )
205	{
206	sb->msgq = g_slist_append( sb->msgq, m );
207	md->msgq = g_slist_remove( md->msgq, m );
208	}
209	}
210	}
211	}
212	else
213	{
214	imcb_error( ic, "Syntax error" );
215	imc_logout( ic, TRUE );
216	return( 0 );
217	}
218	}
219	else if( strcmp( cmd[0], "USR" ) == 0 )
220	{
221	if( num_parts == 5 && strcmp( cmd[2], "TWN" ) == 0 && strcmp( cmd[3], "S" ) == 0 )
222	{
223	/* Time for some Passport black magic... */
224	if( !passport_get_token( msn_auth_got_passport_token, ic, ic->acc->user, ic->acc->pass, cmd[4] ) )
225	{
226	imcb_error( ic, "Error while contacting Passport server" );
227	imc_logout( ic, TRUE );
228	return( 0 );
229	}
230	}
231	else if( num_parts >= 7 && strcmp( cmd[2], "OK" ) == 0 )
232	{
233	set_t *s;
234
235	if( num_parts == 7 )
236	{
237	http_decode( cmd[4] );
238
239	strncpy( ic->displayname, cmd[4], sizeof( ic->displayname ) );
240	ic->displayname[sizeof(ic->displayname)-1] = 0;
241
242	if( ( s = set_find( &ic->acc->set, "display_name" ) ) )
243	{
244	g_free( s->value );
245	s->value = g_strdup( cmd[4] );
246	}
247	}
248	else
249	{
250	imcb_log( ic, "Warning: Friendly name in server response was corrupted" );
251	}
252
253	imcb_log( ic, "Authenticated, getting buddy list" );
254
255	g_snprintf( buf, sizeof( buf ), "SYN %d 0\r\n", ++md->trId );
256	return( msn_write( ic, buf, strlen( buf ) ) );
257	}
258	else
259	{
260	imcb_error( ic, "Unknown authentication type" );
261	imc_logout( ic, FALSE );
262	return( 0 );
263	}
264	}
265	else if( strcmp( cmd[0], "MSG" ) == 0 )
266	{
267	if( num_parts != 4 )
268	{
269	imcb_error( ic, "Syntax error" );
270	imc_logout( ic, TRUE );
271	return( 0 );
272	}
273
274	md->handler->msglen = atoi( cmd[3] );
275
276	if( md->handler->msglen <= 0 )
277	{
278	imcb_error( ic, "Syntax error" );
279	imc_logout( ic, TRUE );
280	return( 0 );
281	}
282	}
283	else if( strcmp( cmd[0], "SYN" ) == 0 )
284	{
285	if( num_parts == 5 )
286	{
287	int i, groupcount;
288
289	groupcount = atoi( cmd[4] );
290	if( groupcount > 0 )
291	{
292	/* valgrind says this is leaking memory, I'm guessing
293	that this happens during server redirects. */
294	if( md->grouplist )
295	{
296	for( i = 0; i < md->groupcount; i ++ )
297	g_free( md->grouplist[i] );
298	g_free( md->grouplist );
299	}
300
301	md->groupcount = groupcount;
302	md->grouplist = g_new0( char *, md->groupcount );
303	}
304
305	md->buddycount = atoi( cmd[3] );
306	if( !*cmd[3] \|\| md->buddycount == 0 )
307	msn_logged_in( ic );
308	}
309	else
310	{
311	/* Hrrm... This SYN reply doesn't really look like something we expected.
312	Let's assume everything is okay. */
313
314	msn_logged_in( ic );
315	}
316	}
317	else if( strcmp( cmd[0], "LST" ) == 0 )
318	{
319	int list;
320
321	if( num_parts != 4 && num_parts != 5 )
322	{
323	imcb_error( ic, "Syntax error" );
324	imc_logout( ic, TRUE );
325	return( 0 );
326	}
327
328	http_decode( cmd[2] );
329	list = atoi( cmd[3] );
330
331	if( list & 1 ) /* FL */
332	{
333	char *group = NULL;
334	int num;
335
336	if( cmd[4] != NULL && sscanf( cmd[4], "%d", &num ) == 1 && num < md->groupcount )
337	group = md->grouplist[num];
338
339	imcb_add_buddy( ic, cmd[1], group );
340	imcb_rename_buddy( ic, cmd[1], cmd[2] );
341	}
342	if( list & 2 ) /* AL */
343	{
344	ic->permit = g_slist_append( ic->permit, g_strdup( cmd[1] ) );
345	}
346	if( list & 4 ) /* BL */
347	{
348	ic->deny = g_slist_append( ic->deny, g_strdup( cmd[1] ) );
349	}
350	if( list & 8 ) /* RL */
351	{
352	if( ( list & 6 ) == 0 )
353	msn_buddy_ask( ic, cmd[1], cmd[2] );
354	}
355
356	if( --md->buddycount == 0 )
357	{
358	if( ic->flags & OPT_LOGGED_IN )
359	{
360	imcb_log( ic, "Successfully transferred to different server" );
361	g_snprintf( buf, sizeof( buf ), "CHG %d %s %d\r\n", ++md->trId, md->away_state->code, 0 );
362	return( msn_write( ic, buf, strlen( buf ) ) );
363	}
364	else
365	{
366	msn_logged_in( ic );
367	}
368	}
369	}
370	else if( strcmp( cmd[0], "LSG" ) == 0 )
371	{
372	int num;
373
374	if( num_parts != 4 )
375	{
376	imcb_error( ic, "Syntax error" );
377	imc_logout( ic, TRUE );
378	return( 0 );
379	}
380
381	http_decode( cmd[2] );
382	num = atoi( cmd[1] );
383
384	if( num < md->groupcount )
385	md->grouplist[num] = g_strdup( cmd[2] );
386	}
387	else if( strcmp( cmd[0], "CHL" ) == 0 )
388	{
389	md5_state_t state;
390	md5_byte_t digest[16];
391	int i;
392
393	if( num_parts != 3 )
394	{
395	imcb_error( ic, "Syntax error" );
396	imc_logout( ic, TRUE );
397	return( 0 );
398	}
399
400	md5_init( &state );
401	md5_append( &state, (const md5_byte_t *) cmd[2], strlen( cmd[2] ) );
402	md5_append( &state, (const md5_byte_t *) QRY_CODE, strlen( QRY_CODE ) );
403	md5_finish( &state, digest );
404
405	g_snprintf( buf, sizeof( buf ), "QRY %d %s %d\r\n", ++md->trId, QRY_NAME, 32 );
406	for( i = 0; i < 16; i ++ )
407	g_snprintf( buf + strlen( buf ), 3, "%02x", digest[i] );
408
409	return( msn_write( ic, buf, strlen( buf ) ) );
410	}
411	else if( strcmp( cmd[0], "ILN" ) == 0 )
412	{
413	const struct msn_away_state *st;
414
415	if( num_parts != 6 )
416	{
417	imcb_error( ic, "Syntax error" );
418	imc_logout( ic, TRUE );
419	return( 0 );
420	}
421
422	http_decode( cmd[4] );
423	imcb_rename_buddy( ic, cmd[3], cmd[4] );
424
425	st = msn_away_state_by_code( cmd[2] );
426	if( !st )
427	{
428	/* FIXME: Warn/Bomb about unknown away state? */
429	st = msn_away_state_list + 1;
430	}
431
432	imcb_buddy_status( ic, cmd[3], OPT_LOGGED_IN \|
433	( st != msn_away_state_list ? OPT_AWAY : 0 ),
434	st->name, NULL );
435	}
436	else if( strcmp( cmd[0], "FLN" ) == 0 )
437	{
438	if( cmd[1] == NULL )
439	return 1;
440
441	imcb_buddy_status( ic, cmd[1], 0, NULL, NULL );
442
443	msn_sb_start_keepalives( msn_sb_by_handle( ic, cmd[1] ), TRUE );
444	}
445	else if( strcmp( cmd[0], "NLN" ) == 0 )
446	{
447	const struct msn_away_state *st;
448
449	if( num_parts != 5 )
450	{
451	imcb_error( ic, "Syntax error" );
452	imc_logout( ic, TRUE );
453	return( 0 );
454	}
455
456	http_decode( cmd[3] );
457	imcb_rename_buddy( ic, cmd[2], cmd[3] );
458
459	st = msn_away_state_by_code( cmd[1] );
460	if( !st )
461	{
462	/* FIXME: Warn/Bomb about unknown away state? */
463	st = msn_away_state_list + 1;
464	}
465
466	imcb_buddy_status( ic, cmd[2], OPT_LOGGED_IN \|
467	( st != msn_away_state_list ? OPT_AWAY : 0 ),
468	st->name, NULL );
469
470	msn_sb_stop_keepalives( msn_sb_by_handle( ic, cmd[2] ) );
471	}
472	else if( strcmp( cmd[0], "RNG" ) == 0 )
473	{
474	struct msn_switchboard *sb;
475	char *server;
476	int session, port;
477
478	if( num_parts != 7 )
479	{
480	imcb_error( ic, "Syntax error" );
481	imc_logout( ic, TRUE );
482	return( 0 );
483	}
484
485	session = atoi( cmd[1] );
486
487	server = strchr( cmd[2], ':' );
488	if( !server )
489	{
490	imcb_error( ic, "Syntax error" );
491	imc_logout( ic, TRUE );
492	return( 0 );
493	}
494	*server = 0;
495	port = atoi( server + 1 );
496	server = cmd[2];
497
498	if( strcmp( cmd[3], "CKI" ) != 0 )
499	{
500	imcb_error( ic, "Unknown authentication method for switchboard" );
501	imc_logout( ic, TRUE );
502	return( 0 );
503	}
504
505	debug( "Got a call from %s (session %d). Key = %s", cmd[5], session, cmd[4] );
506
507	if( ( sb = msn_sb_create( ic, server, port, cmd[4], session ) ) == NULL )
508	{
509	/* Although this isn't strictly fatal for the NS connection, it's
510	definitely something serious (we ran out of file descriptors?). */
511	imcb_error( ic, "Could not create new switchboard" );
512	imc_logout( ic, TRUE );
513	return( 0 );
514	}
515	else
516	{
517	sb->who = g_strdup( cmd[5] );
518	}
519	}
520	else if( strcmp( cmd[0], "ADD" ) == 0 )
521	{
522	if( num_parts == 6 && strcmp( cmd[2], "RL" ) == 0 )
523	{
524	GSList *l;
525
526	http_decode( cmd[5] );
527
528	if( strchr( cmd[4], '@' ) == NULL )
529	{
530	imcb_error( ic, "Syntax error" );
531	imc_logout( ic, TRUE );
532	return 0;
533	}
534
535	/* We got added by someone. If we don't have this
536	person in permit/deny yet, inform the user. */
537	for( l = ic->permit; l; l = l->next )
538	if( g_strcasecmp( l->data, cmd[4] ) == 0 )
539	return 1;
540
541	for( l = ic->deny; l; l = l->next )
542	if( g_strcasecmp( l->data, cmd[4] ) == 0 )
543	return 1;
544
545	msn_buddy_ask( ic, cmd[4], cmd[5] );
546	}
547	else if( num_parts >= 6 && strcmp( cmd[2], "FL" ) == 0 )
548	{
549	http_decode( cmd[5] );
550	imcb_add_buddy( ic, cmd[4], NULL );
551	imcb_rename_buddy( ic, cmd[4], cmd[5] );
552	}
553	}
554	else if( strcmp( cmd[0], "OUT" ) == 0 )
555	{
556	int allow_reconnect = TRUE;
557
558	if( cmd[1] && strcmp( cmd[1], "OTH" ) == 0 )
559	{
560	imcb_error( ic, "Someone else logged in with your account" );
561	allow_reconnect = FALSE;
562	}
563	else if( cmd[1] && strcmp( cmd[1], "SSD" ) == 0 )
564	{
565	imcb_error( ic, "Terminating session because of server shutdown" );
566	}
567	else
568	{
569	imcb_error( ic, "Session terminated by remote server (reason unknown)" );
570	}
571
572	imc_logout( ic, allow_reconnect );
573	return( 0 );
574	}
575	else if( strcmp( cmd[0], "REA" ) == 0 )
576	{
577	if( num_parts != 5 )
578	{
579	imcb_error( ic, "Syntax error" );
580	imc_logout( ic, TRUE );
581	return( 0 );
582	}
583
584	if( g_strcasecmp( cmd[3], ic->acc->user ) == 0 )
585	{
586	set_t *s;
587
588	http_decode( cmd[4] );
589	strncpy( ic->displayname, cmd[4], sizeof( ic->displayname ) );
590	ic->displayname[sizeof(ic->displayname)-1] = 0;
591
592	if( ( s = set_find( &ic->acc->set, "display_name" ) ) )
593	{
594	g_free( s->value );
595	s->value = g_strdup( cmd[4] );
596	}
597	}
598	else
599	{
600	/* This is not supposed to happen, but let's handle it anyway... */
601	http_decode( cmd[4] );
602	imcb_rename_buddy( ic, cmd[3], cmd[4] );
603	}
604	}
605	else if( strcmp( cmd[0], "IPG" ) == 0 )
606	{
607	imcb_error( ic, "Received IPG command, we don't handle them yet." );
608
609	md->handler->msglen = atoi( cmd[1] );
610
611	if( md->handler->msglen <= 0 )
612	{
613	imcb_error( ic, "Syntax error" );
614	imc_logout( ic, TRUE );
615	return( 0 );
616	}
617	}
618	else if( isdigit( cmd[0][0] ) )
619	{
620	int num = atoi( cmd[0] );
621	const struct msn_status_code *err = msn_status_by_number( num );
622
623	imcb_error( ic, "Error reported by MSN server: %s", err->text );
624
625	if( err->flags & STATUS_FATAL )
626	{
627	imc_logout( ic, TRUE );
628	return( 0 );
629	}
630	}
631	else
632	{
633	/* debug( "Received unknown command from main server: %s", cmd[0] ); */
634	}
635
636	return( 1 );
637	}
638
639	static int msn_ns_message( gpointer data, char msg, int msglen, char *cmd, int num_parts )
640	{
641	struct im_connection *ic = data;
642	char *body;
643	int blen = 0;
644
645	if( !num_parts )
646	return( 1 );
647
648	if( ( body = strstr( msg, "\r\n\r\n" ) ) )
649	{
650	body += 4;
651	blen = msglen - ( body - msg );
652	}
653
654	if( strcmp( cmd[0], "MSG" ) == 0 )
655	{
656	if( g_strcasecmp( cmd[1], "Hotmail" ) == 0 )
657	{
658	char *ct = msn_findheader( msg, "Content-Type:", msglen );
659
660	if( !ct )
661	return( 1 );
662
663	if( g_strncasecmp( ct, "application/x-msmsgssystemmessage", 33 ) == 0 )
664	{
665	char *mtype;
666	char *arg1;
667
668	if( !body )
669	return( 1 );
670
671	mtype = msn_findheader( body, "Type:", blen );
672	arg1 = msn_findheader( body, "Arg1:", blen );
673
674	if( mtype && strcmp( mtype, "1" ) == 0 )
675	{
676	if( arg1 )
677	imcb_log( ic, "The server is going down for maintenance in %s minutes.", arg1 );
678	}
679
680	g_free( arg1 );
681	g_free( mtype );
682	}
683	else if( g_strncasecmp( ct, "text/x-msmsgsprofile", 20 ) == 0 )
684	{
685	/* We don't care about this profile for now... */
686	}
687	else if( g_strncasecmp( ct, "text/x-msmsgsinitialemailnotification", 37 ) == 0 )
688	{
689	if( set_getbool( &ic->acc->set, "mail_notifications" ) )
690	{
691	char *inbox = msn_findheader( body, "Inbox-Unread:", blen );
692	char *folders = msn_findheader( body, "Folders-Unread:", blen );
693
694	if( inbox && folders )
695	imcb_log( ic, "INBOX contains %s new messages, plus %s messages in other folders.", inbox, folders );
696
697	g_free( inbox );
698	g_free( folders );
699	}
700	}
701	else if( g_strncasecmp( ct, "text/x-msmsgsemailnotification", 30 ) == 0 )
702	{
703	if( set_getbool( &ic->acc->set, "mail_notifications" ) )
704	{
705	char *from = msn_findheader( body, "From-Addr:", blen );
706	char *fromname = msn_findheader( body, "From:", blen );
707
708	if( from && fromname )
709	imcb_log( ic, "Received an e-mail message from %s <%s>.", fromname, from );
710
711	g_free( from );
712	g_free( fromname );
713	}
714	}
715	else if( g_strncasecmp( ct, "text/x-msmsgsactivemailnotification", 35 ) == 0 )
716	{
717	/* Sorry, but this one really is USELESS */
718	}
719	else
720	{
721	debug( "Can't handle %s packet from notification server", ct );
722	}
723
724	g_free( ct );
725	}
726	}
727
728	return( 1 );
729	}
730
731	static void msn_auth_got_passport_token( struct msn_auth_data *mad )
732	{
733	struct im_connection *ic = mad->data;
734	struct msn_data *md;
735
736	/* Dead connection? */
737	if( g_slist_find( msn_connections, ic ) == NULL )
738	return;
739
740	md = ic->proto_data;
741	if( mad->token )
742	{
743	char buf[1024];
744
745	g_snprintf( buf, sizeof( buf ), "USR %d TWN S %s\r\n", ++md->trId, mad->token );
746	msn_write( ic, buf, strlen( buf ) );
747	}
748	else
749	{
750	imcb_error( ic, "Error during Passport authentication: %s", mad->error );
751	imc_logout( ic, TRUE );
752	}
753	}

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

Download in other formats: