source: protocols/msn/msn.c @ e3e2059

Last change on this file since e3e2059 was a6b00fc, checked in by dequis <dx@…>, at 2015-02-28T23:17:33Z

Disable msn by default :(

I didn't want to do the next release with a broken msn, but...
gotta be realistic.

Also featuring shameless plug.

  • Property mode set to 100644
File size: 12.6 KB
Line 
1/********************************************************************\
2  * BitlBee -- An IRC to other IM-networks gateway                     *
3  *                                                                    *
4  * Copyright 2002-2013 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., 51 Franklin St.,
23  Fifth Floor, Boston, MA  02110-1301  USA
24*/
25
26#include "nogaim.h"
27#include "soap.h"
28#include "msn.h"
29
30int msn_chat_id;
31GSList *msn_connections;
32GSList *msn_switchboards;
33
34static char *set_eval_display_name(set_t *set, char *value);
35
36static void msn_init(account_t *acc)
37{
38        set_t *s;
39
40        s = set_add(&acc->set, "display_name", NULL, set_eval_display_name, acc);
41        s->flags |= SET_NOSAVE | ACC_SET_ONLINE_ONLY;
42
43        s = set_add(&acc->set, "server", NULL, set_eval_account, acc);
44        s->flags |= SET_NOSAVE | ACC_SET_OFFLINE_ONLY;
45
46        s = set_add(&acc->set, "port", MSN_NS_PORT, set_eval_int, acc);
47        s->flags |= ACC_SET_OFFLINE_ONLY;
48
49        set_add(&acc->set, "mail_notifications", "false", set_eval_bool, acc);
50        set_add(&acc->set, "switchboard_keepalives", "false", set_eval_bool, acc);
51
52        acc->flags |= ACC_FLAG_AWAY_MESSAGE | ACC_FLAG_STATUS_MESSAGE |
53                      ACC_FLAG_HANDLE_DOMAINS;
54}
55
56static void msn_login(account_t *acc)
57{
58        struct im_connection *ic = imcb_new(acc);
59        struct msn_data *md = g_new0(struct msn_data, 1);
60        char *server = set_getstr(&ic->acc->set, "server");
61
62        ic->proto_data = md;
63        ic->flags |= OPT_PONGS | OPT_PONGED;
64
65        if (!server) {
66                imcb_error(ic, "The msn protocol is disabled in this version because most servers disabled MSNP18 over port 1863.");
67                imcb_error(ic, "If you find a working server, you can change the 'server' setting of this account. Good luck!");
68                imcb_error(ic, "See also: http://ismsndeadyet.com/"); // shameless plug
69                imc_logout(ic, FALSE);
70                return;
71        }
72
73        if (strchr(acc->user, '@') == NULL) {
74                imcb_error(ic, "Invalid account name");
75                imc_logout(ic, FALSE);
76                return;
77        }
78
79        md->ic = ic;
80        md->away_state = msn_away_state_list;
81        md->domaintree = g_tree_new(msn_domaintree_cmp);
82        md->ns->fd = -1;
83
84        msn_connections = g_slist_prepend(msn_connections, ic);
85
86        imcb_log(ic, "Connecting");
87        msn_ns_connect(ic, md->ns, server,
88                       set_getint(&ic->acc->set, "port"));
89}
90
91static void msn_logout(struct im_connection *ic)
92{
93        struct msn_data *md = ic->proto_data;
94        GSList *l;
95        int i;
96
97        if (md) {
98                /** Disabling MSN ft support for now.
99                while( md->filetransfers ) {
100                        imcb_file_canceled( md->filetransfers->data, "Closing connection" );
101                }
102                */
103
104                msn_ns_close(md->ns);
105
106                while (md->switchboards) {
107                        msn_sb_destroy(md->switchboards->data);
108                }
109
110                msn_msgq_purge(ic, &md->msgq);
111                msn_soapq_flush(ic, FALSE);
112
113                for (i = 0; i < sizeof(md->tokens) / sizeof(md->tokens[0]); i++) {
114                        g_free(md->tokens[i]);
115                }
116                g_free(md->lock_key);
117                g_free(md->pp_policy);
118                g_free(md->uuid);
119
120                while (md->groups) {
121                        struct msn_group *mg = md->groups->data;
122                        md->groups = g_slist_remove(md->groups, mg);
123                        g_free(mg->id);
124                        g_free(mg->name);
125                        g_free(mg);
126                }
127
128                g_free(md->profile_rid);
129
130                if (md->domaintree) {
131                        g_tree_destroy(md->domaintree);
132                }
133                md->domaintree = NULL;
134
135                while (md->grpq) {
136                        struct msn_groupadd *ga = md->grpq->data;
137                        md->grpq = g_slist_remove(md->grpq, ga);
138                        g_free(ga->group);
139                        g_free(ga->who);
140                        g_free(ga);
141                }
142
143                g_free(md);
144        }
145
146        for (l = ic->permit; l; l = l->next) {
147                g_free(l->data);
148        }
149        g_slist_free(ic->permit);
150
151        for (l = ic->deny; l; l = l->next) {
152                g_free(l->data);
153        }
154        g_slist_free(ic->deny);
155
156        msn_connections = g_slist_remove(msn_connections, ic);
157}
158
159static int msn_buddy_msg(struct im_connection *ic, char *who, char *message, int away)
160{
161        struct bee_user *bu = bee_user_by_handle(ic->bee, ic, who);
162        struct msn_buddy_data *bd = bu ? bu->data : NULL;
163        struct msn_switchboard *sb;
164
165#ifdef DEBUG
166        if (strcmp(who, "raw") == 0) {
167                msn_ns_write(ic, -1, "%s\r\n", message);
168        } else
169#endif
170        if (bd && bd->flags & MSN_BUDDY_FED) {
171                msn_ns_sendmessage(ic, bu, message);
172        } else if ((sb = msn_sb_by_handle(ic, who))) {
173                return(msn_sb_sendmessage(sb, message));
174        } else {
175                struct msn_message *m;
176
177                /* Create a message. We have to arrange a usable switchboard, and send the message later. */
178                m = g_new0(struct msn_message, 1);
179                m->who = g_strdup(who);
180                m->text = g_strdup(message);
181
182                return msn_sb_write_msg(ic, m);
183        }
184
185        return(0);
186}
187
188static GList *msn_away_states(struct im_connection *ic)
189{
190        static GList *l = NULL;
191        int i;
192
193        if (l == NULL) {
194                for (i = 0; *msn_away_state_list[i].code; i++) {
195                        if (*msn_away_state_list[i].name) {
196                                l = g_list_append(l, (void *) msn_away_state_list[i].name);
197                        }
198                }
199        }
200
201        return l;
202}
203
204static void msn_set_away(struct im_connection *ic, char *state, char *message)
205{
206        char *uux;
207        struct msn_data *md = ic->proto_data;
208
209        if (state == NULL) {
210                md->away_state = msn_away_state_list;
211        } else if ((md->away_state = msn_away_state_by_name(state)) == NULL) {
212                md->away_state = msn_away_state_list + 1;
213        }
214
215        if (!msn_ns_write(ic, -1, "CHG %d %s %d:%02d\r\n", ++md->trId, md->away_state->code, MSN_CAP1, MSN_CAP2)) {
216                return;
217        }
218
219        uux = g_markup_printf_escaped("<EndpointData><Capabilities>%d:%02d"
220                                      "</Capabilities></EndpointData>",
221                                      MSN_CAP1, MSN_CAP2);
222        msn_ns_write(ic, -1, "UUX %d %zd\r\n%s", ++md->trId, strlen(uux), uux);
223        g_free(uux);
224
225        uux = g_markup_printf_escaped("<PrivateEndpointData><EpName>%s</EpName>"
226                                      "<Idle>%s</Idle><ClientType>%d</ClientType>"
227                                      "<State>%s</State></PrivateEndpointData>",
228                                      md->uuid,
229                                      strcmp(md->away_state->code, "IDL") ? "false" : "true",
230                                      1,  /* ? */
231                                      md->away_state->code);
232        msn_ns_write(ic, -1, "UUX %d %zd\r\n%s", ++md->trId, strlen(uux), uux);
233        g_free(uux);
234
235        uux = g_markup_printf_escaped("<Data><DDP></DDP><PSM>%s</PSM>"
236                                      "<CurrentMedia></CurrentMedia>"
237                                      "<MachineGuid>%s</MachineGuid></Data>",
238                                      message ? message : "", md->uuid);
239        msn_ns_write(ic, -1, "UUX %d %zd\r\n%s", ++md->trId, strlen(uux), uux);
240        g_free(uux);
241}
242
243static void msn_get_info(struct im_connection *ic, char *who)
244{
245        /* Just make an URL and let the user fetch the info */
246        imcb_log(ic, "%s\n%s: %s%s", _("User Info"), _("For now, fetch yourself"), PROFILE_URL, who);
247}
248
249static void msn_add_buddy(struct im_connection *ic, char *who, char *group)
250{
251        struct bee_user *bu = bee_user_by_handle(ic->bee, ic, who);
252
253        msn_buddy_list_add(ic, MSN_BUDDY_FL, who, who, group);
254        if (bu && bu->group) {
255                msn_buddy_list_remove(ic, MSN_BUDDY_FL, who, bu->group->name);
256        }
257}
258
259static void msn_remove_buddy(struct im_connection *ic, char *who, char *group)
260{
261        msn_buddy_list_remove(ic, MSN_BUDDY_FL, who, NULL);
262}
263
264static void msn_chat_msg(struct groupchat *c, char *message, int flags)
265{
266        struct msn_switchboard *sb = msn_sb_by_chat(c);
267
268        if (sb) {
269                msn_sb_sendmessage(sb, message);
270        }
271        /* FIXME: Error handling (although this can't happen unless something's
272           already severely broken) disappeared here! */
273}
274
275static void msn_chat_invite(struct groupchat *c, char *who, char *message)
276{
277        struct msn_switchboard *sb = msn_sb_by_chat(c);
278
279        if (sb) {
280                msn_sb_write(sb, "CAL %d %s\r\n", ++sb->trId, who);
281        }
282}
283
284static void msn_chat_leave(struct groupchat *c)
285{
286        struct msn_switchboard *sb = msn_sb_by_chat(c);
287
288        if (sb) {
289                msn_sb_write(sb, "OUT\r\n");
290        }
291}
292
293static struct groupchat *msn_chat_with(struct im_connection *ic, char *who)
294{
295        struct msn_switchboard *sb;
296        struct groupchat *c = imcb_chat_new(ic, who);
297
298        if ((sb = msn_sb_by_handle(ic, who))) {
299                debug("Converting existing switchboard to %s to a groupchat", who);
300                return msn_sb_to_chat(sb);
301        } else {
302                struct msn_message *m;
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                msn_sb_write_msg(ic, m);
310
311                return c;
312        }
313}
314
315static void msn_keepalive(struct im_connection *ic)
316{
317        msn_ns_write(ic, -1, "PNG\r\n");
318}
319
320static void msn_add_permit(struct im_connection *ic, char *who)
321{
322        msn_buddy_list_add(ic, MSN_BUDDY_AL, who, who, NULL);
323}
324
325static void msn_rem_permit(struct im_connection *ic, char *who)
326{
327        msn_buddy_list_remove(ic, MSN_BUDDY_AL, who, NULL);
328}
329
330static void msn_add_deny(struct im_connection *ic, char *who)
331{
332        struct msn_switchboard *sb;
333
334        msn_buddy_list_add(ic, MSN_BUDDY_BL, who, who, NULL);
335
336        /* If there's still a conversation with this person, close it. */
337        if ((sb = msn_sb_by_handle(ic, who))) {
338                msn_sb_destroy(sb);
339        }
340}
341
342static void msn_rem_deny(struct im_connection *ic, char *who)
343{
344        msn_buddy_list_remove(ic, MSN_BUDDY_BL, who, NULL);
345}
346
347static int msn_send_typing(struct im_connection *ic, char *who, int typing)
348{
349        struct bee_user *bu = bee_user_by_handle(ic->bee, ic, who);
350
351        if (!(bu->flags & BEE_USER_ONLINE)) {
352                return 0;
353        } else if (typing & OPT_TYPING) {
354                return(msn_buddy_msg(ic, who, TYPING_NOTIFICATION_MESSAGE, 0));
355        } else {
356                return 1;
357        }
358}
359
360static char *set_eval_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 = ic->proto_data;
365
366        if (md->flags & MSN_EMAIL_UNVERIFIED) {
367                imcb_log(ic, "Warning: Your e-mail address is unverified. MSN doesn't allow "
368                         "changing your display name until your e-mail address is verified.");
369        }
370
371        if (md->flags & MSN_GOT_PROFILE_DN) {
372                msn_soap_profile_set_dn(ic, value);
373        } else {
374                msn_soap_addressbook_set_display_name(ic, value);
375        }
376
377        return msn_ns_set_display_name(ic, value) ? value : NULL;
378}
379
380static void msn_buddy_data_add(bee_user_t *bu)
381{
382        struct msn_data *md = bu->ic->proto_data;
383        struct msn_buddy_data *bd;
384        char *handle;
385
386        bd = bu->data = g_new0(struct msn_buddy_data, 1);
387        g_tree_insert(md->domaintree, bu->handle, bu);
388
389        for (handle = bu->handle; g_ascii_isdigit(*handle); handle++) {
390                ;
391        }
392        if (*handle == ':') {
393                /* Pass a nick hint so hopefully the stupid numeric prefix
394                   won't show up to the user.  */
395                char *s = strchr(++handle, '@');
396                if (s) {
397                        handle = g_strndup(handle, s - handle);
398                        imcb_buddy_nick_hint(bu->ic, bu->handle, handle);
399                        g_free(handle);
400                }
401
402                bd->flags |= MSN_BUDDY_FED;
403        }
404}
405
406static void msn_buddy_data_free(bee_user_t *bu)
407{
408        struct msn_data *md = bu->ic->proto_data;
409        struct msn_buddy_data *bd = bu->data;
410
411        g_free(bd->cid);
412        g_free(bd);
413
414        g_tree_remove(md->domaintree, bu->handle);
415}
416
417GList *msn_buddy_action_list(bee_user_t *bu)
418{
419        static GList *ret = NULL;
420
421        if (ret == NULL) {
422                static const struct buddy_action ba[2] = {
423                        { "NUDGE", "Draw attention" },
424                };
425
426                ret = g_list_prepend(ret, (void *) ba + 0);
427        }
428
429        return ret;
430}
431
432void *msn_buddy_action(struct bee_user *bu, const char *action, char * const args[], void *data)
433{
434        if (g_strcasecmp(action, "NUDGE") == 0) {
435                msn_buddy_msg(bu->ic, bu->handle, NUDGE_MESSAGE, 0);
436        }
437
438        return NULL;
439}
440
441void msn_initmodule()
442{
443        struct prpl *ret = g_new0(struct prpl, 1);
444
445        ret->name = "msn";
446        ret->mms = 1409;         /* this guess taken from libotr UPGRADING file */
447        ret->login = msn_login;
448        ret->init = msn_init;
449        ret->logout = msn_logout;
450        ret->buddy_msg = msn_buddy_msg;
451        ret->away_states = msn_away_states;
452        ret->set_away = msn_set_away;
453        ret->get_info = msn_get_info;
454        ret->add_buddy = msn_add_buddy;
455        ret->remove_buddy = msn_remove_buddy;
456        ret->chat_msg = msn_chat_msg;
457        ret->chat_invite = msn_chat_invite;
458        ret->chat_leave = msn_chat_leave;
459        ret->chat_with = msn_chat_with;
460        ret->keepalive = msn_keepalive;
461        ret->add_permit = msn_add_permit;
462        ret->rem_permit = msn_rem_permit;
463        ret->add_deny = msn_add_deny;
464        ret->rem_deny = msn_rem_deny;
465        ret->send_typing = msn_send_typing;
466        ret->handle_cmp = g_strcasecmp;
467        ret->buddy_data_add = msn_buddy_data_add;
468        ret->buddy_data_free = msn_buddy_data_free;
469        ret->buddy_action_list = msn_buddy_action_list;
470        ret->buddy_action = msn_buddy_action;
471
472        //ret->transfer_request = msn_ftp_transfer_request;
473
474        register_protocol(ret);
475}
Note: See TracBrowser for help on using the repository browser.