source: protocols/msn/msn.c @ c2fb3809

Last change on this file since c2fb3809 was c2fb3809, checked in by Wilmer van der Gaast <wilmer@…>, at 2007-04-15T22:39:35Z

Cleaned up struct im_connection. No more username/password stuff since
it's in acc too. wants_to_die is now an argument to imc_logout().

  • Property mode set to 100644
File size: 10.7 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 - Main file; functions to be called from BitlBee          */
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 "nogaim.h"
27#include "msn.h"
28
29static char *msn_set_display_name( set_t *set, char *value );
30
31static void msn_init( account_t *acc )
32{
33        set_t *s;
34       
35        s = set_add( &acc->set, "display_name", NULL, msn_set_display_name, acc );
36        s->flags |= ACC_SET_NOSAVE | ACC_SET_ONLINE_ONLY;
37}
38
39static void msn_login( account_t *acc )
40{
41        struct im_connection *ic = imc_new( acc );
42        struct msn_data *md = g_new0( struct msn_data, 1 );
43       
44        ic->proto_data = md;
45        md->fd = -1;
46       
47        if( strchr( acc->user, '@' ) == NULL )
48        {
49                imc_error( ic, "Invalid account name" );
50                imc_logout( ic, FALSE );
51                return;
52        }
53       
54        imc_log( ic, "Connecting" );
55       
56        md->fd = proxy_connect( "messenger.hotmail.com", 1863, msn_ns_connected, ic );
57        if( md->fd < 0 )
58        {
59                imc_error( ic, "Could not connect to server" );
60                imc_logout( ic, TRUE );
61                return;
62        }
63       
64        md->ic = ic;
65        md->away_state = msn_away_state_list;
66       
67        msn_connections = g_slist_append( msn_connections, ic );
68}
69
70static void msn_logout( struct im_connection *ic )
71{
72        struct msn_data *md = ic->proto_data;
73        GSList *l;
74       
75        if( md )
76        {
77                if( md->fd >= 0 )
78                        closesocket( md->fd );
79               
80                if( md->handler )
81                {
82                        if( md->handler->rxq ) g_free( md->handler->rxq );
83                        if( md->handler->cmd_text ) g_free( md->handler->cmd_text );
84                        g_free( md->handler );
85                }
86               
87                while( md->switchboards )
88                        msn_sb_destroy( md->switchboards->data );
89               
90                if( md->msgq )
91                {
92                        struct msn_message *m;
93                       
94                        for( l = md->msgq; l; l = l->next )
95                        {
96                                m = l->data;
97                       
98                                imc_log( ic, "Warning: Closing down MSN connection with unsent message to %s, you'll have to resend it.", m->who );
99                                g_free( m->who );
100                                g_free( m->text );
101                                g_free( m );
102                        }
103                        g_slist_free( md->msgq );
104                }
105               
106                while( md->groupcount > 0 )
107                        g_free( md->grouplist[--md->groupcount] );
108                g_free( md->grouplist );
109               
110                g_free( md );
111        }
112       
113        for( l = ic->permit; l; l = l->next )
114                g_free( l->data );
115        g_slist_free( ic->permit );
116       
117        for( l = ic->deny; l; l = l->next )
118                g_free( l->data );
119        g_slist_free( ic->deny );
120       
121        msn_connections = g_slist_remove( msn_connections, ic );
122}
123
124static int msn_send_im( struct im_connection *ic, char *who, char *message, int away )
125{
126        struct msn_switchboard *sb;
127        struct msn_data *md = ic->proto_data;
128       
129        if( ( sb = msn_sb_by_handle( ic, who ) ) )
130        {
131                return( msn_sb_sendmessage( sb, message ) );
132        }
133        else
134        {
135                struct msn_message *m;
136                char buf[1024];
137               
138                /* Create a message. We have to arrange a usable switchboard, and send the message later. */
139                m = g_new0( struct msn_message, 1 );
140                m->who = g_strdup( who );
141                m->text = g_strdup( message );
142               
143                /* FIXME: *CHECK* the reliability of using spare sb's! */
144                if( ( sb = msn_sb_spare( ic ) ) )
145                {
146                        debug( "Trying to use a spare switchboard to message %s", who );
147                       
148                        sb->who = g_strdup( who );
149                        g_snprintf( buf, sizeof( buf ), "CAL %d %s\r\n", ++sb->trId, who );
150                        if( msn_sb_write( sb, buf, strlen( buf ) ) )
151                        {
152                                /* He/She should join the switchboard soon, let's queue the message. */
153                                sb->msgq = g_slist_append( sb->msgq, m );
154                                return( 1 );
155                        }
156                }
157               
158                debug( "Creating a new switchboard to message %s", who );
159               
160                /* If we reach this line, there was no spare switchboard, so let's make one. */
161                g_snprintf( buf, sizeof( buf ), "XFR %d SB\r\n", ++md->trId );
162                if( !msn_write( ic, buf, strlen( buf ) ) )
163                {
164                        g_free( m->who );
165                        g_free( m->text );
166                        g_free( m );
167                       
168                        return( 0 );
169                }
170               
171                /* And queue the message to md. We'll pick it up when the switchboard comes up. */
172                md->msgq = g_slist_append( md->msgq, m );
173               
174                /* FIXME: If the switchboard creation fails, the message will not be sent. */
175               
176                return( 1 );
177        }
178       
179        return( 0 );
180}
181
182static GList *msn_away_states( struct im_connection *ic )
183{
184        static GList *l = NULL;
185        int i;
186       
187        if( l == NULL )
188                for( i = 0; msn_away_state_list[i].number > -1; i ++ )
189                        l = g_list_append( l, (void*) msn_away_state_list[i].name );
190       
191        return l;
192}
193
194static char *msn_get_status_string( struct im_connection *ic, int number )
195{
196        const struct msn_away_state *st = msn_away_state_by_number( number );
197       
198        if( st )
199                return( (char*) st->name );
200        else
201                return( "" );
202}
203
204static void msn_set_away( struct im_connection *ic, char *state, char *message )
205{
206        char buf[1024];
207        struct msn_data *md = ic->proto_data;
208        const struct msn_away_state *st;
209       
210        if( strcmp( state, GAIM_AWAY_CUSTOM ) == 0 )
211                st = msn_away_state_by_name( "Away" );
212        else
213                st = msn_away_state_by_name( state );
214       
215        if( !st ) st = msn_away_state_list;
216        md->away_state = st;
217       
218        g_snprintf( buf, sizeof( buf ), "CHG %d %s\r\n", ++md->trId, st->code );
219        msn_write( ic, buf, strlen( buf ) );
220}
221
222static void msn_set_my_name( struct im_connection *ic, char *info )
223{
224        msn_set_display_name( set_find( &ic->acc->set, "display_name" ), info );
225}
226
227static void msn_get_info(struct im_connection *ic, char *who) 
228{
229        /* Just make an URL and let the user fetch the info */
230        imc_log( ic, "%s\n%s: %s%s", _("User Info"), _("For now, fetch yourself"), PROFILE_URL, who );
231}
232
233static void msn_add_buddy( struct im_connection *ic, char *who, char *group )
234{
235        msn_buddy_list_add( ic, "FL", who, who );
236}
237
238static void msn_remove_buddy( struct im_connection *ic, char *who, char *group )
239{
240        msn_buddy_list_remove( ic, "FL", who );
241}
242
243static void msn_chat_send( struct groupchat *c, char *message, int flags )
244{
245        struct msn_switchboard *sb = msn_sb_by_chat( c );
246       
247        if( sb )
248                msn_sb_sendmessage( sb, message );
249        /* FIXME: Error handling (although this can't happen unless something's
250           already severely broken) disappeared here! */
251}
252
253static void msn_chat_invite( struct groupchat *c, char *msg, char *who )
254{
255        struct msn_switchboard *sb = msn_sb_by_chat( c );
256        char buf[1024];
257       
258        if( sb )
259        {
260                g_snprintf( buf, sizeof( buf ), "CAL %d %s\r\n", ++sb->trId, who );
261                msn_sb_write( sb, buf, strlen( buf ) );
262        }
263}
264
265static void msn_chat_leave( struct groupchat *c )
266{
267        struct msn_switchboard *sb = msn_sb_by_chat( c );
268       
269        if( sb )
270                msn_sb_write( sb, "OUT\r\n", 5 );
271}
272
273static struct groupchat *msn_chat_with( struct im_connection *ic, char *who )
274{
275        struct msn_switchboard *sb;
276        struct msn_data *md = ic->proto_data;
277        char buf[1024];
278       
279        if( ( sb = msn_sb_by_handle( ic, who ) ) )
280        {
281                debug( "Converting existing switchboard to %s to a groupchat", who );
282                return msn_sb_to_chat( sb );
283        }
284        else
285        {
286                struct msn_message *m;
287               
288                if( ( sb = msn_sb_spare( ic ) ) )
289                {
290                        debug( "Trying to reuse an existing switchboard as a groupchat with %s", who );
291                        g_snprintf( buf, sizeof( buf ), "CAL %d %s\r\n", ++sb->trId, who );
292                        if( msn_sb_write( sb, buf, strlen( buf ) ) )
293                                return msn_sb_to_chat( sb );
294                }
295               
296                /* If the stuff above failed for some reason: */
297                debug( "Creating a new switchboard to groupchat with %s", who );
298               
299                /* Request a new switchboard. */
300                g_snprintf( buf, sizeof( buf ), "XFR %d SB\r\n", ++md->trId );
301                if( !msn_write( ic, buf, strlen( buf ) ) )
302                        return( 0 );
303               
304                /* Create a magic message. This is quite hackish, but who cares? :-P */
305                m = g_new0( struct msn_message, 1 );
306                m->who = g_strdup( who );
307                m->text = g_strdup( GROUPCHAT_SWITCHBOARD_MESSAGE );
308               
309                /* Queue the magic message and cross your fingers. */
310                md->msgq = g_slist_append( md->msgq, m );
311               
312                /* FIXME: Can I try to return something here already? */
313                return NULL;
314        }
315       
316        return NULL;
317}
318
319static void msn_keepalive( struct im_connection *ic )
320{
321        msn_write( ic, "PNG\r\n", strlen( "PNG\r\n" ) );
322}
323
324static void msn_add_permit( struct im_connection *ic, char *who )
325{
326        msn_buddy_list_add( ic, "AL", who, who );
327}
328
329static void msn_rem_permit( struct im_connection *ic, char *who )
330{
331        msn_buddy_list_remove( ic, "AL", who );
332}
333
334static void msn_add_deny( struct im_connection *ic, char *who )
335{
336        struct msn_switchboard *sb;
337       
338        msn_buddy_list_add( ic, "BL", who, who );
339       
340        /* If there's still a conversation with this person, close it. */
341        if( ( sb = msn_sb_by_handle( ic, who ) ) )
342        {
343                msn_sb_destroy( sb );
344        }
345}
346
347static void msn_rem_deny( struct im_connection *ic, char *who )
348{
349        msn_buddy_list_remove( ic, "BL", who );
350}
351
352static int msn_send_typing( struct im_connection *ic, char *who, int typing )
353{
354        if( typing )
355                return( msn_send_im( ic, who, TYPING_NOTIFICATION_MESSAGE, 0 ) );
356        else
357                return( 1 );
358}
359
360static char *msn_set_display_name( set_t *set, char *value )
361{
362        account_t *acc = set->data;
363        struct im_connection *ic = acc->ic;
364        struct msn_data *md;
365        char buf[1024], *fn;
366       
367        /* Double-check. */
368        if( ic == NULL )
369                return NULL;
370       
371        md = ic->proto_data;
372       
373        if( strlen( value ) > 129 )
374        {
375                imc_log( ic, "Maximum name length exceeded" );
376                return NULL;
377        }
378       
379        fn = msn_http_encode( value );
380       
381        g_snprintf( buf, sizeof( buf ), "REA %d %s %s\r\n", ++md->trId, ic->acc->user, fn );
382        msn_write( ic, buf, strlen( buf ) );
383        g_free( fn );
384       
385        /* Returning NULL would be better, because the server still has to
386           confirm the name change. However, it looks a bit confusing to the
387           user. */
388        return value;
389}
390
391void msn_initmodule()
392{
393        struct prpl *ret = g_new0(struct prpl, 1);
394       
395        ret->name = "msn";
396        ret->login = msn_login;
397        ret->init = msn_init;
398        ret->logout = msn_logout;
399        ret->send_im = msn_send_im;
400        ret->away_states = msn_away_states;
401        ret->get_status_string = msn_get_status_string;
402        ret->set_away = msn_set_away;
403        ret->get_info = msn_get_info;
404        ret->set_my_name = msn_set_my_name;
405        ret->add_buddy = msn_add_buddy;
406        ret->remove_buddy = msn_remove_buddy;
407        ret->chat_send = msn_chat_send;
408        ret->chat_invite = msn_chat_invite;
409        ret->chat_leave = msn_chat_leave;
410        ret->chat_with = msn_chat_with;
411        ret->keepalive = msn_keepalive;
412        ret->add_permit = msn_add_permit;
413        ret->rem_permit = msn_rem_permit;
414        ret->add_deny = msn_add_deny;
415        ret->rem_deny = msn_rem_deny;
416        ret->send_typing = msn_send_typing;
417        ret->handle_cmp = g_strcasecmp;
418
419        register_protocol(ret);
420}
Note: See TracBrowser for help on using the repository browser.