Mercurial > pidgin
view libpurple/protocols/yahoo/yahoo_profile.c @ 28442:e0223ad82ca1
account: Don't leak the account->privacy / account->deny lists.
Multiple similar to:
==21150== 412 (32 direct, 380 indirect) bytes in 2 blocks are definitely lost in loss record 12,416 of 13,348
==21150== at 0x4C221A7: malloc (vg_replace_malloc.c:195)
==21150== by 0x90AA552: g_malloc (gmem.c:131)
==21150== by 0x90C03C7: g_slice_alloc (gslice.c:824)
==21150== by 0x90C0E05: g_slist_append (gslist.c:117)
==21150== by 0x93AE56F: purple_privacy_permit_add (privacy.c:58)
author | Paul Aurich <paul@darkrain42.org> |
---|---|
date | Mon, 26 Oct 2009 04:21:28 +0000 |
parents | 908be3822215 |
children | 0123c69ec0e5 |
line wrap: on
line source
/* * purple * * 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 * 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., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA * */ #define PHOTO_SUPPORT 1 #include "internal.h" #include "debug.h" #include "notify.h" #include "util.h" #if PHOTO_SUPPORT #include "imgstore.h" #endif /* PHOTO_SUPPORT */ #include "libymsg.h" #include "yahoo_friend.h" typedef struct { PurpleConnection *gc; char *name; } YahooGetInfoData; typedef enum profile_lang_id { XX, DA, DE, EL, EN, EN_GB, ES_AR, ES_ES, ES_MX, ES_US, FR_CA, FR_FR, IT, JA, KO, NO, PT, SV, ZH_CN, ZH_HK, ZH_TW, ZH_US, PT_BR } profile_lang_id_t; typedef struct profile_lang_node { profile_lang_id_t lang; char *last_updated_string; char *det; } profile_lang_node_t; typedef struct profile_strings_node { profile_lang_id_t lang; char *lang_string; /* Only to make debugging output saner */ char *charset; char *yahoo_id_string; char *private_string; char *no_answer_string; char *my_email_string; char *realname_string; char *location_string; char *age_string; char *maritalstatus_string; char *gender_string; char *occupation_string; char *hobbies_string; char *latest_news_string; char *favorite_quote_string; char *links_string; char *no_home_page_specified_string; char *home_page_string; char *no_cool_link_specified_string; char *cool_link_1_string; char *cool_link_2_string; char *cool_link_3_string; char *dummy; } profile_strings_node_t; typedef enum profile_state { PROFILE_STATE_DEFAULT, PROFILE_STATE_NOT_FOUND, PROFILE_STATE_UNKNOWN_LANGUAGE } profile_state_t; typedef struct { YahooGetInfoData *info_data; PurpleNotifyUserInfo *user_info; char *url_buffer; char *photo_url_text; char *profile_url_text; const profile_strings_node_t *strings; const char *last_updated_string; const char *title; profile_state_t profile_state; } YahooGetInfoStepTwoData; /* Strings to determine the profile "language" (more accurately "locale"). * Strings in this list must be in the original charset in the profile. * The "Last Updated" string is used, but sometimes is not sufficient to * distinguish 2 locales with this (e.g., ES_ES from ES_US, or FR_CA from * FR_FR, or EL from EN_GB), in which case a second string is added and * such special cases must be placed before the more general case. */ static const profile_lang_node_t profile_langs[] = { { DA, "Opdateret sidste gang ", NULL }, { DE, "Letzter Update ", NULL }, { EL, "Last Updated:", "http://gr.profiles.yahoo.com" }, { EN_GB, "Last Update ", "Favourite Quote" }, { EN, "Last Update:", NULL }, { EN, "Last Update ", NULL }, { ES_AR, "\332ltima actualizaci\363n ", NULL }, { ES_ES, "Actualizada el ", "http://es.profiles.yahoo.com" }, { ES_MX, "Actualizada el ", "http://mx.profiles.yahoo.com" }, { ES_US, "Actualizada el ", NULL }, { FR_CA, "Derni\xe8re mise \xe0 jour", "http://cf.profiles.yahoo.com" }, { FR_FR, "Derni\xe8re mise \xe0 jour", NULL }, { IT, "Ultimo aggiornamento:", NULL }, { JA, "\xba\xc7\xbd\xaa\xb9\xb9\xbf\xb7\xc6\xfc\xa1\xa7", NULL }, { KO, "\xb0\xbb\xbd\xc5\x20\xb3\xaf\xc2\xa5 ", NULL }, { NO, "Sist oppdatert ", NULL }, { PT, "\332ltima atualiza\347\343o ", NULL }, { PT_BR, "\332ltima atualiza\347\343o:", NULL }, { SV, "Senast uppdaterad ", NULL }, { ZH_CN, "\xd7\xee\xba\xf3\xd0\xde\xb8\xc4\xc8\xd5\xc6\xda", NULL }, { ZH_HK, "\xb3\xcc\xaa\xf1\xa7\xf3\xb7\x73\xae\xc9\xb6\xa1", NULL }, { ZH_US, "\xb3\xcc\xab\xe1\xad\xd7\xa7\xef\xa4\xe9\xb4\xc1", "http://chinese.profiles.yahoo.com" }, { ZH_TW, "\xb3\xcc\xab\xe1\xad\xd7\xa7\xef\xa4\xe9\xb4\xc1", NULL }, { XX, NULL, NULL } }; /* Strings in this list must be in UTF-8; 's should be specified as spaces. */ static const profile_strings_node_t profile_strings[] = { { DA, "da", "ISO-8859-1", "Yahoo! ID:", "Privat", "Intet svar", "Min Email", "Rigtige navn:", "Opholdssted:", "Alder:", "Ægteskabelig status:", "Køn:", "Erhverv:", "Hobbyer:", "Sidste nyt:", "Favoritcitat", "Links", "Ingen hjemmeside specificeret", "Forside:", "Intet cool link specificeret", "Cool link 1:", "Cool link 2:", "Cool link 3:", NULL }, { DE, "de", "ISO-8859-1", "Yahoo!-ID:", "Privat", "Keine Antwort", "Meine E-Mail", "Realer Name:", "Ort:", "Alter:", "Familienstand:", "Geschlecht:", "Beruf:", "Hobbys:", "Neuste Nachrichten:", "Mein Lieblingsspruch", "Links", "Keine Homepage angegeben", "Homepage:", "Keinen coolen Link angegeben", "Cooler Link 1:", "Cooler Link 2:", "Cooler Link 3:", NULL }, { EL, "el", "ISO-8859-7", /* EL is identical to EN, except no_answer_string */ "Yahoo! ID:", "Private", "Καμία απάντηση", "My Email", "Real Name:", "Location:", "Age:", "Marital Status:", "Gender:", "Occupation:", "Hobbies:", "Latest News", "Favorite Quote", "Links", "No home page specified", "Home Page:", "No cool link specified", "Cool Link 1:", "Cool Link 2:", "Cool Link 3:", NULL }, { EN, "en", "ISO-8859-1", "Yahoo! ID:", "Private", "No Answer", "My Email:", "Real Name:", "Location:", "Age:", "Marital Status:", "Sex:", "Occupation:", "Hobbies", "Latest News", "Favorite Quote", "Links", "No home page specified", "Home Page:", "No cool link specified", "Cool Link 1", "Cool Link 2", "Cool Link 3", NULL }, { EN_GB, "en_GB", "ISO-8859-1", /* Same as EN except spelling of "Favourite" */ "Yahoo! ID:", "Private", "No Answer", "My Email:", "Real Name:", "Location:", "Age:", "Marital Status:", "Sex:", "Occupation:", "Hobbies", "Latest News", "Favourite Quote", "Links", "No home page specified", "Home Page:", "No cool link specified", "Cool Link 1", "Cool Link 2", "Cool Link 3", NULL }, { ES_AR, "es_AR", "ISO-8859-1", "Usuario de Yahoo!:", "Privado", "No introdujiste una respuesta", "Mi dirección de correo electrónico", "Nombre real:", "Ubicación:", "Edad:", "Estado civil:", "Sexo:", "Ocupación:", "Pasatiempos:", "Últimas noticias:", "Tu cita favorita", "Enlaces", "Ninguna página de inicio especificada", "Página de inicio:", "Ningún enlace preferido", "Enlace genial 1:", "Enlace genial 2:", "Enlace genial 3:", NULL }, { ES_ES, "es_ES", "ISO-8859-1", "ID de Yahoo!:", "Privado", "Sin respuesta", "Mi correo-e", "Nombre verdadero:", "Lugar:", "Edad:", "Estado civil:", "Sexo:", "Ocupación:", "Aficiones:", "Ultimas Noticias:", "Tu cita Favorita", "Enlace", "Ninguna página personal especificada", "Página de Inicio:", "Ningún enlace preferido", "Enlaces Preferidos 1:", "Enlaces Preferidos 2:", "Enlaces Preferidos 3:", NULL }, { ES_MX, "es_MX", "ISO-8859-1", "ID de Yahoo!:", "Privado", "Sin responder", "Mi Dirección de correo-e", "Nombre real:", "Ubicación:", "Edad:", "Estado civil:", "Sexo:", "Ocupación:", "Pasatiempos:", "Ultimas Noticias:", "Su cita favorita", "Enlaces", "Ninguna Página predefinida", "Página web:", "Ningún Enlace preferido", "Enlaces Preferidos 1:", "Enlaces Preferidos 2:", "Enlaces Preferidos 3:", NULL }, { ES_US, "es_US", "ISO-8859-1", "ID de Yahoo!:", "Privado", "No introdujo una respuesta", "Mi Dirección de correo-e", "Nombre real:", "Localidad:", "Edad:", "Estado civil:", "Sexo:", "Ocupación:", "Pasatiempos:", "Ultimas Noticias:", "Su cita Favorita", "Enlaces", "Ninguna Página de inicio predefinida", "Página de inicio:", "Ningún Enlace preferido", "Enlaces Preferidos 1:", "Enlaces Preferidos 2:", "Enlaces Preferidos 3:", NULL }, { FR_CA, "fr_CA", "ISO-8859-1", "Compte Yahoo!:", "Privé", "Sans réponse", "Mon courriel", "Nom réel:", "Lieu:", "Âge:", "État civil:", "Sexe:", "Profession:", "Passe-temps:", "Actualités:", "Citation préférée", "Liens", "Pas de mention d'une page personnelle", "Page personnelle:", "Pas de mention d'un lien favori", "Lien préféré 1:", "Lien préféré 2:", "Lien préféré 3:", NULL }, { FR_FR, "fr_FR", "ISO-8859-1", "Compte Yahoo!:", "Privé", "Sans réponse", "Mon E-mail", "Nom réel:", "Lieu:", "Âge:", "Situation de famille:", "Sexe:", "Profession:", "Centres d'intérêts:", "Actualités:", "Citation préférée", "Liens", "Pas de mention d'une page perso", "Page perso:", "Pas de mention d'un lien favori", "Lien préféré 1:", "Lien préféré 2:", "Lien préféré 3:", NULL }, { IT, "it", "ISO-8859-1", "Yahoo! ID:", "Non pubblica", "Nessuna risposta", "La mia e-mail:", "Nome vero:", "Località:", "Età:", "Stato civile:", "Sesso:", "Occupazione:", "Hobby", "Ultime notizie", "Citazione preferita", "Link", "Nessuna home page specificata", "Inizio:", "Nessun link specificato", "Cool Link 1", "Cool Link 2", "Cool Link 3", NULL }, { JA, "ja", "EUC-JP", "Yahoo! JAPAN ID:", "非公開", "無回答", "メール:", "名前:", "住所:", "年齢:", "未婚/既婚:", "性別:", "職業:", "趣味:", "最近の出来事:", NULL, #if 0 "おすすめサイト", #else "自己PR", /* "Self description" comes before "Links" for yahoo.co.jp */ #endif NULL, NULL, NULL, "おすすめサイト1:", "おすすめサイト2:", "おすすめサイト3:", NULL }, { KO, "ko", "EUC-KR", "야후! ID:", "비공개", "비공개", "My Email", "실명:", "거주지:", "나이:", "결혼 여부:", "성별:", "직업:", "취미:", "자기 소개:", "좋아하는 명언", "링크", "홈페이지를 지정하지 않았습니다.", "홈페이지:", "추천 사이트가 없습니다.", "추천 사이트 1:", "추천 사이트 2:", "추천 사이트 3:", NULL }, { NO, "no", "ISO-8859-1", "Yahoo! ID:", "Privat", "Ikke noe svar", "Min e-post", "Virkelig navn:", "Sted:", "Alder:", "Sivilstatus:", "Kjønn:", "Yrke:", "Hobbyer:", "Siste nytt:", "Yndlingssitat", "Lenker", "Ingen hjemmeside angitt", "Hjemmeside:", "No cool link specified", "Bra lenke 1:", "Bra lenke 2:", "Bra lenke 3:", NULL }, { PT, "pt", "ISO-8859-1", "ID Yahoo!:", "Particular", "Sem resposta", "Meu e-mail", "Nome verdadeiro:", "Local:", "Idade:", "Estado civil:", "Sexo:", "Ocupação:", "Hobbies:", "Últimas notícias:", "Frase favorita", "Links", "Nenhuma página pessoal especificada", "Página pessoal:", "Nenhum site legal especificado", "Site legal 1:", "Site legal 2:", "Site legal 3:", NULL }, { PT_BR, "pt_br", "ISO-8859-1", "ID Yahoo!:", "Particular", "Sem resposta", "Meu e-mail", "Nome verdadeiro:", "Localização:", "Idade:", "Estado civil:", "Sexo:", "Ocupação:", "Pasatiempos:", "Últimas novidades:", "Frase preferida:", "Links", "Nenhuma home page especificada", "Página Web:", "Nenhum site legal especificado", "Link legal 1", "Link legal 2", "Link legal 3", NULL }, { SV, "sv", "ISO-8859-1", "Yahoo!-ID:", "Privat", "Inget svar", "Min mail", "Riktigt namn:", "Plats:", "Ålder:", "Civilstånd:", "Kön:", "Yrke:", "Hobby:", "Senaste nytt:", "Favoritcitat", "Länkar", "Ingen hemsida specificerad", "Hemsida:", "Ingen cool länk specificerad", "Coola länkar 1:", "Coola länkar 2:", "Coola länkar 3:", NULL }, { ZH_CN, "zh_CN", "GB2312", "Yahoo! ID:", "没有提供", "没有回答", "个人电邮地址", "真实姓名:", "所在地点:", "年龄:", "婚姻状况:", "性别:", "职业:", "业余爱好:", "个人近况:", "喜欢的引言", "链接", "没有个人主页", "个人主页:", "没有推荐网站链接", "推荐网站链接 1:", "推荐网站链接 2:", "推荐网站链接 3:", NULL }, { ZH_HK, "zh_HK", "Big5", "Yahoo! ID:", "私人的", "沒有回答", "電子信箱", "真實姓名:", "地點:", "年齡:", "婚姻狀況:", "性別:", "職業:", "嗜好:", "最新消息:", "最喜愛的股票叫價", /* [sic] Yahoo!'s translators don't check context */ "連結", "沒有注明個人網頁", /* [sic] */ "個人網頁:", "沒有注明 Cool 連結", /* [sic] */ "Cool 連結 1:", /* TODO */ "Cool 連結 2:", /* TODO */ "Cool 連結 3:", /* TODO */ NULL }, { ZH_TW, "zh_TW", "Big5", "帳 號:", "沒有提供", "沒有回應", "電子信箱", "姓名:", "地點:", "年齡:", "婚姻狀態:", "性別:", "職業:", "興趣:", "個人近況:", "喜歡的名句", "連結", "沒有個人網頁", "個人網頁:", "沒有推薦網站連結", "推薦網站連結 1:", "推薦網站連結 2:", "推薦網站連結 3:", NULL }, { ZH_US, "zh_US", "Big5", /* ZH_US is like ZH_TW, but also a bit like ZH_HK */ "Yahoo! ID:", "沒有提供", "沒有回答", "個人Email地址", "真實姓名:", "地點:", "年齡:", "婚姻狀態:", "性別:", "職業:", "嗜好:", "個人近況:", "喜歡的名句", "連結", "沒有個人網頁", "個人網頁:", "沒有推薦網站連結", "推薦網站連結 1:", /* TODO */ "推薦網站連結 2:", /* TODO */ "推薦網站連結 3:", /* TODO */ NULL }, { XX, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL }, }; static char *yahoo_info_date_reformat(const char *field, size_t len) { char *tmp = g_strndup(field, len); time_t t = purple_str_to_time(tmp, FALSE, NULL, NULL, NULL); g_free(tmp); return g_strdup(purple_date_format_short(localtime(&t))); } static char *yahoo_remove_nonbreaking_spaces(char *str) { char *p; while ((p = strstr(str, " ")) != NULL) { *p = ' '; /* Turn 's into ordinary blanks */ p += 1; memmove(p, p + 5, strlen(p + 5)); str[strlen(str) - 5] = '\0'; } return str; } static void yahoo_extract_user_info_text(PurpleNotifyUserInfo *user_info, YahooGetInfoData *info_data) { PurpleBuddy *b; YahooFriend *f; b = purple_find_buddy(purple_connection_get_account(info_data->gc), info_data->name); if (b) { const char *balias = purple_buddy_get_local_buddy_alias(b); if(balias && balias[0]) { char *aliastext = g_markup_escape_text(balias, -1); purple_notify_user_info_add_pair(user_info, _("Alias"), aliastext); g_free(aliastext); } #if 0 if (b->idle > 0) { char *idletime = purple_str_seconds_to_string(time(NULL) - b->idle); purple_notify_user_info_add_pair(user_info, _("Idle"), idletime); g_free(idletime); } #endif /* Add the normal tooltip pairs */ yahoo_tooltip_text(b, user_info, TRUE); if ((f = yahoo_friend_find(info_data->gc, purple_buddy_get_name(b)))) { const char *ip; if ((ip = yahoo_friend_get_ip(f))) purple_notify_user_info_add_pair(user_info, _("IP Address"), ip); } } } #if PHOTO_SUPPORT static char *yahoo_get_photo_url(const char *url_text, const char *name) { GString *s = g_string_sized_new(strlen(name) + 8); char *p; char *it = NULL; /*g_string_printf(s, " alt=\"%s\">", name);*/ /* Y! newformat */ g_string_printf(s, " alt=%s>", name); p = strstr(url_text, s->str); 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) {*/ /* Y! newformat*/ if (strncmp(p, "=http://", 8) == 0) { char *q; p += 1; /* skip only the ' ' */ q = strchr(p, ' '); if (q) { g_free(it); it = g_strndup(p, q - p); } } } } g_string_free(s, TRUE); return it; } static void yahoo_got_photo(PurpleUtilFetchUrlData *url_data, gpointer data, const gchar *url_text, size_t len, const gchar *error_message); #endif /* PHOTO_SUPPORT */ static void yahoo_got_info(PurpleUtilFetchUrlData *url_data, gpointer user_data, const gchar *url_text, size_t len, const gchar *error_message) { YahooGetInfoData *info_data = (YahooGetInfoData *)user_data; PurpleNotifyUserInfo *user_info; char *p; #if PHOTO_SUPPORT YahooGetInfoStepTwoData *info2_data; char *photo_url_text = NULL; #else gboolean found = FALSE; char *stripped; int stripped_len; char *last_updated_utf8_string = NULL; #endif /* !PHOTO_SUPPORT */ const char *last_updated_string = NULL; char *url_buffer; GString *s; char *tmp; char *profile_url_text = NULL; int lang, strid; YahooData *yd; const profile_strings_node_t *strings = NULL; const char *title; profile_state_t profile_state = PROFILE_STATE_DEFAULT; purple_debug_info("yahoo", "In yahoo_got_info\n"); yd = info_data->gc->proto_data; yd->url_datas = g_slist_remove(yd->url_datas, url_data); user_info = purple_notify_user_info_new(); title = yd->jp ? _("Yahoo! Japan Profile") : _("Yahoo! Profile"); /* Get the tooltip info string */ yahoo_extract_user_info_text(user_info, info_data); /* We failed to grab the profile URL. This is not expected to actually * happen except under unusual error conditions, as Yahoo is observed * to send back HTML, with a 200 status code. */ if (error_message != NULL || url_text == NULL || strcmp(url_text, "") == 0) { purple_notify_user_info_add_pair(user_info, _("Error retrieving profile"), NULL); purple_notify_userinfo(info_data->gc, info_data->name, user_info, NULL, NULL); purple_notify_user_info_destroy(user_info); g_free(profile_url_text); g_free(info_data->name); g_free(info_data); return; } /* Construct the correct profile URL */ s = g_string_sized_new(80); /* wild guess */ g_string_printf(s, "%s%s", (yd->jp? YAHOOJP_PROFILE_URL: YAHOO_PROFILE_URL), info_data->name); profile_url_text = g_string_free(s, FALSE); s = NULL; /* We don't yet support the multiple link level of the warning page for * 'adult' profiles, not to mention the fact that yahoo wants you to be * logged in (on the website) to be able to view an 'adult' profile. For * now, just tell them that we can't help them, and provide a link to the * profile if they want to do the web browser thing. */ p = strstr(url_text, "Adult Profiles Warning Message"); if (!p) { p = strstr(url_text, "Adult Content Warning"); /* TITLE element */ } if (p) { tmp = g_strdup_printf("<b>%s</b><br><br>" "%s<br><a href=\"%s\">%s</a>", _("Sorry, profiles marked as containing adult content " "are not supported at this time."), _("If you wish to view this profile, " "you will need to visit this link in your web browser:"), profile_url_text, profile_url_text); purple_notify_user_info_add_pair(user_info, NULL, tmp); g_free(tmp); purple_notify_userinfo(info_data->gc, info_data->name, user_info, NULL, NULL); g_free(profile_url_text); purple_notify_user_info_destroy(user_info); g_free(info_data->name); g_free(info_data); return; } /* Check whether the profile is written in a supported language */ for (lang = 0;; lang += 1) { last_updated_string = profile_langs[lang].last_updated_string; if (!last_updated_string) break; p = strstr(url_text, last_updated_string); if (p) { if (profile_langs[lang].det && !strstr(url_text, profile_langs[lang].det)) p = NULL; else break; } } if (p) { for (strid = 0; profile_strings[strid].lang != XX; strid += 1) { if (profile_strings[strid].lang == profile_langs[lang].lang) break; } strings = profile_strings + strid; purple_debug_info("yahoo", "detected profile lang = %s (%d)\n", profile_strings[strid].lang_string, lang); } /* Every user may choose his/her own profile language, and this language * has nothing to do with the preferences of the user which looks at the * profile. We try to support all languages, but nothing is guaranteed. * If we cannot determine the language, it means either (1) the profile * is written in an unsupported language, (2) our language support is * out of date, or (3) the user is not found, or (4) Y! have changed their * webpage layout */ if (!p || strings->lang == XX) { if (!strstr(url_text, "Yahoo! Member Directory - User not found") && !strstr(url_text, "was not found on this server.") && !strstr(url_text, "\xb8\xf8\xb3\xab\xa5\xd7\xa5\xed\xa5\xd5\xa5\xa3\xa1\xbc\xa5\xeb\xa4\xac\xb8\xab\xa4\xc4\xa4\xab\xa4\xea\xa4\xde\xa4\xbb\xa4\xf3")) { profile_state = PROFILE_STATE_UNKNOWN_LANGUAGE; } else { profile_state = PROFILE_STATE_NOT_FOUND; } } #if PHOTO_SUPPORT photo_url_text = yahoo_get_photo_url(url_text, info_data->name); #endif /* PHOTO_SUPPORT */ url_buffer = g_strdup(url_text); /* * purple_markup_strip_html() doesn't strip out character entities like * and · */ yahoo_remove_nonbreaking_spaces(url_buffer); #if 1 while ((p = strstr(url_buffer, "·")) != NULL) { memmove(p, p + 6, strlen(p + 6)); url_buffer[strlen(url_buffer) - 6] = '\0'; } #endif /* nuke the nasty \r's */ purple_str_strip_char(url_buffer, '\r'); #if PHOTO_SUPPORT /* Marshall the existing state */ info2_data = g_malloc(sizeof(YahooGetInfoStepTwoData)); info2_data->info_data = info_data; info2_data->url_buffer = url_buffer; info2_data->photo_url_text = photo_url_text; info2_data->profile_url_text = profile_url_text; info2_data->strings = strings; info2_data->last_updated_string = last_updated_string; info2_data->title = title; info2_data->profile_state = profile_state; info2_data->user_info = user_info; /* Try to put the photo in there too, if there's one */ if (photo_url_text) { PurpleUtilFetchUrlData *url_data; /* use whole URL if using HTTP Proxy */ gboolean use_whole_url = yahoo_account_use_http_proxy(info_data->gc); /* User-uploaded photos use a different server that requires the Host * header, but Yahoo Japan will use the "chunked" content encoding if * we specify HTTP 1.1. So we have to specify 1.0 & fix purple_util_fetch_url */ url_data = purple_util_fetch_url(photo_url_text, use_whole_url, NULL, FALSE, yahoo_got_photo, info2_data); if (url_data != NULL) yd->url_datas = g_slist_prepend(yd->url_datas, url_data); } else { /* Emulate a callback */ yahoo_got_photo(NULL, info2_data, NULL, 0, NULL); } } static void yahoo_got_photo(PurpleUtilFetchUrlData *url_data, gpointer data, const gchar *url_text, size_t len, const gchar *error_message) { YahooGetInfoStepTwoData *info2_data = (YahooGetInfoStepTwoData *)data; YahooData *yd; gboolean found = FALSE; int id = -1; /* Temporary variables */ char *p = NULL; char *stripped; int stripped_len; char *last_updated_utf8_string = NULL; char *tmp; /* Unmarshall the saved state */ YahooGetInfoData *info_data = info2_data->info_data; char *url_buffer = info2_data->url_buffer; PurpleNotifyUserInfo *user_info = info2_data->user_info; char *photo_url_text = info2_data->photo_url_text; char *profile_url_text = info2_data->profile_url_text; const profile_strings_node_t *strings = info2_data->strings; const char *last_updated_string = info2_data->last_updated_string; profile_state_t profile_state = info2_data->profile_state; /* We continue here from yahoo_got_info, as if nothing has happened */ #endif /* PHOTO_SUPPORT */ /* Jun 29 05 Bleeter: Y! changed their profile pages. Terminators now seem to be */ /* </dd> and not \n. The prpl's need to be audited before it can be moved */ /* in to purple_markup_strip_html*/ char *fudged_buffer; yd = info_data->gc->proto_data; yd->url_datas = g_slist_remove(yd->url_datas, url_data); fudged_buffer = purple_strcasereplace(url_buffer, "</dd>", "</dd><br>"); /* nuke the html, it's easier than trying to parse the horrid stuff */ stripped = purple_markup_strip_html(fudged_buffer); stripped_len = strlen(stripped); purple_debug_misc("yahoo", "stripped = %p\n", stripped); purple_debug_misc("yahoo", "url_buffer = %p\n", url_buffer); /* convert to utf8 */ if (strings && strings->charset) { p = g_convert(stripped, -1, "utf-8", strings->charset, NULL, NULL, NULL); if (!p) { p = g_locale_to_utf8(stripped, -1, NULL, NULL, NULL); if (!p) { p = g_convert(stripped, -1, "utf-8", "windows-1252", NULL, NULL, NULL); } } if (p) { g_free(stripped); stripped = purple_utf8_ncr_decode(p); stripped_len = strlen(stripped); g_free(p); } } p = NULL; /* "Last updated" should also be converted to utf8 and with killed */ if (strings && strings->charset) { last_updated_utf8_string = g_convert(last_updated_string, -1, "utf-8", strings->charset, NULL, NULL, NULL); yahoo_remove_nonbreaking_spaces(last_updated_utf8_string); purple_debug_misc("yahoo", "after utf8 conversion: stripped = (%s)\n", stripped); } if (profile_state == PROFILE_STATE_DEFAULT) { #if 0 /* extract their Yahoo! ID and put it in. Don't bother marking has_info as * true, since the Yahoo! ID will always be there */ if (!purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->yahoo_id_string, (yd->jp ? 2 : 10), "\n", 0, NULL, _("Yahoo! ID"), 0, NULL, NULL)) ; #endif #if PHOTO_SUPPORT /* 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")) { purple_debug_info("yahoo", "Error getting %s: %s\n", photo_url_text, url_text); } else { purple_debug_info("yahoo", "%s is %" G_GSIZE_FORMAT " bytes\n", photo_url_text, len); id = purple_imgstore_add_with_id(g_memdup(url_text, len), len, NULL); tmp = g_strdup_printf("<img id=\"%d\"><br>", id); purple_notify_user_info_add_pair(user_info, NULL, tmp); g_free(tmp); } } #endif /* PHOTO_SUPPORT */ /* extract their Email address and put it in */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->my_email_string, (yd->jp ? 4 : 1), " ", 0, strings->private_string, _("Email"), 0, NULL, NULL); /* extract the Nickname if it exists */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, "Nickname:", 1, "\n", '\n', NULL, _("Nickname"), 0, NULL, NULL); /* extract their RealName and put it in */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->realname_string, (yd->jp ? 3 : 1), "\n", '\n', NULL, _("Real Name"), 0, NULL, NULL); /* extract their Location and put it in */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->location_string, (yd->jp ? 4 : 2), "\n", '\n', NULL, _("Location"), 0, NULL, NULL); /* extract their Age and put it in */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->age_string, (yd->jp ? 2 : 3), "\n", '\n', NULL, _("Age"), 0, NULL, NULL); /* extract their MaritalStatus and put it in */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->maritalstatus_string, (yd->jp ? 2 : 3), "\n", '\n', strings->no_answer_string, _("Marital Status"), 0, NULL, NULL); /* extract their Gender and put it in */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->gender_string, (yd->jp ? 2 : 3), "\n", '\n', strings->no_answer_string, _("Gender"), 0, NULL, NULL); /* extract their Occupation and put it in */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->occupation_string, 2, "\n", '\n', NULL, _("Occupation"), 0, NULL, NULL); /* Hobbies, Latest News, and Favorite Quote are a bit different, since * the values can contain embedded newlines... but any or all of them * can also not appear. The way we delimit them is to successively * look for the next one that _could_ appear, and if all else fails, * we end the section by looking for the 'Links' heading, which is the * next thing to follow this bunch. (For Yahoo Japan, we check for * the "Description" ("Self PR") heading instead of "Links".) */ if (!purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->hobbies_string, (yd->jp ? 3 : 1), strings->latest_news_string, '\n', "\n", _("Hobbies"), 0, NULL, NULL)) { if (!purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->hobbies_string, 1, strings->favorite_quote_string, '\n', "\n", _("Hobbies"), 0, NULL, NULL)) { found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->hobbies_string, 1, strings->links_string, '\n', "\n", _("Hobbies"), 0, NULL, NULL); } else found = TRUE; } else found = TRUE; if (!purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->latest_news_string, 1, strings->favorite_quote_string, '\n', "\n", _("Latest News"), 0, NULL, NULL)) { found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->latest_news_string, (yd->jp ? 2 : 1), strings->links_string, '\n', "\n", _("Latest News"), 0, NULL, NULL); } else found = TRUE; found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->favorite_quote_string, 1, strings->links_string, '\n', "\n", _("Favorite Quote"), 0, NULL, NULL); /* Home Page will either be "No home page specified", * or "Home Page: " and a link. * For Yahoo! Japan, if there is no home page specified, * neither "No home page specified" nor "Home Page:" is shown. */ if (strings->home_page_string) { p = !strings->no_home_page_specified_string? NULL: strstr(stripped, strings->no_home_page_specified_string); if(!p) { found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->home_page_string, 1, "\n", 0, NULL, _("Home Page"), 1, NULL, NULL); } } /* Cool Link {1,2,3} is also different. If "No cool link specified" * exists, then we have none. If we have one however, we'll need to * check and see if we have a second one. If we have a second one, * we have to check to see if we have a third one. */ p = !strings->no_cool_link_specified_string? NULL: strstr(stripped,strings->no_cool_link_specified_string); if (!p) { if (purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->cool_link_1_string, 1, "\n", 0, NULL, _("Cool Link 1"), 1, NULL, NULL)) { found = TRUE; if (purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->cool_link_2_string, 1, "\n", 0, NULL, _("Cool Link 2"), 1, NULL, NULL)) { purple_markup_extract_info_field(stripped, stripped_len, user_info, strings->cool_link_3_string, 1, "\n", 0, NULL, _("Cool Link 3"), 1, NULL, NULL); } } } if (last_updated_utf8_string != NULL) { /* see if Member Since is there, and if so, extract it. */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, "Member Since:", 1, last_updated_utf8_string, '\n', NULL, _("Member Since"), 0, NULL, yahoo_info_date_reformat); /* extract the Last Updated date and put it in */ found |= purple_markup_extract_info_field(stripped, stripped_len, user_info, last_updated_utf8_string, (yd->jp ? 2 : 1), (yd->jp ? "\n" : " "), (yd->jp ? 0 : '\n'), NULL, _("Last Update"), 0, NULL, (yd->jp ? NULL : yahoo_info_date_reformat)); } } /* if (profile_state == PROFILE_STATE_DEFAULT) */ if(!found) { const gchar *str; purple_notify_user_info_add_section_break(user_info); purple_notify_user_info_add_pair(user_info, _("Error retrieving profile"), NULL); if (profile_state == PROFILE_STATE_UNKNOWN_LANGUAGE) { str = _("This profile is in a language " "or format that is not supported at this time."); } else if (profile_state == PROFILE_STATE_NOT_FOUND) { PurpleBuddy *b = purple_find_buddy (purple_connection_get_account(info_data->gc), info_data->name); YahooFriend *f = NULL; if (b) { /* Someone on the buddy list can be "not on server list", * in which case the user may or may not actually exist. * Hence this extra step. */ PurpleAccount *account = purple_buddy_get_account(b); f = yahoo_friend_find(purple_account_get_connection(account), purple_buddy_get_name(b)); } str = f ? _("Could not retrieve the user's profile. " "This most likely is a temporary server-side problem. " "Please try again later.") : _("Could not retrieve the user's profile. " "This most likely means that the user does not exist; " "however, Yahoo! sometimes does fail to find a user's " "profile. If you know that the user exists, " "please try again later."); } else { str = _("The user's profile is empty."); } purple_notify_user_info_add_pair(user_info, NULL, str); } /* put a link to the actual profile URL */ purple_notify_user_info_add_section_break(user_info); tmp = g_strdup_printf("<a href=\"%s\">%s</a>", profile_url_text, _("View web profile")); purple_notify_user_info_add_pair(user_info, NULL, tmp); g_free(tmp); g_free(stripped); /* show it to the user */ purple_notify_userinfo(info_data->gc, info_data->name, user_info, NULL, NULL); purple_notify_user_info_destroy(user_info); g_free(last_updated_utf8_string); g_free(url_buffer); g_free(fudged_buffer); g_free(profile_url_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) purple_imgstore_unref_by_id(id); #endif /* PHOTO_SUPPORT */ } void yahoo_get_info(PurpleConnection *gc, const char *name) { YahooData *yd = gc->proto_data; YahooGetInfoData *data; char *url; PurpleUtilFetchUrlData *url_data; data = g_new0(YahooGetInfoData, 1); data->gc = gc; data->name = g_strdup(name); url = g_strdup_printf("%s%s", (yd->jp ? YAHOOJP_PROFILE_URL : YAHOO_PROFILE_URL), name); url_data = purple_util_fetch_url(url, TRUE, NULL, FALSE, yahoo_got_info, data); if (url_data != NULL) yd->url_datas = g_slist_prepend(yd->url_datas, url_data); else { g_free(data->name); g_free(data); } g_free(url); }