source: protocols/msn/ns.c @ 36f6ab3

Last change on this file since 36f6ab3 was e132b60, checked in by Wilmer van der Gaast <wilmer@…>, at 2012-11-11T23:32:47Z

Extend keepalive code to time out connections when pings don't get
acknowledged, using this for Twitter streams and MSN so far.

  • Property mode set to 100644
File size: 25.7 KB
Line 
1  /********************************************************************\
2  * BitlBee -- An IRC to other IM-networks gateway                     *
3  *                                                                    *
4  * Copyright 2002-2012 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 <sys/utsname.h>
28#include "nogaim.h"
29#include "msn.h"
30#include "md5.h"
31#include "sha1.h"
32#include "soap.h"
33#include "xmltree.h"
34
35static gboolean msn_ns_connected( gpointer data, gint source, b_input_condition cond );
36static gboolean msn_ns_callback( gpointer data, gint source, b_input_condition cond );
37static int msn_ns_command( struct msn_handler_data *handler, char **cmd, int num_parts );
38static int msn_ns_message( struct msn_handler_data *handler, char *msg, int msglen, char **cmd, int num_parts );
39
40static void msn_ns_send_adl_start( struct im_connection *ic );
41static void msn_ns_send_adl( struct im_connection *ic );
42
43int msn_ns_write( struct im_connection *ic, int fd, const char *fmt, ... )
44{
45        struct msn_data *md = ic->proto_data;
46        va_list params;
47        char *out;
48        size_t len;
49        int st;
50       
51        va_start( params, fmt );
52        out = g_strdup_vprintf( fmt, params );
53        va_end( params );
54       
55        if( fd < 0 )
56                fd = md->ns->fd;
57       
58        if( getenv( "BITLBEE_DEBUG" ) )
59                fprintf( stderr, "->NS%d:%s\n", fd, out );
60       
61        len = strlen( out );
62        st = write( fd, out, len );
63        g_free( out );
64        if( st != len )
65        {
66                imcb_error( ic, "Short write() to main server" );
67                imc_logout( ic, TRUE );
68                return 0;
69        }
70       
71        return 1;
72}
73
74gboolean msn_ns_connect( struct im_connection *ic, struct msn_handler_data *handler, const char *host, int port )
75{
76        if( handler->fd >= 0 )
77                closesocket( handler->fd );
78       
79        handler->exec_command = msn_ns_command;
80        handler->exec_message = msn_ns_message;
81        handler->data = ic;
82        handler->fd = proxy_connect( host, port, msn_ns_connected, handler );
83        if( handler->fd < 0 )
84        {
85                imcb_error( ic, "Could not connect to server" );
86                imc_logout( ic, TRUE );
87                return FALSE;
88        }
89       
90        return TRUE;
91}
92
93static gboolean msn_ns_connected( gpointer data, gint source, b_input_condition cond )
94{
95        struct msn_handler_data *handler = data;
96        struct im_connection *ic = handler->data;
97        struct msn_data *md;
98       
99        if( !g_slist_find( msn_connections, ic ) )
100                return FALSE;
101       
102        md = ic->proto_data;
103       
104        if( source == -1 )
105        {
106                imcb_error( ic, "Could not connect to server" );
107                imc_logout( ic, TRUE );
108                return FALSE;
109        }
110       
111        g_free( handler->rxq );
112        handler->rxlen = 0;
113        handler->rxq = g_new0( char, 1 );
114       
115        if( md->uuid == NULL )
116        {
117                struct utsname name;
118                sha1_state_t sha[1];
119               
120                /* UUID == SHA1("BitlBee" + my hostname + MSN username) */
121                sha1_init( sha );
122                sha1_append( sha, (void*) "BitlBee", 7 );
123                if( uname( &name ) == 0 )
124                {
125                        sha1_append( sha, (void*) name.nodename, strlen( name.nodename ) );
126                }
127                sha1_append( sha, (void*) ic->acc->user, strlen( ic->acc->user ) );
128                md->uuid = sha1_random_uuid( sha );
129                memcpy( md->uuid, "b171be3e", 8 ); /* :-P */
130        }
131       
132        if( msn_ns_write( ic, source, "VER %d %s CVR0\r\n", ++md->trId, MSNP_VER ) )
133        {
134                handler->inpa = b_input_add( handler->fd, B_EV_IO_READ, msn_ns_callback, handler );
135                imcb_log( ic, "Connected to server, waiting for reply" );
136        }
137       
138        return FALSE;
139}
140
141void msn_ns_close( struct msn_handler_data *handler )
142{
143        if( handler->fd >= 0 )
144        {
145                closesocket( handler->fd );
146                b_event_remove( handler->inpa );
147        }
148       
149        handler->fd = handler->inpa = -1;
150        g_free( handler->rxq );
151        g_free( handler->cmd_text );
152       
153        handler->rxlen = 0;
154        handler->rxq = NULL;
155        handler->cmd_text = NULL;
156}
157
158static gboolean msn_ns_callback( gpointer data, gint source, b_input_condition cond )
159{
160        struct msn_handler_data *handler = data;
161        struct im_connection *ic = handler->data;
162       
163        if( msn_handler( handler ) == -1 ) /* Don't do this on ret == 0, it's already done then. */
164        {
165                imcb_error( ic, "Error while reading from server" );
166                imc_logout( ic, TRUE );
167               
168                return FALSE;
169        }
170        else
171                return TRUE;
172}
173
174static int msn_ns_command( struct msn_handler_data *handler, char **cmd, int num_parts )
175{
176        struct im_connection *ic = handler->data;
177        struct msn_data *md = ic->proto_data;
178       
179        if( num_parts == 0 )
180        {
181                /* Hrrm... Empty command...? Ignore? */
182                return( 1 );
183        }
184       
185        if( strcmp( cmd[0], "VER" ) == 0 )
186        {
187                if( cmd[2] && strncmp( cmd[2], MSNP_VER, 5 ) != 0 )
188                {
189                        imcb_error( ic, "Unsupported protocol" );
190                        imc_logout( ic, FALSE );
191                        return( 0 );
192                }
193               
194                return( msn_ns_write( ic, handler->fd, "CVR %d 0x0409 mac 10.2.0 ppc macmsgs 3.5.1 macmsgs %s\r\n",
195                                      ++md->trId, ic->acc->user ) );
196        }
197        else if( strcmp( cmd[0], "CVR" ) == 0 )
198        {
199                /* We don't give a damn about the information we just received */
200                return msn_ns_write( ic, handler->fd, "USR %d SSO I %s\r\n", ++md->trId, ic->acc->user );
201        }
202        else if( strcmp( cmd[0], "XFR" ) == 0 )
203        {
204                char *server;
205                int port;
206               
207                if( num_parts >= 6 && strcmp( cmd[2], "NS" ) == 0 )
208                {
209                        b_event_remove( handler->inpa );
210                        handler->inpa = -1;
211                       
212                        server = strchr( cmd[3], ':' );
213                        if( !server )
214                        {
215                                imcb_error( ic, "Syntax error" );
216                                imc_logout( ic, TRUE );
217                                return( 0 );
218                        }
219                        *server = 0;
220                        port = atoi( server + 1 );
221                        server = cmd[3];
222                       
223                        imcb_log( ic, "Transferring to other server" );
224                        return msn_ns_connect( ic, handler, server, port );
225                }
226                else if( num_parts >= 6 && strcmp( cmd[2], "SB" ) == 0 )
227                {
228                        struct msn_switchboard *sb;
229                       
230                        server = strchr( cmd[3], ':' );
231                        if( !server )
232                        {
233                                imcb_error( ic, "Syntax error" );
234                                imc_logout( ic, TRUE );
235                                return( 0 );
236                        }
237                        *server = 0;
238                        port = atoi( server + 1 );
239                        server = cmd[3];
240                       
241                        if( strcmp( cmd[4], "CKI" ) != 0 )
242                        {
243                                imcb_error( ic, "Unknown authentication method for switchboard" );
244                                imc_logout( ic, TRUE );
245                                return( 0 );
246                        }
247                       
248                        debug( "Connecting to a new switchboard with key %s", cmd[5] );
249
250                        if( ( sb = msn_sb_create( ic, server, port, cmd[5], MSN_SB_NEW ) ) == NULL )
251                        {
252                                /* Although this isn't strictly fatal for the NS connection, it's
253                                   definitely something serious (we ran out of file descriptors?). */
254                                imcb_error( ic, "Could not create new switchboard" );
255                                imc_logout( ic, TRUE );
256                                return( 0 );
257                        }
258                       
259                        if( md->msgq )
260                        {
261                                struct msn_message *m = md->msgq->data;
262                                GSList *l;
263                               
264                                sb->who = g_strdup( m->who );
265                               
266                                /* Move all the messages to the first user in the message
267                                   queue to the switchboard message queue. */
268                                l = md->msgq;
269                                while( l )
270                                {
271                                        m = l->data;
272                                        l = l->next;
273                                        if( strcmp( m->who, sb->who ) == 0 )
274                                        {
275                                                sb->msgq = g_slist_append( sb->msgq, m );
276                                                md->msgq = g_slist_remove( md->msgq, m );
277                                        }
278                                }
279                        }
280                }
281                else
282                {
283                        imcb_error( ic, "Syntax error" );
284                        imc_logout( ic, TRUE );
285                        return( 0 );
286                }
287        }
288        else if( strcmp( cmd[0], "USR" ) == 0 )
289        {
290                if( num_parts >= 6 && strcmp( cmd[2], "SSO" ) == 0 &&
291                    strcmp( cmd[3], "S" ) == 0 )
292                {
293                        g_free( md->pp_policy );
294                        md->pp_policy = g_strdup( cmd[4] );
295                        msn_soap_passport_sso_request( ic, cmd[5] );
296                }
297                else if( strcmp( cmd[2], "OK" ) == 0 )
298                {
299                        /* If the number after the handle is 0, the e-mail
300                           address is unverified, which means we can't change
301                           the display name. */
302                        if( cmd[4][0] == '0' )
303                                md->flags |= MSN_EMAIL_UNVERIFIED;
304                       
305                        imcb_log( ic, "Authenticated, getting buddy list" );
306                        msn_soap_memlist_request( ic );
307                }
308                else
309                {
310                        imcb_error( ic, "Unknown authentication type" );
311                        imc_logout( ic, FALSE );
312                        return( 0 );
313                }
314        }
315        else if( strcmp( cmd[0], "MSG" ) == 0 )
316        {
317                if( num_parts < 4 )
318                {
319                        imcb_error( ic, "Syntax error" );
320                        imc_logout( ic, TRUE );
321                        return( 0 );
322                }
323               
324                handler->msglen = atoi( cmd[3] );
325               
326                if( handler->msglen <= 0 )
327                {
328                        imcb_error( ic, "Syntax error" );
329                        imc_logout( ic, TRUE );
330                        return( 0 );
331                }
332        }
333        else if( strcmp( cmd[0], "BLP" ) == 0 )
334        {
335                msn_ns_send_adl_start( ic );
336                return msn_ns_finish_login( ic );
337        }
338        else if( strcmp( cmd[0], "ADL" ) == 0 )
339        {
340                if( num_parts >= 3 && strcmp( cmd[2], "OK" ) == 0 )
341                {
342                        msn_ns_send_adl( ic );
343                        return msn_ns_finish_login( ic );
344                }
345                else if( num_parts >= 3 )
346                {
347                        handler->msglen = atoi( cmd[2] );
348                }
349        }
350        else if( strcmp( cmd[0], "PRP" ) == 0 )
351        {
352                imcb_connected( ic );
353        }
354        else if( strcmp( cmd[0], "CHL" ) == 0 )
355        {
356                char *resp;
357                int st;
358               
359                if( num_parts < 3 )
360                {
361                        imcb_error( ic, "Syntax error" );
362                        imc_logout( ic, TRUE );
363                        return( 0 );
364                }
365               
366                resp = msn_p11_challenge( cmd[2] );
367               
368                st =  msn_ns_write( ic, -1, "QRY %d %s %zd\r\n%s",
369                                    ++md->trId, MSNP11_PROD_ID,
370                                    strlen( resp ), resp );
371                g_free( resp );
372                return st;
373        }
374        else if( strcmp( cmd[0], "ILN" ) == 0 || strcmp( cmd[0], "NLN" ) == 0 )
375        {
376                const struct msn_away_state *st;
377                const char *handle;
378                int cap = 0;
379               
380                if( num_parts < 6 )
381                {
382                        imcb_error( ic, "Syntax error" );
383                        imc_logout( ic, TRUE );
384                        return( 0 );
385                }
386                /* ILN and NLN are more or less the same, except ILN has a trId
387                   at the start, and NLN has a capability field at the end.
388                   Does ILN still exist BTW? */
389                if( cmd[0][1] == 'I' )
390                        cmd ++;
391                else
392                        cap = atoi( cmd[4] );
393
394                handle = msn_normalize_handle( cmd[2] );
395                if( strcmp( handle, ic->acc->user ) == 0 )
396                        return 1; /* That's me! */
397               
398                http_decode( cmd[3] );
399                imcb_rename_buddy( ic, handle, cmd[3] );
400               
401                st = msn_away_state_by_code( cmd[1] );
402                if( !st )
403                {
404                        /* FIXME: Warn/Bomb about unknown away state? */
405                        st = msn_away_state_list + 1;
406                }
407               
408                imcb_buddy_status( ic, handle, OPT_LOGGED_IN | 
409                                   ( st != msn_away_state_list ? OPT_AWAY : 0 ) |
410                                   ( cap & 1 ? OPT_MOBILE : 0 ),
411                                   st->name, NULL );
412               
413                msn_sb_stop_keepalives( msn_sb_by_handle( ic, handle ) );
414        }
415        else if( strcmp( cmd[0], "FLN" ) == 0 )
416        {
417                const char *handle;
418               
419                if( cmd[1] == NULL )
420                        return 1;
421               
422                handle = msn_normalize_handle( cmd[1] );
423                imcb_buddy_status( ic, handle, 0, NULL, NULL );
424                msn_sb_start_keepalives( msn_sb_by_handle( ic, handle ), TRUE );
425        }
426        else if( strcmp( cmd[0], "RNG" ) == 0 )
427        {
428                struct msn_switchboard *sb;
429                char *server;
430                int session, port;
431               
432                if( num_parts < 7 )
433                {
434                        imcb_error( ic, "Syntax error" );
435                        imc_logout( ic, TRUE );
436                        return( 0 );
437                }
438               
439                session = atoi( cmd[1] );
440               
441                server = strchr( cmd[2], ':' );
442                if( !server )
443                {
444                        imcb_error( ic, "Syntax error" );
445                        imc_logout( ic, TRUE );
446                        return( 0 );
447                }
448                *server = 0;
449                port = atoi( server + 1 );
450                server = cmd[2];
451               
452                if( strcmp( cmd[3], "CKI" ) != 0 )
453                {
454                        imcb_error( ic, "Unknown authentication method for switchboard" );
455                        imc_logout( ic, TRUE );
456                        return( 0 );
457                }
458               
459                debug( "Got a call from %s (session %d). Key = %s", cmd[5], session, cmd[4] );
460               
461                if( ( sb = msn_sb_create( ic, server, port, cmd[4], session ) ) == NULL )
462                {
463                        /* Although this isn't strictly fatal for the NS connection, it's
464                           definitely something serious (we ran out of file descriptors?). */
465                        imcb_error( ic, "Could not create new switchboard" );
466                        imc_logout( ic, TRUE );
467                        return( 0 );
468                }
469                else
470                {
471                        sb->who = g_strdup( msn_normalize_handle( cmd[5] ) );
472                }
473        }
474        else if( strcmp( cmd[0], "OUT" ) == 0 )
475        {
476                int allow_reconnect = TRUE;
477               
478                if( cmd[1] && strcmp( cmd[1], "OTH" ) == 0 )
479                {
480                        imcb_error( ic, "Someone else logged in with your account" );
481                        allow_reconnect = FALSE;
482                }
483                else if( cmd[1] && strcmp( cmd[1], "SSD" ) == 0 )
484                {
485                        imcb_error( ic, "Terminating session because of server shutdown" );
486                }
487                else
488                {
489                        imcb_error( ic, "Session terminated by remote server (%s)",
490                                    cmd[1] ? cmd[1] : "reason unknown)" );
491                }
492               
493                imc_logout( ic, allow_reconnect );
494                return( 0 );
495        }
496        else if( strcmp( cmd[0], "IPG" ) == 0 )
497        {
498                imcb_error( ic, "Received IPG command, we don't handle them yet." );
499               
500                handler->msglen = atoi( cmd[1] );
501               
502                if( handler->msglen <= 0 )
503                {
504                        imcb_error( ic, "Syntax error" );
505                        imc_logout( ic, TRUE );
506                        return( 0 );
507                }
508        }
509#if 0
510        else if( strcmp( cmd[0], "ADG" ) == 0 )
511        {
512                char *group = g_strdup( cmd[3] );
513                int groupnum, i;
514                GSList *l, *next;
515               
516                http_decode( group );
517                if( sscanf( cmd[4], "%d", &groupnum ) == 1 )
518                {
519                        if( groupnum >= md->groupcount )
520                        {
521                                md->grouplist = g_renew( char *, md->grouplist, groupnum + 1 );
522                                for( i = md->groupcount; i <= groupnum; i ++ )
523                                        md->grouplist[i] = NULL;
524                                md->groupcount = groupnum + 1;
525                        }
526                        g_free( md->grouplist[groupnum] );
527                        md->grouplist[groupnum] = group;
528                }
529                else
530                {
531                        /* Shouldn't happen, but if it does, give up on the group. */
532                        g_free( group );
533                        imcb_error( ic, "Syntax error" );
534                        imc_logout( ic, TRUE );
535                        return 0;
536                }
537               
538                for( l = md->grpq; l; l = next )
539                {
540                        struct msn_groupadd *ga = l->data;
541                        next = l->next;
542                        if( g_strcasecmp( ga->group, group ) == 0 )
543                        {
544                                if( !msn_buddy_list_add( ic, "FL", ga->who, ga->who, group ) )
545                                        return 0;
546                               
547                                g_free( ga->group );
548                                g_free( ga->who );
549                                g_free( ga );
550                                md->grpq = g_slist_remove( md->grpq, ga );
551                        }
552                }
553        }
554#endif
555        else if( strcmp( cmd[0], "GCF" ) == 0 )
556        {
557                /* Coming up is cmd[2] bytes of stuff we're supposed to
558                   censore. Meh. */
559                handler->msglen = atoi( cmd[2] );
560        }
561        else if( strcmp( cmd[0], "UBX" ) == 0 )
562        {
563                /* Status message. */
564                if( num_parts >= 3 )
565                        handler->msglen = atoi( cmd[2] );
566        }
567        else if( strcmp( cmd[0], "NOT" ) == 0 )
568        {
569                /* Some kind of notification, poorly documented but
570                   apparently used to announce address book changes. */
571                if( num_parts >= 2 )
572                        handler->msglen = atoi( cmd[1] );
573        }
574        else if( strcmp( cmd[0], "UBM" ) == 0 )
575        {
576                if( num_parts >= 7 )
577                        handler->msglen = atoi( cmd[6] );
578        }
579        else if( strcmp( cmd[0], "QNG" ) == 0 )
580        {
581                ic->flags |= OPT_PONGED;
582        }
583        else if( isdigit( cmd[0][0] ) )
584        {
585                int num = atoi( cmd[0] );
586                const struct msn_status_code *err = msn_status_by_number( num );
587               
588                imcb_error( ic, "Error reported by MSN server: %s", err->text );
589               
590                if( err->flags & STATUS_FATAL )
591                {
592                        imc_logout( ic, TRUE );
593                        return( 0 );
594                }
595               
596                /* Oh yes, errors can have payloads too now. Discard them for now. */
597                if( num_parts >= 3 )
598                        handler->msglen = atoi( cmd[2] );
599        }
600        else
601        {
602                /* debug( "Received unknown command from main server: %s", cmd[0] ); */
603        }
604       
605        return( 1 );
606}
607
608static int msn_ns_message( struct msn_handler_data *handler, char *msg, int msglen, char **cmd, int num_parts )
609{
610        struct im_connection *ic = handler->data;
611        char *body;
612        int blen = 0;
613       
614        if( !num_parts )
615                return( 1 );
616       
617        if( ( body = strstr( msg, "\r\n\r\n" ) ) )
618        {
619                body += 4;
620                blen = msglen - ( body - msg );
621        }
622       
623        if( strcmp( cmd[0], "MSG" ) == 0 )
624        {
625                if( g_strcasecmp( cmd[1], "Hotmail" ) == 0 )
626                {
627                        char *ct = get_rfc822_header( msg, "Content-Type:", msglen );
628                       
629                        if( !ct )
630                                return( 1 );
631                       
632                        if( g_strncasecmp( ct, "application/x-msmsgssystemmessage", 33 ) == 0 )
633                        {
634                                char *mtype;
635                                char *arg1;
636                               
637                                if( !body )
638                                        return( 1 );
639                               
640                                mtype = get_rfc822_header( body, "Type:", blen );
641                                arg1 = get_rfc822_header( body, "Arg1:", blen );
642                               
643                                if( mtype && strcmp( mtype, "1" ) == 0 )
644                                {
645                                        if( arg1 )
646                                                imcb_log( ic, "The server is going down for maintenance in %s minutes.", arg1 );
647                                }
648                               
649                                g_free( arg1 );
650                                g_free( mtype );
651                        }
652                        else if( g_strncasecmp( ct, "text/x-msmsgsprofile", 20 ) == 0 )
653                        {
654                                /* We don't care about this profile for now... */
655                        }
656                        else if( g_strncasecmp( ct, "text/x-msmsgsinitialemailnotification", 37 ) == 0 )
657                        {
658                                if( set_getbool( &ic->acc->set, "mail_notifications" ) )
659                                {
660                                        char *inbox = get_rfc822_header( body, "Inbox-Unread:", blen );
661                                        char *folders = get_rfc822_header( body, "Folders-Unread:", blen );
662
663                                        if( inbox && folders )
664                                                imcb_log( ic, "INBOX contains %s new messages, plus %s messages in other folders.", inbox, folders );
665                                       
666                                        g_free( inbox );
667                                        g_free( folders );
668                                }
669                        }
670                        else if( g_strncasecmp( ct, "text/x-msmsgsemailnotification", 30 ) == 0 )
671                        {
672                                if( set_getbool( &ic->acc->set, "mail_notifications" ) )
673                                {
674                                        char *from = get_rfc822_header( body, "From-Addr:", blen );
675                                        char *fromname = get_rfc822_header( body, "From:", blen );
676                                       
677                                        if( from && fromname )
678                                                imcb_log( ic, "Received an e-mail message from %s <%s>.", fromname, from );
679
680                                        g_free( from );
681                                        g_free( fromname );
682                                }
683                        }
684                        else if( g_strncasecmp( ct, "text/x-msmsgsactivemailnotification", 35 ) == 0 )
685                        {
686                        }
687                        else if( g_strncasecmp( ct, "text/x-msmsgsinitialmdatanotification", 37 ) == 0 ||
688                                 g_strncasecmp( ct, "text/x-msmsgsoimnotification", 28 ) == 0 )
689                        {
690                                /* We received an offline message. Or at least notification
691                                   that there is one waiting for us. Fetching the message(s)
692                                   and purging them from the server is a lot of SOAPy work
693                                   not worth doing IMHO. Also I thought it was possible to
694                                   have the notification server send them directly, I was
695                                   pretty sure I saw Pidgin do it..
696                                   
697                                   At least give a notification for now, seems like a
698                                   reasonable thing to do. Only problem is, they'll keep
699                                   coming back at login time until you read them using a
700                                   different client. :-( */
701                               
702                                char *xml = get_rfc822_header( body, "Mail-Data:", blen );
703                                struct xt_node *md, *m;
704                               
705                                if( !xml )
706                                        return 1;
707                                md = xt_from_string( xml, 0 );
708                                if( !md )
709                                        return 1;
710                               
711                                for( m = md->children; ( m = xt_find_node( m, "M" ) ); m = m->next )
712                                {
713                                        struct xt_node *e = xt_find_node( m->children, "E" );
714                                        struct xt_node *rt = xt_find_node( m->children, "RT" );
715                                        struct tm tp;
716                                        time_t msgtime = 0;
717                                       
718                                        if( !e || !e->text )
719                                                continue;
720                                       
721                                        memset( &tp, 0, sizeof( tp ) );
722                                        if( rt && rt->text &&
723                                            sscanf( rt->text, "%4d-%2d-%2dT%2d:%2d:%2d.",
724                                                    &tp.tm_year, &tp.tm_mon, &tp.tm_mday,
725                                                    &tp.tm_hour, &tp.tm_min, &tp.tm_sec ) == 6 )
726                                        {
727                                                tp.tm_year -= 1900;
728                                                tp.tm_mon --;
729                                                msgtime = mktime_utc( &tp );
730                                               
731                                        }
732                                        imcb_buddy_msg( ic, e->text, "<< \002BitlBee\002 - Received offline message. BitlBee can't show these. >>", 0, msgtime );
733                                }
734                               
735                                g_free( xml );
736                                xt_free_node( md );
737                        }
738                        else
739                        {
740                                debug( "Can't handle %s packet from notification server", ct );
741                        }
742                       
743                        g_free( ct );
744                }
745        }
746        else if( strcmp( cmd[0], "UBX" ) == 0 )
747        {
748                struct xt_node *ubx, *psm;
749                char *psm_text = NULL;
750               
751                ubx = xt_from_string( msg, msglen );
752                if( ubx && strcmp( ubx->name, "Data" ) == 0 &&
753                    ( psm = xt_find_node( ubx->children, "PSM" ) ) )
754                        psm_text = psm->text;
755               
756                imcb_buddy_status_msg( ic, msn_normalize_handle( cmd[1] ), psm_text );
757                xt_free_node( ubx );
758        }
759        else if( strcmp( cmd[0], "ADL" ) == 0 )
760        {
761                struct xt_node *adl, *d, *c;
762               
763                if( !( adl = xt_from_string( msg, msglen ) ) )
764                        return 1;
765               
766                for( d = adl->children; d; d = d->next )
767                {
768                        char *dn;
769                        if( strcmp( d->name, "d" ) != 0 ||
770                            ( dn = xt_find_attr( d, "n" ) ) == NULL )
771                                continue;
772                        for( c = d->children; c; c = c->next )
773                        {
774                                bee_user_t *bu;
775                                struct msn_buddy_data *bd;
776                                char *cn, *handle, *f, *l;
777                                int flags;
778                               
779                                if( strcmp( c->name, "c" ) != 0 ||
780                                    ( l = xt_find_attr( c, "l" ) ) == NULL ||
781                                    ( cn = xt_find_attr( c, "n" ) ) == NULL )
782                                        continue;
783                               
784                                /* FIXME: Use "t" here, guess I should just add it
785                                   as a prefix like elsewhere in the protocol. */
786                                handle = g_strdup_printf( "%s@%s", cn, dn );
787                                if( !( ( bu = bee_user_by_handle( ic->bee, ic, handle ) ) ||
788                                       ( bu = bee_user_new( ic->bee, ic, handle, 0 ) ) ) )
789                                {
790                                        g_free( handle );
791                                        continue;
792                                }
793                                g_free( handle );
794                                bd = bu->data;
795                               
796                                if( ( f = xt_find_attr( c, "f" ) ) )
797                                {
798                                        http_decode( f );
799                                        imcb_rename_buddy( ic, bu->handle, f );
800                                }
801                               
802                                flags = atoi( l ) & 15;
803                                if( bd->flags != flags )
804                                {
805                                        bd->flags = flags;
806                                        msn_buddy_ask( bu );
807                                }
808                        }
809                }
810        }
811        else if( strcmp( cmd[0], "UBM" ) == 0 )
812        {
813                /* This one will give us msgs from federated networks. Technically
814                   it should also get us offline messages, but I don't know how
815                   I can signal MSN servers to use it. */
816                char *ct, *handle;
817               
818                if( strcmp( cmd[1], ic->acc->user ) == 0 )
819                {
820                        /* With MPOP, you'll get copies of your own msgs from other
821                           sessions. Discard those at least for now. */
822                        return 1;
823                }
824               
825                ct = get_rfc822_header( msg, "Content-Type", msglen );
826                if( strncmp( ct, "text/plain", 10 ) != 0 )
827                {
828                        /* Typing notification or something? */
829                        g_free( ct );
830                        return 1;
831                }
832                if( strcmp( cmd[2], "1" ) != 0 )
833                        handle = g_strdup_printf( "%s:%s", cmd[2], cmd[1] );
834                else
835                        handle = g_strdup( cmd[1] );
836               
837                imcb_buddy_msg( ic, handle, body, 0, 0 );
838                g_free( handle );
839        }
840       
841        return 1;
842}
843
844void msn_auth_got_passport_token( struct im_connection *ic, const char *token, const char *error )
845{
846        struct msn_data *md;
847       
848        /* Dead connection? */
849        if( g_slist_find( msn_connections, ic ) == NULL )
850                return;
851       
852        md = ic->proto_data;
853       
854        if( token )
855        {
856                msn_ns_write( ic, -1, "USR %d SSO S %s %s {%s}\r\n", ++md->trId, md->tokens[0], token, md->uuid );
857        }
858        else
859        {
860                imcb_error( ic, "Error during Passport authentication: %s", error );
861                imc_logout( ic, TRUE );
862        }
863}
864
865void msn_auth_got_contact_list( struct im_connection *ic )
866{
867        struct msn_data *md;
868       
869        /* Dead connection? */
870        if( g_slist_find( msn_connections, ic ) == NULL )
871                return;
872       
873        md = ic->proto_data;
874        msn_ns_write( ic, -1, "BLP %d %s\r\n", ++md->trId, "BL" );
875}
876
877static gboolean msn_ns_send_adl_1( gpointer key, gpointer value, gpointer data )
878{
879        struct xt_node *adl = data, *d, *c;
880        struct bee_user *bu = value;
881        struct msn_buddy_data *bd = bu->data;
882        struct msn_data *md = bu->ic->proto_data;
883        char handle[strlen(bu->handle)];
884        char *domain;
885        char l[4];
886       
887        if( ( bd->flags & 7 ) == 0 || ( bd->flags & MSN_BUDDY_ADL_SYNCED ) )
888                return FALSE;
889       
890        strcpy( handle, bu->handle );
891        if( ( domain = strchr( handle, '@' ) ) == NULL ) /* WTF */
892                return FALSE; 
893        *domain = '\0';
894        domain ++;
895       
896        if( ( d = adl->children ) == NULL ||
897            g_strcasecmp( xt_find_attr( d, "n" ), domain ) != 0 )
898        {
899                d = xt_new_node( "d", NULL, NULL );
900                xt_add_attr( d, "n", domain );
901                xt_insert_child( adl, d );
902        }
903       
904        g_snprintf( l, sizeof( l ), "%d", bd->flags & 7 );
905        c = xt_new_node( "c", NULL, NULL );
906        xt_add_attr( c, "n", handle );
907        xt_add_attr( c, "l", l );
908        xt_add_attr( c, "t", "1" ); /* FIXME: Network type, i.e. 32 for Y!MSG */
909        xt_insert_child( d, c );
910       
911        /* Do this in batches of 100. */
912        bd->flags |= MSN_BUDDY_ADL_SYNCED;
913        return (--md->adl_todo % 140) == 0;
914}
915
916static void msn_ns_send_adl( struct im_connection *ic )
917{
918        struct xt_node *adl;
919        struct msn_data *md = ic->proto_data;
920        char *adls;
921       
922        adl = xt_new_node( "ml", NULL, NULL );
923        xt_add_attr( adl, "l", "1" );
924        g_tree_foreach( md->domaintree, msn_ns_send_adl_1, adl );
925        if( adl->children == NULL )
926        {
927                /* This tells the caller that we're done now. */
928                md->adl_todo = -1;
929                xt_free_node( adl );
930                return;
931        }
932       
933        adls = xt_to_string( adl );
934        xt_free_node( adl );
935        msn_ns_write( ic, -1, "ADL %d %zd\r\n%s", ++md->trId, strlen( adls ), adls );
936        g_free( adls );
937}
938
939static void msn_ns_send_adl_start( struct im_connection *ic )
940{
941        struct msn_data *md;
942        GSList *l;
943       
944        /* Dead connection? */
945        if( g_slist_find( msn_connections, ic ) == NULL )
946                return;
947       
948        md = ic->proto_data;
949        md->adl_todo = 0;
950        for( l = ic->bee->users; l; l = l->next )
951        {
952                bee_user_t *bu = l->data;
953                struct msn_buddy_data *bd = bu->data;
954               
955                if( bu->ic != ic || ( bd->flags & 7 ) == 0 )
956                        continue;
957               
958                bd->flags &= ~MSN_BUDDY_ADL_SYNCED;
959                md->adl_todo++;
960        }
961       
962        msn_ns_send_adl( ic );
963}
964
965int msn_ns_finish_login( struct im_connection *ic )
966{
967        struct msn_data *md = ic->proto_data;
968       
969        if( ic->flags & OPT_LOGGED_IN )
970                return 1;
971       
972        if( md->adl_todo < 0 )
973                md->flags |= MSN_DONE_ADL;
974       
975        if( ( md->flags & MSN_DONE_ADL ) && ( md->flags & MSN_GOT_PROFILE ) )
976        {
977                if( md->flags & MSN_EMAIL_UNVERIFIED )
978                        imcb_connected( ic );
979                else
980                        return msn_ns_set_display_name( ic, set_getstr( &ic->acc->set, "display_name" ) );
981        }
982       
983        return 1;
984}
985
986int msn_ns_sendmessage( struct im_connection *ic, bee_user_t *bu, const char *text )
987{
988        struct msn_data *md = ic->proto_data;
989        int type = 0;
990        char *buf, *handle;
991       
992        if( strncmp( text, "\r\r\r", 3 ) == 0 )
993                /* Err. Shouldn't happen but I guess it can. Don't send others
994                   any of the "SHAKE THAT THING" messages. :-D */
995                return 1;
996       
997        /* This might be a federated contact. Get its network number,
998           prefixed to bu->handle with a colon. Default is 1. */
999        for( handle = bu->handle; isdigit( *handle ); handle ++ )
1000                type = type * 10 + *handle - '0';
1001        if( *handle == ':' )
1002                handle ++;
1003        else
1004                type = 1;
1005       
1006        buf = g_strdup_printf( "%s%s", MSN_MESSAGE_HEADERS, text );
1007       
1008        if( msn_ns_write( ic, -1, "UUM %d %s %d %d %zd\r\n%s",
1009                                  ++md->trId, handle, type,
1010                                  1, /* type == IM (not nudge/typing) */
1011                                  strlen( buf ), buf ) )
1012                return 1;
1013        else
1014                return 0;
1015}
1016
1017void msn_ns_oim_send_queue( struct im_connection *ic, GSList **msgq )
1018{
1019        GSList *l;
1020       
1021        for( l = *msgq; l; l = l->next )
1022        {
1023                struct msn_message *m = l->data;
1024                bee_user_t *bu = bee_user_by_handle( ic->bee, ic, m->who );
1025               
1026                if( bu )
1027                        if( !msn_ns_sendmessage( ic, bu, m->text ) )
1028                                return;
1029        }
1030       
1031        while( *msgq != NULL )
1032        {
1033                struct msn_message *m = (*msgq)->data;
1034               
1035                g_free( m->who );
1036                g_free( m->text );
1037                g_free( m );
1038               
1039                *msgq = g_slist_remove( *msgq, m );
1040        }
1041}
Note: See TracBrowser for help on using the repository browser.