/*
Facebook plugin for Miranda Instant Messenger
_____________________________________________
Copyright © 2009-11 Michal Zelinka, 2011-13 Robert Pösel
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, see .
*/
#include "common.h"
int facebook_json_parser::parse_buddy_list(void* data, List::List< facebook_user >* buddy_list)
{
facebook_user* current = NULL;
std::string jsonData = static_cast< std::string* >(data)->substr(9);
JSONNODE *root = json_parse(jsonData.c_str());
if (root == NULL)
return EXIT_FAILURE;
JSONNODE *payload = json_get(root, "payload");
if (payload == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
JSONNODE *list = json_get(payload, "buddy_list");
if (list == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
// Set all contacts in map to offline
for (List::Item< facebook_user >* i = buddy_list->begin(); i != NULL; i = i->next) {
i->data->status_id = ID_STATUS_OFFLINE;
}
// Load last active times
JSONNODE *lastActive = json_get(list, "last_active_times");
if (lastActive != NULL) {
for (unsigned int i = 0; i < json_size(lastActive); i++) {
JSONNODE *it = json_at(lastActive, i);
char *id = json_name(it);
current = buddy_list->find(id);
if (current == NULL) {
buddy_list->insert(std::make_pair(id, new facebook_user()));
current = buddy_list->find(id);
current->user_id = id;
}
current->last_active = json_as_int(it);
}
}
// Find mobile friends
JSONNODE *mobileFriends = json_get(list, "mobile_friends");
if (mobileFriends != NULL) {
for (unsigned int i = 0; i < json_size(mobileFriends); i++) {
JSONNODE *it = json_at(mobileFriends, i);
char *id = json_as_string(it);
current = buddy_list->find(id);
if (current == NULL) {
buddy_list->insert(std::make_pair(id, new facebook_user()));
current = buddy_list->find(id);
current->user_id = id;
}
current->status_id = ID_STATUS_ONTHEPHONE;
}
}
// Find now awailable contacts
JSONNODE *nowAvailable = json_get(list, "nowAvailableList");
if (nowAvailable != NULL) {
for (unsigned int i = 0; i < json_size(nowAvailable); i++) {
JSONNODE *it = json_at(nowAvailable, i);
char *id = json_name(it);
current = buddy_list->find(id);
if (current == NULL) {
buddy_list->insert(std::make_pair(id, new facebook_user()));
current = buddy_list->find(id);
current->user_id = id;
}
current->status_id = ID_STATUS_ONLINE;
// In new version of Facebook "i" means "offline"
JSONNODE *idle = json_get(it, "i");
if (idle != NULL && json_as_bool(idle))
current->status_id = ID_STATUS_OFFLINE;
}
}
// Get aditional informations about contacts (if available)
JSONNODE *userInfos = json_get(list, "userInfos");
if (userInfos != NULL) {
for (unsigned int i = 0; i < json_size(userInfos); i++) {
JSONNODE *it = json_at(userInfos, i);
char *id = json_name(it);
current = buddy_list->find(id);
if (current == NULL)
continue;
JSONNODE *name = json_get(it, "name");
JSONNODE *thumbSrc = json_get(it, "thumbSrc");
if (name != NULL)
current->real_name = utils::text::slashu_to_utf8(utils::text::special_expressions_decode(json_as_string(name)));
if (thumbSrc != NULL)
current->image_url = utils::text::slashu_to_utf8(utils::text::special_expressions_decode(json_as_string(thumbSrc)));
}
}
json_delete(root);
return EXIT_SUCCESS;
}
int facebook_json_parser::parse_friends(void* data, std::map< std::string, facebook_user* >* friends)
{
std::string jsonData = static_cast< std::string* >(data)->substr(9);
JSONNODE *root = json_parse(jsonData.c_str());
if (root == NULL)
return EXIT_FAILURE;
JSONNODE *payload = json_get(root, "payload");
if (payload == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
for (unsigned int i = 0; i < json_size(payload); i++) {
JSONNODE *it = json_at(payload, i);
char *id = json_name(it);
JSONNODE *name = json_get(it, "name");
JSONNODE *thumbSrc = json_get(it, "thumbSrc");
JSONNODE *gender = json_get(it, "gender");
//JSONNODE *vanity = json_get(it, "vanity"); // username
//JSONNODE *uri = json_get(it, "uri"); // profile url
//JSONNODE *is_friend = json_get(it, "is_friend"); // e.g. "True"
//JSONNODE *type = json_get(it, "type"); // e.g. "friend" (classic contact) or "user" (disabled/deleted account)
facebook_user *fbu = new facebook_user();
fbu->user_id = id;
if (name)
fbu->real_name = utils::text::slashu_to_utf8(utils::text::special_expressions_decode(json_as_string(name)));
if (thumbSrc)
fbu->image_url = utils::text::slashu_to_utf8(utils::text::special_expressions_decode(json_as_string(thumbSrc)));
if (gender)
switch (json_as_int(gender)) {
case 1: // female
fbu->gender = 70;
break;
case 2: // male
fbu-> gender = 77;
break;
}
friends->insert(std::make_pair(id, fbu));
}
json_delete(root);
return EXIT_SUCCESS;
}
int facebook_json_parser::parse_notifications(void *data, std::vector< facebook_notification* > *notifications)
{
std::string jsonData = static_cast< std::string* >(data)->substr(9);
JSONNODE *root = json_parse(jsonData.c_str());
if (root == NULL)
return EXIT_FAILURE;
JSONNODE *payload = json_get(root, "payload");
if (payload == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
JSONNODE *list = json_get(payload, "notifications");
if (list == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
for (unsigned int i = 0; i < json_size(list); i++) {
JSONNODE *it = json_at(list, i);
char *id = json_name(it);
JSONNODE *markup = json_get(it, "markup");
JSONNODE *unread = json_get(it, "unread");
//JSONNODE *time = json_get(it, "time");
// Ignore empty and old notifications
if (markup == NULL || unread == NULL || json_as_int(unread) == 0)
continue;
std::string text = utils::text::slashu_to_utf8(utils::text::special_expressions_decode(json_as_string(markup)));
facebook_notification* notification = new facebook_notification();
notification->id = id;
notification->link = utils::text::source_get_value(&text, 3, "text = utils::text::remove_html(utils::text::source_get_value(&text, 1, "push_back(notification);
}
json_delete(root);
return EXIT_SUCCESS;
}
bool ignore_duplicits(FacebookProto *proto, std::string mid, std::string text)
{
std::map::iterator it = proto->facy.messages_ignore.find(mid);
if (it != proto->facy.messages_ignore.end()) {
std::string msg = "????? Ignoring duplicit/sent message\n" + text;
proto->Log(msg.c_str());
it->second = true; // mark to delete it at the end
return true;
}
// remember this id to ignore duplicits
proto->facy.messages_ignore.insert(std::make_pair(mid, true));
return false;
}
void parseAttachments(FacebookProto *proto, std::string *message_text, JSONNODE *it)
{
// Process attachements and stickers
JSONNODE *has_attachment = json_get(it, "has_attachment");
if (has_attachment != NULL && json_as_bool(has_attachment)) {
JSONNODE *admin_snippet = json_get(it, "admin_snippet");
if (admin_snippet != NULL) {
// Append attachements
std::string attachments_text = "";
JSONNODE *attachments = json_get(it, "attachments");
for (unsigned int j = 0; j < json_size(attachments); j++) {
JSONNODE *itAttachment = json_at(attachments, j);
// TODO: behave different for stickers and classic attachements?
// JSONNODE *attach_type = json_get(itAttachment, "attach_type"); // "sticker", "photo", "file"
JSONNODE *name = json_get(itAttachment, "name");
JSONNODE *url = json_get(itAttachment, "url");
if (url != NULL) {
std::string link = json_as_string(url);
if (link.find("/ajax/mercury/attachments/photo/view/") != std::string::npos)
// fix photo url
link = utils::url::decode(utils::text::source_get_value(&link, 2, "?uri=", "&"));
else if (link.find("/") == 0) {
// make absolute url
bool useHttps = proto->getByte(FACEBOOK_KEY_FORCE_HTTPS, 1) > 0;
link = (useHttps ? HTTP_PROTO_SECURE : HTTP_PROTO_REGULAR) + std::string(FACEBOOK_SERVER_REGULAR) + link;
}
if (!link.empty()) {
std::string filename;
if (name != NULL)
filename = json_as_string(name);
if (filename == "null")
filename.clear();
attachments_text += "\n" + (!filename.empty() ? "<" + filename + "> " : "") + link + "\n";
}
}
}
if (!attachments_text.empty()) {
// TODO: have this as extra event, not replace or append message content
if (!message_text->empty())
*message_text += "\n\n";
*message_text += json_as_string(admin_snippet);
*message_text += attachments_text;
}
}
}
}
int facebook_json_parser::parse_messages(void* data, std::vector< facebook_message* >* messages, std::vector< facebook_notification* >* notifications)
{
std::string jsonData = static_cast< std::string* >(data)->substr(9);
JSONNODE *root = json_parse(jsonData.c_str());
if (root == NULL)
return EXIT_FAILURE;
JSONNODE *ms = json_get(root, "ms");
if (ms == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
for (unsigned int i = 0; i < json_size(ms); i++) {
JSONNODE *it = json_at(ms, i);
JSONNODE *type = json_get(it, "type");
if (type == NULL)
continue;
std::string t = json_as_string(type);
if (t == "msg" || t == "offline_msg") {
// we use this only for outgoing messages
// TODO: load recipient id here, but use data from "messaging" section, problem is that "messaging" is usually before this
JSONNODE *msg = json_get(it, "msg");
if (msg == NULL)
continue;
JSONNODE *from = json_get(it, "from");
JSONNODE *from_name = json_get(it, "from_name");
JSONNODE *text = json_get(msg, "text");
JSONNODE *messageId = json_get(msg, "messageId");
JSONNODE *time = json_get(msg, "time");
// JSONNODE *tab_type = json_get(it, "tab_type"); // e.g. "friend"
if (from == NULL || from_name == NULL || text == NULL || messageId == NULL || time == NULL)
continue;
char *from_id = json_as_string(from);
// ignore incomming messages
if (from_id != proto->facy.self_.user_id)
continue;
std::string message_id = json_as_string(messageId);
std::string message_text = json_as_string(text);
message_text = utils::text::trim(utils::text::special_expressions_decode(utils::text::slashu_to_utf8(message_text)), true);
if (message_text.empty())
continue;
JSONNODE *truncated = json_get(msg, "truncated");
if (truncated != NULL && json_as_int(truncated) == 1) {
std::string msg = "????? We got truncated message\n";
msg += utils::text::special_expressions_decode(utils::text::slashu_to_utf8(message_text));
proto->Log(msg.c_str());
}
// ignore duplicits or messages sent from miranda
if (ignore_duplicits(proto, message_id, message_text))
continue;
// Outgoing message
JSONNODE *to = json_get(it, "to");
if (to == NULL)
continue;
JSONNODE *to_name = json_get(it, "to_name");
facebook_message* message = new facebook_message();
message->message_text = message_text;
message->sender_name = utils::text::special_expressions_decode(utils::text::slashu_to_utf8(json_as_string(to_name)));
message->time = utils::time::fix_timestamp(json_as_float(time));
message->user_id = json_as_string(to); // TODO: Check if we have contact with this ID in friendlist and otherwise do something different?
message->message_id = message_id;
message->isIncoming = false;
messages->push_back(message);
} else if (t == "messaging") {
// we use this only for incomming messages (and getting seen info)
JSONNODE *type = json_get(it, "event");
if (type == NULL)
continue;
std::string t = json_as_string(type);
if (t == "read_receipt") {
// user read message
JSONNODE *reader = json_get(it, "reader");
JSONNODE *time = json_get(it, "time");
if (reader == NULL || time == NULL)
continue;
// TODO: add check for chat contacts
HANDLE hContact = proto->ContactIDToHContact(json_as_string(reader));
if (hContact) {
TCHAR ttime[64], tstr[100];
_tcsftime(ttime, SIZEOF(ttime), _T("%X"), utils::conversion::fbtime_to_timeinfo(json_as_float(time)));
mir_sntprintf(tstr, SIZEOF(tstr), TranslateT("Message read: %s"), ttime);
CallService(MS_MSG_SETSTATUSTEXT, (WPARAM)hContact, (LPARAM)tstr);
}
} else if (t == "deliver") {
// inbox message (multiuser or direct)
JSONNODE *msg = json_get(it, "message");
JSONNODE *sender_fbid = json_get(msg, "sender_fbid");
JSONNODE *sender_name = json_get(msg, "sender_name");
JSONNODE *body = json_get(msg, "body");
JSONNODE *tid = json_get(msg, "tid");
JSONNODE *mid = json_get(msg, "mid");
JSONNODE *timestamp = json_get(msg, "timestamp");
if (sender_fbid == NULL || sender_name == NULL || body == NULL || mid == NULL || timestamp == NULL)
continue;
std::string id = json_as_string(sender_fbid);
std::string message_id = json_as_string(mid);
std::string message_text = json_as_string(body);
// Process attachements and stickers
parseAttachments(proto, &message_text, it);
// Ignore messages from myself, as there is no id of recipient
if (id == proto->facy.self_.user_id)
continue;
// Ignore duplicits or messages sent from miranda
if (body == NULL || ignore_duplicits(proto, message_id, message_text))
continue;
message_text = utils::text::trim(utils::text::special_expressions_decode(utils::text::slashu_to_utf8(message_text)), true);
if (message_text.empty())
continue;
facebook_message* message = new facebook_message();
message->message_text = message_text;
message->sender_name = utils::text::special_expressions_decode(utils::text::slashu_to_utf8(json_as_string(sender_name)));
message->time = utils::time::fix_timestamp(json_as_float(timestamp));
message->user_id = id; // TODO: Check if we have contact with this ID in friendlist and otherwise do something different?
message->message_id = message_id;
messages->push_back(message);
}
} else if (t == "thread_msg") {
// multiuser message
JSONNODE *from_name = json_get(it, "from_name");
JSONNODE *to_name_ = json_get(it, "to_name");
if (to_name_ == NULL)
continue;
JSONNODE *to_name = json_get(to_name_, "__html");
JSONNODE *to_id = json_get(it, "to");
JSONNODE *from_id = json_get(it, "from");
JSONNODE *msg = json_get(it, "msg");
JSONNODE *text = json_get(msg, "text");
JSONNODE *messageId = json_get(msg, "messageId");
if (from_id == NULL || text == NULL || messageId == NULL)
continue;
std::string id = json_as_string(from_id);
std::string message_id = json_as_string(messageId);
std::string message_text = json_as_string(text);
// Ignore messages from myself
if (id == proto->facy.self_.user_id)
continue;
// Ignore duplicits or messages sent from miranda
if (ignore_duplicits(proto, message_id, message_text))
continue;
message_text = utils::text::trim(utils::text::special_expressions_decode(utils::text::slashu_to_utf8(message_text)), true);
if (message_text.empty())
continue;
std::string title = utils::text::special_expressions_decode(utils::text::slashu_to_utf8(json_as_string(to_name)));
std::string url = "/?action=read&sk=inbox&page&query&tid=" + id;
std::string popup_text = utils::text::special_expressions_decode(utils::text::slashu_to_utf8(json_as_string(from_name)));
popup_text += ": " + message_text;
proto->Log(" Got multichat message");
TCHAR* szTitle = mir_utf8decodeT(title.c_str());
TCHAR* szText = mir_utf8decodeT(popup_text.c_str());
proto->NotifyEvent(szTitle, szText, NULL, FACEBOOK_EVENT_OTHER, &url);
mir_free(szTitle);
mir_free(szText);
} else if (t == "notification_json") {
// event notification
if (!proto->getByte(FACEBOOK_KEY_EVENT_NOTIFICATIONS_ENABLE, DEFAULT_EVENT_NOTIFICATIONS_ENABLE))
continue;
JSONNODE *nodes = json_get(it, "nodes");
for (unsigned int j = 0; j < json_size(nodes); j++) {
JSONNODE *itNodes = json_at(nodes, j);
//JSONNODE *text = json_get(itNodes, "title/text");
JSONNODE *text_ = json_get(itNodes, "unaggregatedTitle");
if (text_ == NULL)
continue;
JSONNODE *text = json_get(text_, "text");
JSONNODE *url = json_get(itNodes, "url");
JSONNODE *alert_id = json_get(itNodes, "alert_id");
JSONNODE *time_ = json_get(itNodes, "timestamp");
if (time_ == NULL)
continue;
JSONNODE *time = json_get(time_, "time");
if (time == NULL || text == NULL || url == NULL || alert_id == NULL || time == NULL)
continue;
unsigned __int64 timestamp = json_as_float(time);
if (timestamp > proto->facy.last_notification_time_) {
// Only new notifications
proto->facy.last_notification_time_ = timestamp;
facebook_notification* notification = new facebook_notification();
notification->text = utils::text::slashu_to_utf8(json_as_string(text));
notification->link = utils::text::special_expressions_decode(json_as_string(url));
notification->id = json_as_string(alert_id);
std::string::size_type pos = notification->id.find(":");
if (pos != std::string::npos)
notification->id = notification->id.substr(pos+1);
notifications->push_back(notification);
}
}
} else if (t == "typ") {
// chat typing notification
JSONNODE *from = json_get(it, "from");
if (from == NULL)
continue;
facebook_user fbu;
fbu.user_id = json_as_string(from);
HANDLE hContact = proto->AddToContactList(&fbu, CONTACT_FRIEND);
if (proto->getWord(hContact, "Status", 0) == ID_STATUS_OFFLINE)
proto->setWord(hContact, "Status", ID_STATUS_ONLINE);
JSONNODE *st = json_get(it, "st");
if (json_as_int(st) == 1)
CallService(MS_PROTO_CONTACTISTYPING, (WPARAM)hContact, (LPARAM)60);
else
CallService(MS_PROTO_CONTACTISTYPING, (WPARAM)hContact, (LPARAM)PROTOTYPE_CONTACTTYPING_OFF);
} else if (t == "privacy_changed") {
// settings changed
JSONNODE *event_type = json_get(it, "event");
JSONNODE *event_data = json_get(it, "data");
if (event_type == NULL || event_data == NULL)
continue;
std::string t = json_as_string(event_type);
if (t == "visibility_update") {
// change of chat status
JSONNODE *visibility = json_get(event_data, "visibility");
bool isVisible = (visibility != NULL) && json_as_bool(visibility);
proto->Log(" Requested chat switch to %s", isVisible ? "Online" : "Offline");
proto->SetStatus(isVisible ? ID_STATUS_ONLINE : ID_STATUS_INVISIBLE);
}
}
else
continue;
}
// remove received messages from map
for (std::map::iterator it = proto->facy.messages_ignore.begin(); it != proto->facy.messages_ignore.end(); ) {
if (it->second)
it = proto->facy.messages_ignore.erase(it);
else
++it;
}
json_delete(root);
return EXIT_SUCCESS;
}
int facebook_json_parser::parse_unread_threads(void* data, std::vector< std::string >* threads)
{
std::string jsonData = static_cast< std::string* >(data)->substr(9);
JSONNODE *root = json_parse(jsonData.c_str());
if (root == NULL)
return EXIT_FAILURE;
JSONNODE *payload = json_get(root, "payload");
if (payload == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
JSONNODE *unread_threads = json_get(payload, "unread_thread_ids");
if (unread_threads == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
for (unsigned int i = 0; i < json_size(unread_threads); i++) {
JSONNODE *it = json_at(unread_threads, i);
JSONNODE *folder = json_get(it, "folder");
JSONNODE *thread_ids = json_get(it, "thread_ids");
for (unsigned int j = 0; j < json_size(thread_ids); j++) {
JSONNODE *id = json_at(thread_ids, j);
threads->push_back(json_as_string(id));
}
}
json_delete(root);
return EXIT_SUCCESS;
}
int facebook_json_parser::parse_thread_messages(void* data, std::vector< facebook_message* >* messages, bool unreadOnly, int limit)
{
std::string jsonData = static_cast< std::string* >(data)->substr(9);
JSONNODE *root = json_parse(jsonData.c_str());
if (root == NULL)
return EXIT_FAILURE;
JSONNODE *payload = json_get(root, "payload");
if (payload == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
JSONNODE *actions = json_get(payload, "actions");
JSONNODE *threads = json_get(payload, "threads");
if (actions == NULL || threads == NULL) {
json_delete(root);
return EXIT_FAILURE;
}
std::map thread_ids;
for (unsigned int i = 0; i < json_size(threads); i++) {
JSONNODE *it = json_at(threads, i);
JSONNODE *canonical = json_get(it, "canonical_fbid");
JSONNODE *thread_id = json_get(it, "thread_id");
JSONNODE *unread_count = json_get(it, "unread_count"); // TODO: use it to check against number of loaded messages... but how?
if (canonical == NULL || thread_id == NULL)
continue;
std::string id = json_as_string(canonical);
if (id == "null")
continue;
std::string tid = json_as_string(thread_id);
thread_ids.insert(std::make_pair(tid, id));
}
for (unsigned int i = 0; i < json_size(actions); i++) {
JSONNODE *it = json_at(actions, i);
JSONNODE *author = json_get(it, "author");
JSONNODE *author_email = json_get(it, "author_email");
JSONNODE *body = json_get(it, "body");
JSONNODE *tid = json_get(it, "thread_id");
JSONNODE *mid = json_get(it, "message_id");
JSONNODE *timestamp = json_get(it, "timestamp");
if (author == NULL || body == NULL || mid == NULL || tid == NULL || timestamp == NULL)
continue;
// Ignore read messages if we want only unread messages
JSONNODE *is_unread = json_get(it, "is_unread");
if (unreadOnly && (is_unread == NULL || !json_as_bool(is_unread)))
continue;
// Try to get user id from "threads" array (and simultaneously ignore multi user threads)
std::map::iterator iter = thread_ids.find(json_as_string(tid));
if (iter == thread_ids.end())
continue; // not found or ignored multi user thread
std::string user_id = iter->second;
std::string message_id = json_as_string(mid);
std::string message_text = json_as_string(body);
std::string author_id = json_as_string(author);
std::string::size_type pos = author_id.find(":");
if (pos != std::string::npos)
author_id = author_id.substr(pos+1);
// Process attachements and stickers
parseAttachments(proto, &message_text, it);
message_text = utils::text::trim(utils::text::special_expressions_decode(utils::text::slashu_to_utf8(message_text)), true);
if (message_text.empty())
continue;
facebook_message* message = new facebook_message();
message->message_text = message_text;
if (author_email != NULL)
message->sender_name = json_as_string(author_email);
message->time = utils::time::fix_timestamp(json_as_float(timestamp));
message->user_id = user_id; // TODO: Check if we have contact with this ID in friendlist and otherwise do something different?
message->message_id = message_id;
message->isIncoming = (author_id != proto->facy.self_.user_id);
messages->push_back(message);
}
json_delete(root);
return EXIT_SUCCESS;
}