* Purple is the legal property of its developers, whose names are too numerous * to list here. Please refer to the COPYRIGHT file distributed with this * 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., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA /* This file is the fullcrap */ #include "conversation.h" #define SECS_BEFORE_RESENDING_AUTORESPONSE 600 #define SEX_BEFORE_RESENDING_AUTORESPONSE "Only after you're married" serv_send_typing(PurpleConnection *gc, const char *name, PurpleTypingState state) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->send_typing) return prpl_info->send_typing(gc, name, state); static GSList *last_auto_responses = NULL; struct last_auto_response { expire_last_auto_responses(gpointer data) struct last_auto_response *lar; tmp = last_auto_responses; lar = (struct last_auto_response *)cur->data; if ((time(NULL) - lar->sent) > SECS_BEFORE_RESENDING_AUTORESPONSE) { last_auto_responses = g_slist_remove(last_auto_responses, lar); return FALSE; /* do not run again */ static struct last_auto_response * get_last_auto_response(PurpleConnection *gc, const char *name) struct last_auto_response *lar; /* because we're modifying or creating a lar, schedule the * function to expire them as the pref dictates */ purple_timeout_add_seconds((SECS_BEFORE_RESENDING_AUTORESPONSE + 1), expire_last_auto_responses, NULL); tmp = last_auto_responses; lar = (struct last_auto_response *)tmp->data; if (gc == lar->gc && !strncmp(name, lar->name, sizeof(lar->name))) lar = (struct last_auto_response *)g_new0(struct last_auto_response, 1); g_snprintf(lar->name, sizeof(lar->name), "%s", name); last_auto_responses = g_slist_prepend(last_auto_responses, lar); int serv_send_im(PurpleConnection *gc, const char *name, const char *message, PurpleMessageFlags flags) PurpleConversation *conv = NULL; PurpleAccount *account = NULL; PurplePresence *presence = NULL; PurplePlugin *prpl = NULL; PurplePluginProtocolInfo *prpl_info = NULL; const gchar *auto_reply_pref = NULL; g_return_val_if_fail(gc != NULL, val); prpl = purple_connection_get_prpl(gc); g_return_val_if_fail(prpl != NULL, val); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); account = purple_connection_get_account(gc); presence = purple_account_get_presence(account); conv = purple_find_conversation_with_account(PURPLE_CONV_TYPE_IM, name, account); val = prpl_info->send_im(gc, name, message, flags); * XXX - If "only auto-reply when away & idle" is set, then shouldn't * this only reset lar->sent if we're away AND idle? auto_reply_pref = purple_prefs_get_string("/purple/away/auto_reply"); if((gc->flags & PURPLE_CONNECTION_AUTO_RESP) && !purple_presence_is_available(presence) && !purple_strequal(auto_reply_pref, "never")) { struct last_auto_response *lar; lar = get_last_auto_response(gc, name); if(conv && purple_conv_im_get_send_typed_timeout(PURPLE_CONV_IM(conv))) purple_conv_im_stop_send_typed_timeout(PURPLE_CONV_IM(conv)); void serv_get_info(PurpleConnection *gc, const char *name) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); prpl_info->get_info(gc, name); void serv_set_info(PurpleConnection *gc, const char *info) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->set_info) { account = purple_connection_get_account(gc); if (purple_signal_emit_return_1(purple_accounts_get_handle(), "account-setting-info", account, info)) prpl_info->set_info(gc, info); purple_signal_emit(purple_accounts_get_handle(), "account-set-info", account, info); * Set buddy's alias on server roster/list void serv_alias_buddy(PurpleBuddy *b) PurplePluginProtocolInfo *prpl_info; account = purple_buddy_get_account(b); gc = purple_account_get_connection(account); prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->alias_buddy) prpl_info->alias_buddy(gc, purple_buddy_get_name(b), purple_buddy_get_local_buddy_alias(b)); serv_got_alias(PurpleConnection *gc, const char *who, const char *alias) PurpleConversation *conv; account = purple_connection_get_account(gc); buddies = purple_find_buddies(account, who); const char *server_alias; buddies = g_slist_delete_link(buddies, buddies); server_alias = purple_buddy_get_server_alias(b); if (purple_strequal(server_alias, alias)) purple_blist_server_alias_buddy(b, alias); conv = purple_find_conversation_with_account(PURPLE_CONV_TYPE_IM, purple_buddy_get_name(b), account); if (conv != NULL && alias != NULL && !purple_strequal(alias, who)) char *escaped = g_markup_escape_text(who, -1); char *escaped2 = g_markup_escape_text(alias, -1); char *tmp = g_strdup_printf(_("%s is now known as %s.\n"), purple_conversation_write(conv, NULL, tmp, PURPLE_MESSAGE_SYSTEM | PURPLE_MESSAGE_NO_LINKIFY, purple_serv_got_private_alias(PurpleConnection *gc, const char *who, const char *alias) PurpleAccount *account = NULL; account = purple_connection_get_account(gc); buddies = purple_find_buddies(account, who); buddies = g_slist_delete_link(buddies, buddies); balias = purple_buddy_get_local_buddy_alias(b); if (purple_strequal(balias, alias)) purple_blist_alias_buddy(b, alias); PurpleAttentionType *purple_get_attention_type_from_code(PurpleAccount *account, guint type_code) PurpleAttentionType* attn; GList *(*get_attention_types)(PurpleAccount *); g_return_val_if_fail(account != NULL, NULL); prpl = purple_find_prpl(purple_account_get_protocol_id(account)); /* Lookup the attention type in the protocol's attention_types list, if any. */ get_attention_types = PURPLE_PLUGIN_PROTOCOL_INFO(prpl)->get_attention_types; if (get_attention_types) { attention_types = get_attention_types(account); attn = (PurpleAttentionType *)g_list_nth_data(attention_types, type_code); serv_send_attention(PurpleConnection *gc, const char *who, guint type_code) purple_prpl_send_attention(gc, who, type_code); serv_got_attention(PurpleConnection *gc, const char *who, guint type_code) purple_prpl_got_attention(gc, who, type_code); * Move a buddy from one group to another on server. * Note: For now we'll not deal with changing gc's at the same time, but * it should be possible. Probably needs to be done, someday. Although, * the UI for that would be difficult, because groups are Purple-wide. void serv_move_buddy(PurpleBuddy *b, PurpleGroup *og, PurpleGroup *ng) PurplePluginProtocolInfo *prpl_info; g_return_if_fail(b != NULL); g_return_if_fail(og != NULL); g_return_if_fail(ng != NULL); account = purple_buddy_get_account(b); gc = purple_account_get_connection(account); prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->group_buddy) prpl_info->group_buddy(gc, purple_buddy_get_name(b), purple_group_get_name(og), purple_group_get_name(ng)); void serv_add_permit(PurpleConnection *gc, const char *name) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->add_permit) prpl_info->add_permit(gc, name); void serv_add_deny(PurpleConnection *gc, const char *name) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); prpl_info->add_deny(gc, name); void serv_rem_permit(PurpleConnection *gc, const char *name) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->rem_permit) prpl_info->rem_permit(gc, name); void serv_rem_deny(PurpleConnection *gc, const char *name) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); prpl_info->rem_deny(gc, name); void serv_set_permit_deny(PurpleConnection *gc) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); * this is called when either you import a buddy list, and make lots * of changes that way, or when the user toggles the permit/deny mode * in the prefs. In either case you should probably be resetting and * resending the permit/deny info when you get this. if (prpl_info->set_permit_deny) prpl_info->set_permit_deny(gc); void serv_join_chat(PurpleConnection *gc, GHashTable *data) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->join_chat) prpl_info->join_chat(gc, data); void serv_reject_chat(PurpleConnection *gc, GHashTable *data) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->reject_chat) prpl_info->reject_chat(gc, data); void serv_chat_invite(PurpleConnection *gc, int id, const char *message, const char *name) PurplePlugin *prpl = NULL; PurplePluginProtocolInfo *prpl_info = NULL; PurpleConversation *conv; char *buffy = message && *message ? g_strdup(message) : NULL; conv = purple_find_chat(gc, id); prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); purple_signal_emit(purple_conversations_get_handle(), "chat-inviting-user", if (prpl_info && prpl_info->chat_invite) prpl_info->chat_invite(gc, id, buffy, name); purple_signal_emit(purple_conversations_get_handle(), "chat-invited-user", /* Ya know, nothing uses this except purple_conversation_destroy(), * I think I'll just merge it into that later... * Then again, something might want to use this, from outside prpl-land * to leave a chat without destroying the conversation. void serv_chat_leave(PurpleConnection *gc, int id) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->chat_leave) prpl_info->chat_leave(gc, id); void serv_chat_whisper(PurpleConnection *gc, int id, const char *who, const char *message) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->chat_whisper) prpl_info->chat_whisper(gc, id, who, message); int serv_chat_send(PurpleConnection *gc, int id, const char *message, PurpleMessageFlags flags) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->chat_send) return prpl_info->chat_send(gc, id, message, flags); * woo. i'm actually going to comment this function. isn't that fun. make * sure to follow along, kids void serv_got_im(PurpleConnection *gc, const char *who, const char *msg, PurpleMessageFlags flags, time_t mtime) PurpleConversation *conv; g_return_if_fail(msg != NULL); account = purple_connection_get_account(gc); purple_debug_error("server", "serv_got_im ignoring negative timestamp\n"); /* TODO: Would be more appropriate to use a value that indicates that the timestamp is unknown, and surface that in the UI. */ * XXX: Should we be setting this here, or relying on prpls to set it? flags |= PURPLE_MESSAGE_RECV; if (!purple_privacy_check(account, who)) { purple_signal_emit(purple_conversations_get_handle(), "blocked-im-msg", account, who, msg, flags, (unsigned int)mtime); * We should update the conversation window buttons and menu, conv = purple_find_conversation_with_account(PURPLE_CONV_TYPE_IM, who, gc->account); * Make copies of the message and the sender in case plugins want * to free these strings and replace them with a modifed version. plugin_return = GPOINTER_TO_INT( purple_signal_emit_return_1(purple_conversations_get_handle(), "receiving-im-msg", gc->account, &angel, &buffy, conv, &flags)); if (!buffy || !angel || plugin_return) { purple_signal_emit(purple_conversations_get_handle(), "received-im-msg", gc->account, name, message, conv, flags); /* search for conversation again in case it was created by received-im-msg handler */ conv = purple_find_conversation_with_account(PURPLE_CONV_TYPE_IM, name, gc->account); conv = purple_conversation_new(PURPLE_CONV_TYPE_IM, account, name); purple_conv_im_write(PURPLE_CONV_IM(conv), name, message, flags, mtime); * - it's not supported on this connection * - or we're not idle and the 'only auto respond if idle' pref if (gc->flags & PURPLE_CONNECTION_AUTO_RESP) PurplePresence *presence; PurpleStatusType *status_type; PurpleStatusPrimitive primitive; const gchar *auto_reply_pref; const char *away_msg = NULL; auto_reply_pref = purple_prefs_get_string("/purple/away/auto_reply"); presence = purple_account_get_presence(account); status = purple_presence_get_active_status(presence); status_type = purple_status_get_type(status); primitive = purple_status_type_get_primitive(status_type); mobile = purple_presence_is_status_primitive_active(presence, PURPLE_STATUS_MOBILE); if ((primitive == PURPLE_STATUS_AVAILABLE) || (primitive == PURPLE_STATUS_INVISIBLE) || purple_strequal(auto_reply_pref, "never") || (!purple_presence_is_idle(presence) && purple_strequal(auto_reply_pref, "awayidle"))) away_msg = purple_value_get_string( purple_status_get_attr_value(status, "message")); if ((away_msg != NULL) && (*away_msg != '\0')) { struct last_auto_response *lar; * This used to be based on the conversation window. But um, if * you went away, and someone sent you a message and got your * auto-response, and then you closed the window, and then they * sent you another one, they'd get the auto-response back too * soon. Besides that, we need to keep track of this even if we've * got a queue. So the rest of this block is just the auto-response, lar = get_last_auto_response(gc, name); if ((now - lar->sent) >= SECS_BEFORE_RESENDING_AUTORESPONSE) * We don't want to send an autoresponse in response to the other user's * autoresponse. We do, however, not want to then send one in response to the * _next_ message, so we still set lar->sent to now. if (!(flags & PURPLE_MESSAGE_AUTO_RESP)) serv_send_im(gc, name, away_msg, PURPLE_MESSAGE_AUTO_RESP); purple_conv_im_write(PURPLE_CONV_IM(conv), NULL, away_msg, PURPLE_MESSAGE_SEND | PURPLE_MESSAGE_AUTO_RESP, void serv_got_typing(PurpleConnection *gc, const char *name, int timeout, PurpleTypingState state) { PurpleConversation *conv; conv = purple_find_conversation_with_account(PURPLE_CONV_TYPE_IM, name, gc->account); im = PURPLE_CONV_IM(conv); purple_conv_im_set_typing_state(im, state); purple_signal_emit(purple_conversations_get_handle(), "buddy-typing", gc->account, name); purple_signal_emit(purple_conversations_get_handle(), "buddy-typed", gc->account, name); purple_signal_emit(purple_conversations_get_handle(), "buddy-typing-stopped", gc->account, name); if (conv != NULL && timeout > 0) purple_conv_im_start_typing_timeout(im, timeout); void serv_got_typing_stopped(PurpleConnection *gc, const char *name) { PurpleConversation *conv; conv = purple_find_conversation_with_account(PURPLE_CONV_TYPE_IM, name, gc->account); im = PURPLE_CONV_IM(conv); if (im->typing_state == PURPLE_NOT_TYPING) purple_conv_im_stop_typing_timeout(im); purple_conv_im_set_typing_state(im, PURPLE_NOT_TYPING); purple_signal_emit(purple_conversations_get_handle(), "buddy-typing-stopped", gc->account, name); struct chat_invite_data { static void chat_invite_data_free(struct chat_invite_data *cid) g_hash_table_destroy(cid->components); static void chat_invite_reject(struct chat_invite_data *cid) serv_reject_chat(cid->gc, cid->components); chat_invite_data_free(cid); static void chat_invite_accept(struct chat_invite_data *cid) serv_join_chat(cid->gc, cid->components); chat_invite_data_free(cid); void serv_got_chat_invite(PurpleConnection *gc, const char *name, const char *who, const char *message, GHashTable *data) struct chat_invite_data *cid; g_return_if_fail(name != NULL); g_return_if_fail(who != NULL); account = purple_connection_get_account(gc); if (!purple_privacy_check(account, who)) { purple_signal_emit(purple_conversations_get_handle(), "chat-invite-blocked", account, who, name, message, data); cid = g_new0(struct chat_invite_data, 1); plugin_return = GPOINTER_TO_INT(purple_signal_emit_return_1( purple_conversations_get_handle(), "chat-invited", account, who, name, message, data)); g_snprintf(buf2, sizeof(buf2), _("%s has invited %s to the chat room %s:\n%s"), who, purple_account_get_username(account), name, message); g_snprintf(buf2, sizeof(buf2), _("%s has invited %s to the chat room %s\n"), who, purple_account_get_username(account), name); purple_request_accept_cancel(gc, NULL, _("Accept chat invitation?"), buf2, PURPLE_DEFAULT_ACTION_NONE, account, who, NULL, cid, G_CALLBACK(chat_invite_accept), G_CALLBACK(chat_invite_reject)); else if (plugin_return > 0) PurpleConversation *serv_got_joined_chat(PurpleConnection *gc, int id, const char *name) PurpleConversation *conv; account = purple_connection_get_account(gc); g_return_val_if_fail(account != NULL, NULL); g_return_val_if_fail(name != NULL, NULL); conv = purple_conversation_new(PURPLE_CONV_TYPE_CHAT, account, name); g_return_val_if_fail(conv != NULL, NULL); chat = PURPLE_CONV_CHAT(conv); if (!g_slist_find(gc->buddy_chats, conv)) gc->buddy_chats = g_slist_append(gc->buddy_chats, conv); purple_conv_chat_set_id(chat, id); purple_signal_emit(purple_conversations_get_handle(), "chat-joined", conv); void serv_got_chat_left(PurpleConnection *g, int id) PurpleConversation *conv = NULL; PurpleConvChat *chat = NULL; for (bcs = g->buddy_chats; bcs != NULL; bcs = bcs->next) { conv = (PurpleConversation *)bcs->data; chat = PURPLE_CONV_CHAT(conv); if (purple_conv_chat_get_id(chat) == id) purple_debug(PURPLE_DEBUG_INFO, "server", "Leaving room: %s\n", purple_conversation_get_name(conv)); g->buddy_chats = g_slist_remove(g->buddy_chats, conv); purple_conv_chat_left(PURPLE_CONV_CHAT(conv)); purple_signal_emit(purple_conversations_get_handle(), "chat-left", conv); void purple_serv_got_join_chat_failed(PurpleConnection *gc, GHashTable *data) purple_signal_emit(purple_conversations_get_handle(), "chat-join-failed", void serv_got_chat_in(PurpleConnection *g, int id, const char *who, PurpleMessageFlags flags, const char *message, time_t mtime) PurpleConversation *conv = NULL; PurpleConvChat *chat = NULL; g_return_if_fail(who != NULL); g_return_if_fail(message != NULL); purple_debug_error("server", "serv_got_chat_in ignoring negative timestamp\n"); /* TODO: Would be more appropriate to use a value that indicates that the timestamp is unknown, and surface that in the UI. */ for (bcs = g->buddy_chats; bcs != NULL; bcs = bcs->next) { conv = (PurpleConversation *)bcs->data; chat = PURPLE_CONV_CHAT(conv); if (purple_conv_chat_get_id(chat) == id) /* Did I send the message? */ if (purple_strequal(purple_conv_chat_get_nick(chat), purple_normalize(purple_conversation_get_account(conv), who))) { flags |= PURPLE_MESSAGE_SEND; flags &= ~PURPLE_MESSAGE_RECV; /* Just in case some prpl sets it! */ flags |= PURPLE_MESSAGE_RECV; * Make copies of the message and the sender in case plugins want * to free these strings and replace them with a modifed version. buffy = g_strdup(message); plugin_return = GPOINTER_TO_INT( purple_signal_emit_return_1(purple_conversations_get_handle(), "receiving-chat-msg", g->account, &angel, &buffy, conv, &flags)); if (!buffy || !angel || plugin_return) { purple_signal_emit(purple_conversations_get_handle(), "received-chat-msg", g->account, who, message, conv, flags); purple_conv_chat_write(chat, who, message, flags, mtime); void serv_send_file(PurpleConnection *gc, const char *who, const char *file) PurplePluginProtocolInfo *prpl_info; prpl = purple_connection_get_prpl(gc); prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl); if (prpl_info->send_file && (!prpl_info->can_receive_file || prpl_info->can_receive_file(gc, who))) prpl_info->send_file(gc, who, file);