HGKeeper

* libokcupid

* libokcupid is the property of its developers. See the COPYRIGHT file

* for more details.

* 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 3 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, see <http://www.gnu.org/licenses/>.

#include "okcupid.h"

#include "okc_connection.h"

#include "okc_blist.h"

#include "okc_messages.h"

void okc_blist_wink_buddy(PurpleBlistNode *node, gpointer data)

{

PurpleBuddy *buddy;

OkCupidAccount *oca;

gchar *postdata;

PurpleConnection *pc;

if(!PURPLE_BLIST_NODE_IS_BUDDY(node))

return;

buddy = (PurpleBuddy *) node;

if (!buddy || !buddy->account)

return;

pc = purple_account_get_connection(buddy->account);

if (!pc || !pc->proto_data)

return;

oca = pc->proto_data;

postdata = g_strdup_printf("woo=1&u=%s&ajax=1", purple_url_encode(buddy->name));

okc_post_or_get(oca, OKC_METHOD_POST, NULL, "/profile", postdata, NULL, NULL, FALSE);

g_free(postdata);

}

void okc_got_info(OkCupidAccount *oca, gchar *data,

gsize data_len, gpointer userdata)

{

gchar *username = userdata;

JsonParser *parser;

JsonNode *root;

PurpleNotifyUserInfo *user_info;

gchar *value_tmp;

GError *error = NULL;

JsonObject *info;

if (!data || !data_len)

{

g_free(username);

return;

}

purple_debug_info("okcupid", "okc_got_info: %s\n", data);

user_info = purple_notify_user_info_new();

/* Insert link to profile at top */

value_tmp = g_strdup_printf("<a href=\"http://www.okcupid.com/profile/%s\">%s</a>",

username, _("View web profile"));

purple_notify_user_info_add_pair(user_info, NULL, value_tmp);

purple_notify_user_info_add_section_break(user_info);

g_free(value_tmp);

parser = json_parser_new();

if(!json_parser_load_from_data(parser, data, data_len, &error))

{

purple_debug_error("okcupid", "got_info error: %s\n", error->message);

purple_notify_userinfo(oca->pc, username, user_info, NULL, NULL);

purple_notify_user_info_destroy(user_info);

g_free(username);

return;

}

root = json_parser_get_root(parser);

info = json_node_get_object(root);

if (json_object_get_member(info, "error"))

{

purple_debug_error("okcupid", "got_info error\n");

purple_notify_userinfo(oca->pc, username, user_info, NULL, NULL);

purple_notify_user_info_destroy(user_info);

g_free(username);

return;

}

value_tmp = g_strdup_printf("%" G_GINT64_FORMAT " years", json_node_get_int(json_object_get_member(info, "age")));

purple_notify_user_info_add_pair(user_info, _("Age"), value_tmp);

g_free(value_tmp);

purple_notify_user_info_add_pair(user_info, _("Gender"), json_node_get_string(json_object_get_member(info, "sex")));

purple_notify_user_info_add_pair(user_info, _("Sexual Preference"), json_node_get_string(json_object_get_member(info, "orientation")));

purple_notify_user_info_add_pair(user_info, _("Relationship Status"), json_node_get_string(json_object_get_member(info, "status")));

purple_notify_user_info_add_pair(user_info, _("Location"), json_node_get_string(json_object_get_member(info, "location")));

value_tmp = g_strdup_printf("%" G_GINT64_FORMAT "%%", json_node_get_int(json_object_get_member(info, "matchpercentage")));

purple_notify_user_info_add_pair(user_info, _("Match"), value_tmp);

g_free(value_tmp);

value_tmp = g_strdup_printf("%" G_GINT64_FORMAT "%%", json_node_get_int(json_object_get_member(info, "friendpercentage")));

purple_notify_user_info_add_pair(user_info, _("Friend"), value_tmp);

g_free(value_tmp);

value_tmp = g_strdup_printf("%" G_GINT64_FORMAT "%%", json_node_get_int(json_object_get_member(info, "enemypercentage")));

purple_notify_user_info_add_pair(user_info, _("Enemy"), value_tmp);

g_free(value_tmp);

const gchar *buddy_icon = json_node_get_string(json_object_get_member(info, "thumbnail"));

PurpleBuddy *buddy = purple_find_buddy(oca->account, username);

if (buddy != NULL)

{

OkCupidBuddy *obuddy = buddy->proto_data;

if (obuddy == NULL)

{

obuddy = g_new0(OkCupidBuddy, 1);

obuddy->buddy = buddy;

obuddy->oca = oca;

// load the old buddy icon url from the icon 'checksum'

const gchar *buddy_icon_url = purple_buddy_icons_get_checksum_for_user(buddy);

if (buddy_icon_url != NULL)

obuddy->thumb_url = g_strdup(buddy_icon_url);

buddy->proto_data = obuddy;

}

if (!obuddy->thumb_url || !g_str_equal(obuddy->thumb_url, buddy_icon))

{

gchar *host, *path, *path2;

gchar *large_image_url;

g_free(obuddy->thumb_url);

obuddy->thumb_url = g_strdup(buddy_icon);

large_image_url = purple_strreplace(buddy_icon, "/60x60/", "/256x256/");

purple_url_parse(large_image_url, &host, NULL, &path, NULL, NULL);

g_free(large_image_url);

if (path[0] != '/')

path2 = g_strdup_printf("/%s", path);

else

path2 = g_strdup(path);

okc_post_or_get(oca, OKC_METHOD_GET, host, path2, NULL, okc_buddy_icon_cb, g_strdup(username), FALSE);

g_free(host);

g_free(path);

g_free(path2);

}

purple_notify_user_info_add_section_break(user_info);

purple_notify_user_info_add_section_header(user_info, _("The Skinny"));

info = json_node_get_object(json_object_get_member(info, "skinny"));

purple_notify_user_info_add_pair(user_info, _("Last Online"), json_node_get_string(json_object_get_member(info, "last_online")));

purple_notify_user_info_add_pair(user_info, _("Join Date"), json_node_get_string(json_object_get_member(info, "join_date")));

purple_notify_user_info_add_pair(user_info, _("Ethnicity"), json_node_get_string(json_object_get_member(info, "ethnicities")));

purple_notify_user_info_add_pair(user_info, _("Height"), json_node_get_string(json_object_get_member(info, "height")));

purple_notify_user_info_add_pair(user_info, _("Body Type"), json_node_get_string(json_object_get_member(info, "bodytype")));

purple_notify_user_info_add_pair(user_info, _("Looking For"), json_node_get_string(json_object_get_member(info, "lookingfor")));

purple_notify_user_info_add_pair(user_info, _("Smokes"), json_node_get_string(json_object_get_member(info, "smoker")));

purple_notify_user_info_add_pair(user_info, _("Drinks"), json_node_get_string(json_object_get_member(info, "drinker")));

purple_notify_user_info_add_pair(user_info, _("Drugs"), json_node_get_string(json_object_get_member(info, "drugs")));

if (json_object_has_member(info, "religion"))

{

value_tmp = g_strdup_printf("%s %s", json_node_get_string(json_object_get_member(info, "religion")),

json_node_get_string(json_object_get_member(info, "religionserious")));

purple_notify_user_info_add_pair(user_info, _("Religion"), value_tmp);

g_free(value_tmp);

}

value_tmp = g_strdup_printf("%s %s", json_node_get_string(json_object_get_member(info, "sign")),

json_node_get_string(json_object_get_member(info, "sign_status")));

purple_notify_user_info_add_pair(user_info, _("Star sign"), value_tmp);

g_free(value_tmp);

value_tmp = g_strdup_printf("%s %s", json_node_get_string(json_object_get_member(info, "education_status")),

json_node_get_string(json_object_get_member(info, "education")));

purple_notify_user_info_add_pair(user_info, _("Education"), value_tmp);

g_free(value_tmp);

purple_notify_user_info_add_pair(user_info, _("Job"), json_node_get_string(json_object_get_member(info, "job")));

purple_notify_user_info_add_pair(user_info, _("Income"), json_node_get_string(json_object_get_member(info, "income")));

purple_notify_user_info_add_pair(user_info, _("Kids"), json_node_get_string(json_object_get_member(info, "children")));

value_tmp = g_strdup_printf("%s and %s", json_node_get_string(json_object_get_member(info, "dogs")),

json_node_get_string(json_object_get_member(info, "cats")));

purple_notify_user_info_add_pair(user_info, _("Pets"), value_tmp);

g_free(value_tmp);

purple_notify_user_info_add_pair(user_info, _("Languages"), json_node_get_string(json_object_get_member(info, "languagestr")));

purple_notify_userinfo(oca->pc, username, user_info, NULL, NULL);

purple_notify_user_info_destroy(user_info);

g_object_unref(parser);

g_free(username);

}

void okc_get_info(PurpleConnection *pc, const gchar *uid)

{

gchar *profile_url;

profile_url = g_strdup_printf("/profile/%s?json=2", purple_url_encode(uid));

okc_post_or_get(pc->proto_data, OKC_METHOD_GET, NULL, profile_url, NULL, okc_got_info, g_strdup(uid), FALSE);

g_free(profile_url);

}

void okc_add_buddy(PurpleConnection *pc, PurpleBuddy *buddy, PurpleGroup *group)

{

gchar *postdata;

postdata = g_strdup_printf("addbuddy=1&u=%s&ajax=1", purple_url_encode(buddy->name));

okc_post_or_get(pc->proto_data, OKC_METHOD_POST, NULL, "/profile", postdata, NULL, NULL, FALSE);

g_free(postdata);

}

void okc_remove_buddy(PurpleConnection *pc, PurpleBuddy *buddy, PurpleGroup *group)

{

gchar *postdata;

postdata = g_strdup_printf("removebuddy=1&u=%s&ajax=1", purple_url_encode(buddy->name));

okc_post_or_get(pc->proto_data, OKC_METHOD_POST, NULL, "/profile", postdata, NULL, NULL, FALSE);

g_free(postdata);

}

void okc_block_buddy(PurpleConnection *pc, const char *name)

{

gchar *block_url;

block_url = g_strdup_printf("/instantevents?im_block=1&target_screenname=%s", purple_url_encode(name));

okc_post_or_get(pc->proto_data, OKC_METHOD_GET, NULL, block_url, NULL, NULL, NULL, FALSE);

g_free(block_url);

}

GList *okc_blist_node_menu(PurpleBlistNode *node)

{

GList *m = NULL;

PurpleMenuAction *act;

if(PURPLE_BLIST_NODE_IS_BUDDY(node))

{

act = purple_menu_action_new(_("_Wink"),

PURPLE_CALLBACK(okc_blist_wink_buddy),

NULL, NULL);

m = g_list_append(m, act);

} else if (PURPLE_BLIST_NODE_IS_CHAT(node))

{

} else if (PURPLE_BLIST_NODE_IS_GROUP(node))

{

}

return m;

}

pidgin/purple-plugin-pack