Mercurial > pidgin.yaz
view src/protocols/msn/msn.c @ 9350:da075a155501
[gaim-migrate @ 10158]
updated
committer: Tailor Script <tailor@pidgin.im>
author | Luke Schierer <lschiere@pidgin.im> |
---|---|
date | Tue, 22 Jun 2004 18:58:05 +0000 |
parents | 01c50436203e |
children | 997c28571364 |
line wrap: on
line source
/** * @file msn.c The MSN protocol plugin * * gaim * * Gaim is the legal property of its developers, whose names are too numerous * to list here. Please refer to the COPYRIGHT file distributed with this * source distribution. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #define PHOTO_SUPPORT 1 #include <glib.h> #include "msn.h" #include "accountopt.h" #include "msg.h" #include "page.h" #include "pluginpref.h" #include "prefs.h" #include "session.h" #include "state.h" #include "utils.h" #include "multi.h" #include "util.h" #include "switchboard.h" #include "notification.h" #include "sync.h" #include "slplink.h" #if PHOTO_SUPPORT #include "imgstore.h" #endif #define BUDDY_ALIAS_MAXLEN 387 static GaimPlugin *my_protocol = NULL; typedef struct { GaimConnection *gc; const char *passport; } MsnMobileData; typedef struct { GaimConnection *gc; char *name; } MsnGetInfoData; typedef struct { MsnGetInfoData *info_data; char *stripped; char *url_buffer; GString *s; char *photo_url_text; char *tooltip_text; gboolean has_info; } MsnGetInfoStepTwoData; static const char * msn_normalize(const GaimAccount *account, const char *str) { static char buf[BUF_LEN]; char *tmp; g_return_val_if_fail(str != NULL, NULL); g_snprintf(buf, sizeof(buf), "%s%s", str, (strchr(str, '@') ? "" : "@hotmail.com")); tmp = g_utf8_strdown(buf, -1); strncpy(buf, tmp, sizeof(buf)); g_free(tmp); return buf; } static void msn_act_id(GaimConnection *gc, const char *entry) { MsnCmdProc *cmdproc; MsnSession *session; GaimAccount *account; const char *alias; session = gc->proto_data; cmdproc = session->notification->cmdproc; account = gaim_connection_get_account(gc); alias = (entry && *entry) ? entry : ""; if (strlen(alias) > BUDDY_ALIAS_MAXLEN) { gaim_notify_error(gc, NULL, _("Your new MSN friendly name is too long."), NULL); return; } msn_cmdproc_send(cmdproc, "REA", "%s %s", gaim_account_get_username(account), gaim_url_encode(alias)); } static void msn_set_prp(GaimConnection *gc, const char *type, const char *entry) { MsnCmdProc *cmdproc; MsnSession *session; session = gc->proto_data; cmdproc = session->notification->cmdproc; if (entry == NULL || *entry == '\0') { msn_cmdproc_send(cmdproc, "PRP", "%s", type); } else { msn_cmdproc_send(cmdproc, "PRP", "%s %s", type, gaim_url_encode(entry)); } } static void msn_set_home_phone_cb(GaimConnection *gc, const char *entry) { msn_set_prp(gc, "PHH", entry); } static void msn_set_work_phone_cb(GaimConnection *gc, const char *entry) { msn_set_prp(gc, "PHW", entry); } static void msn_set_mobile_phone_cb(GaimConnection *gc, const char *entry) { msn_set_prp(gc, "PHM", entry); } static void enable_msn_pages_cb(GaimConnection *gc) { msn_set_prp(gc, "MOB", "Y"); } static void disable_msn_pages_cb(GaimConnection *gc) { msn_set_prp(gc, "MOB", "N"); } static void send_to_mobile(GaimConnection *gc, const char *who, const char *entry) { MsnTransaction *trans; MsnSession *session; MsnCmdProc *cmdproc; MsnPage *page; char *payload; size_t payload_len; session = gc->proto_data; cmdproc = session->notification->cmdproc; page = msn_page_new(); msn_page_set_body(page, entry); payload = msn_page_gen_payload(page, &payload_len); trans = msn_transaction_new("PGD", "%s 1 %d", who, payload_len); msn_transaction_set_payload(trans, payload, payload_len); msn_page_destroy(page); msn_cmdproc_send_trans(cmdproc, trans); } static void send_to_mobile_cb(MsnMobileData *data, const char *entry) { send_to_mobile(data->gc, data->passport, entry); g_free(data); } static void close_mobile_page_cb(MsnMobileData *data, const char *entry) { g_free(data); } /* -- */ static void msn_show_set_friendly_name(GaimPluginAction *action) { GaimConnection *gc; gc = (GaimConnection *) action->context; gaim_request_input(gc, NULL, _("Set your friendly name."), _("This is the name that other MSN buddies will " "see you as."), gaim_connection_get_display_name(gc), FALSE, FALSE, NULL, _("OK"), G_CALLBACK(msn_act_id), _("Cancel"), NULL, gc); } static void msn_show_set_home_phone(GaimPluginAction *action) { GaimConnection *gc; MsnSession *session; gc = (GaimConnection *) action->context; session = gc->proto_data; gaim_request_input(gc, NULL, _("Set your home phone number."), NULL, msn_user_get_home_phone(session->user), FALSE, FALSE, NULL, _("OK"), G_CALLBACK(msn_set_home_phone_cb), _("Cancel"), NULL, gc); } static void msn_show_set_work_phone(GaimPluginAction *action) { GaimConnection *gc; MsnSession *session; gc = (GaimConnection *) action->context; session = gc->proto_data; gaim_request_input(gc, NULL, _("Set your work phone number."), NULL, msn_user_get_work_phone(session->user), FALSE, FALSE, NULL, _("OK"), G_CALLBACK(msn_set_work_phone_cb), _("Cancel"), NULL, gc); } static void msn_show_set_mobile_phone(GaimPluginAction *action) { GaimConnection *gc; MsnSession *session; gc = (GaimConnection *) action->context; session = gc->proto_data; gaim_request_input(gc, NULL, _("Set your mobile phone number."), NULL, msn_user_get_mobile_phone(session->user), FALSE, FALSE, NULL, _("OK"), G_CALLBACK(msn_set_mobile_phone_cb), _("Cancel"), NULL, gc); } static void msn_show_set_mobile_pages(GaimPluginAction *action) { GaimConnection *gc; gc = (GaimConnection *) action->context; gaim_request_action(gc, NULL, _("Allow MSN Mobile pages?"), _("Do you want to allow or disallow people on " "your buddy list to send you MSN Mobile pages " "to your cell phone or other mobile device?"), -1, gc, 3, _("Allow"), G_CALLBACK(enable_msn_pages_cb), _("Disallow"), G_CALLBACK(disable_msn_pages_cb), _("Cancel"), NULL); } static void show_send_to_mobile_cb(GaimBlistNode *node, gpointer ignored) { GaimBuddy *buddy; GaimConnection *gc; MsnUser *user; MsnSession *session; MsnMobileData *data; g_return_if_fail(GAIM_BLIST_NODE_IS_BUDDY(node)); buddy = (GaimBuddy *) node; gc = gaim_account_get_connection(buddy->account); session = gc->proto_data; user = msn_userlist_find_user(session->userlist, buddy->name); data = g_new0(MsnMobileData, 1); data->gc = gc; data->passport = buddy->name; gaim_request_input(gc, NULL, _("Send a mobile message."), NULL, NULL, TRUE, FALSE, NULL, _("Page"), G_CALLBACK(send_to_mobile_cb), _("Close"), G_CALLBACK(close_mobile_page_cb), data); } static void initiate_chat_cb(GaimBlistNode *node, gpointer data) { GaimBuddy *buddy; GaimConnection *gc; MsnSession *session; MsnSwitchBoard *swboard; g_return_if_fail(GAIM_BLIST_NODE_IS_BUDDY(node)); buddy = (GaimBuddy *) node; gc = gaim_account_get_connection(buddy->account); session = gc->proto_data; swboard = msn_switchboard_new(session); msn_switchboard_request(swboard); msn_switchboard_request_add_user(swboard, buddy->name); /* TODO: This might move somewhere else, after USR might be */ swboard->chat_id = session->conv_seq++; swboard->conv = serv_got_joined_chat(gc, swboard->chat_id, "MSN Chat"); } static void t_msn_xfer_init(GaimXfer *xfer) { MsnSlpLink *slplink; slplink = xfer->data; msn_slplink_request_ft(slplink, xfer); } static void show_send_file_cb(GaimBlistNode *node, gpointer ignored) { GaimBuddy *buddy; GaimConnection *gc; MsnSession *session; MsnSlpLink *slplink; GaimXfer *xfer; g_return_if_fail(GAIM_BLIST_NODE_IS_BUDDY(node)); buddy = (GaimBuddy *) node; gc = gaim_account_get_connection(buddy->account); session = gc->proto_data; xfer = gaim_xfer_new(buddy->account, GAIM_XFER_SEND, buddy->name); slplink = msn_session_get_slplink(session, buddy->name); xfer->data = slplink; gaim_xfer_set_init_fnc(xfer, t_msn_xfer_init); gaim_xfer_request(xfer); } static void update_buddy_icon_cb(GaimBlistNode *node, gpointer ignored) { GaimBuddy *buddy; GaimConnection *gc; g_return_if_fail(GAIM_BLIST_NODE_IS_BUDDY(node)); buddy = (GaimBuddy *) node; gc = gaim_account_get_connection(buddy->account); msn_request_buddy_icon(gc, buddy->name); } /************************************************************************** * Protocol Plugin ops **************************************************************************/ static const char * msn_list_icon(GaimAccount *a, GaimBuddy *b) { return "msn"; } static void msn_list_emblems(GaimBuddy *b, char **se, char **sw, char **nw, char **ne) { MsnUser *user; char *emblems[4] = { NULL, NULL, NULL, NULL }; int away_type = MSN_AWAY_TYPE(b->uc); int i = 0; user = b->proto_data; if (b->present == GAIM_BUDDY_OFFLINE) emblems[i++] = "offline"; else if (away_type == MSN_BUSY || away_type == MSN_PHONE) emblems[i++] = "occupied"; else if (away_type != 0) emblems[i++] = "away"; if (user == NULL) { emblems[0] = "offline"; } else if (user->mobile) emblems[i++] = "wireless"; *se = emblems[0]; *sw = emblems[1]; *nw = emblems[2]; *ne = emblems[3]; } static char * msn_status_text(GaimBuddy *b) { if (b->uc & UC_UNAVAILABLE) return g_strdup(msn_away_get_text(MSN_AWAY_TYPE(b->uc))); return NULL; } static char * msn_tooltip_text(GaimBuddy *b) { char *text = NULL; if (GAIM_BUDDY_IS_ONLINE(b)) { text = g_strdup_printf("\n<b>%s:</b> %s", _("Status"), msn_away_get_text(MSN_AWAY_TYPE(b->uc))); } return text; } static GList * msn_away_states(GaimConnection *gc) { GList *m = NULL; m = g_list_append(m, _("Available")); m = g_list_append(m, _("Away From Computer")); m = g_list_append(m, _("Be Right Back")); m = g_list_append(m, _("Busy")); m = g_list_append(m, _("On The Phone")); m = g_list_append(m, _("Out To Lunch")); m = g_list_append(m, _("Hidden")); return m; } static GList * msn_actions(GaimPlugin *plugin, gpointer context) { GList *m = NULL; GaimPluginAction *act; act = gaim_plugin_action_new(_("Set Friendly Name"), msn_show_set_friendly_name); m = g_list_append(m, act); m = g_list_append(m, NULL); act = gaim_plugin_action_new(_("Set Home Phone Number"), msn_show_set_home_phone); m = g_list_append(m, act); act = gaim_plugin_action_new(_("Set Work Phone Number"), msn_show_set_work_phone); m = g_list_append(m, act); act = gaim_plugin_action_new(_("Set Mobile Phone Number"), msn_show_set_mobile_phone); m = g_list_append(m, act); m = g_list_append(m, NULL); #if 0 act = gaim_plugin_action_new(_("Enable/Disable Mobile Devices"), msn_show_set_mobile_support); m = g_list_append(m, act); #endif act = gaim_plugin_action_new(_("Allow/Disallow Mobile Pages"), msn_show_set_mobile_pages); m = g_list_append(m, act); return m; } static GList * msn_buddy_menu(GaimBuddy *buddy) { MsnUser *user; GList *m = NULL; GaimBlistNodeAction *act; g_return_val_if_fail(buddy != NULL, NULL); user = buddy->proto_data; if (user != NULL) { if (user->mobile) { act = gaim_blist_node_action_new(_("Send to Mobile"), show_send_to_mobile_cb, NULL); m = g_list_append(m, act); } } if (g_ascii_strcasecmp(buddy->name, gaim_account_get_username(buddy->account))) { act = gaim_blist_node_action_new(_("Initiate Chat"), initiate_chat_cb, NULL); m = g_list_append(m, act); act = gaim_blist_node_action_new(_("Send File"), show_send_file_cb, NULL); m = g_list_append(m, act); act = gaim_blist_node_action_new(_("Update Buddy Icon"), update_buddy_icon_cb, NULL); m = g_list_append(m, act); } return m; } static GList * msn_blist_node_menu(GaimBlistNode *node) { if(GAIM_BLIST_NODE_IS_BUDDY(node)) { return msn_buddy_menu((GaimBuddy *) node); } else { return NULL; } } static void msn_login(GaimAccount *account) { GaimConnection *gc; MsnSession *session; const char *username; const char *host; gboolean http_method = FALSE; int port; gc = gaim_account_get_connection(account); if (!gaim_ssl_is_supported()) { gaim_connection_error(gc, _("SSL support is needed for MSN. Please install a supported " "SSL library. See http://gaim.sf.net/faq-ssl.php for more " "information.")); return; } if (gaim_account_get_bool(account, "http_method", FALSE)) { http_method = TRUE; gaim_debug_info("msn", "using http method\n"); host = "gateway.messenger.hotmail.com"; port = 80; } else { host = gaim_account_get_string(account, "server", MSN_SERVER); port = gaim_account_get_int(account, "port", MSN_PORT); } session = msn_session_new(account, host, port, http_method); session->prpl = my_protocol; if (session->http_method) msn_http_session_init(session); gc->proto_data = session; gc->flags |= GAIM_CONNECTION_HTML | GAIM_CONNECTION_FORMATTING_WBFO | GAIM_CONNECTION_NO_BGCOLOR | GAIM_CONNECTION_NO_FONTSIZE | GAIM_CONNECTION_NO_URLDESC;; gaim_connection_update_progress(gc, _("Connecting"), 0, MSN_CONNECT_STEPS); /* Hmm, I don't like this. */ username = msn_normalize(account, gaim_account_get_username(account)); if (strcmp(username, gaim_account_get_username(account))) gaim_account_set_username(account, username); msn_session_connect(session); } static void msn_close(GaimConnection *gc) { MsnSession *session; session = gc->proto_data; g_return_if_fail(session != NULL); if (session->http_method) msn_http_session_uninit(session); msn_session_destroy(session); gc->proto_data = NULL; } static int msn_send_im(GaimConnection *gc, const char *who, const char *message, GaimConvImFlags flags) { GaimAccount *account; account = gaim_connection_get_account(gc); if (g_ascii_strcasecmp(who, gaim_account_get_username(account))) { MsnSession *session; MsnSwitchBoard *swboard; MsnMessage *msg; char *msgformat; char *msgtext; session = gc->proto_data; swboard = msn_session_get_swboard(session, who); msn_import_html(message, &msgformat, &msgtext); msg = msn_message_new_plain(msgtext); msn_message_set_attr(msg, "X-MMS-IM-Format", msgformat); g_free(msgformat); g_free(msgtext); swboard = msn_session_get_swboard(session, who); if (!g_queue_is_empty(swboard->im_queue) || !swboard->user_joined) { msn_switchboard_queue_msg(swboard, msg); } else { msn_switchboard_send_msg(swboard, msg); } msn_message_destroy(msg); } else { /* * In MSN, you can't send messages to yourself, so * we'll fake like we received it ;) */ serv_got_typing_stopped(gc, who); serv_got_im(gc, who, message, flags, time(NULL)); } return 1; } static int msn_send_typing(GaimConnection *gc, const char *who, int typing) { GaimAccount *account; MsnSession *session; MsnSwitchBoard *swboard; MsnMessage *msg; account = gaim_connection_get_account(gc); session = gc->proto_data; if (!typing) return 0; if (!g_ascii_strcasecmp(who, gaim_account_get_username(account))) { /* We'll just fake it, since we're sending to ourself. */ serv_got_typing(gc, who, MSN_TYPING_RECV_TIMEOUT, GAIM_TYPING); return MSN_TYPING_SEND_TIMEOUT; } swboard = msn_session_find_swboard(session, who); if (swboard == NULL) return 0; if (!swboard->user_joined) return 0; msg = msn_message_new(); msn_message_set_content_type(msg, "text/x-msmsgscontrol"); msn_message_set_flag(msg, 'U'); msn_message_set_attr(msg, "TypingUser", gaim_account_get_username(account)); msn_message_set_bin_data(msg, "\r\n", 2); msn_switchboard_send_msg(swboard, msg); msn_message_destroy(msg); return MSN_TYPING_SEND_TIMEOUT; } static void msn_set_away(GaimConnection *gc, const char *state, const char *msg) { MsnSession *session; int status; session = gc->proto_data; if (gc->away != NULL) { g_free(gc->away); gc->away = NULL; } if (msg != NULL) { gc->away = g_strdup(""); status = MSN_AWAY; } else if (state) { gc->away = g_strdup(""); if (!strcmp(state, _("Away From Computer"))) status = MSN_AWAY; else if (!strcmp(state, _("Be Right Back"))) status = MSN_BRB; else if (!strcmp(state, _("Busy"))) status = MSN_BUSY; else if (!strcmp(state, _("On The Phone"))) status = MSN_PHONE; else if (!strcmp(state, _("Out To Lunch"))) status = MSN_LUNCH; else if (!strcmp(state, _("Hidden"))) status = MSN_HIDDEN; else { g_free(gc->away); gc->away = NULL; status = MSN_ONLINE; } } else if (gc->is_idle) status = MSN_IDLE; else status = MSN_ONLINE; msn_change_status(session, status); } static void msn_set_idle(GaimConnection *gc, int idle) { MsnSession *session; session = gc->proto_data; if (gc->away != NULL) return; msn_change_status(session, (idle ? MSN_IDLE : MSN_ONLINE)); } static void msn_add_buddy(GaimConnection *gc, GaimBuddy *buddy, GaimGroup *group) { MsnSession *session; MsnUserList *userlist; const char *who; session = gc->proto_data; userlist = session->userlist; who = msn_normalize(gc->account, buddy->name); if (group != NULL && group->name != NULL) gaim_debug_info("msn", "msn_add_buddy: %s, %s\n", who, group->name); else gaim_debug_info("msn", "msn_add_buddy: %s\n", who); #if 0 /* Which is the max? */ if (session->fl_users_count >= 150) { gaim_debug_info("msn", "Too many buddies\n"); /* Buddy list full */ /* TODO: gaim should be notified of this */ return; } #endif /* XXX - Would group ever be NULL here? I don't think so... */ msn_userlist_add_buddy(userlist, who, MSN_LIST_FL, group ? group->name : NULL); } static void msn_rem_buddy(GaimConnection *gc, GaimBuddy *buddy, GaimGroup *group) { MsnSession *session; MsnUserList *userlist; session = gc->proto_data; userlist = session->userlist; /* XXX - Does buddy->name need to be msn_normalize'd here? --KingAnt */ msn_userlist_rem_buddy(userlist, buddy->name, MSN_LIST_FL, group->name); } static void msn_add_permit(GaimConnection *gc, const char *who) { MsnSession *session; MsnUserList *userlist; MsnUser *user; session = gc->proto_data; userlist = session->userlist; user = msn_userlist_find_user(userlist, who); if (user->list_op & MSN_LIST_BL_OP) msn_userlist_rem_buddy(userlist, who, MSN_LIST_BL, NULL); msn_userlist_add_buddy(userlist, who, MSN_LIST_AL, NULL); } static void msn_add_deny(GaimConnection *gc, const char *who) { MsnSession *session; MsnUserList *userlist; MsnUser *user; session = gc->proto_data; userlist = session->userlist; user = msn_userlist_find_user(userlist, who); if (user->list_op & MSN_LIST_AL_OP) msn_userlist_rem_buddy(userlist, who, MSN_LIST_AL, NULL); msn_userlist_add_buddy(userlist, who, MSN_LIST_BL, NULL); } static void msn_rem_permit(GaimConnection *gc, const char *who) { MsnSession *session; MsnUserList *userlist; MsnUser *user; session = gc->proto_data; userlist = session->userlist; user = msn_userlist_find_user(userlist, who); msn_userlist_rem_buddy(userlist, who, MSN_LIST_AL, NULL); if (user->list_op & MSN_LIST_RL_OP) msn_userlist_add_buddy(userlist, who, MSN_LIST_BL, NULL); } void msn_rem_deny(GaimConnection *gc, const char *who) { MsnSession *session; MsnUserList *userlist; MsnUser *user; session = gc->proto_data; userlist = session->userlist; user = msn_userlist_find_user(userlist, who); msn_userlist_rem_buddy(userlist, who, MSN_LIST_BL, NULL); if (user->list_op & MSN_LIST_RL_OP) msn_userlist_add_buddy(userlist, who, MSN_LIST_AL, NULL); } static void msn_set_permit_deny(GaimConnection *gc) { GaimAccount *account; MsnSession *session; MsnCmdProc *cmdproc; account = gaim_connection_get_account(gc); session = gc->proto_data; cmdproc = session->notification->cmdproc; if (account->perm_deny == GAIM_PRIVACY_ALLOW_ALL || account->perm_deny == GAIM_PRIVACY_DENY_USERS) { msn_cmdproc_send(cmdproc, "BLP", "%s", "AL"); } else { msn_cmdproc_send(cmdproc, "BLP", "%s", "BL"); } } static void msn_chat_invite(GaimConnection *gc, int id, const char *msg, const char *who) { MsnSession *session; MsnSwitchBoard *swboard; MsnCmdProc *cmdproc; session = gc->proto_data; swboard = msn_session_find_switch_with_id(session, id); g_return_if_fail(swboard != NULL); cmdproc = swboard->servconn->cmdproc; msn_cmdproc_send(cmdproc, "CAL", "%s", who); } static void msn_chat_leave(GaimConnection *gc, int id) { MsnSession *session; MsnSwitchBoard *swboard; MsnCmdProc *cmdproc; session = gc->proto_data; swboard = msn_session_find_switch_with_id(session, id); g_return_if_fail(swboard != NULL); cmdproc = swboard->servconn->cmdproc; msn_cmdproc_send_quick(cmdproc, "OUT", NULL, NULL); msn_switchboard_destroy(swboard); /* serv_got_chat_left(gc, id); */ } static int msn_chat_send(GaimConnection *gc, int id, const char *message) { GaimAccount *account; MsnSession *session; MsnSwitchBoard *swboard; MsnMessage *msg; char *msgformat; char *msgtext; account = gaim_connection_get_account(gc); session = gc->proto_data; swboard = msn_session_find_switch_with_id(session, id); if (swboard == NULL) return -EINVAL; if (swboard->ready) { msn_import_html(message, &msgformat, &msgtext); msg = msn_message_new_plain(msgtext); msn_message_set_attr(msg, "X-MMS-IM-Format", msgformat); msn_switchboard_send_msg(swboard, msg); msn_message_destroy(msg); g_free(msgformat); g_free(msgtext); serv_got_chat_in(gc, id, gaim_account_get_username(account), 0, message, time(NULL)); } return 0; } static void msn_keepalive(GaimConnection *gc) { MsnSession *session; MsnCmdProc *cmdproc; session = gc->proto_data; cmdproc = session->notification->cmdproc; if (!session->http_method) msn_cmdproc_send_quick(cmdproc, "PNG", NULL, NULL); } static void msn_group_buddy(GaimConnection *gc, const char *who, const char *old_group_name, const char *new_group_name) { MsnSession *session; MsnUserList *userlist; session = gc->proto_data; userlist = session->userlist; msn_userlist_move_buddy(userlist, who, old_group_name, new_group_name); } static void msn_rename_group(GaimConnection *gc, const char *old_name, GaimGroup *group, GList *moved_buddies) { MsnSession *session; MsnCmdProc *cmdproc; int old_gid; const char *enc_new_group_name; session = gc->proto_data; cmdproc = session->notification->cmdproc; enc_new_group_name = gaim_url_encode(group->name); old_gid = msn_userlist_find_group_id(session->userlist, old_name); if (old_gid >= 0) { msn_cmdproc_send(cmdproc, "REG", "%d %s 0", old_gid, enc_new_group_name); } else { msn_cmdproc_send(cmdproc, "ADG", "%s 0", enc_new_group_name); } } static void msn_convo_closed(GaimConnection *gc, const char *who) { MsnSession *session; MsnSwitchBoard *swboard; MsnCmdProc *cmdproc; session = gc->proto_data; swboard = msn_session_find_swboard(session, who); /* * Don't perform an assertion here. It swboard is NULL, then the * switchboard was either closed by the other party, or the person * is talking to himself. */ if (swboard == NULL) return; cmdproc = swboard->servconn->cmdproc; if (swboard->current_users == 1) { /* This must happen on both IM's and Chat's, right? */ GaimAccount *account; account = gaim_connection_get_account(gc); msn_cmdproc_send_quick(cmdproc, "BYE", "%s", gaim_account_get_username(account)); msn_switchboard_destroy(swboard); } } static void msn_set_buddy_icon(GaimConnection *gc, const char *filename) { MsnSession *session; MsnUser *user; session = gc->proto_data; user = session->user; msn_user_set_buddy_icon(user, filename); msn_change_status(session, session->state); } static void msn_remove_group(GaimConnection *gc, GaimGroup *group) { MsnSession *session; MsnCmdProc *cmdproc; int group_id; session = gc->proto_data; cmdproc = session->notification->cmdproc; if ((group_id = msn_userlist_find_group_id(session->userlist, group->name)) >= 0) { msn_cmdproc_send(cmdproc, "RMG", "%d", group_id); } } static char * msn_tooltip_info_text(MsnGetInfoData *info_data) { GString *s = g_string_sized_new(80); /* wild guess */ GaimBuddy *b; g_string_printf(s, _("<b>%s:</b> %s<br>"), _("MSN ID"), info_data->name); b = gaim_find_buddy(gaim_connection_get_account(info_data->gc), info_data->name); if (b) { char *statustext = msn_tooltip_text(b); if(b->alias && b->alias[0]) { char *aliastext = g_markup_escape_text(b->alias, -1); g_string_append_printf(s, _("<b>Alias:</b> %s<br>"), aliastext); g_free(aliastext); } if(b->server_alias) { char *nicktext = g_markup_escape_text(b->server_alias, -1); g_string_append_printf(s, _("<b>%s:</b> %s<br>"), _("Nickname"), nicktext); g_free(nicktext); } if (b->idle > 0) { char *idletime = gaim_str_seconds_to_string(time(NULL) - b->idle); g_string_append_printf(s, _("<b>%s:</b> %s<br>"), _("Idle"), idletime); g_free(idletime); } if (statustext) { g_string_append_printf(s, "%s<br>", statustext); g_free(statustext); } } return g_string_free(s, FALSE); } #if PHOTO_SUPPORT static char *msn_get_photo_url(const char *url_text) { char *p; char *it = NULL; p = strstr(url_text, " title=\"Click to see the full-size photo.\">"); if (p) { /* Search backwards for "http://". This is stupid, but it works. */ for (; !it && p > url_text; p -= 1) { if (strncmp(p, "\"http://", 8) == 0) { char *q; p += 1; /* skip only the " */ q = strchr(p, '"'); if (q) { it = g_strndup(p, q - p); } } } } return it; } static void msn_got_photo(void *data, const char *url_text, size_t len); #endif static void msn_got_info(void *data, const char *url_text, size_t len) { MsnGetInfoData *info_data = (MsnGetInfoData *)data; char *stripped, *p, *q; char buf[1024]; char *tooltip_text = NULL; char *user_url = NULL; gboolean found; gboolean has_info = FALSE; char *url_buffer; GString *s; int stripped_len; #if PHOTO_SUPPORT char *photo_url_text = NULL; MsnGetInfoStepTwoData *info2_data = NULL; #endif gaim_debug_info("msn", "In msn_got_info\n"); tooltip_text = msn_tooltip_info_text(info_data); if (url_text == NULL || strcmp(url_text, "") == 0) { g_snprintf(buf, 1024, "<html><body>%s<b>%s</b></body></html>", tooltip_text, _("Error retrieving profile")); gaim_notify_formatted(info_data->gc, NULL, _("Buddy Information"), NULL, buf, NULL, NULL); g_free(tooltip_text); return; } url_buffer = g_strdup(url_text); /* If they have a homepage link, MSN masks it such that we need to * fetch the url out before gaim_markup_strip_html() nukes it */ if ((p = strstr(url_text, "Take a look at my </font><A class=viewDesc title=\"")) != NULL) { p += 50; if ((q = strchr(p, '"')) != NULL) user_url = g_strndup(p, q - p); } /* * gaim_markup_strip_html() doesn't strip out character entities like * and · */ while ((p = strstr(url_buffer, " ")) != NULL) { *p = ' '; /* Turn 's into ordinary blanks */ p += 1; memmove(p, p + 5, strlen(p + 5)); url_buffer[strlen(url_buffer) - 5] = '\0'; } while ((p = strstr(url_buffer, "·")) != NULL) { memmove(p, p + 6, strlen(p + 6)); url_buffer[strlen(url_buffer) - 6] = '\0'; } /* Nuke the nasty \r's that just get in the way */ gaim_str_strip_cr(url_buffer); /* MSN always puts in ' for apostrophes...replace them */ while ((p = strstr(url_buffer, "'")) != NULL) { *p = '\''; memmove(p + 1, p + 5, strlen(p + 5)); url_buffer[strlen(url_buffer) - 4] = '\0'; } /* Nuke the html, it's easier than trying to parse the horrid stuff */ stripped = gaim_markup_strip_html(url_buffer); stripped_len = strlen(stripped); gaim_debug_misc("msn", "stripped = %p\n", stripped); gaim_debug_misc("msn", "url_buffer = %p\n", url_buffer); /* Gonna re-use the memory we've already got for url_buffer */ /* No we're not. */ s = g_string_sized_new(strlen(url_buffer)); /* Extract their Name and put it in */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, "\tName\n", 0, "\t", 0, "Undisclosed", _("Name"), 0, NULL); if (found) has_info = TRUE; /* Extract their Age and put it in */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, "\tAge\n", 0, "\n", 0, "Undisclosed", _("Age"), 0, NULL); if (found) has_info = TRUE; /* Extract their Gender and put it in */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, "\nGender\n", 0, "\t", 0, "Undisclosed", _("Gender"), 0, NULL); if (found) has_info = TRUE; /* Extract their MaritalStatus and put it in */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, "\tMarital Status\n", 0, "\n", 0, "Undisclosed", _("Marital Status"), 0, NULL); if (found) has_info = TRUE; /* Extract their Location and put it in */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, "\nLocation\n", 0, "\n", 0, "Undisclosed", _("Location"), 0, NULL); if (found) has_info = TRUE; /* Extract their Occupation and put it in */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, " Occupation\n", 6, "\n", 0, "Undisclosed", _("Occupation"), 0, NULL); if (found) has_info = TRUE; /* * The fields, 'A Little About Me', 'Favorite Things', 'Hobbies * and Interests', 'Favorite Quote', and 'My Homepage' may or may * not appear, in any combination. However, they do appear in * certain order, so we can successively search to pin down the * distinct values. */ /* Check if they have A Little About Me */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, " A Little About Me \n\n", 0, "Favorite Things", '\n', NULL, _("A Little About Me"), 0, NULL); if (!found) { found = gaim_markup_extract_info_field(stripped, stripped_len, s, " A Little About Me \n\n", 0, "Hobbies and Interests", '\n', NULL, _("A Little About Me"), 0, NULL); } if (!found) { found = gaim_markup_extract_info_field(stripped, stripped_len, s, " A Little About Me \n\n", 0, "Favorite Quote", '\n', NULL, _("A Little About Me"), 0, NULL); } if (!found) { found = gaim_markup_extract_info_field(stripped, stripped_len, s, " A Little About Me \n\n", 0, "My Homepage \n\nTake a look", '\n', NULL, _("A Little About Me"), 0, NULL); } if (!found) { gaim_markup_extract_info_field(stripped, stripped_len, s, " A Little About Me \n\n", 0, "last updated", '\n', NULL, _("A Little About Me"), 0, NULL); } if (found) has_info = TRUE; /* Check if they have Favorite Things */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, " Favorite Things \n\n", 0, "Hobbies and Interests", '\n', NULL, _("Favorite Things"), 0, NULL); if (!found) { found = gaim_markup_extract_info_field(stripped, stripped_len, s, " Favorite Things \n\n", 0, "Favorite Quote", '\n', NULL, _("Favorite Things"), 0, NULL); } if (!found) { found = gaim_markup_extract_info_field(stripped, stripped_len, s, " Favorite Things \n\n", 0, "My Homepage \n\nTake a look", '\n', NULL, _("Favorite Things"), 0, NULL); } if (!found) { gaim_markup_extract_info_field(stripped, stripped_len, s, " Favorite Things \n\n", 0, "last updated", '\n', NULL, _("Favorite Things"), 0, NULL); } if (found) has_info = TRUE; /* Check if they have Hobbies and Interests */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, " Hobbies and Interests \n\n", 0, "Favorite Quote", '\n', NULL, _("Hobbies and Interests"), 0, NULL); if (!found) { found = gaim_markup_extract_info_field(stripped, stripped_len, s, " Hobbies and Interests \n\n", 0, "My Homepage \n\nTake a look", '\n', NULL, _("Hobbies and Interests"), 0, NULL); } if (!found) { gaim_markup_extract_info_field(stripped, stripped_len, s, " Hobbies and Interests \n\n", 0, "last updated", '\n', NULL, _("Hobbies and Interests"), 0, NULL); } if (found) has_info = TRUE; /* Check if they have Favorite Quote */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, "Favorite Quote \n\n", 0, "My Homepage \n\nTake a look", '\n', NULL, _("Favorite Quote"), 0, NULL); if (!found) { gaim_markup_extract_info_field(stripped, stripped_len, s, "Favorite Quote \n\n", 0, "last updated", '\n', NULL, _("Favorite Quote"), 0, NULL); } if (found) has_info = TRUE; /* Extract the last updated date and put it in */ found = gaim_markup_extract_info_field(stripped, stripped_len, s, " last updated:", 1, "\n", 0, NULL, _("Last Updated"), 0, NULL); if (found) has_info = TRUE; /* If we were able to fetch a homepage url earlier, stick it in there */ if (user_url != NULL) { g_snprintf(buf, sizeof(buf), "<b>%s:</b><br><a href=\"%s\">%s</a><br>\n", _("Homepage"), user_url, user_url); g_string_append(s, buf); g_free(user_url); has_info = TRUE; } if (found) { /* put a link to the actual profile URL */ g_string_append_printf(s, _("<b>%s:</b> "), _("Profile URL")); g_string_append_printf(s, "<br><a href=\"%s%s\">%s%s</a><br>", PROFILE_URL, info_data->name, PROFILE_URL, info_data->name); } /* Finish it off, and show it to them */ g_string_append(s, "</body></html>\n"); #if PHOTO_SUPPORT /* Marshall the existing state */ info2_data = g_malloc0(sizeof(MsnGetInfoStepTwoData)); info2_data->info_data = info_data; info2_data->stripped = stripped; info2_data->url_buffer = url_buffer; info2_data->s = s; info2_data->photo_url_text = photo_url_text; info2_data->tooltip_text = tooltip_text; info2_data->has_info = has_info; /* Try to put the photo in there too, if there's one */ photo_url_text = msn_get_photo_url(url_text); if (photo_url_text) { gaim_url_fetch(photo_url_text, FALSE, NULL, FALSE, msn_got_photo, info2_data); } else { /* Emulate a callback */ msn_got_photo(info2_data, NULL, 0); } } static void msn_got_photo(void *data, const char *url_text, size_t len) { MsnGetInfoStepTwoData *info2_data = (MsnGetInfoStepTwoData *)data; int id = -1; /* Unmarshall the saved state */ MsnGetInfoData *info_data = info2_data->info_data; char *stripped = info2_data->stripped; char *url_buffer = info2_data->url_buffer; GString *s = info2_data->s; char *photo_url_text = info2_data->photo_url_text; char *tooltip_text = info2_data->tooltip_text; gboolean has_info = info2_data->has_info; /* Try to put the photo in there too, if there's one and is readable */ if (data && url_text && len != 0) { if (strstr(url_text, "400 Bad Request") || strstr(url_text, "403 Forbidden") || strstr(url_text, "404 Not Found")) { gaim_debug_info("msn", "Error getting %s: %s\n", photo_url_text, url_text); } else { char buf[1024]; gaim_debug_info("msn", "%s is %d bytes\n", photo_url_text, len); id = gaim_imgstore_add(url_text, len, NULL); g_snprintf(buf, sizeof(buf), "<img id=\"%d\"><br>", id); g_string_prepend(s, buf); } } /* We continue here from msn_got_info, as if nothing has happened */ #endif if (has_info) { g_string_prepend(s, tooltip_text); gaim_notify_formatted(info_data->gc, NULL, _("Buddy Information"), NULL, s->str, NULL, NULL); } else { char *p = strstr(url_buffer, "Unknown Member </TITLE>"); /* MSN doesn't actually distinguish between "unknown member" and * a known member with an empty profile. But if we say unknown * member, it is at least not worse than reading the actual page. */ g_string_printf(s, "<html><body>%s<b>%s</b><br></body></html>", tooltip_text, (p ? _("Error retrieving profile") : _("The user's profile is empty."))); gaim_notify_formatted(info_data->gc, NULL, _("Buddy Information"), NULL, s->str, NULL, NULL); } g_free(stripped); g_free(url_buffer); g_string_free(s, TRUE); g_free(tooltip_text); g_free(info_data->name); g_free(info_data); #if PHOTO_SUPPORT g_free(photo_url_text); g_free(info2_data); if (id != -1) gaim_imgstore_unref(id); #endif } static void msn_get_info(GaimConnection *gc, const char *name) { MsnGetInfoData *data; char *url; data = g_new0(MsnGetInfoData, 1); data->gc = gc; data->name = g_strdup(name); url = g_strdup_printf("%s%s", PROFILE_URL, name); gaim_url_fetch(url, FALSE, "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)", TRUE, msn_got_info, data); g_free(url); } static gboolean msn_load(GaimPlugin *plugin) { msn_notification_init(); msn_switchboard_init(); msn_sync_init(); return TRUE; } static gboolean msn_unload(GaimPlugin *plugin) { msn_notification_end(); msn_switchboard_end(); msn_sync_end(); return TRUE; } static GaimPluginPrefFrame * get_plugin_pref_frame(GaimPlugin *plugin) { GaimPluginPrefFrame *frame; GaimPluginPref *ppref; frame = gaim_plugin_pref_frame_new(); ppref = gaim_plugin_pref_new_with_label(_("Conversations")); gaim_plugin_pref_frame_add(frame, ppref); ppref = gaim_plugin_pref_new_with_name_and_label( "/plugins/prpl/msn/conv_close_notice", _("Display conversation closed notices")); gaim_plugin_pref_frame_add(frame, ppref); ppref = gaim_plugin_pref_new_with_name_and_label( "/plugins/prpl/msn/conv_timeout_notice", _("Display timeout notices")); gaim_plugin_pref_frame_add(frame, ppref); return frame; } static GaimPluginUiInfo prefs_info = { get_plugin_pref_frame }; static GaimPluginProtocolInfo prpl_info = { GAIM_PRPL_API_VERSION, OPT_PROTO_MAIL_CHECK, NULL, NULL, {"png", 0, 0, 0, 0, 0}, msn_list_icon, msn_list_emblems, msn_status_text, msn_tooltip_text, msn_away_states, msn_blist_node_menu, NULL, msn_login, msn_close, msn_send_im, NULL, msn_send_typing, msn_get_info, msn_set_away, msn_set_idle, NULL, msn_add_buddy, NULL, msn_rem_buddy, NULL, msn_add_permit, msn_add_deny, msn_rem_permit, msn_rem_deny, msn_set_permit_deny, NULL, NULL, NULL, /* reject chat invite */ msn_chat_invite, msn_chat_leave, NULL, msn_chat_send, msn_keepalive, NULL, NULL, NULL, NULL, msn_group_buddy, msn_rename_group, NULL, /* msn_buddy_free */ msn_convo_closed, msn_normalize, msn_set_buddy_icon, msn_remove_group, NULL, NULL, NULL, NULL, NULL, NULL }; static GaimPluginInfo info = { GAIM_PLUGIN_API_VERSION, /**< api_version */ GAIM_PLUGIN_PROTOCOL, /**< type */ NULL, /**< ui_requirement */ 0, /**< flags */ NULL, /**< dependencies */ GAIM_PRIORITY_DEFAULT, /**< priority */ "prpl-msn", /**< id */ "MSN", /**< name */ VERSION, /**< version */ /** summary */ N_("MSN Protocol Plugin"), /** description */ N_("MSN Protocol Plugin"), "Christian Hammond <chipx86@gnupdate.org>", /**< author */ GAIM_WEBSITE, /**< homepage */ msn_load, /**< load */ msn_unload, /**< unload */ NULL, /**< destroy */ NULL, /**< ui_info */ &prpl_info, /**< extra_info */ &prefs_info, /**< prefs_info */ msn_actions }; static void init_plugin(GaimPlugin *plugin) { GaimAccountOption *option; option = gaim_account_option_string_new(_("Login server"), "server", MSN_SERVER); prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); option = gaim_account_option_int_new(_("Port"), "port", 1863); prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); option = gaim_account_option_bool_new(_("Use HTTP Method"), "http_method", FALSE); prpl_info.protocol_options = g_list_append(prpl_info.protocol_options, option); my_protocol = plugin; gaim_prefs_add_none("/plugins/prpl/msn"); gaim_prefs_add_bool("/plugins/prpl/msn/conv_close_notice", TRUE); gaim_prefs_add_bool("/plugins/prpl/msn/conv_timeout_notice", TRUE); } GAIM_INIT_PLUGIN(msn, init_plugin, info);