source: protocols/msn/ns.c @ 5ec4129

Last change on this file since 5ec4129 was 99f929c, checked in by Wilmer van der Gaast <wilmer@…>, at 2008-04-21T21:53:15Z

Now checking if msn_sb_create() returns NULL. This is very unlikely, but
can happen if we run out of file descriptors, for example.

  • Property mode set to 100644
File size: 17.2 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
32static gboolean msn_ns_callback( gpointer data, gint source, b_input_condition cond );
33static int msn_ns_command( gpointer data, char **cmd, int num_parts );
34static int msn_ns_message( gpointer data, char *msg, int msglen, char **cmd, int num_parts );
35
36static void msn_auth_got_passport_token( struct msn_auth_data *mad );
37
38gboolean 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
84static 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
100static 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                        http_decode( cmd[4] );
236                       
237                        strncpy( ic->displayname, cmd[4], sizeof( ic->displayname ) );
238                        ic->displayname[sizeof(ic->displayname)-1] = 0;
239                       
240                        if( ( s = set_find( &ic->acc->set, "display_name" ) ) )
241                        {
242                                g_free( s->value );
243                                s->value = g_strdup( cmd[4] );
244                        }
245                       
246                        imcb_log( ic, "Authenticated, getting buddy list" );
247                       
248                        g_snprintf( buf, sizeof( buf ), "SYN %d 0\r\n", ++md->trId );
249                        return( msn_write( ic, buf, strlen( buf ) ) );
250                }
251                else
252                {
253                        imcb_error( ic, "Unknown authentication type" );
254                        imc_logout( ic, FALSE );
255                        return( 0 );
256                }
257        }
258        else if( strcmp( cmd[0], "MSG" ) == 0 )
259        {
260                if( num_parts != 4 )
261                {
262                        imcb_error( ic, "Syntax error" );
263                        imc_logout( ic, TRUE );
264                        return( 0 );
265                }
266               
267                md->handler->msglen = atoi( cmd[3] );
268               
269                if( md->handler->msglen <= 0 )
270                {
271                        imcb_error( ic, "Syntax error" );
272                        imc_logout( ic, TRUE );
273                        return( 0 );
274                }
275        }
276        else if( strcmp( cmd[0], "SYN" ) == 0 )
277        {
278                if( num_parts == 5 )
279                {
280                        md->buddycount = atoi( cmd[3] );
281                        md->groupcount = atoi( cmd[4] );
282                        if( md->groupcount > 0 )
283                                md->grouplist = g_new0( char *, md->groupcount );
284                       
285                        if( !*cmd[3] || md->buddycount == 0 )
286                                msn_logged_in( ic );
287                }
288                else
289                {
290                        /* Hrrm... This SYN reply doesn't really look like something we expected.
291                           Let's assume everything is okay. */
292                       
293                        msn_logged_in( ic );
294                }
295        }
296        else if( strcmp( cmd[0], "LST" ) == 0 )
297        {
298                int list;
299               
300                if( num_parts != 4 && num_parts != 5 )
301                {
302                        imcb_error( ic, "Syntax error" );
303                        imc_logout( ic, TRUE );
304                        return( 0 );
305                }
306               
307                http_decode( cmd[2] );
308                list = atoi( cmd[3] );
309               
310                if( list & 1 ) /* FL */
311                {
312                        char *group = NULL;
313                        int num;
314                       
315                        if( cmd[4] != NULL && sscanf( cmd[4], "%d", &num ) == 1 && num < md->groupcount )
316                                group = md->grouplist[num];
317                       
318                        imcb_add_buddy( ic, cmd[1], group );
319                        imcb_rename_buddy( ic, cmd[1], cmd[2] );
320                }
321                if( list & 2 ) /* AL */
322                {
323                        ic->permit = g_slist_append( ic->permit, g_strdup( cmd[1] ) );
324                }
325                if( list & 4 ) /* BL */
326                {
327                        ic->deny = g_slist_append( ic->deny, g_strdup( cmd[1] ) );
328                }
329                if( list & 8 ) /* RL */
330                {
331                        if( ( list & 6 ) == 0 )
332                                msn_buddy_ask( ic, cmd[1], cmd[2] );
333                }
334               
335                if( --md->buddycount == 0 )
336                {
337                        if( ic->flags & OPT_LOGGED_IN )
338                        {
339                                imcb_log( ic, "Successfully transferred to different server" );
340                                g_snprintf( buf, sizeof( buf ), "CHG %d %s %d\r\n", ++md->trId, md->away_state->code, 0 );
341                                return( msn_write( ic, buf, strlen( buf ) ) );
342                        }
343                        else
344                        {
345                                msn_logged_in( ic );
346                        }
347                }
348        }
349        else if( strcmp( cmd[0], "LSG" ) == 0 )
350        {
351                int num;
352               
353                if( num_parts != 4 )
354                {
355                        imcb_error( ic, "Syntax error" );
356                        imc_logout( ic, TRUE );
357                        return( 0 );
358                }
359               
360                http_decode( cmd[2] );
361                num = atoi( cmd[1] );
362               
363                if( num < md->groupcount )
364                        md->grouplist[num] = g_strdup( cmd[2] );
365        }
366        else if( strcmp( cmd[0], "CHL" ) == 0 )
367        {
368                md5_state_t state;
369                md5_byte_t digest[16];
370                int i;
371               
372                if( num_parts != 3 )
373                {
374                        imcb_error( ic, "Syntax error" );
375                        imc_logout( ic, TRUE );
376                        return( 0 );
377                }
378               
379                md5_init( &state );
380                md5_append( &state, (const md5_byte_t *) cmd[2], strlen( cmd[2] ) );
381                md5_append( &state, (const md5_byte_t *) QRY_CODE, strlen( QRY_CODE ) );
382                md5_finish( &state, digest );
383               
384                g_snprintf( buf, sizeof( buf ), "QRY %d %s %d\r\n", ++md->trId, QRY_NAME, 32 );
385                for( i = 0; i < 16; i ++ )
386                        g_snprintf( buf + strlen( buf ), 3, "%02x", digest[i] );
387               
388                return( msn_write( ic, buf, strlen( buf ) ) );
389        }
390        else if( strcmp( cmd[0], "ILN" ) == 0 )
391        {
392                const struct msn_away_state *st;
393               
394                if( num_parts != 6 )
395                {
396                        imcb_error( ic, "Syntax error" );
397                        imc_logout( ic, TRUE );
398                        return( 0 );
399                }
400               
401                http_decode( cmd[4] );
402                imcb_rename_buddy( ic, cmd[3], cmd[4] );
403               
404                st = msn_away_state_by_code( cmd[2] );
405                if( !st )
406                {
407                        /* FIXME: Warn/Bomb about unknown away state? */
408                        st = msn_away_state_list;
409                }
410               
411                imcb_buddy_status( ic, cmd[3], OPT_LOGGED_IN |
412                                   ( st->number ? OPT_AWAY : 0 ), st->name, NULL );
413        }
414        else if( strcmp( cmd[0], "FLN" ) == 0 )
415        {
416                if( cmd[1] )
417                        imcb_buddy_status( ic, cmd[1], 0, NULL, NULL );
418        }
419        else if( strcmp( cmd[0], "NLN" ) == 0 )
420        {
421                const struct msn_away_state *st;
422               
423                if( num_parts != 5 )
424                {
425                        imcb_error( ic, "Syntax error" );
426                        imc_logout( ic, TRUE );
427                        return( 0 );
428                }
429               
430                http_decode( cmd[3] );
431                imcb_rename_buddy( ic, cmd[2], cmd[3] );
432               
433                st = msn_away_state_by_code( cmd[1] );
434                if( !st )
435                {
436                        /* FIXME: Warn/Bomb about unknown away state? */
437                        st = msn_away_state_list;
438                }
439               
440                imcb_buddy_status( ic, cmd[2], OPT_LOGGED_IN |
441                                   ( st->number ? OPT_AWAY : 0 ), st->name, NULL );
442        }
443        else if( strcmp( cmd[0], "RNG" ) == 0 )
444        {
445                struct msn_switchboard *sb;
446                char *server;
447                int session, port;
448               
449                if( num_parts != 7 )
450                {
451                        imcb_error( ic, "Syntax error" );
452                        imc_logout( ic, TRUE );
453                        return( 0 );
454                }
455               
456                session = atoi( cmd[1] );
457               
458                server = strchr( cmd[2], ':' );
459                if( !server )
460                {
461                        imcb_error( ic, "Syntax error" );
462                        imc_logout( ic, TRUE );
463                        return( 0 );
464                }
465                *server = 0;
466                port = atoi( server + 1 );
467                server = cmd[2];
468               
469                if( strcmp( cmd[3], "CKI" ) != 0 )
470                {
471                        imcb_error( ic, "Unknown authentication method for switchboard" );
472                        imc_logout( ic, TRUE );
473                        return( 0 );
474                }
475               
476                debug( "Got a call from %s (session %d). Key = %s", cmd[5], session, cmd[4] );
477               
478                if( ( sb = msn_sb_create( ic, server, port, cmd[4], session ) ) == NULL )
479                {
480                        /* Although this isn't strictly fatal for the NS connection, it's
481                           definitely something serious (we ran out of file descriptors?). */
482                        imcb_error( ic, "Could not create new switchboard" );
483                        imc_logout( ic, TRUE );
484                        return( 0 );
485                }
486                else
487                {
488                        sb->who = g_strdup( cmd[5] );
489                }
490        }
491        else if( strcmp( cmd[0], "ADD" ) == 0 )
492        {
493                if( num_parts == 6 && strcmp( cmd[2], "RL" ) == 0 )
494                {
495                        GSList *l;
496                       
497                        http_decode( cmd[5] );
498                       
499                        if( strchr( cmd[4], '@' ) == NULL )
500                        {
501                                imcb_error( ic, "Syntax error" );
502                                imc_logout( ic, TRUE );
503                                return 0;
504                        }
505                       
506                        /* We got added by someone. If we don't have this
507                           person in permit/deny yet, inform the user. */
508                        for( l = ic->permit; l; l = l->next )
509                                if( g_strcasecmp( l->data, cmd[4] ) == 0 )
510                                        return 1;
511                       
512                        for( l = ic->deny; l; l = l->next )
513                                if( g_strcasecmp( l->data, cmd[4] ) == 0 )
514                                        return 1;
515                       
516                        msn_buddy_ask( ic, cmd[4], cmd[5] );
517                }
518                else if( num_parts >= 6 && strcmp( cmd[2], "FL" ) == 0 )
519                {
520                        http_decode( cmd[5] );
521                        imcb_add_buddy( ic, cmd[4], NULL );
522                        imcb_rename_buddy( ic, cmd[4], cmd[5] );
523                }
524        }
525        else if( strcmp( cmd[0], "OUT" ) == 0 )
526        {
527                int allow_reconnect = TRUE;
528               
529                if( cmd[1] && strcmp( cmd[1], "OTH" ) == 0 )
530                {
531                        imcb_error( ic, "Someone else logged in with your account" );
532                        allow_reconnect = FALSE;
533                }
534                else if( cmd[1] && strcmp( cmd[1], "SSD" ) == 0 )
535                {
536                        imcb_error( ic, "Terminating session because of server shutdown" );
537                }
538                else
539                {
540                        imcb_error( ic, "Session terminated by remote server (reason unknown)" );
541                }
542               
543                imc_logout( ic, allow_reconnect );
544                return( 0 );
545        }
546        else if( strcmp( cmd[0], "REA" ) == 0 )
547        {
548                if( num_parts != 5 )
549                {
550                        imcb_error( ic, "Syntax error" );
551                        imc_logout( ic, TRUE );
552                        return( 0 );
553                }
554               
555                if( g_strcasecmp( cmd[3], ic->acc->user ) == 0 )
556                {
557                        set_t *s;
558                       
559                        http_decode( cmd[4] );
560                        strncpy( ic->displayname, cmd[4], sizeof( ic->displayname ) );
561                        ic->displayname[sizeof(ic->displayname)-1] = 0;
562                       
563                        if( ( s = set_find( &ic->acc->set, "display_name" ) ) )
564                        {
565                                g_free( s->value );
566                                s->value = g_strdup( cmd[4] );
567                        }
568                }
569                else
570                {
571                        /* This is not supposed to happen, but let's handle it anyway... */
572                        http_decode( cmd[4] );
573                        imcb_rename_buddy( ic, cmd[3], cmd[4] );
574                }
575        }
576        else if( strcmp( cmd[0], "IPG" ) == 0 )
577        {
578                imcb_error( ic, "Received IPG command, we don't handle them yet." );
579               
580                md->handler->msglen = atoi( cmd[1] );
581               
582                if( md->handler->msglen <= 0 )
583                {
584                        imcb_error( ic, "Syntax error" );
585                        imc_logout( ic, TRUE );
586                        return( 0 );
587                }
588        }
589        else if( isdigit( cmd[0][0] ) )
590        {
591                int num = atoi( cmd[0] );
592                const struct msn_status_code *err = msn_status_by_number( num );
593               
594                imcb_error( ic, "Error reported by MSN server: %s", err->text );
595               
596                if( err->flags & STATUS_FATAL )
597                {
598                        imc_logout( ic, TRUE );
599                        return( 0 );
600                }
601        }
602        else
603        {
604                /* debug( "Received unknown command from main server: %s", cmd[0] ); */
605        }
606       
607        return( 1 );
608}
609
610static int msn_ns_message( gpointer data, char *msg, int msglen, char **cmd, int num_parts )
611{
612        struct im_connection *ic = data;
613        char *body;
614        int blen = 0;
615       
616        if( !num_parts )
617                return( 1 );
618       
619        if( ( body = strstr( msg, "\r\n\r\n" ) ) )
620        {
621                body += 4;
622                blen = msglen - ( body - msg );
623        }
624       
625        if( strcmp( cmd[0], "MSG" ) == 0 )
626        {
627                if( g_strcasecmp( cmd[1], "Hotmail" ) == 0 )
628                {
629                        char *ct = msn_findheader( msg, "Content-Type:", msglen );
630                       
631                        if( !ct )
632                                return( 1 );
633                       
634                        if( g_strncasecmp( ct, "application/x-msmsgssystemmessage", 33 ) == 0 )
635                        {
636                                char *mtype;
637                                char *arg1;
638                               
639                                if( !body )
640                                        return( 1 );
641                               
642                                mtype = msn_findheader( body, "Type:", blen );
643                                arg1 = msn_findheader( body, "Arg1:", blen );
644                               
645                                if( mtype && strcmp( mtype, "1" ) == 0 )
646                                {
647                                        if( arg1 )
648                                                imcb_log( ic, "The server is going down for maintenance in %s minutes.", arg1 );
649                                }
650                               
651                                if( arg1 ) g_free( arg1 );
652                                if( mtype ) g_free( mtype );
653                        }
654                        else if( g_strncasecmp( ct, "text/x-msmsgsprofile", 20 ) == 0 )
655                        {
656                                /* We don't care about this profile for now... */
657                        }
658                        else if( g_strncasecmp( ct, "text/x-msmsgsinitialemailnotification", 37 ) == 0 )
659                        {
660                                char *inbox = msn_findheader( body, "Inbox-Unread:", blen );
661                                char *folders = msn_findheader( body, "Folders-Unread:", blen );
662                               
663                                if( inbox && folders && set_getbool( &ic->acc->set, "mail_notifications" ) )
664                                {
665                                        imcb_log( ic, "INBOX contains %s new messages, plus %s messages in other folders.", inbox, folders );
666                                }
667                        }
668                        else if( g_strncasecmp( ct, "text/x-msmsgsemailnotification", 30 ) == 0 )
669                        {
670                                char *from = msn_findheader( body, "From-Addr:", blen );
671                                char *fromname = msn_findheader( body, "From:", blen );
672                               
673                                if( from && fromname && set_getbool( &ic->acc->set, "mail_notifications" ) )
674                                {
675                                        imcb_log( ic, "Received an e-mail message from %s <%s>.", fromname, from );
676                                }
677                        }
678                        else if( g_strncasecmp( ct, "text/x-msmsgsactivemailnotification", 35 ) == 0 )
679                        {
680                                /* Sorry, but this one really is *USELESS* */
681                        }
682                        else
683                        {
684                                debug( "Can't handle %s packet from notification server", ct );
685                        }
686                       
687                        g_free( ct );
688                }
689        }
690       
691        return( 1 );
692}
693
694static void msn_auth_got_passport_token( struct msn_auth_data *mad )
695{
696        struct im_connection *ic = mad->data;
697        struct msn_data *md;
698       
699        /* Dead connection? */
700        if( g_slist_find( msn_connections, ic ) == NULL )
701                return;
702       
703        md = ic->proto_data;
704        if( mad->token )
705        {
706                char buf[1024];
707               
708                g_snprintf( buf, sizeof( buf ), "USR %d TWN S %s\r\n", ++md->trId, mad->token );
709                msn_write( ic, buf, strlen( buf ) );
710        }
711        else
712        {
713                imcb_error( ic, "Error during Passport authentication: %s", mad->error );
714                imc_logout( ic, TRUE );
715        }
716}
Note: See TracBrowser for help on using the repository browser.