static void plainprpl_add_buddy_by_contact_request_ok(void *ptr, PurpleRequestFields *fields)
{
PurpleBuddy *buddy = (PurpleBuddy *) ptr;
PurpleAccount *account = buddy->account;
plain_plugin_state *pstate;
plain_buddy_state *bstate;
char *addr_str;
const char *name;
IP addr;
name = purple_request_fields_get_string(fields, "name");
//invite_msg = purple_request_fields_get_string(fields, "invite_msg");
if (name == NULL && strlen(name) == 0) {
purple_notify_error(ptr, "Invalid Name", _("Name was empty."), _("You need to enter a name."));
purple_blist_remove_buddy(buddy);
} else {
addr_str = g_strdup(buddy->name);
purple_blist_node_set_string(PURPLE_BLIST_NODE(buddy), "addr_str", addr_str);
assert(purple_blist_node_get_string(PURPLE_BLIST_NODE(buddy), "addr_str") != NULL);
purple_blist_rename_buddy(buddy, name);
g_free(addr_str);
pstate = purple_connection_get_protocol_data(buddy->account->gc);
bstate = add_buddy_sdata(buddy, pstate);
assert(addr_parse_full(&addr, addr_str, PLAIN_DEFAULT_PORT_STR, pstate->sockaf) == 0);
addr_parse_full(&addr, addr_str, PLAIN_DEFAULT_PORT_STR, pstate->sockaf);
memcpy(&bstate->addr, &addr, sizeof(IP));
purple_prpl_got_user_status(account, buddy->name, PLAIN_STATUS_ONLINE, NULL);
}
pstate->block_unknown = FALSE;
}
PurpleBuddy *tgp_blist_buddy_migrate (struct tgl_state *TLS, PurpleBuddy *buddy, struct tgl_user *user) {
purple_blist_remove_buddy (buddy);
buddy = purple_buddy_new (tg_get_acc (TLS), user->print_name, NULL);
tgp_blist_buddy_set_id (buddy, user->id);
purple_blist_add_buddy (buddy, NULL, tgp_blist_group_init ("Telegram"), NULL);
return buddy;
}
static VALUE remove_buddy(VALUE self, VALUE buddy)
{
PurpleAccount *account = NULL;
PurpleConnection *gc = NULL;
Data_Get_Struct(self, PurpleAccount, account);
gc = purple_account_get_connection( account );
PurpleBuddy* pb = purple_find_buddy(account, RSTRING_PTR(buddy));
if (NULL == pb) {
rb_raise(rb_eRuntimeError, "Failed to remove buddy for %s : %s does not exist", purple_account_get_username(account), RSTRING_PTR(buddy));
}
char* group = _("Buddies");
PurpleGroup* grp = purple_find_group(group);
if (!grp)
{
grp = purple_group_new(group);
purple_blist_add_group(grp, NULL);
}
purple_blist_remove_buddy(pb);
purple_account_remove_buddy(account, pb, grp);
serv_rem_permit( gc, RSTRING_PTR( buddy ) );
return Qtrue;
}
static void update_user_handler (struct tgl_state *TLS, struct tgl_user *user, unsigned flags) {
// if (!(flags & TGL_UPDATE_CREATED)) { return; }
if (TLS->our_id == tgl_get_peer_id (user->id)) {
if (flags & TGL_UPDATE_NAME) {
p2tgl_connection_set_display_name (TLS, (tgl_peer_t *)user);
}
} else {
PurpleBuddy *buddy = p2tgl_buddy_find (TLS, user->id);
if (!buddy) {
buddy = p2tgl_buddy_new (TLS, (tgl_peer_t *)user);
purple_blist_add_buddy (buddy, NULL, tggroup, NULL);
}
if (flags & TGL_UPDATE_CREATED) {
purple_buddy_set_protocol_data (buddy, (gpointer)user);
p2tgl_prpl_got_user_status (TLS, user->id, &user->status);
p2tgl_buddy_update (TLS, (tgl_peer_t *)user, flags);
}
if (flags & (TGL_UPDATE_NAME | TGL_UPDATE_REAL_NAME | TGL_UPDATE_USERNAME) && buddy) {
p2tgl_blist_alias_buddy (buddy, user);
}
if (flags & TGL_UPDATE_PHOTO) {
tgl_do_get_user_info (TLS, user->id, 0, on_user_get_info, 0);
}
if (flags & TGL_UPDATE_DELETED && buddy) {
purple_blist_remove_buddy (buddy);
}
}
}
bool PurpleIMContactList::removeContactCbk(void * dataIn)
{
// Mutex::ScopedLock lock(PurpleIMContactList::_mutex);
Mutex::ScopedLock lock(PurpleIMContactList::_mutexContact); //VOXOX - JRT - 2009.07.14
PurpleIMContactListCallbackData* cbData = (PurpleIMContactListCallbackData*)dataIn;
PurpleAccount *gAccount = getPurpleAccount( cbData->getInstance() );
PurpleGroup *gGroup = NULL;
PurpleBuddy *gBuddy = NULL;
if ( !cbData->getGroupName().empty() )
{
gGroup = purple_find_group( cbData->getGroupName().c_str() );
gBuddy = purple_find_buddy_in_group(gAccount, cbData->getContactId().c_str(), gGroup );
}
else
{
gBuddy = purple_find_buddy(gAccount, cbData->getContactId().c_str() );
}
if (gBuddy)
{
purple_account_remove_buddy(gAccount, gBuddy, gGroup);
purple_blist_remove_buddy(gBuddy);
}
timeoutRemove( cbData );
delete cbData;
return TRUE;
}
static void decline_secret_chat_cb (gpointer _data, const gchar *code) {
struct accept_secret_chat_data *data = _data;
bl_do_encr_chat_delete (data->TLS, data->U);
purple_blist_remove_buddy (p2tgl_buddy_find(data->TLS, data->U->id));
g_free (data);
}
static void on_contact_added (struct tgl_state *TLS,void *callback_extra, int success, int size, struct tgl_user *users[]) {
PurpleBuddy *buddy = callback_extra;
purple_blist_remove_buddy (buddy);
if (!success || !size) {
purple_notify_error (_telegram_protocol, "Adding Buddy Failed", "Buddy Not Found", "No contact with this phone number was found.");
}
}
static void qq_buddy_free(PurpleBuddy *buddy)
{
g_return_if_fail(buddy);
if (buddy->proto_data) {
qq_buddy_data_free(buddy->proto_data);
}
buddy->proto_data = NULL;
purple_blist_remove_buddy(buddy);
}
static void plainprpl_add_buddy_by_contact_request_cancel(void *ptr, PurpleRequestFields *fields)
{
PurpleBuddy *buddy = (PurpleBuddy *) ptr;
PurpleAccount *account = buddy->account;
plain_plugin_state *pstate = purple_connection_get_protocol_data(buddy->account->gc);
purple_blist_remove_buddy(buddy);
pstate->block_unknown = FALSE;
}
static void remove_purple_buddies(JabberStream *js, const char *jid)
{
GSList *buddies, *l;
buddies = purple_find_buddies(js->gc->account, jid);
for(l = buddies; l; l = l->next)
purple_blist_remove_buddy(l->data);
g_slist_free(buddies);
}
static void qq_buddy_free(PurpleBuddy *buddy)
{
qq_buddy_data *bd;
g_return_if_fail(buddy);
if ((bd = purple_buddy_get_protocol_data(buddy)) != NULL) {
qq_buddy_data_free(bd);
}
purple_buddy_set_protocol_data(buddy, NULL);
purple_blist_remove_buddy(buddy);
}
static void
adc_error(MsnCmdProc *cmdproc, MsnTransaction *trans, int error)
{
MsnSession *session;
PurpleAccount *account;
PurpleConnection *gc;
const char *list, *passport;
const char *reason;
char *msg = NULL;
char **params;
session = cmdproc->session;
account = session->account;
gc = purple_account_get_connection(account);
params = g_strsplit(trans->params, " ", 0);
list = params[0];
passport = params[1];
if (!strcmp(list, "FL"))
msg = pecan_strdup_printf(_("Unable to add user on %s (%s)"),
purple_account_get_username(account),
purple_account_get_protocol_name(account));
else if (!strcmp(list, "BL"))
msg = pecan_strdup_printf(_("Unable to block user on %s (%s)"),
purple_account_get_username(account),
purple_account_get_protocol_name(account));
else if (!strcmp(list, "AL"))
msg = pecan_strdup_printf(_("Unable to permit user on %s (%s)"),
purple_account_get_username(account),
purple_account_get_protocol_name(account));
reason = pecan_error_to_string (error);
if (msg != NULL)
{
purple_notify_error(gc, NULL, msg, reason);
g_free(msg);
}
if (!strcmp(list, "FL"))
{
PurpleBuddy *buddy;
buddy = purple_find_buddy(account, passport);
if (buddy != NULL)
purple_blist_remove_buddy(buddy);
}
g_strfreev(params);
}
void BuddyListBuddy::BuddyContextMenu::removeResponseHandler(
CppConsUI::MessageDialog& /*activator*/,
CppConsUI::AbstractDialog::ResponseType response)
{
if (response != CppConsUI::AbstractDialog::RESPONSE_OK)
return;
PurpleBuddy *buddy = parent_buddy->getPurpleBuddy();
purple_account_remove_buddy(purple_buddy_get_account(buddy), buddy,
purple_buddy_get_group(buddy));
/* Close the context menu before the buddy is deleted because its deletion
* can lead to destruction of this object. */
close();
purple_blist_remove_buddy(buddy);
}
static void
stress_close(PurpleConnection *pc) {
GList *l = NULL;
PurpleGroup *g = NULL;
for(l = buddies; l; l = l->next) {
StressBuddy *sb = l->data;
purple_blist_remove_buddy(sb->buddy);
}
g_list_free(buddies);
g = purple_find_group("prpl-stress");
purple_blist_remove_group(g);
buddies = NULL;
}
/* Remove the buddy referenced by the MsnAddRemData before the serverside list is changed.
* If the buddy will be added, he'll be added back; if he will be removed, he won't be. */
static void
msn_complete_sync_issue(MsnAddRemData *data)
{
PurpleBuddy *buddy;
PurpleGroup *group = NULL;
if (data->group != NULL)
group = purple_find_group(data->group);
if (group != NULL)
buddy = purple_find_buddy_in_group(purple_connection_get_account(data->gc), data->who, group);
else
buddy = purple_find_buddy(purple_connection_get_account(data->gc), data->who);
if (buddy != NULL)
purple_blist_remove_buddy(buddy);
}
static void purple_remove_buddy( struct im_connection *ic, char *who, char *group )
{
PurpleBuddy *pb;
pb = purple_find_buddy( (PurpleAccount*) ic->proto_data, who );
if( pb != NULL )
{
PurpleGroup *group;
group = purple_buddy_get_group( pb );
purple_account_remove_buddy( (PurpleAccount*) ic->proto_data, pb, group );
purple_blist_remove_buddy( pb );
}
purple_gg_buddylist_export( ((PurpleAccount*)ic->proto_data)->gc );
}
static void
_browser_callback(AvahiServiceBrowser *b, AvahiIfIndex interface,
AvahiProtocol protocol, AvahiBrowserEvent event,
const char *name, const char *type, const char *domain,
AvahiLookupResultFlags flags, void *userdata) {
PurpleAccount *account = userdata;
PurpleBuddy *gb = NULL;
switch (event) {
case AVAHI_BROWSER_FAILURE:
purple_debug_error("bonjour", "_browser_callback - Failure: %s\n",
avahi_strerror(avahi_client_errno(avahi_service_browser_get_client(b))));
/* TODO: This is an error that should be handled. */
break;
case AVAHI_BROWSER_NEW:
/* A new peer has joined the network and uses iChat bonjour */
purple_debug_info("bonjour", "_browser_callback - new service\n");
/* Make sure it isn't us */
if (g_ascii_strcasecmp(name, account->username) != 0) {
if (!avahi_service_resolver_new(avahi_service_browser_get_client(b),
interface, protocol, name, type, domain, AVAHI_PROTO_UNSPEC,
0, _resolver_callback, account)) {
purple_debug_warning("bonjour", "_browser_callback -- Error initiating resolver: %s\n",
avahi_strerror(avahi_client_errno(avahi_service_browser_get_client(b))));
}
}
break;
case AVAHI_BROWSER_REMOVE:
purple_debug_info("bonjour", "_browser_callback - Remove service\n");
gb = purple_find_buddy(account, name);
if (gb != NULL) {
bonjour_buddy_delete(gb->proto_data);
purple_blist_remove_buddy(gb);
}
break;
case AVAHI_BROWSER_ALL_FOR_NOW:
case AVAHI_BROWSER_CACHE_EXHAUSTED:
purple_debug_warning("bonjour", "(Browser) %s\n",
event == AVAHI_BROWSER_CACHE_EXHAUSTED ? "CACHE_EXHAUSTED" : "ALL_FOR_NOW");
break;
default:
purple_debug_info("bonjour", "Unrecognized Service browser event: %d.\n", event);
}
}
void BuddyListGroup::GroupContextMenu::removeResponseHandler(
CppConsUI::MessageDialog& /*activator*/,
CppConsUI::AbstractDialog::ResponseType response)
{
if (response != CppConsUI::AbstractDialog::RESPONSE_OK)
return;
// based on gtkdialogs.c:pidgin_dialogs_remove_group_cb()
PurpleGroup *group = parent_group->getPurpleGroup();
PurpleBlistNode *cnode = purple_blist_node_get_first_child(
PURPLE_BLIST_NODE(group));
while (cnode) {
if (PURPLE_BLIST_NODE_IS_CONTACT(cnode)) {
PurpleBlistNode *bnode = purple_blist_node_get_first_child(cnode);
cnode = purple_blist_node_get_sibling_next(cnode);
while (bnode)
if (PURPLE_BLIST_NODE_IS_BUDDY(bnode)) {
PurpleBuddy *buddy = PURPLE_BUDDY(bnode);
PurpleAccount *account = purple_buddy_get_account(buddy);
bnode = purple_blist_node_get_sibling_next(bnode);
if (purple_account_is_connected(account)) {
purple_account_remove_buddy(account, buddy, group);
purple_blist_remove_buddy(buddy);
}
}
else
bnode = purple_blist_node_get_sibling_next(bnode);
}
else if (PURPLE_BLIST_NODE_IS_CHAT(cnode)) {
PurpleChat *chat = PURPLE_CHAT(cnode);
cnode = purple_blist_node_get_sibling_next(cnode);
purple_blist_remove_chat(chat);
}
else
cnode = purple_blist_node_get_sibling_next(cnode);
}
/* Close the context menu before the group is deleted because its deletion
* can lead to destruction of this object. */
close();
purple_blist_remove_group(group);
}
static void destroy_buddy(gpointer key, gpointer value, gpointer data)
{
PurpleBuddy *buddy;
gchar *group_name;
FacebookAccount *fba;
buddy = (PurpleBuddy *) value;
group_name = (gchar *) key;
fba = (FacebookAccount *) data;
purple_debug_info("facebook", "removing %s from group %s\n",
buddy->name, group_name);
if (atoll(buddy->name) == fba->uid) {
purple_debug_info("facebook", "not removing self from %s\n",
group_name);
return;
}
purple_blist_remove_buddy(buddy);
}
void AccountCollector::collectNow(PurpleAccount *account, bool remove) {
if (account->ui_data == NULL) {
Log("AccountCollector","freeing account " << purple_account_get_username(account));
if (remove)
g_hash_table_remove(m_accounts, purple_account_get_username(account));
purple_account_set_enabled(account, purple_core_get_ui(), FALSE);
purple_notify_close_with_handle(account);
purple_request_close_with_handle(account);
purple_accounts_remove(account);
GSList *buddies = purple_find_buddies(account, NULL);
while(buddies) {
PurpleBuddy *b = (PurpleBuddy *) buddies->data;
purple_blist_remove_buddy(b);
buddies = g_slist_delete_link(buddies, buddies);
}
/* Remove any open conversation for this account */
for (GList *it = purple_get_conversations(); it; ) {
PurpleConversation *conv = (PurpleConversation *) it->data;
it = it->next;
if (purple_conversation_get_account(conv) == account)
purple_conversation_destroy(conv);
}
/* Remove this account's pounces */
// purple_pounce_destroy_all_by_account(account);
/* This will cause the deletion of an old buddy icon. */
purple_buddy_icons_set_account_icon(account, NULL, 0);
purple_account_destroy(account);
// VALGRIND_DO_LEAK_CHECK;
}
}
static VALUE remove_buddy(VALUE self, VALUE buddy)
{
PurpleAccount *account;
Data_Get_Struct(self, PurpleAccount, account);
PurpleBuddy* pb = purple_find_buddy(account, StringValueCStr(buddy));
if (NULL == pb) {
rb_raise(rb_eRuntimeError, "Failed to remove buddy for %s : %s does not exist", purple_account_get_username(account), StringValueCStr(buddy));
}
char* group = _("Buddies");
PurpleGroup* grp = purple_find_group(group);
if (!grp)
{
grp = purple_group_new(group);
purple_blist_add_group(grp, NULL);
}
purple_blist_remove_buddy(pb);
purple_account_remove_buddy(account, pb, grp);
return Qtrue;
}
static void plainprpl_add_buddy_ok(void *ptr, PurpleRequestFields *fields)
{
PurpleBuddy *buddy;
PurpleConnection *gc;
plain_plugin_state *pstate;
plain_buddy_state *bstate;
const char *addr_str;
//const char* invite_msg;
purple_debug_info("plainprpl", "plainprpl_add_buddy_ok\n");
buddy = (PurpleBuddy *) ptr;
gc = purple_account_get_connection(buddy->account);
addr_str = purple_request_fields_get_string(fields, "addr_str");
//invite_msg = purple_request_fields_get_string(fields, "invite_msg");
if (addr_str == NULL || strlen(addr_str) == 0) {
purple_notify_error(ptr, "Invalid Address", _("The address was empty."), _("You need to enter a host name or an IP address."));
purple_blist_remove_buddy(buddy);
} else {
/* Finalize buddy creation */
purple_debug_info("plainprpl", "Add buddy %s\n", buddy->name);
purple_blist_node_set_string(PURPLE_BLIST_NODE(buddy), "addr_str", addr_str);
assert(purple_blist_node_get_string(PURPLE_BLIST_NODE(buddy), "addr_str") != NULL);
pstate = purple_connection_get_protocol_data(gc);
bstate = add_buddy_sdata(buddy, pstate);
pstate->time_next = 0; //handle now
purple_prpl_got_user_status(buddy->account, buddy->name, PLAIN_STATUS_OFFLINE, NULL);
/*
if (invite_msg) {
plainprpl_send_im(gc, buddy->name, invite_msg, 0);
}*/
}
}
void SpectrumRosterManager::handleSubscription(const Subscription &subscription) {
std::string remote_user = purpleUsername(subscription.to().username());
if (remote_user.empty()) {
Log(m_user->jid(), "handleSubscription: Remote user is EMPTY!");
return;
}
if (m_user->isConnected()) {
PurpleBuddy *buddy = NULL;
// Try to get PurpleBuddy from SpectrumBuddy at first, because SpectrumBuddy
// uses normalized username (buddy->name could be "User", but remote_user is normalized
// so it's "user" for example).
AbstractSpectrumBuddy *s_buddy = getRosterItem(remote_user);
if (s_buddy)
buddy = s_buddy->getBuddy();
else
buddy = purple_find_buddy(m_user->account(), remote_user.c_str());
if (subscription.subtype() == Subscription::Subscribed) {
// Accept authorize request.
if (hasAuthRequest(remote_user)) {
Log(m_user->jid(), "subscribed presence for authRequest arrived => accepting the request");
m_authRequests[remote_user]->authorize_cb(m_authRequests[remote_user]->user_data);
removeAuthRequest(remote_user);
}
if (!isInRoster(remote_user, "both")) {
if (buddy) {
Log(m_user->jid(), "adding this user to local roster and sending presence");
if (s_buddy == NULL) {
// There is PurpleBuddy, but not SpectrumBuddy (that should not happen, but this
// code doesn't break anything).
addRosterItem(buddy);
Transport::instance()->sql()->addBuddy(m_user->storageId(), remote_user, "both");
storeBuddy(buddy);
}
else {
// Update subscription.
s_buddy->setSubscription("both");
Transport::instance()->sql()->updateBuddySubscription(m_user->storageId(), remote_user, "both");
storeBuddy(buddy);
}
} else {
Log(m_user->jid(), "user is not in legacy network contact lists => nothing to be subscribed");
}
}
// XMPP user is able to get the first status presence just after "subscribed" presence.
if (s_buddy) {
sendPresence(s_buddy);
}
return;
}
else if (subscription.subtype() == Subscription::Subscribe) {
// User is in roster, so that's probably response for RIE.
if (s_buddy) {
Log(m_user->jid(), "subscribe presence; user is already in roster => sending subscribed");
s_buddy->setSubscription("to");
Tag *reply = new Tag("presence");
reply->addAttribute( "to", subscription.from().bare() );
reply->addAttribute( "from", subscription.to().bare() );
reply->addAttribute( "type", "subscribe" );
Transport::instance()->send( reply );
reply = new Tag("presence");
reply->addAttribute( "to", subscription.from().bare() );
reply->addAttribute( "from", subscription.to().bare() );
reply->addAttribute( "type", "subscribed" );
Transport::instance()->send( reply );
// Sometimes there is "subscribed" request for new user received before "subscribe",
// so s_buddy could be already there, but purple_account_add_buddy has not been called.
if (buddy) {
Log(m_user->jid(), "Trying to purple_account_add_buddy just to be sure.");
purple_account_add_buddy(m_user->account(), buddy);
}
}
// User is not in roster, so that's probably new subscribe request.
else {
Log(m_user->jid(), "subscribe presence; user is not in roster => adding to legacy network");
// Disable handling new-buddy event, because we're going to create new buddy by Spectrum, not
// by libpurple (so we don't want to add it to RIE queue and send back to XMPP user).
m_loadingFromDB = true;
PurpleBuddy *buddy = purple_buddy_new(m_user->account(), remote_user.c_str(), remote_user.c_str());
#ifndef TESTS
SpectrumBuddy *s_buddy = new SpectrumBuddy(-1, buddy);
buddy->node.ui_data = (void *) s_buddy;
s_buddy->setSubscription("to");
if (usesJidEscaping(subscription.to().username()))
s_buddy->setFlags(s_buddy->getFlags() | SPECTRUM_BUDDY_JID_ESCAPING);
addRosterItem(s_buddy);
#endif
// Add newly created buddy to legacy network roster.
purple_blist_add_buddy(buddy, NULL, NULL ,NULL);
purple_account_add_buddy(m_user->account(), buddy);
m_loadingFromDB = false;
}
return;
} else if (subscription.subtype() == Subscription::Unsubscribe || subscription.subtype() == Subscription::Unsubscribed) {
if (subscription.subtype() == Subscription::Unsubscribed) {
// Reject authorize request.
if (hasAuthRequest(remote_user)) {
Log(m_user->jid(), "unsubscribed presence for authRequest arrived => rejecting the request");
m_authRequests[remote_user]->deny_cb(m_authRequests[remote_user]->user_data);
removeAuthRequest(remote_user);
return;
}
}
// Buddy is in legacy network roster, so we can remove it.
if (buddy) {
Log(m_user->jid(), "unsubscribed presence => removing this contact from legacy network");
// Remove buddy from database, if he's already there.
if (s_buddy) {
long id = s_buddy->getId();
Transport::instance()->sql()->removeBuddy(m_user->storageId(), remote_user, id);
}
// Remove buddy from legacy network roster.
purple_account_remove_buddy(m_user->account(), buddy, purple_buddy_get_group(buddy));
purple_blist_remove_buddy(buddy);
} else {
// this buddy is not in legacy network roster, so there is nothing to remove...
}
removeFromLocalRoster(remote_user);
// inform user about removing this buddy
Tag *tag = new Tag("presence");
tag->addAttribute("to", subscription.from().bare());
tag->addAttribute("from", subscription.to().username() + "@" + Transport::instance()->jid() + "/bot");
if(subscription.subtype() == Subscription::Unsubscribe) {
tag->addAttribute( "type", "unsubscribe" );
} else {
tag->addAttribute( "type", "unsubscribed" );
}
Transport::instance()->send( tag );
return;
}
}
else {
Log(subscription.from().full(), "Subscribe presence received, but is not connected to legacy network yet.");
}
}
static void spin_receive_friends_cb(PurpleUtilFetchUrlData* url_data,
gpointer userp,
JsonNode* node,
const gchar* error_message)
{
PurpleConnection* gc = (PurpleConnection*) userp;
if(!PURPLE_CONNECTION_IS_VALID(gc))
return;
if(!node)
{
purple_debug_error("spin","friend list error:%s\n",error_message);
purple_connection_error_reason(gc,PURPLE_CONNECTION_ERROR_NETWORK_ERROR,
_("could not receive friend list"));
return;
}
SpinData* spin = (SpinData*) gc->proto_data;
PurpleAccount* account = purple_connection_get_account(gc);
GHashTable* found_buddies = g_hash_table_new(g_direct_hash,g_direct_equal);
GSList* account_buddies = purple_find_buddies(account,NULL);
if(!node || JSON_NODE_TYPE(node) != JSON_NODE_ARRAY)
{
purple_connection_error_reason
(gc,PURPLE_CONNECTION_ERROR_NETWORK_ERROR,
_("invalid friend list format"));
goto exit;
}
JsonArray* friends = json_node_get_array(node);
guint i;
for(i = 0; i < json_array_get_length(friends); ++i)
{
node = json_array_get_element(friends,i);
JsonArray* entry;
if(JSON_NODE_TYPE(node) != JSON_NODE_ARRAY
|| json_array_get_length(entry = json_node_get_array(node)) != 7)
{
purple_debug_info("spin","invalid friend list entry\n");
continue;
}
const gchar* id = json_node_get_string(json_array_get_element(entry,0));
const gchar* name = json_node_get_string(json_array_get_element(entry,1));
guint online = json_node_get_int(json_array_get_element(entry,2));
const gchar* away = json_node_get_string(json_array_get_element(entry,3));
const gchar* photo =json_node_get_string(json_array_get_element(entry,5));
purple_debug_info("spin","got friend info: %s %s %i %s %s\n",
id,name,online, away,photo);
if(!name || !away || !photo || !id)
continue;
PurpleBuddy* buddy = spin_sync_buddy(spin,account_buddies,id,name,
online,away,photo);
g_hash_table_insert(found_buddies,buddy,(gpointer)0x1);
}
GSList* b;
for(b = account_buddies; b; b = b->next)
{
if(!g_hash_table_lookup(found_buddies,b->data))
{
spin_notify_nick_removed
(spin,purple_buddy_get_name((PurpleBuddy*) b->data));
purple_blist_remove_buddy((PurpleBuddy*)b->data);
}
}
spin_connect_add_state(spin,SPIN_STATE_GOT_INITIAL_FRIEND_LIST);
exit:
g_slist_free(account_buddies);
g_hash_table_destroy(found_buddies);
}
//End VoxOx
static void add_purple_buddies_to_groups(JabberStream *js, const char *jid,
const char *alias, GSList *groups)
{
GSList *buddies, *g2, *l;
gchar *my_bare_jid;
GList *pool = NULL;
buddies = purple_find_buddies(js->gc->account, jid);
g2 = groups;
if(!groups) {
if(!buddies)
g2 = g_slist_append(g2, g_strdup(_("Buddies")));
else {
g_slist_free(buddies);
return;
}
}
my_bare_jid = g_strdup_printf("%s@%s", js->user->node, js->user->domain);
while(buddies) {
PurpleBuddy *b = buddies->data;
PurpleGroup *g = purple_buddy_get_group(b);
buddies = g_slist_remove(buddies, b);
if((l = g_slist_find_custom(g2, g->name, (GCompareFunc)strcmp))) {
const char *servernick;
/* Previously stored serverside / buddy-supplied alias */
if((servernick = purple_blist_node_get_string((PurpleBlistNode*)b, "servernick")))
serv_got_alias(js->gc, jid, servernick);
/* Alias from our roster retrieval */
if(alias && (!b->alias || strcmp(b->alias, alias)))
purple_serv_got_private_alias(js->gc, jid, alias);
g_free(l->data);
g2 = g_slist_delete_link(g2, l);
} else {
pool = g_list_prepend(pool, b);
}
}
while(g2) {
PurpleGroup *g = purple_find_group(g2->data);
PurpleBuddy *b = NULL;
if (pool) {
b = pool->data;
pool = g_list_delete_link(pool, pool);
} else {
b = purple_buddy_new(js->gc->account, jid, alias);
}
if(!g) {
g = purple_group_new(g2->data);
purple_blist_add_group(g, NULL);
}
purple_blist_add_buddy(b, NULL, g, NULL);
purple_blist_alias_buddy(b, alias);
/* If we just learned about ourself, then fake our status,
* because we won't be receiving a normal presence message
* about ourself. */
if(!strcmp(b->name, my_bare_jid)) {
PurplePresence *gpresence;
PurpleStatus *status;
gpresence = purple_account_get_presence(js->gc->account);
status = purple_presence_get_active_status(gpresence);
jabber_presence_fake_to_self(js, status);
}
g_free(g2->data);
g2 = g_slist_delete_link(g2, g2);
}
while (pool) {
PurpleBuddy *b = pool->data;
purple_blist_remove_buddy(b);
pool = g_list_delete_link(pool, pool);
}
g_free(my_bare_jid);
g_slist_free(buddies);
}
static void add_purple_buddy_to_groups(JabberStream *js, const char *jid,
const char *alias, GSList *groups)
{
GSList *buddies, *l;
PurpleAccount *account = purple_connection_get_account(js->gc);
buddies = purple_find_buddies(js->gc->account, jid);
if(!groups) {
if(!buddies)
groups = g_slist_append(groups, g_strdup(_("Buddies")));
else {
/* TODO: What should we do here? Removing the local buddies
* is wrong, but so is letting the group state get out of sync with
* the server.
*/
g_slist_free(buddies);
return;
}
}
while(buddies) {
PurpleBuddy *b = buddies->data;
PurpleGroup *g = purple_buddy_get_group(b);
buddies = g_slist_delete_link(buddies, buddies);
/* XMPP groups are case-sensitive, but libpurple groups are
* case-insensitive. We treat a buddy in both "Friends" and "friends"
* as only being in one group, but if we push changes about the buddy
* to the server, the buddy will be dropped from one of the groups.
* Not optimal, but better than the alternative, I think.
*/
if((l = g_slist_find_custom(groups, purple_group_get_name(g), (GCompareFunc)purple_utf8_strcasecmp))) {
/* The buddy is already on the local list. Update info. */
const char *servernick, *balias;
/* Previously stored serverside / buddy-supplied alias */
if((servernick = purple_blist_node_get_string((PurpleBlistNode*)b, "servernick")))
serv_got_alias(js->gc, jid, servernick);
/* Alias from our roster retrieval */
balias = purple_buddy_get_local_buddy_alias(b);
if(alias && !purple_strequal(alias, balias))
purple_serv_got_private_alias(js->gc, jid, alias);
g_free(l->data);
groups = g_slist_delete_link(groups, l);
} else {
/* This buddy isn't in the group on the server anymore */
purple_debug_info("jabber", "jabber_roster_parse(): Removing %s "
"from group '%s' on the local list\n",
purple_buddy_get_name(b),
purple_group_get_name(g));
purple_blist_remove_buddy(b);
}
}
if (groups) {
char *tmp = roster_groups_join(groups);
purple_debug_info("jabber", "jabber_roster_parse(): Adding %s to "
"groups: %s\n", jid, tmp);
g_free(tmp);
}
while(groups) {
PurpleGroup *g = purple_find_group(groups->data);
PurpleBuddy *b = purple_buddy_new(account, jid, alias);
if(!g) {
g = purple_group_new(groups->data);
purple_blist_add_group(g, NULL);
}
purple_blist_add_buddy(b, NULL, g, NULL);
purple_blist_alias_buddy(b, alias);
g_free(groups->data);
groups = g_slist_delete_link(groups, groups);
}
g_slist_free(buddies);
}
void jabber_roster_add_buddy(PurpleConnection *gc, PurpleBuddy *buddy,
PurpleGroup *group)
{
JabberStream *js = gc->proto_data;
char *who;
JabberID *jid;
JabberBuddy *jb;
JabberBuddyResource *jbr;
const char *name;
/* If we haven't received the roster yet, ignore any adds */
if (js->state != JABBER_STREAM_CONNECTED)
return;
name = purple_buddy_get_name(buddy);
jid = jabber_id_new(name);
if (jid == NULL) {
/* TODO: Remove the buddy from the list? */
return;
}
/* Adding a chat room or a chat buddy to the roster is *not* supported. */
if (jid->node && jabber_chat_find(js, jid->node, jid->domain) != NULL) {
/*
* This is the same thing Bonjour does. If it causes problems, move
* it to an idle callback.
*/
purple_debug_warning("jabber", "Cowardly refusing to add a MUC user "
"to your buddy list and removing the buddy. "
"Buddies can only be added by real (non-MUC) "
"JID\n");
purple_blist_remove_buddy(buddy);
jabber_id_free(jid);
return;
}
who = jabber_id_get_bare_jid(jid);
if (jid->resource != NULL) {
/*
* If the buddy name added contains a resource, strip that off and
* rename the buddy.
*/
purple_blist_rename_buddy(buddy, who);
}
jb = jabber_buddy_find(js, who, FALSE);
purple_debug_info("jabber", "jabber_roster_add_buddy(): Adding %s\n", who);
jabber_roster_update(js, who, NULL);
if (jb == js->user_jb) {
jabber_presence_fake_to_self(js, NULL);
} else if(!jb || !(jb->subscription & JABBER_SUB_TO)) {
jabber_presence_subscription_set(js, who, "subscribe");
} else if((jbr =jabber_buddy_find_resource(jb, NULL))) {
purple_prpl_got_user_status(gc->account, who,
jabber_buddy_state_get_status_id(jbr->state),
"priority", jbr->priority, jbr->status ? "message" : NULL, jbr->status, NULL);
}
g_free(who);
}
xmlnode * _h_elim_add_buddy ( const char *name ,
const char *id ,
SEXP_VALUE *args ,
gpointer data )
{
ASSERT_ALISTP( args, id, name );
elim_ping();
int loopc = 0;
const char *aname = ALIST_VAL_STR( args, "account-name" );
const char *proto = ALIST_VAL_STR( args, "im-protocol" );
gpointer auid = ALIST_VAL_PTR( args, "account-uid" );
PurpleAccount *acct =
auid ? find_acct_by_uid( auid ) : purple_accounts_find( aname, proto );
if( !acct )
{
sexp_val_free( args );
return response_error( ENXIO, id, name, "unknown account" );
}
const char *b_arg = ALIST_VAL_STRING( args, "bnode-name" );
const char *bname = purple_normalize( acct, b_arg );
const char *gname = ALIST_VAL_STRING( args, "group" );
if( !gname || !*gname ) gname = "Buddies";
PurpleGroup *group = purple_group_new( gname );
PurpleBuddy *buddy = purple_buddy_new( acct, bname, b_arg );
PurpleBuddy *clone = NULL;
//fprintf( stderr, "add-buddy( b: %p, g: %p )\n", buddy, group );
// remove other references to this buddy
purple_blist_add_buddy ( buddy, NULL, group, NULL );
purple_account_add_buddy( acct , buddy );
while( ( clone = (PurpleBuddy*)find_blist_node_clone( buddy ) ) )
{
if( loopc++ > 99 )
{
fprintf( stderr, "ARGH! clone reaping looped: %d\n", loopc );
break;
}
if( clone == buddy )
{
fprintf( stderr, "ARGH! %p not a clone of %p\n", buddy, clone );
break;
}
fprintf( stderr, "(removing clone %p %ld (of buddy: %p)\n",
clone, (long)clone, buddy );
fprintf( stderr, " name : %s\n", purple_buddy_get_name(clone) );
fprintf( stderr, " group: %s)\n",
purple_group_get_name( purple_buddy_get_group(clone) ) );
purple_blist_remove_buddy( clone );
}
xmlnode *rval = xnode_new( "alist" );
AL_PTR( rval, "account-uid" , acct );
AL_PTR( rval, "bnode-uid" , buddy );
AL_PTR( rval, "group-uid" , group );
AL_STR( rval, "bnode-name" , purple_buddy_get_name ( buddy ) );
AL_STR( rval, "bnode-alias" , purple_buddy_get_alias ( buddy ) );
AL_STR( rval, "account-name", purple_account_get_username ( acct ) );
AL_STR( rval, "im-protocol" , purple_account_get_protocol_id( acct ) );
AL_STR( rval, "group-name" , purple_group_get_name ( group ) );
sexp_val_free( args );
return response_value( 0, id, name, rval );
}
static void plainprpl_add_buddy_cancel(void *ptr, PurpleRequestFields *fields)
{
PurpleBuddy *buddy = (PurpleBuddy *) ptr;
purple_blist_remove_buddy(buddy);
}
xmlnode * _h_elim_remove_buddy ( const char *name ,
const char *id ,
SEXP_VALUE *args ,
gpointer data )
{
ASSERT_ALISTP( args, id, name );
fprintf( stderr, "(elim-remove-buddy)\n" );
elim_ping();
const char *aname = ALIST_VAL_STR( args, "account-name" );
const char *proto = ALIST_VAL_STR( args, "im-protocol" );
gpointer auid = ALIST_VAL_PTR( args, "account-uid" );
PurpleAccount *acct = NULL;
gpointer b_uid = ALIST_VAL_PTR( args, "bnode-uid" );
const char *b_arg = NULL;
const char *bname = NULL;
const char *gname = NULL;
PurpleGroup *group = NULL;
PurpleBuddy *buddy = NULL;
gboolean gone = FALSE;
if( b_uid )
{
PurpleBlistNodeType type = PURPLE_BLIST_OTHER_NODE;
PurpleBlistNode *node = find_blist_node_by_uid( b_uid , TRUE );
if( !node )
{
sexp_val_free( args );
return response_error( EINVAL, id, name, "rogue buddy pointer" );
}
type = purple_blist_node_get_type( node );
// ===========================================================
// groups, contacts and chats can safely be removed here:
// buddies should instead be noted for removal in the next
// block of code as they require client<->server interaction:
switch( type )
{
case PURPLE_BLIST_GROUP_NODE :
purple_blist_remove_group ( (PurpleGroup *)node );
gone = TRUE;
break;
case PURPLE_BLIST_CONTACT_NODE:
purple_blist_remove_contact( (PurpleContact *)node );
gone = TRUE;
break;
case PURPLE_BLIST_CHAT_NODE :
FIND_ACCOUNT( args, id, name, acct, auid, aname, proto );
BNODE_ACCOUNT_CHECK(chat,(PurpleChat *)node, acct, args, id, name);
purple_blist_remove_chat ( (PurpleChat *)node );
gone = TRUE;
break;
case PURPLE_BLIST_BUDDY_NODE :
buddy = (PurpleBuddy *)node;
FIND_ACCOUNT( args, id, name, acct, auid, aname, proto );
BNODE_ACCOUNT_CHECK( buddy, buddy, acct, args, id, name );
b_arg = purple_buddy_get_name( buddy );
bname = purple_normalize( acct, b_arg );
break;
default:
sexp_val_free( args );
return response_error( EINVAL, id, name,
"Unknown buddy list node type" );
}
if( gone )
{
xmlnode *rval = xnode_new( "alist" );
if( acct )
{
AL_STR( rval, "account-name", aname );
AL_STR( rval, "im-protocol" , proto );
AL_PTR( rval, "account-uid" , acct );
}
AL_PTR ( rval, "bnode-uid" , buddy );
AL_ENUM( rval, "bnode-type", type , ":blist-node-type" );
sexp_val_free( args );
return response_value( 0, id, name, rval );
}
}
else
{
b_arg = ALIST_VAL_STRING( args, "bnode-name" );
FIND_ACCOUNT( args, id, name, acct, auid, aname, proto );
if( b_arg )
{
bname = purple_normalize( acct, b_arg );
gname = ALIST_VAL_STRING( args, "group" );
group = ( gname && *gname ) ? purple_find_group( gname ) : NULL;
buddy = ( group ?
purple_find_buddy_in_group( acct, bname, group ) :
purple_find_buddy ( acct, bname ) );
}
}
if( !b_arg || !*b_arg )
{
sexp_val_free( args );
return response_error( EINVAL, id, name, "buddy not specified" );
}
// buddy must be in our local list or libpurple won't remove it from the
// server list ( determined empirically, confirmed by inspecting code ):
if( !buddy )
{
buddy = purple_buddy_new( acct, bname, bname );
purple_blist_add_buddy ( buddy, NULL, NULL, NULL );
}
if( buddy )
{
// the order of the remove operations is important: it has to be
// this way round, as noted above: account buddy removal won't
// happen if the buddy is not in the blist when we try:
if( !group ) group = purple_buddy_get_group( buddy );
// is this correct? what if we have more than one copy of said buddy?
// potentially confusing. dunno what the right thing to do is here.
purple_account_remove_buddy( acct, buddy, group );
purple_blist_remove_buddy( buddy );
}
else
{
sexp_val_free( args );
return response_error( ENXIO, id, name, "no such buddy" );
}
xmlnode *rval = xnode_new( "alist" );
AL_STR ( rval, "account-name", purple_account_get_username ( acct ) );
AL_STR ( rval, "im-protocol" , purple_account_get_protocol_id( acct ) );
AL_PTR ( rval, "account-uid" , acct );
AL_PTR ( rval, "bnode-uid" , buddy );
AL_ENUM( rval, "bnode-type", PURPLE_BLIST_BUDDY_NODE, ":blist-node-type" );
sexp_val_free( args );
return response_value( 0, id, name, rval );
}
