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